1
0
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:
Adam Sampson
2018-08-06 19:34:58 +01:00
parent c13cfaca17
commit c9d83b6fec

View File

@@ -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