Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Force RNF in AnswerClients too, in order to prevent lazyness in actions (most probably it's redundant to do that, still I do) server_refactor
authorunc0rr
Fri, 28 Jan 2011 22:21:29 +0300
branchserver_refactor
changeset 4606 4c521c4ab2b6
parent 4604 831a4b91e9bc
child 4608 d0f758d0ff91
Force RNF in AnswerClients too, in order to prevent lazyness in actions (most probably it's redundant to do that, still I do)
gameServer/Actions.hs file | annotate | diff | comparison | revisions 
--- a/gameServer/Actions.hs	Fri Jan 28 22:19:06 2011 +0300
+++ b/gameServer/Actions.hs	Fri Jan 28 22:21:29 2011 +0300
@@ -68,7 +68,7 @@
 
 
 processAction (AnswerClients chans msg) = do
-    io $ mapM_ (flip writeChan msg) chans
+    io $ mapM_ (flip writeChan (msg `deepseq` msg)) (chans `deepseq` chans)
 
 
 processAction SendServerMessage = do
hedgewars