From 95e2468b3c92e6689a5de4a2c03a79b3ef035f8b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sun, 2 Apr 2023 21:02:47 +0200
Subject: Disconnect commands

---
 src/Test.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Test.hs')

diff --git a/src/Test.hs b/src/Test.hs
index 0d96902..af1bace 100644
--- a/src/Test.hs
+++ b/src/Test.hs
@@ -42,6 +42,9 @@ data TestStep = forall a. ExprType a => Let SourceLine (TypedVarName a) (Expr a)
               | Send (Expr Process) (Expr Text)
               | Expect SourceLine (Expr Process) (Expr Regex) [TypedVarName Text] [TestStep]
               | Guard SourceLine (Expr Bool)
+              | DisconnectNode (Expr Node) [TestStep]
+              | DisconnectNodes (Expr Network) [TestStep]
+              | DisconnectUpstream (Expr Network) [TestStep]
               | PacketLoss (Expr Scientific) (Expr Node) [TestStep]
               | Wait
 
-- 
cgit v1.2.3