diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2015-02-20 08:52:12 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2015-02-20 11:59:07 +0000 |
| commit | 50947195af59b7b288a67ef726006d18dbdfbbff (patch) | |
| tree | df14349c50cf00c8c6ff23585aaa769c0c55edf8 /compiler | |
| parent | 5f675e5b5ee364a8da4ee04cd70e2dcea6cce4f1 (diff) | |
| download | haskell-50947195af59b7b288a67ef726006d18dbdfbbff.tar.gz | |
Comments only
Diffstat (limited to 'compiler')
| -rw-r--r-- | compiler/typecheck/TcGenDeriv.hs | 4 |
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 |