changeset 11877:1c98f33055fa

(Fformat): Split double into two pointers, not two ints.
author Karl Heuer <kwzh@gnu.org>
date Mon, 22 May 1995 22:48:09 +0000
parents f371dc7252dc
children 86257fdd585c
files src/editfns.c
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/editfns.c	Mon May 22 22:28:55 1995 +0000
+++ b/src/editfns.c	Mon May 22 22:48:09 1995 +0000
@@ -1870,11 +1870,11 @@
 #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