Return to listman.c CVS log

Up to [Research Unix] / researchv10no / cmd / spitbol

Annotation of researchv10no/cmd/spitbol/listman.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: #define MANUAL "spitv35.man"
                      3: 
                      4: main()
                      5: {
                      6:        register int c, linecnt;
                      7:        register FILE *f;
                      8: 
                      9:        f = fopen (MANUAL, "r");
                     10:        if (f == NULL) {
                     11:                perror (MANUAL);
                     12:                exit (1);
                     13:        }
                     14: 
                     15:        linecnt = 0;
                     16:        while ((c = getc (f)) != EOF) {
                     17:                putchar (c);
                     18:                if (c == '\n') {
                     19:                        linecnt++;
                     20:                        if (linecnt == 62) {
                     21:                                linecnt = 0;
                     22:                                putchar ('\f');
                     23:                        }
                     24:                }
                     25:                if (c == '\r')
                     26:                        getc (f);
                     27:        }
                     28: }

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