aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSa Liu <saliu@gcc.gnu.org>2008-05-15 12:49:16 +0000
committerSa Liu <saliu@gcc.gnu.org>2008-05-15 12:49:16 +0000
commitec9231857bb739c9facebaeb52f9cacb4116a6d1 (patch)
tree55b78473820818b9142bad73eeb2b0294337db9f
parent521914528dd5d39f613f92648bac94b12a56737a (diff)
downloadgcc-ec9231857bb739c9facebaeb52f9cacb4116a6d1.zip
gcc-ec9231857bb739c9facebaeb52f9cacb4116a6d1.tar.gz
gcc-ec9231857bb739c9facebaeb52f9cacb4116a6d1.tar.bz2
Add new parameter to NAMED_INTCST and new field standard to struct intmod_sym.
From-SVN: r135340
-rw-r--r--gcc/fortran/module.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c
index ef2faf7..f3c5316 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