[BACK]Return to rshift.asm CVS log [TXT][DIR] Up to [local] / OpenXM_contrib / gmp / mpn / x86 / k7 / mmx

Diff for /OpenXM_contrib/gmp/mpn/x86/k7/mmx/Attic/rshift.asm between version 1.1.1.1 and 1.1.1.2

version 1.1.1.1, 2000/09/09 14:12:43 version 1.1.1.2, 2003/08/25 16:06:29
Line 1 
Line 1 
 dnl  AMD K7 mpn_rshift -- mpn right shift.  dnl  AMD K7 mpn_rshift -- mpn right shift.
 dnl  
 dnl  K7: 1.21 cycles/limb (at 16 limbs/loop).  
   
   dnl  Copyright 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
 dnl  Copyright (C) 1999, 2000 Free Software Foundation, Inc.  
 dnl  dnl
 dnl  This file is part of the GNU MP Library.  dnl  This file is part of the GNU MP Library.
 dnl  dnl
Line 22  dnl  License along with the GNU MP Library; see the fi
Line 19  dnl  License along with the GNU MP Library; see the fi
 dnl  not, write to the Free Software Foundation, Inc., 59 Temple Place -  dnl  not, write to the Free Software Foundation, Inc., 59 Temple Place -
 dnl  Suite 330, Boston, MA 02111-1307, USA.  dnl  Suite 330, Boston, MA 02111-1307, USA.
   
   
 include(`../config.m4')  include(`../config.m4')
   
   
   C K7: 1.21 cycles/limb (at 16 limbs/loop).
   
   
   
 dnl  K7: UNROLL_COUNT cycles/limb  dnl  K7: UNROLL_COUNT cycles/limb
 dnl           4           1.51  dnl           4           1.51
 dnl           8           1.26  dnl           8           1.26
Line 67  defframe(SAVE_ESI, -8)
Line 67  defframe(SAVE_ESI, -8)
 defframe(SAVE_EBX, -12)  defframe(SAVE_EBX, -12)
 deflit(SAVE_SIZE, 12)  deflit(SAVE_SIZE, 12)
   
         .text          TEXT
         ALIGN(32)          ALIGN(32)
   
 PROLOGUE(mpn_rshift)  PROLOGUE(mpn_rshift)
Line 276  L(here):
Line 276  L(here):
   
 ifdef(`PIC',`  ifdef(`PIC',`
 L(pic_calc):  L(pic_calc):
         C See README.family about old gas bugs          C See mpn/x86/README about old gas bugs
         leal    (%eax,%eax,4), %esi          leal    (%eax,%eax,4), %esi
         addl    $L(entry)-L(here), %esi          addl    $L(entry)-L(here), %esi
         addl    (%esp), %esi          addl    (%esp), %esi
Line 314  forloop(i, 0, UNROLL_COUNT/CHUNK_COUNT-1, `
Line 314  forloop(i, 0, UNROLL_COUNT/CHUNK_COUNT-1, `
         deflit(`disp0', eval(i*CHUNK_COUNT*4 ifelse(UNROLL_BYTES,256,-128)))          deflit(`disp0', eval(i*CHUNK_COUNT*4 ifelse(UNROLL_BYTES,256,-128)))
         deflit(`disp1', eval(disp0 + 8))          deflit(`disp1', eval(disp0 + 8))
   
         movq    disp0(%edx), %mm0  Zdisp(  movq,   disp0,(%edx), %mm0)
         psrlq   %mm6, %mm2          psrlq   %mm6, %mm2
   
         movq    %mm0, %mm1          movq    %mm0, %mm1
         psllq   %mm7, %mm0          psllq   %mm7, %mm0
   
         por     %mm2, %mm0          por     %mm2, %mm0
         movq    %mm0, disp0(%edi)  Zdisp(  movq,   %mm0, disp0,(%edi))
   
   
         movq    disp1(%edx), %mm0  Zdisp(  movq,   disp1,(%edx), %mm0)
         psrlq   %mm6, %mm1          psrlq   %mm6, %mm1
   
         movq    %mm0, %mm2          movq    %mm0, %mm2
         psllq   %mm7, %mm0          psllq   %mm7, %mm0
   
         por     %mm1, %mm0          por     %mm1, %mm0
         movq    %mm0, disp1(%edi)  Zdisp(  movq,   %mm0, disp1,(%edi))
 ')  ')
   
         addl    $UNROLL_BYTES, %edx          addl    $UNROLL_BYTES, %edx
Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.1.1.2
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>