Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:tst
Deck TST
1 Modification
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.tst +++| IDENT TST,FET 00002 M01S00002.tst +++| ABS 00003 M01S00003.tst +++| SST FL 00004 M01S00004.tst +++| ENTRY TST 00005 M01S00005.tst +++| ENTRY MFL= 00006 M01S00006.tst +++| ENTRY SSJ= 00007 M01S00007.tst +++| SYSCOM B1 00008 M01S00008.tst +++|*COMMENT TST - TAPE STORAGE TEST.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | tst |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M02S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970. 00010 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00011 M01S00010.tst +++| TITLE TST - TAPE STORAGE TEST. 00012 M01S00011.tst +++| SPACE 4 00013 M01S00012.tst +++|*** TST - TAPE STORAGE TEST. 00014 M01S00013.tst +++|* P. C. SMITH. 91/11/08. 00015 M01S00014.tst +++| SPACE 4 00016 M01S00015.tst +++|*** TST IS A CENTRAL PROCESSOR DRIVEN TAPE STORAGE TEST. IT 00017 M01S00016.tst +++|* PERFORMS SEQUENTIAL WRITES AND READS ON A SELECTED TAPE 00018 M01S00017.tst +++|* DEVICE, AND REPORTS THE PERFORMANCE ACHIEVED. 00019 M01S00018.tst +++|* 00020 M01S00019.tst +++|* OPERATING INSTRUCTIONS. 00021 M01S00020.tst +++|* WHEN CALLED, TST ASSUMES THAT THE FILE *TAPE1* HAS BEEN 00022 M01S00021.tst +++|* PREASSIGNED. 00023 M01S00022.tst +++|* 00024 M01S00023.tst +++|* SEQUENTIAL WRITE. 00025 M01S00024.tst +++|* RANDOM DATA IS WRITTEN SEQUENTIALLY ON THE FILE IN THIS 00026 M01S00025.tst +++|* FORMAT - 1 WORD CONTAINING THE SECTOR NUMBER 00027 M01S00026.tst +++|* 1 WORD CONTAINING RANDOM DATA SEED 00028 M01S00027.tst +++|* 61 WORDS OF RANDOM DATA 00029 M01S00028.tst +++|* 1 WORD CHECKSUM OF ABOVE DATA 00030 M01S00029.tst +++|* 00031 M01S00030.tst +++|* SEQUENTIAL READ. 00032 M01S00031.tst +++|* FILE IS REWOUND AND DATA IS READ BACK CHECKING SECTOR NUMBER 00033 M01S00032.tst +++|* AND CHECKSUM OF RANDOM DATA. 00034 M01S00033.tst +++|* 00035 M01S00034.tst +++|* THERE IS A FORTY SECOND PAUSE FOLLOWING THE WRITE SECTION OF 00036 M01S00035.tst +++|* THE TEST TO ALLOW THE REWIND TO COMPLETE BEFORE CONTINUING 00037 M01S00036.tst +++|* TO THE NEXT SECTION. 00038 M01S00037.tst +++| SPACE 4 00039 M01S00038.tst +++|*** ARGUMENT PARAMETERS. 00040 M01S00039.tst +++|* 00041 M01S00040.tst +++|* T TEST SECTION (CAN BE EQUATED). 00042 M01S00041.tst +++|* T=0 OR T OR OMISSION OF THIS PARAMETER WILL RUN ALL 00043 M01S00042.tst +++|* SECTIONS. 00044 M01S00043.tst +++|* T=1 WRITE SEQUENTIAL. 00045 M01S00044.tst +++|* T=2 READ SEQUENTIAL. 00046 M01S00045.tst +++|* 00047 M01S00046.tst +++|* P TEST PATTERN (CAN BE EQUATED). 00048 M01S00047.tst +++|* P=0 ALL ZEROS PATTERN. 00049 M01S00048.tst +++|* P=1 ALL ONES PATTERN. 00050 M01S00049.tst +++|* P=2 25252525252525252525B PATTERN. 00051 M01S00050.tst +++|* P=3 52525252525252525252B PATTERN. 00052 M01S00051.tst +++|* P=4 DO NOT GENERATE OR CHECK DATA. SECTOR NUMBERS 00053 M01S00052.tst +++|* ARE GENERATED AND CHECKED. 00054 M01S00053.tst +++|* P=5 OR P OR OMISSION OF THIS PARAMETER WILL ENABLE 00055 M01S00054.tst +++|* RANDOM PATTERN. 00056 M01S00055.tst +++|* P=6 DO NOT GENERATE OR CHECK DATA. DO NOT COPY DATA 00057 M01S00056.tst +++|* BETWEEN THE CIO BUFFER AND THE WORKING BUFFER. 00058 M01S00057.tst +++|* SECTOR NUMBERS ARE GENERATED AND CHECKED. 00059 M01S00058.tst +++|* 00060 M01S00059.tst +++|* N NUMBER OF 100B-WORD SECTORS (CAN BE EQUATED). 00061 M01S00060.tst +++|* N=0 GIVES ARGUMENT ERROR MESSAGE AND PROGRAM ABORT. 00062 M01S00061.tst +++|* N=XXXX WILL ENABLE THE TEST TO BE RUN ON XXXX SECTORS. 00063 M01S00062.tst +++|* (BE CAREFUL THAT TRACK LIMIT IS NOT EXCEEDED) 00064 M01S00063.tst +++|* N GIVES DEFAULT VALUE (SEE TABLE TEQP). 00065 M01S00064.tst +++|* 00066 M01S00065.tst +++|* NW NO WRITE PERFORMED AT BEGINING OF TEST. 00067 M01S00066.tst +++|* 00068 M01S00067.tst +++|* BS BLOCK SIZE (MUST BE MULTIPLE OF 1000B). 00069 M01S00068.tst +++|* 00070 M01S00069.tst +++|* NOTE: 00071 M01S00070.tst +++|* SENSE SWITCH 2 - IF SET WILL ABORT ON ERRORS. 00072 M01S00071.tst +++|* SENSE SWITCH 3 - IF SET WILL CONTINUE AT END OF TEST. 00073 M01S00072.tst +++|* SENSE SWITCH 4 - IF SET WILL REPEAT CURRENT SECTION. 00074 M01S00073.tst +++|* 00075 M01S00074.tst +++|* ISSUING A CALL OF TST FROM THE CONSOLE WILL 00076 M01S00075.tst +++|* SELECT ALL SECTIONS, RANDOM PATTERN, DEFAULT SECTOR 00077 M01S00076.tst +++|* VALUE, PAUSE ON ERROR AND STOP AT END OF TEST. 00078 M01S00077.tst +++|* TO CONTINUE ON ERRORS TYPE *GO.*. 00079 M01S00078.tst +++|* 00080 M01S00079.tst +++| TST SPACE 4 00081 M01S00080.tst +++|*** DAYFILE MESSAGES. 00082 M01S00081.tst +++|* 00083 M01S00082.tst +++|* * ARGUMENT ERROR.* = ONE OF PARAMETERS IS IN ERROR. 00084 M01S00083.tst +++|* 00085 M01S00084.tst +++|* * ILLEGAL EQUIPMENT.* = THE EQUIPMENT WHICH WAS ASSIGNED IN 00086 M01S00085.tst +++|* RESPONSE TO THE DISPLAY REQUEST IS NOT 00087 M01S00086.tst +++|* RECOGNIZED AS BEING A DEVICE UPON WHICH 00088 M01S00087.tst +++|* THE TEST MAY BE RUN. 00089 M01S00088.tst +++|* 00090 M01S00089.tst +++|* * SEQUENTIAL WRITE.* = THIS TEST SECTION IS BEING EXECUTED. 00091 M01S00090.tst +++|* 00092 M01S00091.tst +++|* * SEQUENTIAL READ.* = THIS TEST SECTION IS BEING EXECUTED. 00093 M01S00092.tst +++|* 00094 M01S00093.tst +++|* *TST TRANSFER RATE = XXXXXX.XXX KC.* = THE TAPE TRANSFER 00095 M01S00094.tst +++|* RATE FOR THE PREVIOUS SECTION WAS 00096 M01S00095.tst +++|* XXXXXX.XXX KILO-CHARACTERS PER SECOND. 00097 M01S00096.tst +++|* 00098 M01S00097.tst +++|* * FILE SIZE = XXXXXXXXXX SECTORS.* = SIZE OF THE DATA 00099 M01S00098.tst +++|* FILE IN SECTORS.* 00100 M01S00099.tst +++|* 00101 M01S00100.tst +++|* * ILLEGAL EOF DETECTED.* = AN EOF WAS DETECTED BEFORE THE 00102 M01S00101.tst +++|* LAST SECTOR ON THE FILE. 00103 M01S00102.tst +++|* 00104 M01S00103.tst +++|* * NO EOF DETECTED ON LAST READ.* = NO EOF ON THE LAST SECTOR. 00105 M01S00104.tst +++|* 00106 M01S00105.tst +++|* * JOB ABORTED.* = ABNORMAL TERMINATION OF TST. 00107 M01S00106.tst +++|* 00108 M01S00107.tst +++|* *EQXXX,DATA ERROR AT -PHYSICAL POSITION-.* 00109 M01S00108.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00110 M01S00109.tst +++|* DATA ERRORS HAVE BEEN DETECTED ON A 00111 M01S00110.tst +++|* SECTOR WHICH WAS READ. 00112 M01S00111.tst +++|* 00113 M01S00112.tst +++|* *EQXXX,POS. ERROR AT -PHYSICAL POSITION-.* 00114 M01S00113.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00115 M01S00114.tst +++|* THE SECTOR WHICH WAS READ WAS NOT 00116 M01S00115.tst +++|* THE CORRECT SECTOR. THE POSITION GIVEN 00117 M01S00116.tst +++|* IS THE POSITION OF THE SECTOR READ. 00118 M01S00117.tst +++|* 00119 M01S00118.tst +++|* *EQXXX,DEV.-TYPE ERR--PHYSICAL POSITION-.* 00120 M01S00119.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00121 M01S00120.tst +++|* CIO HAS DETECTED ONE OF THE FOLLOWING 00122 M01S00121.tst +++|* ERRORS WHICH APPEAR IN THE -TYPE ERR- 00123 M01S00122.tst +++|* POSITION. 00124 M01S00123.tst +++|* -TYPE ERR- = PARITY ER. -- PARITY ERROR 00125 M01S00124.tst +++|* ADDR. ERR. -- ADDRESS ERROR 00126 M01S00125.tst +++|* STATUS ER. -- DEVICE STATUS ERROR 00127 M01S00126.tst +++|* 81 FNC REJ -- 6681 FUNCTION REJECT 00128 M01S00127.tst +++|* RESERVED -- DEVICE RESERVED 00129 M01S00128.tst +++|* NOT READY -- DEVICE NOT READY 00130 M01S00129.tst +++|* 00131 M01S00130.tst +++|* *EQXXX,EXP. POSITION -PHYSICAL POSITION-.* 00132 M01S00131.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00133 M01S00132.tst +++|* WHEN A POSITION OR DEVICE ADDRESS ERROR 00134 M01S00133.tst +++|* OCCURES THE EXPECTED POSITION IS GIVEN 00135 M01S00134.tst +++|* BY THIS MESSAGE. 00136 M01S00135.tst +++|* 00137 M01S00136.tst +++|* *EQXXX,DATA EXP WWW,EEEEEEEEEEEEEEEEEEEE* 00138 M01S00137.tst +++|* *EQXXX,DATA READ WWW,RRRRRRRRRRRRRRRRRRRR* 00139 M01S00138.tst +++|* *EQXXX,DATA DIFF WWW,DDDDDDDDDDDDDDDDDDDD* 00140 M01S00139.tst +++|* *DATA OK.* (OPTIONAL - SEE BELOW) 00141 M01S00140.tst +++|* WHEN A DATA ERROR OR DEVICE PARITY ERROR IS 00142 M01S00141.tst +++|* DETECTED THE DATA ON THE SECTOR IS CHECKED 00143 M01S00142.tst +++|* AND THE ERRORS REPORTED. IF NO ERRORS ARE 00144 M01S00143.tst +++|* FOUND THE MESSAGE *DATA OK.* IS ISSUED. 00145 M01S00144.tst +++|* WWW IS THE WORD NUMBER IN THE SECTOR. 00146 M01S00145.tst +++|* EE-----E IS THE EXPECTED DATA. 00147 M01S00146.tst +++|* RR-----R IS THE DATA READ. 00148 M01S00147.tst +++|* DD-----D IS THE DIFFERNCE. 00149 M01S00148.tst +++|* 00150 M01S00149.tst +++|* * TST ERROR - GO / DROP.* = *TST* HAS DETECTED AN 00151 M01S00150.tst +++|* IRRECOVERABLE READ ERROR. 00152 M01S00151.tst +++|* 00153 M01S00152.tst +++|* * END TAPE STORAGE TEST.* = END OF TEST. 00154 M01S00153.tst +++| SPACE 4 00155 M01S00154.tst +++|** COMMON DECKS. 00156 M01S00155.tst +++| 00157 M01S00156.tst +++| 00158 M01S00157.tst +++|*CALL COMCMAC 00159 M01S00158.tst +++|*CALL COMCCMD 00160 M01S00159.tst +++| SPACE 4 00161 M01S00160.tst +++|**** ASSEMBLY CONSTANTS. 00162 M01S00161.tst +++| 00163 M01S00162.tst +++| 00164 M01S00163.tst +++| TBUFL EQU 4001B 00165 M01S00164.tst +++|**** 00166 M01S00165.tst +++| TITLE DATA. 00167 M01S00166.tst +++| FET SPACE 4 00168 M01S00167.tst +++|* FILE FET. 00169 M01S00168.tst +++| 00170 M01S00169.tst +++| 00171 M01S00170.tst +++| ORG 110B 00172 M01S00171.tst +++| FET BSS 0 00173 M01S00172.tst +++| T BSS 0 00174 M01S00173.tst +++| TAPE1 FILEB TBUF,TBUFL,EPR,(FET=8) 00175 M01S00174.tst +++| 00176 M01S00175.tst +++|* DATA STORAGE. 00177 M01S00176.tst +++| 00178 M01S00177.tst +++| 00179 M01S00178.tst +++| FL CON 0 ORIGINAL FIELD LENGTH 00180 M01S00179.tst +++| NS CON 10000B NUMBER OF SECTORS 00181 M01S00180.tst +++| SM CON 7777B SECTOR MASK 00182 M01S00181.tst +++| NW CON 0 NO SEQUENTIAL WRITE AT BEGINNING OF TEST 00183 M01S00182.tst +++| TS CON 0L0 TEST SECTION TO BE EXECUTED 00184 M01S00183.tst +++| TP CON 0L5 DEFAULT TEST PATTERN 00185 M01S00184.tst +++| ST CON 0 START TIME 00186 M01S00185.tst +++| ET CON 0 ENDING TIME 00187 M01S00186.tst +++| ND CON 0 NULL DATA FLAG 00188 M01S00187.tst +++| NT CON 1 NO DATA TRANSFER FLAG 00189 M01S00188.tst +++| BS CON 1000B BLOCK SIZE (PRU SIZE) 00190 M01S00189.tst +++| 00191 M01S00190.tst +++|* SPECIAL ENTRY POINTS. 00192 M01S00191.tst +++| 00193 M01S00192.tst +++| SSJ= EQU 0 00194 M01S00193.tst +++| TITLE MAIN PROGRAM. 00195 M01S00194.tst +++| TST SPACE 4 00196 M01S00195.tst +++|** TST - MAIN PROGRAM. 00197 M01S00196.tst +++| 00198 M01S00197.tst +++| 00199 M01S00198.tst +++| TST SB1 1 (B1) = 1 00200 M01S00199.tst +++| SB7 B0 00201 M01S00200.tst +++| SX6 A0 00202 M01S00201.tst +++| SA6 FL 00203 M01S00202.tst +++| RJ PRS PRESET 00204 M01S00203.tst +++| TST1 SA1 NW 00205 M01S00204.tst +++| NZ X1,TST2 IF NO WRITE 00206 M01S00205.tst +++| RJ WSQ WRITE SEQUENTIAL 00207 M01S00206.tst +++| RJ WRC WAIT REWIND COMPLETE 00208 M01S00207.tst +++| TST2 SA1 TS 00209 M01S00208.tst +++| ZR X1,TST3 IF ALL SECTIONS SELECTED 00210 M01S00209.tst +++| SB5 X1-1 00211 M01S00210.tst +++| ZR B5,TST4 IF ONLY WRITE SELECTED 00212 M01S00211.tst +++| TST3 RJ RSQ READ SEQUENTIAL 00213 M01S00212.tst +++| TST4 SA1 B0 00214 M01S00213.tst +++| LX1 59-8 00215 M01S00214.tst +++| PL X1,TST5 IF REPEAT TEST NOT SET 00216 M01S00215.tst +++| RJ WRC WAIT REWIND COMPLETE 00217 M01S00216.tst +++| EQ TST1 CONTINUE 00218 M01S00217.tst +++| 00219 M01S00218.tst +++| TST5 MESSAGE (=C* END TAPE STORAGE TEST.*) 00220 M01S00219.tst +++| ENDRUN 00221 M01S00220.tst +++| TITLE TEST SECTIONS. 00222 M01S00221.tst +++| WSQ SPACE 4,15 00223 M01S00222.tst +++|** WSQ - WRITE SEQUENTIAL. 00224 M01S00223.tst +++|* 00225 M01S00224.tst +++|* USES X - 0, 1, 2, 4, 5, 6, 7. 00226 M01S00225.tst +++|* A - 1, 5, 6, 7. 00227 M01S00226.tst +++|* 00228 M01S00227.tst +++|* CALLS AIP, CKS, CTR, GDB, MEM, MES. 00229 M01S00228.tst +++|* 00230 M01S00229.tst +++|* MACROS REWIND, RTIME, WRITEF, WRITEW. 00231 M01S00230.tst +++| 00232 M01S00231.tst +++| 00233 M01S00232.tst +++| WSQ SUBR ENTRY/EXIT 00234 M01S00233.tst +++| SX6 1 SET SECTORS TO CHECK 00235 M01S00234.tst +++| SA6 CKSI 00236 M01S00235.tst +++| SA1 FL 00237 M01S00236.tst +++| RJ MEM REQUEST MEMORY 00238 M01S00237.tst +++| WSQ1 REWIND T,R 00239 M01S00238.tst +++| SX1 =C* SEQUENTIAL WRITE.* 00240 M01S00239.tst +++| RJ MES SEND MESSAGE 00241 M01S00240.tst +++| SA5 NS NUMBER OF SECTORS TO WRITE 00242 M01S00241.tst +++| BX0 X5 00243 M01S00242.tst +++| BX6 X5 SAVE SECTOR COUNT 00244 M01S00243.tst +++| SA6 CTRB 00245 M01S00244.tst +++| SX5 B1 00246 M01S00245.tst +++| RTIME ST 00247 M01S00246.tst +++| WSQ2 SA1 TP GENERATE SECTOR TO WRITE 00248 M01S00247.tst +++| BX7 X5 00249 M01S00248.tst +++| BX6 X1 00250 M01S00249.tst +++| SA7 SBUF 00251 M01S00250.tst +++| SA6 SBUF+1 00252 M01S00251.tst +++| RJ GDB GENERATE DATA BUFFER 00253 M01S00252.tst +++| SA7 TP 00254 M01S00253.tst +++| SX2 T SET FET ADDRESS 00255 M01S00254.tst +++| SA1 NT 00256 M01S00255.tst +++| ZR X1,WQS3 IF NO DATA TRANSFER 00257 M01S00256.tst +++| WRITEW X2,SBUF,100B 00258 M01S00257.tst +++| EQ WQS4 CHECK FOR CIO ERROR 00259 M01S00258.tst +++| 00260 M01S00259.tst +++| WQS3 RJ AIP ADVANCE *IN* POINTER 00261 M01S00260.tst +++| WQS4 SX4 B0 00262 M01S00261.tst +++| RJ CKS CHECK FOR CIO ERROR 00263 M01S00262.tst +++| SX6 B1+ 00264 M01S00263.tst +++| IX5 X5+X6 ADVANCE SECTOR COUNTER 00265 M01S00264.tst +++| IX0 X0-X6 00266 M01S00265.tst +++| NZ X0,WSQ2 IF MORE SECTORS TO WRITE 00267 M01S00266.tst +++| WRITEF T,R 00268 M01S00267.tst +++| RJ CTR COMPUTE TRANSFER RATE 00269 M01S00268.tst +++| SA1 B0 00270 M01S00269.tst +++| LX1 59-9 00271 M01S00270.tst +++| NG X1,WSQ1 IF REPEAT SECTION SET 00272 M01S00271.tst +++| EQ WSQX RETURN 00273 M01S00272.tst +++| RSQ SPACE 4,15 00274 M01S00273.tst +++|** RSQ - READ SEQUENTIAL. 00275 M01S00274.tst +++|* 00276 M01S00275.tst +++|* USES X - 0, 1, 2, 4, 5, 6, 7. 00277 M01S00276.tst +++|* A - 1, 5, 6, 7. 00278 M01S00277.tst +++|* 00279 M01S00278.tst +++|* CALLS ABT, AOP, CKS, CTR, MEM, MES. 00280 M01S00279.tst +++|* 00281 M01S00280.tst +++|* MACROS MESSAGE, READ, READW, REWIND, RTIME. 00282 M01S00281.tst +++| 00283 M01S00282.tst +++| 00284 M01S00283.tst +++| RSQ SUBR ENTRY/EXIT 00285 M01S00284.tst +++| SX6 1 SET SECTORS TO CHECK 00286 M01S00285.tst +++| SA6 CKSI 00287 M01S00286.tst +++| SA1 FL 00288 M01S00287.tst +++| RJ MEM REQUEST MEMORY 00289 M01S00288.tst +++| RSQ1 REWIND T,R 00290 M01S00289.tst +++| SX1 =C* SEQUENTIAL READ.* 00291 M01S00290.tst +++| RJ MES SEND MESSAGE 00292 M01S00291.tst +++| SA5 NS NUMBER OF SECTORS 00293 M01S00292.tst +++| BX0 X5 00294 M01S00293.tst +++| BX6 X5 SAVE SECTOR COUNT 00295 M01S00294.tst +++| SA6 CTRB 00296 M01S00295.tst +++| SX5 B0 00297 M01S00296.tst +++| RTIME ST 00298 M01S00297.tst +++| RSQ2 READ T 00299 M01S00298.tst +++| RSQ3 SX2 T SET FET ADDRESS 00300 M01S00299.tst +++| SA1 NT 00301 M01S00300.tst +++| ZR X1,RSQ3.1 IF NO DATA TRANSFER 00302 M01S00301.tst +++| READW X2,SBUF,100B 00303 M01S00302.tst +++| EQ RSQ3.2 CHECK FOR EOR/EOF 00304 M01S00303.tst +++| 00305 M01S00304.tst +++| RSQ3.1 RJ AOP ADVANCE *OUT* POINTER 00306 M01S00305.tst +++| RSQ3.2 ZR X1,RSQ3.3 IF NO EOR/EOF DETECTED 00307 M01S00306.tst +++| SX1 X1+3 CHECK FOR *CIO* ERROR 00308 M01S00307.tst +++| NZ X1,RSQ5 IF NO *CIO* ERROR 00309 M01S00308.tst +++| RSQ3.3 ZR X0,RSQ4 IF EOF EXPECTED 00310 M01S00309.tst +++| SX2 B1 00311 M01S00310.tst +++| IX4 X5+X2 ADVANCE EXPECTED SECTOR 00312 M01S00311.tst +++| SA5 SBUF 00313 M01S00312.tst +++| BX6 X4 00314 M01S00313.tst +++| SA6 RSQA SAVE RANDOM ADDRESS 00315 M01S00314.tst +++| IX0 X0-X2 DECREMENT SECTOR COUNTER 00316 M01S00315.tst +++| RJ CKS CHECK SECTOR 00317 M01S00316.tst +++| SA5 RSQA 00318 M01S00317.tst +++| ZR X4,RSQ3 IF NO ERROR DETECTED 00319 M01S00318.tst +++| SA1 T+1 RESTART READ ON ERROR 00320 M01S00319.tst +++| SX2 B1 00321 M01S00320.tst +++| IX7 X5+X2 SET RANDOM ADDRESS TO NEXT SECTOR 00322 M01S00321.tst +++| SX6 X1 00323 M01S00322.tst +++| SA6 A1+B1 00324 M01S00323.tst +++| SA7 T+6 00325 M01S00324.tst +++| SA6 A6+B1 00326 M01S00325.tst +++| EQ RSQ2 00327 M01S00326.tst +++| 00328 M01S00327.tst +++| RSQ4 MESSAGE (=C* NO EOF ON LAST READ.*) 00329 M01S00328.tst +++| EQ RSQ6 00330 M01S00329.tst +++| 00331 M01S00330.tst +++| RSQ5 ZR X0,RSQ7 IF EOF EXPECTED 00332 M01S00331.tst +++| MESSAGE (=C* ILLEGAL EOF DETECTED.*) 00333 M01S00332.tst +++| RSQ6 RJ ABT CHECK FOR ABORT ON ERRORS 00334 M01S00333.tst +++| RSQ7 RJ CTR COMPUTE TRANSFER RATE 00335 M01S00334.tst +++| SA1 B0 00336 M01S00335.tst +++| LX1 59-9 00337 M01S00336.tst +++| NG X1,RSQ1 IF REPEAT SECTION 00338 M01S00337.tst +++| EQ RSQX RETURN 00339 M01S00338.tst +++| 00340 M01S00339.tst +++| RSQA CON 0 TEMPORARY 00341 M01S00340.tst +++| TITLE SUBROUTINES. 00342 M01S00341.tst +++| ABT SPACE 4,15 00343 M01S00342.tst +++|** ABT - ABORT JOB. 00344 M01S00343.tst +++|* 00345 M01S00344.tst +++|* ABORTS JOB IF PAUSE ON ERROR NOT SELECTED. 00346 M01S00345.tst +++|* 00347 M01S00346.tst +++|* EXIT (X4) = 1. 00348 M01S00347.tst +++|* 00349 M01S00348.tst +++|* USES X - 1, 4, 7. 00350 M01S00349.tst +++|* A - 1, 7. 00351 M01S00350.tst +++|* B - NONE. 00352 M01S00351.tst +++|* 00353 M01S00352.tst +++|* MACROS ABORT, MESSAGE, RECALL. 00354 M01S00353.tst +++| 00355 M01S00354.tst +++| 00356 M01S00355.tst +++| ABT SUBR ENTRY/EXIT 00357 M01S00356.tst +++| SA1 B0 00358 M01S00357.tst +++| LX1 59-7 00359 M01S00358.tst +++| NG X1,ABT2 IF ABORT ON ERROR 00360 M01S00359.tst +++| SX7 B1+ SET PAUSE BIT 00361 M01S00360.tst +++| LX1 7-59 00362 M01S00361.tst +++| LX7 12 00363 M01S00362.tst +++| BX7 X7+X1 00364 M01S00363.tst +++| SA7 A1 00365 M01S00364.tst +++| MESSAGE ABTA,2,R ISSUE MESSAGE TO SECOND LINE 00366 M01S00365.tst +++| ABT1 RECALL 00367 M01S00366.tst +++| SA1 B0 00368 M01S00367.tst +++| LX1 59-12 00369 M01S00368.tst +++| NG X1,ABT1 IF PAUSE BIT SET 00370 M01S00369.tst +++| SX4 B1 00371 M01S00370.tst +++| EQ ABTX RETURN 00372 M01S00371.tst +++| 00373 M01S00372.tst +++| ABT2 MESSAGE (=C* JOB ABORTED.*) 00374 M01S00373.tst +++| ABT3 ABORT ABORT JOB 00375 M01S00374.tst +++| 00376 M01S00375.tst +++| ABTA DATA C*$TST ERROR - GO / DROP.* 00377 M01S00376.tst +++| AIP SPACE 4,20 00378 M01S00377.tst +++|** AIP - ADVANCE *IN* POINTER. 00379 M01S00378.tst +++|* 00380 M01S00379.tst +++|* ADVANCE THE *IN* POINTER BY 100B (AS IF A *WRITEW* OF 100B 00381 M01S00380.tst +++|* WORDS HAD BEEN PERFORMED), BUT DO NOT TRANSFER THE DATA. 00382 M01S00381.tst +++|* COPY ONLY THE FIRST WORD OF THE BLOCK FROM BUFFER *SBUF* 00383 M01S00382.tst +++|* TO THE CIO BUFFER. 00384 M01S00383.tst +++|* 00385 M01S00384.tst +++|* ENTRY (X2) = ADDRESS OF FET FOR FILE. 00386 M01S00385.tst +++|* 00387 M01S00386.tst +++|* EXIT VIA *WTX=*. 00388 M01S00387.tst +++|* (X2) = ADDRESS OF FET FOR FILE. 00389 M01S00388.tst +++|* 00390 M01S00389.tst +++|* USES X - 1, 2, 3, 4, 6, 7. 00391 M01S00390.tst +++|* A - 1, 2, 3, 4, 6. 00392 M01S00391.tst +++|* B - 2, 3, 4, 5, 6, 7. 00393 M01S00392.tst +++|* 00394 M01S00393.tst +++|* CALLS DCB=, WTX=. 00395 M01S00394.tst +++| 00396 M01S00395.tst +++| 00397 M01S00396.tst +++| + EQ AIP1 (REENTRY ADDRESS FROM *DCB=*) 00398 M01S00397.tst +++| 00399 M01S00398.tst +++| AIP SUBR ENTRY/EXIT 00400 M01S00399.tst +++| SA4 *-1 SET REENTRY/RETURN ADDRESS 00401 M01S00400.tst +++| SA1 X2+4 (B5) = LIMIT 00402 M01S00401.tst +++| SA3 X2+B1 (X3) = FIRST 00403 M01S00402.tst +++| SB5 X1 00404 M01S00403.tst +++| 00405 M01S00404.tst +++|* REENTER HERE FROM *DCB=*. 00406 M01S00405.tst +++| 00407 M01S00406.tst +++| AIP1 SA2 X2 (B2) = FET STATUS 00408 M01S00407.tst +++| SA1 A3+2 (B4) = OUT 00409 M01S00408.tst +++| SB2 X2 00410 M01S00409.tst +++| SA2 A3+B1 (X2) = IN 00411 M01S00410.tst +++| SB4 X1 00412 M01S00411.tst +++| SB3 X2+B1 (B3) = IN+1 00413 M01S00412.tst +++| LE B3,B4,AIP3 IF IN .LT. OUT 00414 M01S00413.tst +++| 00415 M01S00414.tst +++|* CALCULATE SPACE LEFT IN BUFFER (IN .GE. OUT). 00416 M01S00415.tst +++| 00417 M01S00416.tst +++| SX6 B5 00418 M01S00417.tst +++| IX6 X6-X3 (LIMIT-FIRST) 00419 M01S00418.tst +++| SX7 B3-B4 (IN+1-OUT) 00420 M01S00419.tst +++| IX6 X6-X7 AVAILABLE SPACE IN BUFFER 00421 M01S00420.tst +++| SX7 X6-100B 00422 M01S00421.tst +++| NG X7,DCB= IF NOT ENOUGH SPACE 00423 M01S00422.tst +++| 00424 M01S00423.tst +++|* UPDATE BUFFER POINTER (IN .GE. OUT). 00425 M01S00424.tst +++| 00426 M01S00425.tst +++| SB6 X2+100B NEW VALUE OF IN 00427 M01S00426.tst +++| LT B6,B5,AIP2 IF NO BUFFER WRAPAROUND 00428 M01S00427.tst +++| SB7 X3 00429 M01S00428.tst +++| SB7 B5-B7 (LIMIT-FIRST) 00430 M01S00429.tst +++| SB6 B6-B7 NEW VALUE OF IN 00431 M01S00430.tst +++| AIP2 SA1 SBUF COPY FIRST WORD OF BLOCK TO (IN) 00432 M01S00431.tst +++| BX6 X1 00433 M01S00432.tst +++| SA6 X2 00434 M01S00433.tst +++| SX2 B6 SET NEW VALUE OF IN 00435 M01S00434.tst +++| EQ WTX= EXIT 00436 M01S00435.tst +++| 00437 M01S00436.tst +++|* CALCULATE SPACE LEFT IN BUFFER (IN .LT. OUT). 00438 M01S00437.tst +++| 00439 M01S00438.tst +++| AIP3 SX6 B4-B3 AVAILABLE SPACE IN BUFFER 00440 M01S00439.tst +++| SX7 X6-100B 00441 M01S00440.tst +++| NG X7,DCB= IF NOT ENOUGH SPACE IN BUFFER 00442 M01S00441.tst +++| 00443 M01S00442.tst +++|* UPDATE BUFFER POINTER (IN .LT. OUT). 00444 M01S00443.tst +++| 00445 M01S00444.tst +++| SB6 X2+100B NEW VALUE OF IN 00446 M01S00445.tst +++| EQ AIP2 EXIT 00447 M01S00446.tst +++| AOP SPACE 4,20 00448 M01S00447.tst +++|*** AOP - ADVANCE *OUT* POINTER. 00449 M01S00448.tst +++|* 00450 M01S00449.tst +++|* ADVANCE THE *OUT* POINTER BY 100B (AS IF A *READW* OF 100B 00451 M01S00450.tst +++|* WORDS HAD BEEN PERFORMED), BUT DO NOT TRANSFER THE DATA. 00452 M01S00451.tst +++|* COPY ONLY THE FIRST WORD OF THE BLOCK FROM THE CIO BUFFER 00453 M01S00452.tst +++|* TO BUFFER *SBUF*. 00454 M01S00453.tst +++|* 00455 M01S00454.tst +++|* ENTRY (X2) = ADDRESS OF FET FOR FILE. 00456 M01S00455.tst +++|* 00457 M01S00456.tst +++|* EXIT VIA *RDX=*. 00458 M01S00457.tst +++|* (X1) = 0 FOR TRANSFER COMPLETE. 00459 M01S00458.tst +++|* (X1) = -1 IF EOF DETECTED ON FILE. 00460 M01S00459.tst +++|* (X1) = -2 IF EOI DETECTED ON FILE. 00461 M01S00460.tst +++|* (X2) = ADDRESS OF FET FOR FILE. 00462 M01S00461.tst +++|* 00463 M01S00462.tst +++|* USES X - 1, 2, 3, 4, 6, 7. 00464 M01S00463.tst +++|* A - 1, 2, 3, 4, 7. 00465 M01S00464.tst +++|* B - 3, 4, 5, 6, 7. 00466 M01S00465.tst +++|* 00467 M01S00466.tst +++|* CALLS LCB=, RDX=. 00468 M01S00467.tst +++| 00469 M01S00468.tst +++| 00470 M01S00469.tst +++| + EQ AOP1 (REENTRY ADDRESS FOR *LCB=*) 00471 M01S00470.tst +++| 00472 M01S00471.tst +++| AOP SUBR ENTRY/EXIT 00473 M01S00472.tst +++| SA4 *-1 SET REENTRY/RETURN ADDRESS 00474 M01S00473.tst +++| SA1 X2+4 (B5) = LIMIT 00475 M01S00474.tst +++| SA3 X2+B1 (X3) = FIRST 00476 M01S00475.tst +++| SB5 X1 00477 M01S00476.tst +++| 00478 M01S00477.tst +++|* REENTER HERE FROM *LCB=*. 00479 M01S00478.tst +++| 00480 M01S00479.tst +++| AOP1 SA1 A3+B1 (B3) = IN 00481 M01S00480.tst +++| SA2 A1+B1 (B4) = OUT 00482 M01S00481.tst +++| SB3 X1 00483 M01S00482.tst +++| SB4 X2 00484 M01S00483.tst +++| LT B3,B4,AOP3 IF IN .LT. OUT 00485 M01S00484.tst +++| 00486 M01S00485.tst +++|* CALCULATE DATA AVAILABLE IN BUFFER (IN .GE. OUT). 00487 M01S00486.tst +++| 00488 M01S00487.tst +++| SX6 B3-B4 AVAILABLE DATA IN BUFFER 00489 M01S00488.tst +++| SX7 X6-100B 00490 M01S00489.tst +++| NG X7,LCB= IF NOT ENOUGH DATA IN BUFFER 00491 M01S00490.tst +++| 00492 M01S00491.tst +++|* UPDATE BUFFER POINTER (IN .GE. OUT). 00493 M01S00492.tst +++| 00494 M01S00493.tst +++| SB6 B4+100B NEW VALUE OF OUT 00495 M01S00494.tst +++| AOP2 SA1 B4 COPY FIRST WORD OF BLOCK FROM (OUT) 00496 M01S00495.tst +++| BX7 X1 00497 M01S00496.tst +++| SA7 SBUF 00498 M01S00497.tst +++| SB4 B6 SET NEW VALUE OF OUT 00499 M01S00498.tst +++| EQ RDX= EXIT 00500 M01S00499.tst +++| 00501 M01S00500.tst +++|* CALCULATE DATA AVAILABLE IN BUFFER (IN .LT. OUT) 00502 M01S00501.tst +++| 00503 M01S00502.tst +++| AOP3 SX6 B5 00504 M01S00503.tst +++| IX6 X6-X3 (LIMIT-FIRST) 00505 M01S00504.tst +++| SX7 B4-B3 (OUT-IN) 00506 M01S00505.tst +++| IX6 X6-X7 AVAILABLE DATA IN BUFFER 00507 M01S00506.tst +++| SX7 X6-100B 00508 M01S00507.tst +++| NG X7,LCB= IF NOT ENOUGH DATA IN BUFFER 00509 M01S00508.tst +++| 00510 M01S00509.tst +++|* UPDATE BUFFER POINTER (IN .LT. OUT). 00511 M01S00510.tst +++| 00512 M01S00511.tst +++| SB6 B4+100B NEW VALUE OF OUT 00513 M01S00512.tst +++| LT B6,B5,AOP2 IF NO BUFFER WRAPAROUND 00514 M01S00513.tst +++| SB7 X3 00515 M01S00514.tst +++| SB7 B5-B7 (LIMIT-FIRST) 00516 M01S00515.tst +++| SB6 B6-B7 NEW VALUE OF OUT 00517 M01S00516.tst +++| EQ AOP2 EXIT 00518 M01S00517.tst +++| CKS SPACE 4,20 00519 M01S00518.tst +++|** CKS - CHECK SECTOR. 00520 M01S00519.tst +++|* 00521 M01S00520.tst +++|* ENTRY (X5) = SECTOR NUMBER READ. 00522 M01S00521.tst +++|* (X4) = SECTOR NUMBER EXPECTED. 00523 M01S00522.tst +++|* (A5) = ADDRESS OF SECTOR TO BE CHECKED. 00524 M01S00523.tst +++|* ND .NE. 0 IF DATA IS TO BE CHECKED. 00525 M01S00524.tst +++|* 00526 M01S00525.tst +++|* EXIT (X4) = 0 IF NO ERROR DETECTED. 00527 M01S00526.tst +++|* 00528 M01S00527.tst +++|* USES X - ALL. 00529 M01S00528.tst +++|* A - 1, 2, 3, 4, 5, 6, 7. 00530 M01S00529.tst +++|* B - 2. 00531 M01S00530.tst +++|* 00532 M01S00531.tst +++|* RESTORES X5, T+2, T+3, X0, T+6 WHEN RETURNING FROM ERROR. 00533 M01S00532.tst +++|* 00534 M01S00533.tst +++|* CALLS ABT, DCH, ERR. 00535 M01S00534.tst +++| 00536 M01S00535.tst +++| 00537 M01S00536.tst +++| CKS SUBR ENTRY/EXIT 00538 M01S00537.tst +++| SA3 T+6 CHECK FOR CIO ERROR 00539 M01S00538.tst +++| MX2 -3 00540 M01S00539.tst +++| BX2 -X2*X3 00541 M01S00540.tst +++| NZ X2,CKS2 IF CIO ERROR 00542 M01S00541.tst +++| ZR X4,CKSX IF CHECKING ON WRITE - RETURN 00543 M01S00542.tst +++| CKS0 BX6 X4-X5 00544 M01S00543.tst +++| NZ X6,CKS3 IF POSITION ERROR 00545 M01S00544.tst +++| SX6 X4+B1 INCREMENT RANDOM ADDRESS FOR NEXT SECTOR 00546 M01S00545.tst +++| SA6 CKSJ 00547 M01S00546.tst +++| SA4 ND 00548 M01S00547.tst +++| ZR X4,CKSX IF DATA NOT TO BE CHECKED 00549 M01S00548.tst +++| SX4 B0 00550 M01S00549.tst +++| SB2 76B 00551 M01S00550.tst +++| SA2 A5+77B LOAD CHECKSUM 00552 M01S00551.tst +++| CKS1 SA1 A5+B2 VALIDATE CHECKSUM 00553 M01S00552.tst +++| IX2 X2-X1 00554 M01S00553.tst +++| SB2 B2-1 00555 M01S00554.tst +++| GT B2,B1,CKS1 IF MORE DATA 00556 M01S00555.tst +++| NZ X2,CKS1.1 IF CHECKSUM ERROR 00557 M01S00556.tst +++| SA3 CKSI CHECK SECTOR COUNT 00558 M01S00557.tst +++| SX6 X3-1 00559 M01S00558.tst +++| ZR X6,CKSX IF END OF TRANSFER 00560 M01S00559.tst +++| SA6 A3+ 00561 M01S00560.tst +++| SA5 A5+100B SET ACTUAL RANDOM ADDRESS 00562 M01S00561.tst +++| SA4 CKSJ SET EXPECTED RANDOM ADDRESS 00563 M01S00562.tst +++| EQ CKS0 NEXT SECTOR 00564 M01S00563.tst +++| 00565 M01S00564.tst +++| CKS1.1 SA1 CKSA DATA ERROR PROCESSING 00566 M01S00565.tst +++| SA2 CKSE 00567 M01S00566.tst +++| RJ ERR DATA ERROR MESSAGE 00568 M01S00567.tst +++| RJ DCH DATA CHECK 00569 M01S00568.tst +++| EQ CKS6 00570 M01S00569.tst +++| 00571 M01S00570.tst +++| CKS2 SA1 CKSB CIO ERROR PROCESSING 00572 M01S00571.tst +++| SX6 X2-2 00573 M01S00572.tst +++| SA2 X2+TCIO-1 00574 M01S00573.tst +++| SA6 CKSG 00575 M01S00574.tst +++| LX7 X4 00576 M01S00575.tst +++| SX4 B0 00577 M01S00576.tst +++| SA7 CKSH 00578 M01S00577.tst +++| RJ ERR CIO ERROR MESSAGE 00579 M01S00578.tst +++| SA1 CKSG 00580 M01S00579.tst +++| NG X1,CKS5 IF PARITY ERROR 00581 M01S00580.tst +++| ZR X1,CKS4 IF ADDRESS ERROR 00582 M01S00581.tst +++| EQ CKS6 00583 M01S00582.tst +++| 00584 M01S00583.tst +++| CKS3 SA1 CKSC POSITION ERROR PROCESSING 00585 M01S00584.tst +++| SA2 CKSE 00586 M01S00585.tst +++| BX6 X4 00587 M01S00586.tst +++| SX4 B0 00588 M01S00587.tst +++| SA6 CKSH 00589 M01S00588.tst +++| RJ ERR POSITION ERROR MESSAGE 00590 M01S00589.tst +++| CKS4 SA4 CKSH SECTOR EXPECTED 00591 M01S00590.tst +++| SA1 CKSD 00592 M01S00591.tst +++| SA2 CKSF 00593 M01S00592.tst +++| BX5 X4 00594 M01S00593.tst +++| SX4 B1 00595 M01S00594.tst +++| ZR X5,CKS6 IF ADDRESS ERROR ON SEQUENTIAL WRITE 00596 M01S00595.tst +++| RJ ERR EXPECTED ERROR MESSAGE 00597 M01S00596.tst +++| CKS5 RJ DCH DATA CHECK 00598 M01S00597.tst +++| CKS6 RJ ABT CHECK FOR ABORT ON ERRORS 00599 M01S00598.tst +++| CKS7 SA5 ERRA RESTORE REGISTERS 00600 M01S00599.tst +++| SA2 A5+B1 00601 M01S00600.tst +++| SA3 A2+B1 00602 M01S00601.tst +++| SA1 A3+B1 00603 M01S00602.tst +++| BX6 X2 00604 M01S00603.tst +++| LX7 X3 00605 M01S00604.tst +++| SA2 A1+B1 00606 M01S00605.tst +++| SA6 T+2 00607 M01S00606.tst +++| SA7 T+3 00608 M01S00607.tst +++| LX6 X2 00609 M01S00608.tst +++| BX0 X1 00610 M01S00609.tst +++| SA6 T+6 00611 M01S00610.tst +++| EQ CKSX RETURN 00612 M01S00611.tst +++| 00613 M01S00612.tst +++| 00614 M01S00613.tst +++| CKSA DATA 10HEQXXX,DATA 00615 M01S00614.tst +++| CKSB DATA 10HEQXXX,DEV. 00616 M01S00615.tst +++| CKSC DATA 10HEQXXX,POS. 00617 M01S00616.tst +++| CKSD DATA 10HEQXXX,EXP. 00618 M01S00617.tst +++| CKSE CON 10H ERROR AT 00619 M01S00618.tst +++| CKSF CON 10H POSITION 00620 M01S00619.tst +++| CKSG CON 0 TEMPORARY 00621 M01S00620.tst +++| CKSH CON 0 TEMPORARY 00622 M01S00621.tst +++| CKSI CON 0 NUMBER OF SECTORS REMAINING TO CHECK 00623 M01S00622.tst +++| CKSJ CON 0 EXPECTED RANDOM ADDRESS OF NEXT SECTOR 00624 M01S00623.tst +++| 00625 M01S00624.tst +++| TCIO CON 10LPARITY ER. PARITY ERROR 00626 M01S00625.tst +++| CON 10LADDR. ERR. ADDRESS ERROR 00627 M01S00626.tst +++| CON 10LSTATUS ER. DEVICE STATUS ERROR 00628 M01S00627.tst +++| CON 10L81 FNC REJ 6681 FUNCTION REJECT 00629 M01S00628.tst +++| CON 10LRESERVED DEVICE RESERVED 00630 M01S00629.tst +++| CON 10LNOT READY DEVICE NOT READY 00631 M01S00630.tst +++| CTR SPACE 4,15 00632 M01S00631.tst +++|** CTR - COMPUTE TRANSFER RATE. 00633 M01S00632.tst +++|* 00634 M01S00633.tst +++|* ENTRY (CTRB) = NUMBER OF SECTORS TRANSFERRED. 00635 M01S00634.tst +++|* (ST) = START TIME. 00636 M01S00635.tst +++|* 00637 M01S00636.tst +++|* EXIT TRANSFER RATE MESSAGE ISSUED TO DAYFILE. 00638 M01S00637.tst +++|* 00639 M01S00638.tst +++|* USES X - 0, 1, 2, 3, 6. 00640 M01S00639.tst +++|* A - 1, 2, 6. 00641 M01S00640.tst +++|* B - NONE. 00642 M01S00641.tst +++|* 00643 M01S00642.tst +++|* CALLS CFD, MES. 00644 M01S00643.tst +++|* 00645 M01S00644.tst +++|* MACROS RTIME. 00646 M01S00645.tst +++| 00647 M01S00646.tst +++| 00648 M01S00647.tst +++| CTR SUBR ENTRY/EXIT 00649 M01S00648.tst +++| RTIME ET GET ENDING TIME 00650 M01S00649.tst +++| SA1 ST COMPUTE ELAPSED TIME 00651 M01S00650.tst +++| SA2 ET 00652 M01S00651.tst +++| MX0 -36 00653 M01S00652.tst +++| BX1 -X0*X1 00654 M01S00653.tst +++| BX2 -X0*X2 00655 M01S00654.tst +++| IX2 X2-X1 00656 M01S00655.tst +++| BX6 X2 00657 M01S00656.tst +++| SA1 CTRB 00658 M01S00657.tst +++| SX3 640*1000/64 00659 M01S00658.tst +++| LX3 6 00660 M01S00659.tst +++| IX3 X1*X3 CHAR 00661 M01S00660.tst +++| IX1 X3/X2 00662 M01S00661.tst +++| RJ CFD CONVERT TO DISPLAY CODE 00663 M01S00662.tst +++| SA6 CTRA+2 00664 M01S00663.tst +++| SX1 CTRA SEND TRANSFER RATE MESSAGE 00665 M01S00664.tst +++| RJ MES 00666 M01S00665.tst +++| EQ CTRX RETURN 00667 M01S00666.tst +++| 00668 M01S00667.tst +++| CTRA DATA C*TST TRANSFER RATE = XXXXXX.XXX KC.* 00669 M01S00668.tst +++| CTRB CON 0 SECTORS TRANSFERRED 00670 M01S00669.tst +++| DCH SPACE 4,15 00671 M01S00670.tst +++|** DCH - DATA CHECK. 00672 M01S00671.tst +++|* 00673 M01S00672.tst +++|* ENTRY (SBUF - SBUF+77B) = SECTOR TO BE CHECKED. 00674 M01S00673.tst +++|* 00675 M01S00674.tst +++|* USES X - 0, 1, 2, 6, 7. 00676 M01S00675.tst +++|* A - 1, 2, 6, 7. 00677 M01S00676.tst +++|* B - 2, 5, 6, 7. 00678 M01S00677.tst +++|* 00679 M01S00678.tst +++|* CALLS COD, GDB, WOD. 00680 M01S00679.tst +++|* 00681 M01S00680.tst +++|* MACROS MESSAGE. 00682 M01S00681.tst +++| 00683 M01S00682.tst +++| 00684 M01S00683.tst +++| DCH4 NZ B7,DCHX IF ERRORS FOUND RETURN 00685 M01S00684.tst +++| MESSAGE (=C*DATA OK.*) 00686 M01S00685.tst +++| 00687 M01S00686.tst +++| DCH SUBR ENTRY/EXIT 00688 M01S00687.tst +++| SA1 ND 00689 M01S00688.tst +++| ZR X1,DCHX IF NO DATA GENERATED 00690 M01S00689.tst +++| SA1 SBUF+1 00691 M01S00690.tst +++| SB5 B1 00692 M01S00691.tst +++| BX6 X1 00693 M01S00692.tst +++| SA6 PBUF+1 00694 M01S00693.tst +++| SB7 B0+ 00695 M01S00694.tst +++| RJ GDB REGENERATE DATA 00696 M01S00695.tst +++| DCH1 SB6 77B 00697 M01S00696.tst +++| DCH2 SA1 PBUF+B5 00698 M01S00697.tst +++| SA2 SBUF+B5 00699 M01S00698.tst +++| SB5 B5+B1 00700 M01S00699.tst +++| BX7 X2-X1 00701 M01S00700.tst +++| GT B5,B6,DCH4 IF END OF CHECK 00702 M01S00701.tst +++| ZR X7,DCH2 IF DATA MATCHES 00703 M01S00702.tst +++| LX6 X2 00704 M01S00703.tst +++| SB7 B1 ERROR FLAG 00705 M01S00704.tst +++| SA6 DCHA 00706 M01S00705.tst +++| SA7 A6+B1 00707 M01S00706.tst +++| BX0 X1 00708 M01S00707.tst +++| SX1 B5 00709 M01S00708.tst +++| SB6 B0 00710 M01S00709.tst +++| RJ COD CONVERT WORD NUMBER 00711 M01S00710.tst +++| LX6 6 00712 M01S00711.tst +++| SX1 B1 00713 M01S00712.tst +++| IX6 X6+X1 00714 M01S00713.tst +++| BX1 X0 00715 M01S00714.tst +++| SA6 DCHD 00716 M01S00715.tst +++| DCH3 RJ WOD CONVERT DATA 00717 M01S00716.tst +++| SA1 TMES+B6 MESSAGE TYPE 00718 M01S00717.tst +++| SA2 DCHD 00719 M01S00718.tst +++| SA6 DCHE 00720 M01S00719.tst +++| MX0 -24 00721 M01S00720.tst +++| SA7 A6+B1 00722 M01S00721.tst +++| BX2 -X0*X2 MERGE MESSAGE TYPE 00723 M01S00722.tst +++| BX1 X0*X1 00724 M01S00723.tst +++| BX6 X2+X1 00725 M01S00724.tst +++| SA6 A2 00726 M01S00725.tst +++| MESSAGE DCHC,,R 00727 M01S00726.tst +++| SA1 DCHA+B6 00728 M01S00727.tst +++| SB2 B6-B1 00729 M01S00728.tst +++| SB6 B6+B1 00730 M01S00729.tst +++| NE B2,B1,DCH3 IF MORE MESSAGES FOR THIS ERROR 00731 M01S00730.tst +++| EQ DCH1 00732 M01S00731.tst +++| 00733 M01S00732.tst +++| DCHA CON 0 TEMPORARY 00734 M01S00733.tst +++| DCHB CON 0 TEMPORARY 00735 M01S00734.tst +++| DCHC DATA 10HEQXXX,DATA 00736 M01S00735.tst +++| DCHD CON 10H .... 000, 00737 M01S00736.tst +++| DCHE CON 0,0,0 00738 M01S00737.tst +++| 00739 M01S00738.tst +++| TMES CON 6L EXP TABLE OF MESSAGES 00740 M01S00739.tst +++| CON 6L READ 00741 M01S00740.tst +++| CON 6L DIFF 00742 M01S00741.tst +++| ERR SPACE 4,15 00743 M01S00742.tst +++|** ERR - SEND ERROR MESSAGE. 00744 M01S00743.tst +++|* 00745 M01S00744.tst +++|* ENTRY (X4) = 0 IF REGISTERS MUST BE SAVED. 00746 M01S00745.tst +++|* (X2) = SECOND WORD OF MESSAGE. 00747 M01S00746.tst +++|* (X1) = FIRST WORD OF MESSAGE. 00748 M01S00747.tst +++|* 00749 M01S00748.tst +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 00750 M01S00749.tst +++|* A - 1, 2, 3, 6, 7. 00751 M01S00750.tst +++|* B - 6 00752 M01S00751.tst +++|* 00753 M01S00752.tst +++|* CALLS CVA, WOD. 00754 M01S00753.tst +++|* 00755 M01S00754.tst +++|* MACROS MESSAGE, RECALL, RPHR, STATUS. 00756 M01S00755.tst +++| 00757 M01S00756.tst +++| 00758 M01S00757.tst +++| ERR SUBR ENTRY/EXIT 00759 M01S00758.tst +++| BX6 X1 00760 M01S00759.tst +++| LX7 X2 00761 M01S00760.tst +++| SA6 ERRB 00762 M01S00761.tst +++| SA7 A6+B1 00763 M01S00762.tst +++| RECALL T 00764 M01S00763.tst +++| NZ X4,ERR1 IF REGISTERS ALREADY SAVED 00765 M01S00764.tst +++| SA2 T+2 00766 M01S00765.tst +++| SA3 T+3 00767 M01S00766.tst +++| LX6 X5 00768 M01S00767.tst +++| BX7 X2 00769 M01S00768.tst +++| SA2 T+6 00770 M01S00769.tst +++| SA6 ERRA 00771 M01S00770.tst +++| LX6 X3 00772 M01S00771.tst +++| SA7 A6+B1 00773 M01S00772.tst +++| BX7 X0 00774 M01S00773.tst +++| SA6 A7+B1 00775 M01S00774.tst +++| LX6 X2 00776 M01S00775.tst +++| SA7 A6+B1 00777 M01S00776.tst +++| SA6 A6+2 00778 M01S00777.tst +++| ERR1 MESSAGE ERRB,,R 00779 M01S00778.tst +++| EQ ERRX RETURN 00780 M01S00779.tst +++| 00781 M01S00780.tst +++| ERRA BSS 5 00782 M01S00781.tst +++| ERRB DATA 10HEQXXX,ZZZZ 00783 M01S00782.tst +++| ERRC CON 10H ERROR AT 00784 M01S00783.tst +++| ERRD CON 0,0 00785 M01S00784.tst +++| CON 0 END OF LINE FOR FIRST MESSAGE 00786 M01S00785.tst +++| GDB SPACE 4,15 00787 M01S00786.tst +++|** GDB - GENERATE DATA BUFFER. 00788 M01S00787.tst +++|* 00789 M01S00788.tst +++|* ENTRY (X6) = RANDOM NUMBER WHICH WILL GENERATE BUFFER. 00790 M01S00789.tst +++|* (A6) = ADDRESS OF RANDOM NUMBER IN BUFFER. 00791 M01S00790.tst +++|* 00792 M01S00791.tst +++|* EXIT (X6) = CHECKSUM OF BUFFER. 00793 M01S00792.tst +++|* (X7) = LAST DATA WORD STORED IN BUFFER. 00794 M01S00793.tst +++|* (B2) = (B3) = NUMBER OF DATA WORDS GENERATED. 00795 M01S00794.tst +++|* (A6) = ADDRESS OF LAST WORD IN BUFFER. 00796 M01S00795.tst +++|* 00797 M01S00796.tst +++|* USES X - 2, 6, 7. 00798 M01S00797.tst +++|* A - 2, 6, 7. 00799 M01S00798.tst +++|* B - 2, 3. 00800 M01S00799.tst +++| 00801 M01S00800.tst +++| 00802 M01S00801.tst +++| GDB SUBR ENTRY/EXIT 00803 M01S00802.tst +++| SA2 ND 00804 M01S00803.tst +++| ZR X2,GDBX IF NO DATA GENERATION 00805 M01S00804.tst +++| SB3 75B 00806 M01S00805.tst +++| SB2 B0+ 00807 M01S00806.tst +++| GDBA BX7 X6 00808 M01S00807.tst +++| SA7 A6 00809 M01S00808.tst +++| 00810 M01S00809.tst +++|* THIS INSTRUCTION IS MODIFIED BY PRESET 00811 M01S00810.tst +++|* EQ GDB2 IF NON-RANDOM PATTERN 00812 M01S00811.tst +++| 00813 M01S00812.tst +++| SX6 B0+ IF RANDOM PATTERN - CLEAR CHECKSUM 00814 M01S00813.tst +++| 00815 M01S00814.tst +++| GDB1 PX2 X7 00816 M01S00815.tst +++| DX7 X2*X2 00817 M01S00816.tst +++| IX7 X7+X2 00818 M01S00817.tst +++| SB2 B2+B1 00819 M01S00818.tst +++| LX2 15 00820 M01S00819.tst +++| IX7 X7+X2 00821 M01S00820.tst +++| LX2 19 00822 M01S00821.tst +++| IX7 X2+X7 00823 M01S00822.tst +++| SA7 A7+B1 00824 M01S00823.tst +++| IX6 X6+X7 ADVANCE CHECKSUM 00825 M01S00824.tst +++| NE B2,B3,GDB1 IF MORE DATA TO GENERATE 00826 M01S00825.tst +++| SA6 A7+B1 CHECKSUM IN LAST LOCATION OF BUFFER 00827 M01S00826.tst +++| EQ GDBX 00828 M01S00827.tst +++| 00829 M01S00828.tst +++| GDB2 SB2 B2+B1 00830 M01S00829.tst +++| SA7 A7+B1 00831 M01S00830.tst +++| NE B2,B3,GDB2 IF BUFFER NOT FULL 00832 M01S00831.tst +++| SA6 A7+B1 00833 M01S00832.tst +++| EQ GDBX 00834 M01S00833.tst +++| MEM SPACE 4,15 00835 M01S00834.tst +++|** MEM - REQUEST MEMORY. 00836 M01S00835.tst +++|* 00837 M01S00836.tst +++|* ENTRY (X1) = REQUESTED MEMORY. 00838 M01S00837.tst +++|* 00839 M01S00838.tst +++|* EXIT (IN) = (OUT) = (FIRST). 00840 M01S00839.tst +++|* (LIMIT) = REQUESTED FIELD LENGTH. 00841 M01S00840.tst +++|* 00842 M01S00841.tst +++|* USES X - 2, 6, 7. 00843 M01S00842.tst +++|* A - 2, 6, 7. 00844 M01S00843.tst +++|* B - NONE. 00845 M01S00844.tst +++|* 00846 M01S00845.tst +++|* MACROS MEMORY. 00847 M01S00846.tst +++| 00848 M01S00847.tst +++| 00849 M01S00848.tst +++| MEM SUBR ENTRY/EXIT 00850 M01S00849.tst +++| SA2 T+1 00851 M01S00850.tst +++| SX7 X1-10B 00852 M01S00851.tst +++| SX6 X2 00853 M01S00852.tst +++| SA7 T+4 LIMIT 00854 M01S00853.tst +++| SA6 A7-B1 OUT 00855 M01S00854.tst +++| SA6 A6-B1 IN 00856 M01S00855.tst +++| MEMORY ,,R,X1 REQUEST MEMORY 00857 M01S00856.tst +++| EQ MEMX RETURN 00858 M01S00857.tst +++| MES SPACE 4,15 00859 M01S00858.tst +++|** MES - SEND MESSAGE. 00860 M01S00859.tst +++|* 00861 M01S00860.tst +++|* ENTRY (X1) = MESSAGE ADDRESS. 00862 M01S00861.tst +++|* 00863 M01S00862.tst +++|* EXIT MESSAGE SENT TO CONTROL POINT AND JOB DAYFILE. 00864 M01S00863.tst +++|* 00865 M01S00864.tst +++|* USES X - 0. 00866 M01S00865.tst +++|* A - NONE. 00867 M01S00866.tst +++|* B - NONE. 00868 M01S00867.tst +++|* 00869 M01S00868.tst +++|* MACROS MESSAGE. 00870 M01S00869.tst +++| 00871 M01S00870.tst +++| 00872 M01S00871.tst +++| MES SUBR ENTRY/EXIT 00873 M01S00872.tst +++| SX0 X1+ 00874 M01S00873.tst +++| MESSAGE X1,1,R 00875 M01S00874.tst +++| MESSAGE X0,3,R 00876 M01S00875.tst +++| EQ MESX RETURN 00877 M01S00876.tst +++| WRC SPACE 4,10 00878 M01S00877.tst +++|** WRC - WAIT REWIND COMPLETE. 00879 M01S00878.tst +++|* 00880 M01S00879.tst +++|* USES X - 1, 2, 3. 00881 M01S00880.tst +++|* A - 1. 00882 M01S00881.tst +++|* B - NONE. 00883 M01S00882.tst +++|* 00884 M01S00883.tst +++|* MACROS MESSAGE, RECALL, RTIME. 00885 M01S00884.tst +++| 00886 M01S00885.tst +++| 00887 M01S00886.tst +++| WRC SUBR 00888 M01S00887.tst +++| MESSAGE (=C* WAIT REWIND COMPLETE.*),1,R 00889 M01S00888.tst +++| RTIME WRCA FETCH TIME 00890 M01S00889.tst +++| REWIND T 00891 M01S00890.tst +++| SA1 WRCA 00892 M01S00891.tst +++| MX3 -36 00893 M01S00892.tst +++| BX2 -X3*X1 SAVE START TIME 00894 M01S00893.tst +++| WRC1 RECALL DELAY 00895 M01S00894.tst +++| RTIME WRCA CHECK TIME 00896 M01S00895.tst +++| SA1 WRCA 00897 M01S00896.tst +++| BX1 -X3*X1 00898 M01S00897.tst +++| IX1 X1-X2 TIME SINCE FIRST CALL 00899 M01S00898.tst +++| SX1 X1-40000 00900 M01S00899.tst +++| NG X1,WRC1 IF 40 SECONDS NOT ELAPSED 00901 M01S00900.tst +++| EQ WRCX RETURN 00902 M01S00901.tst +++| 00903 M01S00902.tst +++| WRCA BSS 1 00904 M01S00903.tst +++| SPACE 4 00905 M01S00904.tst +++|** COMMON DECKS. 00906 M01S00905.tst +++| 00907 M01S00906.tst +++| 00908 M01S00907.tst +++| ERP1$ EQU 1 ENABLE I/O ERROR PROCESSING 00909 M01S00908.tst +++|*CALL COMCCDD 00910 M01S00909.tst +++|*CALL COMCCOD 00911 M01S00910.tst +++|*CALL COMCCIO 00912 M01S00911.tst +++|*CALL COMCCFD 00913 M01S00912.tst +++|*CALL COMCLFM 00914 M01S00913.tst +++|*CALL COMCRDW 00915 M01S00914.tst +++|*CALL COMCSYS 00916 M01S00915.tst +++|*CALL COMCWOD 00917 M01S00916.tst +++|*CALL COMCWTW 00918 M01S00917.tst +++| BUFFERS SPACE 4 00919 M01S00918.tst +++| TITLE BUFFERS. 00920 M01S00919.tst +++| USE // 00921 M01S00920.tst +++| SEG 00922 M01S00921.tst +++| BUFS BSS 0 00923 M01S00922.tst +++| 00924 M01S00923.tst +++| PBUF EQU BUFS+1 TEST BUFFER FOR PATTERN REGENERATION 00925 M01S00924.tst +++| SBUF EQU PBUF+100B 00926 M01S00925.tst +++| TBUF EQU SBUF+100B 00927 M01S00926.tst +++| MFL= EQU TBUF+TBUFL+10B+200000B 00928 M01S00927.tst +++| 00929 M01S00928.tst +++| 00930 M01S00929.tst +++| TITLE PRESET. 00931 M01S00930.tst +++| ORG BUFS 00932 M01S00931.tst +++| 00933 M01S00932.tst +++| 00934 M01S00933.tst +++|** THE FOLLOWING CODE IS OVERLAYED BY BUFFERS. 00935 M01S00934.tst +++| 00936 M01S00935.tst +++| 00937 M01S00936.tst +++|* COMMON DECKS 00938 M01S00937.tst +++| 00939 M01S00938.tst +++|*CALL COMCARG 00940 M01S00939.tst +++|*CALL COMCCPM 00941 M01S00940.tst +++|*CALL COMCDXB 00942 M01S00941.tst +++|*CALL COMCMVE 00943 M01S00942.tst +++| PRS SPACE 4 00944 M01S00943.tst +++|** PRS - PRESET PROGRAM. 00945 M01S00944.tst +++|* 00946 M01S00945.tst +++|* ENTRY (B7) = 1 IF ADDRESS CONVERSION PRESET. 00947 M01S00946.tst +++| 00948 M01S00947.tst +++| 00949 M01S00948.tst +++| PRS SUBR ENTRY/EXIT 00950 M01S00949.tst +++| MODE 1 00951 M01S00950.tst +++| STATUS T,P 00952 M01S00951.tst +++| SA1 T+6 00953 M01S00952.tst +++| RJ WOD CONVERT EST ORDINAL 00954 M01S00953.tst +++| SA1 T+1 00955 M01S00954.tst +++| AX6 6 POSITION EST ORDINAL 00956 M01S00955.tst +++| MX0 12 00957 M01S00956.tst +++| BX1 X0*X1 00958 M01S00957.tst +++| MX0 18 00959 M01S00958.tst +++| LX0 -12 00960 M01S00959.tst +++| BX6 X0*X6 00961 M01S00960.tst +++| BX6 X6+X1 MERGE EST ORDINAL AND TYPE 00962 M01S00961.tst +++| MX0 -30 00963 M01S00962.tst +++| SA1 DCHC SET EQUIPMENT IN MESSAGES 00964 M01S00963.tst +++| BX1 -X0*X1 00965 M01S00964.tst +++| BX7 X6+X1 00966 M01S00965.tst +++| SA7 DCHC 00967 M01S00966.tst +++| SA1 CKSA-1 00968 M01S00967.tst +++| SB2 B0+ 00969 M01S00968.tst +++| SB3 4 00970 M01S00969.tst +++| PRS1 SA1 A1+B1 00971 M01S00970.tst +++| BX1 -X0*X1 00972 M01S00971.tst +++| SB2 B2+1 00973 M01S00972.tst +++| BX7 X6+X1 00974 M01S00973.tst +++| SA7 A1 00975 M01S00974.tst +++| LT B2,B3,PRS1 IF MORE MESSAGES 00976 M01S00975.tst +++| MX6 0 00977 M01S00976.tst +++| SA6 T+5 00978 M01S00977.tst +++| SA6 A6+B1 00979 M01S00978.tst +++| 00980 M01S00979.tst +++|* IDENTIFY ASSIGNED EQUIPMENT. 00981 M01S00980.tst +++| 00982 M01S00981.tst +++| SA2 TEQP 00983 M01S00982.tst +++| SA1 T+B1 00984 M01S00983.tst +++| MX0 -24 00985 M01S00984.tst +++| MX4 11 00986 M01S00985.tst +++| LX4 -1 00987 M01S00986.tst +++| SX7 B1 00988 M01S00987.tst +++| PRS2 ZR X2,PRS8 IF END OF TABLE 00989 M01S00988.tst +++| BX3 X2-X1 00990 M01S00989.tst +++| BX6 X4*X3 00991 M01S00990.tst +++| LX3 X2 00992 M01S00991.tst +++| SA2 A2+B1 00993 M01S00992.tst +++| NZ X6,PRS2 IF NO EQUIPMENT MATCH 00994 M01S00993.tst +++| BX6 -X0*X3 00995 M01S00994.tst +++| IX6 X6-X7 00996 M01S00995.tst +++| SA6 NS 00997 M01S00996.tst +++| MX7 12 SET SECTOR MASK 00998 M01S00997.tst +++| NX6 X6,B2 00999 M01S00998.tst +++| AX7 X7,B2 01000 M01S00999.tst +++| SA7 A6+B1 01001 M01S01000.tst +++| 01002 M01S01001.tst +++|* RETRIEVE ARGUMENTS. 01003 M01S01002.tst +++| 01004 M01S01003.tst +++| SA1 ACTR ARGUMENT COUNT 01005 M01S01004.tst +++| SB7 B0 FORCE OCTAL CONVERSION OF ARGUMENTS 01006 M01S01005.tst +++| SB4 X1 01007 M01S01006.tst +++| SA4 ARGR FIRST ARGUMENT 01008 M01S01007.tst +++| SB5 TARG ARGUMENT TABLE 01009 M01S01008.tst +++| RJ ARG PROCESS ARGUMENTS 01010 M01S01009.tst +++| NZ X1,PRS7 IF ARGUMENT ERROR 01011 M01S01010.tst +++| SA5 NS NUMBER OF SECTORS 01012 M01S01011.tst +++| MX2 12 01013 M01S01012.tst +++| BX3 X2*X5 01014 M01S01013.tst +++| ZR X3,PRS3 IF ARGUMENT OMITTED 01015 M01S01014.tst +++| RJ DXB CONVERT OCTAL ARGUMENT 01016 M01S01015.tst +++| NZ X4,PRS7 IF ERROR IN CONVERSION 01017 M01S01016.tst +++| SX1 B1 01018 M01S01017.tst +++| IX6 X6-X1 01019 M01S01018.tst +++| ZR X6,PRS7 IF ARGUMENT ERROR 01020 M01S01019.tst +++| SA6 NS 01021 M01S01020.tst +++| MX7 12 SET SECTOR MASK 01022 M01S01021.tst +++| NX6 X6,B2 01023 M01S01022.tst +++| AX7 X7,B2 01024 M01S01023.tst +++| SA7 SM 01025 M01S01024.tst +++| 01026 M01S01025.tst +++| PRS3 SA1 NS SET SECTOR SIZE 01027 M01S01026.tst +++| RJ CDD CONVERT TO DISPLAY 01028 M01S01027.tst +++| SA6 PRSE+2 01029 M01S01028.tst +++| SX1 PRSE 01030 M01S01029.tst +++| RJ MES SEND FILE SIZE MESSAGE 01031 M01S01030.tst +++| 01032 M01S01031.tst +++|* PATTERN SELECTION. 01033 M01S01032.tst +++| 01034 M01S01033.tst +++| SA5 TP 01035 M01S01034.tst +++| RJ DXB 01036 M01S01035.tst +++| NZ X4,PRS7 IF ARGUMENT ERROR 01037 M01S01036.tst +++| SB5 X6-TPATL+1 01038 M01S01037.tst +++| BX5 X6 01039 M01S01038.tst +++| GT B5,B0,PRS7 IF ARGUMENT ERROR 01040 M01S01039.tst +++| SA1 X6+TPAT 01041 M01S01040.tst +++| SA2 PRSA 01042 M01S01041.tst +++| BX6 X1 01043 M01S01042.tst +++| LX7 X2 01044 M01S01043.tst +++| SB5 X5-5 01045 M01S01044.tst +++| ZR B5,PRS4 IF P=5 (RANDOM PATTERN) 01046 M01S01045.tst +++| SA7 GDBA SETS AN INSTRUCTION IN GDB 01047 M01S01046.tst +++| PRS4 SA6 TP 01048 M01S01047.tst +++| SX7 X5-4 01049 M01S01048.tst +++| SA7 ND SET NO DATA FLAG 01050 M01S01049.tst +++| ZR X7,PRS5 IF P=4 01051 M01S01050.tst +++| SX7 X5-6 01052 M01S01051.tst +++| NZ X7,PRS5 IF NOT P=6 01053 M01S01052.tst +++| SA7 ND SET NO DATA FLAG 01054 M01S01053.tst +++| SA7 NT SET NO DATA TRANSFER FLAG 01055 M01S01054.tst +++| 01056 M01S01055.tst +++|* TEST SELECTION. 01057 M01S01056.tst +++| 01058 M01S01057.tst +++| PRS5 SA5 TS 01059 M01S01058.tst +++| RJ DXB 01060 M01S01059.tst +++| NZ X4,PRS7 IF ARGUMENT ERROR 01061 M01S01060.tst +++| SX3 X6-6 01062 M01S01061.tst +++| PL X3,PRS7 IF ARGUMENT ERROR 01063 M01S01062.tst +++| SA6 TS 01064 M01S01063.tst +++| 01065 M01S01064.tst +++|* BLOCK SIZE SELECTION. 01066 M01S01065.tst +++| 01067 M01S01066.tst +++| SA5 BS SPECIFIED BLOCK SIZE 01068 M01S01067.tst +++| MX2 12 01069 M01S01068.tst +++| BX3 X2*X5 01070 M01S01069.tst +++| ZR X3,PRS6 IF ARGUMENT OMITTED 01071 M01S01070.tst +++| RJ DXB CONVERT OCTAL ARGUMENT 01072 M01S01071.tst +++| NZ X4,PRS7 IF ERROR IN CONVERSION 01073 M01S01072.tst +++| BX5 X6 01074 M01S01073.tst +++| AX5 9 01075 M01S01074.tst +++| LX5 9 01076 M01S01075.tst +++| IX7 X6-X5 01077 M01S01076.tst +++| NZ X7,PRS7 IF NOT MULTIPLE OF 1000B 01078 M01S01077.tst +++| PRS6 BX6 X5 SET MLRS FIELD IN FET 01079 M01S01078.tst +++| SA6 T+6 01080 M01S01079.tst +++| EQ PRSX RETURN 01081 M01S01080.tst +++| 01082 M01S01081.tst +++| PRS7 MESSAGE (=C* ARGUMENT ERROR.*) 01083 M01S01082.tst +++| EQ ABT3 ABORT 01084 M01S01083.tst +++| 01085 M01S01084.tst +++| PRS8 MESSAGE (=C* ILLEGAL EQUIPMENT.*) 01086 M01S01085.tst +++| EQ ABT3 ABORT 01087 M01S01086.tst +++| 01088 M01S01087.tst +++| PRSA BX7 X6 01089 M01S01088.tst +++| SA7 A6 01090 M01S01089.tst +++| EQ GDB2 01091 M01S01090.tst +++| 01092 M01S01091.tst +++| PRSB CON 0 DEVICE TYPE - NO DEFAULT 01093 M01S01092.tst +++| PRSC DATA 0L0 TRACK 01094 M01S01093.tst +++| PRSD CON 0 SECTOR 01095 M01S01094.tst +++| PRSE DATA C* FILE SIZE = XXXXXXXXXX SECTORS.* 01096 M01S01095.tst +++| 01097 M01S01096.tst +++| 01098 M01S01097.tst +++| TARG BSS 0 TST ARGUMENT TABLE 01099 M01S01098.tst +++| T ARG DZRO,TS,400B 01100 M01S01099.tst +++| P ARG TP,TP,400B 01101 M01S01100.tst +++| N ARG DZRO,NS,400B 01102 M01S01101.tst +++| NW ARG -ONE,NW 01103 M01S01102.tst +++| BS ARG BS,BS 01104 M01S01103.tst +++| ARG 01105 M01S01104.tst +++| 01106 M01S01105.tst +++| 01107 M01S01106.tst +++| DZRO DATA 1L0 DISPLAY CODE ZERO 01108 M01S01107.tst +++| ONE DATA 1 CONSTANT 1 01109 M01S01108.tst +++| 01110 M01S01109.tst +++| 01111 M01S01110.tst +++| TEQP BSS 0 TABLE OF EQUIPMENTS 01112 M01S01111.tst +++| VFD 12/2RMT,24/,24/100000B 01113 M01S01112.tst +++| VFD 12/2RNT,24/,24/100000B 01114 M01S01113.tst +++| VFD 12/2RCT,24/,24/100000B 01115 M01S01114.tst +++| VFD 12/2RAT,24/,24/100000B 01116 M01S01115.tst +++| CON 0 END OF TABLE 01117 M01S01116.tst +++| 01118 M01S01117.tst +++| TPAT BSS 0 TABLE OF PATTERNS. 01119 M01S01118.tst +++| DATA 0 01120 M01S01119.tst +++| DATA -0 01121 M01S01120.tst +++| DATA 25252525252525252525B 01122 M01S01121.tst +++| DATA 52525252525252525252B 01123 M01S01122.tst +++| DATA 0 01124 M01S01123.tst +++| DATA 13576420735162531625B 01125 M01S01124.tst +++| DATA 0 01126 M01S01125.tst +++| TPATL EQU *-TPAT 01127 M01S01126.tst +++| 01128 M01S01127.tst +++| SPACE 4 01129 M01S01128.tst +++| END
cdc/nos2.source/opl.opl871/deck/tst.txt · Last modified: by 127.0.0.1