6502/CLK
1
0
Fork 0
mirror of https://github.com/TomHarte/CLK.git synced 2024-11-21 21:33:54 +00:00
Code Issues Projects Releases Wiki Activity

Convert index macro.

Browse Source
This commit is contained in:
Thomas Harte 2024-10-09 21:50:03 -04:00
parent f136151064
commit 49012a21c8
1 changed files with 13 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
InstructionSets/M50740/Executor.cpp
View File

@ -553,6 +553,16 @@ template <Operation operation> void Executor::perform(uint8_t *operand [[maybe_u
carry_flag_ = (~temp16 >> 8)&1;
};
const auto index = [&](auto op) {
if(index_mode_) {
uint8_t t = read(x_);
op(t);
write(x_, t);
} else {
op(a_);
}
};
switch(operation) {
case Operation::LDA:
if(index_mode_) {
@ -684,36 +694,25 @@ template <Operation operation> void Executor::perform(uint8_t *operand [[maybe_u
Operations affected by the index mode flag: ADC, AND, CMP, EOR, LDA, ORA, and SBC.
*/
#define index(op) \
if(index_mode_) { \
uint8_t t = read(x_); \
op(t); \
write(x_, t); \
} else { \
op(a_); \
}
case Operation::ORA: {
const auto op_ora = [&](uint8_t x) {
const auto op_ora = [&](uint8_t &x) {
set_nz(x |= *operand);
};
index(op_ora);
} break;
case Operation::AND: {
const auto op_and = [&](uint8_t x) {
const auto op_and = [&](uint8_t &x) {
set_nz(x &= *operand);
};
index(op_and);
} break;
case Operation::EOR: {
const auto op_eor = [&](uint8_t x) {
const auto op_eor = [&](uint8_t &x) {
set_nz(x ^= *operand);
};
index(op_eor);
} break;
#undef index
case Operation::CMP:
if(index_mode_) {
op_cmp(read(x_));