fixed bug found by Rob (sisyphus1@optusnet.com.au)

git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@53 211d60ee-9f03-0410-a15a-8952a2c7a4e4

1 files changed, 3 insertions, 0 deletions

diff --git a/out_str.c b/out_str.c
index 35f1dfc..ab56b94 100644
--- a/out_str.c
+++ b/out_str.c
@@ -30,6 +30,9 @@ mpc_out_str (FILE *stream, int base, size_t n, mpc_srcptr op, mpc_rnd_t rnd)
 {
   size_t size;
 
+  if (stream == NULL)
+    stream = stdout; /* fprintf does not allow NULL as first argument */
+
   size = mpfr_out_str (stream, base, n, MPC_RE(op), MPC_RND_RE(rnd));
   size += fprintf (stream, "+I*");
   size += mpfr_out_str (stream, base, n, MPC_IM(op), MPC_RND_IM(rnd));