diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2025-09-15 21:10:39 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-09-19 19:44:28 +0200 |
| commit | 89ed9a3a6c0ada2b1c252a5e24283b84eb0fa4c8 (patch) | |
| tree | 5ba8a271690d43bab73fd4c86ff2702ca8afce45 /src/Test.hs | |
| parent | 77fdc01b6dfa6f497ed80a46c51e227ca9bdaeed (diff) | |
Add timeout argument for the ‘expect’ command
Changelog: Added `timeout` argument for the `expect` command
Diffstat (limited to 'src/Test.hs')
| -rw-r--r-- | src/Test.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Test.hs b/src/Test.hs index 18933b1..1481b2b 100644 --- a/src/Test.hs +++ b/src/Test.hs @@ -48,7 +48,7 @@ data TestStep a where Spawn :: TypedVarName Process -> Either Network Node -> [ Text ] -> (Process -> TestStep a) -> TestStep a SpawnShell :: Maybe (TypedVarName Process) -> Node -> ShellScript -> (Process -> TestStep a) -> TestStep a Send :: Process -> Text -> TestStep () - Expect :: SourceLine -> Process -> Traced Regex -> [ TypedVarName Text ] -> ([ Text ] -> TestStep a) -> TestStep a + Expect :: SourceLine -> Process -> Traced Regex -> Scientific -> [ TypedVarName Text ] -> ([ Text ] -> TestStep a) -> TestStep a Flush :: Process -> Maybe Regex -> TestStep () Guard :: CallStack -> Bool -> TestStep () DisconnectNode :: Node -> TestStep a -> TestStep a |