Преглед изворни кода

* TIOCtlRequest is 64 bit on sparc64

git-svn-id: trunk@36946 -
florian пре 8 година
родитељ
комит
50fab14389
1 измењених фајлова са 4 додато и 1 уклоњено
  1. 4 1
      rtl/linux/ptypes.inc

+ 4 - 1
rtl/linux/ptypes.inc

@@ -155,8 +155,11 @@ Type
     TGid     = gid_t;
     pGid     = ^gid_t;
 
+{$ifdef cpusparc64}
+    TIOCtlRequest = culong;
+{$else cpusparc64}
     TIOCtlRequest = cInt;
-
+{$endif cpusparc64}
 
     socklen_t= cuint32;
     TSockLen = socklen_t;