labelref :: Parser Expr
labelref = do
    ident <- lblIdentifier <|> symbol "$"
    return $ Literal (Label ident)
labelref :: Parser Expr
labelref = do
    ident <- lblIdentifier <|> symbol "$"
    return $ Literal (Label ident)
labelref = do
    ident <- lblIdentifier <|> symbol "$"
    return $ Literal (Label ident)