pike.git/
src/
svalue.h
Branch:
Tag:
Non-build tags
All tags
No tags
1999-10-29
1999-10-29 00:09:05 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
1e3853f5a8cb64aa668cd24459203f2dd65ef5d0 (
7
lines) (+
4
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
more debug
Rev: src/mapping.c:1.43
Rev: src/svalue.c:1.54
Rev: src/svalue.h:1.35
5:
\*/ /*
-
* $Id: svalue.h,v 1.
34
1999/
08
/
06
22
:
58
:
49
hubbe Exp $
+
* $Id: svalue.h,v 1.
35
1999/
10
/
29
00
:
09
:
05
hubbe Exp $
*/ #ifndef SVALUE_H #define SVALUE_H
251:
#endif
-
#define free_svalue(X) do { struct svalue *_s=(X); check_type(_s->type); check_refs(_s); if(_s->type<=MAX_REF_TYPE) { debug_malloc_touch(_s->u.refs); if(--*(_s->u.refs) <=0) really_free_svalue(_s);
}
}while
(0)
-
#define free_short_svalue(X,T) do { union anything *_s=(X); TYPE_T _t=(T); check_type(_t); check_refs2(_s,_t); if(_t<=MAX_REF_TYPE && _s->refs) if(--*(_s->refs) <= 0) really_free_short_svalue(_s,_t); }while(0)
+
#define free_svalue(X) do { struct svalue *_s=(X); check_type(_s->type); check_refs(_s); if(_s->type<=MAX_REF_TYPE) { debug_malloc_touch(_s->u.refs); if(--*(_s->u.refs) <=0)
{
really_free_svalue(_s);
DO_IF_DMALLOC(_s->u.refs=0;)
}}}while
(0)
+
#define free_short_svalue(X,T) do { union anything *_s=(X); TYPE_T _t=(T); check_type(_t); check_refs2(_s,_t); if(_t<=MAX_REF_TYPE && _s->refs) if(--*(_s->refs) <= 0)
{
really_free_short_svalue(_s,_t);
DO_IF_DMALLOC(_s->refs=0;)}
}while(0)
#define add_ref_svalue(X) do { struct svalue *_tmp=(X); check_type(_tmp->type); check_refs(_tmp); if(_tmp->type <= MAX_REF_TYPE) { debug_malloc_touch(_tmp->u.refs); _tmp->u.refs[0]++; } }while(0) #define assign_svalue_no_free(X,Y) do { struct svalue _tmp, *_to=(X), *_from=(Y); check_type(_from->type); check_refs(_from); *_to=_tmp=*_from; if(_tmp.type <= MAX_REF_TYPE) { debug_malloc_touch(_tmp.u.refs); _tmp.u.refs[0]++; } }while(0) #define assign_svalue(X,Y) do { struct svalue *_to2=(X), *_from2=(Y); free_svalue(_to2); assign_svalue_no_free(_to2, _from2); }while(0)