/usr/lib/haskell-packages/ghc/lib/X11-1.5.0.1/ghc-7.4.1/include/XlibExtras.h is in libghc-x11-dev 1.5.0.1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 | /* This file copied from the X11 package */
/* -----------------------------------------------------------------------------
* Definitions for package `X11' which are visible in Haskell land.
* ---------------------------------------------------------------------------*
*/
#ifndef XLIBEXTRAS_H
#define XLIBEXTRAS_H
#include <stdlib.h>
/* This doesn't always work, so we play safe below... */
#define XUTIL_DEFINE_FUNCTIONS
#include <X11/X.h>
#include <X11/X.h>
#include <X11/Xlib.h>
#include <X11/Xatom.h>
#include <X11/Xutil.h>
#include <X11/Xproto.h>
/* Xutil.h overrides some functions with macros.
* In recent versions of X this can be turned off with
* #define XUTIL_DEFINE_FUNCTIONS
* before the #include, but this doesn't work with older versions.
* As a workaround, we undef the macros here. Note that this is only
* safe for functions with return type int.
*/
#undef XDestroyImage
#undef XGetPixel
#undef XPutPixel
#undef XSubImage
#undef XAddPixel
#define XK_MISCELLANY
#define XK_LATIN1
#include <X11/keysymdef.h>
#endif
void x11_extras_set_error_handler();
int x11_extras_IsCursorKey(KeySym keysym);
int x11_extras_IsFunctionKey(KeySym keysym);
int x11_extras_IsKeypadKey(KeySym keysym);
int x11_extras_IsMiscFunctionKey(KeySym keysym);
int x11_extras_IsModifierKey(KeySym keysym);
int x11_extras_IsPFKey(KeySym keysym);
int x11_extras_IsPrivateKeypadKey(KeySym keysym);
|