Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* apply patch for libXi pascal interface from Ido Kanner

git-svn-id: trunk@11972 -
Almindor 17 years ago
parent
71e8ea5984
commit
b250a0e1c4
1 changed files with 3 additions and 0 deletions
Unified View Show Diff Stats
  1. 3 0
      packages/x11/src/xi.pp

+ 3 - 0
packages/x11/src/xi.pp
View File 

@@ -286,6 +286,9 @@ const
 
         _deviceOwnerGrabButton   = 8;
 
         _deviceOwnerGrabButton   = 8;
 
         _noExtensionEvent        = 9;
 
         _noExtensionEvent        = 9;
 
 
 
+const
 
+        _devicePresence = 0;
 
+
 
 const
 
 const
 
         XI_BadDevice  = 0;
 
         XI_BadDevice  = 0;
 
         XI_BadEvent   = 1;
 
         XI_BadEvent   = 1;