Allow read-only symbols to be large

1 files changed, 3 insertions, 2 deletions

diff --git a/src/util/symcheck.pl b/src/util/symcheck.pl
index df37a253..63736589 100755
--- a/src/util/symcheck.pl
+++ b/src/util/symcheck.pl
@@ -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;
     }