* real.c (real_sqrt): Use get_canonical_qnan directly.

From-SVN: r71919

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 39b35a4..1730a5f 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,7 @@
 2003-09-29  Zack Weinberg  <zack@codesourcery.com>
 
+       * real.c (real_sqrt): Use get_canonical_qnan directly.
+
        * dwarf2out.c (add_const_value_attribute): Use real_to_target.
 
        * varasm.c (assemble_real): Use real_to_target directly,

diff --git a/gcc/real.c b/gcc/real.c
index 827ac9d..ea3d085 100644 (file)
--- a/gcc/real.c
+++ b/gcc/real.c
@@ -4459,8 +4459,7 @@ real_sqrt (REAL_VALUE_TYPE *r, enum machine_mode mode,
   /* Negative arguments return NaN.  */
   if (real_isneg (x))
     {
-      /* Mode is ignored for canonical NaN.  */
-      real_nan (r, "", 1, SFmode);
+      get_canonical_qnan (r, 0);
       return false;
     }