david/ipxe
david
/
ipxe
Archived
1
0
Fork 0

Allow read-only symbols to be large

This commit is contained in:
Michael Brown 2005-05-03 12:34:52 +00:00
parent 24c0498cbc
commit cc73bba7ba
1 changed files with 3 additions and 2 deletions

View File

@ -104,12 +104,13 @@ while ( ( my $symbol, my $info ) = each %$globals ) {
} }
} }
# Check for excessively large local symbols # Check for excessively large local symbols. Text and rodata symbols
# are exempt from this check
# #
while ( ( my $object, my $symbols ) = each %$symtab ) { while ( ( my $object, my $symbols ) = each %$symtab ) {
while ( ( my $symbol, my $info ) = each %$symbols ) { while ( ( my $symbol, my $info ) = each %$symbols ) {
if ( ( ! $info->{global} ) && if ( ( ! $info->{global} ) &&
( $info->{type} ne 't' ) && ( ! ( $info->{type} =~ /^(t|r)$/ ) ) &&
( $info->{size} >= WARNING_SIZE ) ) { ( $info->{size} >= WARNING_SIZE ) ) {
$problems->{$object}->{large}->{$symbol} = 1; $problems->{$object}->{large}->{$symbol} = 1;
} }