From ada9dc8b302f362b16fae23517aaf7585c96a399 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Thu, 7 Jun 2001 18:38:09 -0700
Subject: [PATCH] oops

Rev: src/array.c:1.109
---
 src/array.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/array.c b/src/array.c
index 09557006a4..9db25ad764 100644
--- a/src/array.c
+++ b/src/array.c
@@ -23,7 +23,7 @@
 #include "stuff.h"
 #include "bignum.h"
 
-RCSID("$Id: array.c,v 1.108 2001/06/07 21:45:26 hubbe Exp $");
+RCSID("$Id: array.c,v 1.109 2001/06/08 01:38:09 hubbe Exp $");
 
 PMOD_EXPORT struct array empty_array=
 {
@@ -527,7 +527,7 @@ PMOD_EXPORT struct array *slice_array(struct array *v, ptrdiff_t start,
       free_svalues(ITEM(v) + end, v->size - end, v->type_field);
       free_svalues(ITEM(v), start, v->type_field);
       v->item+=start;
-      v->malloced_size+=start;
+      v->malloced_size-=start;
       v->size=end-start;
 #ifdef PIKE_DEBUG
       if(d_flag>1)
-- 
GitLab