constAssign :: Parser Expr
constAssign = do
    name <- lblIdentifier
    symbol "=" <|> (optional (char '.') >> symbol "equ")
    val <- argExpr
    return $ Define name val
constAssign :: Parser Expr
constAssign = do
    name <- lblIdentifier
    symbol "=" <|> (optional (char '.') >> symbol "equ")
    val <- argExpr
    return $ Define name val
constAssign = do
    name <- lblIdentifier
    symbol "=" <|> (optional (char '.') >> symbol "equ")
    val <- argExpr
    return $ Define name val