diff options
Diffstat (limited to 'sysdeps/sparc/sparc64/lshift.S')
-rw-r--r-- | sysdeps/sparc/sparc64/lshift.S | 95 |
1 files changed, 0 insertions, 95 deletions
diff --git a/sysdeps/sparc/sparc64/lshift.S b/sysdeps/sparc/sparc64/lshift.S deleted file mode 100644 index 74ce43bb01..0000000000 --- a/sysdeps/sparc/sparc64/lshift.S +++ /dev/null @@ -1,95 +0,0 @@ -/* SPARC v9 __mpn_lshift -- - - Copyright (C) 1996-2017 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 Lesser General Public License as published by - the Free Software Foundation; either version 2.1 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 Lesser General Public - License for more details. - - You should have received a copy of the GNU Lesser General Public License - along with the GNU MP Library; see the file COPYING.LIB. If not, - see <http://www.gnu.org/licenses/>. */ - -#include <sysdep.h> - -/* INPUT PARAMETERS - res_ptr %o0 - src_ptr %o1 - size %o2 - cnt %o3 */ - - .register %g2, #scratch - .register %g3, #scratch - -ENTRY(__mpn_lshift) - sllx %o2,3,%g1 - add %o1,%g1,%o1 ! make %o1 point at end of src - ldx [%o1-8],%g2 ! load first limb - sub %g0,%o3,%o5 ! negate shift count - add %o0,%g1,%o0 ! make %o0 point at end of res - add %o2,-1,%o2 - andcc %o2,4-1,%g4 ! number of limbs in first loop - srlx %g2,%o5,%g1 ! compute function result - be,pn %xcc,.L0 ! if multiple of 4 limbs, skip first loop - mov %g1,%g5 - - sub %o2,%g4,%o2 ! adjust count for main loop - -.Loop0: ldx [%o1-16],%g3 - add %o0,-8,%o0 - add %o1,-8,%o1 - sllx %g2,%o3,%o4 - addcc %g4,-1,%g4 - srlx %g3,%o5,%g1 - mov %g3,%g2 - or %o4,%g1,%o4 - bne,pt %xcc,.Loop0 - stx %o4,[%o0+0] - -.L0: brz,pn %o2,.Lend - nop - -.Loop: ldx [%o1-16],%g3 - add %o0,-32,%o0 - sllx %g2,%o3,%o4 - addcc %o2,-4,%o2 - srlx %g3,%o5,%g1 - - ldx [%o1-24],%g2 - sllx %g3,%o3,%g4 - or %o4,%g1,%o4 - stx %o4,[%o0+24] - srlx %g2,%o5,%g1 - - ldx [%o1-32],%g3 - sllx %g2,%o3,%o4 - or %g4,%g1,%g4 - stx %g4,[%o0+16] - srlx %g3,%o5,%g1 - - ldx [%o1-40],%g2 - sllx %g3,%o3,%g4 - or %o4,%g1,%o4 - stx %o4,[%o0+8] - srlx %g2,%o5,%g1 - - add %o1,-32,%o1 - or %g4,%g1,%g4 - bne,pt %xcc,.Loop - stx %g4,[%o0+0] - -.Lend: sllx %g2,%o3,%g2 - stx %g2,[%o0-8] - - jmpl %o7+8, %g0 - mov %g5,%o0 - -END(__mpn_lshift) |