Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

TIME_$GET_EC                      Domain/OS                       TIME_$GET_EC


NAME
     time_$get_ec - get a pointer to the time eventcount

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

     void time_$get_ec(
          time_$key_t &time_key,
          ec2_$ptr_t *eventcount_pointer,
          status_$t *status)

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

     procedure time_$get_ec(
          in time_key: time_$key_t;
          out eventcount_pointer: ec2_$ptr_t;
          out status: status_$t);

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

           integer*4 status, ec_value
           integer*2 time_key, event(3)

           equivalence (ec_value, event(1))

           integer*4 eventcount_pointer
           pointer /eventcount_pointer/ event

           call time_$get_ec(time_key, eventcount_pointer, status)

DESCRIPTION
     Time_$get_ec supplies a pointer to an eventcount that is advanced about
     every 1/4 second.  The incrementing interval is nominally 262,144
     microseconds, but the exact interval varies with the system load.

     time_key
          A key specifying which time eventcount the system should return.
          The only defined value currently is time_$clockh_key, because there
          is only one time eventcount.

     eventcount_pointer
          A pointer to the eventcount specified by time_key.

     status
          The completion status.

SEE ALSO
     ec2_$intro.

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026