pike.git/
src/
interpret.h
Branch:
Tag:
Non-build tags
All tags
No tags
2003-12-23
2003-12-23 15:17:33 by Henrik Grubbström (Grubba) <grubba@grubba.org>
171445ec94090f0624b554ac59e0d5f0d59ba30a (
11
lines) (+
10
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Added some PIKE_DEBUG paranoia to {ref_,}push_string().
Rev: src/interpret.h:1.148
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.
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
292:
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; \
380:
#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=_; \