Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 1139 → Rev 1138

/svarcom/trunk/command.c
716,7 → 716,7
const char far *ptr;
res[reslen] = 0;
reslen = lastperc;
nls_strtoup(res + reslen); /* turn varname uppercase before lookup */
strupr(res + reslen); /* turn varname uppercase before lookup */
ptr = env_lookup_val(envseg, res + reslen);
if (ptr != NULL) {
while ((*ptr != 0) && (reslen < ressz)) {