summaryrefslogtreecommitdiff
path: root/src/Test/Builtins.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2024-09-21 21:19:37 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2024-09-24 20:02:36 +0200
commit274554243235d3013430a48973fd0f25244ac392 (patch)
tree122353115dc3205ba41b1133e0dd20c82c2d3118 /src/Test/Builtins.hs
parent0a51c798d1322297f13ce6bc7a500ce5212b5e8e (diff)
Function parameters and calls
Diffstat (limited to 'src/Test/Builtins.hs')
-rw-r--r--src/Test/Builtins.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Test/Builtins.hs b/src/Test/Builtins.hs
index 9deb2df..2ab38aa 100644
--- a/src/Test/Builtins.hs
+++ b/src/Test/Builtins.hs
@@ -6,8 +6,8 @@ import Test
builtins :: [ ( VarName, SomeVarValue ) ]
builtins =
- [ ( VarName "wait", SomeVarValue builtinWait )
+ [ ( VarName "wait", builtinWait )
]
-builtinWait :: TestBlock
-builtinWait = TestBlock [ Wait ]
+builtinWait :: SomeVarValue
+builtinWait = SomeVarValue mempty $ const $ TestBlock [ Wait ]