The TUnitCoverage objects in the private unitlist variable is not freed, nor is
unitlist.
Fix:
destructor TCoverage.Destroy;
var
lp : Integer;
begin
for lp := 0 to Pred(unitlist.Count) do
unitlist[lp].Free;
unitlist.Free;
inherited;
end;
Original issue reported on code.google.com by ring....@gmail.com on 31 Jul 2010 at 5:30
Original issue reported on code.google.com by
ring....@gmail.com
on 31 Jul 2010 at 5:30