funcCall :: Parser Expr
funcCall = do
    name <- identifier
    args <- parens $ expr `sepBy` comma
    return $ FuncCall name args
funcCall :: Parser Expr
funcCall = do
    name <- identifier
    args <- parens $ expr `sepBy` comma
    return $ FuncCall name args
funcCall = do
    name <- identifier
    args <- parens $ expr `sepBy` comma
    return $ FuncCall name args