浏览代码

* Dotted filenames for package libcurl

Michaël Van Canneyt 2 年之前
父节点
当前提交
b2543a0f18
共有 3 个文件被更改,包括 20 次插入0 次删除
  1. 3 0
      packages/libcurl/namespaced/Api.Libcurl.pp
  2. 3 0
      packages/libcurl/namespaces.lst
  3. 14 0
      packages/libcurl/src/libcurl.pp

+ 3 - 0
packages/libcurl/namespaced/Api.Libcurl.pp

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

+ 3 - 0
packages/libcurl/namespaces.lst

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

+ 14 - 0
packages/libcurl/src/libcurl.pp

@@ -16,21 +16,35 @@
    website for this. 
    website for this. 
  }
  }
 {$mode objfpc}
 {$mode objfpc}
+{$IFNDEF FPC_DOTTEDUNITS}
 unit libcurl;
 unit libcurl;
+{$ENDIF FPC_DOTTEDUNITS}
 
 
 interface
 interface
 
 
 {$IFDEF WINDOWS}
 {$IFDEF WINDOWS}
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
 uses
   ctypes;
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 
 type
 type
   time_t = clong;
   time_t = clong;
   PTime_t = ^time_t;
   PTime_t = ^time_t;
   off_t  = clong;
   off_t  = clong;
 {$ELSE}
 {$ELSE}
+
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  UnixApi.Types;
+{$ELSE FPC_DOTTEDUNITS}
 uses
 uses
   unixtype;
   unixtype;
+{$ENDIF FPC_DOTTEDUNITS}
+
 {$ENDIF}
 {$ENDIF}
 
 
 {$IFDEF FPC}
 {$IFDEF FPC}