* fixes after 5148 changes for ppc platform

git-svn-id: trunk@5150 -

compiler/powerpc/rappcgas.pas

@@ -611,7 +611,6 @@ Unit rappcgas;
 
     function tppcattreader.is_asmopcode(const s: string):boolean;
       var
-        str2opentry: tstr2opentry;
         cond  : tasmcondflag;
         hs : string;
 
@@ -636,12 +635,11 @@ Unit rappcgas;
             dec(ord(hs[0]));
             actcondition.dirhint:=DH_Plus;
           end;
-        str2opentry:=tstr2opentry(iasmops.search(hs));
-        if assigned(str2opentry) then
+	actopcode := tasmop(ptrint(iasmops.find(hs)));
+        if actopcode <> A_NONE then
           begin
             if actcondition.dirhint<>DH_None then
               message1(asmr_e_unknown_opcode,actasmpattern);
-            actopcode:=str2opentry.op;
             actasmtoken:=AS_OPCODE;
             is_asmopcode:=true;
             exit;

compiler/powerpc64/rappcgas.pas

@@ -609,7 +609,6 @@ end;
 
 function tppcattreader.is_asmopcode(const s: string): boolean;
 var
-  str2opentry: tstr2opentry;
   cond: tasmcondflag;
   hs: string;
 
@@ -634,12 +633,11 @@ begin
     dec(ord(hs[0]));
     actcondition.dirhint := DH_Plus;
   end;
-  str2opentry := tstr2opentry(iasmops.search(hs));
-  if assigned(str2opentry) then
+  actopcode := tasmop(ptrint(iasmops.Find(hs)));
+  if actopcode <> A_NONE then
   begin
     if actcondition.dirhint <> DH_None then
       message1(asmr_e_unknown_opcode, actasmpattern);
-    actopcode := str2opentry.op;
     actasmtoken := AS_OPCODE;
     is_asmopcode := true;
     exit;