Переглянути джерело

* Dotted filenames for package mad

Michaël Van Canneyt 2 роки тому
батько
коміт
25f3dad01d

+ 3 - 0
packages/mad/namespaced/Api.Mad.pas

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

+ 3 - 0
packages/mad/namespaces.lst

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

+ 7 - 0
packages/mad/src/mad.pas

@@ -26,15 +26,22 @@
  * so by contacting: Underbit Technologies, Inc. <[email protected]>
  *)
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit mad;
+{$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}