cdc:nos2.source:opl.opl871:common:compsei
Common COMPSEI
4 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.compsei +++| CTEXT COMPSEI - SEARCH FOR END OF INFORMATION. 00002 M01S00002.compsei +++| SEI SPACE 4 00003 M01S00003.compsei +++| IF -DEF,QUAL$,1 00004 M01S00004.compsei +++| QUAL COMPSEI
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00005 M02S00005.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1978. 00006 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00007 M01S00006.compsei +++| SEI SPACE 4 00008 M01S00007.compsei +++|*** SEI - SEARCH FOR END OF INFORMATION. 00009 M01S00008.compsei +++|* G. R. MANSFIELD. 70/08/09. 00010 M01S00009.compsei +++|* K. R. COMBS. 75/12/12. 00011 M01S00010.compsei +++| SEI SPACE 4 00012 M01S00011.compsei +++|*** SEI SETS THE TRACK AND SECTOR LOCATIONS FOR THE END 00013 M01S00012.compsei +++|* OF INFORMATION SECTOR OF A MASS STORAGE FILE. 00014 M01S00013.compsei +++|* 00015 M01S00014.compsei +++|* IF *IRA$* IS DEFINED, INITIALIZATION IS ASSUMED TO BE 00016 M01S00015.compsei +++|* PERFORMED. DECK -COMPIRA- CAN BE USED TO DO THIS. 00017 M01S00016.compsei +++|* IF *SEI$* IS NOT DEFINED, UP TO DATE TRT IN MMF SYSTEM IS 00018 M01S00017.compsei +++|* NOT GUARANTEED. 00019 M01S00018.compsei +++|*
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00020 M02S00019.ns22000 ---|* ENTRY (T5) = EQUIPMENT NUMBER.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2565 |
Seq # *Modification Id* Act ----------------------------+ 00021 M02S00001.ns2565 ---|* ENTRY (T5) = EST ORDINAL. 00022 M01S00001.ns2565 +++|* ENTRY (T5) = 3/R, 9/EST ORDINAL. 00023 M01S00002.ns2565 +++|* R = 1, IF RETURN-ON-INACCESSIBLE REQUESTED. 00024 M01S00020.compsei +++|* (T6) = FIRST TRACK. 00025 M01S00021.compsei +++|* (A) .EQ. 0 IF TRT MUST BE CURRENT (SEI$ DEFINED). 00026 M01S00022.compsei +++|* (A) .NE. 0 IF CURRENT TRT NOT REQUIRED (SEI$ DEFINED). 00027 M01S00023.compsei +++|*
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | ns2565 |
Seq # *Modification Id* Act ----------------------------+ 00028 M02S00024.ns2565 ---|* EXIT (A) = TRACK COUNT. 00029 M01S00003.ns2565 +++|* EXIT (A) = TRACK COUNT, IF DEVICE ACCESSIBLE. 00030 M01S00004.ns2565 +++|* (A) .LT. 0, IF DEVICE INACCESSIBLE. 00031 M01S00005.ns2565 +++|* (T5) = EST ORDINAL. 00032 M01S00025.compsei +++|* (T6) = LAST TRACK. 00033 M01S00026.compsei +++|* (T7) = LAST SECTOR. 00034 M01S00027.compsei +++|* (T2 - T3) = SECTOR COUNT. 00035 M01S00028.compsei +++|* 00036 M01S00029.compsei +++|* USES T1, CM - CM+4. 00037 M01S00030.compsei +++|*
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00038 M02S00031.242l642 ---|* MACROS MONITOR, IF TRT UPDATE NEEDED.
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00039 M02S00032.242l642 ---|* SETMS, IF INITIALIZATION NEEDED.
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00040 M02S00033.242l642 ---| SPACE 4
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00041 M02S00034.242l642 ---|* INSTRUCTIONS USED AS CONSTANTS.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00042 M02S00035.242l642 ---|
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00043 M02S00036.242l642 ---|
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00044 M02S00037.242l642 ---| ADCI EQU 2100 ADC 00045 M01S00001.242l642 +++|* MACROS MONITOR, SFA. 00046 M01S00002.242l642 +++|* 00047 M01S00003.242l642 +++|* XREF COMSPIM. 00048 M01S00038.compsei +++| 00049 M01S00039.compsei +++| 00050 M01S00040.compsei +++| SEI SUBR ENTRY/EXIT 00051 M01S00041.compsei +++| 00052 M01S00042.compsei +++| SEI$ IF DEF,SEI$ 00053 M01S00043.compsei +++| NJN SEI1 IF NO TRT UPDATE NEEDED 00054 M01S00044.compsei +++| LDN UTRS SET SUBFUNCTION CODE 00055 M01S00045.compsei +++| STD CM+3
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00056 M02S00046.ns22000 ---| LDD T5 SET EQUIPMENT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2565 |
Seq # *Modification Id* Act ----------------------------+ 00057 M02S00002.ns2565 ---| LDD T5 SET EST ORDINAL 00058 M01S00006.ns2565 +++| LDD T5 SET RETURN-ON-INACCESSIBLE / EST ORDINAL 00059 M01S00047.compsei +++| STD CM+1 00060 M01S00007.ns2565 +++| LPC 777 00061 M01S00008.ns2565 +++| STD T5 EST ORDINAL 00062 M01S00048.compsei +++| MONITOR STBM 00063 M01S00009.ns2565 +++| LDD CM+1 CHECK INACCESSIBLE STATUS 00064 M01S00010.ns2565 +++| SHN 21-11 00065 M01S00011.ns2565 +++| MJN SEIX IF DEVICE IS INACCESSIBLE 00066 M01S00049.compsei +++| SEI1 BSS 0 00067 M01S00050.compsei +++| SEI$ ENDIF 00068 M01S00051.compsei +++| IRA$ IF -DEF,IRA$
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00069 M02S00052.242l642 ---| SETMS
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00070 M02S00053.242l642 ---| LDD CM+4 SET FWA OF TRT
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00071 M02S00054.242l642 ---| SHN 3
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00072 M03S00055.242l642 ---| ADN MSTL
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00073 M02S00003.242l642 ---| ADN TRLL
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00074 M02S00004.242l642 ---| CRD CM
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00075 M02S00005.242l642 ---| LDD CM+3 00076 M01S00004.242l642 +++| SFA EST,T5 READ EST ENTRY 00077 M01S00005.242l642 +++| ADK EQDE 00078 M01S00006.242l642 +++| CRD CM 00079 M01S00007.242l642 +++| LDD CM+4 00080 M01S00008.242l642 +++| SHN 3 00081 M01S00009.242l642 +++| ADK MDGL 00082 M01S00010.242l642 +++| CRD CM 00083 M01S00011.242l642 +++| ADK TRLL-MDGL 00084 M01S00012.242l642 +++| CRD T7 00085 M01S00013.242l642 +++| LDD CM+4 SET SECTOR LIMIT 00086 M01S00014.242l642 +++| STP SLM 00087 M01S00015.242l642 +++| LDD T7+3 SET TRT FWA 00088 M01S00006.ns22000 +++| LPN 77 00089 M01S00007.ns22000 +++| SHN 14
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00090 M02S00008.242l642 ---| LMD CM+4 00091 M01S00016.242l642 +++| LMD T7+4 00092 M01S00056.compsei +++| SBD TH 4000/2 00093 M01S00057.compsei +++| STM SEIA+1 00094 M01S00058.compsei +++| SHN -14 00095 M01S00059.compsei +++| LMC ADCI 00096 M01S00060.compsei +++| STM SEIA 00097 M01S00061.compsei +++| IRA$ ENDIF 00098 M01S00062.compsei +++| LDN 0 CLEAR SECTOR COUNT 00099 M01S00063.compsei +++| STD T3 00100 M01S00064.compsei +++| STD T2 00101 M01S00065.compsei +++| STD T0 00102 M01S00066.compsei +++| SEI2 LDD T6 READ TRT WORD 00103 M01S00067.compsei +++| SHN -2 00104 M01S00068.compsei +++| SEIA ADC TRTS 00105 M01S00069.compsei +++| CRD CM 00106 M01S00070.compsei +++| LDD T6 SET BYTE INDEX 00107 M01S00071.compsei +++| LPN 3 00108 M01S00072.compsei +++| STD T1 00109 M01S00073.compsei +++| LDM CM,T1 CHECK NEXT LINK 00110 M01S00074.compsei +++| SHN 6 00111 M01S00075.compsei +++| PJN SEI3 IF LAST SECTOR 00112 M01S00076.compsei +++| SHN -6 00113 M01S00077.compsei +++| STD T6
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | compsei |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00114 M02S00078.242l642 ---| LDM SLM 00115 M01S00017.242l642 +++| LDP SLM 00116 M01S00079.compsei +++| RAD T3 00117 M01S00080.compsei +++| SHN -14 00118 M01S00081.compsei +++| RAD T2 00119 M01S00082.compsei +++| AOD T0 ADVANCE TRACK COUNT 00120 M01S00083.compsei +++| UJN SEI2 LOOP 00121 M01S00084.compsei +++| 00122 M01S00085.compsei +++| SEI3 SHN -6 SET LAST SECTOR 00123 M01S00086.compsei +++| STD T7 00124 M01S00087.compsei +++| RAD T3 COUNT SECTORS 00125 M01S00088.compsei +++| SHN -14 00126 M01S00089.compsei +++| RAD T2 00127 M01S00090.compsei +++| AOD T0 (A) = TRACK COUNT 00128 M01S00091.compsei +++| LJM SEIX RETURN 00129 M01S00092.compsei +++| SPACE 4 00130 M01S00093.compsei +++| QUAL$ IF -DEF,QUAL$ 00131 M01S00094.compsei +++| QUAL * 00132 M01S00095.compsei +++| SEI EQU /COMPSEI/SEI 00133 M01S00096.compsei +++| SEIA EQU /COMPSEI/SEIA 00134 M01S00097.compsei +++| QUAL$ ENDIF 00135 M01S00098.compsei +++| ENDX
cdc/nos2.source/opl.opl871/common/compsei.txt · Last modified: by 127.0.0.1