parens :: TokenParser a -> TokenParser a
parens p = match LParen *> p <* match RParen
parens :: TokenParser a -> TokenParser a
parens p = match LParen *> p <* match RParen
parens p = match LParen *> p <* match RParen