Mercurial > hg > CbC > CbC_gcc
comparison gcc/fortran/gfortranspec.c @ 131:84e7813d76e9
gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 07:37:49 +0900 |
parents | 04ced10e8804 |
children | 1830386684a0 |
comparison
equal
deleted
inserted
replaced
111:04ced10e8804 | 131:84e7813d76e9 |
---|---|
1 /* Specific flags and argument handling of the Fortran front-end. | 1 /* Specific flags and argument handling of the Fortran front-end. |
2 Copyright (C) 1997-2017 Free Software Foundation, Inc. | 2 Copyright (C) 1997-2018 Free Software Foundation, Inc. |
3 | 3 |
4 This file is part of GCC. | 4 This file is part of GCC. |
5 | 5 |
6 GNU CC is free software; you can redistribute it and/or modify | 6 GNU CC is free software; you can redistribute it and/or modify |
7 it under the terms of the GNU General Public License as published by | 7 it under the terms of the GNU General Public License as published by |
45 `gcc' itself. */ | 45 `gcc' itself. */ |
46 | 46 |
47 #include "config.h" | 47 #include "config.h" |
48 #include "system.h" | 48 #include "system.h" |
49 #include "coretypes.h" | 49 #include "coretypes.h" |
50 #include "opt-suggestions.h" | |
50 #include "gcc.h" | 51 #include "gcc.h" |
51 #include "opts.h" | 52 #include "opts.h" |
52 | 53 |
53 #include "tm.h" | 54 #include "tm.h" |
54 #include "intl.h" | 55 #include "intl.h" |
240 continue; | 241 continue; |
241 | 242 |
242 case OPT_nostdlib: | 243 case OPT_nostdlib: |
243 case OPT_nodefaultlibs: | 244 case OPT_nodefaultlibs: |
244 case OPT_c: | 245 case OPT_c: |
246 case OPT_r: | |
245 case OPT_S: | 247 case OPT_S: |
246 case OPT_fsyntax_only: | 248 case OPT_fsyntax_only: |
247 case OPT_E: | 249 case OPT_E: |
248 /* These options disable linking entirely or linking of the | 250 /* These options disable linking entirely or linking of the |
249 standard libraries. */ | 251 standard libraries. */ |
274 verbose = 1; | 276 verbose = 1; |
275 break; | 277 break; |
276 | 278 |
277 case OPT__version: | 279 case OPT__version: |
278 printf ("GNU Fortran %s%s\n", pkgversion_string, version_string); | 280 printf ("GNU Fortran %s%s\n", pkgversion_string, version_string); |
279 printf ("Copyright %s 2017 Free Software Foundation, Inc.\n", | 281 printf ("Copyright %s 2018 Free Software Foundation, Inc.\n", |
280 _("(C)")); | 282 _("(C)")); |
281 fputs (_("This is free software; see the source for copying conditions. There is NO\n\ | 283 fputs (_("This is free software; see the source for copying conditions. There is NO\n\ |
282 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n"), | 284 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n"), |
283 stdout); | 285 stdout); |
284 exit (0); | 286 exit (0); |