Branch: Tag:

2001-03-28

2001-03-28 15:07:41 by Henrik Grubbström (Grubba) <grubba@grubba.org>

tPrg is now an inner type-node.

Rev: src/builtin_functions.c:1.356
Rev: src/dynamic_load.c:1.52
Rev: src/encode.c:1.94
Rev: src/language.yacc:1.235
Rev: src/modules/Image/image_module.c:1.10
Rev: src/modules/PDF/pdf_module.c:1.8
Rev: src/modules/_Crypto/cbc.c:1.20
Rev: src/modules/_Crypto/crypto.c:1.44
Rev: src/modules/_Crypto/pipe.c:1.21
Rev: src/modules/files/stat.c:1.16
Rev: src/modules/spider/spider.c:1.104
Rev: src/operators.c:1.133
Rev: src/svalue.h:1.85

5:   \*/      /* -  * $Id: svalue.h,v 1.84 2001/03/28 10:02:44 hubbe Exp $ +  * $Id: svalue.h,v 1.85 2001/03/28 15:07:40 grubba Exp $    */   #ifndef SVALUE_H   #define SVALUE_H
141:   #define MagictFunc(RET,ARGS) tFuncV(ARGS "", tVoid, RET)   #define tFunction tFuncV("" ,tOr(tZero,tVoid),tOr(tMix,tVoid))   #define tNone "" - #define tPrg "\005" - #define tProgram "\005" + #define tPrg(X) "\005" X + #define tProgram(X) "\005" X   #define tStr "\006"   #define tString "\006"   #define tType(T) "\007" T
180:   #define tOr9(A,B,C,D,E,F,G,H,I) tOr(A,tOr8(B,C,D,E,F,G,H,I))   #define tMix "\373"   #define tMixed "\373" - #define tComplex tOr6(tArray,tMapping,tMultiset,tObj,tFunction,tProgram) - #define tStringIndicable tOr5(tMapping,tObj,tFunction,tProgram,tMultiset) + #define tComplex tOr6(tArray,tMapping,tMultiset,tObj,tFunction,tPrg(tObj)) + #define tStringIndicable tOr5(tMapping,tObj,tFunction,tPrg(tObj),tMultiset)   #define tRef tOr(tString,tComplex)   #define tIfnot(X,Y) tAnd(tNot(X),Y)   #define tAny tOr(tVoid,tMix)