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.114 2003/08/20 11:53:58 grubba Exp $ + || $Id: error.c,v 1.115 2003/09/08 20:05:20 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.114 2003/08/20 11:53:58 grubba Exp $"); + RCSID("$Id: error.c,v 1.115 2003/09/08 20:05:20 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:826:    }else {    bad_arg_error (name, Pike_sp-args, args, expected, NULL, NULL,    "Too many arguments to %s(). Expected at most %d.\n",    name, expected);    }   }      #ifdef PIKE_DEBUG   static void gc_check_throw_value(struct callback *foo, void *bar, void *gazonk)   { -  debug_gc_xmark_svalues(&throw_value,1," in the throw value"); +  gc_mark_external_svalues(&throw_value,1," in the throw value");   }   #endif      void init_error(void)   {   #define ERR_SETUP   #include "errors.h"      #ifdef PIKE_DEBUG    dmalloc_accept_leak(add_gc_callback(gc_check_throw_value,0,0));   #endif   }      void cleanup_error(void)   {   #define ERR_CLEANUP   #include "errors.h"   }   #endif