error_code() — Apollo

ERROR_$CODE                       Domain/OS                        ERROR_$CODE


NAME
     error_$code - return the error code from a completion status

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

     short error_$code(status_$t &status)

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

     function error_$code(in status: status_$t): integer;

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

           integer*2 code
           integer*4 status

           code = error_$code(status)

DESCRIPTION
     Error_$code returns the error code (code) from the completion status
     passed in status.

     Error_$code is provided as an aid to interpreting completion statuses in
     FORTRAN, though it may be called from C or Pascal as well.  In C and Pas-
     cal with status declared as type status_$t, error_$code(status) just
     returns status.code.

     status
          The completion status from a Domain/OS call.

SEE ALSO
     status_$intro.
Museum
