gameServer/NetRoutines.hs
changeset 11556 af9aa8d5863c
parent 11467 f2c36df8c7b1
child 11855 ad435d95ca4b
equal deleted inserted replaced
11555:b96080df19d0 11556:af9aa8d5863c
    79                     newEventsInfo
    79                     newEventsInfo
    80                     newEventsInfo
    80                     newEventsInfo
    81                     newEventsInfo
    81                     newEventsInfo
    82                     0
    82                     0
    83                     []
    83                     []
       
    84                     []
    84                     )
    85                     )
    85 
    86 
    86         writeChan chan $ Accept newClient
    87         writeChan chan $ Accept newClient
    87         return ()
    88         return ()