gameServer/HWProtoLobbyState.hs
changeset 1811 1b9e33623b7e
parent 1804 4e78ad846fb6
child 1813 cfe1481e0247
equal deleted inserted replaced
1810:4059cafd1da7 1811:1b9e33623b7e
     6 import Maybe
     6 import Maybe
     7 import Data.List
     7 import Data.List
     8 --------------------------------------
     8 --------------------------------------
     9 import CoreTypes
     9 import CoreTypes
    10 import Actions
    10 import Actions
    11 import Answers
       
    12 import Utils
    11 import Utils
    13 
    12 
    14 answerAllTeams teams = concatMap toAnswer teams
    13 answerAllTeams teams = concatMap toAnswer teams
    15 	where
    14 	where
    16 		toAnswer team =
    15 		toAnswer team =