mirror of
https://github.com/PDP-10/its.git
synced 2026-03-24 09:30:29 +00:00
Fix UBAASL.
This wasn't updating UBAIFS owing to a typo ("LSH A,B" for "LSH
A,0(B)"), so it always returned the first slot number. It's not actually
used anywhere in ITS 1648, so this didn't break anything.
This commit is contained in:
@@ -19594,7 +19594,7 @@ UBAASL: PUSH P,B
|
||||
|
||||
UBASL1: MOVNS B
|
||||
MOVSI A,400000
|
||||
LSH A,B ;A/ bit to snarf
|
||||
LSH A,0(B) ;A/ bit to snarf
|
||||
ANDCAM A,UBAIFS
|
||||
CONO PI,PION
|
||||
MOVN A,B
|
||||
|
||||
Reference in New Issue
Block a user