]> gitweb.factorcode.org Git - factor.git/commitdiff
x11.*: cosmetic fixes, breaking long lines, indenting struct slots..
authorBjörn Lindqvist <bjourne@gmail.com>
Mon, 20 Jun 2016 00:02:23 +0000 (02:02 +0200)
committerBjörn Lindqvist <bjourne@gmail.com>
Mon, 20 Jun 2016 00:02:23 +0000 (02:02 +0200)
basis/x11/constants/constants.factor
basis/x11/xlib/xlib.factor

index a3192cf6bb780d43f66c68c117da5ff08dc31568..872cdbe4681c9684997a64852bb94c235175005c 100644 (file)
@@ -27,7 +27,6 @@ CONSTANT: NoSymbol 0
 ! Key masks. Used as modifiers to GrabButton and GrabKey, results of QueryPointer,
 !   state in various key-, mouse-, and button-related events.
 
-
 ! modifier names.  Used to build a SetModifierMapping request or
 ! to read a GetModifierMapping request.  These correspond to the
 ! masks defined above.
@@ -136,31 +135,31 @@ CONSTANT: RevertToParent 2
 ! * ERROR CODES
 ! *****************************************************************
 
-CONSTANT: Success 0 ! everything's okay
-CONSTANT: BadRequest 1 ! bad request code
-CONSTANT: BadValue 2 ! int parameter out of range
-CONSTANT: BadWindow 3 ! parameter not a Window
-CONSTANT: BadPixmap 4 ! parameter not a Pixmap
-CONSTANT: BadAtom 5 ! parameter not an Atom
-CONSTANT: BadCursor 6 ! parameter not a Cursor
-CONSTANT: BadFont 7 ! parameter not a Font
-CONSTANT: BadMatch 8 ! parameter mismatch
-CONSTANT: BadDrawable 9 ! parameter not a Pixmap or Window
-CONSTANT: BadAccess 10 ! depending on context:
-                       !         - key/button already grabbed
-                       !         - attempt to free an illegal
-                       !           cmap entry
-                       !        - attempt to store into a read-only
-                       !           color map entry.
-                       !        - attempt to modify the access control
-                       !           list from other than the local host.
-CONSTANT: BadAlloc 11 ! insufficient resources
-CONSTANT: BadColor 12 ! no such colormap
-CONSTANT: BadGC 13 ! parameter not a GC
-CONSTANT: BadIDChoice 14 ! choice not in range or already used
-CONSTANT: BadName 15 ! font or color name doesn't exist
-CONSTANT: BadLength 16 ! Request length incorrect
-CONSTANT: BadImplementation 17 ! server is defective
+CONSTANT: Success 0         ! everything's okay
+CONSTANT: BadRequest 1      ! bad request code
+CONSTANT: BadValue 2        ! int parameter out of range
+CONSTANT: BadWindow 3       ! parameter not a Window
+CONSTANT: BadPixmap 4       ! parameter not a Pixmap
+CONSTANT: BadAtom 5         ! parameter not an Atom
+CONSTANT: BadCursor 6       ! parameter not a Cursor
+CONSTANT: BadFont 7         ! parameter not a Font
+CONSTANT: BadMatch 8        ! parameter mismatch
+CONSTANT: BadDrawable 9     ! parameter not a Pixmap or Window
+CONSTANT: BadAccess 10      ! depending on context:
+                            !         - key/button already grabbed
+                            !         - attempt to free an illegal
+                            !           cmap entry
+                            !        - attempt to store into a read-only
+                            !           color map entry.
+                            !        - attempt to modify the access control
+                            !           list from other than the local host.
+CONSTANT: BadAlloc 11       ! insufficient resources
+CONSTANT: BadColor 12       ! no such colormap
+CONSTANT: BadGC 13          ! parameter not a GC
+CONSTANT: BadIDChoice 14    ! choice not in range or already used
+CONSTANT: BadName 15        ! font or color name doesn't exist
+CONSTANT: BadLength 16      ! Request length incorrect
+CONSTANT: BadImplementation 17  ! server is defective
 
 CONSTANT: FirstExtensionError 128
 CONSTANT: LastExtensionError 255
@@ -260,8 +259,8 @@ CONSTANT: YXBanded 3
 
 ! CoordinateMode for drawing routines
 
-CONSTANT: CoordModeOrigin 0 ! relative to the origin
-CONSTANT: CoordModePrevious 1 ! relative to previous point
+CONSTANT: CoordModeOrigin 0     ! relative to the origin
+CONSTANT: CoordModePrevious 1   ! relative to previous point
 
 ! Polygon shapes
 
@@ -291,9 +290,9 @@ CONSTANT: FontChange 255
 
 ! ImageFormat -- PutImage, GetImage
 
-CONSTANT: XYBitmap 0 ! depth 1, XYFormat
-CONSTANT: XYPixmap 1 ! depth == drawable depth
-CONSTANT: ZPixmap 2 ! depth == drawable depth
+CONSTANT: XYBitmap 0    ! depth 1, XYFormat
+CONSTANT: XYPixmap 1    ! depth == drawable depth
+CONSTANT: ZPixmap 2     ! depth == drawable depth
 
 ! *****************************************************************
 ! *  COLOR MAP STUFF
@@ -301,8 +300,8 @@ CONSTANT: ZPixmap 2 ! depth == drawable depth
 
 ! For CreateColormap
 
-CONSTANT: AllocNone 0 ! create map with no entries
-CONSTANT: AllocAll 1 ! allocate entire map writeable
+CONSTANT: AllocNone 0   ! create map with no entries
+CONSTANT: AllocAll 1    ! allocate entire map writeable
 
 
 ! Flags used in StoreNamedColor, StoreColors
@@ -317,9 +316,9 @@ CONSTANT: AllocAll 1 ! allocate entire map writeable
 
 ! QueryBestSize Class
 
-CONSTANT: CursorShape 0 ! largest size that can be displayed
-CONSTANT: TileShape 1 ! size tiled fastest
-CONSTANT: StippleShape 2 ! size stippled fastest
+CONSTANT: CursorShape 0     ! largest size that can be displayed
+CONSTANT: TileShape 1       ! size tiled fastest
+CONSTANT: StippleShape 2    ! size stippled fastest
 
 ! *****************************************************************
 ! * KEYBOARD/POINTER STUFF
@@ -396,7 +395,6 @@ CONSTANT: PseudoColor 3
 CONSTANT: TrueColor 4
 CONSTANT: DirectColor 5
 
-
 ! Byte order  used in imageByteOrder and bitmapBitOrder
 
 CONSTANT: LSBFirst 0
index 6e251f1fc9c077cce9416afdcfea405b8a701ee3..f68f86f349f1380feffc92960a4a191a2981a18e 100644 (file)
@@ -10,6 +10,8 @@
 ! add to this library and are wondering what part of the file to
 ! modify, just find the function or data structure in the manual
 ! and note the section.
+!
+! https://www.x.org/releases/X11R7.6/doc/libX11/specs/libX11/libX11.html
 USING: accessors kernel arrays alien alien.c-types alien.data
 alien.strings alien.syntax classes.struct math math.bitwise words
 sequences namespaces continuations io io.encodings.ascii x11.syntax
@@ -59,9 +61,9 @@ ALIAS: *KeySym *XID
 
 ! This struct is incomplete
 STRUCT: Display
-{ ext_data void* }
-{ free_funcs void* }
-{ fd int } ;
+    { ext_data void* }
+    { free_funcs void* }
+    { fd int } ;
 
 X-FUNCTION: Display* XOpenDisplay ( void* display_name )
 
@@ -107,21 +109,21 @@ X-FUNCTION: int XCloseDisplay ( Display* display )
 : CWCursor           ( -- n ) 14 2^ ; inline
 
 STRUCT: XSetWindowAttributes
-{ background_pixmap Pixmap }
-{ background_pixel ulong }
-{ border_pixmap Pixmap }
-{ border_pixel ulong }
-{ bit_gravity int }
-{ win_gravity int }
-{ backing_store int }
-{ backing_planes ulong }
-{ backing_pixel ulong }
-{ save_under Bool }
-{ event_mask long }
-{ do_not_propagate_mask long }
-{ override_redirect Bool }
-{ colormap Colormap }
-{ cursor Cursor } ;
+    { background_pixmap Pixmap }
+    { background_pixel ulong }
+    { border_pixmap Pixmap }
+    { border_pixel ulong }
+    { bit_gravity int }
+    { win_gravity int }
+    { backing_store int }
+    { backing_planes ulong }
+    { backing_pixel ulong }
+    { save_under Bool }
+    { event_mask long }
+    { do_not_propagate_mask long }
+    { override_redirect Bool }
+    { colormap Colormap }
+    { cursor Cursor } ;
 
 CONSTANT: UnmapGravity          0
 
@@ -139,8 +141,17 @@ CONSTANT: StaticGravity         10
 
 ! 3.3 - Creating Windows
 
-X-FUNCTION: Window XCreateWindow ( Display* display, Window parent, int x, int y, uint width, uint height, uint border_width, int depth, uint class, Visual* visual, ulong valuemask, XSetWindowAttributes* attributes )
-X-FUNCTION: Window XCreateSimpleWindow ( Display* display, Window parent, int x, int y, uint width, uint height, uint border_width, ulong border, ulong background )
+X-FUNCTION: Window XCreateWindow ( Display* display,
+                                   Window parent,
+                                   int x, int y, uint width, uint height,
+                                   uint border_width, int depth, uint class,
+                                   Visual* visual, ulong valuemask,
+                                   XSetWindowAttributes* attributes )
+X-FUNCTION: Window XCreateSimpleWindow ( Display* display,
+                                         Window parent,
+                                         int x, int y, uint width, uint height,
+                                         uint border_width, ulong border,
+                                         ulong background )
 X-FUNCTION: Status XDestroyWindow ( Display* display, Window w )
 X-FUNCTION: Status XMapWindow ( Display* display, Window window )
 X-FUNCTION: Status XMapSubwindows ( Display* display, Window window )
@@ -162,16 +173,19 @@ X-FUNCTION: int XMapRaised ( Display* display, Window w )
 : CWStackMode   ( -- n ) 6 2^ ; inline
 
 STRUCT: XWindowChanges
-{ x int }
-{ y int }
-{ width int }
-{ height int }
-{ border_width int }
-{ sibling Window }
-{ stack_mode int } ;
-
-X-FUNCTION: Status XConfigureWindow ( Display* display, Window w, uint value_mask, XWindowChanges* values )
-X-FUNCTION: Status XMoveWindow ( Display* display, Window w, int x, int y )
+    { x int }
+    { y int }
+    { width int }
+    { height int }
+    { border_width int }
+    { sibling Window }
+    { stack_mode int } ;
+
+X-FUNCTION: Status XConfigureWindow ( Display* display,
+                                      Window w,
+                                      uint value_mask, XWindowChanges* values )
+X-FUNCTION: Status XMoveWindow ( Display* display, Window w,
+                                 int x, int y )
 X-FUNCTION: Status XResizeWindow ( Display* display, Window w, uint width, uint height )
 X-FUNCTION: Status XSetWindowBorderWidth ( Display* display, ulong w, uint width )
 
@@ -183,10 +197,11 @@ X-FUNCTION: Status XLowerWindow ( Display* display, Window w )
 
 ! 3.9 - Changing Window Attributes
 
-X-FUNCTION: Status XChangeWindowAttributes (
-  Display* display, Window w, ulong valuemask, XSetWindowAttributes* attr )
-X-FUNCTION: Status XSetWindowBackground (
-  Display* display, Window w, ulong background_pixel )
+X-FUNCTION: Status XChangeWindowAttributes ( Display* display,
+                                             Window w,
+                                             ulong valuemask, XSetWindowAttributes* attr )
+X-FUNCTION: Status XSetWindowBackground ( Display* display,
+                                          Window w, ulong background_pixel )
 X-FUNCTION: Status XDefineCursor ( Display* display, Window w, Cursor cursor )
 X-FUNCTION: Status XUndefineCursor ( Display* display, Window w )
 
@@ -197,36 +212,37 @@ X-FUNCTION: Status XUndefineCursor ( Display* display, Window w )
 ! 4.1 - Obtaining Window Information
 
 X-FUNCTION: Status XQueryTree (
-  Display* display,
-  Window w,
-  Window* root_return,
-  Window* parent_return,
-  Window** children_return, uint* nchildren_return )
+    Display* display,
+    Window w,
+    Window* root_return,
+    Window* parent_return,
+    Window** children_return, uint* nchildren_return
+)
 
 STRUCT: XWindowAttributes
-{ x int }
-{ y int }
-{ width int }
-{  height int }
-{ border_width int }
-{ depth int }
-{ visual Visual* }
-{ root Window }
-{ class int }
-{ bit_gravity int }
-{ win_gravity int }
-{ backing_store int }
-{ backing_planes ulong }
-{ backing_pixel ulong }
-{ save_under Bool }
-{ colormap Colormap }
-{ map_installed Bool }
-{ map_state int }
-{ all_event_masks long }
-{ your_event_mask long }
-{ do_not_propagate_mask long }
-{ override_redirect Bool }
-{ screen Screen* } ;
+    { x int }
+    { y int }
+    { width int }
+    {  height int }
+    { border_width int }
+    { depth int }
+    { visual Visual* }
+    { root Window }
+    { class int }
+    { bit_gravity int }
+    { win_gravity int }
+    { backing_store int }
+    { backing_planes ulong }
+    { backing_pixel ulong }
+    { save_under Bool }
+    { colormap Colormap }
+    { map_installed Bool }
+    { map_state int }
+    { all_event_masks long }
+    { your_event_mask long }
+    { do_not_propagate_mask long }
+    { override_redirect Bool }
+    { screen Screen* } ;
 
 X-FUNCTION: Status XGetWindowAttributes ( Display* display, Window w, XWindowAttributes* attr )
 
@@ -235,19 +251,26 @@ CONSTANT: IsUnviewable          1
 CONSTANT: IsViewable            2
 
 X-FUNCTION: Status XGetGeometry (
-  Display* display,
-  Drawable d,
-  Window* root_return,
-  int* x_return,
-  int* y_return,
-  uint* width_return,
-  uint* height_return,
-  uint* border_width_return,
-  uint* depth_return )
+    Display* display,
+    Drawable d,
+    Window* root_return,
+    int* x_return,
+    int* y_return,
+    uint* width_return,
+    uint* height_return,
+    uint* border_width_return,
+    uint* depth_return
+)
 
 ! 4.2 - Translating Screen Coordinates
 
-X-FUNCTION: Bool XQueryPointer ( Display* display, Window w, Window* root_return, Window* child_return, int* root_x_return, int* root_y_return, int* win_x_return, int* win_y_return, uint* mask_return )
+X-FUNCTION: Bool XQueryPointer (
+    Display* display,
+    Window w,
+    Window* root_return, Window* child_return,
+    int* root_x_return, int* root_y_return, int* win_x_return, int* win_y_return,
+    uint* mask_return
+)
 
 ! 4.3 - Properties and Atoms
 
@@ -257,9 +280,19 @@ X-FUNCTION: c-string XGetAtomName ( Display* display, Atom atom )
 
 ! 4.4 - Obtaining and Changing Window Properties
 
-X-FUNCTION: int XGetWindowProperty ( Display* display, Window w, Atom property, long long_offset, long long_length, Bool delete, Atom req_type, Atom* actual_type_return, int* actual_format_return, ulong* nitems_return, ulong* bytes_after_return, c-string* prop_return )
+X-FUNCTION: int XGetWindowProperty (
+    Display* display, Window w, Atom property,
+    long long_offset, long long_length,
+    Bool delete, Atom req_type,
+    Atom* actual_type_return, int* actual_format_return,
+    ulong* nitems_return, ulong* bytes_after_return, c-string* prop_return
+)
 
-X-FUNCTION: int XChangeProperty ( Display* display, Window w, Atom property, Atom type, int format, int mode, void* data, int nelements )
+X-FUNCTION: int XChangeProperty (
+    Display* display, Window w, Atom property,
+    Atom type, int format,
+    int mode, void* data, int nelements
+)
 
 ! 4.5 Selections
 
@@ -267,7 +300,10 @@ X-FUNCTION: int XSetSelectionOwner ( Display* display, Atom selection, Window ow
 
 X-FUNCTION: Window XGetSelectionOwner ( Display* display, Atom selection )
 
-X-FUNCTION: int XConvertSelection ( Display* display, Atom selection, Atom target, Atom property, Window requestor, Time time )
+X-FUNCTION: int XConvertSelection (
+    Display* display, Atom selection, Atom target,
+    Atom property, Window requestor, Time time
+)
 
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
@@ -290,14 +326,18 @@ X-FUNCTION: int XFreeCursor ( Display* display, Cursor cursor )
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XColor
-{ pixel ulong }
-{ red ushort }
-{ green ushort }
-{ blue ushort }
-{ flags char }
-{ pad char } ;
-
-X-FUNCTION: Status XLookupColor ( Display* display, Colormap colormap, c-string color_name, XColor* exact_def_return, XColor* screen_def_return )
+    { pixel ulong }
+    { red ushort }
+    { green ushort }
+    { blue ushort }
+    { flags char }
+    { pad char } ;
+
+X-FUNCTION: Status XLookupColor ( Display* display,
+                                  Colormap colormap,
+                                  c-string color_name,
+                                  XColor* exact_def_return,
+                                  XColor* screen_def_return )
 X-FUNCTION: Status XAllocColor ( Display* display, Colormap colormap, XColor* screen_in_out )
 X-FUNCTION: Status XQueryColor ( Display* display, Colormap colormap, XColor* def_in_out )
 
@@ -351,29 +391,29 @@ CONSTANT: GXnand                0xe
 CONSTANT: GXset                 0xf
 
 STRUCT: XGCValues
-{ function int }
-{ plane_mask ulong }
-{ foreground ulong }
-{ background ulong }
-{ line_width int }
-{ line_style int }
-{ cap_style int }
-{ join_style int }
-{ fill_style int }
-{ fill_rule int }
-{ arc_mode int }
-{ tile Pixmap }
-{ stipple Pixmap }
-{ ts_x_origin int }
-{ ts_y_origin int }
-{ font Font }
-{ subwindow_mode int }
-{ graphics_exposures Bool }
-{ clip_x_origin int }
-{ clip_y_origin int }
-{ clip_mask Pixmap }
-{ dash_offset int }
-{ dashes char } ;
+    { function int }
+    { plane_mask ulong }
+    { foreground ulong }
+    { background ulong }
+    { line_width int }
+    { line_style int }
+    { cap_style int }
+    { join_style int }
+    { fill_style int }
+    { fill_rule int }
+    { arc_mode int }
+    { tile Pixmap }
+    { stipple Pixmap }
+    { ts_x_origin int }
+    { ts_y_origin int }
+    { font Font }
+    { subwindow_mode int }
+    { graphics_exposures Bool }
+    { clip_x_origin int }
+    { clip_y_origin int }
+    { clip_mask Pixmap }
+    { dash_offset int }
+    { dashes char } ;
 
 X-FUNCTION: GC XCreateGC ( Display* display, Window d, ulong valuemask, XGCValues* values )
 X-FUNCTION: int XChangeGC ( Display* display, GC gc, ulong valuemask, XGCValues* values )
@@ -400,30 +440,30 @@ X-FUNCTION: Status XFillArc ( Display* display, Drawable d, GC gc, int x, int y,
 ! 8.5 - Font Metrics
 
 STRUCT: XCharStruct
-{ lbearing short }
-{ rbearing short }
-{ width short }
-{ ascent short }
-{ descent short }
-{ attributes ushort } ;
+    { lbearing short }
+    { rbearing short }
+    { width short }
+    { ascent short }
+    { descent short }
+    { attributes ushort } ;
 
 STRUCT: XFontStruct
-{ ext_data XExtData* }
-{ fid Font }
-{ direction uint }
-{ min_char_or_byte2 uint }
-{ max_char_or_byte2 uint }
-{ min_byte1 uint }
-{ max_byte1 uint }
-{ all_chars_exist Bool }
-{ default_char uint }
-{ n_properties int }
-{ properties XFontProp* }
-{ min_bounds XCharStruct }
-{ max_bounds XCharStruct }
-{ per_char XCharStruct* }
-{ ascent int }
-{ descent int } ;
+    { ext_data XExtData* }
+    { fid Font }
+    { direction uint }
+    { min_char_or_byte2 uint }
+    { max_char_or_byte2 uint }
+    { min_byte1 uint }
+    { max_byte1 uint }
+    { all_chars_exist Bool }
+    { default_char uint }
+    { n_properties int }
+    { properties XFontProp* }
+    { min_bounds XCharStruct }
+    { max_bounds XCharStruct }
+    { per_char XCharStruct* }
+    { ascent int }
+    { descent int } ;
 
 X-FUNCTION: Font XLoadFont ( Display* display, c-string name )
 X-FUNCTION: XFontStruct* XQueryFont ( Display* display, XID font_ID )
@@ -447,31 +487,31 @@ X-FUNCTION: Status XDrawString (
 CONSTANT: AllPlanes -1
 
 STRUCT: XImage-funcs
-{ create_image void* }
-{ destroy_image void* }
-{ get_pixel void* }
-{ put_pixel void* }
-{ sub_image void* }
-{ add_pixel void* } ;
+    { create_image void* }
+    { destroy_image void* }
+    { get_pixel void* }
+    { put_pixel void* }
+    { sub_image void* }
+    { add_pixel void* } ;
 
 STRUCT: XImage
-{ width int }
-{ height int }
-{ xoffset int }
-{ format int }
-{ data uchar* }
-{ byte_order int }
-{ bitmap_unit int }
-{ bitmap_bit_order int }
-{ bitmap_pad int }
-{ depth int }
-{ bytes_per_line int }
-{ bits_per_pixel int }
-{ red_mask ulong }
-{ green_mask ulong }
-{ blue_mask ulong }
-{ obdata XPointer }
-{ f XImage-funcs } ;
+    { width int }
+    { height int }
+    { xoffset int }
+    { format int }
+    { data uchar* }
+    { byte_order int }
+    { bitmap_unit int }
+    { bitmap_bit_order int }
+    { bitmap_pad int }
+    { depth int }
+    { bytes_per_line int }
+    { bits_per_pixel int }
+    { red_mask ulong }
+    { green_mask ulong }
+    { blue_mask ulong }
+    { obdata XPointer }
+    { f XImage-funcs } ;
 
 X-FUNCTION: XImage* XGetImage ( Display* display, Drawable d, int x, int y, uint width, uint height, ulong plane_mask, int format )
 X-FUNCTION: int XDestroyImage ( XImage* ximage )
@@ -563,11 +603,11 @@ CONSTANT: GenericEvent          35
 CONSTANT: LASTEvent             36
 
 STRUCT: XAnyEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
@@ -595,21 +635,21 @@ CONSTANT: Button5 5
 : Mod5Mask    ( -- n ) 1 7 shift ; inline
 
 STRUCT: XButtonEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ root Window }
-{ subwindow Window }
-{ time Time }
-{ x int }
-{ y int }
-{ x_root int }
-{ y_root int }
-{ state uint }
-{ button uint }
-{ same_screen Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { root Window }
+    { subwindow Window }
+    { time Time }
+    { x int }
+    { y int }
+    { x_root int }
+    { y_root int }
+    { state uint }
+    { button uint }
+    { same_screen Bool } ;
 
 TYPEDEF: XButtonEvent XButtonPressedEvent
 TYPEDEF: XButtonEvent XButtonReleasedEvent
@@ -618,21 +658,21 @@ TYPEDEF: XButtonEvent XButtonReleasedEvent
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XKeyEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ root Window }
-{ subwindow Window }
-{ time Time }
-{ x int }
-{ y int }
-{ x_root int }
-{ y_root int }
-{ state uint }
-{ keycode uint }
-{ same_screen Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { root Window }
+    { subwindow Window }
+    { time Time }
+    { x int }
+    { y int }
+    { x_root int }
+    { y_root int }
+    { state uint }
+    { keycode uint }
+    { same_screen Bool } ;
 
 TYPEDEF: XKeyEvent XKeyPressedEvent
 TYPEDEF: XKeyEvent XKeyReleasedEvent
@@ -640,44 +680,44 @@ TYPEDEF: XKeyEvent XKeyReleasedEvent
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XMotionEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ root Window }
-{ subwindow Window }
-{ time Time }
-{ x int }
-{ y int }
-{ x_root int }
-{ y_root int }
-{ state uint }
-{ is_hint char }
-{ same_screen Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { root Window }
+    { subwindow Window }
+    { time Time }
+    { x int }
+    { y int }
+    { x_root int }
+    { y_root int }
+    { state uint }
+    { is_hint char }
+    { same_screen Bool } ;
 
 TYPEDEF: XMotionEvent XPointerMovedEvent
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XCrossingEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ root Window }
-{ subwindow Window }
-{ time Time }
-{ x int }
-{ y int }
-{ x_root int }
-{ y_root int }
-{ mode int }
-{ detail int }
-{ same_screen Bool }
-{ focus Bool }
-{ state uint } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { root Window }
+    { subwindow Window }
+    { time Time }
+    { x int }
+    { y int }
+    { x_root int }
+    { y_root int }
+    { mode int }
+    { detail int }
+    { same_screen Bool }
+    { focus Bool }
+    { state uint } ;
 
 TYPEDEF: XCrossingEvent XEnterWindowEvent
 TYPEDEF: XCrossingEvent XLeaveWindowEvent
@@ -685,13 +725,13 @@ TYPEDEF: XCrossingEvent XLeaveWindowEvent
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XFocusChangeEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ mode int }
-{ detail int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { mode int }
+    { detail int } ;
 
 TYPEDEF: XFocusChangeEvent XFocusInEvent
 TYPEDEF: XFocusChangeEvent XFocusOutEvent
@@ -699,314 +739,314 @@ TYPEDEF: XFocusChangeEvent XFocusOutEvent
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XExposeEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ x int }
-{ y int }
-{ width int }
-{ height int }
-{ count int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { x int }
+    { y int }
+    { width int }
+    { height int }
+    { count int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XGraphicsExposeEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ drawable Drawable }
-{ x int }
-{ y int }
-{ width int }
-{ height int }
-{ count int }
-{ major_code int }
-{ minor_code int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { drawable Drawable }
+    { x int }
+    { y int }
+    { width int }
+    { height int }
+    { count int }
+    { major_code int }
+    { minor_code int } ;
 
 STRUCT: XNoExposeEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ drawable Drawable }
-{ major_code int }
-{ minor_code int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { drawable Drawable }
+    { major_code int }
+    { minor_code int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XVisibilityEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ state int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { state int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XCreateWindowEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ parent Window }
-{ window Window }
-{ x int }
-{ y int }
-{ width int }
-{ height int }
-{ border_width int }
-{ override_redirect Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { parent Window }
+    { window Window }
+    { x int }
+    { y int }
+    { width int }
+    { height int }
+    { border_width int }
+    { override_redirect Bool } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XDestroyWindowEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XUnmapEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window }
-{ from_configure Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window }
+    { from_configure Bool } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XMapEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window }
-{ override_redirect Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window }
+    { override_redirect Bool } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XMapRequestEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ parent Window }
-{ window Window } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { parent Window }
+    { window Window } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XReparentEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window }
-{ parent Window }
-{ x int }
-{ y int }
-{ override_redirect Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window }
+    { parent Window }
+    { x int }
+    { y int }
+    { override_redirect Bool } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XConfigureEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window }
-{ x int }
-{ y int }
-{ width int }
-{ height int }
-{ border_width int }
-{ above Window }
-{ override_redirect Bool } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window }
+    { x int }
+    { y int }
+    { width int }
+    { height int }
+    { border_width int }
+    { above Window }
+    { override_redirect Bool } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XGravityEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window }
-{ x int }
-{ y int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window }
+    { x int }
+    { y int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XResizeRequestEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ width int }
-{ height int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { width int }
+    { height int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XConfigureRequestEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ parent Window }
-{ window Window }
-{ x int }
-{ y int }
-{ width int }
-{ height int }
-{ border_width int }
-{ above Window }
-{ detail int }
-{ value_mask ulong } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { parent Window }
+    { window Window }
+    { x int }
+    { y int }
+    { width int }
+    { height int }
+    { border_width int }
+    { above Window }
+    { detail int }
+    { value_mask ulong } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XCirculateEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ event Window }
-{ window Window }
-{ place int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { event Window }
+    { window Window }
+    { place int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XCirculateRequestEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ parent Window }
-{ window Window }
-{ place int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { parent Window }
+    { window Window }
+    { place int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XPropertyEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ atom Atom }
-{ time Time }
-{ state int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { atom Atom }
+    { time Time }
+    { state int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XSelectionClearEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ selection Atom }
-{ time Time } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { selection Atom }
+    { time Time } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XSelectionRequestEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ owner Window }
-{ requestor Window }
-{ selection Atom }
-{ target Atom }
-{ property Atom }
-{ time Time } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { owner Window }
+    { requestor Window }
+    { selection Atom }
+    { target Atom }
+    { property Atom }
+    { time Time } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XSelectionEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ requestor Window }
-{ selection Atom }
-{ target Atom }
-{ property Atom }
-{ time Time } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { requestor Window }
+    { selection Atom }
+    { target Atom }
+    { property Atom }
+    { time Time } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XColormapEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ colormap Colormap }
-{ new Bool }
-{ state int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { colormap Colormap }
+    { new Bool }
+    { state int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XClientMessageEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ message_type Atom }
-{ format int }
-{ data0 long }
-{ data1 long }
-{ data2 long }
-{ data3 long }
-{ data4 long } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { message_type Atom }
+    { format int }
+    { data0 long }
+    { data1 long }
+    { data2 long }
+    { data3 long }
+    { data4 long } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XMappingEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ request int }
-{ first_keycode int }
-{ count int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { request int }
+    { first_keycode int }
+    { count int } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XErrorEvent
-{ type int }
-{ display Display* }
-{ resourceid XID }
-{ serial ulong }
-{ error_code uchar }
-{ request_code uchar }
-{ minor_code uchar } ;
+    { type int }
+    { display Display* }
+    { resourceid XID }
+    { serial ulong }
+    { error_code uchar }
+    { request_code uchar }
+    { minor_code uchar } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 STRUCT: XKeymapEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ window Window }
-{ pad int[8] } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { window Window }
+    { pad int[8] } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
@@ -1014,22 +1054,22 @@ STRUCT: XKeymapEvent
 
 ! GenericEvent is the standard event for all newer extensions.
 STRUCT: XGenericEvent
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ extension int }
-{ evtype int } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { extension int }
+    { evtype int } ;
 
 STRUCT: XGenericEventCookie
-{ type int }
-{ serial ulong }
-{ send_event Bool }
-{ display Display* }
-{ extension int }
-{ evtype int }
-{ cookie uint }
-{ data void* } ;
+    { type int }
+    { serial ulong }
+    { send_event Bool }
+    { display Display* }
+    { extension int }
+    { evtype int }
+    { cookie uint }
+    { data void* } ;
 
 X-FUNCTION: Bool XGetEventData ( Display* dpy, XGenericEventCookie* cookie )
 X-FUNCTION: void XFreeEventData ( Display* dpy, XGenericEventCookie* cookie )
@@ -1037,41 +1077,41 @@ X-FUNCTION: void XFreeEventData ( Display* dpy, XGenericEventCookie* cookie )
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 UNION-STRUCT: XEvent
-{ int int }
-{ XAnyEvent XAnyEvent }
-{ XKeyEvent XKeyEvent }
-{ XButtonEvent XButtonEvent }
-{ XMotionEvent XMotionEvent }
-{ XCrossingEvent XCrossingEvent }
-{ XFocusChangeEvent XFocusChangeEvent }
-{ XExposeEvent XExposeEvent }
-{ XGraphicsExposeEvent XGraphicsExposeEvent }
-{ XNoExposeEvent XNoExposeEvent }
-{ XVisibilityEvent XVisibilityEvent }
-{ XCreateWindowEvent XCreateWindowEvent }
-{ XDestroyWindowEvent XDestroyWindowEvent }
-{ XUnmapEvent XUnmapEvent }
-{ XMapEvent XMapEvent }
-{ XMapRequestEvent XMapRequestEvent }
-{ XReparentEvent XReparentEvent }
-{ XConfigureEvent XConfigureEvent }
-{ XGravityEvent XGravityEvent }
-{ XResizeRequestEvent XResizeRequestEvent }
-{ XConfigureRequestEvent XConfigureRequestEvent }
-{ XCirculateEvent XCirculateEvent }
-{ XCirculateRequestEvent XCirculateRequestEvent }
-{ XPropertyEvent XPropertyEvent }
-{ XSelectionClearEvent XSelectionClearEvent }
-{ XSelectionRequestEvent XSelectionRequestEvent }
-{ XSelectionEvent XSelectionEvent }
-{ XColormapEvent XColormapEvent }
-{ XClientMessageEvent XClientMessageEvent }
-{ XMappingEvent XMappingEvent }
-{ XErrorEvent XErrorEvent }
-{ XKeymapEvent XKeymapEvent }
-{ XGenericEvent XGenericEvent }
-{ XGenericEventCookie XGenericEventCookie }
-{ padding long[24] } ;
+    { int int }
+    { XAnyEvent XAnyEvent }
+    { XKeyEvent XKeyEvent }
+    { XButtonEvent XButtonEvent }
+    { XMotionEvent XMotionEvent }
+    { XCrossingEvent XCrossingEvent }
+    { XFocusChangeEvent XFocusChangeEvent }
+    { XExposeEvent XExposeEvent }
+    { XGraphicsExposeEvent XGraphicsExposeEvent }
+    { XNoExposeEvent XNoExposeEvent }
+    { XVisibilityEvent XVisibilityEvent }
+    { XCreateWindowEvent XCreateWindowEvent }
+    { XDestroyWindowEvent XDestroyWindowEvent }
+    { XUnmapEvent XUnmapEvent }
+    { XMapEvent XMapEvent }
+    { XMapRequestEvent XMapRequestEvent }
+    { XReparentEvent XReparentEvent }
+    { XConfigureEvent XConfigureEvent }
+    { XGravityEvent XGravityEvent }
+    { XResizeRequestEvent XResizeRequestEvent }
+    { XConfigureRequestEvent XConfigureRequestEvent }
+    { XCirculateEvent XCirculateEvent }
+    { XCirculateRequestEvent XCirculateRequestEvent }
+    { XPropertyEvent XPropertyEvent }
+    { XSelectionClearEvent XSelectionClearEvent }
+    { XSelectionRequestEvent XSelectionRequestEvent }
+    { XSelectionEvent XSelectionEvent }
+    { XColormapEvent XColormapEvent }
+    { XClientMessageEvent XClientMessageEvent }
+    { XMappingEvent XMappingEvent }
+    { XErrorEvent XErrorEvent }
+    { XKeymapEvent XKeymapEvent }
+    { XGenericEvent XGenericEvent }
+    { XGenericEventCookie XGenericEventCookie }
+    { padding long[24] } ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 ! 11 - Event Handling Functions
@@ -1107,27 +1147,43 @@ X-FUNCTION: int XSetErrorHandler ( void* handler )
 CONSTANT: None 0
 
 X-FUNCTION: int XGrabPointer (
-  Display* display,
-  Window grab_window,
-  Bool owner_events,
-  uint event_mask,
-  int pointer_mode,
-  int keyboard_mode,
-  Window confine_to,
-  Cursor cursor,
-  Time time )
+    Display* display,
+    Window grab_window,
+    Bool owner_events,
+    uint event_mask,
+    int pointer_mode,
+    int keyboard_mode,
+    Window confine_to,
+    Cursor cursor,
+    Time time
+)
 
 X-FUNCTION: Status XUngrabPointer ( Display* display, Time time )
 X-FUNCTION: Status XChangeActivePointerGrab ( Display* display, uint event_mask, Cursor cursor, Time time )
-X-FUNCTION: Status XGrabKey ( Display* display, int keycode, uint modifiers, Window grab_window, Bool owner_events, int pointer_mode, int keyboard_mode )
-X-FUNCTION: int XGrabKeyboard ( Display* display, Window grab_window, Bool owner_events, int pointer_mode, int keyboard_mode, Time time )
+X-FUNCTION: Status XGrabKey (
+    Display* display, int keycode, uint modifiers,
+    Window grab_window, Bool owner_events,
+    int pointer_mode, int keyboard_mode
+)
+X-FUNCTION: int XGrabKeyboard (
+    Display* display, Window grab_window,
+    Bool owner_events,
+    int pointer_mode, int keyboard_mode, Time time
+)
 X-FUNCTION: Status XSetInputFocus ( Display* display, Window focus, int revert_to, Time time )
 
-X-FUNCTION: Status XGetInputFocus ( Display* display,
-                                  Window*  focus_return,
-                                  int*     revert_to_return )
+X-FUNCTION: Status XGetInputFocus (
+    Display* display,
+    Window* focus_return,
+    int* revert_to_return
+)
 
-X-FUNCTION: Status XWarpPointer ( Display* display, Window src_w, Window dest_w, int src_x, int src_y, uint src_width, uint src_height, int dest_x, int dest_y )
+X-FUNCTION: Status XWarpPointer (
+    Display* display,
+    Window src_w, Window dest_w,
+    int src_x, int src_y, uint src_width, uint src_height,
+    int dest_x, int dest_y
+)
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 ! 14 - Inter-Client Communication Functions
@@ -1141,10 +1197,16 @@ X-FUNCTION: Status XGetTransientForHint ( Display* display, Window w, Window* pr
 ! 14.1.1.  Manipulating Top-Level Windows
 
 X-FUNCTION: Status XIconifyWindow (
-        Display* display, Window w, int screen_number )
+    Display* display,
+    Window w,
+    int screen_number
+)
 
 X-FUNCTION: Status XWithdrawWindow (
-        Display* display, Window w, int screen_number )
+    Display* display,
+    Window w,
+    int screen_number
+)
 
 ! 14.1.6 - Setting and Reading the WM_HINTS Property
 
@@ -1203,11 +1265,12 @@ X-FUNCTION: Status XGetWMProtocols (
 X-FUNCTION: KeySym XLookupKeysym ( XKeyEvent* key_event, int index )
 
 X-FUNCTION: int XLookupString (
-        XKeyEvent* event_struct,
-        void* buffer_return,
-        int bytes_buffer,
-        KeySym* keysym_return,
-        XComposeStatus* status_in_out )
+    XKeyEvent* event_struct,
+    void* buffer_return,
+    int bytes_buffer,
+    KeySym* keysym_return,
+    XComposeStatus* status_in_out
+)
 
 ! 16.7 Determining the Appropriate Visual Type
 
@@ -1224,16 +1287,16 @@ CONSTANT: VisualBitsPerRGBMask          0x100
 CONSTANT: VisualAllMask                 0x1FF
 
 STRUCT: XVisualInfo
-        { visual Visual* }
-        { visualid VisualID }
-        { screen int }
-        { depth uint }
-        { class int }
-        { red_mask ulong }
-        { green_mask ulong }
-        { blue_mask ulong }
-        { colormap_size int }
-        { bits_per_rgb int } ;
+    { visual Visual* }
+    { visualid VisualID }
+    { screen int }
+    { depth uint }
+    { class int }
+    { red_mask ulong }
+    { green_mask ulong }
+    { blue_mask ulong }
+    { colormap_size int }
+    { bits_per_rgb int } ;
 
 ! 16.9 Manipulating Bitmaps
 X-FUNCTION: Pixmap XCreateBitmapFromData (
@@ -1247,25 +1310,27 @@ X-FUNCTION: Pixmap XCreateBitmapFromData (
 ! Appendix C - Extensions
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 X-FUNCTION: Bool XQueryExtension (
-        Display* display,
-        c-string name,
-        int* major_opcode_return,
-        int* first_event_return,
-        int* first_error_return )
+    Display* display,
+    c-string name,
+    int* major_opcode_return,
+    int* first_event_return,
+    int* first_error_return
+)
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 ! Appendix D - Compatibility Functions
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
 X-FUNCTION: Status XSetStandardProperties (
-        Display* display,
-        Window w,
-        c-string window_name,
-        c-string icon_name,
-        Pixmap icon_pixmap,
-        c-string* argv,
-        int argc,
-        XSizeHints* hints )
+    Display* display,
+    Window w,
+    c-string window_name,
+    c-string icon_name,
+    Pixmap icon_pixmap,
+    c-string* argv,
+    int argc,
+    XSizeHints* hints
+)
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
@@ -1417,7 +1482,15 @@ X-FUNCTION: XIM XOpenIM ( Display* dpy, void* rdb, c-string res_name, c-string r
 
 X-FUNCTION: Status XCloseIM ( XIM im )
 
-X-FUNCTION: XIC XCreateIC ( XIM im, c-string key1, Window value1, c-string key2, Window value2, c-string key3, int value3, c-string key4, c-string value4, c-string key5, c-string value5, int key6 )
+X-FUNCTION: XIC XCreateIC (
+    XIM im,
+    c-string key1, Window value1,
+    c-string key2, Window value2,
+    c-string key3, int value3,
+    c-string key4, c-string value4,
+    c-string key5, c-string value5,
+    int key6
+)
 
 X-FUNCTION: void XDestroyIC ( XIC ic )