diff options
Diffstat (limited to 'sysdeps/sparc/sparc32/lshift.S')
| -rw-r--r-- | sysdeps/sparc/sparc32/lshift.S | 50 |
1 files changed, 26 insertions, 24 deletions
diff --git a/sysdeps/sparc/sparc32/lshift.S b/sysdeps/sparc/sparc32/lshift.S index 4f0595f2fb..35aa9378b3 100644 --- a/sysdeps/sparc/sparc32/lshift.S +++ b/sysdeps/sparc/sparc32/lshift.S @@ -1,19 +1,19 @@ -! sparc __mpn_lshift -- - -! Copyright (C) 1995, 1996 Free Software Foundation, Inc. - +! Sparc __mpn_lshift -- +! +! Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc. +! ! This file is part of the GNU MP Library. - +! ! The GNU MP Library is free software; you can redistribute it and/or modify ! it under the terms of the GNU Library General Public License as published by ! the Free Software Foundation; either version 2 of the License, or (at your ! option) any later version. - +! ! The GNU MP Library is distributed in the hope that it will be useful, but ! WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY ! or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public ! License for more details. - +! ! You should have received a copy of the GNU Library General Public License ! along with the GNU MP Library; see the file COPYING.LIB. If not, write to ! the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, @@ -21,17 +21,14 @@ ! INPUT PARAMETERS -! res_ptr %o0 -! src_ptr %o1 -! size %o2 -! cnt %o3 +! RES_PTR %o0 +! SRC_PTR %o1 +! SIZE %o2 +! CNT %o3 -#include "sysdep.h" +#include <sysdep.h> - .text - .align 4 - .global C_SYMBOL_NAME(__mpn_lshift) -C_SYMBOL_NAME(__mpn_lshift): +ENTRY(__mpn_lshift) sll %o2,2,%g1 add %o1,%g1,%o1 ! make %o1 point at end of src ld [%o1-4],%g2 ! load first limb @@ -40,12 +37,13 @@ C_SYMBOL_NAME(__mpn_lshift): add %o2,-1,%o2 andcc %o2,4-1,%g4 ! number of limbs in first loop srl %g2,%o5,%g1 ! compute function result - be L0 ! if multiple of 4 limbs, skip first loop + be LOC(0) ! if multiple of 4 limbs, skip first loop st %g1,[%sp+80] sub %o2,%g4,%o2 ! adjust count for main loop -Loop0: ld [%o1-8],%g3 +LOC(loop0): + ld [%o1-8],%g3 add %o0,-4,%o0 add %o1,-4,%o1 addcc %g4,-1,%g4 @@ -53,14 +51,15 @@ Loop0: ld [%o1-8],%g3 srl %g3,%o5,%g1 mov %g3,%g2 or %o4,%g1,%o4 - bne Loop0 + bne LOC(loop0) st %o4,[%o0+0] -L0: tst %o2 - be Lend +LOC(0): tst %o2 + be LOC(end) nop -Loop: ld [%o1-8],%g3 +LOC(loop): + ld [%o1-8],%g3 add %o0,-16,%o0 addcc %o2,-4,%o2 sll %g2,%o3,%o4 @@ -86,10 +85,13 @@ Loop: ld [%o1-8],%g3 add %o1,-16,%o1 or %g4,%g1,%g4 - bne Loop + bne LOC(loop) st %g4,[%o0+0] -Lend: sll %g2,%o3,%g2 +LOC(end): + sll %g2,%o3,%g2 st %g2,[%o0-4] retl ld [%sp+80],%o0 + +END(__mpn_lshift) |