parseSymbol :: Parser Symbol
parseSymbol = do
  sym <- many1 (char '_' <|> alphaNum)
  return $ Symbol sym
parseSymbol :: Parser Symbol
parseSymbol = do
  sym <- many1 (char '_' <|> alphaNum)
  return $ Symbol sym
parseSymbol = do
  sym <- many1 (char '_' <|> alphaNum)
  return $ Symbol sym