gameServer/CoreTypes.hs
changeset 5210 a5329e52a71b
parent 5209 f7a610e2ef5f
child 5996 2c72fe81dd37
equal deleted inserted replaced
5209:f7a610e2ef5f 5210:a5329e52a71b
   127         dbName :: B.ByteString,
   127         dbName :: B.ByteString,
   128         dbLogin :: B.ByteString,
   128         dbLogin :: B.ByteString,
   129         dbPassword :: B.ByteString,
   129         dbPassword :: B.ByteString,
   130         bans :: [BanInfo],
   130         bans :: [BanInfo],
   131         shutdownPending :: Bool,
   131         shutdownPending :: Bool,
       
   132         runArgs :: [String],
   132         coreChan :: Chan CoreMessage,
   133         coreChan :: Chan CoreMessage,
   133         dbQueries :: Chan DBQuery,
   134         dbQueries :: Chan DBQuery,
   134         serverSocket :: Maybe Socket,
   135         serverSocket :: Maybe Socket,
   135         serverConfig :: Maybe Conf
   136         serverConfig :: Maybe Conf
   136     }
   137     }
   150         ""
   151         ""
   151         ""
   152         ""
   152         ""
   153         ""
   153         []
   154         []
   154         False
   155         False
       
   156         []
   155 
   157 
   156 data AccountInfo =
   158 data AccountInfo =
   157     HasAccount B.ByteString Bool
   159     HasAccount B.ByteString Bool
   158     | Guest
   160     | Guest
   159     | Admin
   161     | Admin