diff options
author | Andy Polyakov <appro@openssl.org> | 2006-12-29 11:05:20 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2006-12-29 11:05:20 +0000 |
commit | 7321a84d4c3fc333b3bccf3feb5627d9d70e2e64 (patch) | |
tree | 6066603d0102c40c264529726d341a3048b64104 /crypto/bn/asm/x86_64-mont.pl | |
parent | bb11c2824642d8263f664f19ca870d5e99ebd485 (diff) | |
download | openssl-7321a84d4c3fc333b3bccf3feb5627d9d70e2e64.zip openssl-7321a84d4c3fc333b3bccf3feb5627d9d70e2e64.tar.gz openssl-7321a84d4c3fc333b3bccf3feb5627d9d70e2e64.tar.bz2 |
Minor clean-up in crypto/bn/asm.
Diffstat (limited to 'crypto/bn/asm/x86_64-mont.pl')
-rwxr-xr-x | crypto/bn/asm/x86_64-mont.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/crypto/bn/asm/x86_64-mont.pl b/crypto/bn/asm/x86_64-mont.pl index 84fea1a..bc3fa83 100755 --- a/crypto/bn/asm/x86_64-mont.pl +++ b/crypto/bn/asm/x86_64-mont.pl @@ -16,7 +16,13 @@ # dedicated squaring routine can provide further improvement... $output=shift; -open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output"; + +$0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; +( $xlate="${dir}x86_64-xlate.pl" and -f $xlate ) or +( $xlate="${dir}../../perlasm/x86_64-xlate.pl" and -f $xlate) or +die "can't locate x86_64-xlate.pl"; + +open STDOUT,"| $^X $xlate $output"; # int bn_mul_mont( $rp="%rdi"; # BN_ULONG *rp, |