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     ! 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.