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