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

Return to global.c CVS log

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

version 1.26, 2003/08/21 12:30:15

version 1.30, 2004/06/15 08:15:11

Line 1

/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.25 2003/08/20 01:39:17 takayama Exp $ */

/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.29 2004/02/25 23:14:35 takayama Exp $ */

#include <stdio.h>

#include <setjmp.h>

#include "datatype.h"

Line 108 int EcartAutomaticHomogenization = 0;

int TraceLift = 0;

struct ring *TraceLift_ringmod = NULL;

int DoCancel = 0;

int QuoteMode = 0;

/* global variables for stackmachine.c */

int VerboseStack = 1; /* 0 is quiet, 1 is standard, 2 ... */

Line 128 jmp_buf EnvOfStackMachine;

Line 129 jmp_buf EnvOfStackMachine;

#endif

#if defined(__CYGWIN__)

int errno;

#endif

struct object NullObject;

struct object NoObject;

Line 140 int Lookup[TYPES][TYPES];

Line 137 int Lookup[TYPES][TYPES];

int Quiet = 0;

int TimerOn = 0;

char *VersionString = "3.030821";

char *VersionString = "3.040223";

char *LeftBracket = NULL;

char *RightBracket = NULL;

Line 160 FILE *Fk = NULL; /* Initialized to stdout in stackmac

Line 157 FILE *Fk = NULL; /* Initialized to stdout in stackmac

stackmachine_init() {

int i,j;

extern FILE *BaseFp;

GC_init();

OxSystemVersion = VersionString;

Fstack = stdout; /* initialize output stream */

Fk = stdout;