added return for case of infinities

git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@800 280ebfd0-de03-0410-8827-d642c229c3f4

1 files changed, 1 insertions, 0 deletions

diff --git a/set_d.c b/set_d.c
index 6831fda1a..3b1d43d98 100644
--- a/set_d.c
+++ b/set_d.c
@@ -254,6 +254,7 @@ mpfr_set_d(r, d, rnd_mode)
       MPFR_SET_INF(r); 
       if ((d > 0 && (MPFR_SIGN(r) == -1)) || (d < 0 && (MPFR_SIGN(r) == 1)))
 	MPFR_CHANGE_SIGN(r); 
+      return;
     }
 
   /* reset infinity flag if set */