URL
https://opencores.org/ocsvn/scarts/scarts/trunk
Subversion Repositories scarts
[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [libgfortran/] [runtime/] [fpu.c] - Rev 14
Compare with Previous | Blame | View Log
#include "libgfortran.h" /* We include the platform-dependent code. */ #include "fpu-target.h" /* Function called by the front-end to tell us when a FPE should be raised. */ extern void set_fpe (int); export_proto(set_fpe); void set_fpe (int exceptions) { options.fpe = exceptions; set_fpu (); }