From: Andy Polyakov Date: Tue, 3 May 2005 23:03:31 +0000 (+0000) Subject: Cvs missed adapted module itself, here it goes... X-Git-Tag: OpenSSL_0_9_8-beta1~13^2~54 X-Git-Url: https://git.openssl.org/?p=openssl.git;a=commitdiff_plain;h=8b5bf52ac250b2319aca3c593bc27de10d77d655 Cvs missed adapted module itself, here it goes... --- diff --git a/crypto/md5/asm/md5-x86_64.pl b/crypto/md5/asm/md5-x86_64.pl index f570f050e7..c36a7febf7 100755 --- a/crypto/md5/asm/md5-x86_64.pl +++ b/crypto/md5/asm/md5-x86_64.pl @@ -105,19 +105,17 @@ EOF } my $output = shift; -open STDOUT,">$output" or die "can't open $output: $!"; +open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output"; $code .= <B mov 2*4(%rbp), %ecx # ecx = ctx->C mov 3*4(%rbp), %edx # edx = ctx->D - push %rbp # save ctx # end is 'rdi' # ptr is 'rsi' # A is 'eax' @@ -140,10 +137,10 @@ md5_block_asm_host_order: # D is 'edx' cmp %rdi, %rsi # cmp end with ptr - je 1f # jmp if ptr == end + je .Lend # jmp if ptr == end # BEGIN of loop over 16-word blocks -2: # save old values of A, B, C, D +.Lloop: # save old values of A, B, C, D mov %eax, %r8d mov %ebx, %r9d mov %ecx, %r14d @@ -226,10 +223,10 @@ $code .= <A = A mov %ebx, 1*4(%rbp) # ctx->B = B mov %ecx, 2*4(%rbp) # ctx->C = C @@ -237,13 +234,12 @@ $code .= <