diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2016-09-10 11:37:21 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2016-09-10 11:37:21 +0200 |
| commit | 74f8381ed943f1e786b32c49fb31f14fd488dc9c (patch) | |
| tree | 648abb052f8ba08ed786bc3038a7f130e9d3f387 /test-suite/bugs/closed/5077.v | |
| parent | 43104a0b94e42fb78764b5d1365ca1e85a158508 (diff) | |
Test for #5077.
Diffstat (limited to 'test-suite/bugs/closed/5077.v')
| -rw-r--r-- | test-suite/bugs/closed/5077.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/5077.v b/test-suite/bugs/closed/5077.v new file mode 100644 index 000000000..7e7f2c373 --- /dev/null +++ b/test-suite/bugs/closed/5077.v @@ -0,0 +1,8 @@ +(* Testing robustness of typing for a fixpoint with evars in its type *) + +Inductive foo (n : nat) : Type := . +Definition foo_denote {n} (x : foo n) : Type := match x with end. + +Definition baz : forall n (x : foo n), foo_denote x. +refine (fix go n (x : foo n) : foo_denote x := _). +Abort. |