Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 11/07/2023
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

IEEE_GET_STATUS

Intrinsic Module Subroutine (Generic): Stores the current state of the floating-point environment. This is an impure subroutine.

Module

USE, INTRINSIC :: IEEE_EXCEPTIONS

CALL IEEE_GET_STATUS (status_value)

status_value

(Input) Must be scalar and of type TYPE (IEEE_STATUS_TYPE).

It stores the floating-point status. The result can only be used if IEEE_SET_STATUS is invoked.

Example

Consider the following:

USE, INTRINSIC :: IEEE_EXCEPTIONS    ! Can also use IEEE_ARITHMETIC
TYPE(IEEE_ STATUS_TYPE) STATUS
...
CALL IEEE_GET_STATUS(STATUS)   ! Stores the floating-point status
CALL IEEE_SET_FLAG(IEEE_ALL,.FALSE.) ! Sets all flags to be quiet
...
CALL IEEE_SET_STATUS(STATUS)   ! Restores the floating-point status