Branch: Tag:

2001-05-24

2001-05-24 22:39:01 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

bugfix for stack errors

Rev: src/interpret.c:1.200
Rev: src/interpret.h:1.85
Rev: src/interpret_functions.h:1.55
Rev: src/testsuite.in:1.416

5:   \*/   /**/   #include "global.h" - RCSID("$Id: interpret.c,v 1.199 2001/05/14 17:51:20 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.200 2001/05/24 22:39:00 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
939:    arg1=(void *)(Pike_sp-args-1);       case APPLY_SVALUE: +  case APPLY_SVALUE_STRICT:    apply_svalue:    {    struct svalue *s=(struct svalue *)arg1;
1362:       if(save_sp+1 > Pike_sp)    { -  if(type != APPLY_SVALUE) +  if(type != APPLY_SVALUE_STRICT)    push_int(0);    }else{    if(t_flag>1) trace_return_value();