aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/syntax_error.ml9
1 files changed, 9 insertions, 0 deletions
diff --git a/test/syntax_error.ml b/test/syntax_error.ml
index b907bc7..2ca615f 100644
--- a/test/syntax_error.ml
+++ b/test/syntax_error.ml
@@ -75,6 +75,14 @@ let act_no_column () =
message = "Invalid `ACT` label. You probably missed a ':'";
}
+let missing_ampersand () =
+ _test_instruction "b = 1 a = 2"
+ {
+ level = Error;
+ loc = _position;
+ message = "Missing separator between instructions";
+ }
+
let test =
( "Syntax Errors",
[
@@ -82,4 +90,5 @@ let test =
Alcotest.test_case "elseif" `Quick elseif_no_column;
Alcotest.test_case "(1" `Quick unclosed_paren;
Alcotest.test_case "act 1" `Quick act_no_column;
+ Alcotest.test_case "no &" `Quick missing_ampersand;
] )