X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FExts.hs;h=4b014f1c096436300f3f63b1b5d995ecddc7a04e;hb=7fed02d08be1f19b470e2a79e587064789f0b564;hp=3ba88ca180acf55fa72d6fee5c75e1fa79530dc0;hpb=1e1907fb42b74de4feb5ac8af10846db31e56edb;p=ghc-base.git

diff --git a/GHC/Exts.hs b/GHC/Exts.hs
index 3ba88ca..4b014f1 100644
--- a/GHC/Exts.hs
+++ b/GHC/Exts.hs
@@ -1,37 +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.1 2002/01/02 14:40:10 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#,
 
-        -- and finally, all the unboxed primops of GHC!
-        module GHC.Prim
+	-- * Fusion
+	build, augment,
+
+	-- * Linear implicit parameter support
+	Splittable(..),
 
        ) where
 
-import {-# SOURCE #-} GHC.Prim
+import Prelude
+
+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)