version 1.38, 2005/07/03 11:08:53 |
version 1.39, 2005/07/18 10:55:16 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/Kan/ext.c,v 1.37 2005/06/16 06:21:21 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 <string.h> |
#include <sys/types.h> |
#include <sys/types.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 471 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{ |