diff -r bc3410104894 -r 772a46ef8288 gameServer/ServerState.hs --- a/gameServer/ServerState.hs Sat Jun 26 16:58:19 2010 +0400 +++ b/gameServer/ServerState.hs Sun Jun 27 21:06:41 2010 +0400 @@ -9,6 +9,7 @@ ) where import Control.Monad.State +import Data.Set as Set ---------------------- import RoomsAndClients import CoreTypes @@ -16,6 +17,7 @@ data ServerState = ServerState { clientIndex :: Maybe ClientIndex, serverInfo :: ServerInfo, + removedClients :: Set.Set ClientIndex, roomsClients :: MRnC }