gameServer/CoreTypes.hs
changeset 8509 eda9f2106d8d
parent 8507 f4475782cf45
child 8519 98e2dbdda8c0
equal deleted inserted replaced
8508:f849b7b3af1d 8509:eda9f2106d8d
    18 type ClientChan = Chan [B.ByteString]
    18 type ClientChan = Chan [B.ByteString]
    19 
    19 
    20 data CheckInfo =
    20 data CheckInfo =
    21     CheckInfo
    21     CheckInfo
    22     {
    22     {
    23         recordFileName :: B.ByteString,
    23         recordFileName :: String,
    24         recordTeams :: [TeamInfo]
    24         recordTeams :: [TeamInfo]
    25     }
    25     }
    26 
    26 
    27 data ClientInfo =
    27 data ClientInfo =
    28     ClientInfo
    28     ClientInfo