cdc:nos2.source:opl.opl871:common:comprli
Common COMPRLI
1 Modification
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.comprli +++| CTEXT COMPRLI - RELOCATABLE OVERLAY MACROS.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | comprli |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00002 M02S00002.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1970. 00003 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00004 M01S00003.comprli +++| MACROS SPACE 4 00005 M01S00004.comprli +++|*** COMPRLI - RELOCATABLE OVERLAY MACROS. 00006 M01S00005.comprli +++|* G. R. MANSFIELD. 70/10/04. 00007 M01S00006.comprli +++| MACROS SPACE 4 00008 M01S00007.comprli +++|*** APPROPRIATE INSTRUCTIONS ARE RE-DEFINED SUCH THAT 00009 M01S00008.comprli +++|* PROPER CODE IS ASSEMBLED FOR RELOCATABLE OVERLAYS. 00010 M01S00009.comprli +++|* A RELOCATION TABLE IS GENERATED FOR ALL INSTRUCTIONS 00011 M01S00010.comprli +++|* WHICH MUST BE RELOCATED. -M- TYPE INSTRUCTIONS ARE 00012 M01S00011.comprli +++|* RELOCATED USING (LA) IF POSSIBLE. 00013 M01S00012.comprli +++|* IF THE SYMBOL *REL$* IS SET NON-ZERO, ALL -M- INSTRUCTIONS 00014 M01S00013.comprli +++|* WILL BE RELOCATED BY THE RELOCATION TABLE. 00015 M01S00014.comprli +++|* THE ORIGINAL DEFINITION OF THE INSTRUCTION MAY BE USED 00016 M01S00015.comprli +++|* WHERE APPROPRIATE, BY APPENDING A *.* TO THE OPCODE. 00017 M01S00016.comprli +++|* A *.* AFTER A -C- TYPE INSTRUCTION (LDC., LMC., ADC.) WILL 00018 M01S00017.comprli +++|* CAUSE RELOCATION, OTHERWISE THESE INSTRUCTIONS WILL NOT BE 00019 M01S00018.comprli +++|* RELOCATED. 00020 M01S00019.comprli +++|* 00021 M01S00020.comprli +++|* IF THE SYMBOL *RLI$* IS NOT DEFINED, RESULTANT CODE 00022 M01S00021.comprli +++|* WILL NOT BE QUALIFIED. THIS QUALIFIER (*REL*) IS LEFT 00023 M01S00022.comprli +++|* IN EFFECT, THEREFORE ALL CODE ASSEMBLED THEREAFTER WILL 00024 M01S00023.comprli +++|* BE QUALIFIED. THIS IS NECESSARY FOR THE RELOCATION MACROS 00025 M01S00024.comprli +++|* TO WORK PROPERLY, SINCE INSTRUCTIONS REFERENCING UNQUALIFIED 00026 M01S00025.comprli +++|* SYMBOLS ARE NOT RELOCATED. 00027 M01S00026.comprli +++|* 00028 M01S00027.comprli +++|* IF THE SYMBOL *RINST$* IS DEFINED, INSTRUCTIONS WILL BE 00029 M01S00028.comprli +++|* RESTORED ON EXIT FROM THIS DECK. 00030 M01S00029.comprli +++| RLIM SPACE 4 00031 M01S00030.comprli +++|** RLIM - DEFINE RELOCATION FOR -M- TYPE INSTRUCTIONS. 00032 M01S00031.comprli +++|* 00033 M01S00032.comprli +++|* 00034 M01S00033.comprli +++|* RLIM OPC,CODE 00035 M01S00034.comprli +++|* ENTRY *OPC* = INSTRUCTION MNEMONIC. 00036 M01S00035.comprli +++|* *CODE* = OPERATION CODE. 00037 M01S00036.comprli +++| 00038 M01S00037.comprli +++| 00039 M01S00038.comprli +++| RLIM MACRO OPC,CODE 00040 M01S00039.comprli +++| PURGMAC OPC 00041 M01S00040.comprli +++| OPC. PPOP 5,CODE 00042 M01S00041.comprli +++| OPC MACRO M,D 00043 M01S00042.comprli +++| LOCAL A 00044 M01S00043.comprli +++| .1 MICRO 1,1, M 00045 M01S00044.comprli +++| IFC GE,$".1"$0$,3 00046 M01S00045.comprli +++| IFC LE,$".1"$9$,2 00047 M01S00046.comprli +++| OPC. M,D 00048 M01S00047.comprli +++| .1 SKIP 00049 M01S00048.comprli +++| IF DEF,//M,2 00050 M01S00049.comprli +++| OPC. M,D 00051 M01S00050.comprli +++| .2 SKIP 00052 M01S00051.comprli +++| IFEQ REL$,,3 00053 M01S00052.comprli +++| IFEQ D,,2 00054 M01S00053.comprli +++| OPC. M,LA 00055 M01S00054.comprli +++| .3 SKIP 00056 M01S00055.comprli +++| OPC. M,D 00057 M01S00056.comprli +++| A EQU *-1 00058 M01S00057.comprli +++| RMT 00059 M01S00058.comprli +++| USE REL 00060 M01S00059.comprli +++| CON A 00061 M01S00060.comprli +++| RMT 00062 M01S00061.comprli +++| ENDIF 00063 M01S00062.comprli +++| OPC ENDM 00064 M01S00063.comprli +++| RLIM ENDM 00065 M01S00064.comprli +++| 00066 M01S00065.comprli +++| RLIM LJM,0100 00067 M01S00066.comprli +++| RLIM RJM,0200 00068 M01S00067.comprli +++| RLIM LDM,5000 00069 M01S00068.comprli +++| RLIM ADM,5100 00070 M01S00069.comprli +++| RLIM SBM,5200 00071 M01S00070.comprli +++| RLIM LMM,5300 00072 M01S00071.comprli +++| RLIM STM,5400 00073 M01S00072.comprli +++| RLIM RAM,5500 00074 M01S00073.comprli +++| RLIM AOM,5600 00075 M01S00074.comprli +++| RLIM SOM,5700 00076 M01S00075.comprli +++| RLIO SPACE 4 00077 M01S00076.comprli +++|** RLIO - DEFINE RELOCATION FOR -I/O- INSTRUCTIONS. 00078 M01S00077.comprli +++|* 00079 M01S00078.comprli +++|* 00080 M01S00079.comprli +++|* RLIO OPC,CODE 00081 M01S00080.comprli +++|* ENTRY *OPC* = INSTRUCTION MNEMONIC. 00082 M01S00081.comprli +++|* *CODE* = OPERATION CODE. 00083 M01S00082.comprli +++| 00084 M01S00083.comprli +++| 00085 M01S00084.comprli +++| RLIO MACRO OPC,CODE 00086 M01S00085.comprli +++| PURGMAC OPC 00087 M01S00086.comprli +++| OPC. PPOP 7,CODE 00088 M01S00087.comprli +++| OPC MACRO M,D 00089 M01S00088.comprli +++| LOCAL A 00090 M01S00089.comprli +++| .1 MICRO 1,1, M 00091 M01S00090.comprli +++| IFC GE,$".1"$0$,3 00092 M01S00091.comprli +++| IFC LE,$".1"$9$,2 00093 M01S00092.comprli +++| OPC. M,D 00094 M01S00093.comprli +++| .2 SKIP 00095 M01S00094.comprli +++| IF DEF,//M,2 00096 M01S00095.comprli +++| OPC. M,D 00097 M01S00096.comprli +++| .3 SKIP 00098 M01S00097.comprli +++| OPC. M,D 00099 M01S00098.comprli +++| A EQU *-1 00100 M01S00099.comprli +++| RMT 00101 M01S00100.comprli +++| USE REL 00102 M01S00101.comprli +++| CON A 00103 M01S00102.comprli +++| RMT 00104 M01S00103.comprli +++| ENDIF 00105 M01S00104.comprli +++| OPC ENDM 00106 M01S00105.comprli +++| RLIO ENDM 00107 M01S00106.comprli +++| 00108 M01S00107.comprli +++| RLIO CRM,6100 00109 M01S00108.comprli +++| RLIO CWM,6300 00110 M01S00109.comprli +++| RLIO AJM,6400 00111 M01S00110.comprli +++| RLIO IJM,6500 00112 M01S00111.comprli +++| RLIO FJM,6600 00113 M01S00112.comprli +++| RLIO EJM,6700 00114 M01S00113.comprli +++| RLIO IAM,7100 00115 M01S00114.comprli +++| RLIO OAM,7300 00116 M01S00115.comprli +++| RLIC SPACE 4 00117 M01S00116.comprli +++|** RLIC - DEFINE RELOCATABLE FORM FOR -C- TYPE INSTRUCTIONS. 00118 M01S00117.comprli +++|* 00119 M01S00118.comprli +++|* 00120 M01S00119.comprli +++|* RLIC OPC 00121 M01S00120.comprli +++|* ENTRY *OPC* = INSTRUCTION MNEMONIC. 00122 M01S00121.comprli +++| 00123 M01S00122.comprli +++| 00124 M01S00123.comprli +++| RLIC MACRO OPC 00125 M01S00124.comprli +++| OPC. MACRO C 00126 M01S00125.comprli +++| LOCAL A 00127 M01S00126.comprli +++| OPC C 00128 M01S00127.comprli +++| A EQU *-1 00129 M01S00128.comprli +++| RMT 00130 M01S00129.comprli +++| USE REL 00131 M01S00130.comprli +++| CON A 00132 M01S00131.comprli +++| RMT 00133 M01S00132.comprli +++| ENDM 00134 M01S00133.comprli +++| 00135 M01S00134.comprli +++| RLIC LDC 00136 M01S00135.comprli +++| RLIC ADC 00137 M01S00136.comprli +++| RLIC LMC 00138 M01S00137.comprli +++| RSTR SPACE 4 00139 M01S00138.comprli +++|*** RSTR - RESTORE ALL REDEFINED INSTRUCTIONS. 00140 M01S00139.comprli +++|* 00141 M01S00140.comprli +++|* 00142 M01S00141.comprli +++|* RSTR 00143 M01S00142.comprli +++|* ENTRY NONE. 00144 M01S00143.comprli +++| 00145 M01S00144.comprli +++| 00146 M01S00145.comprli +++| PURGMAC RSTR 00147 M01S00146.comprli +++| RSTR MACRO 00148 M01S00147.comprli +++| PURGMAC LJM 00149 M01S00148.comprli +++| PURGMAC RJM 00150 M01S00149.comprli +++| PURGMAC LDM 00151 M01S00150.comprli +++| PURGMAC ADM 00152 M01S00151.comprli +++| PURGMAC SBM 00153 M01S00152.comprli +++| PURGMAC LMM 00154 M01S00153.comprli +++| PURGMAC STM 00155 M01S00154.comprli +++| PURGMAC RAM 00156 M01S00155.comprli +++| PURGMAC AOM 00157 M01S00156.comprli +++| PURGMAC SOM 00158 M01S00157.comprli +++| PURGMAC CRM 00159 M01S00158.comprli +++| PURGMAC CWM 00160 M01S00159.comprli +++| PURGMAC AJM 00161 M01S00160.comprli +++| PURGMAC IJM 00162 M01S00161.comprli +++| PURGMAC FJM 00163 M01S00162.comprli +++| PURGMAC EJM 00164 M01S00163.comprli +++| PURGMAC IAM 00165 M01S00164.comprli +++| PURGMAC OAM 00166 M01S00165.comprli +++| LJM OPSYN LJM. 00167 M01S00166.comprli +++| RJM OPSYN RJM. 00168 M01S00167.comprli +++| PURGMAC LDC. 00169 M01S00168.comprli +++| PURGMAC ADC. 00170 M01S00169.comprli +++| PURGMAC LMC. 00171 M01S00170.comprli +++| LDM OPSYN LDM. 00172 M01S00171.comprli +++| ADM OPSYN ADM. 00173 M01S00172.comprli +++| SBM OPSYN SBM. 00174 M01S00173.comprli +++| LMM OPSYN LMM. 00175 M01S00174.comprli +++| STM OPSYN STM. 00176 M01S00175.comprli +++| AOM OPSYN AOM. 00177 M01S00176.comprli +++| RAM OPSYN RAM. 00178 M01S00177.comprli +++| SOM OPSYN SOM. 00179 M01S00178.comprli +++| CRM OPSYN CRM. 00180 M01S00179.comprli +++| CWM OPSYN CWM. 00181 M01S00180.comprli +++| AJM OPSYN AJM. 00182 M01S00181.comprli +++| IJM OPSYN IJM. 00183 M01S00182.comprli +++| FJM OPSYN FJM. 00184 M01S00183.comprli +++| EJM OPSYN EJM. 00185 M01S00184.comprli +++| IAM OPSYN IAM. 00186 M01S00185.comprli +++| OAM OPSYN OAM. 00187 M01S00186.comprli +++| ENDM 00188 M01S00187.comprli +++| REL SPACE 4 00189 M01S00188.comprli +++|** REL - RELOCATE INSTRUCTIONS. 00190 M01S00189.comprli +++| 00191 M01S00190.comprli +++| 00192 M01S00191.comprli +++| ORG 5 00193 M01S00192.comprli +++| REL$ SET 0 00194 M01S00193.comprli +++| IF -DEF,RLI$ 00195 M01S00194.comprli +++| QUAL REL 00196 M01S00195.comprli +++| ENDIF 00197 M01S00196.comprli +++| USE REL 00198 M01S00197.comprli +++| USE REL. 00199 M01S00198.comprli +++| USE 00200 M01S00199.comprli +++| RMT 00201 M01S00200.comprli +++| USE REL 00202 M01S00201.comprli +++| REL SUBR ENTRY/EXIT 00203 M01S00202.comprli +++| LDC .REL-1 SET FIRST ENTRY 00204 M01S00203.comprli +++| ADD LA 00205 M01S00204.comprli +++| STD T1 00206 M01S00205.comprli +++| REL1 AOD T1 00207 M01S00206.comprli +++| LDI T1 00208 M01S00207.comprli +++| ZJN RELX RETURN IF END OF TABLE 00209 M01S00208.comprli +++| ADD LA 00210 M01S00209.comprli +++| STD T2 00211 M01S00210.comprli +++| LDD LA 00212 M01S00211.comprli +++| ADC 770000B FORCE ADD OF END AROUND CARRY 00213 M01S00212.comprli +++| RAI T2 00214 M01S00213.comprli +++| UJN REL1 LOOP 00215 M01S00214.comprli +++| .REL BSS 0 00216 M01S00215.comprli +++| USE REL. 00217 M01S00216.comprli +++| CON 0 00218 M01S00217.comprli +++| RMT 00219 M01S00218.comprli +++| 00220 M01S00219.comprli +++| 00221 M01S00220.comprli +++| IF DEF,RINST$ 00222 M01S00221.comprli +++| RSTR RESTORE INSTRUCTIONS 00223 M01S00222.comprli +++| ENDIF 00224 M01S00223.comprli +++| SPACE 4 00225 M01S00224.comprli +++| ENDX
cdc/nos2.source/opl.opl871/common/comprli.txt · Last modified: by 127.0.0.1