SET_IEEE_INTERRUPTS(3I) Last changed: 1-6-98
NAME
SET_IEEE_INTERRUPTS - Restores floating-point interrupt status before
exiting a procedure
SYNOPSIS
SET_IEEE_INTERRUPTS ([STATUS=]status)
IMPLEMENTATION
UNICOS/mk and IRIX systems
CRAY T90 systems that support IEEE floating-point arithmetic
STANDARDS
CF90 and MIPSpro 7 Fortran 90 compiler extension to Fortran 90
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 one of the following statements in
your program:
* On UNICOS and UNICOS/mk systems: USE CRI_IEEE_DEFINITIONS
* On UNICOS, UNICOS/mk, and IRIX systems: USE FTN_IEEE_DEFINITIONS
The CRI_IEEE_DEFINITIONS module is obsolescent. It will be removed
for the CF90 4.0 release.
EXAMPLES
See the example on DISABLE_IEEE_INTERRUPT(3I).
SEE ALSODISABLE_IEEE_INTERRUPT(3I), GET_IEEE_INTERRUPTS(3I)
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.