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

Update TT ITS.

Browse Source
This commit is contained in:
Lars Brinkhoff
2023-10-03 14:21:43 +02:00
parent 21a752ca6d
commit 5e08439ac4
5 changed files with 17 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/sysen1/pword.2664
View File

@@ -9850,6 +9850,10 @@ bltspc: syscal sstatu,[val x ? val x ? val x ? val x ? val x
blt x,spcend-1 ; all of them to the bitter end
setom dm.flg
ret ]
camn x,[sixbit /TT/] ;is it TT?
jrst [move x,[mdspec,,tsspec] ;yes, so use MD's specs
blt x,spcend-1 ; all of them, to the end
ret ]
;; unknown machine, default to MD
move x,[mdspec,,tsspec]
blt x,spcend-1