From fc3a64912b0f9ab938ca2c09d68adb950c0b728f Mon Sep 17 00:00:00 2001
From: Henrik Wallin <hedda@lysator.liu.se>
Date: Tue, 26 Sep 2000 05:17:04 +0200
Subject: [PATCH] string * float now works better with widestrings.
Rev: src/operators.c:1.106
---
src/operators.c | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/src/operators.c b/src/operators.c
index 3e7f090368..e5588ae36c 100644
--- a/src/operators.c
+++ b/src/operators.c
@@ -6,7 +6,7 @@
/**/
#include "global.h"
#include <math.h>
-RCSID("$Id: operators.c,v 1.105 2000/09/26 02:49:11 hedda Exp $");
+RCSID("$Id: operators.c,v 1.106 2000/09/26 03:17:04 hedda Exp $");
#include "interpret.h"
#include "svalue.h"
#include "multiset.h"
@@ -1705,7 +1705,10 @@ PMOD_EXPORT void o_multiply(void)
MEMCPY(pos,sp[-2].u.string->str,len);
/* copy the last part of the string */
if (extra)
+ {
+ extra=extra << sp[-2].u.string->size_shift;
MEMCPY(pos,sp[-2].u.string->str,extra);
+ }
pop_n_elems(2);
push_string(low_end_shared_string(ret));
return;
--
GitLab