X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FMem%2FStableName.hs;h=29918c5a61148dde753e3d0af51475ac9a47c288;hb=f7a485978f04e84b086f1974b88887cc72d832d0;hp=0544ea94ac8fc5e1474cf034aea59969b65bba15;hpb=0bd9c2127306fe60f3f34f5ac87a37b074e877a6;p=ghc-base.git diff --git a/System/Mem/StableName.hs b/System/Mem/StableName.hs index 0544ea9..29918c5 100644 --- a/System/Mem/StableName.hs +++ b/System/Mem/StableName.hs @@ -1,15 +1,13 @@ ----------------------------------------------------------------------------- --- +-- | -- Module : System.Mem.StableName -- Copyright : (c) The University of Glasgow 2001 --- License : BSD-style (see the file libraries/core/LICENSE) +-- License : BSD-style (see the file libraries/base/LICENSE) -- -- Maintainer : libraries@haskell.org -- Stability : experimental -- Portability : non-portable -- --- $Id: StableName.hs,v 1.2 2001/09/13 11:37:08 simonmar Exp $ --- -- Giving an object a stable (GC-invariant) name. -- ----------------------------------------------------------------------------- @@ -25,9 +23,8 @@ import Prelude import Data.Dynamic #ifdef __GLASGOW_HASKELL__ -import GHC.Base ( Int(..) ) import GHC.IOBase ( IO(..) ) -import GHC.Prim ( StableName#, makeStableName# +import GHC.Base ( Int(..), StableName#, makeStableName# , eqStableName#, stableNameToInt# ) -----------------------------------------------------------------------------