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

* Updated PDir to BSD libc layout. (which is totally different from Linux)

Browse Source
This commit is contained in:
marco 2000-04-16 16:08:30 +00:00
parent 4b6a9896bf
commit 59e9da20d8
1 changed files with 175 additions and 159 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
rtl/bsd/systypes.inc
View File

@ -49,6 +49,18 @@ type
pdirent =^dirent;
TDirEnt = dirent;
TDir= packed record {BSD libc record.}
fd : longint; { file descriptor associated with directory }
loc, { offset in current buffer }
size : cardinal; { amount of data returned by getdirentries}
buf : pdirent; { data buffer, actually a pchar}
len : longint; { size of data buffer }
seek, { magic cookie returned by getdirentries}
rewind: cardinal; { magic cookie for rewinding}
flags : longint; { flags for readdir }
end;
{ Linux kernel record
TDir = packed record
fd : longint;
loc : longint;
@ -59,7 +71,8 @@ type
dd_max : integer; {size of buf. Irrelevant, as buf is of type dirent}
lock : pointer;
dummy : array[0..1023] of char;
end;
end;}
PDir =^TDir;
{$packrecords C}
@ -139,7 +152,10 @@ type
{
$Log$
Revision 1.7 2000-04-10 15:46:52 marco
Revision 1.8 2000-04-16 16:08:30 marco
* Updated PDir to BSD libc layout. (which is totally different from Linux)
Revision 1.7 2000/04/10 15:46:52 marco
* worked all day. probably a lot changed
Revision 1.5 2000/03/17 12:58:57 marco