* Fixed warnings.

git-svn-id: trunk@40187 -

rtl/android/sysandroid.inc

@@ -26,7 +26,7 @@ const
   EmptyEnv: array[0..2] of PAnsiChar = (nil, nil, nil);
   EmptyCmdLine: array[0..0] of PAnsiChar = ( '' );
 var
-  i: longint;
+  i: cardinal;
   p: PPAnsiChar;
 begin
   // Get the current stack pointer, adjust and save it
@@ -46,7 +46,7 @@ begin
           while i < 200 do
             begin
               Dec(p);
-              if ptrint(p^) = i then
+              if ptruint(p^) = i then
                 begin
                   // argc found
                   operatingsystem_parameter_argc:=i;

rtl/linux/system.pp

@@ -455,7 +455,7 @@ begin
 {$endif}
   IsConsole := TRUE;
   StackLength := CheckInitialStkLen(initialStkLen);
-  StackBottom := pointer((ptruint(initialstkptr) or (page_size - 1)) + 1 - StackLength);
+  StackBottom := pointer(ptruint((ptruint(initialstkptr) or (page_size - 1)) + 1 - StackLength));
 {$ifdef LAST_PAGE_GENERATES_SIGNAL}
   StackBottom:=StackBottom + page_size;
 {$endif}