Branch: Tag:

2003-04-27

2003-04-27 17:43:15 by Martin Stjernholm <mast@lysator.liu.se>

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 { \