summaryrefslogtreecommitdiff
path: root/testsuite/tests/typing-modules-bugs/pr6293_bad.ml
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/typing-modules-bugs/pr6293_bad.ml')
-rw-r--r--testsuite/tests/typing-modules-bugs/pr6293_bad.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/testsuite/tests/typing-modules-bugs/pr6293_bad.ml b/testsuite/tests/typing-modules-bugs/pr6293_bad.ml
new file mode 100644
index 0000000000..fe16fe4db5
--- /dev/null
+++ b/testsuite/tests/typing-modules-bugs/pr6293_bad.ml
@@ -0,0 +1,2 @@
+module type S = sig type t = { a : int; b : int; } end;;
+let f (module M : S with type t = int) = { M.a = 0 };;