[Gmp-commit] /var/hg/gmp: 4 new changesets

[mercurial at gmplib.org]

details:   /var/hg/gmp/rev/f265d9e272f1
changeset: 14265:f265d9e272f1
user:      Torbjorn Granlund <tege at gmplib.org>
date:      Tue Oct 04 21:02:42 2011 +0200
description:
Fix a comment.

details:   /var/hg/gmp/rev/806226b3f0f1
changeset: 14266:806226b3f0f1
user:      Torbjorn Granlund <tege at gmplib.org>
date:      Tue Oct 04 21:03:09 2011 +0200
description:
New file.

details:   /var/hg/gmp/rev/dce4b4ad035d
changeset: 14267:dce4b4ad035d
user:      Torbjorn Granlund <tege at gmplib.org>
date:      Tue Oct 04 21:14:16 2011 +0200
description:
New file.

details:   /var/hg/gmp/rev/14a51f7ebc33
changeset: 14268:14a51f7ebc33
user:      Torbjorn Granlund <tege at gmplib.org>
date:      Tue Oct 04 21:15:02 2011 +0200
description:
*** empty log message ***

diffstat:

 ChangeLog                      |   3 ++
 mpn/s390_32/esame/submul_1.asm |  52 ++++++++++++++++++++++++++++++++++++++++++
 mpn/s390_64/addmul_1.asm       |   2 +-
 mpn/s390_64/submul_1.asm       |  52 ++++++++++++++++++++++++++++++++++++++++++
 4 files changed, 108 insertions(+), 1 deletions(-)

diffs (136 lines):

diff -r 130457aa6322 -r 14a51f7ebc33 ChangeLog
--- a/ChangeLog	Tue Oct 04 04:38:08 2011 +0200
+++ b/ChangeLog	Tue Oct 04 21:15:02 2011 +0200
@@ -1,5 +1,8 @@
 2011-10-04  Torbjorn Granlund  <tege at gmplib.org>
 
+	* mpn/s390_64/submul_1.asm: New file.
+	* mpn/s390_32/esame/submul_1.asm: New file.
+
 	* mpn/generic/mulmid.c (mpn_mulmid): Move a TMP_DECL to block start.
 
 	* mpn/Makefile.am (TARG_DIST): Add s390_32 and s390_64, remove s390 and
diff -r 130457aa6322 -r 14a51f7ebc33 mpn/s390_32/esame/submul_1.asm
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mpn/s390_32/esame/submul_1.asm	Tue Oct 04 21:15:02 2011 +0200
@@ -0,0 +1,52 @@
+dnl  S/390-32 mpn_submul_1 for systems with MLR instruction.
+
+dnl  Copyright 2011 Free Software Foundation, Inc.
+
+dnl  This file is part of the GNU MP Library.
+
+dnl  The GNU MP Library is free software; you can redistribute it and/or modify
+dnl  it under the terms of the GNU Lesser General Public License as published
+dnl  by the Free Software Foundation; either version 3 of the License, or (at
+dnl  your option) any later version.
+
+dnl  The GNU MP Library is distributed in the hope that it will be useful, but
+dnl  WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+dnl  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
+dnl  License for more details.
+
+dnl  You should have received a copy of the GNU Lesser General Public License
+dnl  along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.
+
+include(`../config.m4')
+
+C INPUT PARAMETERS
+define(`rp',	`%r2')
+define(`up',	`%r3')
+define(`n',	`%r4')
+define(`v0',	`%r5')
+
+ASM_START()
+PROLOGUE(mpn_submul_1)
+	stm	%r9, %r12, 36(%r15)
+	lhi	%r12, 0
+	slr	%r11, %r11
+
+L(top):	l	%r1, 0(%r12, up)
+	l	%r10, 0(%r12, rp)
+	mlr	%r0, v0
+	slbr	%r10, %r1
+	slbr	%r9, %r9
+	slr	%r0, %r9		C conditional incr
+	slr	%r10, %r11
+	lr	%r11, %r0
+	st	%r10, 0(%r12, rp)
+	la	%r12, 4(%r12)
+	brct	%r4,  L(top)
+
+	lr	%r2, %r11
+	slbr	%r9, %r9
+	slr	%r2, %r9
+
+	lm	%r9, %r12, 36(%r15)
+	br	%r14
+EPILOGUE()
diff -r 130457aa6322 -r 14a51f7ebc33 mpn/s390_64/addmul_1.asm
--- a/mpn/s390_64/addmul_1.asm	Tue Oct 04 04:38:08 2011 +0200
+++ b/mpn/s390_64/addmul_1.asm	Tue Oct 04 21:15:02 2011 +0200
@@ -33,7 +33,7 @@
 	lghi	%r12, 0			C zero index register
 	aghi	%r12, 0			C clear carry flag
 	lghi	%r11, 0			C clear carry limb
-	lghi	z, 0			C clear carry limb
+	lghi	z, 0			C keep register zero
 
 L(top):	lg	%r1, 0(%r12,up)
 	lg	%r10, 0(%r12,rp)
diff -r 130457aa6322 -r 14a51f7ebc33 mpn/s390_64/submul_1.asm
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mpn/s390_64/submul_1.asm	Tue Oct 04 21:15:02 2011 +0200
@@ -0,0 +1,52 @@
+dnl  S/390-64 mpn_submul_1
+
+dnl  Copyright 2011 Free Software Foundation, Inc.
+
+dnl  This file is part of the GNU MP Library.
+
+dnl  The GNU MP Library is free software; you can redistribute it and/or modify
+dnl  it under the terms of the GNU Lesser General Public License as published
+dnl  by the Free Software Foundation; either version 3 of the License, or (at
+dnl  your option) any later version.
+
+dnl  The GNU MP Library is distributed in the hope that it will be useful, but
+dnl  WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+dnl  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
+dnl  License for more details.
+
+dnl  You should have received a copy of the GNU Lesser General Public License
+dnl  along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.
+
+include(`../config.m4')
+
+C INPUT PARAMETERS
+define(`rp',	`%r2')
+define(`up',	`%r3')
+define(`n',	`%r4')
+define(`v0',	`%r5')
+
+ASM_START()
+PROLOGUE(mpn_submul_1)
+	stmg	%r9, %r12, 72(%r15)
+	lghi	%r12, 0
+	slgr	%r11, %r11
+
+L(top):	lg	%r1, 0(%r12, up)
+	lg	%r10, 0(%r12, rp)
+	mlgr	%r0, v0
+	slbgr	%r10, %r1
+	slbgr	%r9, %r9
+	slgr	%r0, %r9		C conditional incr
+	slgr	%r10, %r11
+	lgr	%r11, %r0
+	stg	%r10, 0(%r12, rp)
+	la	%r12, 8(%r12)
+	brctg	%r4,  L(top)
+
+	lgr	%r2, %r11
+	slbgr	%r9, %r9
+	slgr	%r2, %r9
+
+	lmg	%r9, %r12, 72(%r15)
+	br	%r14
+EPILOGUE()