diff options
| author | saliu <saliu@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-15 12:49:16 +0000 |
|---|---|---|
| committer | saliu <saliu@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-15 12:49:16 +0000 |
| commit | 04a99f4acdfa76f82df9676bb61e9ccf4d41d4ea (patch) | |
| tree | 55b78473820818b9142bad73eeb2b0294337db9f | |
| parent | d4fa49c61ff87ff26bc2a300a2ebae6a0017f6be (diff) | |
| download | ppe42-gcc-04a99f4acdfa76f82df9676bb61e9ccf4d41d4ea.tar.gz ppe42-gcc-04a99f4acdfa76f82df9676bb61e9ccf4d41d4ea.zip | |
Add new parameter to NAMED_INTCST and new field standard to struct intmod_sym.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135340 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/fortran/module.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index ef2faf7c882..f3c5316d05c 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -91,6 +91,7 @@ typedef struct int id; const char *name; int value; + int standard; } intmod_sym; @@ -4771,13 +4772,13 @@ use_iso_fortran_env_module (void) int i; intmod_sym symbol[] = { -#define NAMED_INTCST(a,b,c) { a, b, 0 }, +#define NAMED_INTCST(a,b,c,d) { a, b, 0, d }, #include "iso-fortran-env.def" #undef NAMED_INTCST - { ISOFORTRANENV_INVALID, NULL, -1234 } }; + { ISOFORTRANENV_INVALID, NULL, -1234, 0 } }; i = 0; -#define NAMED_INTCST(a,b,c) symbol[i++].value = c; +#define NAMED_INTCST(a,b,c,d) symbol[i++].value = c; #include "iso-fortran-env.def" #undef NAMED_INTCST |

