cal_add_clock()

CAL_$ADD_CLOCK                    Domain/OS                     CAL_$ADD_CLOCK


NAME
     cal_$add_clock - add two clock values

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

     void cal_$add_clock(
          time_$clock_t *clock1,
          time_$clock_t &clock2)

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

     procedure cal_$add_clock(
          var clock1: time_$clock_t;
          in clock2: time_$clock_t);

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

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

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

           call cal_$add_clock(clock1, clock2)

DESCRIPTION
     Cal_$add_clock adds the clock value in clock2 to the clock value in
     clock1.

     clock1
          The clock value to add clock2 to.

     clock2
          The clock value to be added to clock1.
Museum
