gameServer/CoreTypes.hs
changeset 14862 111c4d750c6d
parent 14442 94f10f69fe76
child 15469 88770c206c31
equal deleted inserted replaced
14861:b02581c5b0c5 14862:111c4d750c6d
   107 
   107 
   108 
   108 
   109 data Event = LobbyChatMessage
   109 data Event = LobbyChatMessage
   110            | EngineMessage
   110            | EngineMessage
   111            | RoomJoin
   111            | RoomJoin
       
   112            | RoomNameUpdate
   112 
   113 
   113 type EventsInfo = [(Int, UTCTime)]
   114 type EventsInfo = [(Int, UTCTime)]
   114 
   115 
   115 newEventsInfo :: EventsInfo
   116 newEventsInfo :: EventsInfo
   116 newEventsInfo = []
   117 newEventsInfo = []