diff options
author | Matthieu Sozeau <mattam@mattam.org> | 2016-05-25 15:24:22 +0200 |
---|---|---|
committer | Matthieu Sozeau <mattam@mattam.org> | 2016-07-06 14:38:05 +0200 |
commit | f46f4ecec94953930fca6bbbc9fdb83a7a1025fc (patch) | |
tree | dd97bfe2b1bd0173f172488091998802aad6d41f /test-suite/success/primitiveproj.v | |
parent | f8a5cb590352a617de38fdd8ba5ffff7691d9841 (diff) |
Fixed bug #4622.
Diffstat (limited to 'test-suite/success/primitiveproj.v')
-rw-r--r-- | test-suite/success/primitiveproj.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test-suite/success/primitiveproj.v b/test-suite/success/primitiveproj.v index 473d37eb3..2fa770494 100644 --- a/test-suite/success/primitiveproj.v +++ b/test-suite/success/primitiveproj.v @@ -47,9 +47,9 @@ Check _.(next) : option Y. Lemma eta_ind (y : Y) : y = Build_Y y.(next). Proof. Fail reflexivity. Abort. -Record Fdef := { Fa : nat ; Fb := Fa; Fc : nat }. +Inductive Fdef := { Fa : nat ; Fb := Fa; Fc : Fdef }. -Scheme Fdef_rec := Induction for Fdef Sort Prop. +Fail Scheme Fdef_rec := Induction for Fdef Sort Prop. (* Rules for parsing and printing of primitive projections and their eta expansions. |