|
@@ -235,7 +235,7 @@ unit aoptcpu;
|
|
|
end;
|
|
|
if ([Ch_RCarryFlag,Ch_RParityFlag,Ch_RAuxiliaryFlag,Ch_RZeroFlag,Ch_RSignFlag,Ch_ROverflowFlag,
|
|
|
Ch_RWCarryFlag,Ch_RWParityFlag,Ch_RWAuxiliaryFlag,Ch_RWZeroFlag,Ch_RWSignFlag,Ch_RWOverflowFlag,
|
|
|
- Ch_RFlags,Ch_RWFlags]*Ch<>[]) and (reg=NR_DEFAULTFLAGS) then
|
|
|
+ Ch_RFlags,Ch_RWFlags,Ch_RFLAGScc]*Ch<>[]) and (reg=NR_DEFAULTFLAGS) then
|
|
|
begin
|
|
|
RegReadByInstruction := true;
|
|
|
exit
|
|
@@ -289,7 +289,7 @@ function InstrReadsFlags(p: tai): boolean;
|
|
|
if InsProp[taicpu(p).opcode].Ch*
|
|
|
[Ch_RCarryFlag,Ch_RParityFlag,Ch_RAuxiliaryFlag,Ch_RZeroFlag,Ch_RSignFlag,Ch_ROverflowFlag,
|
|
|
Ch_RWCarryFlag,Ch_RWParityFlag,Ch_RWAuxiliaryFlag,Ch_RWZeroFlag,Ch_RWSignFlag,Ch_RWOverflowFlag,
|
|
|
- Ch_RFlags,Ch_RWFlags,Ch_All]<>[] then
|
|
|
+ Ch_RFlags,Ch_RWFlags,Ch_RFLAGScc,Ch_All]<>[] then
|
|
|
exit;
|
|
|
ait_label:
|
|
|
exit;
|