equal
deleted
inserted
replaced
81 isRestrictedJoins :: Bool, |
81 isRestrictedJoins :: Bool, |
82 isRestrictedTeams :: Bool, |
82 isRestrictedTeams :: Bool, |
83 roundMsgs :: Seq B.ByteString, |
83 roundMsgs :: Seq B.ByteString, |
84 leftTeams :: [B.ByteString], |
84 leftTeams :: [B.ByteString], |
85 teamsAtStart :: [TeamInfo], |
85 teamsAtStart :: [TeamInfo], |
|
86 mapParams :: Map.Map B.ByteString B.ByteString, |
86 params :: Map.Map B.ByteString [B.ByteString] |
87 params :: Map.Map B.ByteString [B.ByteString] |
87 } |
88 } |
88 |
89 |
89 instance Show RoomInfo where |
90 instance Show RoomInfo where |
90 show ri = ", players: " ++ show (playersIn ri) |
91 show ri = ", players: " ++ show (playersIn ri) |
105 False |
106 False |
106 False |
107 False |
107 Data.Sequence.empty |
108 Data.Sequence.empty |
108 [] |
109 [] |
109 [] |
110 [] |
110 (Map.singleton "MAP" ["+rnd+"]) |
111 ( |
|
112 Map.fromList $ Prelude.zipWith (,) |
|
113 ["MAP", "MAPGEN", "MAZE_SIZE", "SEED", "TEMPLATE"] |
|
114 ["+rnd+", "0", "0", "seed", "0"] |
|
115 ) |
|
116 (Map.singleton "SCHEME" ["Default"]) |
111 |
117 |
112 data StatisticsInfo = |
118 data StatisticsInfo = |
113 StatisticsInfo |
119 StatisticsInfo |
114 { |
120 { |
115 playersNumber :: Int, |
121 playersNumber :: Int, |