summaryrefslogtreecommitdiff
path: root/basic/source/classes/sb.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'basic/source/classes/sb.cxx')
-rwxr-xr-xbasic/source/classes/sb.cxx4
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