|
 |
30b564b |
diff -Naurd mpfr-4.1.1-a/PATCHES mpfr-4.1.1-b/PATCHES
|
|
|
30b564b |
--- mpfr-4.1.1-a/PATCHES 2022-11-23 11:45:26.800476079 +0000
|
|
|
30b564b |
+++ mpfr-4.1.1-b/PATCHES 2022-11-23 11:45:26.844475966 +0000
|
|
|
30b564b |
@@ -0,0 +1 @@
|
|
|
30b564b |
+mpfr_custom_get_kind
|
|
|
30b564b |
diff -Naurd mpfr-4.1.1-a/VERSION mpfr-4.1.1-b/VERSION
|
|
|
30b564b |
--- mpfr-4.1.1-a/VERSION 2022-11-17 13:28:44.000000000 +0000
|
|
|
30b564b |
+++ mpfr-4.1.1-b/VERSION 2022-11-23 11:45:26.844475966 +0000
|
|
|
30b564b |
@@ -1 +1 @@
|
|
|
30b564b |
-4.1.1
|
|
|
30b564b |
+4.1.1-p1
|
|
|
30b564b |
diff -Naurd mpfr-4.1.1-a/src/mpfr.h mpfr-4.1.1-b/src/mpfr.h
|
|
|
30b564b |
--- mpfr-4.1.1-a/src/mpfr.h 2022-11-17 13:28:44.000000000 +0000
|
|
|
30b564b |
+++ mpfr-4.1.1-b/src/mpfr.h 2022-11-23 11:45:26.840475978 +0000
|
|
|
30b564b |
@@ -27,7 +27,7 @@
|
|
|
30b564b |
#define MPFR_VERSION_MAJOR 4
|
|
|
30b564b |
#define MPFR_VERSION_MINOR 1
|
|
|
30b564b |
#define MPFR_VERSION_PATCHLEVEL 1
|
|
|
30b564b |
-#define MPFR_VERSION_STRING "4.1.1"
|
|
|
30b564b |
+#define MPFR_VERSION_STRING "4.1.1-p1"
|
|
|
30b564b |
|
|
|
30b564b |
/* User macros:
|
|
|
30b564b |
MPFR_USE_FILE: Define it to make MPFR define functions dealing
|
|
|
30b564b |
@@ -1027,7 +1027,7 @@
|
|
|
30b564b |
#if __GNUC__ > 2 || __GNUC_MINOR__ >= 95
|
|
|
30b564b |
#define mpfr_custom_get_kind(x) \
|
|
|
30b564b |
__extension__ ({ \
|
|
|
30b564b |
- mpfr_ptr _x = (x); \
|
|
|
30b564b |
+ mpfr_srcptr _x = (x); \
|
|
|
30b564b |
_x->_mpfr_exp > __MPFR_EXP_INF ? \
|
|
|
30b564b |
(mpfr_int) MPFR_REGULAR_KIND * MPFR_SIGN (_x) \
|
|
|
30b564b |
: _x->_mpfr_exp == __MPFR_EXP_INF ? \
|
|
|
30b564b |
diff -Naurd mpfr-4.1.1-a/src/version.c mpfr-4.1.1-b/src/version.c
|
|
|
30b564b |
--- mpfr-4.1.1-a/src/version.c 2022-11-17 13:28:44.000000000 +0000
|
|
|
30b564b |
+++ mpfr-4.1.1-b/src/version.c 2022-11-23 11:45:26.844475966 +0000
|
|
|
30b564b |
@@ -25,5 +25,5 @@
|
|
|
30b564b |
const char *
|
|
|
30b564b |
mpfr_get_version (void)
|
|
|
30b564b |
{
|
|
|
30b564b |
- return "4.1.1";
|
|
|
30b564b |
+ return "4.1.1-p1";
|
|
|
30b564b |
}
|
|
|
30b564b |
diff -Naurd mpfr-4.1.1-a/tests/tstckintc.c mpfr-4.1.1-b/tests/tstckintc.c
|
|
|
30b564b |
--- mpfr-4.1.1-a/tests/tstckintc.c 2022-05-06 13:47:17.000000000 +0000
|
|
|
30b564b |
+++ mpfr-4.1.1-b/tests/tstckintc.c 2022-11-23 11:45:26.836475987 +0000
|
|
|
30b564b |
@@ -295,14 +295,16 @@
|
|
|
30b564b |
test_nan_inf_zero (void)
|
|
|
30b564b |
{
|
|
|
30b564b |
mpfr_ptr val;
|
|
|
30b564b |
+ mpfr_srcptr sval; /* for compilation error checking */
|
|
|
30b564b |
int sign;
|
|
|
30b564b |
int kind;
|
|
|
30b564b |
|
|
|
30b564b |
reset_stack ();
|
|
|
30b564b |
|
|
|
30b564b |
val = new_mpfr (MPFR_PREC_MIN);
|
|
|
30b564b |
+ sval = val;
|
|
|
30b564b |
mpfr_set_nan (val);
|
|
|
30b564b |
- kind = (mpfr_custom_get_kind) (val);
|
|
|
30b564b |
+ kind = (mpfr_custom_get_kind) (sval);
|
|
|
30b564b |
if (kind != MPFR_NAN_KIND)
|
|
|
30b564b |
{
|
|
|
30b564b |
printf ("mpfr_custom_get_kind error: ");
|
|
|
30b564b |
@@ -380,7 +382,8 @@
|
|
|
30b564b |
dummy_set_si (long si)
|
|
|
30b564b |
{
|
|
|
30b564b |
mpfr_t x;
|
|
|
30b564b |
- long * r = dummy_new ();
|
|
|
30b564b |
+ mpfr_srcptr px; /* for compilation error checking */
|
|
|
30b564b |
+ long *r = dummy_new ();
|
|
|
30b564b |
int i1, i2, i3, i4, i5;
|
|
|
30b564b |
|
|
|
30b564b |
/* Check that the type "void *" can be used, like with the function.
|
|
|
30b564b |
@@ -405,7 +408,8 @@
|
|
|
30b564b |
MPFR_ASSERTN (i5 == 1);
|
|
|
30b564b |
|
|
|
30b564b |
mpfr_set_si (x, si, MPFR_RNDN);
|
|
|
30b564b |
- r[0] = mpfr_custom_get_kind (x);
|
|
|
30b564b |
+ px = x;
|
|
|
30b564b |
+ r[0] = mpfr_custom_get_kind (px);
|
|
|
30b564b |
|
|
|
30b564b |
/* Check that the type "void *" can be used in C, like with the function
|
|
|
30b564b |
(forbidden in C++). Also check side effects. */
|