version 1.30, 2004/06/15 08:15:11 |
version 1.33, 2005/06/09 04:47:16 |
|
|
/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.29 2004/02/25 23:14:35 takayama Exp $ */ |
/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.32 2004/09/21 05:46:15 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include <setjmp.h> |
#include <setjmp.h> |
#include "datatype.h" |
#include "datatype.h" |
Line 103 int CmoDMSOutputOption = 0; /* Output with |
|
Line 103 int CmoDMSOutputOption = 0; /* Output with |
|
(1) RING_BY_NAME or (0) DMS_OF_N_VARIABLES. |
(1) RING_BY_NAME or (0) DMS_OF_N_VARIABLES. |
plugin/cmo.c */ |
plugin/cmo.c */ |
int SecureMode = 0; |
int SecureMode = 0; |
|
int RestrictedMode = 0; |
|
int RestrictedMode_saved = 0; |
int Ecart = 0; |
int Ecart = 0; |
int EcartAutomaticHomogenization = 0; |
int EcartAutomaticHomogenization = 0; |
int TraceLift = 0; |
int TraceLift = 0; |
Line 137 int Lookup[TYPES][TYPES]; |
|
Line 139 int Lookup[TYPES][TYPES]; |
|
int Quiet = 0; |
int Quiet = 0; |
int TimerOn = 0; |
int TimerOn = 0; |
|
|
char *VersionString = "3.040223"; |
char *VersionString = "3.040921"; |
|
|
char *LeftBracket = NULL; |
char *LeftBracket = NULL; |
char *RightBracket = NULL; |
char *RightBracket = NULL; |
Line 166 stackmachine_init() { |
|
Line 168 stackmachine_init() { |
|
/* initialize null object */ |
/* initialize null object */ |
NullObject.tag = 0; |
NullObject.tag = 0; |
NullObject.lc.op = NullObject.rc.op = (struct object *)NULL; |
NullObject.lc.op = NullObject.rc.op = (struct object *)NULL; |
|
NullObject.attr = (struct object *)NULL; |
/* findUserdictionary returns NoObject if it cannot find the key.*/ |
/* findUserdictionary returns NoObject if it cannot find the key.*/ |
NoObject.tag = -1; |
NoObject.tag = -1; |
NoObject.lc.op = NoObject.rc.op = (struct object *)NULL; |
NoObject.lc.op = NoObject.rc.op = (struct object *)NULL; |
|
NoObject.attr = (struct object *)NULL; |
/* Initalize lookup table */ |
/* Initalize lookup table */ |
for (i=0; i<TYPES; i++) { |
for (i=0; i<TYPES; i++) { |
for (j=0; j<TYPES; j++) |
for (j=0; j<TYPES; j++) |