timod←()
/* created 2/2/87. intended to provide timestamps; not yet working. See
gettimeofday man entry */
{ struct timeval {
long tv←sec; /* seconds since Jan. 1, 1970 */
long tv←usec; /* and microseconds */
};
struct timezone {
int tz←minuteswest; /* of Greenwich */
int tz𡤍sttime; /* type of dst correction to apply */
};
};
long int t;
struct timeval tp;
struct timezone tzp;
gettimeofday(&tp, &tzp);
t=tp.timeval←sec;
return(t);
}