summaryrefslogtreecommitdiff
path: root/libraries/base
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-05-29 23:05:10 -0400
committerBen Gamari <ben@smart-cactus.org>2020-11-01 13:57:10 -0500
commit1a184ceb8d4c3093fe1a8a5085a747943274a8d9 (patch)
treea752e2b5c192cd8daac51a24e2e21259bf2cae53 /libraries/base
parente63db32c7eb089985a1a7279a0a886a32d70ac0e (diff)
downloadhaskell-wip/perform-blocking-gc.tar.gz
rts: Introduce performBlockingMajorGCwip/perform-blocking-gc
Diffstat (limited to 'libraries/base')
-rw-r--r--libraries/base/System/Mem.hs9
1 files changed, 8 insertions, 1 deletions
diff --git a/libraries/base/System/Mem.hs b/libraries/base/System/Mem.hs
index c47a52d2f7..843cf66877 100644
--- a/libraries/base/System/Mem.hs
+++ b/libraries/base/System/Mem.hs
@@ -3,7 +3,7 @@
-- Module : System.Mem
-- Copyright : (c) The University of Glasgow 2001
-- License : BSD-style (see the file libraries/base/LICENSE)
---
+--
-- Maintainer : libraries@haskell.org
-- Stability : provisional
-- Portability : portable
@@ -19,6 +19,7 @@ module System.Mem
(
-- * Garbage collection
performGC
+ , performBlockingMajorGC
, performMajorGC
, performMinorGC
@@ -35,6 +36,12 @@ import GHC.Conc.Sync
performGC :: IO ()
performGC = performMajorGC
+-- | Triggers an immediate major garbage collection, ensuring that collection
+-- finishes before returning.
+--
+-- @since 4.16.0.0
+foreign import ccall "performBlockingMajorGC" performBlockingMajorGC :: IO ()
+
-- | Triggers an immediate major garbage collection.
--
-- @since 4.7.0.0