Subversion Repositories SvarDOS

Compare Revisions

Ignore whitespace Rev 1270 → Rev 1271

/svarlang.lib/trunk/tlumacz.c
92,7 → 92,6
}
/* did I collect everything? */
if ((dotpos == 0) || (colpos == 0)) return(NULL);
if (s[colpos + 1] == 0) return(NULL);
 
*id = atoi(s);
*id <<= 8;
168,6 → 167,10
len = 0;
break;
}
if (strlen(ptr) == 0) {
printf("WARNING: %s[#%u] ignoring empty string %u.%u\r\n", fname, linecount, id >> 8, id & 0xff);
continue;
}
 
/* warn about dirty lines */
if (linebuf[0] == '?') {