gameServer/ServerState.hs
changeset 15983 2c92499daa67
parent 11046 47a8c19ecb60
equal deleted inserted replaced
15982:cf580d9ff7ef 15983:2c92499daa67
    28     roomClientsS,
    28     roomClientsS,
    29     sameProtoClientsS,
    29     sameProtoClientsS,
    30     io
    30     io
    31     ) where
    31     ) where
    32 
    32 
       
    33 import Control.Monad
    33 import Control.Monad.State.Strict
    34 import Control.Monad.State.Strict
    34 import Data.Set as Set(Set)
    35 import Data.Set as Set(Set)
    35 import Data.Word
    36 import Data.Word
    36 ----------------------
    37 ----------------------
    37 import RoomsAndClients
    38 import RoomsAndClients