gameServer/CoreTypes.hs
changeset 7537 833a0c34fafc
parent 7321 57bd4f201401
child 7757 c20e6c80e249
equal deleted inserted replaced
7535:87e5838103ff 7537:833a0c34fafc
    92         gameInfo :: Maybe GameInfo,
    92         gameInfo :: Maybe GameInfo,
    93         playersIn :: !Int,
    93         playersIn :: !Int,
    94         readyPlayers :: !Int,
    94         readyPlayers :: !Int,
    95         isRestrictedJoins :: Bool,
    95         isRestrictedJoins :: Bool,
    96         isRestrictedTeams :: Bool,
    96         isRestrictedTeams :: Bool,
       
    97         roomBansList :: [B.ByteString],
    97         mapParams :: Map.Map B.ByteString B.ByteString,
    98         mapParams :: Map.Map B.ByteString B.ByteString,
    98         params :: Map.Map B.ByteString [B.ByteString]
    99         params :: Map.Map B.ByteString [B.ByteString]
    99     }
   100     }
   100 
   101 
   101 newRoom :: RoomInfo
   102 newRoom :: RoomInfo
   109         Nothing
   110         Nothing
   110         0
   111         0
   111         0
   112         0
   112         False
   113         False
   113         False
   114         False
       
   115         []
   114         (
   116         (
   115             Map.fromList $ Prelude.zipWith (,)
   117             Map.fromList $ Prelude.zipWith (,)
   116                 ["MAP", "MAPGEN", "MAZE_SIZE", "SEED", "TEMPLATE"]
   118                 ["MAP", "MAPGEN", "MAZE_SIZE", "SEED", "TEMPLATE"]
   117                 ["+rnd+", "0", "0", "seed", "0"]
   119                 ["+rnd+", "0", "0", "seed", "0"]
   118         )
   120         )