Permalink
Browse files

Threaded FastCGI

  • Loading branch information...
1 parent 2a544fa commit 665e2e4176ab4e94bd8cc7e3d25731317b409f59 @snoyberg committed Oct 6, 2010
Showing with 3 additions and 2 deletions.
  1. +3 −2 fastcgi.hs
View
@@ -1,6 +1,7 @@
import Controller
-import Network.Wai.Handler.FastCGI (run)
+import Network.Wai.Handler.FastCGI (runFork)
import Network.HTTP.Enumerator (withHttpEnumerator)
+import Control.Concurrent (forkIO)
main :: IO ()
-main = withHttpEnumerator $ withHaskellers run
+main = withHttpEnumerator $ withHaskellers $ runFork Nothing forkIO 5

0 comments on commit 665e2e4

Please sign in to comment.