cal_cmp_clock()

CAL_$CMP_CLOCK                    Domain/OS                     CAL_$CMP_CLOCK


NAME
     cal_$cmp_clock - compare two clock values

SYNOPSIS (C)
     #include <apollo/base.h>
     #include <apollo/cal.h>

     short cal_$cmp_clock(
          time_$clock_t &clock1,
          time_$clock_t &clock2)

SYNOPSIS (Pascal)
     %include '/sys/ins/base.ins.pas';
     %include '/sys/ins/cal.ins.pas';

     function cal_$cmp_clock(
          in clock1: time_$clock_t;
          in clock2: time_$clock_t):integer;

SYNOPSIS (FORTRAN)
     %include '/sys/ins/base.ins.ftn'
     %include '/sys/ins/cal.ins.ftn'

           integer*2 cmp, clock1(3), clock1h, clock2(3), clock2h
           integer*4 clock1l, clock2l

           equivalence (clock1l, clock1(2)), (clock1h, clock1(1))
           equivalence (clock2l, clock2(2)), (clock2h, clock2(1))

           cmp = cal_$cmp_clock(clock1, clock2)

DESCRIPTION
     Cal_$cmp_clock compares the two clock values passed to it, and returns an
     integer value indicating their relative values.  Cal_$cmp_clock returns 0
     if clock1 and clock2 are simultaneous.  It returns 1 if clock1 is later
     than clock2.  It returns -1 if clock1 is earlier than clock2.

     clock1
          A clock value.

     clock2
          Another clock value.
Museum
