X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=GHC%2FExts.hs;h=4b014f1c096436300f3f63b1b5d995ecddc7a04e;hb=9846058c21cf4eae3d5b4b3b977db2b85342771e;hp=c5f0ca63b381f92a87a5ee94929b57765da157ec;hpb=042f0fc377753bc5fc62b3bc7de82e36e77f9c83;p=ghc-base.git

diff --git a/GHC/Exts.hs b/GHC/Exts.hs
index c5f0ca6..4b014f1 100644
--- a/GHC/Exts.hs
+++ b/GHC/Exts.hs
@@ -1,45 +1,43 @@
 -----------------------------------------------------------------------------
--- 
+-- |
 -- 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.3 2002/03/14 16:26:40 simonmar 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
 
 import Prelude
 
-import {-# SOURCE #-} GHC.Prim
+import GHC.Prim
 import GHC.Base
 import GHC.Word
 import GHC.Num
 import GHC.Float
+import GHC.Ptr
 
 class Splittable t where
   split :: t -> (t,t)