equal
deleted
inserted
replaced
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 |