Branch: Tag:

1997-04-10

1997-04-10 23:13:48 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

-d3 now works as intended

Rev: src/interpret.c:1.41

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: interpret.c,v 1.40 1997/04/10 23:07:22 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.41 1997/04/10 23:13:48 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
1255:    check_stack(256);    check_mark_stack(256);    + #ifdef DEBUG +  if(d_flag>2) do_debug(); + #endif +     p=o->prog;    if(!p)    error("Cannot call functions in destructed objects.\n");
1337:       if(function->flags & IDENTIFIER_C_FUNCTION)    { - #ifdef DEBUG -  if(d_flag) check_threads_etc(); - #endif +     fp->num_args=args;    new_frame.num_locals=args;    (*function->func.c_fun)(args);