mirror of
https://github.com/xcat2/xNBA.git
synced 2024-11-26 03:09:12 +00:00
Allow read-only symbols to be large
This commit is contained in:
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 $symbol, my $info ) = each %$symbols ) {
|
||||
if ( ( ! $info->{global} ) &&
|
||||
( $info->{type} ne 't' ) &&
|
||||
( ! ( $info->{type} =~ /^(t|r)$/ ) ) &&
|
||||
( $info->{size} >= WARNING_SIZE ) ) {
|
||||
$problems->{$object}->{large}->{$symbol} = 1;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user