summaryrefslogtreecommitdiff
path: root/src/Parser.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Parser.hs')
-rw-r--r--src/Parser.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/Parser.hs b/src/Parser.hs
index b79931b..aafba2c 100644
--- a/src/Parser.hs
+++ b/src/Parser.hs
@@ -630,6 +630,12 @@ testWith = do
modify $ \s -> s { testContext = ctx }
testBlock indent
+testSubnet :: TestParser [TestStep]
+testSubnet = command "subnet" $ Subnet
+ <$> param ""
+ <*> paramOrContext "of"
+ <*> innerBlock
+
testNode :: TestParser [TestStep]
testNode = command "node" $ DeclNode
<$> param ""
@@ -690,6 +696,7 @@ testStep = choice
, forStatement
, testLocal
, testWith
+ , testSubnet
, testNode
, testSpawn
, testSend