Ver código fonte

* Avoid pointer to signed integer warning

git-svn-id: trunk@17895 -
pierre 14 anos atrás
pai
commit
af098d08d5
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      compiler/powerpc64/rappcgas.pas

+ 1 - 1
compiler/powerpc64/rappcgas.pas

@@ -687,7 +687,7 @@ begin
     dec(ord(hs[0]));
     actcondition.dirhint := DH_Plus;
   end;
-  actopcode := tasmop(ptrint(iasmops.Find(hs)));
+  actopcode := tasmop(ptruint(iasmops.Find(hs)));
   if actopcode <> A_NONE then
   begin
     if actcondition.dirhint <> DH_None then