OpenXM/src/k097/ki.c - diff

Return to ki.c CVS log

Up to [local] / OpenXM / src / k097

version 1.10, 2016/03/31 05:27:34

version 1.11, 2016/03/31 06:34:29

Line 1

/* $OpenXM: OpenXM/src/k097/ki.c,v 1.9 2015/10/10 11:29:46 takayama Exp $ */

/* $OpenXM: OpenXM/src/k097/ki.c,v 1.10 2016/03/31 05:27:34 takayama Exp $ */

/* ki.c ( kx interpreter ) */

#include <stdio.h>

Line 48 sendKan(int p) {

struct object obj = OINIT;

int result;

extern int InSendmsg2;

result=0;

mysignal(SIGINT,SIG_IGN); /* Don't jump to ctrlC(). */

if (p == 10) {printf("In(%d)= ",n++); return 0;}

if (p == 0 && DebugCompiler) printf("sendKan[%s]\n",Kbuff);