From: Sa Liu Date: Thu, 15 May 2008 12:53:12 +0000 (+0000) Subject: Add new parameter to NAMED_INTCST. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=21684705d1d39bd73ca9afe04acb82264ff65b39;p=gcc.git Add new parameter to NAMED_INTCST. From-SVN: r135342 --- diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c index 6e98db7dbfa..7a735e021d9 100644 --- a/gcc/fortran/trans-types.c +++ b/gcc/fortran/trans-types.c @@ -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;