X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FbasicTypes%2FLiteral.lhs;h=f05d1bf3b9661a86719042d0044a54bd64d4f3ad;hp=e83ea9db74e006ea9b6e9305f8678d7c648074e9;hb=49c98d143c382a1341e1046f5ca00819a25691ba;hpb=b00b5bc04ff36a551552470060064f0b7d84ca30

diff --git a/compiler/basicTypes/Literal.lhs b/compiler/basicTypes/Literal.lhs
index e83ea9d..f05d1bf 100644
--- a/compiler/basicTypes/Literal.lhs
+++ b/compiler/basicTypes/Literal.lhs
@@ -1,4 +1,5 @@
 %
+% (c) The University of Glasgow 2006
 % (c) The GRASP/AQUA Project, Glasgow University, 1998
 %
 \section[Literal]{@Literal@: Machine literals (unboxed, of course)}
@@ -26,24 +27,21 @@ module Literal
 
 #include "HsVersions.h"
 
-import TysPrim		( charPrimTy, addrPrimTy, floatPrimTy, doublePrimTy,
-			  intPrimTy, wordPrimTy, int64PrimTy, word64PrimTy
-			)
-import Type		( Type )
+import TysPrim
+import Type
 import Outputable
 import FastTypes
 import FastString
 import Binary
+import Ratio
+import FastString
 
-import Ratio 		( numerator )
-import FastString	( uniqueOfFS, lengthFS )
-import DATA_INT		( Int8,  Int16,  Int32 )
-import DATA_WORD	( Word8, Word16, Word32 )
-import Char		( ord, chr )
+import Data.Int
+import Data.Word
+import Data.Char
 \end{code}
 
 
-
 %************************************************************************
 %*									*
 \subsection{Sizes}