diff options
| author | Enrico Tassi | 2019-11-22 11:35:04 +0100 |
|---|---|---|
| committer | Enrico Tassi | 2019-12-24 09:09:16 +0100 |
| commit | f258a877d25c1f6a27875f26d9ea1fe0a5fb5b81 (patch) | |
| tree | 9dd48c5228d0da9eeb87305c03ba7ec82a235659 /test-suite | |
| parent | 028d64fb5c461e32752b0f8a92d4e2eca2a26d0d (diff) | |
[CS] Allow a variable introduced with Let to be a canonical instance
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/success/CanonicalStructure.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/success/CanonicalStructure.v b/test-suite/success/CanonicalStructure.v index e6d674c1e6..bedb79d4d4 100644 --- a/test-suite/success/CanonicalStructure.v +++ b/test-suite/success/CanonicalStructure.v @@ -51,3 +51,11 @@ Fail Check (refl_equal _ : l _ = x2). Check s0. Check s1. Check s2. + +Section Y. + Let s3 := MKL x3. + Canonical Structure s3. + Check (refl_equal _ : l _ = x3). +End Y. +Fail Check (refl_equal _ : l _ = x3). +Fail Check s3. |