o5r/plan9port
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make tbl compile silently.

Browse source
This commit is contained in:
wkj 2004-05-17 02:23:43 +00:00
parent 1f72bc47fe
commit 8a3cbc1579
19 changed files with 321 additions and 328 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/cmd/tbl/tm.c
View file

@ -9,14 +9,14 @@ maknew(char *str)
char *p, *q, *ba;
p = str;
for (ba = 0; (c = *str); str++)
for (ba = 0; c = *str; str++)
if (c == '\\' && *(str + 1) == '&')
ba = str;
str = p;
if (ba == 0) {
for (dpoint = 0; *str; str++) {
if (*str == '.' && !ineqn(str, p) &&
((str > p && digit(*(str - 1))) ||
(str > p && digit(*(str - 1)) ||
digit(*(str + 1))))
dpoint = (int)str;
}
@ -37,7 +37,7 @@ maknew(char *str)
exlim = exstore + MAXCHS;
}
q = exstore;
while ((*exstore++ = *str++))
while (*exstore++ = *str++)
;
*p = 0;
return(q);
@ -50,7 +50,7 @@ ineqn (char *s, char *p)
/* true if s is in a eqn within p */
int ineq = 0, c;
while ((c = *p)) {
while (c = *p) {
if (s == p)
return(ineq);
p++;