X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/ac55319310f2e0b8ac5d848c1591b5e72d49c9b3..7839389a75b803b3f9e3c88a8f269c178497cdb2:/ltimevalstuff.pas?ds=inline

diff --git a/ltimevalstuff.pas b/ltimevalstuff.pas
index df0342c..5e81933 100755
--- a/ltimevalstuff.pas
+++ b/ltimevalstuff.pas
@@ -3,10 +3,14 @@
   which is included in the package
   ----------------------------------------------------------------------------- }
 
+{$ifdef fpc}
+  {$mode delphi}
+{$endif}
+
 unit ltimevalstuff;
 interface
 
-{$ifdef win32}
+{$ifdef mswindows}
   type
     ttimeval = record
       tv_sec : longint; 
@@ -16,7 +20,7 @@ interface
   {$ifdef ver1_0}
     uses linux;
   {$else}
-    uses baseunix,unix,unixutil;
+    uses baseunix,unix,unixutil,sockets;
   {$endif}
 {$endif}