mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-07 10:06:00 +02:00
+ Fixed memory leak in findfirst/findnext
This commit is contained in:
parent
13e1341858
commit
5076475236
@ -544,6 +544,7 @@ Begin
|
||||
{$ELSE}
|
||||
closedir(pdir(f.dirptr));
|
||||
{$ENDIF}
|
||||
Dispose(pdir(f.dirptr)^.buf);
|
||||
Dispose(pdir(f.dirptr));
|
||||
end;
|
||||
End;
|
||||
@ -1043,7 +1044,10 @@ End.
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.7 1999-01-28 12:10:42 michael
|
||||
Revision 1.8 1999-01-28 12:54:13 michael
|
||||
+ Fixed memory leak in findfirst/findnext
|
||||
|
||||
Revision 1.7 1999/01/28 12:10:42 michael
|
||||
+ Fixed findclose bug
|
||||
|
||||
Revision 1.6 1998/11/23 12:32:31 peter
|
||||
|
Loading…
Reference in New Issue
Block a user