diff options
| author | Matthieu Sozeau | 2014-08-14 13:01:30 +0200 |
|---|---|---|
| committer | Matthieu Sozeau | 2014-08-14 13:01:30 +0200 |
| commit | 37a58edffeff7b6a7f03ec781e1e2ca73de4b3af (patch) | |
| tree | e7c73845d8ccc700662875c5455d9a797225da87 /test-suite/bugs/opened | |
| parent | 9c1e76422c63ab845d72893ca85dd38ce5ce9bec (diff) | |
Restrict eta-conversion to inductive records, fixing bug #3310.
Diffstat (limited to 'test-suite/bugs/opened')
| -rw-r--r-- | test-suite/bugs/opened/3310.v | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/test-suite/bugs/opened/3310.v b/test-suite/bugs/opened/3310.v deleted file mode 100644 index ee9f8edfd3..0000000000 --- a/test-suite/bugs/opened/3310.v +++ /dev/null @@ -1,10 +0,0 @@ -Set Primitive Projections. - -CoInductive stream A := cons { hd : A; tl : stream A }. - -CoFixpoint id {A} (s : stream A) := cons _ (hd s) (id (tl s)). - -Lemma id_spec : forall A (s : stream A), id s = s. -Proof. -intros A s. -Fail Timeout 1 change (id s) with (cons _ (hd (id s)) (tl (id s))). |