- Implemented tcl: prefix which allows to execute a command in Tcl directly
- Fixed a stack overrun bug in macro.c - Fixed a killing bug in devser.c - Added node writing with offset to nxscript.c - Wrote a simulation driver for second generation HM's - Readded devexec commands to SICS - Readded Hipadaba initialisation to SICS - Fixed a bug in sinqhttprot.c which is triggered when a reconnect happens during a node based download of data. SKIPPED: psi/sinqhttpprot.c
This commit is contained in:
8
macro.c
8
macro.c
@@ -136,10 +136,15 @@ static int SicsUnknownProc(ClientData pData, Tcl_Interp * pInter,
|
||||
/* get the datastructures */
|
||||
pSics = (struct __SicsUnknown *) pData;
|
||||
assert(pSics);
|
||||
|
||||
if(pSics->iStack >= MAXSTACK -1) {
|
||||
Tcl_SetResult(pInter,"ERROR: cyclic call or to deep a nesting of SICSUnknown",
|
||||
TCL_VOLATILE);
|
||||
return 0;
|
||||
}
|
||||
pSinter = pSics->pInter;
|
||||
pCon = pSics->pCon[pSics->iStack];
|
||||
lastCommand = pSics->lastUnknown[pSics->iStack];
|
||||
pCon->sicsError = 0;
|
||||
|
||||
assert(pSinter);
|
||||
assert(pCon);
|
||||
@@ -176,6 +181,7 @@ static int SicsUnknownProc(ClientData pData, Tcl_Interp * pInter,
|
||||
pSics->lastUnknown[pSics->iStack] = strdup(comBuffer);
|
||||
|
||||
/* invoke */
|
||||
pCon->sicsError = 0;
|
||||
iMacro = SCinMacro(pCon);
|
||||
SCsetMacro(pCon, 1);
|
||||
old = StatisticsBegin(pCommand->stat);
|
||||
|
||||
Reference in New Issue
Block a user