Add new parameter to NAMED_INTCST.
authorSa Liu <saliu@gcc.gnu.org>
Thu, 15 May 2008 12:53:12 +0000 (12:53 +0000)
committerSa Liu <saliu@gcc.gnu.org>
Thu, 15 May 2008 12:53:12 +0000 (12:53 +0000)
From-SVN: r135342

gcc/fortran/trans-types.c

index 6e98db7dbface5d913afb0def3f619014eef05aa..7a735e021d9fc7cb5b3a9c9476f68f266e55f7f0 100644 (file)
@@ -219,7 +219,7 @@ void init_c_interop_kinds (void)
       c_interop_kinds_table[i].f90_type = BT_UNKNOWN;
     }
 
-#define NAMED_INTCST(a,b,c) \
+#define NAMED_INTCST(a,b,c,d) \
   strncpy (c_interop_kinds_table[a].name, b, strlen(b) + 1); \
   c_interop_kinds_table[a].f90_type = BT_INTEGER; \
   c_interop_kinds_table[a].value = c;