summaryrefslogtreecommitdiff
path: root/src/Test.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Test.hs')
-rw-r--r--src/Test.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Test.hs b/src/Test.hs
index 6b04fac..836992c 100644
--- a/src/Test.hs
+++ b/src/Test.hs
@@ -1,6 +1,7 @@
module Test (
Test(..),
TestStep(..),
+ Failed(..),
SourceLine(..),
MonadEval(..),
@@ -41,6 +42,9 @@ data TestStep = forall a. ExprType a => Let SourceLine VarName (Expr a) [TestSte
| PacketLoss (Expr Scientific) (Expr Node) [TestStep]
| Wait
+data Failed = Failed
+ | ProcessCrashed Process
+
newtype SourceLine = SourceLine Text