Ver código fonte

* Dotted filenames for package httpd24

Michaël Van Canneyt 2 anos atrás
pai
commit
71226c3bb2

+ 3 - 0
packages/httpd24/namespaced/Api.Httpd24.Apr.pas

@@ -0,0 +1,3 @@
+unit Api.Httpd24.Apr;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i apr24.pas}

+ 3 - 0
packages/httpd24/namespaced/Api.Httpd24.pas

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

+ 6 - 0
packages/httpd24/namespaces.lst

@@ -0,0 +1,6 @@
+src/httpd24.pas=namespaced/Api.Httpd24.pas
+{s*:src/}=namespaced/
+{i+:src/}
+src/apr/apr24.pas=namespaced/Api.Httpd24.Apr.pas
+{s*:src/apr/}=namespaced/
+{i+:src/apr/}

+ 12 - 0
packages/httpd24/src/apr/apr24.pas

@@ -13,7 +13,9 @@
  * See the License for the specific language governing permissions and
  * limitations under the License.
   }
+{$IFNDEF FPC_DOTTEDUNITS}
 unit apr24;
+{$ENDIF FPC_DOTTEDUNITS}
 {$ifdef fpc}
   {$mode delphi}
   {$H-}
@@ -28,6 +30,15 @@ unit apr24;
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+{$ifdef Windows}
+  WinApi.Windows,
+{$ELSE}
+  UnixApi.Types,
+{$ENDIF}
+  System.SysUtils, System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
 {$ifdef WINDOWS}
   Windows,
@@ -35,6 +46,7 @@ uses
   UnixType,
 {$ENDIF}
   SysUtils, ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
   
 const
 {$IFDEF WINDOWS}

+ 12 - 0
packages/httpd24/src/httpd24.pas

@@ -42,7 +42,9 @@
  * @defgroup APACHE_CORE_DAEMON HTTP Daemon Routine
  * @
   }
+{$IFNDEF FPC_DOTTEDUNITS}
 unit httpd24;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifdef fpc}
   {$mode delphi}
@@ -80,6 +82,15 @@ unit httpd24;
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+{$ifdef Windows}
+  WinApi.Windows,
+{$ELSE}
+  UnixApi.Types,
+{$ENDIF}
+  System.CTypes, Api.HttpD24.Apr;
+{$ELSE FPC_DOTTEDUNITS}
 uses
 {$ifdef WINDOWS}
   Windows,
@@ -87,6 +98,7 @@ uses
   UnixType,
 {$ENDIF}
   ctypes, apr24;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
 {$ifndef fpc}