diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 0db5116822c..9870f482e13 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-17  Richard Henderson  <rth@redhat.com>
+
+	* gengtype.c (walk_type): Allow paramN_is.
+
 2003-01-17  Nick Clifton  <nickc@redhat.com>
 
 	* config/i960/t-960bare (i960-c.o): Add missing newline escape.
diff --git a/gcc/gengtype.c b/gcc/gengtype.c
index b279263b548..2165755ed15 100644
--- a/gcc/gengtype.c
+++ b/gcc/gengtype.c
@@ -1,5 +1,5 @@
 /* Process source files and output type information.
-   Copyright (C) 2002 Free Software Foundation, Inc.
+   Copyright (C) 2002, 2003 Free Software Foundation, Inc.
 
 This file is part of GCC.
 
@@ -1560,6 +1560,10 @@ walk_type (t, d)
       ;
     else if (strcmp (oo->name, "param_is") == 0)
       ;
+    else if (strncmp (oo->name, "param", 5) == 0
+	     && ISDIGIT (oo->name[5])
+	     && strcmp (oo->name + 6, "_is") == 0)
+      ;
     else if (strcmp (oo->name, "chain_next") == 0)
       ;
     else if (strcmp (oo->name, "chain_prev") == 0)