diff options
author | Simon Marlow <simonmar@microsoft.com> | 2006-10-11 20:01:10 +0000 |
---|---|---|
committer | Simon Marlow <simonmar@microsoft.com> | 2006-10-11 20:01:10 +0000 |
commit | ab22f4e6456820c1b5169d75f5975a94e61f54ce (patch) | |
tree | 44eb4222120653313776566754c006e1deeb77a3 /compiler/ghci/ByteCodeFFI.lhs | |
parent | 6b4592943b799175dec4549882bbf06fa87a0739 (diff) | |
download | haskell-ab22f4e6456820c1b5169d75f5975a94e61f54ce.tar.gz |
More import tidying and fixing the stage 2 build
Diffstat (limited to 'compiler/ghci/ByteCodeFFI.lhs')
-rw-r--r-- | compiler/ghci/ByteCodeFFI.lhs | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/compiler/ghci/ByteCodeFFI.lhs b/compiler/ghci/ByteCodeFFI.lhs index ef3fd3e0d6..c5bdc2c61b 100644 --- a/compiler/ghci/ByteCodeFFI.lhs +++ b/compiler/ghci/ByteCodeFFI.lhs @@ -1,7 +1,8 @@ % -% (c) The University of Glasgow 2001 +% (c) The University of Glasgow 2001-2006 % -\section[ByteCodeGen]{Generate machine-code sequences for foreign import} + +ByteCodeGen: Generate machine-code sequences for foreign import \begin{code} module ByteCodeFFI ( mkMarshalCode, moan64 ) where @@ -9,21 +10,20 @@ module ByteCodeFFI ( mkMarshalCode, moan64 ) where #include "HsVersions.h" import Outputable -import SMRep ( CgRep(..), cgRepSizeW ) -import ForeignCall ( CCallConv(..) ) +import SMRep +import ForeignCall import Panic -- DON'T remove apparently unused imports here .. -- there is ifdeffery below import Control.Exception ( throwDyn ) -import DATA_BITS ( Bits(..), shiftR, shiftL ) -import Foreign ( newArray ) +import Data.Bits ( Bits(..), shiftR, shiftL ) +import Foreign ( newArray, Ptr ) import Data.List ( mapAccumL ) -import DATA_WORD ( Word8, Word32 ) -import Foreign ( Ptr ) +import Data.Word ( Word8, Word32 ) import System.IO.Unsafe ( unsafePerformIO ) -import IO ( hPutStrLn, stderr ) +import System.IO ( hPutStrLn, stderr ) -- import Debug.Trace ( trace ) \end{code} |