pike.git/
src/
interpret.h
Branch:
Tag:
Non-build tags
All tags
No tags
2003-04-27
2003-04-27 17:43:15 by Martin Stjernholm <mast@lysator.liu.se>
b0d33fd824e7cdc2d4d4c3c2937bdc289840e92e (
11
lines) (+
10
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Added stack_pop_2_elems_keep_top macro.
Rev: src/interpret.h:1.141
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: interpret.h,v 1.
140
2003/04/27
15
:
30
:
06
mast Exp $
+
|| $Id: interpret.h,v 1.
141
2003/04/27
17
:
43
:
15
mast Exp $
*/ #ifndef INTERPRET_H
225:
debug_check_stack(); \ } while (0)
+
#define stack_pop_2_elems_keep_top() do { \
+
struct svalue *_sp_ = Pike_sp = Pike_sp - 2; \
+
free_svalue (_sp_ - 1); \
+
free_svalue (_sp_); \
+
move_svalue (_sp_ - 1, _sp_ + 1); \
+
debug_check_stack(); \
+
} while (0)
+
#define stack_pop_to_no_free(X) move_svalue(X, --Pike_sp) #define stack_pop_to(X) do { \