diff options
Diffstat (limited to 'gcc/fortran/options.c')
| -rw-r--r-- | gcc/fortran/options.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 60473dd..1262ccc 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -43,6 +43,7 @@ along with GCC; see the file COPYING3. If not see #include "cpp.h" #include "diagnostic.h" /* For global_dc. */ #include "tm.h" +#include "langhooks.h" gfc_option_t gfc_option; @@ -398,6 +399,11 @@ gfc_post_options (const char **pfilename) gfc_cpp_post_options (); + if (gfc_option.allow_std & GFC_STD_F2008) + lang_hooks.name = "GNU Fortran2008"; + else if (gfc_option.allow_std & GFC_STD_F2003) + lang_hooks.name = "GNU Fortran2003"; + return gfc_cpp_preprocess_only (); } |