whiteSpace :: Parser ()
whiteSpace = skipMany (spaces <|> tabs <|> comment)
whiteSpace :: Parser ()
whiteSpace = skipMany (spaces <|> tabs <|> comment)
whiteSpace = skipMany (spaces <|> tabs <|> comment)