paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-05 04:58:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* set unsupported constants to FIXME in the ait_const2str table

Browse Source 
* fix ait_const_16bit_unaligned

git-svn-id: branches/z80@44448 -
This commit is contained in:
nickysn 2020-03-30 23:59:41 +00:00
parent c1888dd6e2
commit ca1fd28ac1
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/z80/agsdasz80.pas
View File

@ -60,11 +60,11 @@ unit agsdasz80;
line_length = 70;
max_tokens : longint = 25;
ait_const2str : array[aitconst_128bit..aitconst_64bit_unaligned] of string[20]=(
#9''#9,#9'DQ'#9,#9'DD'#9,#9'.dw'#9,#9'.db'#9,
#9''#9,#9'FIXMEDQ'#9,#9'FIXMEDD'#9,#9'.dw'#9,#9'.db'#9,
#9'FIXMESLEB',#9'FIXEMEULEB',
#9'DD RVA'#9,#9'DD SECREL32'#9,
#9'FIXMEDD RVA'#9,#9'FIXMEDD SECREL32'#9,
#9'FIXME',#9'FIXME',#9'FIXME',#9'FIXME',
#9'DW'#9,#9'DD'#9,#9'DQ'#9
#9'.dw'#9,#9'FIXMEDD'#9,#9'FIXMEDQ'#9
);
function TSdccSdasZ80Assembler.EscapeLabel(s: ansistring): ansistring;