[BACK]Return to global.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Kan

Diff for /OpenXM/src/kan96xx/Kan/global.c between version 1.36 and 1.38

version 1.36, 2011/10/05 05:46:14 version 1.38, 2020/10/06 11:33:46
Line 1 
Line 1 
 /* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.35 2006/12/21 05:29:49 takayama Exp $ */  /* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.37 2015/09/29 01:52:14 takayama Exp $ */
 #include <stdio.h>  #include <stdio.h>
 #include <setjmp.h>  #include <setjmp.h>
 #include "datatype.h"  #include "datatype.h"
 #include "stackm.h"  #include "stackm.h"
 #include "lookup.h"  #include "lookup.h"
   
   void hashInitialize(struct dictionary *dic);  /* declared in extern.h */
   void initClassDataBase(void);
 /*-------- variables to define  a ring ----------------*/  /*-------- variables to define  a ring ----------------*/
 /*  /*
   The numbers L,M, LL,MM,NN are set in setUpRing() in setupring.c now.    The numbers L,M, LL,MM,NN are set in setUpRing() in setupring.c now.
Line 158  int VerboseK = 1;  /* 1 is standard */
Line 160  int VerboseK = 1;  /* 1 is standard */
 int DebugK   = 0;  int DebugK   = 0;
 FILE *Fk = NULL;  /* Initialized to stdout in stackmachine_init() */  FILE *Fk = NULL;  /* Initialized to stdout in stackmachine_init() */
   
 stackmachine_init() {  void stackmachine_init() {
   int i,j;    int i,j;
   extern FILE *BaseFp;    extern FILE *BaseFp;
   GC_init();    /* GC_init(); */
     GC_INIT();
   OxSystemVersion = VersionString;    OxSystemVersion = VersionString;
   Fstack = stdout;  /* initialize output stream */    Fstack = stdout;  /* initialize output stream */
   Fk = stdout;    Fk = stdout;
Line 188  stackmachine_init() {
Line 191  stackmachine_init() {
 }  }
   
   
 stackmachine_close() {  int stackmachine_close() {
   /* close output stream */    /* close output stream */
 }  }
   
   
   
 Kclose() {  void Kclose() {
   /* close Fk */    /* close Fk */
 }  }
   

Legend:
Removed from v.1.36  
changed lines
  Added in v.1.38

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>