Changeset 3972 for src/Pugs/Internals.hs

Timestamp:

05/27/05 16:05:31 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

5515

Message:

* guarantee a GC run before and after INIT and END.

Files:

• src/Pugs/Internals.hs (modified) (2 diffs)

src/Pugs/Internals.hs

@@ -35 +35 @@
     module System.Cmd,
     module System.Process,
+    module System.Mem,
+    module System.Mem.Weak,
     module Control.Monad.RWS,
     module Control.Monad.Error,
@@ -92 +94 @@
 import System.IO.Error (ioeGetErrorString, isUserError)
 import System.Directory
+import System.Mem
+import System.Mem.Weak
 import Control.Exception (catchJust, errorCalls)
 import Control.Monad.RWS