=================================================================== RCS file: /home/cvs/OpenXM_contrib/gmp/mpn/x86/pentium/Attic/sqr_basecase.asm,v retrieving revision 1.1.1.1 retrieving revision 1.1.1.2 diff -u -p -r1.1.1.1 -r1.1.1.2 --- OpenXM_contrib/gmp/mpn/x86/pentium/Attic/sqr_basecase.asm 2000/09/09 14:12:44 1.1.1.1 +++ OpenXM_contrib/gmp/mpn/x86/pentium/Attic/sqr_basecase.asm 2003/08/25 16:06:30 1.1.1.2 @@ -1,10 +1,6 @@ dnl Intel P5 mpn_sqr_basecase -- square an mpn number. -dnl -dnl P5: approx 8 cycles per crossproduct, or 15.5 cycles per triangular -dnl product at around 20x20 limbs. - -dnl Copyright (C) 1999, 2000 Free Software Foundation, Inc. +dnl Copyright 1999, 2000, 2001, 2002 Free Software Foundation, Inc. dnl dnl This file is part of the GNU MP Library. dnl @@ -23,10 +19,13 @@ dnl License along with the GNU MP Library; see the fi dnl not, write to the Free Software Foundation, Inc., 59 Temple Place - dnl Suite 330, Boston, MA 02111-1307, USA. - include(`../config.m4') +C P5: approx 8 cycles per crossproduct, or 15.5 cycles per triangular +C product at around 20x20 limbs. + + C void mpn_sqr_basecase (mp_ptr dst, mp_srcptr src, mp_size_t size); C C Calculate src,size squared, storing the result in dst,2*size. @@ -39,7 +38,7 @@ defframe(PARAM_SIZE,12) defframe(PARAM_SRC, 8) defframe(PARAM_DST, 4) - .text + TEXT ALIGN(8) PROLOGUE(mpn_sqr_basecase) deflit(`FRAME',0) @@ -411,7 +410,7 @@ L(corner): mull -8(%esi) C src[size-1]*src[size-2] - movl %ecx, 0(%edi) + movl %ecx, (%edi) addl %eax, %ebx adcl $0, %edx