Fix a bug in previous commit, some .globls were getting thrown away.
#
if ( $TargetPlatform =~ /^i386/ && $to_move =~ /$TCOPYDIRVS/ ) {
$j = $i + 1;
#
if ( $TargetPlatform =~ /^i386/ && $to_move =~ /$TCOPYDIRVS/ ) {
$j = $i + 1;
- while ( $j < ($numchks - 1) && $chk[$j] =~ /$T_CONST_LBL/) {
+ while ( $j < $numchks && $chk[$j] =~ /$T_CONST_LBL/) {
- if ( $j < ($numchks - 1)) {
$chk[$j] = $to_move . $chk[$j];
}
}
$chk[$j] = $to_move . $chk[$j];
}
}