gameServer/CoreTypes.hs
changeset 2155 d897222d3339
parent 2116 dec7ead2d178
child 2172 80d34c0b9dfe
equal deleted inserted replaced
2154:3d2917be12c3 2155:d897222d3339
   150 	| Admin
   150 	| Admin
   151 	deriving (Show, Read)
   151 	deriving (Show, Read)
   152 
   152 
   153 data DBQuery =
   153 data DBQuery =
   154 	CheckAccount Int String String
   154 	CheckAccount Int String String
       
   155 	| ClearCache
   155 	deriving (Show, Read)
   156 	deriving (Show, Read)
   156 
   157 
   157 data CoreMessage =
   158 data CoreMessage =
   158 	Accept ClientInfo
   159 	Accept ClientInfo
   159 	| ClientMessage (Int, [String])
   160 	| ClientMessage (Int, [String])