GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2025-02-18 14:30:40 +01:00
Code Issues Projects Releases Wiki Activity

CGrammar: static local variables do not have internal linkage

Browse Source
This commit is contained in:
Pragmatic Software 2014-06-23 11:10:40 +00:00
parent 76faa3f2ca
commit 9bb70278b7
2 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PBot/VERSION.pm
View File

@ -13,7 +13,7 @@ use warnings;
# These are set automatically by the build/commit script # These are set automatically by the build/commit script
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 670, BUILD_REVISION => 671,
BUILD_DATE => "2014-06-23", BUILD_DATE => "2014-06-23",
}; };

9
modules/c2english/CGrammar.pm
View File

@ -24,7 +24,7 @@ startrule:
translation_unit: translation_unit:
comment comment
| external_declaration | external_declaration[context => 'external declaration']
| function_definition | function_definition
| preproc[matchrule => 'translation_unit'] | preproc[matchrule => 'translation_unit']
@ -144,7 +144,7 @@ external_declaration:
declaration declaration
function_definition: function_definition:
declaration_specifiers[context => 'function definition'](?) declarator[context => 'function definition'] compound_statement[context => 'function definition'](?) declaration_specifiers[context => 'function definition'](?) declarator[context => 'function definition'] compound_statement[context => 'function definition statement'](?)
{ {
my $declaration_specifiers = join('', @{$item{'declaration_specifiers(?)'}}); my $declaration_specifiers = join('', @{$item{'declaration_specifiers(?)'}});
my $name = $item{declarator}->[0]; my $name = $item{declarator}->[0];
@ -169,7 +169,7 @@ function_definition:
} }
compound_statement: compound_statement:
'{' declaration_list[context => 'compound statement'](?) statement_list[context => 'compound statement'](?) '}' '{' declaration_list(?) statement_list(?) '}'
{ {
my $declaration_list = join('',@{$item{'declaration_list(?)'}}); my $declaration_list = join('',@{$item{'declaration_list(?)'}});
my $statement_list = join('',@{$item{'statement_list(?)'}}); my $statement_list = join('',@{$item{'statement_list(?)'}});
@ -191,6 +191,7 @@ compound_statement:
if ($arg{context} if ($arg{context}
and $arg{context} ne 'do loop' and $arg{context} ne 'do loop'
and $arg{context} ne 'case' and $arg{context} ne 'case'
and $arg{context} ne 'function definition statement'
and $arg{context} ne 'function definition') { and $arg{context} ne 'function definition') {
$return .= "End $arg{context}.\n"; $return .= "End $arg{context}.\n";
} }
@ -1288,6 +1289,8 @@ storage_class_specifier:
{ {
if($arg{context} eq 'function definition') { if($arg{context} eq 'function definition') {
$return = "with internal linkage"; $return = "with internal linkage";
} elsif($arg{context} eq 'function definition statement') {
$return = "with life-time duration";
} else { } else {
$return = "with internal linkage and life-time duration"; $return = "with internal linkage and life-time duration";
} }