summaryrefslogtreecommitdiff
path: root/src/Test
diff options
context:
space:
mode:
Diffstat (limited to 'src/Test')
-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 926bdbc..36f88e8 100644
--- a/src/Test/Builtins.hs
+++ b/src/Test/Builtins.hs
@@ -30,7 +30,7 @@ getArgVars (FunctionArguments args) kw = do
builtinSend :: SomeVarValue
builtinSend = SomeVarValue [] (FunctionArguments $ M.fromList atypes) $
- \_ args -> TestBlock [ Send (Pure (getArg args (Just "to"))) (Pure (getArg args Nothing)) ]
+ \_ args -> TestBlock [ Send (getArg args (Just "to")) (getArg args Nothing) ]
where
atypes =
[ ( Just "to", SomeArgumentType (ContextDefault @Process) )