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

* Small readdir fix from fixes branch.

Browse Source
This commit is contained in:
marco 2001-04-23 11:38:30 +00:00
parent 7e8bc49786
commit 98043524a7
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/freebsd/syscalls.inc
View File

@ -404,6 +404,8 @@ begin
novalid:=false; novalid:=false;
end; end;
until (l<>nil) or novalid; until (l<>nil) or novalid;
If novalid then
l:=nil;
Sys_ReadDir:=l; Sys_ReadDir:=l;
end; end;
@ -455,7 +457,10 @@ end;
{ {
$Log$ $Log$
Revision 1.4 2000-09-19 09:57:35 marco Revision 1.5 2001-04-23 11:38:30 marco
* Small readdir fix from fixes branch.
Revision 1.4 2000/09/19 09:57:35 marco
* Fixed mkdir * Fixed mkdir
Revision 1.3 2000/09/19 09:25:17 marco Revision 1.3 2000/09/19 09:25:17 marco