pike.git/
src/
svalue.h
Branch:
Tag:
Non-build tags
All tags
No tags
2000-04-17
2000-04-17 19:25:31 by Martin Stjernholm <mast@lysator.liu.se>
0d3fd40194fd3df2cceed242e5d8e694631ce2de (
7
lines) (+
4
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Fixed a typo in check_refs macros.
Rev: src/svalue.h:1.52
5:
\*/ /*
-
* $Id: svalue.h,v 1.
51
2000/04/
15
05
:
05
:
28
hubbe
Exp $
+
* $Id: svalue.h,v 1.
52
2000/04/
17
19
:
25
:
31
mast
Exp $
*/ #ifndef SVALUE_H #define SVALUE_H
254:
#define check_type(T) if(T > MAX_TYPE && T!=T_LVALUE && T!=T_SHORT_LVALUE && T!=T_VOID && T!=T_DELETED && T!=T_ARRAY_LVALUE) fatal("Type error: %d\n",T) #define check_refs(S) do {\
-
if((S)->type < MAX_REF_TYPE && (!(S)->u.refs || (S)->u.refs[0] < 0)) { \
+
if((S)->type <
=
MAX_REF_TYPE && (!(S)->u.refs || (S)->u.refs[0] < 0)) { \
describe((S)->u.refs); \ fatal("Svalue to object without references.\n"); \ } }while(0) #define check_refs2(S,T) do { \
-
if((T) < MAX_REF_TYPE && (S)->refs && (S)->refs[0] <= 0) {\
+
if((T) <
=
MAX_REF_TYPE && (S)->refs && (S)->refs[0] <= 0) {\
describe((S)->refs); \ fatal("(short) Svalue to object without references.\n"); \ } }while(0)