diff options
| -rw-r--r-- | src/util/ChangeLog | 4 | ||||
| -rwxr-xr-x | src/util/export-check.pl | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/src/util/ChangeLog b/src/util/ChangeLog index 429e911057..635f686ac3 100644 --- a/src/util/ChangeLog +++ b/src/util/ChangeLog @@ -1,3 +1,7 @@ +2006-01-26 Ken Raeburn <raeburn@mit.edu> + + * export-check.pl: Accept 'S' in nm output. + 2006-01-25 Ken Raeburn <raeburn@mit.edu> * export-check.pl: New file. diff --git a/src/util/export-check.pl b/src/util/export-check.pl index 9ea36488dd..f3706543e8 100755 --- a/src/util/export-check.pl +++ b/src/util/export-check.pl @@ -26,11 +26,11 @@ while (<NM>) { chop; s/^[0-9a-fA-F]+ +//; next if /^A /; - if (!/^[TDRBG] /) { + if (!/^[TDRBGS] /) { unlink $libfile; die "not sure what to do with '$_'"; } - s/^[TDRBG] +//; + s/^[TDRBGS] +//; push @found, $_; } @found = sort @found; |