pike.git / src / error.c

version» Context lines:

pike.git/src/error.c:12:   #include "builtin_functions.h"   #include "array.h"   #include "object.h"   #include "main.h"   #include "builtin_functions.h"   #include "backend.h"   #include "operators.h"   #include "module_support.h"   #include "threads.h"    - RCSID("$Id: error.c,v 1.36 1999/07/27 21:40:43 grubba Exp $"); + RCSID("$Id: error.c,v 1.37 1999/08/25 05:06:33 hubbe Exp $");      #undef ATTRIBUTE   #define ATTRIBUTE(X)      JMP_BUF *recoveries=0;      #ifdef PIKE_DEBUG   void check_recovery_context(void)   {    char foo;
pike.git/src/error.c:211:    free_svalue(& throw_value);    throw_value = *--sp;    throw_severity=THROW_ERROR;       in_error=0;    pike_throw(); /* Hope someone is catching, or we will be out of balls. */   }      void exit_on_error(void *msg)   { +  fprintf(stderr,"%s\n",(char *)msg);   #ifdef PIKE_DEBUG    dump_backlog();   #endif    fprintf(stderr,"%s\n",(char *)msg); -  + #ifdef PIKE_DEBUG +  { +  char *s; +  fprintf(stderr,"Attempting to dump raw error: (may fail)\n"); +  init_buf(); +  describe_svalue(&throw_value,0,0); +  s=simple_free_buf(); +  fprintf(stderr,"%s\n",s); +  free(s); +  } + #endif    exit(1);   }      void fatal_on_error(void *msg)   {   #ifdef PIKE_DEBUG    dump_backlog();   #endif    fprintf(stderr,"%s\n",(char *)msg);    abort();