ack/lang/cem/libcc/mon/time.c
1990-01-22 11:48:01 +00:00

12 lines
188 B
C

/* $Header$ */
#include <sys/types.h>
#include <sys/timeb.h>
time_t
time(timpt) time_t *timpt ; {
struct timeb buf ;
ftime(&buf) ;
if ( timpt ) *timpt= buf.time ;
return buf.time ;
}