Ver código fonte

+ output unsupported aligns as comments (I don't think z80asm supports an align directive)

git-svn-id: branches/z80@44424 -
nickysn 5 anos atrás
pai
commit
b91269b821
1 arquivos alterados com 5 adições e 0 exclusões
  1. 5 0
      compiler/z80/agz80asm.pas

+ 5 - 0
compiler/z80/agz80asm.pas

@@ -205,6 +205,11 @@ unit agz80asm;
                 writer.AsmWritePChar(tai_comment(hp).str);
                 writer.AsmLn;
               end;
+            ait_align :
+              begin
+                if tai_align_abstract(hp).aligntype>1 then
+                  writer.AsmWriteLn(asminfo^.comment+'Unsupported ALIGN '+tostr(tai_align_abstract(hp).aligntype));
+              end;
             ait_label :
               begin
                 if tai_label(hp).labsym.is_used then