← Back to branch summary

~ubuntu-branches/ubuntu/precise/ghc/precise

« back to all changes in this revision

Viewing changes to libraries/base/System/Mem.hs

  • Committer: Bazaar Package Importer
  • Author(s): Joachim Breitner
  • Date: 2011-01-17 12:49:24 UTC
  • Revision ID: james.westby@ubuntu.com-20110117124924-do1pym1jlf5o636m
Tags: upstream-7.0.1
Import upstream version 7.0.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
libraries/base/System/Mem.hs
 
1
-----------------------------------------------------------------------------
 
2
-- |
 
3
-- Module      :  System.Mem
 
4
-- Copyright   :  (c) The University of Glasgow 2001
 
5
-- License     :  BSD-style (see the file libraries/base/LICENSE)
 
6
-- 
 
7
-- Maintainer  :  libraries@haskell.org
 
8
-- Stability   :  provisional
 
9
-- Portability :  portable
 
10
--
 
11
-- Memory-related system things.
 
12
--
 
13
-----------------------------------------------------------------------------
 
14
 
 
15
module System.Mem (
 
16
        performGC       -- :: IO ()
 
17
  ) where
 
18
 
 
19
import Prelude
 
20
 
 
21
#ifdef __HUGS__
 
22
import Hugs.IOExts
 
23
#endif
 
24
 
 
25
#ifdef __GLASGOW_HASKELL__
 
26
-- | Triggers an immediate garbage collection
 
27
foreign import ccall {-safe-} "performMajorGC" performGC :: IO ()
 
28
#endif
 
29
 
 
30
#ifdef __NHC__
 
31
import NHC.IOExtras (performGC)
 
32
#endif