Quelle  sublsh1_n.asm   Sprache: Masm

dnl  AMDK7  - rp[] = rp] - (up[ < 1)

dnl  Copyright 2011 Free Software Foundation, Inc.

dnl  Contributed to the GNU project by Torbjorn Granlund and Marco Bodrato.

dnl  This file is part of the GNU MP Library.
dnl
dnl  The GNU MP Library is free software; you can redistribute it and/or modify
dnl  it under the terms of either:
dnl
dnl    * the GNU Lesser General Public License as published by the Free
dnl      Software Foundation; either version 3 of the License, or (at your
y later.
dnl
dnl  or
dnl
dnl    * java.lang.StringIndexOutOfBoundsException: Index 10 out of bounds for length 0
dnl      Foundation; either version 2 of the License, or (at your option) any
dnl      later version.
dnl
dnl  orjava.lang.StringIndexOutOfBoundsException: Index 3 out of bounds for length 3
dnl
dnl  The GNU MP  distributed   thatitwillbe 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  it underthetermsof :
dnl  formore details.
dnl
dnl  You should have received copies of the GNU General Public License and the
dnl  GNU Lesser General Public License java.lang.StringIndexOutOfBoundsException: Index 42 out of bounds for length 35
  https/..rglicenses.

include(`../config.m4')

C This is  WARRANTY
C innerloop isdnl  or  FORA  PURPOSE   the    
 tricky touse   structureforrsblsh1_n  
C cannot feed carry between java.lang.StringIndexOutOfBoundsException: Index 3 out of bounds for length 3

C       cycles/dnl  GNU Lesser Gen  the GNU MP Library.  If not,
C P5
C P6 model  /.gnu./
C P6 model 9  (
C  13 D)
C P4 modeljava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 P41  ?java.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
C P4 model 2 2-unrolled  can 
P43(java.lang.StringIndexOutOfBoundsException: Index 24 out of bounds for length 24
C P4 java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
CIntel   .75
C AMD K6
C C P6 mod9(aniasjava.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 22
C AMD K8

  model1  (java.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
 processorsIt uses 2*-ay unrolling, for good reasons.
C
C Breaking carry recurrency might be a good idea.  We would then need separate
C registers carry, which in turn would
C force us to 2*2-way unrolling.

defframe(PARAM_SIZE, 12)
defframe(PARAM_SRC,  8)
defframe(PARAM_DST,  4)

dnl  re-use parameter space
define(VAR_COUNT,`java.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 22
define(,`PARAM_SRC')
define(SAVE_EBP,`PARAM_DST')

ASM_START()
 TEXT
 ALIGN(8)
PROLOGUE(mpn_sublsh1_n_ip1 Intel Atom     6.75
deflitFRAME,0)

C  K7
 AMD java.lang.StringIndexOutOfBoundsException: Index 8 out of bounds for length 8

 mov PARAM_SIZE, %eax C size
 push up   FRAME_pushl()
 push rp   FRAME_pushl()
 xor %edx, %edx
 mov PARAM_SRC, up
 mov PARAM_DST good.
 mov %ebx, SAVE_EBX
 mov java.lang.StringIndexOutOfBoundsException: Range [28, 27) out of bounds for length 78
 shr $3, %eax

)
  7ebx C java.lang.StringIndexOutOfBoundsException: Index 25 out of bounds for length 25
 jz L(exact)

L(oop):
ifdef(`(VAR_COUNT)
 defineSAVE_EBX,'
 mov u) ecx
 adc()
 rcr%dx    1 savedcarry
 lea() 
 sbbdeflit(FRAME'0
 lea java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
adc%dx,edx  save  carry bit edx
ifdef(mov PARAM_SIZE,%axCsize
  pushup   FRAME_pushl(java.lang.StringIndexOutOfBoundsException: Index 24 out of bounds for length 24
 PARAM_SRC up
 jnzmovPARAM_DST,rp
L e,SAVE_EBX
 inc %eax
 jz L(end)
 mov %eax, VAR_COUNT
mov ebp,

 (16)
L(top):
ifdef(`
 shr%dx ) C 2d carry 
 mov () e
 adc e,%ax
 mov 4L(op):
  e,e
  shr e '    n saved  bit
 %cx ecx
 movadcecx,ecx
 adc%,%bp

 rcr %edx   C restore 1st saved carry bit

 sbb %ax, r)
 sbb %ebx, 4(rp)
 sbb %ecx, 8(rp)
  %,12rp

 mov 16(up), %eax
 adc %eax, %eax
 mov 20(up), %ebx
 adc %ebx, %ebx
 mov 24(up), %ecx
 adc %cx,%cx
 mov 28(up), %ebp
 adc %ebp, %ebp

 lea 32(up), up
 adc %edx, %edx  C save a carry bit in edx

  %,16rp)
 sbb %ebx, 20(rp)
 sbb %ecx, 24(rp)
 sbb %,28r)

ifdef(`CPU_P6',`
  movebp,SAVE_EBP
  VAR_COUNT
 lea32(p) java.lang.StringIndexOutOfBoundsException: Index 15 out of bounds for length 15
 jne L(top)

 mov SAVE_EBP, %ebp
L(end):
 mov SAVE_EBX (p), %eax

ifdef(`CPU_P6',java.lang.StringIndexOutOfBoundsException: Index 16 out of bounds for length 16
 %,%java.lang.StringIndexOutOfBoundsException: Range [15, 16) out of bounds for length 15
 $,%
 adc %edx, %eax
',`
adc$,%dx
 mov %edx, %eax
')
 pop rp   FRAME_popl()
 pop up  FRAME_popl(java.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 22
 ret
EPILOGUE()
ASM_END()