version 1.27, 2000/01/13 17:35:09 |
version 1.28, 2000/01/15 14:26:00 |
|
|
if (*m4wraps) { /* anything for rundown ?? */ |
if (*m4wraps) { /* anything for rundown ?? */ |
ilevel = 0; /* in case m4wrap includes.. */ |
ilevel = 0; /* in case m4wrap includes.. */ |
bufbase = bp = buf; /* use the entire buffer */ |
bufbase = bp = buf; /* use the entire buffer */ |
putback(EOF); /* eof is a must !! */ |
|
pbstr(m4wraps); /* user-defined wrapup act */ |
pbstr(m4wraps); /* user-defined wrapup act */ |
macro(); /* last will and testament */ |
macro(); /* last will and testament */ |
} |
} |
|
|
for (i = 1; *++token; i++) { |
for (i = 1; *++token; i++) { |
t = gpbc(); |
t = gpbc(); |
if (t == EOF || t != *token) { |
if (t == EOF || t != *token) { |
if (t != EOF) |
putback(t); |
putback(t); |
|
while (--i) |
while (--i) |
putback(*--token); |
putback(*--token); |
return 0; |
return 0; |