github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-04-25 03:45:11 +00:00
Code Issues Releases Wiki Activity

BC ITS - SDF Boot Camp KA10.

Browse Source
This commit is contained in:
Lars Brinkhoff
2023-10-16 19:44:11 +02:00
parent 1b182621b1
commit be8ed5d999
12 changed files with 265 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/sysen1/pword.2664
View File

@@ -9855,6 +9855,10 @@ bltspc: syscal sstatu,[val x ? val x ? val x ? val x ? val x
jrst [move x,[mdspec,,tsspec] ;yes, so use MD's specs
blt x,spcend-1 ; all of them, to the end
ret ]
camn x,[sixbit /BC/] ;is it BC?
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