Trailing-Edge
-
PDP-10 Archives
-
BB-P363B-SM_1985
-
mcb/cex/cexlib.lst
There are no other files named cexlib.lst in the archive.
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 1
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0001 ! CEXLIB.R16 - CEX Structure definitions for MCBDA
; 0002 !
; 0003 ! COPYRIGHT (C) 1980, 1981, 1982
; 0004 ! DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754
; 0005 !
; 0006 ! THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A SINGLE
; 0007 ! COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION OF THE
; 0008 ! ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,
; 0009 ! MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON
; 0010 ! EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE
; 0011 ! TERMS. TITLE TO AND OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES
; 0012 ! REMAIN IN DEC.
; 0013 !
; 0014 ! THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
; 0015 ! AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
; 0016 ! CORPORATION.
; 0017 !
; 0018 ! DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
; 0019 ! SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
; 0020 !
; 0021
; 0022 !++
; 0023 ! FACILITY: MCB Communications Executive
; 0024 !
; 0025 ! FUNCTIONAL ABSTRACT:
; 0026 !
; 0027 ! This module contains the Comm/Exec specific macros
; 0028 !
; 0029 ! ENVIRONMENT: RSX kernel mode with EIS
; 0030 !
; 0031 ! AUTHOR: Alan D. Peckham, CREATION DATE: 20-MAR-80
; 0032 !
; 0033 ! MODIFIED BY:
; 0034 !
; 0035 ! 01 - Use macros from MCBLIB
; 0036 ! 02 - Process descriptor re-organized.
; 0037 !--
; 0038
; 0039 %if not %declared (XPO$K_VERSION) %then library 'BLI:XPORT'; %fi
; 0040
; 0041 %if not %declared (MCB$K_VERSION) %then library 'MCB:MCBLIB'; %fi
; 0042
; 0043 $SHOW (FIELDS) $SHOW (LITERALS)
; 0044
; 0045 !
; 0046 ! EQUATED SYMBOLS:
; 0047 !
; 0048
; 0049 %if %bliss (bliss16) %then
; 0050 linkage
; 0051 CEX_LL_ADD_LOW_HIGH = jsr (register = 2, register = 1, register = 0; register = 1, register = 0),
; 0052 CEX_LL_BLKS = jsr (register = 1) : preserve (0) clearstack valuecbit,
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 2
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0053 CEX_LL_CNT_LOW_HIGH = jsr (register = 2, register = 1, register = 0; register = 1, register = 0),
; 0054 CEX_LL_NUM_LOW_HIGH = jsr (register = 2, register = 1, register = 0; register = 0, register = 1),
; 0055 CEX_LL_NUM_NUM = jsr (register = 2, register = 0; register = 1, register = 0),
; 0056 CEX_LL_PDB_FNC_MOD = jsr (register = 0, register = 2, register = 3)
; 0057 : nopreserve (0, 1, 2, 3, 4, 5),
; 0058 CEX_LL_PDB_DSP = jsr (register = 0, register = 2)
; 0059 : nopreserve (0, 1, 2, 3, 4, 5);
; 0060 %fi
; 0061
; 0062 macro
; 0063 CEX$$ADD_32 = %name ('$ADD32') %,
; 0064 CEX$$ADDRESS_ERROR_TRAP = %name ('$EX4') %,
; 0065 CEX$$ALLOCATE_CORE = %name ('$BLKGT') %,
; 0066 CEX$$BREAKPOINT_TRAP = %name ('$EX14') %,
; 0067 CEX$$CLEAR_PROCESS = %name ('$PDBCL') %,
; 0068 CEX$$CLEAR_PROCESS_NAME = %name ('$PNMCL') %,
; 0069 CEX$$CLEAR_VECTOR = %name ('$VECCL') %,
; 0070 CEX$$DISPATCH_PROCESS = %name ('$PRCDS') %,
; 0071 CEX$$DIVIDE_32 = %name ('$DIV32') %,
; 0072 CEX$$EMT_INSTRUCTION_TRAP = %name ('$EX30') %,
; 0073 CEX$$ENTER_CEX = %name ('$CEXSV') %,
; 0074 CEX$$EXIT_CEX = %name ('$CEXXT') %,
; 0075 CEX$$GET_LINE_NAME = %name ('$SLTNM') %,
; 0076 CEX$$GET_LINE_PROCESSES = %name ('$SLTGT') %,
; 0077 CEX$$GET_PROCESS_INDEX = %name ('$PNMGT') %,
; 0078 CEX$$GET_PROCESS_NAME = %name ('$PRCNM') %,
; 0079 CEX$$ILLEGAL_INSTRUCTION_TRAP = %name ('$EX10') %,
; 0080 CEX$$IOT_INSTRUCTION_TRAP = %name ('$EX20') %,
; 0081 CEX$$MULTIPLY_32 = %name ('$MUL32') %,
; 0082 CEX$$PARITY_ERROR_TRAP = %name ('$EX114') %,
; 0083 CEX$$POWER_FAILURE_TRAP = %name ('$EX24') %,
; 0084 CEX$$SEGMENT_FAULT_TRAP = %name ('$EX250') %,
; 0085 CEX$$SET_EXCEPTION = %name ('$EXVEN') %,
; 0086 CEX$$SET_LINE_PROCESSES = %name ('$SLTST') %,
; 0087 CEX$$SET_PROCESS = %name ('$PDBST') %,
; 0088 CEX$$SET_PROCESS_NAME = %name ('$PNMST') %,
; 0089 CEX$$SET_VECTOR = %name ('$VECST') %,
; 0090 CEX$$SHIFT_32 = %name ('$ASH32') %,
; 0091 CEX$$SYNCHRONIZE_PROCESS = %name ('$SYNDS') %,
; 0092 CEX$$TRAP_INSTRUCTION_TRAP = %name ('$EX34') %,
; 0093
; 0094 CEX$GW_AVG_CCB_DISPATCHES = %name ('.SMDSP') %,
; 0095 CEX$GW_AVG_INTERRUPTS = %name ('.SMINT') %,
; 0096 CEX$GW_AVG_LONG_TIMERS = %name ('.SMLTM') %,
; 0097 CEX$GW_AVG_SHORT_TIMERS = %name ('.SMSTM') %,
; 0098 CEX$GW_AVG_SYNCHS = %name ('.SMSYN') %,
; 0099 CEX$GW_BLOCK_POOL_BIAS = %name ('.BLKTB') %,
; 0100 CEX$GH_BUFFER_POOL_COUNT = %name ('.CORNM') %,
; 0101 CEX$GA_BUFFER_POOL_TABLE = %name ('.CORTA') %,
; 0102 CEX$GW_CCB_DISPATCH_COUNT = %name ('.DSPCT') %,
; 0103 CEX$AG_CCB_DSR_ALLOCATION = %name ('.CCBDM') %,
; 0104 CEX$GR_CCB_POOL = %name ('.CCBTB') %,
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 3
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0105 CEX$AA_CCB_QUEUE_H = %name ('.CBHQH') %,
; 0106 CEX$AA_CCB_QUEUE_L = %name ('.CBLQH') %,
; 0107 CEX$GA_CEX_FORK_BLOCK = %name ('.FRKBK') %,
; 0108 CEX$GG_CEX_PROCESSING_DEPTH = %name ('.CEXDP') %,
; 0109 CEX$AR_CEX_SYNCH_BLOCK = %name ('.PDSYN') %,
; 0110 CEX$GB_CURRENT_PROCESS_INDEX = %name ('.CRPIX') %,
; 0111 CEX$GA_CURRENT_INTERRUPT = %name ('.INTCB') %,
; 0112 CEX$GA_CURRENT_PROCESS = %name ('.CRPDB') %,
; 0113 CEX$GA_DTE_BOOT_ROM_ADDRESS = %name ('.DTERG') %,
; 0114 CEX$GR_DUMP_EXCEPTION = %name ('.MEXVD') %,
; 0115 CEX$GR_INTERRUPT_4_BLOCK = %name ('.INTC4') %,
; 0116 CEX$GR_INTERRUPT_5_BLOCK = %name ('.INTC5') %,
; 0117 CEX$GR_INTERRUPT_6_BLOCK = %name ('.INTC6') %,
; 0118 CEX$GR_INTERRUPT_7_BLOCK = %name ('.INTC7') %,
; 0119 CEX$GR_LAST_CHANCE_EXCEPTION = %name ('.MEXVL') %,
; 0120 CEX$GW_LONG_TIMER_COUNT = %name ('.LTMCT') %,
; 0121 CEX$GW_MAXIMUM_PROCESSES = %name ('') %,
; 0122 CEX$GA_PANIC_STACK = %name ('.PANSP') %,
; 0123 CEX$GW_PANIC_STATUS = %name ('.PANPS') %,
; 0124 CEX$GG_POWER_FAIL_COUNT = %name ('.PWRFL') %,
; 0125 CEX$GR_PRIMARY_EXCEPTION = %name ('.MEXV1') %,
; 0126 CEX$GH_PROCESS_COUNT = %name ('.PDBNM') %,
; 0127 CEX$AG_PROCESS_DATA_BASE = %name ('.CRDAT') %,
; 0128 CEX$GH_PROCESS_NAME_COUNT = %name ('.PNMNM') %,
; 0129 CEX$GA_PROCESS_NAME_TABLE = %name ('.PNMTA') %,
; 0130 CEX$AA_PROCESS_TABLE = %name ('.PDBVB') %,
; 0131 CEX$GA_PROCESS_TABLE_END = %name ('.PDBVE') %,
; 0132 CEX$AW_RANDOM_NUMBER_SEED = %name ('.RND') %,
; 0133 CEX$AG_RDB_CORE_ALLOCATION = %name ('.RDBCM') %,
; 0134 CEX$AG_RDB_DSR_ALLOCATION = %name ('.RDBDM') %,
; 0135 CEX$GR_RDB_POOL = %name ('.RDBTB') %,
; 0136 CEX$GG_RSX_APR6_MAPPING = %name ('.RSXMP') %,
; 0137 CEX$GH_SCHEDULING_REQUESTS = %name ('.CEXRQ') %,
; 0138 CEX$GR_SECONDARY_EXCEPTION = %name ('.MEXV2') %,
; 0139 CEX$GW_SHORT_TIMER_COUNT = %name ('.STMCT') %,
; 0140 CEX$GA_SHORT_TIMER_DISPATCH = %name ('.TIMDS') %,
; 0141 CEX$GU_SIGNAL_CALLS = %name ('.DBGST') %,
; 0142 CEX$GA_SIGNAL_CALL_FRAME = %name ('.DBGFP') %,
; 0143 CEX$GA_SIGNAL_FRAME = %name ('.$IGREG') %,
; 0144 CEX$GA_SIGNAL_MECHANISM = %name ('.MCHVC') %,
; 0145 CEX$GG_SIGNAL_STACK_RELOCATION = %name ('$HANSP') %,
; 0146 CEX$GG_SIGNAL_STATUS = %name ('.CEXST') %,
; 0147 CEX$GU_SIGNAL_UNWIND_REQUEST = %name ('.UNWLV') %,
; 0148 CEX$GW_STATISTICS_INTERVAL = %name ('.SMSEC') %,
; 0149 CEX$GW_STATISTICS_TIMER = %name ('.SITIM') %,
; 0150 CEX$GW_SYNCH_COUNT = %name ('.SYNCT') %,
; 0151 CEX$AA_SYNCH_QUEUE = %name ('.SYNQH') %,
; 0152 CEX$GH_SYSTEM_LINE_COUNT = %name ('.SLTNM') %,
; 0153 CEX$GA_SYSTEM_LINE_TABLE = %name ('.SLTTA') %,
; 0154 CEX$GA_UBM_DATA_BASE = %name ('.UBMTA') %;
; 0155
; 0156 literal
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 4
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0157 MCB$K_SET_EXCEPTION = 0^1,
; 0158 MCB$K_SET_PROCESS = 1^1,
; 0159 MCB$K_CLEAR_PROCESS = 2^1,
; 0160 MCB$K_GET_PROCESS_INDEX = 3^1,
; 0161 MCB$K_GET_PROCESS_NAME = 4^1,
; 0162 MCB$K_SET_PROCESS_NAME = 5^1,
; 0163 MCB$K_CLEAR_PROCESS_NAME = 6^1,
; 0164 MCB$K_SET_VECTOR = 7^1,
; 0165 MCB$K_CLEAR_VECTOR = 8^1,
; 0166 MCB$K_GET_LINE_NAME = 9^1,
; 0167 MCB$K_SET_LINE_PROCESSES = 10^1,
; 0168 MCB$K_GET_LINE_PROCESSES = 11^1,
; 0169 MCB$K_GET_DEVICE_NAME = 12^1;
; 0170
; 0171 !
; 0172 ! Buffer pool entry and buffer header.
; 0173 !
; 0174
; 0175 macro
; M 0176 $CEX_BFPDEF =
; M 0177 field
; M 0178 $CEX_BFPFIELDS =
; M 0179 set
; M 0180 BFP$H_SIZE = [0, 0, 16, 0],
; M 0181 BFP$H_FREE_COUNT = [1, 0, 16, 0],
; M 0182 BFP$V_QUEUE = [2, 0, 0 %(4*16)%, 0],
; M 0183 BFP$W_QUEUE_FIRST_BIAS = [2, 0, 16, 0],
; M 0184 BFP$A_QUEUE_FIRST_ADDR = [3, 0, 16, 0],
; M 0185 BFP$W_QUEUE_LAST_BIAS = [4, 0, 16, 0],
; M 0186 BFP$A_QUEUE_LAST_ADDR = [5, 0, 16, 0],
; M 0187 BFP$G_ALLOCATION_FAILURES = [6, 0, 16, 0],
; M 0188 BFP$H_ALLOCATED = [7, 0, 16, 0],
; M 0189 BFP$W_ALLOCATED_BIAS = [8, 0, 16, 0],
; M 0190 BFP$W_ALLOCATED_BLKS = [9, 0, 16, 0],
; M 0191 ! Initialization data
; M 0192 BFP$H_ALLOCATION_MAXIMUM = [8, 0, 16, 0],
; M 0193 BFP$H_ALLOCATION_MINIMUM = [9, 0, 16, 0]
; M 0194 tes,
; M 0195 $CEX_BFHFIELDS =
; M 0196 set
; M 0197 BFH$W_BIAS = [0, 0, 16, 0],
; M 0198 BFH$A_ADDRESS = [1, 0, 16, 0],
; M 0199 BFH$H_SIZE = [2, 0, 16, 0],
; M 0200 BFH$A_PROCESS = [3, 0, 16, 0]
; M 0201 tes;
; M 0202
; M 0203 literal
; M 0204 BFP$K_LENGTH = 10,
; 0205 BFH$K_LENGTH = 4; %,
; 0206
; 0207 !
; 0208 ! CCB pool entry.
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 5
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0209 !
; 0210
; M 0211 $CEX_CBPDEF =
; M 0212 field
; M 0213 $CEX_CBPFIELDS =
; M 0214 set
; M 0215 CBP$H_SIZE = [0, 0, 16, 0],
; M 0216 CBP$H_ALLOCATED = [1, 0, 16, 0],
; M 0217 CBP$G_ALLOCATION_FAILURES = [2, 0, 16, 0],
; M 0218 CBP$V_QUEUE = [3, 0, 0 %(2*16)%, 0],
; M 0219 CBP$A_QUEUE_FIRST = [3, 0, 16, 0],
; M 0220 CBP$A_QUEUE_LAST = [4, 0, 16, 0],
; M 0221 CBP$H_FREE_COUNT = [5, 0, 16, 0],
; M 0222 CBP$H_REQUESTS = [6, 0, 16, 0],
; M 0223 CBP$A_NEXT_PROCESS = [7, 0, 16, 0],
; M 0224 CBP$G_REQUEST_FLAG = [8, 0, 16, 0],
; M 0225 CBP$B_FUNCTION = [9, 0, 8, 0],
; M 0226 CBP$B_MODIFIER = [9, 8, 8, 0],
; M 0227 CBP$W_ALLOCATED_BIAS = [10, 0, 16, 0],
; M 0228 CBP$W_ALLOCATED_BLKS = [11, 0, 16, 0],
; M 0229 CBP$A_ALLOCATED_ADDRESS = [12, 0, 16, 0],
; M 0230 CBP$W_ALLOCATED_LENGTH = [13, 0, 16, 0],
; M 0231 ! Initialization data
; M 0232 CBP$H_ALLOCATION_MAXIMUM = [10, 0, 16, 0],
; M 0233 CBP$H_ALLOCATION_MINIMUM = [11, 0, 16, 0]
; M 0234 tes;
; M 0235
; M 0236 literal
; 0237 CBP$K_LENGTH = 14; %,
; 0238
; 0239 !
; 0240 ! CCB extensions
; 0241 !
; 0242
; M 0243 $CEX_CCBDEF =
; M 0244 field
; M 0245 $CEX_CCBFIELDS =
; M 0246 set
; M 0247 CCB$A_LINK = [0, 0, 16, 0],
; M 0248 CCB$A_CHAIN = [1, 0, 16, 0],
; M 0249 CCB$A_STACK = [2, 0, 16, 0],
; M 0250 CCB$B_OWNER_PROCESS_INDEX = [3, 0, 8, 0],
; M 0251 CCB$V_FLAGS = [3, 8, 8, 0],
; M 0252 CCB$V_RDB = [3, 8, 1, 0],
; M 0253 CCB$V_ACTIVE = [3, 9, 1, 0],
; M 0254 CCB$V_USED = [3, 10, 1, 0],
; M 0255 CCB$B_LINE_INDEX = [4, 0, 8, 0],
; M 0256 CCB$B_PROCESS_INDEX = [4, 8, 8, 0],
; M 0257 CCB$B_FUNCTION = [5, 0, 8, 0],
; M 0258 CCB$B_MODIFIER = [5, 8, 8, 0],
; M 0259 CCB$G_STATUS = [6, 0, 16, 1],
; M 0260 CCB$W_BIAS = [7, 0, 16, 0],
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 6
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; M 0261 CCB$A_ADDRESS = [8, 0, 16, 0],
; M 0262 CCB$G_COUNT = [9, 0, 16, 0],
; M 0263 CCB$G_PARAMETER_1 = [10, 0, 16, 0],
; M 0264 CCB$G_PARAMETER_2 = [11, 0, 16, 0],
; M 0265 CCB$G_PARAMETER_3 = [12, 0, 16, 0],
; M 0266 CCB$G_PARAMETER_4 = [13, 0, 16, 0],
; M 0267 CCB$G_PARAMETER_5 = [14, 0, 16, 0],
; M 0268 CCB$A_DESTINATION_PROCESS = [15, 0, 16, 0],
; M 0269 CCB$A_SOURCE_PROCESS = [16, 0, 16, 0]
; M 0270 tes;
; M 0271
; M 0272 literal
; 0273 CCB$K_LENGTH = 17; %,
; 0274
; 0275 !
; 0276 ! Exception vector
; 0277 !
; 0278
; M 0279 $CEX_EXVDEF =
; M 0280 field
; M 0281 $CEX_EXVFIELDS =
; M 0282 set
; M 0283 EXV$G_LEVEL = [0, 0, 16, 1],
; M 0284 EXV$A_PROCESS = [1, 0, 16, 0],
; M 0285 EXV$A_DISPATCH = [2, 0, 16, 0],
; M 0286 EXV$A_ENABLE_DATA = [3, 0, 16, 0]
; M 0287 tes;
; M 0288
; M 0289 literal
; M 0290 EXV$K_LENGTH = 4,
; M 0291 EXV$K_PRIMARY = 0,
; M 0292 EXV$K_SECONDARY = 1,
; 0293 EXV$K_LAST_CHANCE = 2; %,
; 0294
; 0295 !
; 0296 ! Interrupt transfer and priority blocks
; 0297 !
; 0298
; M 0299 $CEX_ITBDEF =
; M 0300 field
; M 0301 $CEX_ITBFIELDS =
; M 0302 set
; M 0303 ITB$V_JSR_5 = [0, 0, 0 %(2*16)%, 0],
; M 0304 ITB$W_JSR_5_INSTRUCTION = [0, 0, 16, 0],
; M 0305 ITB$A_JSR_5_ADDRESS = [1, 0, 16, 0],
; M 0306 ITB$A_PROCESS = [2, 0, 16, 0],
; M 0307 ITB$A_DISPATCH = [3, 0, 16, 0]
; M 0308 tes,
; M 0309 $CEX_IPBFIELDS =
; M 0310 set
; M 0311 IPB$V_JSR_4 = [0, 0, 0 %(2*16)%, 0],
; M 0312 IPB$W_JSR_4_INSTRUCTION = [0, 0, 16, 0],
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 7
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; M 0313 IPB$A_JSR_4_ADDRESS = [1, 0, 16, 0],
; M 0314 IPB$A_LINK = [2, 0, 16, 0],
; M 0315 IPB$A_PROCESS = [3, 0, 16, 0],
; M 0316 IPB$W_COUNT = [4, 0, 16, 0],
; M 0317 IPB$B_PRIORITY = [5, 0, 8, 0]
; M 0318 tes;
; M 0319
; M 0320 literal
; M 0321 ITB$K_LENGTH = 4,
; 0322 IPB$K_LENGTH = 6; %,
; 0323
; 0324 !
; 0325 ! Process descriptor table
; 0326 !
; 0327
; M 0328 $CEX_PDTDEF =
; M 0329 field
; M 0330 $CEX_PDTFIELDS =
; M 0331 set
; M 0332 PDT$W_CODE_BIAS = [0, 0, 16, 0],
; M 0333 PDT$A_CODE_DISPATCH = [1, 0, 16, 0],
; M 0334 PDT$W_DATA_BIAS = [2, 0, 16, 0],
; M 0335 PDT$A_DATA_ADDRESS = [3, 0, 16, 0],
; M 0336 PDT$B_INDEX = [4, 0, 8, 0],
; M 0337 PDT$V_FLAGS = [4, 8, 8, 1],
; M 0338 PDT$V_UCB_INCLUDED = [4, 8, 1, 0],
; M 0339 PDT$V_DATA_BASE_INCLUDED = [4, 9, 1, 0],
; M 0340 PDT$V_PERMANENT = [4, 10, 1, 0],
; M 0341 PDT$V_KILL_PROCESS = [4, 11, 1, 0],
; M 0342 PDT$V_CCB_REQUESTED = [4, 12, 1, 0],
; M 0343 PDT$V_RDB_REQUESTED = [4, 14, 1, 0],
; M 0344 PDT$V_LONG_TIMER = [4, 15, 1, 1],
; M 0345 PDT$A_UCB = [5, 0, 16, 0],
; M 0346 ! Initialization data
; M 0347 PDT$W_CODE_NAME = [0, 0, 16, 0],
; M 0348 PDT$A_DISPATCH_ADDRESS_ADDRESS = [1, 0, 16, 0]
; M 0349 tes;
; M 0350
; M 0351 literal
; 0352 PDT$K_LENGTH = 6; %,
; 0353
; 0354 !
; 0355 ! Process header
; 0356 !
; 0357
; M 0358 $CEX_PHDDEF =
; M 0359 field
; M 0360 $CEX_PHDFIELDS =
; M 0361 set
; M 0362 PHD$W_NAME = [0, 0, 16, 0],
; M 0363 PHD$B_MCB_VERSION = [1, 0, 8, 0],
; M 0364 PHD$B_MCB_LEVEL = [1, 8, 8, 0],
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 8
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; M 0365 PHD$W_BLKS = [2, 0, 16, 0],
; M 0366 PHD$A_PATCH = [3, 0, 16, 0],
; M 0367 PHD$A_SIGNAL = [4, 0, 16, 0],
; M 0368 PHD$A_LLC_TABLE = [5, 0, 16, 0],
; M 0369 PHD$A_DLC_TABLE = [6, 0, 16, 0],
; M 0370 PHD$A_DDM_TABLE = [7, 0, 16, 0],
; M 0371 PHD$L_CEX_IDENT = [8, 0, 0 %(32)%, 0],
; M 0372 PHD$W_CEX_IDENT_1 = [8, 0, 16, 0],
; M 0373 PHD$W_CEX_IDENT_2 = [9, 0, 16, 0],
; M 0374 PHD$V_BLISS = [12, 8, 1, 0],
; M 0375 PHD$V_RSX_TABLE_INCLUDED = [12, 9, 1, 0],
; M 0376 PHD$A_RSX_TABLE = [13, 0, 16, 0],
; M 0377 PHD$A_CEX_TABLE = [14, 0, 16, 0]
; 0378 tes; %,
; 0379
; 0380 !
; 0381 ! Process name table
; 0382 !
; 0383
; M 0384 $CEX_PNMDEF =
; M 0385 field
; M 0386 $CEX_PNMFIELDS =
; M 0387 set
; M 0388 PNM$A_PROCESS = [0, 0, 16, 0],
; M 0389 PNM$W_NAME = [1, 0, 16, 0],
; M 0390 ! Initialization data
; M 0391 PNM$W_PROCESS_INDEX = [0, 0, 16, 0]
; M 0392 tes;
; M 0393
; M 0394 literal
; 0395 PNM$K_LENGTH = 2; %,
; 0396
; 0397 !
; 0398 ! System line table
; 0399 !
; 0400
; M 0401 $CEX_SLTDEF =
; M 0402 field
; M 0403 $CEX_SLTFIELDS =
; M 0404 set
; M 0405 SLT$V_BASE = [0, 0, %bpval, 0],
; M 0406 SLT$B_DDM_PROCESS_INDEX = [0, 0, 8, 0],
; M 0407 SLT$B_LINE_INDEX = [0, 8, 8, 0],
; M 0408 SLT$B_DLC_PROCESS_INDEX = [1, 0, 8, 0],
; M 0409 SLT$B_CONTROLLER = [1, 8, 8, 0],
; M 0410 SLT$B_LLC_PROCESS_INDEX = [2, 0, 8, 0],
; M 0411 SLT$B_UNIT = [2, 8, 8, 0],
; M 0412 SLT$A_DEVICE = [3, 0, 16, 0]
; M 0413 tes;
; M 0414
; M 0415 literal
; 0416 SLT$K_LENGTH = 4; %,
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 9
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0417
; 0418 !
; 0419 ! SYNCH block
; 0420 !
; 0421
; M 0422 $CEX_SYNDEF =
; M 0423 field
; M 0424 $CEX_SYNFIELDS =
; M 0425 set
; M 0426 SYN$A_LINK = [0, 0, 16, 0],
; M 0427 SYN$A_PROCESS = [1, 0, 16, 0],
; M 0428 SYN$A_DISPATCH = [2, 0, 16, 0]
; M 0429 tes;
; M 0430
; M 0431 literal
; 0432 SYN$K_LENGTH = 3; %,
; 0433
; 0434 !
; 0435 ! Timer block
; 0436 !
; 0437
; M 0438 $CEX_TMBDEF =
; M 0439 field
; M 0440 $CEX_TMBFIELDS =
; M 0441 set
; M 0442 TMB$B_UNIT = [1, 8, 8, 0],
; M 0443 TMB$W_IDENTIFIER = [2, 0, 16, 0],
; M 0444 TMB$G_MAGNITUDE = [7, 0, 16, 0],
; M 0445 TMB$A_PROCESS = [8, 0, 16, 0]
; M 0446 tes;
; M 0447
; M 0448 literal
; M 0449 TMB$K_LENGTH = 9,
; M 0450 TMB$K_MILLISECONDS = 0,
; 0451 TMB$K_SECONDS = 2; %,
; 0452
; 0453 !
; 0454 ! Unibus Mapping tabld
; 0455 !
; 0456
; M 0457 $CEX_UBMDEF =
; M 0458
; M 0459 field
; M 0460 $CEX_UBMFIELDS =
; M 0461 set
; M 0462 UBM$A_LINK = [0,0,16,0],
; M 0463 UBM$W_START_BLK = [1,0,16,0],
; M 0464 UBM$W_END_BLK = [2,0,16,0],
; M 0465 UBM$B_BASE_UBMR = [3,0,8,0]
; M 0466 tes;
; M 0467
; M 0468 literal
28-May-1985 14:17:14 TOPS-20 Bliss-16 3(552) Page 10
30-Dec-1982 16:10:27 DNET61:<MCB.CEX>CEXLIB.R16.1 (1)
; 0469 UBM$K_LENGTH = 4 ; %;
; 0470
; 0471 !
; 0472 ! [End of CEXLIB.R16]
; LIBRARY STATISTICS
;
; -------- Symbols -------- Blocks
; File Total Loaded Percent Read
;
; DNET61:<MCB.BLIS16>XPORT.L16.1 568 6 1 0
; DNET61:<MCB.MCB>MCBLIB.L16.1 372 13 3 0
; Run Time: 00:03.7
; Elapsed Time: 00:07.2
; Memory Used: 21 pages
; Library Precompilation Complete