Commit 3a114e61 authored by StudioEtrange's avatar StudioEtrange Committed by Rich Salz
Browse files

GitHub284: Fix typo in xx-32.pl scripts. 



Reviewed-by: default avatarRichard Levitte <levitte@openssl.org>
parent 579734ce

util/pl/BC-32.pl

+1 −1
Original line number Diff line number Diff line
@@ -130,7 +130,7 @@ sub do_link_rule 
	local($ret,$_);

	

	$file =~ s/\//$o/g if $o ne '/';

	$n=&bname($targer);

	$n=&bname($target);

	$ret.="$target: $files $dep_libs\n";

	$ret.="\t\$(LINK) \$(LFLAGS) $files \$(APP_EX_OBJ), $target,, $libs\n\n";

	return($ret);

util/pl/VC-32.pl

+2 −2
Original line number Diff line number Diff line
@@ -365,7 +365,7 @@ sub do_link_rule 
	my($target,$files,$dep_libs,$libs,$standalone)=@_;

	local($ret,$_);

	$file =~ s/\//$o/g if $o ne '/';

	$n=&bname($targer);

	$n=&bname($target);

	$ret.="$target: $files $dep_libs\n";

	if ($standalone == 1)

		{
@@ -401,7 +401,7 @@ sub do_rlink_rule 
	my $files = "$rl_start $rl_mid $rl_end";



	$file =~ s/\//$o/g if $o ne '/';

	$n=&bname($targer);

	$n=&bname($target);

	$ret.="$target: $files $dep_libs \$(FIPS_SHA1_EXE)\n";

	$ret.="\t\$(PERL) ms\\segrenam.pl \$\$a $rl_start\n";

	$ret.="\t\$(PERL) ms\\segrenam.pl \$\$b $rl_mid\n";