diff options
| author | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-27 09:44:38 +0200 |
|---|---|---|
| committer | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-27 09:44:38 +0200 |
| commit | eeac9aa8cfba70574ac264ba2b12a61f387c0f29 (patch) | |
| tree | 9f74893a59b8ae20af13e8607bb769b0dbfcc508 /Operations.hs | |
| parent | 4d92960c04c5e86219e758227443bfa8b5383a91 (diff) | |
| download | metatile-eeac9aa8cfba70574ac264ba2b12a61f387c0f29.tar metatile-eeac9aa8cfba70574ac264ba2b12a61f387c0f29.zip | |
Be a bit more conservative with -O flags, and GC. Hope to avoid runtime GC bug
darcs-hash:20070527074438-9c5c1-af8256d1690de2b48e86f2085106f74954c0738b
Diffstat (limited to 'Operations.hs')
| -rw-r--r-- | Operations.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Operations.hs b/Operations.hs index ed062c3..4c8c3e3 100644 --- a/Operations.hs +++ b/Operations.hs @@ -22,7 +22,7 @@ import Data.List (genericIndex, intersectBy) import Data.Bits ((.|.)) import qualified Data.Map as M -import System.Mem (performGC) +-- import System.Mem (performGC) import Control.Monad.State import Control.Monad.Reader import Control.Arrow @@ -140,7 +140,7 @@ refresh = do setTopFocus clearEnterEvents - io performGC -- really helps +-- io performGC -- really helps -- | clearEnterEvents. Remove all window entry events from the event queue. clearEnterEvents :: X () |