diff options
| author | Pierre-Marie Pédrot | 2018-09-26 10:43:25 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-09-26 10:43:25 +0200 |
| commit | b7cd70b5732d43280fc646115cd8597f2e844f95 (patch) | |
| tree | 4f9722e1d4e0add523f442f91565f4fc05855880 /test-suite | |
| parent | 7cc70b0df61718a946327d5bfb056b140eeb54ba (diff) | |
| parent | 5780336e3be522f76906b719c3d3694f243a5bdb (diff) | |
Merge PR #8217: Fixes #8215: "critical" type inference bug in interpreting evars by name
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/bugs/closed/8215.v | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/8215.v b/test-suite/bugs/closed/8215.v new file mode 100644 index 0000000000..c4b29a6354 --- /dev/null +++ b/test-suite/bugs/closed/8215.v @@ -0,0 +1,14 @@ +(* Check that instances for local definitions in evars have compatible body *) +Goal False. +Proof. + pose (n := 1). + evar (m:nat). + subst n. + pose (n := 0). + Fail Check ?m. (* n cannot be reinterpreted with a value convertible to 1 *) + clearbody n. + Fail Check ?m. (* n cannot be reinterpreted with a value convertible to 1 *) + clear n. + pose (n := 0+1). + Check ?m. (* Should be ok *) +Abort. |