HomeSort by: relevance | last modified time | path
    Searched refs:HALTING (Results 1 - 2 of 2) sorted by relevancy

  /src/external/gpl3/gcc.old/dist/libgfortran/ieee/
ieee_exceptions.F90 145 ! Querying and changing the halting mode
147 elemental subroutine IEEE_GET_HALTING_MODE (FLAG, HALTING)
150 logical, intent(out) :: HALTING
158 HALTING = (IAND(helper(), FLAG%hidden) /= 0)
161 elemental subroutine IEEE_SET_HALTING_MODE (FLAG, HALTING)
164 logical, intent(in) :: HALTING
173 if (HALTING) then
  /src/external/gpl3/gcc/dist/libgfortran/ieee/
ieee_exceptions.F90 63 integer :: halting component in type:IEEE_MODES_TYPE
87 ! (rounding modes, underflow mode, and halting mode)
114 MODES%halting = helper_halting()
138 call helper_halting(MODES%halting, NOT(MODES%halting))
208 ! Querying and changing the halting mode
210 elemental subroutine IEEE_GET_HALTING_MODE (FLAG, HALTING)
213 logical, intent(out) :: HALTING
221 HALTING = (IAND(helper(), FLAG%hidden) /= 0)
224 elemental subroutine IEEE_SET_HALTING_MODE (FLAG, HALTING)
    [all...]

Completed in 25 milliseconds