Explorar el Código

* Dotted filenames for package odbc

Michaël Van Canneyt hace 2 años
padre
commit
4537f34c82

+ 3 - 0
packages/odbc/namespaced/Api.Odbc.pas

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

+ 3 - 0
packages/odbc/namespaced/Api.OdbcDyn.pas

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

+ 4 - 0
packages/odbc/namespaces.lst

@@ -0,0 +1,4 @@
+src/odbcsqldyn.pas=namespaced/Api.OdbcDyn.pas
+{s*:src/}=namespaced/
+{i+:src/}
+src/odbcsql.pas=namespaced/Api.Odbc.pas

+ 7 - 0
packages/odbc/src/odbcsql.inc

@@ -26,10 +26,17 @@
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+     System.DynLibs,
+     System.CTypes,
+     System.SysUtils;
+{$ELSE FPC_DOTTEDUNITS}
 uses
      Dynlibs,
      ctypes,
      sysutils;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$IFDEF Unix}
   {$DEFINE extdecl:=cdecl}

+ 2 - 0
packages/odbc/src/odbcsql.pas

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

+ 2 - 0
packages/odbc/src/odbcsqldyn.pas

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