Преглед на файлове

* 64-bit fix + mantis #29111, fix cmsghdr in an unit that is not actively compiled.

git-svn-id: trunk@32557 -
marco преди 9 години
родител
ревизия
11dd843f77
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/rtl-extra/src/linux/unixsockets.inc

+ 1 - 1
packages/rtl-extra/src/linux/unixsockets.inc

@@ -29,6 +29,6 @@ end;
 
 function CMSG_DATA(cmsg: Pointer): PByte;
 begin
-  Result:=PByte(Cardinal(cmsg) + SizeOf(Pcmsghdr));
+  Result:=PByte(Ptruint(cmsg) + SizeOf(cmsghdr));
 end;