aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorMatthieu Sozeau2016-09-28 17:26:14 +0200
committerMatthieu Sozeau2016-10-20 17:39:00 +0200
commit474a58b15ca41f1b3287ef3e29e80cca9988598c (patch)
tree52446a501765d6185a9b42e737f3d3f7c6ef2b18 /test-suite
parent8e0f29cb69f06b64d74b18b09fb6a717034f1140 (diff)
Fix bug #5036 autorewrite, sections and universes
Universe context not properly declared. Improve API and code in declare.ml to allow declaration of universe contexts, used by declaration of universes and constraints (separately).
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/bugs/closed/5036.v10
1 files changed, 10 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/5036.v b/test-suite/bugs/closed/5036.v
new file mode 100644
index 0000000000..12c958be67
--- /dev/null
+++ b/test-suite/bugs/closed/5036.v
@@ -0,0 +1,10 @@
+Section foo.
+ Context (F : Type -> Type).
+ Context (admit : forall {T}, F T = True).
+ Hint Rewrite (fun T => @admit T).
+ Lemma bad : F False.
+ Proof.
+ autorewrite with core.
+ constructor.
+ Qed.
+End foo. (* Anomaly: Universe Top.16 undefined. Please report. *) \ No newline at end of file