changeset 5143 | 649d87819682 |
parent 5007 | c401891fe5e0 |
child 5209 | f7a610e2ef5f |
--- a/gameServer/CoreTypes.hs Tue Apr 12 21:28:37 2011 +0400 +++ b/gameServer/CoreTypes.hs Tue Apr 12 22:31:48 2011 +0400 @@ -44,6 +44,7 @@ data HedgehogInfo = HedgehogInfo B.ByteString B.ByteString + deriving (Show, Read) data TeamInfo = TeamInfo @@ -60,6 +61,7 @@ hhnum :: Int, hedgehogs :: [HedgehogInfo] } + deriving (Show, Read) data RoomInfo = RoomInfo