Branch: Tag:

2000-09-26

2000-09-26 02:42:41 by Henrik Wallin <hedda@lysator.liu.se>

tOr9 added

Rev: src/svalue.h:1.69

5:   \*/      /* -  * $Id: svalue.h,v 1.68 2000/09/03 22:02:31 mast Exp $ +  * $Id: svalue.h,v 1.69 2000/09/26 02:42:41 hedda Exp $    */   #ifndef SVALUE_H   #define SVALUE_H
168:   #define tOr6(X,Y,Z,A,B,C) tOr(X,tOr(Y,tOr(Z,tOr(A,tOr(B,C)))))   #define tOr7(X,Y,Z,A,B,C,D) tOr(X,tOr(Y,tOr(Z,tOr(A,tOr(B,tOr(C,D))))))   #define tOr8(A,B,C,D,E,F,G,H) tOr(A,tOr7(B,C,D,E,F,G,H)) + #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)