[project @ 1999-02-04 09:51:18 by simonm]

Oops, import occNameUserString.

diff --git a/ghc/compiler/typecheck/TcGenDeriv.lhs b/ghc/compiler/typecheck/TcGenDeriv.lhs
index 2819e6a..16d312f 100644 (file)
--- a/ghc/compiler/typecheck/TcGenDeriv.lhs
+++ b/ghc/compiler/typecheck/TcGenDeriv.lhs
@@ -40,7 +40,7 @@ import DataCon                ( isNullaryDataCon, dataConTag,
                          DataCon, ConTag,
                          dataConFieldLabels )
 import Name            ( getOccString, getOccName, getSrcLoc, occNameString, 
-                         nameRdrName, varName,
+                         occNameUserString, nameRdrName, varName,
                          OccName, Name, NamedThing(..), NameSpace
                        )