--- grammar.pm_orig	Wed Apr 15 19:47:11 2009
+++ grammar.pm	Wed Apr 15 19:47:04 2009
@@ -348,7 +348,9 @@
 type1: TYPE star(s?)
         {
          $return = $item[1];
-         $return .= join '',' ',@{$item{$Inline::CPP::grammar::star}} if @{$item{$Inline::CPP::grammar::star}};
+         if(defined($item{$Inline::CPP::grammar::star})) {
+           $return .= join '',' ',@{$item{$Inline::CPP::grammar::star}} if @{$item{$Inline::CPP::grammar::star}};
+         }
 #	 print "type1: $return\n";
 #          return undef
 #            unless(defined$thisparser->{data}{typeconv}{valid_types}{$return});