summaryrefslogtreecommitdiff
path: root/testsuite/tests/typing-objects/pr6383.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/typing-objects/pr6383.ml')
-rw-r--r--testsuite/tests/typing-objects/pr6383.ml8
1 files changed, 7 insertions, 1 deletions
diff --git a/testsuite/tests/typing-objects/pr6383.ml b/testsuite/tests/typing-objects/pr6383.ml
index b47e382490..c039de87de 100644
--- a/testsuite/tests/typing-objects/pr6383.ml
+++ b/testsuite/tests/typing-objects/pr6383.ml
@@ -1,5 +1,11 @@
(* TEST
- * toplevel
+ * expect
*)
let f (x: #M.foo) = 0;;
+[%%expect{|
+Line _, characters 11-16:
+ let f (x: #M.foo) = 0;;
+ ^^^^^
+Error: Unbound module M
+|}];;