summaryrefslogtreecommitdiff
path: root/src/Test/Builtins.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Test/Builtins.hs')
-rw-r--r--src/Test/Builtins.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Test/Builtins.hs b/src/Test/Builtins.hs
index b768bb9..3f42335 100644
--- a/src/Test/Builtins.hs
+++ b/src/Test/Builtins.hs
@@ -20,7 +20,7 @@ getArg (FunctionArguments args) kw =
_ -> error "parameter mismatch"
builtinGuard :: SomeVarValue
-builtinGuard = SomeVarValue (FunctionArguments $ M.singleton Nothing (ExprTypePrim (Proxy @Bool))) $
+builtinGuard = SomeVarValue (FunctionArguments $ M.singleton Nothing (SomeArgumentType (NoDefault @Bool))) $
\sline args -> TestBlock [ Guard sline (getArg args Nothing) ]
builtinWait :: SomeVarValue