From: Zack Weinberg <zack@codesourcery.com>
Date: Mon, 29 Sep 2003 21:59:58 +0000 (+0000)
Subject: * real.c (real_sqrt): Use get_canonical_qnan directly.
X-Git-Tag: releases/gcc-3.4.0~3402
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=bc800bb24754583687623be67c348523ca78731a;p=thirdparty%2Fgcc.git

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

From-SVN: r71919
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 39b35a4b0571..1730a5f6f1ea 100644
--- 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 827ac9dd4499..ea3d085afcf6 100644
--- 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;
     }