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/ByteCodeItbls.lhs | |
| parent | 6b4592943b799175dec4549882bbf06fa87a0739 (diff) | |
| download | haskell-ab22f4e6456820c1b5169d75f5975a94e61f54ce.tar.gz | |
More import tidying and fixing the stage 2 build
Diffstat (limited to 'compiler/ghci/ByteCodeItbls.lhs')
| -rw-r--r-- | compiler/ghci/ByteCodeItbls.lhs | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/compiler/ghci/ByteCodeItbls.lhs b/compiler/ghci/ByteCodeItbls.lhs index 6513ff62c5..d990da2198 100644 --- a/compiler/ghci/ByteCodeItbls.lhs +++ b/compiler/ghci/ByteCodeItbls.lhs @@ -1,10 +1,9 @@ % -% (c) The University of Glasgow 2000 +% (c) The University of Glasgow 2000-2006 % -\section[ByteCodeItbls]{Generate infotables for interpreter-made bytecodes} +ByteCodeItbls: Generate infotables for interpreter-made bytecodes \begin{code} - {-# OPTIONS -optc-DNON_POSIX_SOURCE #-} module ByteCodeItbls ( ItblEnv, ItblPtr, mkITbls ) where @@ -23,14 +22,10 @@ import Util ( lengthIs, listLengthCmp ) import Foreign import Foreign.C -import DATA_BITS ( Bits(..), shiftR ) +import Data.Bits ( Bits(..), shiftR ) import GHC.Exts ( Int(I#), addr2Int# ) -#if __GLASGOW_HASKELL__ < 503 -import Ptr ( Ptr(..) ) -#else import GHC.Ptr ( Ptr(..) ) -#endif \end{code} %************************************************************************ |