mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 12:49:12 +02:00
m68k: BSET and BCLR's dest operand is actually readwrite, not write only. fixes sets with regvars, when the regvar is spilled
git-svn-id: trunk@33476 -
This commit is contained in:
parent
4b54a82678
commit
2e64db935a
@ -473,14 +473,14 @@ type
|
||||
|
||||
case opcode of
|
||||
// CPU opcodes
|
||||
A_MOVE, A_MOVEQ, A_MOVEA, A_MVZ, A_MVS, A_MOV3Q, A_LEA,
|
||||
A_BSET, A_BCLR:
|
||||
A_MOVE, A_MOVEQ, A_MOVEA, A_MVZ, A_MVS, A_MOV3Q, A_LEA:
|
||||
if opnr=1 then
|
||||
result:=operand_write;
|
||||
A_ADD, A_ADDQ, A_ADDX, A_SUB, A_SUBQ, A_SUBX,
|
||||
A_AND, A_LSR, A_LSL, A_ASR, A_ASL, A_EOR, A_EORI, A_OR,
|
||||
A_ROL, A_ROR, A_ROXL, A_ROXR,
|
||||
A_MULS, A_MULU, A_DIVS, A_DIVU, A_DIVSL, A_DIVUL:
|
||||
A_MULS, A_MULU, A_DIVS, A_DIVU, A_DIVSL, A_DIVUL,
|
||||
A_BSET, A_BCLR:
|
||||
if opnr=1 then
|
||||
result:=operand_readwrite;
|
||||
A_DBRA:
|
||||
|
Loading…
Reference in New Issue
Block a user