Browse Source

Allow read-only symbols to be large

tags/v0.9.3
Michael Brown 19 years ago
parent
commit
cc73bba7ba
1 changed files with 3 additions and 2 deletions
  1. 3
    2
      src/util/symcheck.pl

+ 3
- 2
src/util/symcheck.pl View File

104
   }
104
   }
105
 }
105
 }
106
 
106
 
107
-# Check for excessively large local symbols
107
+# Check for excessively large local symbols.  Text and rodata symbols
108
+# are exempt from this check
108
 #
109
 #
109
 while ( ( my $object, my $symbols ) = each %$symtab ) {
110
 while ( ( my $object, my $symbols ) = each %$symtab ) {
110
   while ( ( my $symbol, my $info ) = each %$symbols ) {
111
   while ( ( my $symbol, my $info ) = each %$symbols ) {
111
     if ( ( ! $info->{global} ) &&
112
     if ( ( ! $info->{global} ) &&
112
-	 ( $info->{type} ne 't' ) &&
113
+	 ( ! ( $info->{type} =~ /^(t|r)$/ ) ) &&
113
 	 ( $info->{size} >= WARNING_SIZE ) ) {
114
 	 ( $info->{size} >= WARNING_SIZE ) ) {
114
       $problems->{$object}->{large}->{$symbol} = 1;
115
       $problems->{$object}->{large}->{$symbol} = 1;
115
     }
116
     }

Loading…
Cancel
Save