pike.git/
src/
error.c
Branch:
Tag:
Non-build tags
All tags
No tags
2004-10-30
2004-10-30 11:41:08 by Martin Stjernholm <mast@lysator.liu.se>
387b64a1c58fda509f6a305789fe8f07e74adabb (
8
lines) (+
4
/-
4
)
[
Show
|
Annotate
]
Branch:
387b64a1c58fda509f6a305789fe8f07e74adabb
Minor cleanup using new o_range2.
Rev: src/error.c:1.136
2:
|| 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
736:
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);