IMPLEMENTATION MODULE SysClock;
(* Binds the shim time routines directly. *)

PROCEDURE m2time() : LONGINT;
  EXTERNAL;

PROCEDURE m2clock() : LONGINT;
  EXTERNAL;

PROCEDURE Time() : LONGINT;
BEGIN
  RETURN m2time()
END Time;

PROCEDURE Clock() : LONGINT;
BEGIN
  RETURN m2clock()
END Clock;

END SysClock.