Hi, getMyLine :: IO [Char] getMyLine = do c <- getChar if(c == '\n') then return "" else cs <- getMyLine return [c] -------------- next part -------------- An HTML attachment was scrubbed... URL: http://www.haskell.org/pipermail/haskell/attachments/20081126/c85c1c9b/attachment.htm