OpenXM/src/kan96xx/Kan/global.c - diff

Return to global.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.32, 2004/09/21 05:46:15

version 1.35, 2006/12/21 05:29:49

Line 1

/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.31 2004/09/17 02:42:57 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"

Line 111 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 ... */

Line 139 int Lookup[TYPES][TYPES];

Line 140 int Lookup[TYPES][TYPES];

int Quiet = 0;

int TimerOn = 0;

char *VersionString = "3.040921";

char *VersionString = "3.050615";

char *LeftBracket = NULL;

char *RightBracket = NULL;

Line 168 stackmachine_init() {

Line 169 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++)