Ver código fonte

Allow read-only symbols to be large

tags/v0.9.3
Michael Brown 19 anos atrás
pai
commit
cc73bba7ba
1 arquivos alterados com 3 adições e 2 exclusões
  1. 3
    2
      src/util/symcheck.pl

+ 3
- 2
src/util/symcheck.pl Ver arquivo

@@ -104,12 +104,13 @@ while ( ( my $symbol, my $info ) = each %$globals ) {
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 110
 while ( ( my $object, my $symbols ) = each %$symtab ) {
110 111
   while ( ( my $symbol, my $info ) = each %$symbols ) {
111 112
     if ( ( ! $info->{global} ) &&
112
-	 ( $info->{type} ne 't' ) &&
113
+	 ( ! ( $info->{type} =~ /^(t|r)$/ ) ) &&
113 114
 	 ( $info->{size} >= WARNING_SIZE ) ) {
114 115
       $problems->{$object}->{large}->{$symbol} = 1;
115 116
     }

Carregando…
Cancelar
Salvar