diff options
Diffstat (limited to 'basic/source/classes/sb.cxx')
-rwxr-xr-x | basic/source/classes/sb.cxx | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/basic/source/classes/sb.cxx b/basic/source/classes/sb.cxx index f509647e08a1..fbbf132c07d3 100755 --- a/basic/source/classes/sb.cxx +++ b/basic/source/classes/sb.cxx @@ -761,6 +761,8 @@ void StarBASIC::SetModified( BOOL b ) SbxBase::SetModified( b ); } +void disposeComVariablesForBasic( StarBASIC* pBasic ); + StarBASIC::~StarBASIC() { if( !--GetSbData()->nInst ) @@ -803,6 +805,8 @@ StarBASIC::~StarBASIC() } xUnoListeners = NULL; } + + disposeComVariablesForBasic( this ); } // Override new() operator, so that everyone can create a new instance |