Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-05-08 23:31:54 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

added tms1400 callstack

Browse Source
This commit is contained in:
hap 2015-01-18 02:36:18 +01:00
parent d19cec2f72
commit 2044302b96
2 changed files with 73 additions and 38 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

100
src/emu/cpu/tms0980/tms0980.c
View File

@ -429,6 +429,7 @@ void tms1xxx_cpu_device::device_start()
m_sr = 0; m_sr = 0;
m_pa = 0; m_pa = 0;
m_pb = 0; m_pb = 0;
m_ps = 0;
m_a = 0; m_a = 0;
m_x = 0; m_x = 0;
m_y = 0; m_y = 0;
@ -466,6 +467,7 @@ void tms1xxx_cpu_device::device_start()
save_item(NAME(m_sr)); save_item(NAME(m_sr));
save_item(NAME(m_pa)); save_item(NAME(m_pa));
save_item(NAME(m_pb)); save_item(NAME(m_pb));
save_item(NAME(m_ps));
save_item(NAME(m_a)); save_item(NAME(m_a));
save_item(NAME(m_x)); save_item(NAME(m_x));
save_item(NAME(m_y)); save_item(NAME(m_y));
@ -636,7 +638,7 @@ void tms1400_cpu_device::device_reset()
tms1100_cpu_device::device_reset(); tms1100_cpu_device::device_reset();
// small differences in 00-3f area // small differences in 00-3f area
m_fixed_decode[0x09] = F_COMX; // ! m_fixed_decode[0x09] = F_COMX;
m_fixed_decode[0x0b] = F_TPC; m_fixed_decode[0x0b] = F_TPC;
} }
@ -958,49 +960,50 @@ void tms0980_cpu_device::set_cki_bus()
//------------------------------------------------- //-------------------------------------------------
// handle branches: // handle branches:
// TMS1000/common
// note: add(latch) and bl(branch latch) are specific to 0980 series, // note: add(latch) and bl(branch latch) are specific to 0980 series,
// c(chapter) bits are specific to 1100(and 1400) series // c(chapter) bits are specific to 1100(and 1400) series
// TMS1000/common:
void tms1xxx_cpu_device::op_br() void tms1xxx_cpu_device::op_br()
{ {
// BR/BL: conditional branch // BR/BL: conditional branch
if (!m_status) if (m_status)
return; {
if (m_clatch == 0)
if (!m_clatch) m_pa = m_pb;
m_pa = m_pb; m_ca = m_cb;
m_ca = m_cb; m_pc = m_opcode & m_pc_mask;
m_pc = m_opcode & m_pc_mask; }
} }
void tms1xxx_cpu_device::op_call() void tms1xxx_cpu_device::op_call()
{ {
// CALL/CALLL: conditional call // CALL/CALLL: conditional call
if (!m_status) if (m_status)
return;
UINT8 prev_pa = m_pa;
if (!m_clatch)
{ {
m_sr = m_pc; UINT8 prev_pa = m_pa;
m_clatch = 1;
m_pa = m_pb; if (m_clatch == 0)
m_cs = m_ca; {
m_clatch = 1;
m_sr = m_pc;
m_pa = m_pb;
m_cs = m_ca;
}
m_ca = m_cb;
m_pb = prev_pa;
m_pc = m_opcode & m_pc_mask;
} }
m_ca = m_cb;
m_pb = prev_pa;
m_pc = m_opcode & m_pc_mask;
} }
void tms1xxx_cpu_device::op_retn() void tms1xxx_cpu_device::op_retn()
{ {
// RETN: return from subroutine // RETN: return from subroutine
if (m_clatch) if (m_clatch == 1)
{ {
m_pc = m_sr;
m_clatch = 0; m_clatch = 0;
m_pc = m_sr;
m_ca = m_cs; m_ca = m_cs;
} }
m_add = 0; m_add = 0;
@ -1014,31 +1017,60 @@ void tms1xxx_cpu_device::op_retn()
void tms1400_cpu_device::op_br() void tms1400_cpu_device::op_br()
{ {
// BR/BL: conditional branch // BR/BL: conditional branch
if (!m_status) if (m_status)
return; {
m_pa = m_pb; // don't care about clatch
//.. m_ca = m_cb;
m_pc = m_opcode & m_pc_mask;
}
} }
void tms1400_cpu_device::op_call() void tms1400_cpu_device::op_call()
{ {
// CALL/CALLL: conditional call // CALL/CALLL: conditional call
if (!m_status) if (m_status)
return; {
// 3-level stack, mask clatch 3 bits (no need to mask others)
m_clatch = (m_clatch << 1 | 1) & 7;
//.. m_sr = m_sr << m_pc_bits | m_pc;
m_pc = m_opcode & m_pc_mask;
m_ps = m_ps << 4 | m_pa;
m_pa = m_pb;
m_cs = m_cs << 2 | m_ca;
m_ca = m_cb;
}
else
{
m_pb = m_pa;
m_cb = m_ca;
}
} }
void tms1400_cpu_device::op_retn() void tms1400_cpu_device::op_retn()
{ {
// RETN: return from subroutine // RETN: return from subroutine
//.. if (m_clatch & 1)
{
m_clatch >>= 1;
m_pc = m_sr & m_pc_mask;
m_sr >>= m_pc_bits;
m_pa = m_pb = m_ps & 0xf;
m_ps >>= 4;
m_ca = m_cb = m_cs & 3;
m_cs >>= 2;
}
} }
// handle other: // handle other:
// TMS1000/common: // TMS1000/common
void tms1xxx_cpu_device::op_sbit() void tms1xxx_cpu_device::op_sbit()
{ {
@ -1158,6 +1190,7 @@ void tms0970_cpu_device::op_tdo()
// TMS0980-specific (and possibly child classes) // TMS0980-specific (and possibly child classes)
void tms0980_cpu_device::op_comx() void tms0980_cpu_device::op_comx()
{ {
// COMX: complement X register, but not the MSB // COMX: complement X register, but not the MSB
@ -1203,6 +1236,7 @@ void tms1xxx_cpu_device::op_sbl()
// TMS0270-specific // TMS0270-specific
void tms0270_cpu_device::op_setr() void tms0270_cpu_device::op_setr()
{ {
// same as default, but handle write to output in dynamic_output // same as default, but handle write to output in dynamic_output

11
src/emu/cpu/tms0980/tms0980.h
View File

@ -139,15 +139,16 @@ protected:
optional_device<pla_device> m_spla; optional_device<pla_device> m_spla;
UINT8 m_pc; // 6 or 7-bit program counter UINT8 m_pc; // 6 or 7-bit program counter
UINT8 m_sr; // 6 or 7-bit subroutine return register UINT32 m_sr; // 6 or 7-bit subroutine return register(s)
UINT8 m_pa; // 4-bit page address register UINT8 m_pa; // 4-bit page address register
UINT8 m_pb; // 4-bit page buffer register UINT8 m_pb; // 4-bit page buffer register
UINT16 m_ps; // 4-bit page subroutine register(s)
UINT8 m_a; // 4-bit accumulator UINT8 m_a; // 4-bit accumulator
UINT8 m_x; // 2,3,or 4-bit RAM X register UINT8 m_x; // 2,3,or 4-bit RAM X register
UINT8 m_y; // 4-bit RAM Y register UINT8 m_y; // 4-bit RAM Y register
UINT8 m_ca; // chapter address bit UINT8 m_ca; // chapter address register
UINT8 m_cb; // chapter buffer bit UINT8 m_cb; // chapter buffer register
UINT8 m_cs; // chapter subroutine bit UINT16 m_cs; // chapter subroutine register(s)
UINT16 m_r; UINT16 m_r;
UINT16 m_o; UINT16 m_o;
UINT8 m_cki_bus; UINT8 m_cki_bus;
@ -160,7 +161,7 @@ protected:
UINT8 m_status; UINT8 m_status;
UINT8 m_status_latch; UINT8 m_status_latch;
UINT8 m_eac; // end around carry bit UINT8 m_eac; // end around carry bit
UINT8 m_clatch; // call latch bit UINT8 m_clatch; // call latch bit(s)
UINT8 m_add; // add latch bit UINT8 m_add; // add latch bit
UINT8 m_bl; // branch latch bit UINT8 m_bl; // branch latch bit