changeset 2004 | f7944d5adc5f |
parent 1927 | e2031906a347 |
child 2245 | c011aecc95e5 |
2003:41b3d00949ca | 2004:f7944d5adc5f |
---|---|
43 0 |
43 0 |
44 0 |
44 0 |
45 False |
45 False |
46 False |
46 False |
47 False |
47 False |
48 False |
|
49 False |
|
50 ) |
48 ) |
51 |
49 |
52 writeChan coreChan $ Accept newClient |
50 writeChan coreChan $ Accept newClient |
53 |
51 |
54 forkIO $ clientRecvLoop cHandle coreChan nextID |
52 forkIO $ clientRecvLoop cHandle coreChan nextID |