pike.git
/
src
/
error.c
version
»
Context lines:
10
20
40
80
file
none
3
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.
113
2003/08/
04
16
:
14
:
21
mast
Exp $
+
|| $Id: error.c,v 1.
114
2003/08/
20
11
:
53
:
58
grubba
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.
113
2003/08/
04
16
:
14
:
21
mast
Exp $");
+
RCSID("$Id: error.c,v 1.
114
2003/08/
20
11
:
53
:
58
grubba
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:560:
ref_push_array(GENERIC_ERROR_THIS->backtrace); else push_int(0); } /*! @decl string _sprintf() */ static void f_error__sprintf(INT32 args) { struct program *p = Pike_fp->current_object->prog;
+
/* FIXME: What about obscure overloadings? */
int i = find_identifier("error_type", p); struct identifier *id = ID_FROM_INT(p, i); int mode = 0; if(args>0 && Pike_sp[-args].type == PIKE_T_INT) mode = Pike_sp[-args].u.integer; pop_n_elems(args); if(mode != 'O') { push_undefined(); return; }