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

* fixed the definition of XEventClass on 64-bit targets

Browse Source 
git-svn-id: trunk@33616 -
This commit is contained in:
nickysn 2016-05-02 14:33:26 +00:00
parent 69bb6f5ffa
commit 6bcf869c26
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/x11/src/xi.pp
View File

@ -338,12 +338,15 @@ const
{ Make XEventClass be a CARD32 for 64 bit servers. Don't affect client
definition of XEventClass since that would be a library interface change.
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
{$ifdef _XSERVER64}
XEventClass = CARD32;
XEventClass = cuint;
{$ELSE}
XEventClass = Longword;
XEventClass = culong;
{$ENDIF}
TXEventClass = XEventClass;