1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-27 20:47:38 +00:00

Add ITS machine called KA.

This commit is contained in:
Lars Brinkhoff
2017-12-20 13:23:34 +01:00
committed by Eric Swenson
parent 6be8b181ae
commit e1f80890d4
9 changed files with 32 additions and 4 deletions

View File

@@ -45,6 +45,7 @@ TERMIN
NEWCOD==1 ; Assume a KS unless otherwise informed
IFE MCOND MX, NEWCOD==0 ;Use old code on MX KL only (running old ITS)
IFE MCOND KA, NEWCOD==0 ;Use old code on KA too
DEFINE SYSCAL OP,ARGS
.CALL [SETZ ? SIXBIT/OP/ ? ARGS ((SETZ))]

View File

@@ -58,6 +58,7 @@ AIMCHN::SIXBIT/AI/
MLMCHN::SIXBIT/ML/
DMMCHN::SIXBIT/DM/
MCMCHN::SIXBIT/MC/
KAMCHN::SIXBIT/KA/
LMCHNTB:: OFFSET 0
GO: MOVE P,[-LPDL-1,,PDL-1]
@@ -638,7 +639,7 @@ MGDBIN: 6,,(SIXBIT /DSK/)
SIXBIT /MAGDMP/
SIXBIT /BIN/
MDBFN2: IRPS X,,[AI ML DM MC]
MDBFN2: IRPS X,,[AI ML DM MC KA]
SIXBIT/BIN.!X/
TERMIN