1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-30 13:36:42 +00:00

Fix UBAASL.

This wasn't updating UBAIFS owing to a typo ("LSH A,B" for "LSH
A,(B)"), so it always returned the first slot number. It's not actually
used anywhere in ITS 1650, so this didn't break anything.
This commit is contained in:
Adam Sampson
2018-08-06 19:34:58 +01:00
committed by Adam Sampson
parent b4f4a79a73
commit 0205af6869

View File

@@ -19607,7 +19607,7 @@ UBAASL: PUSH P,B
UBASL1: MOVNS B
MOVSI A,400000
LSH A,B ;A/ bit to snarf
LSH A,(B) ;A/ bit to snarf
ANDCAM A,UBAIFS
CONO PI,PION
MOVN A,B