mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-06 15:31:19 +02:00
+ output unsupported aligns as comments (I don't think z80asm supports an align directive)
git-svn-id: branches/z80@44424 -
This commit is contained in:
parent
c8ec4731e1
commit
b91269b821
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user