aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2018-02-24 09:32:32 +0100
committerGravatar Maxime Dénès <mail@maximedenes.fr>2018-02-24 09:32:32 +0100
commitde00217b6726adc99bbc2eaaa0df93e01bf9c471 (patch)
treee9eb78751844394f20dc78c11d5adc4c98f630d7 /test-suite
parenta470526e00d853abb5b89ea61a7c55f952204d68 (diff)
parentf2dc6898a748ea78b7de23a307a839577d5bad24 (diff)
Merge PR #6776: Fixes bug #6774 (anomaly with ill-typed template polymorphism).
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/bugs/closed/6774.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/6774.v b/test-suite/bugs/closed/6774.v
new file mode 100644
index 000000000..9625af91f
--- /dev/null
+++ b/test-suite/bugs/closed/6774.v
@@ -0,0 +1,7 @@
+(* Was an anomaly with ill-typed template polymorphism *)
+Definition huh (b:bool) := if b then Set else Prop.
+Definition lol b: huh b :=
+ if b return huh b then nat else True.
+Goal (lol true) * unit.
+Fail generalize true. (* should fail with error, not anomaly *)
+Abort.