X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FExts.hs;h=4b014f1c096436300f3f63b1b5d995ecddc7a04e;hb=7c497156cf4c0eef188847cc522f9c116c1d06a7;hp=63869323460f2f4c100a3d98ef6b92ed8abca531;hpb=d40426fef1eee05caa08c4e2d4dab4dcd63d976d;p=ghc-base.git

diff --git a/GHC/Exts.hs b/GHC/Exts.hs
index 6386932..4b014f1 100644
--- a/GHC/Exts.hs
+++ b/GHC/Exts.hs
@@ -16,9 +16,10 @@ module GHC.Exts
        (
         -- * Representations of some basic types
         Int(..),Word(..),Float(..),Double(..),Integer(..),Char(..),
+	Ptr(..), FunPtr(..),
 
         -- * Primitive operations
-        module GHC.Prim
+        module GHC.Prim,
 	shiftL#, shiftRL#, iShiftL#, iShiftRA#, iShiftRL#,
 
 	-- * Fusion
@@ -36,6 +37,7 @@ import GHC.Base
 import GHC.Word
 import GHC.Num
 import GHC.Float
+import GHC.Ptr
 
 class Splittable t where
   split :: t -> (t,t)