pike.git / src / error.c

version» Context lines:

pike.git/src/error.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: error.c,v 1.110 2003/07/21 23:35:27 mast Exp $ + || $Id: error.c,v 1.111 2003/07/30 16:30:55 mast Exp $   */      #define NO_PIKE_SHORTHAND   #include "global.h"   #include "svalue.h"   #include "pike_macros.h"   #include "pike_error.h"   #include "interpret.h"   #include "stralloc.h"   #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"   #include "gc.h"    - RCSID("$Id: error.c,v 1.110 2003/07/21 23:35:27 mast Exp $"); + RCSID("$Id: error.c,v 1.111 2003/07/30 16:30:55 mast Exp $");      #undef ATTRIBUTE   #define ATTRIBUTE(X)      PMOD_EXPORT const char msg_fatal_error[] =    "%s:%d: Fatal error:\n";   #ifdef PIKE_DEBUG   PMOD_EXPORT const char msg_unsetjmp_nosync_1[] =    "UNSETJMP out of sync! (last SETJMP at %s)!\n";   PMOD_EXPORT const char msg_unsetjmp_nosync_2[] =
pike.git/src/error.c:250:    in_error=0;    Pike_fatal("Recursive error() calls, original error: %s",tmp);    }       in_error=text;       if(!Pike_interpreter.recoveries)    {   #ifdef PIKE_DEBUG    if (d_flag) { -  fprintf(stderr,"No error recovery context!\n%s():%s",name,text); +  fprintf(stderr,"No error recovery context!\n%s():%s",name || "<unknown>",text);    dump_backlog();    }   #endif    -  fprintf(stderr,"No error recovery context!\n%s():%s",name,text); +  fprintf(stderr,"No error recovery context!\n%s():%s",name || "<unknown>",text);    if(file)    fprintf(stderr,"at %s:%d\n",file,line);    exit(99);    }       push_text(text);       f_backtrace(0);       if (file) {    push_text(file);    push_int(line);    } else {    push_int(0);    push_int(0);    } -  +  +  if (name)    push_text(name); -  +  else +  push_int(0);       for (i=-args; i; i++) {    push_svalue(oldsp + i);    }       f_aggregate(args + 3);    f_aggregate(1);       f_add(2);