===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/stackm.h,v
retrieving revision 1.7
retrieving revision 1.11
diff -u -p -r1.7 -r1.11
--- OpenXM/src/kan96xx/Kan/stackm.h	2004/09/16 23:53:44	1.7
+++ OpenXM/src/kan96xx/Kan/stackm.h	2005/06/16 05:07:23	1.11
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/stackm.h,v 1.6 2004/09/12 00:26:21 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/stackm.h,v 1.10 2005/06/15 02:22:51 takayama Exp $ */
 #define LOAD_SM1_PATH "/usr/local/lib/sm1/"
 /* Do not forget to put / at the tail.
    "/usr/local/lib/sm1" does not work.
@@ -35,8 +35,9 @@
 #define SrationalFunction 16
 #define Sclass          17   /* class, for extension */
 #define Sdouble         18
+#define SbyteArray      19
 
-#define TYPES            19   /* number of data types. */
+#define TYPES            20   /* number of data types. */
 /* NOTE! If you change the above, you need to change mklookup.c too. */
 /* Change also dr.sm1 : datatype constants. */
 
@@ -62,13 +63,18 @@ union cell {
   struct coeff *universalNumber;
   void *voidp;
   double *dbl;
+  unsigned char *bytes;
 };
 
 struct object{
   int tag;                /* class identifier */
   union cell lc;          /* left cell */
   union cell rc;          /* right cell */
+  struct object *attr;    /* Attribute list. See misc-2005/06/gfan/test1.sm1
+                             as to performance test. */
 };
+
+#define OINIT  { .attr = NULL}
 
 struct dictionary {
   char *key;