diff options
Diffstat (limited to 'test-suite/bugs/closed/3386.v')
-rw-r--r-- | test-suite/bugs/closed/3386.v | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3386.v b/test-suite/bugs/closed/3386.v new file mode 100644 index 00000000..0e236c21 --- /dev/null +++ b/test-suite/bugs/closed/3386.v @@ -0,0 +1,16 @@ +Set Universe Polymorphism. +Set Printing Universes. +Record Cat := { Obj :> Type }. +Definition set_cat := {| Obj := Type |}. +Goal Type@{i} = Type@{j}. +Proof. + (* 1 subgoals +, subgoal 1 (ID 3) + + ============================ + Type@{Top.368} = Type@{Top.370} +(dependent evars:) *) + Fail change Type@{i} with (Obj set_cat@{i}). (* check that it fails *) + try change Type@{i} with (Obj set_cat@{i}). (* check that it's not an anomaly *) +(* Anomaly: Uncaught exception Invalid_argument("Array.iter2", _). +Please report. *) |