diff -r 279168729cc3 -r e84d42a4311c gameServer/CoreTypes.hs
--- a/gameServer/CoreTypes.hs	Wed May 22 00:12:15 2013 +0400
+++ b/gameServer/CoreTypes.hs	Wed May 22 00:49:37 2013 +0400
@@ -75,6 +75,7 @@
     | CheckRecord
     | CheckFailed B.ByteString
     | CheckSuccess [B.ByteString]
+    | Random [ClientChan] [B.ByteString]
 
 type ClientChan = Chan [B.ByteString]