objxref.pl: improve portability.
(cherry picked from commit 71fa3bc5ece9121d1aa9bb513b5641e9ea605e14)
This commit is contained in:
parent
45d010255f
commit
b6c2029931
@ -39,7 +39,8 @@ my @xrkeys = keys %xref_tbl;
|
|||||||
|
|
||||||
my @srt1 = sort { $oid_tbl{$a} <=> $oid_tbl{$b}} @xrkeys;
|
my @srt1 = sort { $oid_tbl{$a} <=> $oid_tbl{$b}} @xrkeys;
|
||||||
|
|
||||||
for(my $i = 0; $i <= $#srt1; $i++)
|
my $i;
|
||||||
|
for($i = 0; $i <= $#srt1; $i++)
|
||||||
{
|
{
|
||||||
$xref_tbl{$srt1[$i]}[2] = $i;
|
$xref_tbl{$srt1[$i]}[2] = $i;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user