fix an error that prevented compilation with more recent fpc

[lcore.git] / ltimevalstuff.pas

diff --git a/ltimevalstuff.pas b/ltimevalstuff.pas
index bf9767e5c32d45f1452e21d220e3504659bb31d2..a6a3158f3d6d8db36ea7bad7047e35a80975212a 100755 (executable)
--- a/ltimevalstuff.pas
+++ b/ltimevalstuff.pas
@@ -16,7 +16,7 @@ interface
   {$ifdef ver1_0}
     uses linux;
   {$else}
   {$ifdef ver1_0}
     uses linux;
   {$else}

-    uses baseunix,unix;
+    uses baseunix,unix,unixutil;

   {$endif}
 {$endif}
                                 
   {$endif}
 {$endif}
                                 


@@ -33,8 +33,8 @@ const
   {$ifdef ver1_0}
     tv_invalidtimebig : ttimeval = (sec:maxlongint;usec:maxlongint);\r
   {$else}
   {$ifdef ver1_0}
     tv_invalidtimebig : ttimeval = (sec:maxlongint;usec:maxlongint);\r
   {$else}

-    \rtv_invalidtimebig : ttimeval = (tv_sec:maxlongint;tv_usec:maxlongint);\r
-\r  {$endif}
+    tv_invalidtimebig : ttimeval = (tv_sec:maxlongint;tv_usec:maxlongint);\r
+  {$endif}

 implementation\r
 
 {$i unixstuff.inc}
 implementation\r
 
 {$i unixstuff.inc}