From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 22 May 1995 22:48:09 +0000 (+0000)
Subject: (Fformat): Split double into two pointers, not two ints.
X-Git-Tag: emacs-19.34~3981
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8624670824c88f5f4fa2d0de9ea4fea4a945a08f;p=emacs.git

(Fformat): Split double into two pointers, not two ints.
---

diff --git a/src/editfns.c b/src/editfns.c
index 8640b89db53..d61b74422ec 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -1870,11 +1870,11 @@ Use %% to put a single % into the output.")
 #ifdef LISP_FLOAT_TYPE
 	else if (FLOATP (args[n]))
 	  {
-	    union { double d; int half[2]; } u;
+	    union { double d; char *half[2]; } u;
 
 	    u.d = XFLOAT (args[n])->data;
-	    strings[i++] = (unsigned char *) (EMACS_INT) u.half[0];
-	    strings[i++] = (unsigned char *) (EMACS_INT) u.half[1];
+	    strings[i++] = (unsigned char *) u.half[0];
+	    strings[i++] = (unsigned char *) u.half[1];
 	  }
 #endif
 	else