Blame mpn/mips64/add_n.asm

Packit 5c3484
dnl  MIPS64 mpn_add_n -- Add two limb vectors of the same length > 0 and store
Packit 5c3484
dnl  sum in a third limb vector.
Packit 5c3484
Packit 5c3484
dnl  Copyright 1995, 2000-2002, 2011 Free Software Foundation, Inc.
Packit 5c3484
Packit 5c3484
dnl  This file is part of the GNU MP Library.
Packit 5c3484
dnl
Packit 5c3484
dnl  The GNU MP Library is free software; you can redistribute it and/or modify
Packit 5c3484
dnl  it under the terms of either:
Packit 5c3484
dnl
Packit 5c3484
dnl    * the GNU Lesser General Public License as published by the Free
Packit 5c3484
dnl      Software Foundation; either version 3 of the License, or (at your
Packit 5c3484
dnl      option) any later version.
Packit 5c3484
dnl
Packit 5c3484
dnl  or
Packit 5c3484
dnl
Packit 5c3484
dnl    * the GNU General Public License as published by the Free Software
Packit 5c3484
dnl      Foundation; either version 2 of the License, or (at your option) any
Packit 5c3484
dnl      later version.
Packit 5c3484
dnl
Packit 5c3484
dnl  or both in parallel, as here.
Packit 5c3484
dnl
Packit 5c3484
dnl  The GNU MP Library is distributed in the hope that it will be useful, but
Packit 5c3484
dnl  WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
Packit 5c3484
dnl  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
Packit 5c3484
dnl  for more details.
Packit 5c3484
dnl
Packit 5c3484
dnl  You should have received copies of the GNU General Public License and the
Packit 5c3484
dnl  GNU Lesser General Public License along with the GNU MP Library.  If not,
Packit 5c3484
dnl  see https://www.gnu.org/licenses/.
Packit 5c3484
Packit 5c3484
include(`../config.m4')
Packit 5c3484
Packit 5c3484
C INPUT PARAMETERS
Packit 5c3484
C res_ptr	$4
Packit 5c3484
C s1_ptr	$5
Packit 5c3484
C s2_ptr	$6
Packit 5c3484
C size		$7
Packit 5c3484
Packit 5c3484
ASM_START()
Packit 5c3484
PROLOGUE(mpn_add_nc)
Packit 5c3484
	ld	$10,0($5)
Packit 5c3484
	ld	$11,0($6)
Packit 5c3484
Packit 5c3484
	daddiu	$7,$7,-1
Packit 5c3484
	and	$9,$7,4-1	C number of limbs in first loop
Packit 5c3484
	beq	$9,$0,.L0	C if multiple of 4 limbs, skip first loop
Packit 5c3484
	 move	$2,$8
Packit 5c3484
	b	.Loop0
Packit 5c3484
	 dsubu	$7,$7,$9
Packit 5c3484
EPILOGUE()
Packit 5c3484
PROLOGUE(mpn_add_n)
Packit 5c3484
	ld	$10,0($5)
Packit 5c3484
	ld	$11,0($6)
Packit 5c3484
Packit 5c3484
	daddiu	$7,$7,-1
Packit 5c3484
	and	$9,$7,4-1	C number of limbs in first loop
Packit 5c3484
	beq	$9,$0,.L0	C if multiple of 4 limbs, skip first loop
Packit 5c3484
	 move	$2,$0
Packit 5c3484
Packit 5c3484
	dsubu	$7,$7,$9
Packit 5c3484
Packit 5c3484
.Loop0:	daddiu	$9,$9,-1
Packit 5c3484
	ld	$12,8($5)
Packit 5c3484
	daddu	$11,$11,$2
Packit 5c3484
	ld	$13,8($6)
Packit 5c3484
	sltu	$8,$11,$2
Packit 5c3484
	daddu	$11,$10,$11
Packit 5c3484
	sltu	$2,$11,$10
Packit 5c3484
	sd	$11,0($4)
Packit 5c3484
	or	$2,$2,$8
Packit 5c3484
Packit 5c3484
	daddiu	$5,$5,8
Packit 5c3484
	daddiu	$6,$6,8
Packit 5c3484
	move	$10,$12
Packit 5c3484
	move	$11,$13
Packit 5c3484
	bne	$9,$0,.Loop0
Packit 5c3484
	 daddiu	$4,$4,8
Packit 5c3484
Packit 5c3484
.L0:	beq	$7,$0,.Lend
Packit 5c3484
	 nop
Packit 5c3484
Packit 5c3484
.Loop:	daddiu	$7,$7,-4
Packit 5c3484
Packit 5c3484
	ld	$12,8($5)
Packit 5c3484
	daddu	$11,$11,$10
Packit 5c3484
	ld	$13,8($6)
Packit 5c3484
	sltu	$8,$11,$10
Packit 5c3484
	daddu	$11,$11,$2
Packit 5c3484
	sltu	$2,$11,$2
Packit 5c3484
	sd	$11,0($4)
Packit 5c3484
	or	$2,$2,$8
Packit 5c3484
Packit 5c3484
	ld	$10,16($5)
Packit 5c3484
	daddu	$13,$13,$12
Packit 5c3484
	ld	$11,16($6)
Packit 5c3484
	sltu	$8,$13,$12
Packit 5c3484
	daddu	$13,$13,$2
Packit 5c3484
	sltu	$2,$13,$2
Packit 5c3484
	sd	$13,8($4)
Packit 5c3484
	or	$2,$2,$8
Packit 5c3484
Packit 5c3484
	ld	$12,24($5)
Packit 5c3484
	daddu	$11,$11,$10
Packit 5c3484
	ld	$13,24($6)
Packit 5c3484
	sltu	$8,$11,$10
Packit 5c3484
	daddu	$11,$11,$2
Packit 5c3484
	sltu	$2,$11,$2
Packit 5c3484
	sd	$11,16($4)
Packit 5c3484
	or	$2,$2,$8
Packit 5c3484
Packit 5c3484
	ld	$10,32($5)
Packit 5c3484
	daddu	$13,$13,$12
Packit 5c3484
	ld	$11,32($6)
Packit 5c3484
	sltu	$8,$13,$12
Packit 5c3484
	daddu	$13,$13,$2
Packit 5c3484
	sltu	$2,$13,$2
Packit 5c3484
	sd	$13,24($4)
Packit 5c3484
	or	$2,$2,$8
Packit 5c3484
Packit 5c3484
	daddiu	$5,$5,32
Packit 5c3484
	daddiu	$6,$6,32
Packit 5c3484
Packit 5c3484
	bne	$7,$0,.Loop
Packit 5c3484
	 daddiu	$4,$4,32
Packit 5c3484
Packit 5c3484
.Lend:	daddu	$11,$11,$2
Packit 5c3484
	sltu	$8,$11,$2
Packit 5c3484
	daddu	$11,$10,$11
Packit 5c3484
	sltu	$2,$11,$10
Packit 5c3484
	sd	$11,0($4)
Packit 5c3484
	j	$31
Packit 5c3484
	or	$2,$2,$8
Packit 5c3484
EPILOGUE()