Return to Z.i CVS log

Up to [Research Unix] / researchv10no / cmd / ccom / vax / tests

Annotation of researchv10no/cmd/ccom/vax/tests/Z.i, revision 1.1.1.1

1.1       root        1: struct text {
                      2:     int fd; 
                      3:     char file;
                      4:     short cnt,extra;
                      5:     unsigned char *pnt;
                      6:     unsigned char buf[1];
                      7: };
                      8: int blankline(tex)
                      9: struct text *tex;
                     10: {
                     11:     int c, i, n, found;
                     12:     n = found + ((i)?*tex->pnt++:get());
                     13:     for (;;) {
                     14:        c= (tex->cnt>0?tex->pnt[0]:peek(0,tex));
                     15:        if (c == ' ' || c == '\n' || c == '\t')  ((0<tex->cnt--)?*tex->pnt++:get(tex));
                     16:        else return(1);
                     17:        }
                     18: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.