浏览代码

* fixed the definition of XEventClass on 64-bit targets

git-svn-id: trunk@33616 -
nickysn 9 年之前
父节点
当前提交
6bcf869c26
共有 1 个文件被更改,包括 5 次插入2 次删除
  1. 5 2
      packages/x11/src/xi.pp

+ 5 - 2
packages/x11/src/xi.pp

@@ -338,12 +338,15 @@ const
 { Make XEventClass be a CARD32 for 64 bit servers.  Don't affect client
 { Make XEventClass be a CARD32 for 64 bit servers.  Don't affect client
   definition of XEventClass since that would be a library interface change.
   definition of XEventClass since that would be a library interface change.
   See the top of X.h for more _XSERVER64 magic.
   See the top of X.h for more _XSERVER64 magic.
+
+  But, don't actually use the CARD32 type.  We can't get it defined here
+  without polluting the namespace.
 }
 }
 type
 type
 {$ifdef _XSERVER64}
 {$ifdef _XSERVER64}
-        XEventClass = CARD32;
+        XEventClass = cuint;
 {$ELSE}
 {$ELSE}
-        XEventClass = Longword;
+        XEventClass = culong;
 {$ENDIF}
 {$ENDIF}
         TXEventClass = XEventClass;
         TXEventClass = XEventClass;