version 1.36, 2011/10/05 05:46:14 |
version 1.37, 2015/09/29 01:52:14 |
|
|
/* 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.36 2011/10/05 05:46:14 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include <setjmp.h> |
#include <setjmp.h> |
#include "datatype.h" |
#include "datatype.h" |
Line 161 FILE *Fk = NULL; /* Initialized to stdout in stackmac |
|
Line 161 FILE *Fk = NULL; /* Initialized to stdout in stackmac |
|
stackmachine_init() { |
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; |