summaryrefslogtreecommitdiff
path: root/src/Parser/Statement.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2026-04-05 11:47:12 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2026-04-05 12:33:39 +0200
commite06402099ce256405610d0be64760266f969dcd0 (patch)
tree1c1e10ba0aa2f6dbf9ca04c77a9ad0b8122645ad /src/Parser/Statement.hs
parentad00b4534582c5ce94243f7dda3b76d7c0bba021 (diff)
Custom signals to kill spawned processHEADmaster
Changelog: Added `killwith` clause to set a signal used to terminate `spawn`ed process.
Diffstat (limited to 'src/Parser/Statement.hs')
-rw-r--r--src/Parser/Statement.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Parser/Statement.hs b/src/Parser/Statement.hs
index 7876542..4548b63 100644
--- a/src/Parser/Statement.hs
+++ b/src/Parser/Statement.hs
@@ -430,6 +430,7 @@ testSpawn = command "spawn" $ Spawn
<$> param "as"
<*> (bimap fromExprParam fromExprParam <$> paramOrContext "on")
<*> (maybe [] fromExprParam <$> param "args")
+ <*> (maybe Nothing (Just . fromExprParam) <$> param "killwith")
<*> innerBlockFun
testExpect :: TestParser (Expr (TestBlock ()))