Return to times.c CVS log

Up to [Micropolis - Activity] / micropolis / src / tclx / ossupp

Annotation of micropolis/src/tclx/ossupp/times.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * times.c
                      3:  *
                      4:  * Public-domain relatively quick-and-dirty implemenation of
                      5:  * ANSI library routine for System V Unix systems.
                      6:  *
                      7:  * It's written in old-style C for maximal portability.
                      8:  *
                      9:  * Arnold Robbins
                     10:  * January, February, 1991
                     11:  *
                     12:  * Fixes from [email protected]
                     13:  * February 1991
                     14:  *-----------------------------------------------------------------------------
                     15:  * $Id: times.c,v 2.0 1992/10/16 04:52:16 markd Rel $
                     16:  *-----------------------------------------------------------------------------
                     17:  */
                     18: 
                     19: /*
                     20:  * To avoid Unix version problems, this code has been simplified to avoid
                     21:  * const and size_t, however this can cause an incompatible definition on
                     22:  * ansi-C systems, so a game is played with defines to ignore a strftime
                     23:  * declaration in time.h
                     24:  */
                     25: 
                     26: #include <sys/types.h>
                     27: #include <time.h>
                     28: #include <sys/times.h>
                     29: 
                     30: 
                     31: /* times --- produce process times */
                     32: 
                     33: clock_t 
                     34: times(buffer)
                     35:     struct tms      *buffer;
                     36: {
                     37:     clock_t clk_time;
                     38: 
                     39:     clk_time = clock();
                     40:     buffer->tms_utime  = clk_time;
                     41:     buffer->tms_utime2 = clk_time;
                     42:     buffer->tms_stime  = clk_time;
                     43:     buffer->tms_stime2 = clk_time;
                     44: 
                     45:     return clk_time;
                     46: }

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