P8000/WEGA/contrib/lcc/lib/libc/port/gen/clock.c

18 lines
333 B
C

#include <sys/types.h>
#include <sys/times.h>
#define HZ 50
#define TIMES(B) (B.tms_utime+B.tms_stime+B.tms_cutime+B.tms_cstime)
extern long times();
static long first = 0L;
long
clock()
{
struct tms buffer;
if (times(&buffer) != -1L && first == 0L)
first = TIMES(buffer);
return ((TIMES(buffer) - first) * (1000000L/HZ));
}