changeset 2403 | 6c5d504af2ba |
parent 2348 | b39d826e1ccd |
child 2867 | 9be6693c78cb |
2402:edd12b259e7c | 2403:6c5d504af2ba |
---|---|
44 0 |
44 0 |
45 False |
45 False |
46 False |
46 False |
47 False |
47 False |
48 undefined |
48 undefined |
49 undefined |
|
49 ) |
50 ) |
50 |
51 |
51 writeChan coreChan $ Accept newClient |
52 writeChan coreChan $ Accept newClient |
52 |
53 |
53 forkIO $ clientRecvLoop cHandle coreChan nextID |
54 forkIO $ clientRecvLoop cHandle coreChan nextID |