simpleComment = string "<!--" *> manyTill anyChar (string "-->")(Note the overlapping parsers anyChar and string "-->". While this will work, it is not very efficient, as it will cause a lot of backtracking.)
simpleComment = string "<!--" *> manyTill' anyChar (string "-->")(Note the overlapping parsers anyChar and string "-->". While this will work, it is not very efficient, as it will cause a lot of backtracking.) The value returned by p is forced to WHNF.
commaSep p = p `sepBy` (char ',')
commaSep p = p `sepBy1` (char ',')
commaSep p = p `sepBy'` (char ',')
commaSep p = p `sepBy1'` (char ',')