Return to exit.c CVS log

Up to [Research Unix] / researchv9 / jerq / src / lib / mj

Annotation of researchv9/jerq/src/lib/mj/exit.c, revision 1.1

1.1     ! root        1: #include <jerq.h>
        !             2: #include <jerqio.h>
        !             3: #define _SYSEXIT       4
        !             4: 
        !             5: exit(i)
        !             6: {
        !             7:        register int i;
        !             8:        register FILE *f;
        !             9:        for (i = 1, f = &_iob[1]; i < _NFILE; i++, f++)
        !            10:                fflush(f);
        !            11:        tag(_SYSEXIT);
        !            12:        jputshort(i);
        !            13:        jflush();
        !            14:        jgetshort();
        !            15:        Ivoid(17)();
        !            16: }

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