diff options
Diffstat (limited to 'test/mono/test.ml')
| -rw-r--r-- | test/mono/test.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/mono/test.ml b/test/mono/test.ml index 32d3b2ed..a54e3145 100644 --- a/test/mono/test.ml +++ b/test/mono/test.ml @@ -1,3 +1,5 @@ match Out.run() with | Done _ -> exit 0 -| _ -> exit 1 +| Fail s -> prerr_endline ("Fail: " ^ s); exit 1 +| Error s -> prerr_endline ("Error: " ^ s); exit 1 +| _ -> prerr_endline "Unexpected outcome"; exit 1 |