Adapt mk1mf.pl and companions to changed perlasm script semantics

Reviewed-by: Matt Caswell <matt@openssl.org>

diff --git a/util/mk1mf.pl b/util/mk1mf.pl
index a68cb735bb453b6ec5530e6bda8366202820415e..b5cb507d5d810a718ddc92dedac5b0723adae3a3 100755 (executable)
--- a/util/mk1mf.pl
+++ b/util/mk1mf.pl
@@ -1230,7 +1230,7 @@ sub perlasm_compile_target
        my($ret);
        $bname =~ s/(.*)\.[^\.]$/$1/;
        $ret ="\$(TMP_D)$o$bname$asm_suffix: $source\n";
-       $ret.="\t\$(PERL) $source $asmtype \$(CFLAG) >\$\@\n";
+       $ret.="\t\$(PERL) $source $asmtype \$(CFLAG) \$\@\n";
        if ($fipscanisteronly)
                {
                $ret .= "\t\$(PERL) util$o.pl . \$@ norunasm \$(CFLAG)\n";
@@ -1295,7 +1295,7 @@ sub do_asm_rule
                        my $plasm = $objfile;
                        $plasm =~ s/${obj}/.pl/;
                        $ret.="$srcfile: $plasm\n";
-                       $ret.="\t\$(PERL) $plasm $asmtype \$(CFLAG) >$srcfile\n\n";
+                       $ret.="\t\$(PERL) $plasm $asmtype \$(CFLAG) $srcfile\n\n";
                        }
 
                $ret.="$objfile: $srcfile\n";

diff --git a/util/pl/unix.pl b/util/pl/unix.pl
index 09f74865a7e11ea49510f2ab4357e65f9eac2bd6..6add39a565c428e71de8fe9ddbd4e1c077a7c7ba 100644 (file)
--- a/util/pl/unix.pl
+++ b/util/pl/unix.pl
@@ -96,7 +96,7 @@ sub platform_perlasm_compile_target
                        {
                        return << "EOF";
 \$(TMP_D)/$p.s: $perl1{$p}/asm/$p.pl
-       \$(PERL) $perl1{$p}/asm/$p.pl \$(PERLASM_SCHEME) > \$@
+       \$(PERL) $perl1{$p}/asm/$p.pl \$(PERLASM_SCHEME) \$@
 EOF
                        }
                }
@@ -104,7 +104,7 @@ EOF
                {
                return << 'EOF';
 $(TMP_D)/x86_64cpuid.s: crypto/x86_64cpuid.pl
-       $(PERL) crypto/x86_64cpuid.pl $(PERLASM_SCHEME) > $@
+       $(PERL) crypto/x86_64cpuid.pl $(PERLASM_SCHEME) $@
 EOF
                }
        elsif ($target eq '$(OBJ_D)/sha256-x86_64.o')