m3middle/src/WIN32/CoffTime.i3


Copyright (C) 1994, Digital Equipment Corp.
 An OS-independent way to get COFF timestamps 

INTERFACE CoffTime;

CONST EpochAdjust = 11644473600.0d0; (* seconds from 1/1/1600 -> 1/1/1970 *)

PROCEDURE Now (): INTEGER;

PROCEDURE OfFile (file: TEXT): INTEGER;

END CoffTime.

CoffTime's implementation is in:


procedure CoffTime.Now is in:


procedure CoffTime.OfFile is in: