diff options
| author | Ralf Baechle <ralf@linux-mips.org> | 1998-08-25 09:12:35 +0000 |
|---|---|---|
| committer | Ralf Baechle <ralf@linux-mips.org> | 1998-08-25 09:12:35 +0000 |
| commit | c7fc24dc4420057f103afe8fc64524ebc25c5d37 (patch) | |
| tree | 3682407a599b8f9f03fc096298134cafba1c9b2f /arch/arm/lib/extractconstants.pl | |
| parent | 1d793fade8b063fde3cf275bf1a5c2d381292cd9 (diff) | |
o Merge with Linux 2.1.116.
o New Newport console code.
o New G364 console code.
Diffstat (limited to 'arch/arm/lib/extractconstants.pl')
| -rw-r--r-- | arch/arm/lib/extractconstants.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/arch/arm/lib/extractconstants.pl b/arch/arm/lib/extractconstants.pl index ff095a232..8c96b3f28 100644 --- a/arch/arm/lib/extractconstants.pl +++ b/arch/arm/lib/extractconstants.pl @@ -24,7 +24,7 @@ while (<DATA>) { /elf32/ && ( $elf = 1 ); /a.out/ && ( $aout = 1 ); next if ($aout && ! / 07 /); - next if ($elf && ! (/^00...... g/ && /.data/)); + next if ($elf && ! (/^0*0...... g/ && /.data/)); next if (!$aout && !$elf); if ($aout) { @@ -33,8 +33,8 @@ while (<DATA>) { } if ($elf) { chomp; - $addr = substr ($_, 0, 8); - $name = substr ($_, 32); + $addr = substr ($_, 0, index($_, " ")); + $name = substr ($_, rindex($_, " ") + 1); $nam[hex($addr)] = $name; } } |