blob: 2ab38aad52187fe405b58d5e253ef0debf696532 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
module Test.Builtins (
builtins,
) where
import Test
builtins :: [ ( VarName, SomeVarValue ) ]
builtins =
[ ( VarName "wait", builtinWait )
]
builtinWait :: SomeVarValue
builtinWait = SomeVarValue mempty $ const $ TestBlock [ Wait ]
|