From bf2716f60a5b9f5112761ab83e882a2585c76c40 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Wed, 29 Jul 1998 15:59:10 -0700
Subject: [PATCH] bugfix for %8F

Rev: src/modules/sprintf/sprintf.c:1.24
---
 src/modules/sprintf/sprintf.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/modules/sprintf/sprintf.c b/src/modules/sprintf/sprintf.c
index 702a39e61f..33e09ec097 100644
--- a/src/modules/sprintf/sprintf.c
+++ b/src/modules/sprintf/sprintf.c
@@ -96,7 +96,7 @@
 */
 
 #include "global.h"
-RCSID("$Id: sprintf.c,v 1.23 1998/07/26 10:26:50 hubbe Exp $");
+RCSID("$Id: sprintf.c,v 1.24 1998/07/29 22:59:10 hubbe Exp $");
 #include "error.h"
 #include "array.h"
 #include "svalue.h"
@@ -958,7 +958,8 @@ static string low_pike_sprintf(char *format,
 	  break;
 	case 8:
 #ifdef DOUBLE_IS_IEEE_BIG
-	  MEMCPY(fsp->b, &tf, 8);
+	  td = (double)tf;
+	  MEMCPY(fsp->b, &td, 8);
 #else
 #ifdef DOUBLE_IS_IEEE_LITTLE
 	  td = (double)tf;
-- 
GitLab