paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-03 22:12:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

* don't exit in getdir when fpstat gives a failure

Browse Source
This commit is contained in:
peter 2003-12-21 20:30:49 +00:00
parent b52cee6639
commit c6e1a6a6d1
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
rtl/linux/osmain.inc
View File

@ -469,12 +469,6 @@ begin
((d^.d_name[1]='.') and (d^.d_name[2]=#0))))) then
name:='/'+strpas(d^.d_name);
end;
end
else
begin
{ Ignore possible broken symlinks }
if (Errno<>ESysENOENT) then
Exit;
end;
until (name<>'');
If Fpclosedir(dirstream)<0 THen
@ -600,7 +594,10 @@ End.
*)
{
$Log$
Revision 1.9 2003-12-14 14:28:36 peter
Revision 1.10 2003-12-21 20:30:49 peter
* don't exit in getdir when fpstat gives a failure
Revision 1.9 2003/12/14 14:28:36 peter
* only check errno if the syscall failed
Revision 1.8 2003/11/01 01:58:11 marco