equal
deleted
inserted
replaced
65 |
65 |
66 data GameInfo = |
66 data GameInfo = |
67 GameInfo |
67 GameInfo |
68 { |
68 { |
69 roundMsgs :: Seq B.ByteString, |
69 roundMsgs :: Seq B.ByteString, |
70 leftTeams :: [B.ByteString], |
|
71 teamsAtStart :: [TeamInfo], |
70 teamsAtStart :: [TeamInfo], |
72 teamsInGameNumber :: Int, |
71 teamsInGameNumber :: Int, |
73 allPlayersHaveRegisteredAccounts :: Bool, |
72 allPlayersHaveRegisteredAccounts :: Bool, |
74 giMapParams :: Map.Map B.ByteString B.ByteString, |
73 giMapParams :: Map.Map B.ByteString B.ByteString, |
75 giParams :: Map.Map B.ByteString [B.ByteString] |
74 giParams :: Map.Map B.ByteString [B.ByteString] |
77 |
76 |
78 --newGameInfo :: -> GameInfo |
77 --newGameInfo :: -> GameInfo |
79 newGameInfo = |
78 newGameInfo = |
80 GameInfo |
79 GameInfo |
81 Data.Sequence.empty |
80 Data.Sequence.empty |
82 [] |
|
83 |
81 |
84 data RoomInfo = |
82 data RoomInfo = |
85 RoomInfo |
83 RoomInfo |
86 { |
84 { |
87 masterID :: ClientIndex, |
85 masterID :: ClientIndex, |