
  PROCEDURE [INLINE] jmp$convert_date_time_dif_to_us
    (    base_date_time: ost$date_time;
         date_time: ost$date_time;
         current_clock_time: jmt$clock_time;
     VAR free_running_clock_value: jmt$clock_time);

?? PUSH (LISTEXT := ON) ??
    VAR
      base_date_time_clock_time: jmt$clock_time,
      date_time_clock: jmt$clock_time;

    jmp$convert_date_time_to_clock (base_date_time, base_date_time_clock_time);
    jmp$convert_date_time_to_clock (date_time, date_time_clock);

    free_running_clock_value := date_time_clock - base_date_time_clock_time +
          current_clock_time;
  PROCEND jmp$convert_date_time_dif_to_us;

*copy jmh$convert_date_time_dif_to_us

*copyc jmt$clock_time
*copyc ost$date_time
*copyc jmp$convert_date_time_to_clock
?? POP ??
