OpenXM/src/k097/k2.c - diff

Return to k2.c CVS log

Up to [local] / OpenXM / src / k097

version 1.3, 2001/01/08 05:26:48

version 1.6, 2015/10/10 11:29:46

Line 1

/* $OpenXM: OpenXM/src/k097/k2.c,v 1.2 2000/01/17 13:57:26 takayama Exp $ */

/* $OpenXM: OpenXM/src/k097/k2.c,v 1.5 2015/09/29 01:52:14 takayama Exp $ */

/* k2.c main program of k. */

#define DATE "1998,12/15"

#include <stdio.h>

#include <string.h>

#include <stdlib.h>

#include "datatype.h"

#include "stackm.h"

#include "extern.h"

Line 51 main(int argc,char *argv[]) {

Line 53 main(int argc,char *argv[]) {

}

#ifdef CALLASIR

GC_init();

GC_INIT(); /* GC_init(); */

KasirKanAsirInit();

#endif

KSstart(); /******** initialize ***********/

Line 72 main(int argc,char *argv[]) {

Line 74 main(int argc,char *argv[]) {

execFile("incmac.sm1");

execFile("slib.sm1");

printf("\n\nIn(1)=");

printf("\n\nIn(1)= ");

s = "startup.k";

if (Startupk2) {

strcpy(tname,s);