Add new parameter to NAMED_INTCST and new field standard to struct intmod_sym.
authorSa Liu <saliu@gcc.gnu.org>
Thu, 15 May 2008 12:49:16 +0000 (12:49 +0000)
committerSa Liu <saliu@gcc.gnu.org>
Thu, 15 May 2008 12:49:16 +0000 (12:49 +0000)
From-SVN: r135340

gcc/fortran/module.c

index ef2faf7c88237c34b5b1c125525a9a386e7c6027..f3c5316d05c871aa28da088ca2d7cb49fa0f99c1 100644 (file)
@@ -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