equal
deleted
inserted
replaced
67 GameInfo |
67 GameInfo |
68 { |
68 { |
69 roundMsgs :: Seq B.ByteString, |
69 roundMsgs :: Seq B.ByteString, |
70 leftTeams :: [B.ByteString], |
70 leftTeams :: [B.ByteString], |
71 teamsAtStart :: [TeamInfo], |
71 teamsAtStart :: [TeamInfo], |
72 allPlayersHaveRegisteredAccounts :: Bool |
72 allPlayersHaveRegisteredAccounts :: Bool, |
73 } |
73 giMapParams :: Map.Map B.ByteString B.ByteString, |
|
74 giParams :: Map.Map B.ByteString [B.ByteString] |
|
75 } deriving (Show, Read) |
74 |
76 |
75 newGameInfo :: Bool -> GameInfo |
77 --newGameInfo :: -> GameInfo |
76 newGameInfo = |
78 newGameInfo = |
77 GameInfo |
79 GameInfo |
78 Data.Sequence.empty |
80 Data.Sequence.empty |
79 [] |
81 [] |
80 [] |
82 [] |