diff options
Diffstat (limited to 'gcc/fortran/options.c')
| -rw-r--r-- | gcc/fortran/options.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 7a800ce..d48bf24 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -718,6 +718,8 @@ gfc_handle_option (size_t scode, const char *arg, int value) gfc_option.flag_init_real = GFC_INIT_REAL_ZERO; else if (!strcasecmp (arg, "nan")) gfc_option.flag_init_real = GFC_INIT_REAL_NAN; + else if (!strcasecmp (arg, "snan")) + gfc_option.flag_init_real = GFC_INIT_REAL_SNAN; else if (!strcasecmp (arg, "inf")) gfc_option.flag_init_real = GFC_INIT_REAL_INF; else if (!strcasecmp (arg, "-inf")) |