Blame mpn/sh/sub_n.asm

Packit 5c3484
dnl  SH mpn_sub_n -- Subtract two limb vectors of the same length > 0 and store
Packit 5c3484
dnl  difference in a third limb vector.
Packit 5c3484
Packit 5c3484
dnl  Copyright 1995, 1997, 2000, 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
Packit 5c3484
include(`../config.m4')
Packit 5c3484
Packit 5c3484
C INPUT PARAMETERS
Packit 5c3484
C rp		r4
Packit 5c3484
C up		r5
Packit 5c3484
C vp		r6
Packit 5c3484
C n		r7
Packit 5c3484
Packit 5c3484
changecom(blah)			C disable # to make all C comments below work
Packit 5c3484
Packit 5c3484
ASM_START()
Packit 5c3484
PROLOGUE(mpn_sub_n)
Packit 5c3484
	mov	#0,r3		C clear cy save reg
Packit 5c3484
Packit 5c3484
L(top):	mov.l	@r5+,r1
Packit 5c3484
	mov.l	@r6+,r2
Packit 5c3484
	shlr	r3		C restore cy
Packit 5c3484
	subc	r2,r1
Packit 5c3484
	movt	r3		C save cy
Packit 5c3484
	mov.l	r1,@r4
Packit 5c3484
	dt	r7
Packit 5c3484
	bf.s	L(top)
Packit 5c3484
	 add	#4,r4
Packit 5c3484
Packit 5c3484
	rts
Packit 5c3484
	mov	r3,r0		C return carry-out from most significant limb
Packit 5c3484
EPILOGUE()