Browse Source

+ support ait_datablock in the sdcc-sdasz80 asm output

git-svn-id: branches/z80@44499 -
nickysn 5 years ago
parent
commit
c3ac9d06c8
1 changed files with 10 additions and 0 deletions
  1. 10 0
      compiler/z80/agsdasz80.pas

+ 10 - 0
compiler/z80/agsdasz80.pas

@@ -552,6 +552,16 @@ unit agsdasz80;
             ait_symbol_end :
               begin
               end;
+            ait_datablock :
+              begin
+                if tai_datablock(hp).is_global or SmartAsm then
+                  writer.AsmWrite(tai_datablock(hp).sym.name + '::')
+                else
+                  writer.AsmWrite(tai_datablock(hp).sym.name + ':');
+                {if SmartAsm then
+                  AddSymbol(tai_datablock(hp).sym.name,true);}
+                writer.AsmWriteLn(#9'.rs'#9+tostr(tai_datablock(hp).size));
+              end;
             ait_const:
               begin
                 consttype:=tai_const(hp).consttype;