Hi,
I have been playing around with Free Pascal for OS/2 but have stumbled
into a problem. I can't compile sockets.pas as SizeOf(File) <>
SizeOf(FileRec). So I made a test program - and it shows me that
userdata is only 16 bytes - how can that be? If I change the definition
of filerec other parts break! What is going on???
{$I filerec.inc}
type
mytest = array[1..32] of byte;
begin
writeln(sizeof(file));
writeln(sizeof(filerec));
writeln('----');
writeln(sizeof(filerec.Handle));
writeln(sizeof(filerec.Mode));
writeln(sizeof(filerec.RecSize));
writeln(sizeof(filerec._private));
writeln(sizeof(filerec.UserData));
writeln(sizeof(filerec.name));
writeln(sizeof(mytest));
end.
Output:
332
316
----
4
4
4
32
16
256
32
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
