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.
135
2004/10/
22
23
:
44
:
49
nilsson
Exp $
+
|| $Id: error.c,v 1.
136
2004/10/
30
11
:
41
:
08
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"
pike.git/src/error.c:729:
/*! @decl void create(string message) */ static void f_error_create(INT32 args) { struct pike_string *msg; get_all_args("create", args, "%W", &msg); do_free_string(GENERIC_ERROR_THIS->error_message); copy_shared_string(GENERIC_ERROR_THIS->error_message, msg); f_backtrace(0);
-
push_int (
0
);
-
push
_
int
(
Pike
_
sp[-2].u.array->size-2);
-
o
_
range (
);
+
push_int (
1
);
+
o
_
range2
(
RANGE
_
LOW
_
OPEN|RANGE_HIGH_FROM_END
);
assign_to_short_svalue ((union anything *)&GENERIC_ERROR_THIS->error_backtrace, PIKE_T_ARRAY, Pike_sp-1); pop_n_elems(args+1); } /*! @endclass */ /*! @endmodule */