| version 1.32, 2005/07/03 11:08:54 |
version 1.33, 2005/07/18 10:55:16 |
|
|
| /* $OpenXM: OpenXM/src/kan96xx/Kan/stackmachine.c,v 1.31 2005/06/16 05:07:23 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/stackmachine.c,v 1.32 2005/07/03 11:08:54 ohara Exp $ */ |
| /* stackmachin.c */ |
/* stackmachin.c */ |
| |
|
| #include <stdio.h> |
#include <stdio.h> |
| Line 89 int OXlockSaved = 0; |
|
| Line 89 int OXlockSaved = 0; |
|
| char *UD_str; |
char *UD_str; |
| int UD_attr; |
int UD_attr; |
| |
|
| |
char *MsgStackTrace = NULL; |
| |
char *MsgSourceTrace = NULL; |
| |
|
| struct object * newObject() |
struct object * newObject() |
| { |
{ |
| struct object *r; |
struct object *r; |
| Line 1111 errorStackmachine(str) |
|
| Line 1114 errorStackmachine(str) |
|
| extern int RestrictedMode, RestrictedMode_saved; |
extern int RestrictedMode, RestrictedMode_saved; |
| RestrictedMode = RestrictedMode_saved; |
RestrictedMode = RestrictedMode_saved; |
| cancelAlarm(); |
cancelAlarm(); |
| |
MsgStackTrace = NULL; |
| |
MsgSourceTrace = NULL; |
| if (ErrorMessageMode == 1 || ErrorMessageMode == 2) { |
if (ErrorMessageMode == 1 || ErrorMessageMode == 2) { |
| pushErrorStack(KnewErrorPacket(SerialCurrent,-1,str)); |
pushErrorStack(KnewErrorPacket(SerialCurrent,-1,str)); |
| } |
} |
| Line 1144 errorStackmachine(str) |
|
| Line 1149 errorStackmachine(str) |
|
| fprintf(stderr,str); |
fprintf(stderr,str); |
| } |
} |
| fprintf(stderr,"\n"); |
fprintf(stderr,"\n"); |
| (void) traceShowStack(); |
MsgStackTrace = traceShowStack(); |
| |
MsgSourceTrace = traceShowScannerBuf(); |
| } |
} |
| traceClearStack(); |
traceClearStack(); |
| if (GotoP) { |
if (GotoP) { |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to stackmachine.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Kan