X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FExts.hs;h=4b014f1c096436300f3f63b1b5d995ecddc7a04e;hb=b1f2e321ceac8fcfc1f0756e2f5c2585fbd00b3c;hp=699edbf4ec1a35e81d24d03813dea6adfc0269d3;hpb=05e43a9bd25232efced01ce45d00b3b3ba12af51;p=ghc-base.git

diff --git a/GHC/Exts.hs b/GHC/Exts.hs
index 699edbf..4b014f1 100644
--- a/GHC/Exts.hs
+++ b/GHC/Exts.hs
@@ -1,35 +1,32 @@
 -----------------------------------------------------------------------------
--- 
+-- |
 -- Module      :  GHC.Exts
--- Copyright   :  (c) The University of Glasgow 2001
--- License     :  BSD-style (see the file libraries/core/LICENSE)
+-- Copyright   :  (c) The University of Glasgow 2002
+-- License     :  see libraries/base/LICENSE
 -- 
--- Maintainer  :  libraries@haskell.org
--- Stability   :  experimental
--- Portability :  non-portable
---
--- $Id: Exts.hs,v 1.4 2002/04/11 12:03:44 simonpj Exp $
+-- Maintainer  :  cvs-ghc@haskell.org
+-- Stability   :  internal
+-- Portability :  non-portable (GHC Extensions)
 --
--- GHC Extensions: this is the Approved Way to get at GHC-specific stuff.
+-- GHC Extensions: this is the Approved Way to get at GHC-specific extensions.
 --
 -----------------------------------------------------------------------------
 
 module GHC.Exts
        (
-        -- the representation of some basic types:
+        -- * Representations of some basic types
         Int(..),Word(..),Float(..),Double(..),Integer(..),Char(..),
+	Ptr(..), FunPtr(..),
 
-	-- Fusion
-	build, augment,
-
-	-- shifty wrappers from GHC.Base
+        -- * Primitive operations
+        module GHC.Prim,
 	shiftL#, shiftRL#, iShiftL#, iShiftRA#, iShiftRL#,
 
-	-- for linear implicit parameters:
-	Splittable(..),
+	-- * Fusion
+	build, augment,
 
-        -- and finally, all the unboxed primops of GHC!
-        module GHC.Prim
+	-- * Linear implicit parameter support
+	Splittable(..),
 
        ) where
 
@@ -40,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)