msg (SE, _("%s is not yet implemented."), f->prototype);
goto fail;
}
- if ((f->flags & OPF_PERM_ONLY) && in_temporary_transformations ())
+ if ((f->flags & OPF_PERM_ONLY) && proc_in_temporary_transformations ())
{
msg (SE, _("%s may not appear after TEMPORARY."), f->prototype);
goto fail;
{
union any_node *n = pool_alloc (e->expr_pool, sizeof n->string);
n->type = OP_string;
- if (length > 255)
- length = 255;
+ if (length > MAX_STRING)
+ length = MAX_STRING;
n->string.s = copy_string (e, string, length);
return n;
}