Return to sacat.c CVS log

Up to [Research Unix] / researchv9 / sys / boot / stand

Annotation of researchv9/sys/boot/stand/sacat.c, revision 1.1.1.1

1.1       root        1: /*     sacat.c 1.1     86/02/03        */
                      2: 
                      3: main()
                      4: {
                      5:        int c, i;
                      6:        char buf[500];
                      7: 
                      8:        do {
                      9:                printf("File: ");
                     10:                gets(buf);
                     11:                i = open(buf, 0);
                     12:                if (i < 0) printf("Error\n");
                     13:        } while (i < 0);
                     14: 
                     15:        while ((c = getc(i)) >= 0)
                     16:                putchar(c);
                     17:        exit(0);
                     18: }

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