diff --git a/PBot/VERSION.pm b/PBot/VERSION.pm index bbc27ea3..afbfdd87 100644 --- a/PBot/VERSION.pm +++ b/PBot/VERSION.pm @@ -13,7 +13,7 @@ use warnings; # These are set automatically by the build/commit script use constant { BUILD_NAME => "PBot", - BUILD_REVISION => 650, + BUILD_REVISION => 651, BUILD_DATE => "2014-06-17", }; diff --git a/modules/c2english/CGrammar.pm b/modules/c2english/CGrammar.pm index f690a7ea..fa358838 100644 --- a/modules/c2english/CGrammar.pm +++ b/modules/c2english/CGrammar.pm @@ -1209,18 +1209,13 @@ identifier: pointer: '*' type_qualifier_list(s) pointer(?) { - $return = 'a pointer to a ' . join('', @{$item{'type_qualifier_list(s)'}}); + $return = join('', @{$item{'type_qualifier_list(s)'}}) . ' pointer to a '; $return .= ' ' . join('', @{$item{'pointer(?)'}}) if @{$item{'pointer(?)'}}; } - | ('*')(s) + | '*' pointer(?) { - my $size = $#{$item[1]} +1 ; - if ($size > 1) { - while($size-- > 1) { - $return .= 'pointer to '; - } - } - $return .= 'pointer to'; + $return .= 'pointer to a'; + $return .= ' ' . join('', @{$item{'pointer(?)'}}); } type_qualifier_list: