gameServer/CoreTypes.hs
changeset 8897 d6c310c65c91
parent 8519 98e2dbdda8c0
child 9035 e84d42a4311c
equal deleted inserted replaced
8895:95177c18e38c 8897:d6c310c65c91
   106         isAdministrator :: Bool,
   106         isAdministrator :: Bool,
   107         isChecker :: Bool,
   107         isChecker :: Bool,
   108         isKickedFromServer :: Bool,
   108         isKickedFromServer :: Bool,
   109         clientClan :: !(Maybe B.ByteString),
   109         clientClan :: !(Maybe B.ByteString),
   110         checkInfo :: Maybe CheckInfo,
   110         checkInfo :: Maybe CheckInfo,
   111         teamsInGame :: Word,
   111         teamsInGame :: Word
   112         actionsPending :: [Action]
       
   113     }
   112     }
   114 
   113 
   115 instance Eq ClientInfo where
   114 instance Eq ClientInfo where
   116     (==) = (==) `on` clientSocket
   115     (==) = (==) `on` clientSocket
   117 
   116