X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FbasicTypes%2FFieldLabel.lhs;h=b388d378d7369bf332da509028ddca859e72eaf0;hb=7f05f1095e9a2c7b2b378859da00fde7ca907080;hp=50a668736fa548c556360dda65fce030516cf20b;hpb=bebb2614af8819da9298fb537d2a777743b3fabb;p=ghc-hetmet.git

diff --git a/ghc/compiler/basicTypes/FieldLabel.lhs b/ghc/compiler/basicTypes/FieldLabel.lhs
index 50a6687..b388d37 100644
--- a/ghc/compiler/basicTypes/FieldLabel.lhs
+++ b/ghc/compiler/basicTypes/FieldLabel.lhs
@@ -16,9 +16,8 @@ module FieldLabel(
 
 #include "HsVersions.h"
 
-import {-# SOURCE #-}	TypeRep( Type )	-- FieldLabel is compiled very early
-import {-# SOURCE #-}	TyCon( TyCon )	-- FieldLabel is compiled very early
-
+import Type( Type )
+import TyCon( TyCon )
 import Name		( Name{-instance Eq/Outputable-}, NamedThing(..), nameUnique )
 import Outputable
 import Unique           ( Uniquable(..) )