gameServer/Utils.hs
branch0.9.15
changeset 4693 6f74c97147fe
parent 4570 fa19f0579083
child 4768 d00562929f28
equal deleted inserted replaced
4691:d07fa8480491 4693:6f74c97147fe
   110 protoNumber2ver 31 = "0.9.13"
   110 protoNumber2ver 31 = "0.9.13"
   111 protoNumber2ver 32 = "0.9.14-dev"
   111 protoNumber2ver 32 = "0.9.14-dev"
   112 protoNumber2ver 33 = "0.9.14"
   112 protoNumber2ver 33 = "0.9.14"
   113 protoNumber2ver 34 = "0.9.15-dev"
   113 protoNumber2ver 34 = "0.9.15-dev"
   114 protoNumber2ver 35 = "0.9.14.1"
   114 protoNumber2ver 35 = "0.9.14.1"
   115 protoNumber2ver _ = "Unknown"
   115 protoNumber2ver 37 = "0.9.15"
       
   116 protoNumber2ver 38 = "0.9.16-dev"
       
   117 protoNumber2ver w = show w
   116 
   118 
   117 askFromConsole :: String -> IO String
   119 askFromConsole :: String -> IO String
   118 askFromConsole msg = do
   120 askFromConsole msg = do
   119     putStr msg
   121     putStr msg
   120     hFlush stdout
   122     hFlush stdout