summaryrefslogtreecommitdiff
path: root/tests/tset_ld.c
diff options
context:
space:
mode:
authorzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2002-10-17 15:13:09 +0000
committerzimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4>2002-10-17 15:13:09 +0000
commitaf5c5e5d327c3b04cade0eee40f0e16d040d3bf7 (patch)
tree88353ac54dd1b515f268c3b60ceec2dfed5a13ff /tests/tset_ld.c
parent9a666991314a678039f4a3c8addba8d2c3f731bb (diff)
downloadmpfr-af5c5e5d327c3b04cade0eee40f0e16d040d3bf7.tar.gz
added one test (2^1024)
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2052 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tset_ld.c')
-rw-r--r--tests/tset_ld.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/tset_ld.c b/tests/tset_ld.c
index 44fb820d3..a6eeac6fe 100644
--- a/tests/tset_ld.c
+++ b/tests/tset_ld.c
@@ -60,6 +60,7 @@ int
main (int argc, char *argv[])
{
long double d, e;
+ double f;
mpfr_t x;
int i;
@@ -98,6 +99,12 @@ main (int argc, char *argv[])
check_set_get (d, x);
check_set_get (-d, x);
+ /* checks 2^1024 */
+ f = 1.3407807929942597100e155; /* 2^512 */
+ d = (long double) f;
+ d = d * d; /* 2^1024 */
+ check_set_get (d, x);
+
/* checks that 2^i, 2^i+1 and 2^i-1 are correctly converted */
d = 1.0;
for (i=1; i<=113; i++)