| version 1.37, 2005/06/16 06:21:21 |
version 1.39, 2005/07/18 10:55:16 |
|
|
| /* $OpenXM: OpenXM/src/kan96xx/Kan/ext.c,v 1.36 2005/06/16 05:07:23 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/ext.c,v 1.38 2005/07/03 11:08:53 ohara Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| |
#include <string.h> |
| #include <sys/types.h> |
#include <sys/types.h> |
| #include <sys/stat.h> |
#include <sys/stat.h> |
| #include <fcntl.h> |
#include <fcntl.h> |
|
|
| |
|
| extern int Quiet; |
extern int Quiet; |
| extern char **environ; |
extern char **environ; |
| |
extern char *MsgSourceTrace; |
| |
|
| #define MYCP_SIZE 100 |
#define MYCP_SIZE 100 |
| static int Mychildren[MYCP_SIZE]; |
static int Mychildren[MYCP_SIZE]; |
| Line 470 struct object Kextension(struct object obj) |
|
| Line 472 struct object Kextension(struct object obj) |
|
| }else if (strcmp(key,"traceShowStack")==0) { |
}else if (strcmp(key,"traceShowStack")==0) { |
| char *ssst; |
char *ssst; |
| ssst = traceShowStack(); |
ssst = traceShowStack(); |
| |
if (ssst != NULL) { |
| |
rob = KpoString(ssst); |
| |
}else{ |
| |
rob = NullObject; |
| |
} |
| |
}else if (strcmp(key,"traceShowScannerBuf")==0) { |
| |
char *ssst; |
| |
ssst = MsgSourceTrace; |
| if (ssst != NULL) { |
if (ssst != NULL) { |
| rob = KpoString(ssst); |
rob = KpoString(ssst); |
| }else{ |
}else{ |