Browse Source

* win32 only test

peter 23 years ago
parent
commit
2e8fb6513c
1 changed files with 4 additions and 1 deletions
  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.
-