=================================================================== RCS file: /home/cvs/OpenXM/src/k097/ki.c,v retrieving revision 1.11 retrieving revision 1.12 diff -u -p -r1.11 -r1.12 --- OpenXM/src/k097/ki.c 2016/03/31 06:34:29 1.11 +++ OpenXM/src/k097/ki.c 2020/10/07 23:53:25 1.12 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/k097/ki.c,v 1.10 2016/03/31 05:27:34 takayama Exp $ */ +/* $OpenXM: OpenXM/src/k097/ki.c,v 1.11 2016/03/31 06:34:29 takayama Exp $ */ /* ki.c ( kx interpreter ) */ #include @@ -15,6 +15,8 @@ #include #include "mysig.h" +#include "ki.h" + char *getLOAD_K_PATH(); /* from d.h */ #if defined(__CYGWIN__) @@ -42,7 +44,7 @@ int K00_verbose = 0; extern int DebugMode; -sendKan(int p) { +int sendKan(int p) { static int n = 2; extern int Interactive; struct object obj = OINIT; @@ -131,7 +133,7 @@ void *mymalloc(int n) return((void *)GC_malloc(n)); } -execFile(char *s) +int execFile(char *s) { FILE *fp; #define TMP_SIZE 1024