From 0856bf519ffc7707fc01b763aed47e357a513820 Mon Sep 17 00:00:00 2001 From: Fs Date: Sat, 6 Jan 2024 08:43:22 +0800 Subject: [PATCH] uplink-x86_64.pl: make x86_64-xlate.pl accept $flavour parameter Match behavior of all other x86_64 asm. CLA: trivial Reviewed-by: Tom Cosgrove Reviewed-by: Tomas Mraz (Merged from https://github.com/openssl/openssl/pull/23219) --- ms/uplink-x86_64.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ms/uplink-x86_64.pl b/ms/uplink-x86_64.pl index 5564c2c7bab..8b28949ccf8 100755 --- a/ms/uplink-x86_64.pl +++ b/ms/uplink-x86_64.pl @@ -8,9 +8,10 @@ # $output is the last argument if it looks like a file (it has an extension) $output = $#ARGV >= 0 && $ARGV[$#ARGV] =~ m|\.\w+$| ? pop : undef; +$flavour = $#ARGV >= 0 && $ARGV[0] !~ m|\.| ? shift : undef; $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; -open OUT,"| \"$^X\" \"${dir}../crypto/perlasm/x86_64-xlate.pl\" \"$output\"" +open OUT,"| \"$^X\" \"${dir}../crypto/perlasm/x86_64-xlate.pl\" $flavour \"$output\"" or die "can't call ${dir}../crypto/perlasm/x86_64-xlate.pl: $!"; *STDOUT=*OUT; push(@INC,"${dir}."); -- 2.47.2