set_ieee_exceptions(3I)

NAME
     SET_IEEE_EXCEPTIONS - Restores the caller's floating-point status
     prior to exiting a procedure

SYNOPSIS
     SET_IEEE_EXCEPTIONS ([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_EXCEPTIONS intrinsic subroutine restores the caller's
     floating-point 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 that support IEEE floating-point arithmetic, the
     bits in status that represent exception 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 state.

     The value of status is assumed to have been set by
     GET_IEEE_STATUS(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 CLEAR_IEEE_EXCEPTION(3I).

SEE ALSO
     CLEAR_IEEE_EXCEPTION(3I), GET_IEEE_STATUS(3I)

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