mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 20:29:23 +02:00
+ emit lowercase instructions in the z80 asm output
git-svn-id: branches/z80@44486 -
This commit is contained in:
parent
050244e5f0
commit
2003020d68
@ -63,13 +63,13 @@ unit cpubase;
|
|||||||
lastop = high(tasmop);
|
lastop = high(tasmop);
|
||||||
|
|
||||||
std_op2str:op2strtable=('',
|
std_op2str:op2strtable=('',
|
||||||
'ADD','ADC','AND','BIT','CALL','CCF','CP','CPD','CPDR',
|
'add','adc','and','bit','call','ccf','cp','cpd','cpdr',
|
||||||
'CPI','CPIR','CPL','DAA','DEC','DI','DJNZ','EI','EX',
|
'cpi','cpir','cpl','daa','dec','di','djnz','ei','ex',
|
||||||
'EXX','HALT','IM','IN','INC','IND','INDR','INI','INIR',
|
'exx','halt','im','in','inc','ind','indr','ini','inir',
|
||||||
'JP','JR','LD','LDD','LDDR','LDI','LDIR','NEG','NOP','OR',
|
'jp','jr','ld','ldd','lddr','ldi','ldir','neg','nop','or',
|
||||||
'OTDR','OTIR','OUT','OUTD','OUTI','POP','PUSH','RES','RET','RETI',
|
'otdr','otir','out','outd','outi','pop','push','res','ret','reti',
|
||||||
'RETN','RL','RLA','RLC','RLCA','RLD','RR','RRA','RRC',
|
'retn','rl','rla','rlc','rlca','rld','rr','rra','rrc',
|
||||||
'RRCA','RRD','RST','SBC','SCF','SET','SLA','SRA','SRL','SUB','XOR');
|
'rrca','rrd','rst','sbc','scf','set','sla','sra','srl','sub','xor');
|
||||||
|
|
||||||
{ call/reg instructions are not considered as jmp instructions for the usage cases of
|
{ call/reg instructions are not considered as jmp instructions for the usage cases of
|
||||||
this set }
|
this set }
|
||||||
|
Loading…
Reference in New Issue
Block a user