diff options
| -rw-r--r-- | tests/tset_str.c | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/tests/tset_str.c b/tests/tset_str.c index 77c7c93bc..22da9bec0 100644 --- a/tests/tset_str.c +++ b/tests/tset_str.c @@ -93,6 +93,22 @@ bug20081028 (void) mpfr_clear (x); } +static void +bug20180908 (void) +{ + mpfr_t x, y; + const char s[] = "ssq4"; + + mpfr_init2 (x, 12); + mpfr_init2 (y, 12); + mpfr_set_str_binary (x, "0.100010111010E24"); + /* x = 9150464 = [4, 52, 54, 54] in base 55 */ + mpfr_set_str (y, s, 55, MPFR_RNDN); + MPFR_ASSERTN (mpfr_equal_p (x, y)); + mpfr_clear (x); + mpfr_clear (y); +} + int main (int argc, char *argv[]) { @@ -844,6 +860,7 @@ main (int argc, char *argv[]) check_underflow (); bug20081028 (); + bug20180908 (); tests_end_mpfr (); return 0; |