cdc:nos2.source:opl.opl871:common:comcsrt
Common COMCSRT
2 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.comcsrt +++| CTEXT COMCSRT - SET RECORD TYPE. 00002 M01S00002.comcsrt +++| SRT SPACE 4 00003 M01S00003.comcsrt +++| IF -DEF,QUAL$,1 00004 M01S00004.comcsrt +++| QUAL COMCSRT 00005 M01S00005.comcsrt +++| BASE D
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1970. 00007 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00008 M01S00007.comcsrt +++| SRT SPACE 4 00009 M01S00008.comcsrt +++|*** SRT - SET RECORD TYPE. 00010 M01S00009.comcsrt +++|* G. R. MANSFIELD. 70/10/09. 00011 M01S00010.comcsrt +++|* ADAPTED FROM SUBROUTINE *CPT* IN *LIBEDIT*. 00012 M01S00011.comcsrt +++|* 00013 M01S00012.comcsrt +++|* *SRT* IDENTIFIES THE FORMAT OF A RECORD FROM THE DATA 00014 M01S00013.comcsrt +++|* LOCATED IN A WORKING BUFFER DEFINED BY THE CALLER. 00015 M01S00014.comcsrt +++|* THE TYPE IS RETURNED AS FOLLOWS - 00016 M01S00015.comcsrt +++|* 00017 M01S00016.comcsrt +++|* NUMBER TYPE FORMAT 00018 M01S00017.comcsrt +++|* 00019 M01S00018.comcsrt +++|* 0 TEXT UNRECOGNIZED 00020 M01S00019.comcsrt +++|* 1 PP PP PROGRAM 00021 M01S00020.comcsrt +++|* 3 REL RELOCATABLE SUBPROGRAM 00022 M01S00021.comcsrt +++|* 4 OVL OVERLAY 00023 M01S00022.comcsrt +++|* 5 ULIB USER LIBRARY 00024 M01S00023.comcsrt +++|* 6 OPL MODIFY OPL DECK 00025 M01S00024.comcsrt +++|* 7 OPLC MODIFY OPL COMMON DECK 00026 M01S00025.comcsrt +++|* 8 OPLD MODIFY OPL DIRECTORY 00027 M01S00026.comcsrt +++|* 9 ABS ABSOLUTE PROGRAM 00028 M01S00027.comcsrt +++|* 10 PPU PPU PROGRAM 00029 M01S00028.comcsrt +++|* 14 CAP FAST DYNAMIC LOAD CAPSULE 00030 M01S00029.comcsrt +++|* 16 PROC PROCEDURE RECORD 00031 M01S00001.251l664 +++|* 20 PPL 16-BIT PP PROGRAM 00032 M01S00030.comcsrt +++|* 00033 M01S00031.comcsrt +++|* IF TYPE NUMBER AND RECORD NAME = 0, RECORD IS ZERO LENGTH. 00034 M01S00032.comcsrt +++|* 00035 M01S00033.comcsrt +++|* ENTRY (X1) = LAST WORD ADDRESS + 1 OF DATA. 00036 M01S00034.comcsrt +++|* (X2) = START OF BLOCK IN MEMORY. 00037 M01S00035.comcsrt +++|* (B1) = 1. 00038 M01S00036.comcsrt +++|* 00039 M01S00037.comcsrt +++|* EXIT (X6) = RECORD NAME AND TYPE. 00040 M01S00038.comcsrt +++|* (X7) = RECORD NAME, 0 FILL. 00041 M01S00039.comcsrt +++|* 00042 M01S00040.comcsrt +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 00043 M01S00041.comcsrt +++|* B - 2, 3. 00044 M01S00042.comcsrt +++|* A - 1, 2, 4. 00045 M01S00002.251l664 +++| SPACE 4,10 00046 M01S00003.251l664 +++|* CALL *COMSSRT* IF NOT ALREADY CALLED. 00047 M01S00004.251l664 +++| 00048 M01S00005.251l664 +++|*CALLC COMSSRT 00049 M01S00043.comcsrt +++| 00050 M01S00044.comcsrt +++| 00051 M01S00045.comcsrt +++| SRT15 MX6 0 CLEAR NAMES 00052 M01S00046.comcsrt +++| SX7 B0 00053 M01S00047.comcsrt +++| 00054 M01S00048.comcsrt +++| SRT PS ENTRY/EXIT 00055 M01S00049.comcsrt +++| IX6 X1-X2 NUMBER OF DATA WORDS 00056 M01S00050.comcsrt +++| ZR X6,SRT15 IF ZERO LENGTH RECORD 00057 M01S00051.comcsrt +++| SX4 B1+B1 00058 M01S00052.comcsrt +++| SX7 X6-2 NUMBER OF DATA WORDS - 2 00059 M01S00053.comcsrt +++| SA1 X2 CHECK FIRST WORD 00060 M01S00054.comcsrt +++| BX6 X1 (X6) = PROGRAM NAME 00061 M01S00055.comcsrt +++| MX0 -12 00062 M01S00056.comcsrt +++| LX2 X1 (X2) = RECORD NAME 00063 M01S00057.comcsrt +++| LX1 12 00064 M01S00058.comcsrt +++| BX3 -X0*X1 00065 M01S00059.comcsrt +++| SB3 X3-7700B 00066 M01S00060.comcsrt +++| NZ B3,SRT1 IF NO 7700 TABLE 00067 M01S00061.comcsrt +++| SA2 A1+B1 GET NAME FROM 7700 TABLE 00068 M01S00062.comcsrt +++| 00069 M01S00063.comcsrt +++|* CHECK FOR A VALID 7700 TABLE. 00070 M01S00064.comcsrt +++|* THERE MUST BE WC+2 DATA WORDS FOR A VALID 7700 TABLE. 00071 M01S00065.comcsrt +++| 00072 M01S00066.comcsrt +++| LX1 12 CHECK 7700 WORD COUNT .LE. REAL LENGTH 00073 M01S00067.comcsrt +++| BX3 -X0*X1 00074 M01S00068.comcsrt +++| IX7 X7-X3 00075 M01S00069.comcsrt +++| PL X7,SRT0 IF VALID 7700 TABLE 00076 M01S00070.comcsrt +++| SA2 A1 GET TEXT RECORD NAME 00077 M01S00071.comcsrt +++| SX3 B0 PROCESS AS TEXT RECORD 00078 M01S00072.comcsrt +++| SRT0 SB2 B0 REPORT *TEXT* FOR *UCF* TYPE 00079 M01S00006.251l664 +++| ERRNZ TXRT CODE ASSUMES VALUE 00080 M01S00073.comcsrt +++| ZR X3,SRT12 IF UPDATE COMPRESSED COMPILE FILE 00081 M01S00074.comcsrt +++| SB3 X2 CHECK SEQUENCE NUMBER 00082 M01S00075.comcsrt +++| NZ B3,SRT12 IF MODIFY COMPRESSED COMPILE FILE 00083 M01S00076.comcsrt +++| 00084 M01S00077.comcsrt +++|* CHECK FIRST WORD BEYOND 7700 TABLE FOR *LDSET* TABLE. 00085 M01S00078.comcsrt +++| 00086 M01S00079.comcsrt +++| SB3 X3 GET FIRST WORD BEYOND 7700 TABLE 00087 M01S00080.comcsrt +++| SA1 A2+B3 00088 M01S00081.comcsrt +++| BX6 X1 00089 M01S00082.comcsrt +++| LX1 12 POSITION FOR 7000 TABLE CHECK 00090 M01S00083.comcsrt +++| BX3 -X0*X1 00091 M01S00084.comcsrt +++| IX7 X7-X4 INSURE WORD AFTER *LDSET* TABLE 00092 M01S00085.comcsrt +++| 00093 M01S00086.comcsrt +++|* CHECK FOR *OPLD* AND *LDSET* TABLES. 00094 M01S00087.comcsrt +++|* THERE MAY OR MAY NOT BE A 7700 TABLE. 00095 M01S00088.comcsrt +++|* THERE MUST BE WC+1 MORE DATA WORDS FOR A VALID 7000 TABLE. 00096 M01S00089.comcsrt +++| 00097 M01S00090.comcsrt +++| SRT1 SB2 X3-7000B 00098 M01S00091.comcsrt +++| NZ B2,SRT2 IF NO 7000 TABLE 00099 M01S00092.comcsrt +++| LX1 12 CHECK FOR WC = 0 (*OPLD* TABLE) 00100 M01S00093.comcsrt +++| BX3 -X0*X1 00101 M01S00094.comcsrt +++| ZR X3,SRT5 IF OPLD TYPE 00102 M01S00095.comcsrt +++| SB3 X3+B1 00103 M01S00096.comcsrt +++| SX7 X7+B1 IGNORE FIRST WORD IF NO 7700 TABLE 00104 M01S00097.comcsrt +++| SB2 B0 SET TEXT RECORD TYPE 00105 M01S00007.251l664 +++| ERRNZ TXRT CODE ASSUMES VALUE 00106 M01S00098.comcsrt +++| IX7 X7-X3 00107 M01S00099.comcsrt +++| NG X7,SRT12 IF NOT VALID 7000 TABLE 00108 M01S00100.comcsrt +++| SA1 A1+B3 00109 M01S00101.comcsrt +++| BX6 X1 (X6) = FIRST WORD OF PROGRAM 00110 M01S00102.comcsrt +++| 00111 M01S00103.comcsrt +++|* CHECK FOR AND PROCESS CONTROL LANGUAGE PROCEDURE RECORDS. 00112 M01S00104.comcsrt +++| 00113 M01S00105.comcsrt +++| SRT2 SA4 SRTB CHECK FOR .PROC, 00114 M01S00106.comcsrt +++| MX0 36 00115 M01S00107.comcsrt +++| BX3 X0*X6 00116 M01S00108.comcsrt +++| BX4 X3-X4 00117 M01S00109.comcsrt +++| NZ X4,SRT5 IF NOT .PROC, 00118 M01S00110.comcsrt +++| LX6 36 GET FIRST FOUR LETTERS OF NAME 00119 M01S00111.comcsrt +++| MX0 24 00120 M01S00112.comcsrt +++| BX6 X0*X6 00121 M01S00113.comcsrt +++| SA1 A1+B1 GET LAST THREE CHARACTERS OF NAME 00122 M01S00114.comcsrt +++| MX0 18 00123 M01S00115.comcsrt +++| BX4 X0*X1 00124 M01S00116.comcsrt +++| LX4 -24 00125 M01S00117.comcsrt +++| BX6 X6+X4 00126 M01S00118.comcsrt +++| MX0 -6 00127 M01S00119.comcsrt +++| LX4 X6 00128 M01S00120.comcsrt +++| SB2 -B1 00129 M01S00121.comcsrt +++| SB3 7 00130 M01S00122.comcsrt +++| SRT3 LX4 6 00131 M01S00123.comcsrt +++| BX3 -X0*X4 00132 M01S00124.comcsrt +++| SX2 X3-1R9-1 CHECK FOR SEPARATOR 00133 M01S00125.comcsrt +++| PL X2,SRT4 IF END OF NAME 00134 M01S00126.comcsrt +++| SB3 B3-1 00135 M01S00127.comcsrt +++| SB2 B2+6 00136 M01S00128.comcsrt +++| NZ B3,SRT3 IF SEVEN LETTERS NOT PROCESSED YET 00137 M01S00129.comcsrt +++| SRT4 MX0 1 BUILD MASK 00138 M01S00130.comcsrt +++| AX0 B2
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00139 M02S00131.251l664 ---| SX2 16 TYPE = 16 00140 M01S00008.251l664 +++| SX2 PRRT TYPE = PROC 00141 M01S00132.comcsrt +++| BX7 X0*X6 00142 M01S00133.comcsrt +++| IX6 X7+X2 00143 M01S00134.comcsrt +++| PL B2,SRT RETURN IF NAME PRESENT 00144 M01S00135.comcsrt +++| SX7 1R RETURN SPACE FOR NAME 00145 M01S00136.comcsrt +++| LX7 48 00146 M01S00137.comcsrt +++| BX6 X7+X2 00147 M01S00138.comcsrt +++| EQ SRT 00148 M01S00139.comcsrt +++| 00149 M01S00140.comcsrt +++|* IDENTIFY PP PROGRAM FORMAT. 00150 M01S00141.comcsrt +++|* CHARACTER 3 " 0, 00151 M01S00142.comcsrt +++|* CHARACTER 4 = 0, 00152 M01S00143.comcsrt +++|* BYTE 3 = 0, 00153 M01S00144.comcsrt +++|* BYTE 4 " 0. 00154 M01S00145.comcsrt +++|* IF CHARACTER 1 IS ALPHA, BYT2 2 " 0. 00155 M01S00146.comcsrt +++| 00156 M01S00147.comcsrt +++| SRT5 SA1 SRTA =77000077770000B
| Line S00148 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00157 M02S00148.251l664 ---| SB2 B0 TYPE = 0 00158 M01S00009.251l664 +++| SB2 B0 TYPE = TEXT 00159 M01S00010.251l664 +++| ERRNZ TXRT CODE ASSUMES VALUE 00160 M01S00149.comcsrt +++| BX3 X1*X6 CHECK FOR NAME ;3-CHARACTERS AND BYTE 3=0 00161 M01S00150.comcsrt +++| MX0 12 00162 M01S00151.comcsrt +++| BX1 X0*X6 CHECK FOR NUMERIC FIRST CHARACTER 00163 M01S00152.comcsrt +++| LX0 48 00164 M01S00153.comcsrt +++| BX4 X0*X6 CHECK FOR 3-CHARACTER NAME 00165 M01S00154.comcsrt +++| LX1 12 00166 M01S00155.comcsrt +++| LX0 48 00167 M01S00156.comcsrt +++| NZ X3,SRT7 IF NAME .GT. 3 CHARACTERS OR BYTE 3 .NE. 0 00168 M01S00157.comcsrt +++| ZR X4,SRT7 IF NAME .LT. 3 CHARACTERS 00169 M01S00158.comcsrt +++| SB3 X1-2R0A 00170 M01S00159.comcsrt +++| BX3 X0*X6 00171 M01S00160.comcsrt +++| MX0 6 00172 M01S00161.comcsrt +++| LX0 54 00173 M01S00162.comcsrt +++| BX7 X0*X6 00174 M01S00163.comcsrt +++| ZR X7,SRT7 IF CHARACTER TWO = 0 00175 M01S00164.comcsrt +++| PL B3,SRT6 IF NUMERIC PP NAME 00176 M01S00165.comcsrt +++| ZR X3,SRT7 IF NO LOAD ADDRESS 00177 M01S00166.comcsrt +++| SRT6 MX0 18 00178 M01S00167.comcsrt +++| SB3 X6 00179 M01S00168.comcsrt +++| ZR B3,SRT12 IF ZERO LENGTH PROGRAM
| Line S00169 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00180 M02S00169.251l664 ---| SB2 B1 TYPE = 1 00181 M01S00011.251l664 +++| SB2 B1 TYPE = PP 00182 M01S00012.251l664 +++| ERRNZ PPRT-1 CODE ASSUMES VALUE 00183 M01S00170.comcsrt +++| BX2 X0*X2 00184 M01S00171.comcsrt +++| EQ SRT12 EXIT 00185 M01S00172.comcsrt +++| 00186 M01S00173.comcsrt +++|* CHECK FOR. 00187 M01S00174.comcsrt +++|* REL 00188 M01S00175.comcsrt +++|* ULIB 00189 M01S00176.comcsrt +++|* OPL 00190 M01S00177.comcsrt +++|* OPLC 00191 M01S00178.comcsrt +++|* OPLD 00192 M01S00179.comcsrt +++|* ABS 00193 M01S00180.comcsrt +++|* PPU 00194 M01S00181.comcsrt +++|
| Line S00182 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00195 M02S00182.251l664 ---| SRT7 SB2 3 TYPE = 3 00196 M01S00013.251l664 +++| SRT7 SB2 RLRT TYPE = REL 00197 M01S00183.comcsrt +++| SB3 X1-3400B 00198 M01S00184.comcsrt +++| ZR B3,SRT12 IF RELOCATABLE
| Line S00185 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00199 M02S00185.251l664 ---| SB2 5 TYPE = 5 00200 M01S00014.251l664 +++| SB2 ULRT TYPE = ULIB 00201 M01S00186.comcsrt +++| SB3 X1-7600B 00202 M01S00187.comcsrt +++| ZR B3,SRT12 IF USER LIBRARY
| Line S00188 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00203 M02S00188.251l664 ---| SB2 6 TYPE = 6 00204 M01S00015.251l664 +++| SB2 OPRT TYPE = OPL 00205 M01S00189.comcsrt +++| SB3 X1-7001B 00206 M01S00190.comcsrt +++| ZR B3,SRT12 IF OLD PROGRAM LIBRARY
| Line S00191 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00207 M02S00191.251l664 ---| SB2 7 TYPE = 7 00208 M01S00016.251l664 +++| SB2 OCRT TYPE = OPLC 00209 M01S00192.comcsrt +++| SB3 X1-7002B 00210 M01S00193.comcsrt +++| ZR B3,SRT12 IF OPL COMMON DECK
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00211 M02S00194.251l664 ---| SB2 8 TYPE = 8 00212 M01S00017.251l664 +++| SB2 ODRT TYPE = OPLD 00213 M01S00195.comcsrt +++| SB3 X1-7000B 00214 M01S00196.comcsrt +++| ZR B3,SRT12 IF OPL DIRECTORY
| Line S00197 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00215 M02S00197.251l664 ---| SB2 14D TYPE = 14 00216 M01S00018.251l664 +++| SB2 CART TYPE = CAP 00217 M01S00198.comcsrt +++| SB3 X1-6000B 00218 M01S00199.comcsrt +++| ZR B3,SRT12 IF CAP 00219 M01S00019.251l664 +++| SB2 PLRT TYPE = PPL 00220 M01S00020.251l664 +++| SB3 X1-6100B 00221 M01S00021.251l664 +++| ZR B3,SRT12 IF 16-BIT PP PROGRAM
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00222 M02S00200.251l664 ---| SB2 9 TYPE = 9 00223 M01S00022.251l664 +++| SB2 ABRT TYPE = ABS 00224 M01S00201.comcsrt +++| SB3 X1-5400B 00225 M01S00202.comcsrt +++| NZ B3,SRT8 IF NOT *5400* TABLE 00226 M01S00203.comcsrt +++| LX0 12 00227 M01S00204.comcsrt +++| BX0 X0*X6 CHECK OVERLAY LEVELS 00228 M01S00205.comcsrt +++| ZR X0,SRT12 IF 00,00 OVERLAY 00229 M01S00206.comcsrt +++| JP SRT10 CHECK NAME 00230 M01S00207.comcsrt +++| 00231 M01S00208.comcsrt +++| SRT8 SB3 X1-5300B 00232 M01S00209.comcsrt +++| NZ B3,SRT9 IF NOT *ACPM* TYPE 00233 M01S00210.comcsrt +++| SB3 X6+ 00234 M01S00211.comcsrt +++| NG B3,SRT12 IF NOT ABS TYPE *ACPM* 00235 M01S00212.comcsrt +++| JP SRT10 CHECK NAME 00236 M01S00213.comcsrt +++| 00237 M01S00214.comcsrt +++| SRT9 SB3 X1-5100B 00238 M01S00215.comcsrt +++| ZR B3,SRT12 IF ABS
| Line S00216 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00239 M02S00216.251l664 ---| SB2 10 TYPE = 10 00240 M01S00023.251l664 +++| SB2 PURT TYPE = PPU 00241 M01S00217.comcsrt +++| SB3 X1-5200B 00242 M01S00218.comcsrt +++| ZR B3,SRT12 IF PPU 00243 M01S00219.comcsrt +++| SB3 X1-5000B 00244 M01S00220.comcsrt +++| NZ B3,SRT11 IF NOT OVERLAY
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00245 M02S00221.251l664 ---| SRT10 SB2 4 00246 M01S00024.251l664 +++| SRT10 SB2 OVRT TYPE = OVL 00247 M01S00222.comcsrt +++| BX7 X2-X6 00248 M01S00223.comcsrt +++| NZ X7,SRT12 IF NAME .NE. FIRST WORD OF PROGRAM
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | comcsrt |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 00249 M02S00224.251l664 ---| SRT11 SB2 B0+ TYPE =0 00250 M01S00025.251l664 +++| SRT11 SB2 B0+ TYPE = TEXT 00251 M01S00026.251l664 +++| ERRNZ TXRT CODE ASSUMES VALUE 00252 M01S00225.comcsrt +++| 00253 M01S00226.comcsrt +++|* SET NAME AND TYPE. 00254 M01S00227.comcsrt +++| 00255 M01S00228.comcsrt +++| SRT12 MX0 42 00256 M01S00229.comcsrt +++| SX4 1R CHECK FOR TRAILING SPACES 00257 M01S00230.comcsrt +++| BX7 X0*X2 00258 M01S00231.comcsrt +++| LX4 12 00259 M01S00232.comcsrt +++| MX2 6 00260 M01S00233.comcsrt +++| LX2 -42 00261 M01S00234.comcsrt +++| SRT13 LX4 6 00262 M01S00235.comcsrt +++| NG X2,SRT14 IF END OF WORD 00263 M01S00236.comcsrt +++| LX2 6 POSITION MASK 00264 M01S00237.comcsrt +++| BX3 X2*X7 00265 M01S00238.comcsrt +++| ZR X3,SRT13 IF COLON OR NULL CHARACTER 00266 M01S00239.comcsrt +++| BX6 X4-X3 00267 M01S00240.comcsrt +++| NZ X6,SRT14 IF NOT BLANK 00268 M01S00241.comcsrt +++| BX7 -X2*X7 DELETE TRAILING SPACE 00269 M01S00242.comcsrt +++| EQ SRT13 CHECK NEXT CHARACTER 00270 M01S00243.comcsrt +++| 00271 M01S00244.comcsrt +++| SRT14 SX6 B2 TYPE 00272 M01S00245.comcsrt +++| IX6 X6+X7 00273 M01S00246.comcsrt +++| EQ SRT RETURN 00274 M01S00247.comcsrt +++| 00275 M01S00248.comcsrt +++| SRTA CON 77000077770000B 00276 M01S00249.comcsrt +++| SRTB CON 6L.PROC, 00277 M01S00250.comcsrt +++| SPACE 4 00278 M01S00251.comcsrt +++| BASE * 00279 M01S00252.comcsrt +++| QUAL$ IF -DEF,QUAL$ 00280 M01S00253.comcsrt +++| QUAL * 00281 M01S00254.comcsrt +++| SRT EQU /COMCSRT/SRT 00282 M01S00255.comcsrt +++| QUAL$ ENDIF 00283 M01S00256.comcsrt +++| ENDX
cdc/nos2.source/opl.opl871/common/comcsrt.txt · Last modified: by 127.0.0.1