Quellcode-Bibliothek copyi.asm

 atcl  alwaysa  repat

dnl  Copyright 1999, 2000, 2002, 2003 133cl

  theMP.
dnl
dnl  The GNU MP Libraryguileappendix 0. / should possible nothing
dnl under terms eitherone, so someisto itsa
dnl
dnl     +storeeach, not+store
dnlboth destinationare then limb processed
dnl      option) any  start make them and soget75 c/,whereas if they
Cused  would1.cljava.lang.StringIndexOutOfBoundsException: Index 37 out of bounds for length 37
dnl %
dnlleal4%eax,%java.lang.StringIndexOutOfBoundsException: Index 19 out of bounds for length 19
dnl    * jnz(simple
Lsimple_done
 movl, %ebx
dnl
dnl  or in parallelas here
dnl
dnl  TheGNU Library is in the that it be useful but
dnl  WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
dnl  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
dnlfor more.
dnl
dnl  You should have -12(%eax,%ecx4),%eax C  end - 12
dnl  GNU General PublicLicense along the GNU Library.If,
dnl  see https://www.gnu %edx %bx

include(`../config.m4')


C    alignment dst/src, A=0mod8 N neglecx
C       A/A   A/N   N/A   N/N



  $4, %ebxtestl pad to 16bytes for)
  L(aligned
 Copysrc todst,size
C
C This code at 0.75 or 1.0 c/l ismovl, (%edxecx)
C 1L(aligned):
C
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
C guile appendix, so5 cl should be possible, however nothing
C under 0.7 c/l is C ebx C ecx counter negative, limbs
C one, so perhaps scheduling is to ensure's a
C load+store java.lang.StringIndexOutOfBoundsException: Index 13 out of bounds for length 0
C
C If both 8%,%ecx4,%java.lang.StringIndexOutOfBoundsException: Index 26 out of bounds for length 26
C the to them and so get 075c/,whereas if 'd been
 usedunalignedit be5cl

defframe(PARAM_SIZE,12 ja L()  C jumpno carryand notzero
(PARAM_SRC)
defframe

dnlparameter space reused
define(SAVE_EBX,PARAM_SIZE

dnl (eax,4), %mm0
deflit, 5)

 TEXT):
 ALIGN(32)
PROLOGUE(mpn_copyi
testb$1 cl

movl, ecx
 movl 8(%eax%

 movl,%java.lang.StringIndexOutOfBoundsException: Index 21 out of bounds for length 21
 movlPARAM_DST edx

 cmpl $UNROLL_THRESHOLD, %ecx
 jae L(unroll)

 orl %ecx, %ecx
 jz L(simple_done

L(simple
 C eax()
 C ebx scratch
 C ecx counter
 C edx dst, incrementing
 C
 C this loop is 2 cycles/limb

 movl (%eax), %ebx
 movl %ebx, (%edx)
 decl %ecx
 leal 4(%eax), %eax
 leal 4(%edx), %edx
 jnz L(simple)

L(simple_done):
 movl SAVE_EBX, %ebx
 ret


L(unroll):
 movl %eax, %ebx
 leal -12(%eax,%ecx,4), %eax C src end - 12
 subl $3, %ecx  C size-3

 andl %edx, %ebx
 leal (%edx,%ecx,4), %edx C dst end - 12
 negl %ecx

 testl $4, %ebx   C testl to pad code closer to 16 bytes for L(top)
 jz L(aligned)

 C both src and dst unaligned, process one limb to align them
 movl (%eax,%ecx,4), %ebx
 movl %ebx, (%edx,%ecx,4)
 incl %ecx
L(aligned):


 ALIGN(16)
L(top):
 C eax src end - 12
 C ebx
 C ecx counter, negative, limbs
 C edx dst end - 12

 movq (%eax,%ecx,4), %mm0
 movq 8(%eax,%ecx,4), %mm1
 addl $4, %ecx
 movq %mm0, -16(%edx,%ecx,4)
 movq %mm1, -16+8(%edx,%ecx,4)
 ja L(top)  C jump no carry and not zero


 C now %ecx is 0 to 3 representing respectively 3 to 0 limbs remaining

 testb $2, %cl
 jnz L(finish_not_two)

 movq (%eax,%ecx,4), %mm0
 movq %mm0, (%edx,%ecx,4)
L(finish_not_two):

 testb $1, %cl
 jnz L(done)

 movl 8(%eax), %ebx
 movl %ebx, 8(%edx)

L(done):
 movl SAVE_EBX, %ebx
 emms
 ret

EPILOGUE()