paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 18:47:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Dotted filenames for package oracle

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-03-06 14:57:58 +01:00
parent d312b46d1b
commit a99f330e3b
10 changed files with 35 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/oracle/namespaced/Api.Oracle.Oci.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Oracle.Oci;
{$DEFINE FPC_DOTTEDUNITS}
{$i oci.pp}

3
packages/oracle/namespaced/Api.Oracle.OciDyn.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Oracle.OciDyn;
{$DEFINE FPC_DOTTEDUNITS}
{$i ocidyn.pp}

3
packages/oracle/namespaced/Api.Oracle.OraOci.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Oracle.OraOci;
{$DEFINE FPC_DOTTEDUNITS}
{$i oraoci.pp}

3
packages/oracle/namespaced/Api.Oracle.Types.pp Normal file
View File

@ -0,0 +1,3 @@
unit Api.Oracle.Types;
{$DEFINE FPC_DOTTEDUNITS}
{$i oratypes.pp}

6
packages/oracle/namespaces.lst Normal file
View File

@ -0,0 +1,6 @@
src/oratypes.pp=namespaced/Api.Oracle.Types.pp
{s*:src/}=namespaced/
{i+:src/}
src/oci.pp=namespaced/Api.Oracle.Oci.pp
src/oraoci.pp=namespaced/Api.Oracle.OraOci.pp
src/ocidyn.pp=namespaced/Api.Oracle.OciDyn.pp

9
packages/oracle/src/oci.inc
View File

@ -4,12 +4,21 @@
interface
{$IFDEF FPC_DOTTEDUNITS}
uses System.CTypes,
{$IFDEF LinkDynamically}
System.SysUtils,
{$ENDIF}
System.DynLibs, // always for sharedsuffix
Api.Oracle.Types;
{$ELSE FPC_DOTTEDUNITS}
uses ctypes,
{$IFDEF LinkDynamically}
sysutils,
{$ENDIF}
Dynlibs, // always for sharedsuffix
oratypes;
{$ENDIF FPC_DOTTEDUNITS}
{
Automatically converted by H2Pas 1.0.0 from oci.h

2
packages/oracle/src/oci.pp
View File

@ -1,4 +1,6 @@
{$IFNDEF FPC_DOTTEDUNITS}
unit oci;
{$ENDIF FPC_DOTTEDUNITS}
{$UNDEF LinkDynamically}

2
packages/oracle/src/ocidyn.pp
View File

@ -1,4 +1,6 @@
{$IFNDEF FPC_DOTTEDUNITS}
unit OCIdyn;
{$ENDIF FPC_DOTTEDUNITS}
{$DEFINE LinkDynamically}

2
packages/oracle/src/oraoci.pp
View File

@ -12,7 +12,9 @@
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
{$IFNDEF FPC_DOTTEDUNITS}
unit OraOCI;
{$ENDIF FPC_DOTTEDUNITS}
{$MODE FPC}
{$linklib clntsh}

2
packages/oracle/src/oratypes.pp
View File

@ -1,5 +1,7 @@
{$IFNDEF FPC_DOTTEDUNITS}
unit oratypes;
{$ENDIF FPC_DOTTEDUNITS}
interface
{