diff options
-rw-r--r-- | basic/source/classes/sbxmod.cxx | 6 | ||||
-rw-r--r-- | include/basic/sbmod.hxx | 2 |
2 files changed, 2 insertions, 6 deletions
diff --git a/basic/source/classes/sbxmod.cxx b/basic/source/classes/sbxmod.cxx index 91fac4c74221..9990a04d5f46 100644 --- a/basic/source/classes/sbxmod.cxx +++ b/basic/source/classes/sbxmod.cxx @@ -1066,12 +1066,11 @@ void SbModule::SetVBACompat( bool bCompat ) } // Run a Basic-subprogram -sal_uInt16 SbModule::Run( SbMethod* pMeth ) +void SbModule::Run( SbMethod* pMeth ) { SAL_INFO("basic","About to run " << OUStringToOString( pMeth->GetName(), RTL_TEXTENCODING_UTF8 ).getStr() << ", vba compatmode is " << mbVBACompat ); static sal_uInt16 nMaxCallLevel = 0; - sal_uInt16 nRes = 0; bool bDelInst = ( GetSbData()->pInst == NULL ); bool bQuit = false; StarBASICRef xBasic; @@ -1195,7 +1194,6 @@ sal_uInt16 SbModule::Run( SbMethod* pMeth ) Application::Yield(); } - nRes = sal_True; GetSbData()->pInst->pRun = pRt->pNext; GetSbData()->pInst->nCallLvl--; // Call-Level down again @@ -1269,8 +1267,6 @@ sal_uInt16 SbModule::Run( SbMethod* pMeth ) { Application::PostUserEvent( LINK( &AsyncQuitHandler::instance(), AsyncQuitHandler, OnAsyncQuit ), NULL ); } - - return nRes; } // Execute of the init method of a module after the loading diff --git a/include/basic/sbmod.hxx b/include/basic/sbmod.hxx index dedae3a3aaaf..c5a9e16480fb 100644 --- a/include/basic/sbmod.hxx +++ b/include/basic/sbmod.hxx @@ -78,7 +78,7 @@ protected: SbProcedureProperty* GetProcedureProperty( const OUString&, SbxDataType ); SbIfaceMapperMethod* GetIfaceMapperMethod( const OUString&, SbMethod* ); void EndDefinitions( bool=false ); - sal_uInt16 Run( SbMethod* ); + void Run( SbMethod* ); void RunInit(); void ClearPrivateVars(); void ClearVarsDependingOnDeletedBasic( StarBASIC* pDeletedBasic ); |