diff options
Diffstat (limited to 'src/Test.hs')
| -rw-r--r-- | src/Test.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Test.hs b/src/Test.hs index ab97bc7..404d965 100644 --- a/src/Test.hs +++ b/src/Test.hs @@ -1,6 +1,7 @@ module Test ( Test(..), TestStep(..), + SourceLine(..), ProcName(..), textProcName, unpackProcName, NodeName(..), textNodeName, unpackNodeName, @@ -29,9 +30,11 @@ data Test = Test data TestStep = Spawn ProcName NodeName | Send ProcName (Expr Text) - | Expect ProcName (Expr Regex) [VarName] + | Expect SourceLine ProcName (Expr Regex) [VarName] | Wait +newtype SourceLine = SourceLine Text + newtype NodeName = NodeName Text deriving (Eq, Ord) |