From d7889764961d8de3eac9063dea538411668f49ba Mon Sep 17 00:00:00 2001
From: Richard Stallman <rms@gnu.org>
Date: Wed, 31 Mar 1993 07:02:59 +0000
Subject: [PATCH] (convert_to_real): Pass mode arg to REAL_VALUE_ATOF.

From-SVN: r3947
---
 gcc/convert.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/convert.c b/gcc/convert.c
index a063a6e88e1..62bcaf2b3f2 100644
--- a/gcc/convert.c
+++ b/gcc/convert.c
@@ -100,7 +100,7 @@ convert_to_real (type, expr)
   {
     register tree tem = make_node (REAL_CST);
     TREE_TYPE (tem) = type;
-    TREE_REAL_CST (tem) = REAL_VALUE_ATOF ("0.0");
+    TREE_REAL_CST (tem) = REAL_VALUE_ATOF ("0.0", TYPE_MODE (type));
     return tem;
   }
 }
-- 
2.30.2