changeset 10094 | d3a2fe9f04f2 |
parent 10093 | ada172d33988 |
child 10194 | 7025bd3c3131 |
10093:ada172d33988 | 10094:d3a2fe9f04f2 |
---|---|
82 |
82 |
83 |
83 |
84 data Event = LobbyChatMessage |
84 data Event = LobbyChatMessage |
85 | EngineMessage |
85 | EngineMessage |
86 | RoomJoin |
86 | RoomJoin |
87 |
87 |
88 type EventsInfo = [(Int, Maybe UTCTime)] |
88 type EventsInfo = [(Int, UTCTime)] |
89 |
89 |
90 newEventsInfo :: EventsInfo |
90 newEventsInfo :: EventsInfo |
91 newEventsInfo = [] |
91 newEventsInfo = [] |
92 |
92 |
93 type ClientChan = Chan [B.ByteString] |
93 type ClientChan = Chan [B.ByteString] |