X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FMem.hs;h=10a908aa3f82c876a7d47efe4ab607db6392facb;hb=f7a485978f04e84b086f1974b88887cc72d832d0;hp=a6e752c6232efd1b2e7b90cb9093c8f02f62ffa1;hpb=5ec04dcc5ad22095a3e172d7c3fe9d827429673c;p=ghc-base.git diff --git a/System/Mem.hs b/System/Mem.hs index a6e752c..10a908a 100644 --- a/System/Mem.hs +++ b/System/Mem.hs @@ -1,15 +1,13 @@ ----------------------------------------------------------------------------- --- +-- | -- Module : System.Mem -- 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 : provisional -- Portability : portable -- --- $Id: Mem.hs,v 1.2 2002/02/13 12:17:14 simonmar Exp $ --- -- Memory-related system things. -- ----------------------------------------------------------------------------- @@ -21,5 +19,5 @@ module System.Mem ( import Prelude #ifdef __GLASGOW_HASKELL__ -foreign import {-safe-} "performGC" performGC :: IO () +foreign import ccall {-safe-} "performGC" performGC :: IO () #endif