From 3ae36ed03a4900e8810644dd048daeccba11976a Mon Sep 17 00:00:00 2001 From: Miguel Prada Date: Sun, 26 Apr 2020 14:45:18 -0500 Subject: [PATCH 1/4] page 370 typos --- Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc index dcb1f8d88..851c424ee 100644 --- a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc +++ b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc @@ -42,7 +42,7 @@ # THIS ROUTINE IS CALLABLE FROM ERASABLE OR FIXED. LIKE BANKCALL, HOWEVER, SWITCHING BETWEEN S3 AND S4 # IS NOT POSSIBLE. # -# THE CALLING SEQUENCE IS +# THE CALLING SEQUENCE IS: # # TC BANKCALL # CADR E/BKCALL @@ -56,7 +56,7 @@ # # A + L ARE PRESERVED THROUGH BANKCALL AND E/BKCALL. -E/BKCALL DXCH BUF2 # SAVE A,L AND GET DP RETURN +E/BKCALL DXCH BUF2 # SAVE A,L AND GET DP RETURN. DXCH EBUF2 # SAVE DP RETURN. INCR EBUF2 # RETURN +1 BECAUSE DOUBLE CADR. CA BBANK @@ -68,7 +68,7 @@ E/BKCALL DXCH BUF2 # SAVE A,L AND GET DP RETURN # AND RESTORING A + L. TC +4 # TX Q, V34, OR BAD STALL RETURN. TC +2 # PROCEED OR GOOD STALL RETURN. - INCR EBUF2 # ENTER OR RECYCLE RETURN + INCR EBUF2 # ENTER OR RECYCLE RETURN. INCR EBUF2 E/SWITCH DXCH EBUF2 DTCB From 324afd03d0883f2e500f6f27f053780a98a239ae Mon Sep 17 00:00:00 2001 From: Miguel Prada Date: Sun, 26 Apr 2020 14:56:00 -0500 Subject: [PATCH 2/4] page 371 typos --- Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc index 851c424ee..3d9be9c24 100644 --- a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc +++ b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc @@ -80,7 +80,7 @@ E/SWITCH DXCH EBUF2 # # RTB # E/CALL -# CADR ROUTINE # THE INTERPRETIVE SUBROUTINE YOU WANT +# CADR ROUTINE # THE INTERPRETIVE SUBROUTINE YOU WANT. # # RETURNS HERE IN INTERPRETIVE. E/CALL LXCH LOC # ADRES -1 OF CADR. @@ -91,10 +91,10 @@ E/CALL LXCH LOC # ADRES -1 OF CADR. DXCH EBUF2 # STORE CADR AND RETURN TC INTPRET CALL - EBUF2 # INDIRECTLY EXECUTE ROUTING. IT MUST + EBUF2 # INDIRECTLY EXECUTE ROUTINE. IT MUST EXIT # LEAVE VIA RVQ OR EQUIVALENT. - LXCH EBUF2 +1 # PICK UP RETURN. - TCF INTPRET +2 # SET LOC AND RETURN TO CALLER. + LXCH EBUF2 +1 # PICK UP RETURN. + TCF INTPRET +2 # SET LOC AND RETURN TO CALLER. # Page 372 # E/JOBWAK FOR WAKING UP ERASABLE MEMORY JOBS. From d17e93a40e8b8eb793d5e503b1a8634d900855b0 Mon Sep 17 00:00:00 2001 From: Miguel Prada Date: Sun, 26 Apr 2020 15:01:19 -0500 Subject: [PATCH 3/4] page 372 typos --- Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc index 3d9be9c24..e38860ff1 100644 --- a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc +++ b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc @@ -109,7 +109,7 @@ E/CALL LXCH LOC # ADRES -1 OF CADR. # TC IBNKCALL # CADR E/JOBWAK # ... # RETURNS HERE -# RELINT # IF YOU DID AND INHINT +# RELINT # IF YOU DID AND INHINT. BANK 33 SETLOC E/PROG @@ -117,7 +117,7 @@ E/CALL LXCH LOC # ADRES -1 OF CADR. COUNT* $$/P07 -E/JOBWAK TC JOBWAKE # ARRIVE WITH ADRES IN A. +E/JOBWAK TC JOBWAKE # ARRIVE IWTH ADRES IN A. CS BIT11 NDX LOCCTR ADS LOC # KNOCK FIXED MEMORY BIT OUT OF ADRES. From b59956e29bdb02272ec6c5a6c5af0ff2a1a9ff18 Mon Sep 17 00:00:00 2001 From: Miguel Prada Date: Sun, 26 Apr 2020 15:21:51 -0500 Subject: [PATCH 4/4] additional typo fix --- Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc index e38860ff1..65e10851f 100644 --- a/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc +++ b/Luminary099/SYSTEM_TEST_STANDARD_LEAD_INS.agc @@ -101,7 +101,7 @@ E/CALL LXCH LOC # ADRES -1 OF CADR. # # THIS ROUTINE MUST BE CALLED IN INTERRUPT OR WITH INTERRUPTS INHIBITED. # -# THE CALLING SEQUENCE IS +# THE CALLING SEQUENCE IS: # # INHINT # ...