From 6def218fc9625e14b063b6052785b41ee149e4b5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Mon, 9 Feb 1998 00:18:14 -0800
Subject: [PATCH] bugfix

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

diff --git a/src/svalue.c b/src/svalue.c
index 7fb2807df9..05f6101b2e 100644
--- a/src/svalue.c
+++ b/src/svalue.c
@@ -200,7 +200,7 @@ void free_svalues(struct svalue *s,INT32 num, INT32 type_hint)
   COMBINE(BIT_STRING, BIT_ARRAY, BIT_MAPPING, BIT_MULTISET, BIT_OBJECT, BIT_PROGRAM, BIT_FUNCTION);
     while(--num>=0)
     {
-      if(s->u.refs[0]--<=0)
+      if(--s->u.refs[0]<=0)
 	really_free_svalue(s);
       s++;
     }
@@ -209,7 +209,7 @@ void free_svalues(struct svalue *s,INT32 num, INT32 type_hint)
   case BIT_FUNCTION:
     while(--num>=0)
     {
-      if(s->u.refs[0]-- <= 0)
+      if(--s->u.refs[0] <= 0)
       {
 	if(s->subtype == FUNCTION_BUILTIN)
 	  really_free_callable(s->u.efun);
-- 
GitLab