make shutdown more proper (releasing all memory)
This commit is contained in:
11
macro.c
11
macro.c
@@ -167,9 +167,9 @@
|
||||
{
|
||||
if(strcmp(lastCommand,comBuffer) == 0)
|
||||
{
|
||||
Tcl_AppendResult(pInter,"ERROR: Never ending loop in unknown\n",
|
||||
Tcl_AppendResult(pInter,"ERROR: Never ending loop in unknown\n",
|
||||
"Offending command: ",comBuffer,
|
||||
"Probably Tcl command not found",NULL);
|
||||
" Probably Tcl command not found",NULL);
|
||||
SCSetInterrupt(pCon,eAbortBatch);
|
||||
return TCL_ERROR;
|
||||
}
|
||||
@@ -218,6 +218,13 @@
|
||||
free(pData);
|
||||
pUnbekannt = NULL;
|
||||
}
|
||||
/*-----------------------------------------------------------------------*/
|
||||
void KillSicsUnknown(void) {
|
||||
if (pUnbekannt) {
|
||||
UnknownKill(pUnbekannt);
|
||||
pUnbekannt = NULL;
|
||||
}
|
||||
}
|
||||
/*------------------------------------------------------------------------
|
||||
Implementation of a protected exec command
|
||||
--------------------------------------------------------------------------*/
|
||||
|
||||
Reference in New Issue
Block a user