浏览代码

Allow read-only symbols to be large

tags/v0.9.3
Michael Brown 19 年前
父节点
当前提交
cc73bba7ba
共有 1 个文件被更改,包括 3 次插入2 次删除
  1. 3
    2
      src/util/symcheck.pl

+ 3
- 2
src/util/symcheck.pl 查看文件

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

正在加载...
取消
保存