@@ -477,7 +477,7 @@ static void execute_init_method(Script *pdest, int iscopy, int localclear)
477477 pdest -> pinterpreter -> pCurrentInstruction = pdest -> pinterpreter -> pInitEntry ;
478478 if (FAILED ( Interpreter_EvaluateCall (pdest -> pinterpreter )))
479479 {
480- shutdown (1 , "Fatal: failed to execute 'init' in script %s %s" , pdest -> pinterpreter -> theSymbolTable .name , pdest -> comment ? pdest -> comment : "" );
480+ borShutdown (1 , "Fatal: failed to execute 'init' in script %s %s" , pdest -> pinterpreter -> theSymbolTable .name , pdest -> comment ? pdest -> comment : "" );
481481 }
482482 pdest -> pinterpreter -> bReset = FALSE; // not needed, perhaps
483483 ScriptVariant_Clear (& tempvar );
@@ -525,7 +525,7 @@ void Script_Clear(Script *pscript, int localclear)
525525 pscript -> pinterpreter -> pCurrentInstruction = pscript -> pinterpreter -> pClearEntry ;
526526 if (FAILED ( Interpreter_EvaluateCall (pscript -> pinterpreter )))
527527 {
528- shutdown (1 , "Fatal: failed to execute 'clear' in script %s %s" , pscript -> pinterpreter -> theSymbolTable .name , pscript -> comment ? pscript -> comment : "" );
528+ borShutdown (1 , "Fatal: failed to execute 'clear' in script %s %s" , pscript -> pinterpreter -> theSymbolTable .name , pscript -> comment ? pscript -> comment : "" );
529529 }
530530 pscript -> pinterpreter -> bReset = FALSE; // not needed, perhaps
531531 ScriptVariant_Clear (& tempvar );
@@ -622,7 +622,7 @@ int Script_Compile(Script *pscript)
622622 result = SUCCEEDED (Interpreter_CompileInstructions (pscript -> pinterpreter ));
623623 if (!result )
624624 {
625- shutdown (1 , "Can't compile script '%s' %s\n" , pscript -> pinterpreter -> theSymbolTable .name , pscript -> comment ? pscript -> comment : "" );
625+ borShutdown (1 , "Can't compile script '%s' %s\n" , pscript -> pinterpreter -> theSymbolTable .name , pscript -> comment ? pscript -> comment : "" );
626626 }
627627
628628 pscript -> pinterpreter -> bReset = FALSE;
@@ -670,7 +670,7 @@ int Script_Execute(Script *pscript)
670670 pcurrentscript = temp ;
671671 if (!result )
672672 {
673- shutdown (1 , "There's an exception while executing script '%s' %s" , pscript -> pinterpreter -> theSymbolTable .name , pscript -> comment ? pscript -> comment : "" );
673+ borShutdown (1 , "There's an exception while executing script '%s' %s" , pscript -> pinterpreter -> theSymbolTable .name , pscript -> comment ? pscript -> comment : "" );
674674 }
675675 return result ;
676676}
@@ -12627,7 +12627,7 @@ HRESULT openbor_shutdown(ScriptVariant **varlist , ScriptVariant **pretvar, int
1262712627 goto shutdown_error ;
1262812628 }
1262912629
12630- shutdown ((LONG )ltemp , paramCount > 1 ? StrCache_Get (varlist [1 ]-> strVal ) : (DEFAULT_SHUTDOWN_MESSAGE ));
12630+ borShutdown ((LONG )ltemp , paramCount > 1 ? StrCache_Get (varlist [1 ]-> strVal ) : (DEFAULT_SHUTDOWN_MESSAGE ));
1263112631
1263212632 return S_OK ;
1263312633shutdown_error :
0 commit comments