GETTIMEOFDAY

Portability Subroutine: Returns seconds and microseconds since 00:00 Jan 1, 1970.

Module

USE IFPORT

CALL GETTIMEOFDAY (ret, err)

ret

(Output) INTEGER(4). One-dimensional array with 2 elements used to contain numeric time data. The elements of ret are returned as follows:

Element	Value
ret(1)	Seconds
ret(2)	Microseconds

err

(Output) INTEGER(4).

If an error occurs, err contains a value equal to -1 and array ret contains zeros.

On Windows* systems, this subroutine has millisecond precision, and the last three digits of the returned value are not significant.