updateLine :: Int -> Char -> Int
updateLine n c = if c == '\n' then n + 1 else n
updateLine :: Int -> Char -> Int
updateLine n c = if c == '\n' then n + 1 else n
updateLine n c = if c == '\n' then n + 1 else n