summaryrefslogtreecommitdiff
path: root/Setup.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Setup.hs')
-rw-r--r--Setup.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/Setup.hs b/Setup.hs
index 8a3ce5402..77f47a473 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -15,8 +15,8 @@ import System.FilePath
import System.Directory
import System.Process
import System.Exit
-import Control.Concurrent(forkIO)
-import Control.Concurrent.Chan(newChan,writeChan,readChan)
+--import Control.Concurrent(forkIO)
+--import Control.Concurrent.Chan(newChan,writeChan,readChan)
import WebSetup
@@ -430,8 +430,8 @@ ls path = filter (`notElem` [".",".."]) `fmap` getDirectoryContents path
-- | For parallel RGL module compilation
-- Unfortunately, this has no effect unless Setup.hs is compiled with -threaded
-parallel_ ms = -- sequence_ ms {-
+parallel_ ms = sequence_ ms {-
do c <- newChan
ts <- sequence [ forkIO (m >> writeChan c ()) | m <- ms]
sequence_ [readChan c | _ <- ts]
---} \ No newline at end of file
+--}