summaryrefslogtreecommitdiff
path: root/testsuite/tests/typing-misc/variant.ml.reference
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/typing-misc/variant.ml.reference')
-rw-r--r--testsuite/tests/typing-misc/variant.ml.reference16
1 files changed, 16 insertions, 0 deletions
diff --git a/testsuite/tests/typing-misc/variant.ml.reference b/testsuite/tests/typing-misc/variant.ml.reference
new file mode 100644
index 0000000000..4de6b611e6
--- /dev/null
+++ b/testsuite/tests/typing-misc/variant.ml.reference
@@ -0,0 +1,16 @@
+
+# Characters 61-116:
+ ......struct
+ type t = A | B
+ let f = function A | B -> 0
+ end..
+Error: Signature mismatch:
+ Modules do not match:
+ sig type t = X.t = A | B val f : t -> int end
+ is not included in
+ sig type t = int * bool end
+ Type declarations do not match:
+ type t = X.t = A | B
+ is not included in
+ type t = int * bool
+#