+ Fixed memory leak in findfirst/findnext

This commit is contained in:
michael 1999-01-28 12:54:13 +00:00
parent 13e1341858
commit 5076475236

View File

@ -544,6 +544,7 @@ Begin
{$ELSE} {$ELSE}
closedir(pdir(f.dirptr)); closedir(pdir(f.dirptr));
{$ENDIF} {$ENDIF}
Dispose(pdir(f.dirptr)^.buf);
Dispose(pdir(f.dirptr)); Dispose(pdir(f.dirptr));
end; end;
End; End;
@ -1043,7 +1044,10 @@ End.
{ {
$Log$ $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 + Fixed findclose bug
Revision 1.6 1998/11/23 12:32:31 peter Revision 1.6 1998/11/23 12:32:31 peter