瀏覽代碼

* Dotted filenames for package libcups

Michaël Van Canneyt 2 年之前
父節點
當前提交
1a0a36f928
共有 3 個文件被更改,包括 23 次插入0 次删除
  1. 3 0
      packages/libcups/namespaced/Api.Cupsdyn.pp
  2. 3 0
      packages/libcups/namespaces.lst
  3. 17 0
      packages/libcups/src/cupsdyn.pp

+ 3 - 0
packages/libcups/namespaced/Api.Cupsdyn.pp

@@ -0,0 +1,3 @@
+unit Api.Cupsdyn;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i cupsdyn.pp}

+ 3 - 0
packages/libcups/namespaces.lst

@@ -0,0 +1,3 @@
+src/cupsdyn.pp=namespaced/Api.Cupsdyn.pp
+{s*:src/}=namespaced/
+{i+:src/}

+ 17 - 0
packages/libcups/src/cupsdyn.pp

@@ -29,13 +29,29 @@
    mars 08 2005 - Dynamique link lib by Jesus Reyes (big thanks)
    mars 08 2005 - Dynamique link lib by Jesus Reyes (big thanks)
                 - Some modifications for work with Mdk 10.1
                 - Some modifications for work with Mdk 10.1
 ------------------------------------------------------------------------------}
 ------------------------------------------------------------------------------}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit cupsdyn;
 unit cupsdyn;
+{$ENDIF FPC_DOTTEDUNITS}
 
 
 {$mode objfpc}{$H+}
 {$mode objfpc}{$H+}
 {.$define UseLibC}
 {.$define UseLibC}
 interface
 interface
 
 
 
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes, System.SysUtils, System.DynLibs,
+  {$ifdef UseLibC}
+  {$IFDEF darwin}
+  miniCupsLibc
+  {$ELSE}
+  Api.Libc
+  {$ENDIF}
+  {$else}
+  UnixApi.Base, UnixApi.Unix, System.Net.Sockets
+  {$endif}
+  ;
+{$ELSE FPC_DOTTEDUNITS}
 uses
 uses
   Classes, SysUtils, dynlibs,
   Classes, SysUtils, dynlibs,
   {$ifdef UseLibC}
   {$ifdef UseLibC}
@@ -48,6 +64,7 @@ uses
   baseunix, unix, sockets
   baseunix, unix, sockets
   {$endif}
   {$endif}
   ;
   ;
+{$ENDIF FPC_DOTTEDUNITS}
 
 
 {$PACKRECORDS C}
 {$PACKRECORDS C}