From 21684705d1d39bd73ca9afe04acb82264ff65b39 Mon Sep 17 00:00:00 2001
From: Sa Liu <saliu@gcc.gnu.org>
Date: Thu, 15 May 2008 12:53:12 +0000
Subject: [PATCH] Add new parameter to NAMED_INTCST.

From-SVN: r135342
---
 gcc/fortran/trans-types.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
2.30.2