diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2021-08-19 22:42:36 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2021-08-19 22:42:36 +0200 |
| commit | 66a1261c68f123b604622e4729d966974198e50e (patch) | |
| tree | b8e01250f645e98177e9e800cd62014c19a1cf20 /src/Main.hs | |
| parent | 1c5cc6281d1320b3ad3ee586368c0c1dacce0cbe (diff) | |
Wait command
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs index 2c16a16..d4134bd 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -190,6 +190,11 @@ runTest tool test = do p <- getProcess net pname expect p regex + Wait -> do + putStr "Waiting..." + hFlush stdout + void $ getLine + exitNetwork net main :: IO () |