diff options
| author | Pierre-Marie Pédrot | 2015-10-11 19:06:26 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2015-10-11 19:06:26 +0200 |
| commit | 303694c6436b36b114f4919ad7cacc9c053d11a3 (patch) | |
| tree | 11875542ae96e653f9e048a13dc2f4c855ae7561 /test-suite | |
| parent | f8658b06b98e59e7f6397c6082e4b9b399499948 (diff) | |
Adding test for bug #4366.
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/bugs/closed/4366.v | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/4366.v b/test-suite/bugs/closed/4366.v new file mode 100644 index 0000000000..6a5e9a4023 --- /dev/null +++ b/test-suite/bugs/closed/4366.v @@ -0,0 +1,15 @@ +Fixpoint stupid (n : nat) : unit := +match n with +| 0 => tt +| S n => + let () := stupid n in + let () := stupid n in + tt +end. + +Goal True. +Proof. +pose (v := stupid 24). +Timeout 2 vm_compute in v. +exact I. +Qed. |