ソースを参照

* Dotted filenames for package ldap

Michaël Van Canneyt 2 年 前
コミット
00439969ce

+ 3 - 0
packages/ldap/namespaced/Api.Lber.pas

@@ -0,0 +1,3 @@
+unit Api.Lber;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i lber.pas}

+ 3 - 0
packages/ldap/namespaced/Api.Ldap.pas

@@ -0,0 +1,3 @@
+unit Api.Ldap;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i ldap.pas}

+ 4 - 0
packages/ldap/namespaces.lst

@@ -0,0 +1,4 @@
+src/ldap.pas=namespaced/Api.Ldap.pas
+{s*:src/}=namespaced/
+{i+:src/}
+src/lber.pas=namespaced/Api.Lber.pas

+ 2 - 0
packages/ldap/src/lber.pas

@@ -3,7 +3,9 @@
   Copyright (C) 2006 by Ivo Steinmann
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit lber;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}
 

+ 5 - 0
packages/ldap/src/lber_typesh.inc

@@ -18,8 +18,13 @@
  * LBER types
  *)
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 type
   ppcchar                           = ^pcchar;

+ 8 - 0
packages/ldap/src/ldap.pas

@@ -3,15 +3,23 @@
   Copyright (C) 2006 by Ivo Steinmann
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit ldap;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes,
+  Api.Lber;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes,
   lber;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$linklib ldap}