From 9f0d2e738e8d06537515d371552e62bfe2a97613 Mon Sep 17 00:00:00 2001 From: Henrik Wallin <hedda@lysator.liu.se> Date: Tue, 26 Sep 2000 04:42:41 +0200 Subject: [PATCH] tOr9 added Rev: src/svalue.h:1.69 --- src/svalue.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/svalue.h b/src/svalue.h index b3de5fdf74..6021e58f77 100644 --- a/src/svalue.h +++ b/src/svalue.h @@ -5,7 +5,7 @@ \*/ /* - * $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,6 +168,7 @@ struct svalue #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) -- GitLab