-let_func(func) ::= STRLEN(T). {
- func = init_let_func(T->type, T->text, 0);
- free(T);
-}
-let_func(func) ::= STRVAL(T). {
- func = init_let_func(T->type, T->text, 0);
- free(T);
-}
-let_func(func) ::= INTVAL(T). {
- func = init_let_func(T->type, T->text, 0);
- free(T);
-}
-let_func(func) ::= FLOATVAL(T). {
- func = init_let_func(T->type, T->text, 0);
- free(T);
-}
-let_func(func) ::= BOOLVAL(T). {
- func = init_let_func(T->type, T->text, 0);
+%destructor let_func {free_let_func($$);}
+let_func(func) ::= let_func_token(T). {
+ func = init_let_func(T->type, T->text, NULL);