diff options
author | Andy Polyakov <appro@openssl.org> | 2012-06-27 12:58:03 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2012-06-27 12:58:03 +0000 |
commit | e1e882a3680cb3db3ca20a32b486fcd91dd69f71 (patch) | |
tree | 1a3bcc94302fdc1b01e0e8a7d94492e233210e07 /crypto/whrlpool | |
parent | 36b071979369e4dd2d4c9d36df2336815353106c (diff) |
x86_64 assembly pack: make it possible to compile with Perl located
on path with spaces [from HEAD].
PR: 2835
Diffstat (limited to 'crypto/whrlpool')
-rw-r--r-- | crypto/whrlpool/asm/wp-x86_64.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/crypto/whrlpool/asm/wp-x86_64.pl b/crypto/whrlpool/asm/wp-x86_64.pl index 87c0843dc1..9be1cc2238 100644 --- a/crypto/whrlpool/asm/wp-x86_64.pl +++ b/crypto/whrlpool/asm/wp-x86_64.pl @@ -41,7 +41,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; my $dir=$1; my $xlate; ( $xlate="${dir}../../perlasm/x86_64-xlate.pl" and -f $xlate) or die "can't locate x86_64-xlate.pl"; -open STDOUT,"| $^X $xlate $flavour $output"; +open STDOUT,"| \"$^X\" $xlate $flavour $output"; sub L() { $code.=".byte ".join(',',@_)."\n"; } sub LL(){ $code.=".byte ".join(',',@_).",".join(',',@_)."\n"; } |