Return to PCEXIT.c CVS log

Up to [CSRG BSD Unix] / 40BSD / lib / libpc

Annotation of 40BSD/lib/libpc/PCEXIT.c, revision 1.1.1.1

1.1       root        1: /* Copyright (c) 1979 Regents of the University of California */
                      2: 
                      3: static char sccsid[] = "@(#)PCEXIT.c 1.1 10/29/80";
                      4: 
                      5: #include "h00vars.h"
                      6: 
                      7: PCEXIT(code)
                      8: 
                      9:        int     code;
                     10: {
                     11:        struct  {
                     12:                long    usr_time;
                     13:                long    sys_time;
                     14:                long    child_usr_time;
                     15:                long    child_sys_time;
                     16:                } tbuf;
                     17:        double l;
                     18: 
                     19:        PCLOSE(GLVL);
                     20:        PFLUSH();
                     21:        if (_stcnt > 0) {
                     22:                times(&tbuf);
                     23:                l = tbuf.usr_time;
                     24:                l = l / HZ;
                     25:                fprintf(stderr, "\n%1ld %s %04.2f seconds cpu time.\n",
                     26:                                _stcnt, "statements executed in", l);
                     27:        }
                     28:        exit(code);
                     29: }

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