|  | @@ -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 |      }
 |