mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-30 10:29:29 +02:00
FpDebug: Fix leak introduced in r61951 #cc3a453334 / missing deref for ValueObject in Locals eval
git-svn-id: trunk@61957 -
This commit is contained in:
parent
a320f39ea3
commit
6591981f5f
@ -354,6 +354,7 @@ begin
|
||||
end;
|
||||
|
||||
AContext.ReleaseReference;
|
||||
ProcVal.ReleaseReference;
|
||||
DoProcessLoop:=false;
|
||||
result := true;
|
||||
end;
|
||||
|
@ -819,6 +819,7 @@ begin
|
||||
end;
|
||||
end;
|
||||
ALocals.SetDataValidity(ddsValid);
|
||||
ProcVal.ReleaseReference;
|
||||
AContext.ReleaseReference;
|
||||
end;
|
||||
|
||||
|
@ -302,6 +302,7 @@ begin
|
||||
ALocals.Add(n, v);
|
||||
end;
|
||||
end;
|
||||
ProcVal.ReleaseReference;
|
||||
ALocals.SetDataValidity(ddsValid);
|
||||
end;
|
||||
|
||||
|
@ -448,6 +448,7 @@ begin
|
||||
ALocals.SetDataValidity(ddsValid);
|
||||
finally
|
||||
Ctx.ReleaseReference;
|
||||
ProcVal.ReleaseReference;
|
||||
end;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user