diff options
Diffstat (limited to 'libgfortran/runtime/main.c')
| -rw-r--r-- | libgfortran/runtime/main.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/libgfortran/runtime/main.c b/libgfortran/runtime/main.c index 3c66a30..cb8e518 100644 --- a/libgfortran/runtime/main.c +++ b/libgfortran/runtime/main.c @@ -263,7 +263,11 @@ init (void) init_variables (); init_units (); - set_fpu (); + + /* If (and only if) the user asked for it, set up the FPU state. */ + if (options.fpe != 0) + set_fpu (); + init_compile_options (); #ifdef DEBUG |