Test case for ocaml/ocaml#11445

let-def · Jul 20, 2022 · 0a43bec · 0a43bec
1 parent 2164fda
commit 0a43bec
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/ocaml/parse_errors.mlyl b/ocaml/parse_errors.mlyl
@@ -54,3 +54,8 @@ rule error_message = parse error
 | [. IN]; !
   { fun _ -> "Expecting `in'" }
 
+| OF; constructor_arguments; !
+  { function
+    | MINUSGREATER -> "Issue #11445: in constructor arguments, arrow types should be wrapped between parentheses"
+    | _ -> "oops"
+  }