Branch: Tag:

1997-08-03

1997-08-03 09:55:11 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more debug and better error messages

Rev: src/error.c:1.7
Rev: src/interpret.c:1.44
Rev: src/language.yacc:1.44
Rev: src/las.c:1.35
Rev: src/program.c:1.36

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: las.c,v 1.34 1997/05/22 23:27:32 hubbe Exp $"); + RCSID("$Id: las.c,v 1.35 1997/08/03 09:55:09 hubbe Exp $");      #include "language.h"   #include "interpret.h"
2038:    struct svalue *foo;      #ifdef DEBUG +  if(recoveries && sp-evaluator_stack < recoveries->sp) +  fatal("Stack error before dooptcode (underflow)\n"); + #endif +  + #ifdef DEBUG    if(a_flag > 1)    fprintf(stderr,"Doing function '%s' at %x\n",name->str,PC);   #endif
2084:    do_code_block(n);    }    + #ifdef DEBUG +  if(recoveries && sp-evaluator_stack < recoveries->sp) +  fatal("Stack error after do_code_block (underflow)\n"); + #endif +     ret=define_function(name,    type,    modifiers,