diff --git a/src/svalue.h b/src/svalue.h
index b3de5fdf7484701a3641bbd5702ef3ff435df815..6021e58f7726d7701f42d5abebdd0bf20ecaac7a 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)