pike.git / src / interpret.h

version» Context lines:

pike.git/src/interpret.h: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: interpret.h,v 1.147 2003/12/09 15:39:45 grubba Exp $ + || $Id: interpret.h,v 1.148 2003/12/23 15:17:33 grubba Exp $   */      #ifndef INTERPRET_H   #define INTERPRET_H      #include "global.h"   #include "program.h"   #include "pike_error.h"   #include "bignum.h"   
pike.git/src/interpret.h:285:    struct svalue *_sp_ = Pike_sp++; \    debug_malloc_touch(_); \    _sp_->u.multiset=_; \    _sp_->type=PIKE_T_MULTISET; \    }while(0)      #define push_string(S) do { \    struct pike_string *_=(S); \    struct svalue *_sp_ = Pike_sp++; \    debug_malloc_touch(_); \ +  DO_IF_DEBUG(if(_->size_shift & ~3) { \ +  Pike_fatal("Pushing string with bad shift: %d\n", \ +  _->size_shift); \ +  }); \    _sp_->subtype=0; \    _sp_->u.string=_; \    _sp_->type=PIKE_T_STRING; \    }while(0)      #define push_type_value(S) do{ \    struct pike_type *_=(S); \    struct svalue *_sp_ = Pike_sp++; \    debug_malloc_touch(_); \    _sp_->u.type=_; \
pike.git/src/interpret.h:373:    struct multiset *_=(L); \    struct svalue *_sp_ = Pike_sp++; \    add_ref(_); \    _sp_->u.multiset=_; \    _sp_->type=PIKE_T_MULTISET; \    }while(0)      #define ref_push_string(S) do{ \    struct pike_string *_=(S); \    struct svalue *_sp_ = Pike_sp++; \ +  DO_IF_DEBUG(if(_->size_shift & ~3) { \ +  Pike_fatal("Pushing string with bad shift: %d\n", \ +  _->size_shift); \ +  }); \    add_ref(_); \    _sp_->subtype=0; \    _sp_->u.string=_; \    _sp_->type=PIKE_T_STRING; \    }while(0)      #define ref_push_type_value(S) do{ \    struct pike_type *_=(S); \    struct svalue *_sp_ = Pike_sp++; \    add_ref(_); \