Pārlūkot izejas kodu

* Dotted filenames for package zorba

Michaël Van Canneyt 2 gadi atpakaļ
vecāks
revīzija
6183327b18

+ 3 - 0
packages/zorba/namespaced/Api.Xqc.pas

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

+ 3 - 0
packages/zorba/namespaced/Api.Zorba.pp

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

+ 3 - 0
packages/zorba/namespaced/Api.ZorbaDyn.pp

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

+ 5 - 0
packages/zorba/namespaces.lst

@@ -0,0 +1,5 @@
+src/zorba.pas=namespaced/Api.Zorba.pas
+{s*:src/}=namespaced/
+{i+:src/}
+src/zorbadyn.pas=namespaced/Api.ZorbaDyn.pas
+src/xqc.pas=namespaced/Api.Xqc.pas

+ 8 - 0
packages/zorba/src/xqc.pas

@@ -19,7 +19,9 @@
   Copyright(C) 2009 by Ivo Steinmann
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit xqc;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}{$H+}
 {$PACKRECORDS C}
@@ -27,9 +29,15 @@ unit xqc;
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.Classes,
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Classes,
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$IFDEF UNIX}
   {$DEFINE extdecl:=cdecl}

+ 5 - 0
packages/zorba/src/zorba.inc

@@ -20,8 +20,13 @@
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.SysUtils,System.CTypes, System.DynLibs, Api.Xqc;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   Sysutils,ctypes, dynlibs, xqc;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$IFDEF UNIX}
   {$DEFINE extdecl:=cdecl}

+ 2 - 0
packages/zorba/src/zorba.pas

@@ -1,4 +1,6 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit zorba;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$i zorba.inc}
 

+ 2 - 0
packages/zorba/src/zorbadyn.pas

@@ -1,4 +1,6 @@
+{$IFNDEF FPC_DOTTEDUNITS}
 unit zorbadyn;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$DEFINE LOAD_DYNAMICALLY}
 {$i zorba.inc}