From eafb7b72c2b6095cba51a77f5f7a5240a658c55c Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Tue, 5 Aug 2014 17:38:37 +0300
Subject: Bug fix to MPFR mod operation for negative numerator.

---
 test/Makefile.am | 9 ++++++++-
 test/Makefile.in | 9 ++++++++-
 test/mpfrrem.awk | 6 ++++++
 test/mpfrrem.ok  | 4 ++++
 4 files changed, 26 insertions(+), 2 deletions(-)
 create mode 100644 test/mpfrrem.awk
 create mode 100644 test/mpfrrem.ok

(limited to 'test')

diff --git a/test/Makefile.am b/test/Makefile.am
index 8349a73e..ede44523 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -529,6 +529,8 @@ EXTRA_DIST = \
 	mpfrnr.awk \
 	mpfrnr.in \
 	mpfrnr.ok \
+	mpfrrem.awk \
+	mpfrrem.ok \
 	mpfrrnd.awk \
 	mpfrrnd.ok \
 	mpfrsort.awk \
@@ -1024,7 +1026,7 @@ INET_TESTS = inetdayu inetdayt inetechu inetecht
 
 MACHINE_TESTS = double1 double2 fmtspcl intformat
 
-MPFR_TESTS = mpfrnr mpfrnegzero mpfrrnd mpfrieee mpfrexprange \
+MPFR_TESTS = mpfrnr mpfrnegzero mpfrrem mpfrrnd mpfrieee mpfrexprange \
 	mpfrsort mpfrsqrt mpfrbigint
 
 LOCALE_CHARSET_TESTS = \
@@ -1752,6 +1754,11 @@ mpfrsqrt:
 	@$(AWK) -M -f "$(srcdir)"/$@.awk > _$@ 2>&1
 	@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
 
+mpfrrem:
+	@echo $@
+	@$(AWK) -M -f "$(srcdir)"/$@.awk > _$@ 2>&1
+	@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
 jarebug::
 	@echo $@
 	@"$(srcdir)"/$@.sh "$(AWKPROG)" "$(srcdir)"/$@.awk "$(srcdir)"/$@.in "_$@"
diff --git a/test/Makefile.in b/test/Makefile.in
index e8fd8844..196e125c 100644
--- a/test/Makefile.in
+++ b/test/Makefile.in
@@ -775,6 +775,8 @@ EXTRA_DIST = \
 	mpfrnr.awk \
 	mpfrnr.in \
 	mpfrnr.ok \
+	mpfrrem.awk \
+	mpfrrem.ok \
 	mpfrrnd.awk \
 	mpfrrnd.ok \
 	mpfrsort.awk \
@@ -1266,7 +1268,7 @@ GAWK_EXT_TESTS = \
 EXTRA_TESTS = inftest regtest
 INET_TESTS = inetdayu inetdayt inetechu inetecht
 MACHINE_TESTS = double1 double2 fmtspcl intformat
-MPFR_TESTS = mpfrnr mpfrnegzero mpfrrnd mpfrieee mpfrexprange \
+MPFR_TESTS = mpfrnr mpfrnegzero mpfrrem mpfrrnd mpfrieee mpfrexprange \
 	mpfrsort mpfrsqrt mpfrbigint
 
 LOCALE_CHARSET_TESTS = \
@@ -2176,6 +2178,11 @@ mpfrsqrt:
 	@$(AWK) -M -f "$(srcdir)"/$@.awk > _$@ 2>&1
 	@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
 
+mpfrrem:
+	@echo $@
+	@$(AWK) -M -f "$(srcdir)"/$@.awk > _$@ 2>&1
+	@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
 jarebug::
 	@echo $@
 	@"$(srcdir)"/$@.sh "$(AWKPROG)" "$(srcdir)"/$@.awk "$(srcdir)"/$@.in "_$@"
diff --git a/test/mpfrrem.awk b/test/mpfrrem.awk
new file mode 100644
index 00000000..fd8bc4d5
--- /dev/null
+++ b/test/mpfrrem.awk
@@ -0,0 +1,6 @@
+BEGIN {
+	print "15 % 7 =", 15 % 7
+	print "15 % -7 =", 15 % -7
+	print "-15 % 7 =", -15 % 7
+	print "-15 % -7 =", -15 % -7
+}
diff --git a/test/mpfrrem.ok b/test/mpfrrem.ok
new file mode 100644
index 00000000..91010457
--- /dev/null
+++ b/test/mpfrrem.ok
@@ -0,0 +1,4 @@
+15 % 7 = 1
+15 % -7 = 1
+-15 % 7 = -1
+-15 % -7 = -1
-- 
cgit v1.2.3