=================================================================== RCS file: /home/cvs/OpenXM_contrib/gmp/mpn/powerpc64/Attic/lshift.asm,v retrieving revision 1.1 retrieving revision 1.1.1.2 diff -u -p -r1.1 -r1.1.1.2 --- OpenXM_contrib/gmp/mpn/powerpc64/Attic/lshift.asm 2000/09/09 14:12:39 1.1 +++ OpenXM_contrib/gmp/mpn/powerpc64/Attic/lshift.asm 2003/08/25 16:06:24 1.1.1.2 @@ -1,6 +1,6 @@ -# PowerPC-64 mpn_lshift -- Shift a number left. +# PowerPC-64 mpn_lshift -- Shift a number left. -# Copyright (C) 1999, 2000 Free Software Foundation, Inc. +# Copyright 1999, 2000, 2001, 2002 Free Software Foundation, Inc. # This file is part of the GNU MP Library. @@ -19,15 +19,18 @@ # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, # MA 02111-1307, USA. +include(`../config.m4') + +# ppc630: 1.6375 cycles/limb + + # INPUT PARAMETERS # res_ptr r3 # s1_ptr r4 # size r5 # cnt r6 -include(`../config.m4') - ASM_START() PROLOGUE(mpn_lshift) cmpdi cr0,r5,20 # more than 20 limbs? @@ -63,14 +66,14 @@ PROLOGUE(mpn_lshift) blr .LBIG: - std r24,-64(1) - std r25,-56(1) - std r26,-48(1) - std r27,-40(1) - std r28,-32(1) - std r29,-24(1) - std r30,-16(1) - std r31,-8(1) + std r24,-64(r1) + std r25,-56(r1) + std r26,-48(r1) + std r27,-40(r1) + std r28,-32(r1) + std r29,-24(r1) + std r30,-16(r1) + std r31,-8(r1) ldu r9,-8(r4) subfic r8,r6,64 srd r3,r9,r8 # compute function return value @@ -147,13 +150,13 @@ PROLOGUE(mpn_lshift) mr r0,r12 std r0,-8(r7) - ld r24,-64(1) - ld r25,-56(1) - ld r26,-48(1) - ld r27,-40(1) - ld r28,-32(1) - ld r29,-24(1) - ld r30,-16(1) - ld r31,-8(1) + ld r24,-64(r1) + ld r25,-56(r1) + ld r26,-48(r1) + ld r27,-40(r1) + ld r28,-32(r1) + ld r29,-24(r1) + ld r30,-16(r1) + ld r31,-8(r1) blr EPILOGUE(mpn_lshift)