mirror of
https://github.com/pragma-/pbot.git
synced 2024-11-23 04:19:27 +01:00
CGrammar: Fix const pointers
This commit is contained in:
parent
dfb7ca0abd
commit
861f095829
@ -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",
|
||||
};
|
||||
|
||||
|
@ -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:
|
||||
|
Loading…
Reference in New Issue
Block a user