summaryrefslogtreecommitdiff
path: root/testsuite/tests/typing-gadts/pr7390.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/typing-gadts/pr7390.ml')
-rw-r--r--testsuite/tests/typing-gadts/pr7390.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/testsuite/tests/typing-gadts/pr7390.ml b/testsuite/tests/typing-gadts/pr7390.ml
index 4c7b65b328..7522209a38 100644
--- a/testsuite/tests/typing-gadts/pr7390.ml
+++ b/testsuite/tests/typing-gadts/pr7390.ml
@@ -27,5 +27,6 @@ Line 2, characters 2-28:
Warning 8 [partial-match]: this pattern-matching is not exhaustive.
Here is an example of a case that is not matched:
Either (N, Y _)
+
val f : filled either -> string = <fun>
|}]