Return to sub_n.asm CVS log

Up to [local] / OpenXM_contrib / gmp / mpn / mips64

Annotation of OpenXM_contrib/gmp/mpn/mips64/sub_n.asm, Revision 1.1.1.1

1.1       ohara       1: dnl  MIPS64 mpn_sub_n -- Subtract two limb vectors of the same length > 0 and
                      2: dnl  store difference in a third limb vector.
                      3:
                      4: dnl  Copyright 1995, 2000, 2001, 2002 Free Software Foundation, Inc.
                      5:
                      6: dnl  This file is part of the GNU MP Library.
                      7:
                      8: dnl  The GNU MP Library is free software; you can redistribute it and/or modify
                      9: dnl  it under the terms of the GNU Lesser General Public License as published
                     10: dnl  by the Free Software Foundation; either version 2.1 of the License, or (at
                     11: dnl  your option) any later version.
                     12:
                     13: dnl  The GNU MP Library is distributed in the hope that it will be useful, but
                     14: dnl  WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
                     15: dnl  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
                     16: dnl  License for more details.
                     17:
                     18: dnl  You should have received a copy of the GNU Lesser General Public License
                     19: dnl  along with the GNU MP Library; see the file COPYING.LIB.  If not, write to
                     20: dnl  the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
                     21: dnl  MA 02111-1307, USA.
                     22:
                     23: include(`../config.m4')
                     24:
                     25: C INPUT PARAMETERS
                     26: C res_ptr      $4
                     27: C s1_ptr       $5
                     28: C s2_ptr       $6
                     29: C size         $7
                     30:
                     31: ASM_START()
                     32: PROLOGUE(mpn_sub_n)
                     33:        ld      $10,0($5)
                     34:        ld      $11,0($6)
                     35:
                     36:        daddiu  $7,$7,-1
                     37:        and     $9,$7,4-1       C number of limbs in first loop
                     38:        beq     $9,$0,.L0       C if multiple of 4 limbs, skip first loop
                     39:         move   $2,$0
                     40:
                     41:        dsubu   $7,$7,$9
                     42:
                     43: .Loop0:        daddiu  $9,$9,-1
                     44:        ld      $12,8($5)
                     45:        daddu   $11,$11,$2
                     46:        ld      $13,8($6)
                     47:        sltu    $8,$11,$2
                     48:        dsubu   $11,$10,$11
                     49:        sltu    $2,$10,$11
                     50:        sd      $11,0($4)
                     51:        or      $2,$2,$8
                     52:
                     53:        daddiu  $5,$5,8
                     54:        daddiu  $6,$6,8
                     55:        move    $10,$12
                     56:        move    $11,$13
                     57:        bne     $9,$0,.Loop0
                     58:         daddiu $4,$4,8
                     59:
                     60: .L0:   beq     $7,$0,.Lend
                     61:         nop
                     62:
                     63: .Loop: daddiu  $7,$7,-4
                     64:
                     65:        ld      $12,8($5)
                     66:        dsubu   $11,$10,$11
                     67:        ld      $13,8($6)
                     68:        sltu    $8,$10,$11
                     69:        dsubu   $14,$11,$2
                     70:        sltu    $2,$11,$14
                     71:        sd      $14,0($4)
                     72:        or      $2,$2,$8
                     73:
                     74:        ld      $10,16($5)
                     75:        dsubu   $13,$12,$13
                     76:        ld      $11,16($6)
                     77:        sltu    $8,$12,$13
                     78:        dsubu   $14,$13,$2
                     79:        sltu    $2,$13,$14
                     80:        sd      $14,8($4)
                     81:        or      $2,$2,$8
                     82:
                     83:        ld      $12,24($5)
                     84:        dsubu   $11,$10,$11
                     85:        ld      $13,24($6)
                     86:        sltu    $8,$10,$11
                     87:        dsubu   $14,$11,$2
                     88:        sltu    $2,$11,$14
                     89:        sd      $14,16($4)
                     90:        or      $2,$2,$8
                     91:
                     92:        ld      $10,32($5)
                     93:        dsubu   $13,$12,$13
                     94:        ld      $11,32($6)
                     95:        sltu    $8,$12,$13
                     96:        dsubu   $14,$13,$2
                     97:        sltu    $2,$13,$14
                     98:        sd      $14,24($4)
                     99:        or      $2,$2,$8
                    100:
                    101:        daddiu  $5,$5,32
                    102:        daddiu  $6,$6,32
                    103:
                    104:        bne     $7,$0,.Loop
                    105:         daddiu $4,$4,32
                    106:
                    107: .Lend: daddu   $11,$11,$2
                    108:        sltu    $8,$11,$2
                    109:        dsubu   $11,$10,$11
                    110:        sltu    $2,$10,$11
                    111:        sd      $11,0($4)
                    112:        j       $31
                    113:        or      $2,$2,$8
                    114: EPILOGUE(mpn_sub_n)