diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2024-08-07 20:59:18 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2024-08-07 21:51:10 +0200 |
| commit | dc2202f36f8ee220293cc6f230be604a19be8cbb (patch) | |
| tree | 5201a7751ad655460d48d5e6456f8546179c25b5 /src/Test/Builtins.hs | |
| parent | 18ced99f826746a19aa6c0b351673d132f86421a (diff) | |
Replace first command (wait) with a builtin
Diffstat (limited to 'src/Test/Builtins.hs')
| -rw-r--r-- | src/Test/Builtins.hs | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/Test/Builtins.hs b/src/Test/Builtins.hs new file mode 100644 index 0000000..9deb2df --- /dev/null +++ b/src/Test/Builtins.hs @@ -0,0 +1,13 @@ +module Test.Builtins ( + builtins, +) where + +import Test + +builtins :: [ ( VarName, SomeVarValue ) ] +builtins = + [ ( VarName "wait", SomeVarValue builtinWait ) + ] + +builtinWait :: TestBlock +builtinWait = TestBlock [ Wait ] |