소스 검색

* win32 only test

peter 23 년 전
부모
커밋
2e8fb6513c
1개의 변경된 파일4개의 추가작업 그리고 1개의 파일을 삭제
  1. 4 1
      tests/webtbs/tw1820.pp

+ 4 - 1
tests/webtbs/tw1820.pp

@@ -3,6 +3,8 @@ unit tw1820;
 
 interface
 
+{$ifdef win32}
+
 {$mode Delphi}
 Uses Windows;
 
@@ -15,7 +17,8 @@ type
 const
   IEnumTasks = IEnumWorkItems;
 
+{$endif}
+
   implementation
 
 end.
-