X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/ac55319310f2e0b8ac5d848c1591b5e72d49c9b3..f0a6e6591b3d306641b78dfed4a4066935e82096:/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}