[project @ 1996-01-18 16:33:17 by partain]

[ghc-hetmet.git] / ghc / compiler / typecheck / TcDeriv.lhs

diff --git a/ghc/compiler/typecheck/TcDeriv.lhs b/ghc/compiler/typecheck/TcDeriv.lhs
index 37e72fe..50af23c 100644 (file)
--- a/ghc/compiler/typecheck/TcDeriv.lhs
+++ b/ghc/compiler/typecheck/TcDeriv.lhs
@@ -556,6 +556,7 @@ gen_inst_info modname fixities deriver_name_funs
                        -- These two are only needed if there are pragmas to typecheck;
                        -- but there ain't since we are generating the code right here.
                True {-yes, from_here-}
+               modname
                NoInstancePragmas
                mkGeneratedSrcLoc
                clas