Explorar el Código

* win32 only test

peter hace 23 años
padre
commit
2e8fb6513c
Se han modificado 1 ficheros con 4 adiciones y 1 borrados
  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.
-