diff options
| author | Hugo Herbelin | 2016-09-10 11:37:21 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2016-09-10 11:37:21 +0200 |
| commit | 74f8381ed943f1e786b32c49fb31f14fd488dc9c (patch) | |
| tree | 648abb052f8ba08ed786bc3038a7f130e9d3f387 | |
| parent | 43104a0b94e42fb78764b5d1365ca1e85a158508 (diff) | |
Test for #5077.
| -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 0000000000..7e7f2c3737 --- /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. |
