summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/7076.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/7076.v')
-rw-r--r--test-suite/bugs/closed/7076.v4
1 files changed, 4 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/7076.v b/test-suite/bugs/closed/7076.v
new file mode 100644
index 00000000..0abc88c2
--- /dev/null
+++ b/test-suite/bugs/closed/7076.v
@@ -0,0 +1,4 @@
+(* These calls were raising an anomaly at some time *)
+Inductive A : nat -> id (nat->Type) := .
+Eval vm_compute in fun x => match x in A y z return y = z with end.
+Eval native_compute in fun x => match x in A y z return y = z with end.