Browse Source

m68k: don't find helper 'opcodes' as real opcodes... (i guess is the right solution for the problem which r22796 originally aimed to fix)

git-svn-id: trunk@27577 -
Károly Balogh 11 years ago
parent
commit
daefb42925
1 changed files with 4 additions and 1 deletions
  1. 4 1
      compiler/m68k/ra68kmot.pas

+ 4 - 1
compiler/m68k/ra68kmot.pas

@@ -172,7 +172,10 @@ const
 
 
         { Search opcodes }
         { Search opcodes }
         actopcode:=tasmop(PtrInt(iasmops.Find(hs)));
         actopcode:=tasmop(PtrInt(iasmops.Find(hs)));
-        if actopcode<>A_NONE then
+        { Also filter the helper opcodes, they can't be valid
+          while reading an assembly source }
+        if not (actopcode in
+           [A_NONE, A_LABEL, A_DBXX, A_SXX, A_BXX, A_FBXX]) then
           begin
           begin
             actasmtoken:=AS_OPCODE;
             actasmtoken:=AS_OPCODE;
             result:=TRUE;
             result:=TRUE;