From 6bfd5083bbda841256d11ada370b9acff6d72642 Mon Sep 17 00:00:00 2001
From: rth <rth@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Mon, 2 Aug 1999 23:23:45 +0000
Subject: Jakub Jelinek  <jj@ultra.linux.cz>

        * real.c (PUT_REAL): Clear unused bytes if long double is IEEE quad.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@28422 138bc75d-0d04-0410-961f-82ee72b054a4
---
 gcc/real.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'gcc/real.c')

diff --git a/gcc/real.c b/gcc/real.c
index 2d615757af1..a077213309c 100644
--- a/gcc/real.c
+++ b/gcc/real.c
@@ -260,7 +260,12 @@ do {						\
 #define MAXDECEXP 4932
 #define MINDECEXP -4977
 #define GET_REAL(r,e) bcopy ((char *) r, (char *) e, 2*NE)
-#define PUT_REAL(e,r) bcopy ((char *) e, (char *) r, 2*NE)
+#define PUT_REAL(e,r)				\
+do {						\
+  if (2*NE < sizeof(*r))			\
+    bzero((char *)r, sizeof(*r));		\
+  bcopy ((char *) e, (char *) r, 2*NE);		\
+} while (0)
 #else
 #define NE 6
 #define MAXDECEXP 4932
-- 
cgit v1.2.1