paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 14:09:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Dotted filenames for package ldap

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-03-06 14:58:00 +01:00
parent 99549eec92
commit 00439969ce
6 changed files with 25 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/ldap/namespaced/Api.Lber.pas Normal file
View File

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

3
packages/ldap/namespaced/Api.Ldap.pas Normal file
View File

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

4
packages/ldap/namespaces.lst Normal file
View File

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

2
packages/ldap/src/lber.pas
View File

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

5
packages/ldap/src/lber_typesh.inc
View File

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

8
packages/ldap/src/ldap.pas
View File

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