From 8d700034177c9f85415945f40f07cc505ae166ad Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Sat, 6 May 2000 15:31:28 -0700
Subject: [PATCH] bugfix for POP_PIKE_FRAME

Rev: src/interpret.h:1.41
---
 src/interpret.h | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/interpret.h b/src/interpret.h
index d943d86367..90ebef1499 100644
--- a/src/interpret.h
+++ b/src/interpret.h
@@ -5,7 +5,7 @@
 \*/
 
 /*
- * $Id: interpret.h,v 1.40 2000/04/08 02:01:08 hubbe Exp $
+ * $Id: interpret.h,v 1.41 2000/05/06 22:31:28 hubbe Exp $
  */
 #ifndef INTERPRET_H
 #define INTERPRET_H
@@ -113,7 +113,7 @@ struct pike_frame
   {									\
     really_free_pike_frame(Pike_fp);						\
   }else{								\
-    DO_IF_DEBUG(if( Pike_fp->locals+Pike_fp->num_locals>Pike_sp) fatal("Stack failure in POP_PIKE_FRAME!\n"));                                                      \
+    DO_IF_DEBUG(if( Pike_fp->locals>Pike_sp || Pike_sp < Pike_fp->expendible) fatal("Stack failure in POP_PIKE_FRAME!\n"));                      \
     debug_malloc_touch(Pike_fp); \
     if(Pike_fp->num_locals)							\
     {									\
-- 
GitLab