このコードは、数字 (例: "1243\t343\n"
) が存在する場合にのみ機能します。
tabFile = endBy line eol
line = sepBy cell (many1 tab)
cell = integer
eol = char '\n'
integer = rd <$> many digit
where rd = read :: String -> Int
"abcd\tefg\n1243\t343\n"
その部分を無視するように解析する方法はあり"abcd\tefg\n"
ますか?