Home/ Questions/Q 7928953
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-06-03T19:54:21+00:00

I am trying to write a program that will stop whenever an invalid operation

  • 0

I am trying to write a program that will stop whenever an invalid operation is performed, no matter how it is compiled with GFortran. With ifort I could do something like this:

use ieee_exceptions
....
logical      :: halt
....
call ieee_get_halting_mode(IEEE_USUAL,halt)
call ieee_set_halting_mode(IEEE_USUAL,.True.)
....
! Something that may stop the program
....
call ieee_set_halting_mode(IEEE_USUAL,halt)

Does GFortran have a module similar to ifort’s ieee_exceptions? Or even better is there a way of stopping the halting mode without knowing how the program will be compiled or which compiler will be used?

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    GFortran supports the ieee_exceptions module as of the GCC 5 release.

    If you’re stuck on an older GFortran release, a workaround would be to implement functions in C/asm that get/set the FP trapping status register and call those from Fortran.

    PS.: GFortran does have a switch (-fpe-trap) for globally enabling traps for FP exceptions, see http://gcc.gnu.org/onlinedocs/gfortran/Debugging-Options.html . But, since you explicitly said “no matter how it is compiled with gfortran”, I guess you don’t want to use that.

    • 0