if (namelist) {
while (isALPHA(*namelist)) {
for (d = tokenbuf,s=namelist;
- isALPHA(*s) || isDIGIT(*s) || *s == '_';
+ isWORDCHAR(*s);
*d++ = *s++) ;
*d = '\0';
while (*s && !isALPHA(*s)) s++;
*t &= 127;
if (isLOWER(*t))
*t = toUPPER(*t);
- if (!isALPHA(*t) && !isDIGIT(*t))
+ if (!isALNUMC(*t))
*t = '_';
}
if (!strchr(tokenbuf,'_'))
*t &= 127;
if (isLOWER(*t))
*t = toUPPER(*t);
- if (!isALPHA(*t) && !isDIGIT(*t))
+ if (!isALNUMC(*t))
*t = '_';
}
if (!strchr(tokenbuf,'_'))
*t &= 127;
if (isLOWER(*t))
*t = toUPPER(*t);
- if (!isALPHA(*t) && !isDIGIT(*t))
+ if (!isALNUMC(*t))
*t = '_';
}
if (!strchr(tokenbuf,'_'))
i = numarg;
if (i) {
t = s = tmpstr->str_ptr;
- while (isALPHA(*t) || isDIGIT(*t) || *t == '$' || *t == '_')
+ while (isWORDCHAR(*t) || *t == '$')
t++;
i = t - s;
if (i < 2)