From 12484aa5d5b92892cded806915f5eb8f20303308 Mon Sep 17 00:00:00 2001 From: Andrew Gray Date: Sat, 8 Feb 2025 15:24:18 +1100 Subject: [PATCH] fix typos in comments --- Comanche055/AGC_BLOCK_TWO_SELF-CHECK.agc | 2 ++ Comanche055/WAITLIST.agc | 31 +++++++++++++----------- 2 files changed, 19 insertions(+), 14 deletions(-) diff --git a/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.agc b/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.agc index 0a60368..34ffcbe 100644 --- a/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.agc +++ b/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.agc @@ -92,7 +92,9 @@ # ACCOMPLISHED BY FRESH START # SMODE SET TO +0 # +# # DEBRIS +# # ALL EXITS FROM THE CHECK OF ERASABLE (ERASCHK) RESTORE ORIGINAL CONTENTS TO REGISTERS UNDER CHECK. # EXCEPTION IS A RESTART. RESTART THAT OCCURS DURING ERASCHK RESTORES ERASABLE, UNLESS THERE IS EVIDENCE TO DOUBT # E MEMORY, IN WHICH CASE PROGRAM THEN DOES A FRESH START (DOFSTART). diff --git a/Comanche055/WAITLIST.agc b/Comanche055/WAITLIST.agc index 3c86922..ba84c39 100644 --- a/Comanche055/WAITLIST.agc +++ b/Comanche055/WAITLIST.agc @@ -32,6 +32,7 @@ # MOD NO - 2 LOG SECTION - WAITLIST # MOD BY - MILLER (DTMAX INCREASED TO 162.5 SEC) ASSEMBLY SUNBURST REV 5 # MOD 3 BY KERNAN (INHINT INSERTED AT WAITLIST) 2/28/68 SKIPPER REV 4 +# # MOD 4BY KERNAN (TWIDDLE IN 54) 3/28/68 SKIPPER REV 13. # # FUNCTIONAL DESCRIPTION- @@ -44,13 +45,15 @@ # C(LST1) = -(T2-T1)+1 # C(LST1 +1) = -(T3-T2)+1 # C(LST1 +2) = -(T4-T3)+1 -# ... +# . +# . # C(LST1 +6) = -(T8-T7)+1 # C(LST1 +7) = -(T9-T8)+1 # # C(LST2) = 2CADR OF TASK1 # C(LST2 +2) = 2CADR OF TASK2 -# ... +# . +# . # C(LST2 +14) = 2CADR OF TASK8 # C(LST2 +16) = 2CADR OF TASK9 # @@ -103,8 +106,8 @@ # OTHER - WAITEXIT, WAITADR, WAITTEMP, WAITBANK # DETAILED ANALYSIS OF TIMING- # -# CONTROL WILL NOT BE RETURNED TO THE SPECIFIED ADDRESS (2CADR) IN EXACTLY DELTA T CENTISECONDS. -# THE APPROXIMATE TIME MAY BE CALCULATED AS FOLLOWS +# CONTROL WILL NOT BE RETURNED TO THE SPECIFIED ADDRESS (2CADR) IN EXACTLY DELTA T CENTISECONDS. +# THE APPROXIMATE TIME MAY BE CALCULATED AS FOLLOWS # # LET T0 = THE TIME OF THE TC WAITLIST # LET TS = T0 +147U + COUNTER INCREMENTS (SET UP TIME) @@ -113,16 +116,16 @@ # LET Z = LENGTH OF TIME TO PROCESS TASKS WHICH ARE DUE THIS T3RUPT BUT DISPATCHED EARLIER. # (Z=0, USUALLY) # LET DELTD = THE ACTUAL TIME TAKEN TO GIVE CONTROL TO 2CADR -# THEN DELTD = TS+DELTA T -X +Y +Z +1.05MS* +COUNTERS* +# THEN DELTD = TS+DELTA T -X +Y +Z +1.05MS* +COUNTERS* # *THE TIME TAKEN BY WAITLIST ITSELF AND THE COUNTER TICKING DURING THIS WAITLIST TIME. # -# IN SHORT, THE ACTUAL TIME TO RETURN CONTROL TO A 2CADR IS AUGMENTED BY THE TIME TO SET UP THE TASK'S +# IN SHORT, THE ACTUAL TIME TO RETURN CONTROL TO A 2CADR IS AUGMENTED BY THE TIME TO SET UP THE TASK:S # INTERRUPT, ALL COUNTERS TICKING, THE T3RUPT PROCESSING TIME, THE WAITLIST PROCESSING TIME AND THE POSSIBILITY # OF OTHER TASKS INHIBITING THE INTERRUPT. BLOCK 02 # Page 1223 - EBANK= LST1 # TASK LISTS IN SWITCHED E BANK. + EBANK= LST1 # TASK LISTS IN SWITCHED E BANK. COUNT 02/WAIT @@ -222,7 +225,7 @@ WAIT2 TS WAITBANK # BBANK OF CALLING PROGRAM. CS TIME3 AD BIT8 # BIT 8 = OCT 200 CCS A # TEST 200 - C(TIME3). IF POSITIVE, - # IT MEANS THAT TIME3 OVERFLOW HAS OCCURRED PRIOR TO CS TIME3 AND THAT + # IT MEANS THAT TIME3 OVERFLOW HAS OCCURRED PRIOR TO CS TIME3 AND THAT # C(TIME3) = T - T1, INSTEAD OF 1.0 - (T1 - T). THE FOLLOWING FOUR # ORDERS SET C(A) = TD - T1 + 1 IN EITHER CASE. @@ -278,8 +281,8 @@ WTLST4 XCH LST1 DXCH LST2 +12D DXCH LST2 +14D DXCH LST2 +16D - AD ENDTASK # END ITEM, AS CHECK FOR EXCEEDING - # THE LENGTH OF THE LIST. + AD ENDTASK # END ITEM, AS CHECK FOR EXCEEDING + # THE LENGTH OF THE LIST. EXTEND # DUMMY TASK ADRES SHOULD BE IN FIXED- BZF LVWTLIST # FIXED SO ITS ADRES ALONE DISTINGUISHES TCF WTABORT # IT. @@ -515,14 +518,14 @@ LONGCYCL EXTEND # CAN WE SUCCESFULLY TAKE ABOUT 1.25 DCS DPBIT14 # MINUTES OFF OF LONGTIME DAS LONGTIME - CCS LONGTIME +1 # THE REASONING BEHIND THIS PART IS + CCS LONGTIME +1 # THE REASONIBG BEHIND THIS PART IS TCF MUCHTIME # INVOLVED, TAKING INTO ACCOUNT THAT THE # WORDS MAY NOT BE SIGNED CORRECTED (DP # BASIC INSTRUCTIONS - # DO NOT SIGN CORRECT) AND THAT WE SUBTRAC- + # DO NOT SIGN CORRECT) AND THAT WE SUBTRAC # TED BIT14 (1 OVER HALF THE POS. VALUE - # REPRESENTABLE IN SINGLE WORD) - NOOP # CAN'T GET HERE ********** + # REPRESENTIBLE IN SINGLE WORD) + NOOP # CAN:T GET HERE ********** TCF +1 CCS LONGTIME TCF MUCHTIME