[project @ 2002-04-26 12:48:16 by simonmar]

[ghc-base.git] / GHC / Exts.hs

diff --git a/GHC/Exts.hs b/GHC/Exts.hs
index d75dc5a..a1e6db9 100644 (file)
--- a/GHC/Exts.hs
+++ b/GHC/Exts.hs
@@ -1,14 +1,12 @@
 -----------------------------------------------------------------------------
--- 
+-- |
 -- 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.2 2002/01/02 15:01:27 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.
 --
@@ -25,6 +23,9 @@ module GHC.Exts
        -- shifty wrappers from GHC.Base
        shiftL#, shiftRL#, iShiftL#, iShiftRA#, iShiftRL#,
 
+       -- for linear implicit parameters:
+       Splittable(..),
+
         -- and finally, all the unboxed primops of GHC!
         module GHC.Prim
 
@@ -32,8 +33,11 @@ module GHC.Exts
 
 import Prelude
 
-import {-# SOURCE #-} GHC.Prim
+import GHC.Prim
 import GHC.Base
 import GHC.Word
 import GHC.Num
 import GHC.Float
+
+class Splittable t where
+  split :: t -> (t,t)