Augment testing framework to support examining errors

[tiger.ml.git] / compiler / src / lib / tiger / tiger_test.mli

diff --git a/compiler/src/lib/tiger/tiger_test.mli b/compiler/src/lib/tiger/tiger_test.mli
index 2bcbb3f..3f7143c 100644 (file)
--- a/compiler/src/lib/tiger/tiger_test.mli
+++ b/compiler/src/lib/tiger/tiger_test.mli
@@ -3,6 +3,7 @@ type t
 val case
   :  ?out_lexing  : Tiger_parser.token list
   -> ?out_parsing : Tiger_absyn.t
+  -> ?is_error_expected : (Tiger_error.t -> bool)
   -> code         : string
   -> string
   -> t