RPCS3/llvm-mirror
1
0
Fork 0
mirror of https://github.com/RPCS3/llvm-mirror.git synced 2025-02-01 05:01:59 +01:00
Code Issues Projects Releases Wiki Activity

Added special support for stripping CRLF characters that may appear in the

Browse Source 
output of nm.

llvm-svn: 45341
This commit is contained in:
Ted Kremenek 2007-12-24 08:04:39 +00:00
parent 3e409a37ac
commit 3ba98109c9
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
utils/GenLibDeps.pl
View File

@ -62,7 +62,8 @@ foreach my $lib (@libs ) {
while (<DEFS>) { while (<DEFS>) {
next if (! / [ABCDGRST] /); next if (! / [ABCDGRST] /);
s/^[^ ]* [ABCDGRST] //; s/^[^ ]* [ABCDGRST] //;
chomp($_); s/\015?\012//; # not sure if <DEFS> is in binmode and uses LF or CRLF.
# this strips both LF and CRLF.
$libdefs{$_} = $lib; $libdefs{$_} = $lib;
} }
close DEFS; close DEFS;
@ -74,7 +75,8 @@ foreach my $obj (@objs ) {
while (<DEFS>) { while (<DEFS>) {
next if (! / [ABCDGRST] /); next if (! / [ABCDGRST] /);
s/^[^ ]* [ABCDGRST] //; s/^[^ ]* [ABCDGRST] //;
chomp($_); s/\015?\012//; # not sure if <DEFS> is in binmode and uses LF or CRLF.
# this strips both LF and CRLF.
$objdefs{$_} = $obj; $objdefs{$_} = $obj;
} }
close DEFS; close DEFS;