Sfoglia il codice sorgente

* Dotted filenames for package modplug

Michaël Van Canneyt 2 anni fa
parent
commit
b3aaf78961

+ 3 - 0
packages/modplug/namespaced/Api.Modplug.pas

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

+ 3 - 0
packages/modplug/namespaces.lst

@@ -0,0 +1,3 @@
+src/modplug.pas=namespaced/Api.Modplug.pas
+{s*:src/}=namespaced/
+{i+:src/}

+ 8 - 1
packages/modplug/src/modplug.pas

@@ -9,15 +9,22 @@
  * Authors: Kenton Varda <[email protected]> (C interface wrapper)
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit modplug;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}
 {$MINENUMSIZE 4}
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$IFDEF WINDOWS}
   {$DEFINE DYNLINK}
@@ -127,4 +134,4 @@ begin
   FreeMem(p);
 end;
 
-end.
+end.