[project @ 1997-07-05 03:02:04 by sof]

[ghc-hetmet.git] / ghc / compiler / basicTypes / FieldLabel.lhs

diff --git a/ghc/compiler/basicTypes/FieldLabel.lhs b/ghc/compiler/basicTypes/FieldLabel.lhs
index 7eea7b8..ccaf094 100644 (file)
--- a/ghc/compiler/basicTypes/FieldLabel.lhs
+++ b/ghc/compiler/basicTypes/FieldLabel.lhs
@@ -10,11 +10,11 @@ module FieldLabel where
 
 IMP_Ubiq(){-uitous-}
 
-import Name            --( Name{-instance Eq/Outputable-}, nameUnique )
+import Name            ( Name{-instance Eq/Outputable-}, NamedThing(..), nameUnique )
 import Type            ( SYN_IE(Type) )
 
 import Outputable
-import UniqFM           ( SYN_IE(Uniquable) )
+import Unique           ( Uniquable(..) )
 \end{code}
 
 \begin{code}