| version 1.6, 2003/12/05 14:02:23 |
version 1.7, 2005/06/16 05:07:24 |
|
|
| /* $OpenXM: OpenXM/src/k097/ki.c,v 1.5 2003/08/22 16:08:20 ohara Exp $ */ |
/* $OpenXM: OpenXM/src/k097/ki.c,v 1.6 2003/12/05 14:02:23 takayama Exp $ */ |
| /* ki.c ( kx interpreter ) */ |
/* ki.c ( kx interpreter ) */ |
| |
|
| #include <stdio.h> |
#include <stdio.h> |
| Line 42 extern int DebugMode; |
|
| Line 42 extern int DebugMode; |
|
| sendKan(int p) { |
sendKan(int p) { |
| static int n = 2; |
static int n = 2; |
| extern int Interactive; |
extern int Interactive; |
| struct object obj; |
struct object obj = OINIT; |
| int result; |
int result; |
| extern int InSendmsg2; |
extern int InSendmsg2; |
| signal(SIGINT,SIG_IGN); /* Don't jump to ctrlC(). */ |
signal(SIGINT,SIG_IGN); /* Don't jump to ctrlC(). */ |