diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2024-09-21 21:19:37 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2024-09-24 20:02:36 +0200 |
| commit | 274554243235d3013430a48973fd0f25244ac392 (patch) | |
| tree | 122353115dc3205ba41b1133e0dd20c82c2d3118 /src/Test/Builtins.hs | |
| parent | 0a51c798d1322297f13ce6bc7a500ce5212b5e8e (diff) | |
Function parameters and calls
Diffstat (limited to 'src/Test/Builtins.hs')
| -rw-r--r-- | src/Test/Builtins.hs | 6 |
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 ] |