소스 검색

* Dotted filenames for package httpd13

Michaël Van Canneyt 2 년 전
부모
커밋
ef5824a4d2
3개의 변경된 파일18개의 추가작업 그리고 0개의 파일을 삭제
  1. 3 0
      packages/httpd13/namespaced/Api.HttpD13.pas
  2. 3 0
      packages/httpd13/namespaces.lst
  3. 12 0
      packages/httpd13/src/httpd.pas

+ 3 - 0
packages/httpd13/namespaced/Api.HttpD13.pas

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

+ 3 - 0
packages/httpd13/namespaces.lst

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

+ 12 - 0
packages/httpd13/src/httpd.pas

@@ -21,7 +21,9 @@
  * See the License for the specific language governing permissions and
  * limitations under the License.
  }
+{$IFNDEF FPC_DOTTEDUNITS}
 unit httpd;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$ifdef fpc}
   {$mode delphi}{$H+}
@@ -47,6 +49,15 @@ unit httpd;
 
 interface
 
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+{$ifdef Windows}
+  WinApi.Windows,
+{$ELSE}
+  UnixApi.Types,
+{$ENDIF}
+  System.CTypes;
+{$ELSE FPC_DOTTEDUNITS}
 uses
 {$ifdef WINDOWS}
   Windows,
@@ -54,6 +65,7 @@ uses
   UnixType,
 {$ENDIF}
   ctypes;
+{$ENDIF FPC_DOTTEDUNITS}
 
 const
 {$ifndef fpc}