gameServer/NetRoutines.hs
changeset 11466 4b5c7a5c49fd
parent 11464 a9957113404a
child 11467 f2c36df8c7b1
equal deleted inserted replaced
11465:0ae2e4c13bd1 11466:4b5c7a5c49fd
    77                     Nothing
    77                     Nothing
    78                     newEventsInfo
    78                     newEventsInfo
    79                     newEventsInfo
    79                     newEventsInfo
    80                     newEventsInfo
    80                     newEventsInfo
    81                     0
    81                     0
       
    82                     []
    82                     )
    83                     )
    83 
    84 
    84         writeChan chan $ Accept newClient
    85         writeChan chan $ Accept newClient
    85         return ()
    86         return ()