X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Flib%2Fvampimg%2FImagingUtility.pas;h=257ca2655c32f7ecdd007717bb23999a069c362b;hp=c137e1d1386823beaaeefdd0d2aec47e21d5c93e;hb=b5698c71200b362d162a9afb6bf467d877dc6b09;hpb=3d2ad22a4edfeab661196c15d6b57fa3b3eca216

diff --git a/src/lib/vampimg/ImagingUtility.pas b/src/lib/vampimg/ImagingUtility.pas
index c137e1d..257ca26 100644
--- a/src/lib/vampimg/ImagingUtility.pas
+++ b/src/lib/vampimg/ImagingUtility.pas
@@ -354,7 +354,11 @@ uses
 {$IF Defined(MSWINDOWS)}
   Windows;
 {$ELSEIF Defined(FPC)}
-  Dos, BaseUnix, Unix;
+  Dos
+  {$IFDEF Unix}
+    , BaseUnix, Unix
+  {$ENDIF}
+  ;
 {$ELSEIF Defined(DELPHI)}
   Posix.SysTime;
 {$IFEND}
@@ -413,7 +417,7 @@ begin
   Posix.SysTime.GetTimeOfDay(Time, nil);
   Result := Int64(Time.tv_sec) * 1000000 + Time.tv_usec;
 end;
-{$ELSEIF Defined(FPC)}
+{$ELSEIF Defined(FPC) and Defined(UNIX)}
 function GetTimeMicroseconds: Int64;
 var
   TimeVal: TTimeVal;
@@ -421,6 +425,12 @@ begin
   fpGetTimeOfDay(@TimeVal, nil);
   Result := Int64(TimeVal.tv_sec) * 1000000 + TimeVal.tv_usec;
 end;
+{$ELSE}
+  function GetTimeMicroseconds: Int64;
+  begin
+    {$WARNING GetTimeMicroseconds stub!}
+    result := 0
+  end;
 {$IFEND}
 
 function GetTimeMilliseconds: Int64;