summaryrefslogtreecommitdiff
path: root/compiler
diff options
context:
space:
mode:
Diffstat (limited to 'compiler')
-rw-r--r--compiler/typecheck/TcGenDeriv.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/typecheck/TcGenDeriv.hs b/compiler/typecheck/TcGenDeriv.hs
index c9281088ed..3141311bd5 100644
--- a/compiler/typecheck/TcGenDeriv.hs
+++ b/compiler/typecheck/TcGenDeriv.hs
@@ -102,7 +102,9 @@ data DerivStuff -- Please add this auxiliary stuff
-}
genDerivedBinds :: DynFlags -> (Name -> Fixity) -> Class -> SrcSpan -> TyCon
- -> (LHsBinds RdrName, BagDerivStuff)
+ -> ( LHsBinds RdrName -- The method bindings of the instance declaration
+ , BagDerivStuff) -- Specifies extra top-level declarations needed
+ -- to support the instance declaration
genDerivedBinds dflags fix_env clas loc tycon
| Just gen_fn <- assocMaybe gen_list (getUnique clas)
= gen_fn loc tycon