gameServer/Utils.hs
branchserver_refactor
changeset 4583 ab82045ea083
parent 4581 af2e231bd9be
child 4599 a9e4093a7e78
equal deleted inserted replaced
4581:af2e231bd9be 4583:ab82045ea083
   102             (32, "0.9.14-dev"),
   102             (32, "0.9.14-dev"),
   103             (33, "0.9.14"),
   103             (33, "0.9.14"),
   104             (34, "0.9.15-dev"),
   104             (34, "0.9.15-dev"),
   105             (35, "0.9.14.1"),
   105             (35, "0.9.14.1"),
   106             (37, "0.9.15"),
   106             (37, "0.9.15"),
   107             (38, "0.9.15-dev")]
   107             (38, "0.9.16-dev")]
   108 
   108 
   109 askFromConsole :: String -> IO String
   109 askFromConsole :: String -> IO String
   110 askFromConsole msg = do
   110 askFromConsole msg = do
   111     putStr msg
   111     putStr msg
   112     hFlush stdout
   112     hFlush stdout