* Dotted filenames for package x11

packages/x11/namespaced/Api.X11.Cursorfont.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Cursorfont;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i cursorfont.pp}

packages/x11/namespaced/Api.X11.Deckeysym.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Deckeysym;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i deckeysym.pp}

packages/x11/namespaced/Api.X11.Dpms.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Dpms;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i dpms.pp}

packages/x11/namespaced/Api.X11.Fontconfig.pas

@@ -0,0 +1,3 @@
+unit Api.X11.Fontconfig;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i fontconfig.pas}

packages/x11/namespaced/Api.X11.Hpkeysym.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Hpkeysym;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i hpkeysym.pp}

packages/x11/namespaced/Api.X11.Keysym.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Keysym;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i keysym.pp}

packages/x11/namespaced/Api.X11.Mitmisc.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Mitmisc;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i mitmisc.pp}

packages/x11/namespaced/Api.X11.Multibuf.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Multibuf;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i multibuf.pp}

packages/x11/namespaced/Api.X11.Security.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Security;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i security.pp}

packages/x11/namespaced/Api.X11.Shape.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Shape;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i shape.pp}

packages/x11/namespaced/Api.X11.Sunkeysym.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Sunkeysym;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i sunkeysym.pp}

packages/x11/namespaced/Api.X11.Sync.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Sync;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i sync.pp}

packages/x11/namespaced/Api.X11.X.pp

@@ -0,0 +1,3 @@
+unit Api.X11.X;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i x.pp}

packages/x11/namespaced/Api.X11.Xag.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xag;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xag.pp}

packages/x11/namespaced/Api.X11.Xatom.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xatom;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xatom.pp}

packages/x11/namespaced/Api.X11.Xcms.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xcms;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xcms.pp}

packages/x11/namespaced/Api.X11.Xcup.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xcup;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xcup.pp}

packages/x11/namespaced/Api.X11.Xdbe.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xdbe;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xdbe.pp}

packages/x11/namespaced/Api.X11.Xevi.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xevi;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xevi.pp}

packages/x11/namespaced/Api.X11.Xext.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xext;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xext.pp}

packages/x11/namespaced/Api.X11.Xf86dga.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xf86dga;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xf86dga.pp}

packages/x11/namespaced/Api.X11.Xf86keysym.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xf86keysym;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xf86keysym.pp}

packages/x11/namespaced/Api.X11.Xf86vmode.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xf86vmode;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xf86vmode.pp}

packages/x11/namespaced/Api.X11.Xfixes.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xfixes;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xfixes.pp}

packages/x11/namespaced/Api.X11.Xft.pas

@@ -0,0 +1,3 @@
+unit Api.X11.Xft;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xft.pas}

packages/x11/namespaced/Api.X11.Xge.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xge;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xge.pp}

packages/x11/namespaced/Api.X11.Xi.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xi;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xi.pp}

packages/x11/namespaced/Api.X11.Xi2.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xi2;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xi2.pp}

packages/x11/namespaced/Api.X11.Xinerama.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xinerama;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xinerama.pp}

packages/x11/namespaced/Api.X11.Xinput.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xinput;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xinput.pp}

packages/x11/namespaced/Api.X11.Xinput2.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xinput2;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xinput2.pp}

packages/x11/namespaced/Api.X11.Xkb.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xkb;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xkb.pp}

packages/x11/namespaced/Api.X11.Xkblib.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xkblib;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xkblib.pp}

packages/x11/namespaced/Api.X11.Xlbx.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xlbx;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xlbx.pp}

packages/x11/namespaced/Api.X11.Xlib.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xlib;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xlib.pp}

packages/x11/namespaced/Api.X11.Xmd.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xmd;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xmd.pp}

packages/x11/namespaced/Api.X11.Xrandr.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xrandr;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xrandr.pp}

packages/x11/namespaced/Api.X11.Xrender.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xrender;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xrender.pp}

packages/x11/namespaced/Api.X11.Xresource.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xresource;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xresource.pp}

packages/x11/namespaced/Api.X11.Xshm.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xshm;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xshm.pp}

packages/x11/namespaced/Api.X11.Xtestext1.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xtestext1;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xtestext1.pp}

packages/x11/namespaced/Api.X11.Xutil.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xutil;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xutil.pp}

packages/x11/namespaced/Api.X11.Xv.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xv;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xv.pp}

packages/x11/namespaced/Api.X11.Xvlib.pp

@@ -0,0 +1,3 @@
+unit Api.X11.Xvlib;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i xvlib.pp}

packages/x11/namespaces.lst

@@ -0,0 +1,46 @@
+src/xrandr.pp=namespaced/Api.X11.Xrandr.pp
+{s*:src/}=namespaced/
+{i+:src/}
+src/shape.pp=namespaced/Api.X11.Shape.pp
+src/x.pp=namespaced/Api.X11.X.pp
+src/sunkeysym.pp=namespaced/Api.X11.Sunkeysym.pp
+src/xmd.pp=namespaced/Api.X11.Xmd.pp
+src/xge.pp=namespaced/Api.X11.Xge.pp
+src/xevi.pp=namespaced/Api.X11.Xevi.pp
+src/xvlib.pp=namespaced/Api.X11.Xvlib.pp
+src/xkb.pp=namespaced/Api.X11.Xkb.pp
+src/xinput2.pp=namespaced/Api.X11.Xinput2.pp
+src/deckeysym.pp=namespaced/Api.X11.Deckeysym.pp
+src/xtestext1.pp=namespaced/Api.X11.Xtestext1.pp
+src/xinerama.pp=namespaced/Api.X11.Xinerama.pp
+src/xf86dga.pp=namespaced/Api.X11.Xf86dga.pp
+src/dpms.pp=namespaced/Api.X11.Dpms.pp
+src/xcms.pp=namespaced/Api.X11.Xcms.pp
+src/xatom.pp=namespaced/Api.X11.Xatom.pp
+src/xi.pp=namespaced/Api.X11.Xi.pp
+src/xlib.pp=namespaced/Api.X11.Xlib.pp
+src/xag.pp=namespaced/Api.X11.Xag.pp
+src/xcup.pp=namespaced/Api.X11.Xcup.pp
+src/xinput.pp=namespaced/Api.X11.Xinput.pp
+src/mitmisc.pp=namespaced/Api.X11.Mitmisc.pp
+src/xi2.pp=namespaced/Api.X11.Xi2.pp
+src/security.pp=namespaced/Api.X11.Security.pp
+src/xlbx.pp=namespaced/Api.X11.Xlbx.pp
+src/xfixes.pp=namespaced/Api.X11.Xfixes.pp
+src/xf86vmode.pp=namespaced/Api.X11.Xf86vmode.pp
+src/xkblib.pp=namespaced/Api.X11.Xkblib.pp
+src/xext.pp=namespaced/Api.X11.Xext.pp
+src/fontconfig.pas=namespaced/Api.X11.Fontconfig.pas
+src/cursorfont.pp=namespaced/Api.X11.Cursorfont.pp
+src/xshm.pp=namespaced/Api.X11.Xshm.pp
+src/xf86keysym.pp=namespaced/Api.X11.Xf86keysym.pp
+src/xresource.pp=namespaced/Api.X11.Xresource.pp
+src/keysym.pp=namespaced/Api.X11.Keysym.pp
+src/hpkeysym.pp=namespaced/Api.X11.Hpkeysym.pp
+src/sync.pp=namespaced/Api.X11.Sync.pp
+src/multibuf.pp=namespaced/Api.X11.Multibuf.pp
+src/xrender.pp=namespaced/Api.X11.Xrender.pp
+src/xv.pp=namespaced/Api.X11.Xv.pp
+src/xdbe.pp=namespaced/Api.X11.Xdbe.pp
+src/xutil.pp=namespaced/Api.X11.Xutil.pp
+src/xft.pas=namespaced/Api.X11.Xft.pas

packages/x11/src/cursorfont.pp

@@ -27,7 +27,9 @@ from The Open Group.
 
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit cursorfont;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 

packages/x11/src/deckeysym.pp

@@ -45,7 +45,9 @@ SOFTWARE.
 
 ******************************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit deckeysym;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 

packages/x11/src/dpms.pp

@@ -26,12 +26,19 @@ Equipment Corporation.
 
 ******************************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit dpms;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.Xmd, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, xmd, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/fontconfig.pas

@@ -21,15 +21,22 @@
  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  * PERFORMANCE OF THIS SOFTWARE.
  *}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit fontconfig;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 {$packrecords c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, Api.X11.X, Api.X11.Xlib, Api.X11.Xutil, System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils, X, XLib, Xutil, ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   {$IF Defined(DARWIN)}

packages/x11/src/hpkeysym.pp

@@ -55,7 +55,9 @@ performance, or use of this material.
 
 *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit hpkeysym;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 

packages/x11/src/keysym.pp

@@ -10,7 +10,9 @@ XK_a   XK_a
 XK_A   XKc_A
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 Unit keysym;
+{$ENDIF FPC_DOTTEDUNITS}
 
 Interface
 

packages/x11/src/mitmisc.pp

@@ -26,12 +26,19 @@ in this Software without prior written authorization from The Open Group.
 
 (* RANDOM CRUFT! THIS HAS NO OFFICIAL X CONSORTIUM OR X PROJECT TEAM BLESSING *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit mitmisc;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/multibuf.pp

@@ -23,14 +23,21 @@ used in advertising or otherwise to promote the sale, use or other dealings
 in this Software without prior written authorization from The Open Group.
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit multibuf;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/security.pp

@@ -24,14 +24,21 @@ other dealings in this Software without prior written authorization
 from The Open Group.
 *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit security;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/shape.pp

@@ -24,14 +24,21 @@ in this Software without prior written authorization from The Open Group.
 
 ********************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit shape;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS C}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib, Api.X11.Xutil;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib, xutil;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/sunkeysym.pp

@@ -46,7 +46,9 @@ in this Software without prior written authorization from The Open Group.
 
 ***********************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit sunkeysym;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 

packages/x11/src/sync.pp

@@ -48,14 +48,21 @@ PERFORMANCE OF THIS SOFTWARE.
 
 ******************************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit sync;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/x.pp

@@ -1,7 +1,14 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit x;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifndef os2}
   {$LinkLib c}

packages/x11/src/xag.pp

@@ -24,14 +24,21 @@ other dealings in this Software without prior written authorization
 from The Open Group.
 *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xag;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
 {$MODE objfpc}
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xatom.pp

@@ -1,9 +1,15 @@
 {$PACKRECORDS C}
 {$MODE OBJFPC}
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xatom;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses Api.X11.X;
+{$ELSE FPC_DOTTEDUNITS}
 uses X;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {
  THIS IS A GENERATED FILE

packages/x11/src/xcms.pp

@@ -1,7 +1,14 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xcms;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  Api.X11.X,Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   x,xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifndef os2}
   {$LinkLib c}

packages/x11/src/xcup.pp

@@ -24,12 +24,19 @@ in this Software without prior written authorization from The Open Group.
 
 *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xcup;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xdbe.pp

@@ -30,14 +30,21 @@
  *
  *****************************************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xdbe;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xevi.pp

@@ -21,14 +21,21 @@ OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH
 THE USE OR PERFORMANCE OF THIS SOFTWARE.
 ********************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xevi;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xext.pp

@@ -23,14 +23,21 @@ used in advertising or otherwise to promote the sale, use or other dealings
 in this Software without prior written authorization from The Open Group.
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xext;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS C}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xf86dga.pp

@@ -3,14 +3,21 @@
 }
 { $XFree86: xc/include/extensions/xf86dga.h,v 3.20 1999/10/13 04:20:48 dawes Exp $ }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 Unit xf86dga;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS C}
 
 Interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+Uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 Uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 Const
   libXxf86dga='Xxf86dga';

packages/x11/src/xf86keysym.pp

@@ -13,7 +13,9 @@
  * these archives, these are from memory and usage.
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xf86keysym;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 

packages/x11/src/xf86vmode.pp

@@ -32,15 +32,22 @@ from Kaleb S. KEITHLEY
 
 { THIS IS NOT AN X CONSORTIUM STANDARD OR AN X PROJECT TEAM SPECIFICATION }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 Unit xf86vmode;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 {$DEFINE MACROS}
 
 Interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+Uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 Uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 Const
   libXxf86vm = 'Xxf86vm';

packages/x11/src/xfixes.pp

@@ -43,14 +43,21 @@
  * PERFORMANCE OF THIS SOFTWARE.
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xfixes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
 {$PACKRECORDS C}
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXfixes = 'Xfixes';

packages/x11/src/xft.pas

@@ -40,15 +40,22 @@
     Description:
       Xft interface functions
 }
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xft;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 {$packrecords c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, Api.X11.X, Api.X11.Xlib, Api.X11.Xutil, System.CTypes, Api.X11.Fontconfig, Api.X11.Xrender;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes, SysUtils, X, XLib, Xutil, ctypes, fontconfig, xrender;
+{$ENDIF FPC_DOTTEDUNITS}
 
 //#include FT_FREETYPE_H
 //#include <fontconfig/fontconfig.h>

packages/x11/src/xge.pp

@@ -23,14 +23,21 @@
  * Authors: Peter Hutterer, University of South Australia, NICTA
  *
  *)
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xge;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
 {$PACKRECORDS C}
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXge = 'Xext';

packages/x11/src/xi.pp

@@ -60,11 +60,18 @@ Histroy:
 }
 {$PACKRECORDS C} {$MACRO ON} {$DEFINE MACROS}
 {$MODE OBJFPC}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xi;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
         sz_xGetExtensionVersionReq           =  8;

packages/x11/src/xi2.pp

@@ -21,14 +21,21 @@
  * DEALINGS IN THE SOFTWARE.
  *
  *)
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xi2;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS C}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   XInput_2_0                              = 7;

packages/x11/src/xinerama.pp

@@ -1,7 +1,14 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xinerama;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+ System.CTypes, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
  ctypes, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 { Converted from X11/Xinerama.h }
 
 {$PACKRECORDS C}

packages/x11/src/xinput.pp

@@ -46,15 +46,22 @@ SOFTWARE.
 
 { Definitions used by the library and client }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xinput;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
 {$PACKRECORDS C}
 {$MODE objfpc}
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib, Api.X11.Xi;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib, xi;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXi = 'Xi';

packages/x11/src/xinput2.pp

@@ -22,7 +22,9 @@
  *
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xinput2;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
@@ -30,8 +32,13 @@ interface
 
 { Definitions used by the library and client }
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib, Api.X11.Xi2, Api.X11.Xge, Api.X11.Xfixes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, X, Xlib, XI2, Xge, Xfixes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 
 const

packages/x11/src/xkb.pp

@@ -70,9 +70,15 @@ History:
 {$PACKRECORDS C}
 {$MODE OBJFPC} {$MACRO ON} {$DEFINE MACRO}
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit XKB;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses X, Xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 function XkbCharToInt    (v       : Byte) : SmallInt;
 procedure XkbIntTo2Chars (i : Word; var h, l : byte);
@@ -2130,7 +2136,11 @@ procedure SrvXkbFreeGeometry (geom : PXkbGeometryPtr; which : Word; freeMap : Bo
 {$endif}
 
 implementation
+{$IFDEF FPC_DOTTEDUNITS}
+uses Api.X11.Xi;
+{$ELSE FPC_DOTTEDUNITS}
 uses xi;
+{$ENDIF FPC_DOTTEDUNITS}
 
 (************************************* xkb *************************************)
 function XkbLegalXILedClass (c : Cardinal) : LongBool;

packages/x11/src/xkblib.pp

@@ -51,10 +51,16 @@ History:
 {$PACKRECORDS C}
 {$MODE OBJFPC} {$MACRO ON} {$DEFINE MACRO}
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xkblib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses Api.X11.X, Api.X11.Xlib, Api.X11.Xkb;
+{$ELSE FPC_DOTTEDUNITS}
 uses X, Xlib, XKB;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
         PXkbAnyEvent = ^TXkbAnyEvent;

packages/x11/src/xlbx.pp

@@ -20,12 +20,19 @@
  *
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xlbx;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xlib.pp

@@ -1,8 +1,15 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
 {$mode objfpc}
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes,Api.X11.X;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes,x;
+{$ENDIF FPC_DOTTEDUNITS}
 {$define MACROS}
 
 {$ifndef os2}

packages/x11/src/xmd.pp

@@ -45,7 +45,9 @@ SOFTWARE.
 
 ******************************************************************)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xmd;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 

packages/x11/src/xrandr.pp

@@ -24,14 +24,21 @@
   Author:  Jim Gettys, HP Labs, HP.
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xrandr;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
 {$PACKRECORDS c}
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXrandr = 'Xrandr';

packages/x11/src/xrender.pp

@@ -1,9 +1,16 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xrender;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  Api.X11.X, Api.X11.Xlib, System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   x, xlib, ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifndef os2}
   {$LinkLib c}

packages/x11/src/xresource.pp

@@ -1,7 +1,14 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xresource; {$DEFINE MACRO}
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  Api.X11.X,Api.X11.Xlib {$IFDEF MACROS}, System.Strings{$ENDIF};
+{$ELSE FPC_DOTTEDUNITS}
 uses
   x,xlib {$IFDEF MACROS}, strings{$ENDIF};
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifndef os2}
   {$LinkLib c}

packages/x11/src/xshm.pp

@@ -1,7 +1,14 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xshm;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes,Api.X11.X,Api.X11.Xlib;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes,x,xlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifndef os2}
   {$LinkLib c}

packages/x11/src/xtestext1.pp

@@ -51,14 +51,21 @@ University of California.
 
 *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xtestext1;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib, Api.X11.Xmd;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib, xmd;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   libXext = 'Xext';

packages/x11/src/xutil.pp

@@ -1,7 +1,14 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xutil;
+{$ENDIF FPC_DOTTEDUNITS}
 interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes,Api.X11.X,Api.X11.Xlib,Api.X11.Keysym;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes,x,xlib,keysym;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$define MACROS}
 

packages/x11/src/xv.pp

@@ -23,14 +23,21 @@ SOFTWARE.
 ******************************************************************}
 { $XFree86: xc/include/extensions/Xv.h,v 1.3 1999/05/23 06:33:22 dawes Exp $ }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xv;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
 {$PACKRECORDS c}
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  Api.X11.X;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   x;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
   XvName = 'XVideo';

packages/x11/src/xvlib.pp

@@ -51,12 +51,19 @@ SOFTWARE.
 **
 *}
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xvlib;
+{$ENDIF FPC_DOTTEDUNITS}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes, Api.X11.X, Api.X11.Xlib, Api.X11.Xshm, Api.X11.Xv;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes, x, xlib, xshm, xv;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$PACKRECORDS c}