twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-10 00:51:53 -07:00
Code Issues Packages Projects Releases Wiki Activity

Be a bit more conservative with -O flags, and GC. Hope to avoid runtime GC bug

Browse Source
This commit is contained in:
Don Stewart
2007-05-27 07:44:38 +00:00
parent ef5326ccff
commit 7be0a2103d
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Operations.hs
View File

@@ -22,7 +22,7 @@ import Data.List (genericIndex, intersectBy)
import Data.Bits ((.|.)) import Data.Bits ((.|.))
import qualified Data.Map as M import qualified Data.Map as M
import System.Mem (performGC) -- import System.Mem (performGC)
import Control.Monad.State import Control.Monad.State
import Control.Monad.Reader import Control.Monad.Reader
import Control.Arrow import Control.Arrow
@@ -140,7 +140,7 @@ refresh = do
setTopFocus setTopFocus
clearEnterEvents clearEnterEvents
io performGC -- really helps -- io performGC -- really helps
-- | clearEnterEvents. Remove all window entry events from the event queue. -- | clearEnterEvents. Remove all window entry events from the event queue.
clearEnterEvents :: X () clearEnterEvents :: X ()

2
xmonad.cabal
View File

@@ -24,6 +24,6 @@ extra-source-files: README TODO tests/loc.hs tests/Properties.hs man/xmonad.1
executable: xmonad executable: xmonad
main-is: Main.hs main-is: Main.hs
other-modules: Config Operations StackSet XMonad other-modules: Config Operations StackSet XMonad
ghc-options: -funbox-strict-fields -O2 -fasm -Wall -optl-Wl,-s ghc-options: -funbox-strict-fields -O -fasm -Wall -optl-Wl,-s
ghc-prof-options: -prof -auto-all ghc-prof-options: -prof -auto-all
extensions: GeneralizedNewtypeDeriving extensions: GeneralizedNewtypeDeriving