github.com/PDP-10.klh10
1
0
Fork 0
mirror of https://github.com/PDP-10/klh10.git synced 2026-02-27 01:00:02 +00:00
Code Issues Releases Wiki Activity

Changes for running ITS on KL10 model B.

Browse Source
This commit is contained in:
Lars Brinkhoff
2019-07-04 18:23:02 +02:00
parent fcf812e4d7
commit 9ef0b199f7
2 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/dvdte.c
View File

@@ -793,7 +793,7 @@ static void dte_dosecp(register struct dte *dt)
{
register w10_t w;
w = vm_pget(vm_physmap(cpu.mr_ebraddr + DTEE_CMD));
w = vm_pget(vm_physmap(0*cpu.mr_ebraddr + DTEE_CMD));
switch (RHGET(w) & DTECMDF_CMD) {
default:
fprintf(dt->dt_dv.dv_dbf, "[DTECMD: unknown %lo]\r\n",
@@ -932,10 +932,10 @@ static void dte_dosecp(register struct dte *dt)
op10m_setz(w); /* No input, return 0 */
else {
ch &= 0177; /* Mask for safety */
fe_ctyout(ch); /* Echo, sigh */
//fe_ctyout(ch); /* Echo, sigh */
LRHSET(w, 0, ch & 0377);
}
vm_pset(vm_physmap(cpu.mr_ebraddr + DTEE_F11), w);
vm_pset(vm_physmap(0*cpu.mr_ebraddr + DTEE_F11), w);
}
break;
@@ -1051,7 +1051,7 @@ static void dte_dosecp(register struct dte *dt)
** TTY output under RSX20F (only KLDCP), but shouldn't hurt.
*/
op10m_seto(w);
vm_pset(vm_physmap(cpu.mr_ebraddr + DTEE_FLG), w);
vm_pset(vm_physmap(0*cpu.mr_ebraddr + DTEE_FLG), w);
}
/* KLDCP clock facilities */

2
src/kn10cpu.c
View File

@@ -918,8 +918,10 @@ insdef(i_xct)
register w10_t instr;
for (;;) {
#if 0
if (ac && !cpu.mr_usrmode) /* If non-zero AC, becomes PXCT, */
return i_pxct(op, ac, e); /* but only in EXEC mode. */
#endif
instr = vm_fetch(e); /* Fetch instr (may page fault) */
#if KLH10_EXTADR