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     ! 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.