|
|
1.1 root 1: /*-
2: * Copyright (c) 1979 The Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted provided
6: * that: (1) source distributions retain this entire copyright notice and
7: * comment, and (2) distributions including binaries display the following
8: * acknowledgement: ``This product includes software developed by the
9: * University of California, Berkeley and its contributors'' in the
10: * documentation or other materials provided with the distribution and in
11: * all advertising materials mentioning features or use of this software.
12: * Neither the name of the University nor the names of its contributors may
13: * be used to endorse or promote products derived from this software without
14: * specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
16: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
17: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)PCEXIT.c 1.3 (Berkeley) 6/29/90";
22: #endif /* not lint */
23:
24: #include "h00vars.h"
25: #include <sys/time.h>
26: #include <sys/resource.h>
27:
28: PCEXIT(code)
29:
30: int code;
31: {
32: double l;
33: struct rusage ru;
34:
35: PCLOSE(GLVL);
36: PFLUSH();
37: if (_stcnt > 0) {
38: if (getrusage(RUSAGE_SELF, &ru) < 0)
39: exit(code);
40: l = ru.ru_utime.tv_usec;
41: l /= 1000000;
42: l += ru.ru_utime.tv_sec;
43: fprintf(stderr, "\n%1ld %s %04.2f seconds cpu time.\n",
44: _stcnt, "statements executed in", l);
45: }
46: exit(code);
47: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.