diff --git a/components/lazdebuggers/lazdebuggerlldb/lldbdebugger.pas b/components/lazdebuggers/lazdebuggerlldb/lldbdebugger.pas
index 8d3e368a4c..a8997a1355 100644
--- a/components/lazdebuggers/lazdebuggerlldb/lldbdebugger.pas
+++ b/components/lazdebuggers/lazdebuggerlldb/lldbdebugger.pas
@@ -233,8 +233,9 @@ type
   protected
     procedure DoExecute; override;
   public
-    property  CurrentCallStack: TCallStackBase read FCurrentCallStack;
     constructor Create(AOwner: TLldbDebugger; ACurrentCallStack: TCallStackBase);
+    destructor Destroy; override;
+    property  CurrentCallStack: TCallStackBase read FCurrentCallStack;
   end;
 
   { TLldbCallStack }
@@ -502,6 +503,12 @@ begin
   FCurrentCallStack.AddFreeNotification(@DoCallstackFreed);
 end;
 
+destructor TLldbDebuggerCommandCallStack.Destroy;
+begin
+  FCurrentCallStack.RemoveFreeeNotification(@DoCallstackFreed);
+  inherited Destroy;
+end;
+
 { TLldbCallStack }
 
 procedure TLldbCallStack.ParentRequestEntries(ACallstack: TCallStackBase);