===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/global.c,v
retrieving revision 1.31
retrieving revision 1.35
diff -u -p -r1.31 -r1.35
--- OpenXM/src/kan96xx/Kan/global.c	2004/09/17 02:42:57	1.31
+++ OpenXM/src/kan96xx/Kan/global.c	2006/12/21 05:29:49	1.35
@@ -1,4 +1,4 @@
-/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.30 2004/06/15 08:15:11 takayama Exp $ */
+/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.34 2005/06/15 02:22:50 takayama Exp $ */
 #include <stdio.h>
 #include <setjmp.h>
 #include "datatype.h"
@@ -111,6 +111,7 @@ int TraceLift = 0;
 struct ring *TraceLift_ringmod = NULL;
 int DoCancel = 0;
 int QuoteMode = 0;
+int UseDsmall = 0;
 
 /* global variables for stackmachine.c  */
 int VerboseStack = 1;     /* 0 is quiet, 1 is standard, 2 ... */
@@ -139,7 +140,7 @@ int Lookup[TYPES][TYPES];
 int Quiet = 0;
 int TimerOn = 0;
 
-char *VersionString = "3.040223";
+char *VersionString = "3.050615";
 
 char *LeftBracket = NULL;
 char *RightBracket = NULL;
@@ -168,9 +169,11 @@ stackmachine_init() {
   /* initialize null object */
   NullObject.tag = 0;
   NullObject.lc.op = NullObject.rc.op = (struct object *)NULL;
+  NullObject.attr = (struct object *)NULL;
   /* findUserdictionary returns NoObject if it cannot find the key.*/
   NoObject.tag = -1;
   NoObject.lc.op = NoObject.rc.op = (struct object *)NULL;
+  NoObject.attr = (struct object *)NULL;
   /* Initalize lookup table */
   for (i=0; i<TYPES; i++) {
     for (j=0; j<TYPES; j++)