diff --git a/src/tink/macro/Sisyphus.hx b/src/tink/macro/Sisyphus.hx
index 01fa02c..277424e 100644
--- a/src/tink/macro/Sisyphus.hx
+++ b/src/tink/macro/Sisyphus.hx
@@ -96,7 +96,7 @@ class Sisyphus {
       case TFun(args, ret):
         TFunction(
           [for (a in args) {
-            var t = TNamed(a.name, toComplexType(a.t));
+            var t = #if haxe4 TNamed(a.name, #else ( #end toComplexType(a.t));
             if (a.opt) TOptional(t) else t;
           }],
           toComplexType(ret)