* Handle potential double defintion of INFINITE

rtl/inc/objpash.inc

@@ -641,7 +641,7 @@
   end;
 
   const
-    INFINITE = Cardinal($FFFFFFFF);
+    INFINITE = CARDINAL($FFFFFFFF);
 
   function MonitorEnter(Const aObject: TObject; aTimeout: Cardinal = INFINITE): Boolean; inline;
   function MonitorTryEnter(Const aObject: TObject): Boolean; inline;

rtl/win/sysos.inc

@@ -21,7 +21,9 @@ const
    INVALID_HANDLE_VALUE = THandle(-1);
 
    IGNORE = 0;               { Ignore signal }
+{$IF NOT DECLARED(INFINITE)}   
    INFINITE = longint($FFFFFFFF);     { Infinite timeout }
+{$ENDIF}   
 
    { flags for CreateFile }
    GENERIC_READ=$80000000;