set_ieee_interrupts(3I)

NAME
     SET_IEEE_INTERRUPTS - Restores floating-point interrupt status before
     exiting a procedure

SYNOPSIS
     SET_IEEE_INTERRUPTS ([STATUS=]status)

IMPLEMENTATION
     UNICOS/mk, IRIX systems, CRAY T90 systems that support IEEE
     floating-point arithmetic

     CF90, MIPSpro 7 Fortran 90

STANDARDS
     Fortran extension

     IEEE Standard for Binary Floating-point Arithmetic

DESCRIPTION
     The SET_IEEE_INTERRUPTS intrinsic subroutine is typically used to
     restore the caller's floating-point interrupt status just before
     exiting a procedure.  It accepts the following argument:

     status         Must be scalar and of an integer type that occupies a
                    full word.  It is an INTENT(IN) argument.

     On CRAY T90 systems, the bits in status that represent interrupt flags
     are stored into the appropriate bits of SR0.  On other architectures,
     the flags are stored into the appropriate flag bits of memory
     word(s)/register(s) that record the floating-point interrupt state.

     The contents of status are assumed to have been set by an invocation
     of GET_IEEE_INTERRUPTS(3I).

     The name of this intrinsic cannot be passed as an argument.

NOTES
     The IEEE intrinsic procedures use the named constants contained in a
     system module, so you must include the following statement in your
     program:

          USE FTN_IEEE_DEFINITIONS

EXAMPLES
     See the example on DISABLE_IEEE_INTERRUPT(3I).

SEE ALSO
     DISABLE_IEEE_INTERRUPT(3I), GET_IEEE_INTERRUPTS(3I)

     Intrinsic Procedures Reference Manual for the printed version of this
     man page.