Commit fd3ceb3c authored by sof's avatar sof

[project @ 1999-02-05 12:35:42 by sof]

deriving Enum bugfixes
parent f0b56cc5
......@@ -611,7 +611,7 @@ deriving_occ_info
, (ordClassKey, [intTyCon_RDR, compose_RDR, eqTag_RDR])
-- EQ (from Ordering) is needed to force in the constructors
-- as well as the type constructor.
, (enumClassKey, [intTyCon_RDR, and_RDR, map_RDR, plus_RDR, showsPrec_RDR, append_RDR])
, (enumClassKey, [intTyCon_RDR, eq_RDR, ge_RDR, and_RDR, map_RDR, plus_RDR, showsPrec_RDR, append_RDR])
-- The last two Enum deps are only used to produce better
-- error msgs for derived toEnum methods.
, (boundedClassKey, [intTyCon_RDR])
......
......@@ -512,8 +512,8 @@ gen_Enum_binds tycon
(mk_easy_App mkInt_RDR [ah_RDR])
(mk_easy_App mkInt_RDR [bh_RDR])
(HsIf (HsApp (HsApp (HsVar gt_RDR)
(HsVar a_RDR))
(HsVar b_RDR))
(mk_easy_App mkInt_RDR [ah_RDR]))
(mk_easy_App mkInt_RDR [bh_RDR]))
(HsLit (HsInt 0))
(HsVar (maxtag_RDR tycon))
tycon_loc))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment