ifdef mswindows instead of win32 for 64 bits support
[lcore.git] / ltimevalstuff.pas
index df0342c3448e4ad2c69c547a6b45188dc17fc844..5e81933d2db630812b3d16e3bb0cfef0c04dd050 100755 (executable)
@@ -3,10 +3,14 @@
   which is included in the package\r
   ----------------------------------------------------------------------------- }\r
 \r
+{$ifdef fpc}\r
+  {$mode delphi}\r
+{$endif}\r
+\r
 unit ltimevalstuff;\r
 interface\r
 \r
-{$ifdef win32}\r
+{$ifdef mswindows}\r
   type\r
     ttimeval = record\r
       tv_sec : longint; \r
@@ -16,7 +20,7 @@ interface
   {$ifdef ver1_0}\r
     uses linux;\r
   {$else}\r
-    uses baseunix,unix,unixutil;\r
+    uses baseunix,unix,unixutil,sockets;\r
   {$endif}\r
 {$endif}\r
                                 \r