mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 01:09:31 +02:00
+ handle ait_marker in the sdcc-sdasz80 asm writer
git-svn-id: branches/z80@44811 -
This commit is contained in:
parent
d1f265fe51
commit
e86cd0df7a
@ -828,6 +828,11 @@ unit agsdasz80;
|
||||
begin
|
||||
WriteInstruction(taicpu(hp));
|
||||
end;
|
||||
ait_marker :
|
||||
if tai_marker(hp).kind=mark_NoLineInfoStart then
|
||||
inc(InlineLevel)
|
||||
else if tai_marker(hp).kind=mark_NoLineInfoEnd then
|
||||
dec(InlineLevel);
|
||||
ait_stab,
|
||||
ait_force_line,
|
||||
ait_function_name : ;
|
||||
|
Loading…
Reference in New Issue
Block a user