mirror of https://github.com/ipxe/ipxe.git
Allow read-only symbols to be large
parent
24c0498cbc
commit
cc73bba7ba
|
@ -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;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue