Infinis, premiere tentative.

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

1 files changed, 9 insertions, 1 deletions

diff --git a/get_str.c b/get_str.c
index dfebc04ba..8c6797abe 100644
--- a/get_str.c
+++ b/get_str.c
@@ -58,9 +58,17 @@ char *mpfr_get_str(str, expptr, base, n, op, rnd_mode)
 	    base);
     exit(1);
   }
-
+  
   neg = (MPFR_SIGN(op)<0) ? 1 : 0;
 
+  if (MPFR_IS_INF(op)) { 
+    if (str==NULL) str = (*_mp_allocate_func)(neg + 4);
+    str0 = str; 
+    if (neg) { *str++ = '-'; }
+    *str++ = 'I'; *str++ = 'n'; *str++ = 'f'; *str='\0'; 
+    return str0; 
+  }
+
   if (!MPFR_NOTZERO(op)) {
     if (str==NULL) str = (*_mp_allocate_func)(neg + n + 1);
     str0 = str;