aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs')
-rw-r--r--test-suite/bugs/closed/3344.v (renamed from test-suite/bugs/opened/3344.v)0
-rw-r--r--test-suite/bugs/closed/HoTT_coq_111.v (renamed from test-suite/bugs/opened/HoTT_coq_111.v)13
2 files changed, 5 insertions, 8 deletions
diff --git a/test-suite/bugs/opened/3344.v b/test-suite/bugs/closed/3344.v
index 8255fd6cce..8255fd6cce 100644
--- a/test-suite/bugs/opened/3344.v
+++ b/test-suite/bugs/closed/3344.v
diff --git a/test-suite/bugs/opened/HoTT_coq_111.v b/test-suite/bugs/closed/HoTT_coq_111.v
index deb8e61235..3b43f31df1 100644
--- a/test-suite/bugs/opened/HoTT_coq_111.v
+++ b/test-suite/bugs/closed/HoTT_coq_111.v
@@ -1,5 +1,6 @@
+
Module X.
- Set Universe Polymorphism.
+ (*Set Universe Polymorphism.*)
Inductive paths A (x : A) : forall _ : A, Type := idpath : paths A x x.
Notation "x = y" := (@paths _ x y) (at level 70, no associativity) : type_scope.
@@ -7,13 +8,11 @@ Module X.
Axiom P : A = B.
Definition foo : A = B.
abstract (rewrite <- P; reflexivity).
- (* Error: internal_paths_rew already exists. *)
- Fail Fail Defined. (* Anomaly: Uncaught exception Not_found(_). Please report. *)
- Admitted.
+ Defined.
End X.
Module Y.
- Set Universe Polymorphism.
+ (*Set Universe Polymorphism.*)
Inductive paths A (x : A) : forall _ : A, Type := idpath : paths A x x.
Notation "x = y" := (@paths _ x y) (at level 70, no associativity) : type_scope.
@@ -21,7 +20,5 @@ Module Y.
Axiom P : A = B.
Definition foo : (A = B) * (A = B).
split; abstract (rewrite <- P; reflexivity).
- (* Error: internal_paths_rew already exists. *)
- Fail Fail Defined. (* Anomaly: Uncaught exception Not_found(_). Please report. *)
- Admitted.
+ Defined.
End Y.