|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 03d8 | | .CONST 0x03d8 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 002d | - | .CONST 0x002d ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0010 | | .CONST 0x0010 ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 0322 | " | Declare_Variable Record 001d 00e5 | | Load_Encached Long_Integer_Cache 001e 03e9 | | Declare_Variable Discrete,Duplicate 001f 03e9 | | Declare_Variable Discrete,Duplicate 0020 03e9 | | Declare_Variable Discrete,Duplicate 0021 03e9 | | Declare_Variable Discrete,Duplicate 0022 03e9 | | Declare_Variable Discrete,Duplicate 0023 00e5 | | Load_Encached Long_Integer_Cache 0024 03e9 | | Declare_Variable Discrete,Duplicate 0025 03e9 | | Declare_Variable Discrete,Duplicate 0026 00e2 | | Load_Encached Integer_Cache 0027 e003 | | Load 0x0,0x3 0028 03e9 | | Declare_Variable Discrete,Duplicate 0029 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call 002b 029f 02e3 | | Declare_Subprogram INIT_02e0,For_Call 002d BODY_0018: 002d e5fe | | Load 0x2,-0x2 002e 681d |h | Jump_Zero 0x4c 002f 4b64 |Kd | Short_Literal 0x364 0030 e5ff | | Load 0x2,-0x1 0031 8004 | | Call 0x0,0x4 0032 e402 | | Load 0x2,0x2 0033 017d | } | Execute Record,Structure_Write 0034 00e5 | | Load_Encached Long_Integer_Cache 0035 00e5 | | Load_Encached Long_Integer_Cache 0036 e402 | | Load 0x2,0x2 0037 8005 | | Call 0x0,0x5 0038 c403 | | Store 0x2,0x3 0039 c404 | | Store 0x2,0x4 003a 00e5 | | Load_Encached Long_Integer_Cache 003b 4820 |H | Short_Literal 0x20 003c 4820 |H | Short_Literal 0x20 003d e403 | | Load 0x2,0x3 003e 8006 | | Call 0x0,0x6 003f c408 | | Store 0x2,0x8 0040 e5fd | | Load 0x2,-0x3 0041 4800 |H | Short_Literal 0x0 0042 0092 02f4 | | Action Push_String_Extended,0x2f4 ; "CID => " 0044 4820 |H | Short_Literal 0x20 0045 4808 |H | Short_Literal 0x8 0046 4801 |H | Short_Literal 0x1 0047 e408 | | Load 0x2,0x8 0048 8007 | | Call 0x0,0x7 0049 01cc | | Execute Vector,Catenate 004a 8008 | | Call 0x0,0x8 004b 00d1 | | Pop_Control Pop_Count_1 004c e5fd | | Load 0x2,-0x3 004d 4800 |H | Short_Literal 0x0 004e 4829 |H) | Short_Literal 0x29 004f 4820 |H | Short_Literal 0x20 0050 0092 02f5 | | Action Push_String_Extended,0x2f5 ; "Top => " 0052 4830 |H0 | Short_Literal 0x30 0053 4808 |H | Short_Literal 0x8 0054 4800 |H | Short_Literal 0x0 0055 e5ff | | Load 0x2,-0x1 0056 0227 | ' | Execute Access,All_Reference 0057 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0058 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0059 8007 | | Call 0x0,0x7 005a 01cc | | Execute Vector,Catenate 005b 01cb | | Execute Vector,Append 005c 4800 |H | Short_Literal 0x0 005d e5ff | | Load 0x2,-0x1 005e 0227 | ' | Execute Access,All_Reference 005f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0060 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 0061 8009 | | Call 0x0,0x9 0062 01cc | | Execute Vector,Catenate 0063 0092 02f6 | | Action Push_String_Extended,0x2f6 ; " (" 0065 01cc | | Execute Vector,Catenate 0066 4830 |H0 | Short_Literal 0x30 0067 4800 |H | Short_Literal 0x0 0068 4800 |H | Short_Literal 0x0 0069 e5ff | | Load 0x2,-0x1 006a 0227 | ' | Execute Access,All_Reference 006b 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 006c 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 006d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 006e 0906 | | Execute_Immediate Binary_Scale,0x6 006f e5ff | | Load 0x2,-0x1 0070 0227 | ' | Execute Access,All_Reference 0071 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0072 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 0073 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0074 0273 | s | Execute Discrete,Plus 0075 00d8 | | Load_Top At_Offset_0 0076 00e2 | | Load_Encached Integer_Cache 0077 0260 | ` | Execute Discrete,In_Type 0078 7001 |p | Jump_Nonzero 0x7a 0079 0801 | | Execute_Immediate Raise,0x1 007a 800a | | Call 0x0,0xa 007b 01cc | | Execute Vector,Catenate 007c 01cb | | Execute Vector,Append 007d 8008 | | Call 0x0,0x8 007e 00d1 | | Pop_Control Pop_Count_1 007f e5fd | | Load 0x2,-0x3 0080 4800 |H | Short_Literal 0x0 0081 4820 |H | Short_Literal 0x20 0082 0092 02f7 | | Action Push_String_Extended,0x2f7 ; "Pred => " 0084 4830 |H0 | Short_Literal 0x30 0085 4808 |H | Short_Literal 0x8 0086 4800 |H | Short_Literal 0x0 0087 e5ff | | Load 0x2,-0x1 0088 0227 | ' | Execute Access,All_Reference 0089 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 008a 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 008b 8007 | | Call 0x0,0x7 008c 01cc | | Execute Vector,Catenate 008d 01cb | | Execute Vector,Append 008e 4800 |H | Short_Literal 0x0 008f e5ff | | Load 0x2,-0x1 0090 0227 | ' | Execute Access,All_Reference 0091 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0092 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 0093 8009 | | Call 0x0,0x9 0094 01cc | | Execute Vector,Catenate 0095 8008 | | Call 0x0,0x8 0096 00d1 | | Pop_Control Pop_Count_1 0097 e5fd | | Load 0x2,-0x3 0098 4800 |H | Short_Literal 0x0 0099 0092 02f8 | | Action Push_String_Extended,0x2f8 ; "Save => " 009b 4800 |H | Short_Literal 0x0 009c e5ff | | Load 0x2,-0x1 009d 0227 | ' | Execute Access,All_Reference 009e 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 009f 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 00a0 8009 | | Call 0x0,0x9 00a1 01cc | | Execute Vector,Catenate 00a2 8008 | | Call 0x0,0x8 00a3 00d1 | | Pop_Control Pop_Count_1 00a4 e5fd | | Load 0x2,-0x3 00a5 4800 |H | Short_Literal 0x0 00a6 800b | | Call 0x0,0xb 00a7 00d1 | | Pop_Control Pop_Count_1 00a8 e5fd | | Load 0x2,-0x3 00a9 4800 |H | Short_Literal 0x0 00aa 0092 02f9 | | Action Push_String_Extended,0x2f9 ; "PC => " 00ac 4800 |H | Short_Literal 0x0 00ad e5ff | | Load 0x2,-0x1 00ae 0227 | ' | Execute Access,All_Reference 00af 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00b0 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 00b1 800c | | Call 0x0,0xc 00b2 01cc | | Execute Vector,Catenate 00b3 8008 | | Call 0x0,0x8 00b4 00d1 | | Pop_Control Pop_Count_1 00b5 e5fd | | Load 0x2,-0x3 00b6 4800 |H | Short_Literal 0x0 00b7 0092 02fa | | Action Push_String_Extended,0x2fa ; "DPC => " 00b9 4800 |H | Short_Literal 0x0 00ba e5ff | | Load 0x2,-0x1 00bb 0227 | ' | Execute Access,All_Reference 00bc 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00bd 340e |4 | Execute Record,Field_Reference,Field_Number 0xe 00be 800c | | Call 0x0,0xc 00bf 01cc | | Execute Vector,Catenate 00c0 8008 | | Call 0x0,0x8 00c1 00d1 | | Pop_Control Pop_Count_1 00c2 e5fd | | Load 0x2,-0x3 00c3 4800 |H | Short_Literal 0x0 00c4 0092 02fb | | Action Push_String_Extended,0x2fb ; "Lex levels valid =>" 00c6 840f | | Call 0x2,0xf 00c7 01cc | | Execute Vector,Catenate 00c8 0092 02fc | | Action Push_String_Extended,0x2fc ; "." 00ca 01cc | | Execute Vector,Catenate 00cb 8008 | | Call 0x0,0x8 00cc 00d1 | | Pop_Control Pop_Count_1 00cd e5fd | | Load 0x2,-0x3 00ce 4800 |H | Short_Literal 0x0 00cf 800b | | Call 0x0,0xb 00d0 00d1 | | Pop_Control Pop_Count_1 00d1 e5fd | | Load 0x2,-0x3 00d2 4800 |H | Short_Literal 0x0 00d3 0092 02fd | | Action Push_String_Extended,0x2fd ; "TLC => " 00d5 4830 |H0 | Short_Literal 0x30 00d6 4800 |H | Short_Literal 0x0 00d7 4800 |H | Short_Literal 0x0 00d8 e5ff | | Load 0x2,-0x1 00d9 0227 | ' | Execute Access,All_Reference 00da 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00db 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00dc 800a | | Call 0x0,0xa 00dd 01cc | | Execute Vector,Catenate 00de 8008 | | Call 0x0,0x8 00df 00d1 | | Pop_Control Pop_Count_1 00e0 e5fd | | Load 0x2,-0x3 00e1 4800 |H | Short_Literal 0x0 00e2 0092 02fe | | Action Push_String_Extended,0x2fe ; "VLC => " 00e4 4830 |H0 | Short_Literal 0x30 00e5 4800 |H | Short_Literal 0x0 00e6 4800 |H | Short_Literal 0x0 00e7 e5ff | | Load 0x2,-0x1 00e8 0227 | ' | Execute Access,All_Reference 00e9 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00ea 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 00eb 800a | | Call 0x0,0xa 00ec 01cc | | Execute Vector,Catenate 00ed 8008 | | Call 0x0,0x8 00ee 00d1 | | Pop_Control Pop_Count_1 00ef e5fd | | Load 0x2,-0x3 00f0 4800 |H | Short_Literal 0x0 00f1 800b | | Call 0x0,0xb 00f2 00d1 | | Pop_Control Pop_Count_1 00f3 e5fd | | Load 0x2,-0x3 00f4 4800 |H | Short_Literal 0x0 00f5 0092 02ff | | Action Push_String_Extended,0x2ff ; "MAR => " 00f7 e5ff | | Load 0x2,-0x1 00f8 0227 | ' | Execute Access,All_Reference 00f9 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00fa 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11 00fb 800d | | Call 0x0,0xd 00fc 01cc | | Execute Vector,Catenate 00fd 8008 | | Call 0x0,0x8 00fe 00d1 | | Pop_Control Pop_Count_1 00ff e5fd | | Load 0x2,-0x3 0100 4800 |H | Short_Literal 0x0 0101 0092 0300 | | Action Push_String_Extended,0x300 ; "TAR => " 0103 4830 |H0 | Short_Literal 0x30 0104 4800 |H | Short_Literal 0x0 0105 4800 |H | Short_Literal 0x0 0106 e5ff | | Load 0x2,-0x1 0107 0227 | ' | Execute Access,All_Reference 0108 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0109 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 010a 8007 | | Call 0x0,0x7 010b 01cc | | Execute Vector,Catenate 010c 0092 0301 | | Action Push_String_Extended,0x301 ; " VAR => " 010e 01cc | | Execute Vector,Catenate 010f 4830 |H0 | Short_Literal 0x30 0110 4800 |H | Short_Literal 0x0 0111 4800 |H | Short_Literal 0x0 0112 e5ff | | Load 0x2,-0x1 0113 0227 | ' | Execute Access,All_Reference 0114 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0115 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 0116 8007 | | Call 0x0,0x7 0117 01cc | | Execute Vector,Catenate 0118 8008 | | Call 0x0,0x8 0119 00d1 | | Pop_Control Pop_Count_1 011a e5fd | | Load 0x2,-0x3 011b 4800 |H | Short_Literal 0x0 011c 0092 0302 | | Action Push_String_Extended,0x302 ; "RDR => " 011e e5ff | | Load 0x2,-0x1 011f 0227 | ' | Execute Access,All_Reference 0120 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0121 3416 |4 | Execute Record,Field_Reference,Field_Number 0x16 0122 800d | | Call 0x0,0xd 0123 01cc | | Execute Vector,Catenate 0124 8008 | | Call 0x0,0x8 0125 00d1 | | Pop_Control Pop_Count_1 0126 e5fd | | Load 0x2,-0x3 0127 4800 |H | Short_Literal 0x0 0128 0092 0303 | | Action Push_String_Extended,0x303 ; "WDR => " 012a e5ff | | Load 0x2,-0x1 012b 0227 | ' | Execute Access,All_Reference 012c 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 012d 3417 |4 | Execute Record,Field_Reference,Field_Number 0x17 012e 800d | | Call 0x0,0xd 012f 01cc | | Execute Vector,Catenate 0130 8008 | | Call 0x0,0x8 0131 00d1 | | Pop_Control Pop_Count_1 0132 e5fd | | Load 0x2,-0x3 0133 4800 |H | Short_Literal 0x0 0134 800b | | Call 0x0,0xb 0135 00d1 | | Pop_Control Pop_Count_1 0136 e5fe | | Load 0x2,-0x2 0137 68fe |h | Jump_Zero 0x236 0138 e5fd | | Load 0x2,-0x3 0139 4800 |H | Short_Literal 0x0 013a 0092 0304 | | Action Push_String_Extended,0x304 ; "PRI HEAD TAIL" 013c 8008 | | Call 0x0,0x8 013d 00d1 | | Pop_Control Pop_Count_1 013e 00cf | | Action Mark_Auxiliary 013f 480f |H | Short_Literal 0xf 0140 4800 |H | Short_Literal 0x0 0141 0007 | | Action Break_Optional 0142 00d8 | | Load_Top At_Offset_0 0143 0a60 | ` | Execute_Immediate Plus,0x60 0144 00d8 | | Load_Top At_Offset_0 0145 e00e | | Load 0x0,0xe 0146 0260 | ` | Execute Discrete,In_Type 0147 7001 |p | Jump_Nonzero 0x149 0148 0801 | | Execute_Immediate Raise,0x1 0149 e5ff | | Load 0x2,-0x1 014a 8004 | | Call 0x0,0x4 014b e402 | | Load 0x2,0x2 014c 017d | } | Execute Record,Structure_Write 014d 00e5 | | Load_Encached Long_Integer_Cache 014e 00e5 | | Load_Encached Long_Integer_Cache 014f e402 | | Load 0x2,0x2 0150 8005 | | Call 0x0,0x5 0151 c403 | | Store 0x2,0x3 0152 c404 | | Store 0x2,0x4 0153 00e5 | | Load_Encached Long_Integer_Cache 0154 4820 |H | Short_Literal 0x20 0155 4800 |H | Short_Literal 0x0 0156 e403 | | Load 0x2,0x3 0157 8006 | | Call 0x0,0x6 0158 c406 | | Store 0x2,0x6 0159 00e5 | | Load_Encached Long_Integer_Cache 015a 4820 |H | Short_Literal 0x20 015b 4800 |H | Short_Literal 0x0 015c e404 | | Load 0x2,0x4 015d 8006 | | Call 0x0,0x6 015e c407 | | Store 0x2,0x7 015f e5fd | | Load 0x2,-0x3 0160 4800 |H | Short_Literal 0x0 0161 4820 |H | Short_Literal 0x20 0162 4803 |H | Short_Literal 0x3 0163 4801 |H | Short_Literal 0x1 0164 e413 | | Load 0x2,0x13 0165 800a | | Call 0x0,0xa 0166 0092 0305 | | Action Push_String_Extended,0x305 ; " " 0168 01cc | | Execute Vector,Catenate 0169 4830 |H0 | Short_Literal 0x30 016a 4808 |H | Short_Literal 0x8 016b 4800 |H | Short_Literal 0x0 016c e406 | | Load 0x2,0x6 016d 8007 | | Call 0x0,0x7 016e 01cc | | Execute Vector,Catenate 016f 0092 0305 | | Action Push_String_Extended,0x305 ; " " 0171 01cc | | Execute Vector,Catenate 0172 4830 |H0 | Short_Literal 0x30 0173 4808 |H | Short_Literal 0x8 0174 4800 |H | Short_Literal 0x0 0175 e407 | | Load 0x2,0x7 0176 8007 | | Call 0x0,0x7 0177 01cc | | Execute Vector,Catenate 0178 8008 | | Call 0x0,0x8 0179 00d1 | | Pop_Control Pop_Count_1 017a 00c8 | | Action Pop_Auxiliary_Range 017b 3fc6 |? | Loop_Increasing 0x142 017c 00ce | | Action Pop_Auxiliary 017d e5fd | | Load 0x2,-0x3 017e 4800 |H | Short_Literal 0x0 017f 800b | | Call 0x0,0xb 0180 00d1 | | Pop_Control Pop_Count_1 0181 4ae0 |J | Short_Literal 0x2e0 0182 e5ff | | Load 0x2,-0x1 0183 8004 | | Call 0x0,0x4 0184 e402 | | Load 0x2,0x2 0185 017d | } | Execute Record,Structure_Write 0186 00e5 | | Load_Encached Long_Integer_Cache 0187 00e5 | | Load_Encached Long_Integer_Cache 0188 e402 | | Load 0x2,0x2 0189 8005 | | Call 0x0,0x5 018a c403 | | Store 0x2,0x3 018b c404 | | Store 0x2,0x4 018c 00e5 | | Load_Encached Long_Integer_Cache 018d 4820 |H | Short_Literal 0x20 018e 4800 |H | Short_Literal 0x0 018f e403 | | Load 0x2,0x3 0190 8006 | | Call 0x0,0x6 0191 c405 | | Store 0x2,0x5 0192 e5fd | | Load 0x2,-0x3 0193 4800 |H | Short_Literal 0x0 0194 0092 0306 | | Action Push_String_Extended,0x306 ; " Delay Queue Head - " 0196 4830 |H0 | Short_Literal 0x30 0197 4808 |H | Short_Literal 0x8 0198 4800 |H | Short_Literal 0x0 0199 e405 | | Load 0x2,0x5 019a 8007 | | Call 0x0,0x7 019b 01cc | | Execute Vector,Catenate 019c 8008 | | Call 0x0,0x8 019d 00d1 | | Pop_Control Pop_Count_1 019e e5fd | | Load 0x2,-0x3 019f 4800 |H | Short_Literal 0x0 01a0 800b | | Call 0x0,0xb 01a1 00d1 | | Pop_Control Pop_Count_1 01a2 4871 |Hq | Short_Literal 0x71 01a3 e5ff | | Load 0x2,-0x1 01a4 8004 | | Call 0x0,0x4 01a5 e402 | | Load 0x2,0x2 01a6 017d | } | Execute Record,Structure_Write 01a7 00e5 | | Load_Encached Long_Integer_Cache 01a8 00e5 | | Load_Encached Long_Integer_Cache 01a9 e402 | | Load 0x2,0x2 01aa 8005 | | Call 0x0,0x5 01ab c403 | | Store 0x2,0x3 01ac c404 | | Store 0x2,0x4 01ad 00e5 | | Load_Encached Long_Integer_Cache 01ae 4820 |H | Short_Literal 0x20 01af 4800 |H | Short_Literal 0x0 01b0 e403 | | Load 0x2,0x3 01b1 8006 | | Call 0x0,0x6 01b2 c405 | | Store 0x2,0x5 01b3 e5fd | | Load 0x2,-0x3 01b4 4800 |H | Short_Literal 0x0 01b5 0092 0307 | | Action Push_String_Extended,0x307 ; " Disk Wait Head - " 01b7 4830 |H0 | Short_Literal 0x30 01b8 4808 |H | Short_Literal 0x8 01b9 4800 |H | Short_Literal 0x0 01ba e405 | | Load 0x2,0x5 01bb 8007 | | Call 0x0,0x7 01bc 01cc | | Execute Vector,Catenate 01bd 8008 | | Call 0x0,0x8 01be 00d1 | | Pop_Control Pop_Count_1 01bf e5fd | | Load 0x2,-0x3 01c0 4800 |H | Short_Literal 0x0 01c1 800b | | Call 0x0,0xb 01c2 00d1 | | Pop_Control Pop_Count_1 01c3 4870 |Hp | Short_Literal 0x70 01c4 e5ff | | Load 0x2,-0x1 01c5 8004 | | Call 0x0,0x4 01c6 e402 | | Load 0x2,0x2 01c7 017d | } | Execute Record,Structure_Write 01c8 00e5 | | Load_Encached Long_Integer_Cache 01c9 00e5 | | Load_Encached Long_Integer_Cache 01ca e402 | | Load 0x2,0x2 01cb 8005 | | Call 0x0,0x5 01cc c403 | | Store 0x2,0x3 01cd c404 | | Store 0x2,0x4 01ce 00e5 | | Load_Encached Long_Integer_Cache 01cf 4820 |H | Short_Literal 0x20 01d0 4800 |H | Short_Literal 0x0 01d1 e403 | | Load 0x2,0x3 01d2 8006 | | Call 0x0,0x6 01d3 c405 | | Store 0x2,0x5 01d4 e5fd | | Load 0x2,-0x3 01d5 4800 |H | Short_Literal 0x0 01d6 0092 0308 | | Action Push_String_Extended,0x308 ; " FAQ Head - " 01d8 4830 |H0 | Short_Literal 0x30 01d9 4808 |H | Short_Literal 0x8 01da 4800 |H | Short_Literal 0x0 01db e405 | | Load 0x2,0x5 01dc 8007 | | Call 0x0,0x7 01dd 01cc | | Execute Vector,Catenate 01de 8008 | | Call 0x0,0x8 01df 00d1 | | Pop_Control Pop_Count_1 01e0 e5fd | | Load 0x2,-0x3 01e1 4800 |H | Short_Literal 0x0 01e2 800b | | Call 0x0,0xb 01e3 00d1 | | Pop_Control Pop_Count_1 01e4 488a |H | Short_Literal 0x8a 01e5 e5ff | | Load 0x2,-0x1 01e6 8004 | | Call 0x0,0x4 01e7 e402 | | Load 0x2,0x2 01e8 017d | } | Execute Record,Structure_Write 01e9 00e5 | | Load_Encached Long_Integer_Cache 01ea 00e5 | | Load_Encached Long_Integer_Cache 01eb e402 | | Load 0x2,0x2 01ec 8005 | | Call 0x0,0x5 01ed c403 | | Store 0x2,0x3 01ee c404 | | Store 0x2,0x4 01ef 00e5 | | Load_Encached Long_Integer_Cache 01f0 4815 |H | Short_Literal 0x15 01f1 4801 |H | Short_Literal 0x1 01f2 e404 | | Load 0x2,0x4 01f3 8006 | | Call 0x0,0x6 01f4 c40b | | Store 0x2,0xb 01f5 00e5 | | Load_Encached Long_Integer_Cache 01f6 4815 |H | Short_Literal 0x15 01f7 4816 |H | Short_Literal 0x16 01f8 e404 | | Load 0x2,0x4 01f9 8006 | | Call 0x0,0x6 01fa c40a | | Store 0x2,0xa 01fb 00e5 | | Load_Encached Long_Integer_Cache 01fc 4815 |H | Short_Literal 0x15 01fd 482b |H+ | Short_Literal 0x2b 01fe e404 | | Load 0x2,0x4 01ff 8006 | | Call 0x0,0x6 0200 c409 | | Store 0x2,0x9 0201 e5fd | | Load 0x2,-0x3 0202 4800 |H | Short_Literal 0x0 0203 0092 0309 | | Action Push_String_Extended,0x309 ; "CURRENT LOAD REG - " 0205 4830 |H0 | Short_Literal 0x30 0206 4810 |H | Short_Literal 0x10 0207 4800 |H | Short_Literal 0x0 0208 e404 | | Load 0x2,0x4 0209 8007 | | Call 0x0,0x7 020a 01cc | | Execute Vector,Catenate 020b 8008 | | Call 0x0,0x8 020c 00d1 | | Pop_Control Pop_Count_1 020d e5fd | | Load 0x2,-0x3 020e 4800 |H | Short_Literal 0x0 020f 0092 030a | | Action Push_String_Extended,0x30a ; " RUN LOAD - " 0211 4830 |H0 | Short_Literal 0x30 0212 4806 |H | Short_Literal 0x6 0213 4801 |H | Short_Literal 0x1 0214 e409 | | Load 0x2,0x9 0215 8007 | | Call 0x0,0x7 0216 01cc | | Execute Vector,Catenate 0217 8008 | | Call 0x0,0x8 0218 00d1 | | Pop_Control Pop_Count_1 0219 e5fd | | Load 0x2,-0x3 021a 4800 |H | Short_Literal 0x0 021b 0092 030b | | Action Push_String_Extended,0x30b ; " DISK WAIT LOAD - " 021d 4830 |H0 | Short_Literal 0x30 021e 4806 |H | Short_Literal 0x6 021f 4801 |H | Short_Literal 0x1 0220 e40a | | Load 0x2,0xa 0221 8007 | | Call 0x0,0x7 0222 01cc | | Execute Vector,Catenate 0223 8008 | | Call 0x0,0x8 0224 00d1 | | Pop_Control Pop_Count_1 0225 e5fd | | Load 0x2,-0x3 0226 4800 |H | Short_Literal 0x0 0227 0092 030c | | Action Push_String_Extended,0x30c ; " WITHHELD LOAD - " 0229 4830 |H0 | Short_Literal 0x30 022a 4806 |H | Short_Literal 0x6 022b 4801 |H | Short_Literal 0x1 022c e40b | | Load 0x2,0xb 022d 8007 | | Call 0x0,0x7 022e 01cc | | Execute Vector,Catenate 022f 8008 | | Call 0x0,0x8 0230 00d1 | | Pop_Control Pop_Count_1 0231 e5fd | | Load 0x2,-0x3 0232 4800 |H | Short_Literal 0x0 0233 800b | | Call 0x0,0xb 0234 00d1 | | Pop_Control Pop_Count_1 0235 780a |x | Jump 0x240 0236 e5fd | | Load 0x2,-0x3 0237 4800 |H | Short_Literal 0x0 0238 0092 030d | | Action Push_String_Extended,0x30d ; " ** Register File state not dumped to tombstone **" 023a 8008 | | Call 0x0,0x8 023b 00d1 | | Pop_Control Pop_Count_1 023c e5fd | | Load 0x2,-0x3 023d 4800 |H | Short_Literal 0x0 023e 800b | | Call 0x0,0xb 023f 00d1 | | Pop_Control Pop_Count_1 0240 00cf | | Action Mark_Auxiliary 0241 480f |H | Short_Literal 0xf 0242 4800 |H | Short_Literal 0x0 0243 0007 | | Action Break_Optional 0244 e5fd | | Load 0x2,-0x3 0245 4800 |H | Short_Literal 0x0 0246 0092 030e | | Action Push_String_Extended,0x30e ; "GP(" 0248 4830 |H0 | Short_Literal 0x30 0249 4801 |H | Short_Literal 0x1 024a 4800 |H | Short_Literal 0x0 024b e413 | | Load 0x2,0x13 024c 800a | | Call 0x0,0xa 024d 01cc | | Execute Vector,Catenate 024e 0092 030f | | Action Push_String_Extended,0x30f ; ") => " 0250 01cc | | Execute Vector,Catenate 0251 00db | | Load_Top At_Offset_3 0252 e5ff | | Load 0x2,-0x1 0253 0227 | ' | Execute Access,All_Reference 0254 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0255 3418 |4 | Execute Record,Field_Reference,Field_Number 0x18 0256 01d5 | | Execute Vector,Field_Reference 0257 800d | | Call 0x0,0xd 0258 01cc | | Execute Vector,Catenate 0259 8008 | | Call 0x0,0x8 025a 00d1 | | Pop_Control Pop_Count_1 025b 00c8 | | Action Pop_Auxiliary_Range 025c 3fe7 |? | Loop_Increasing 0x244 025d 00ce | | Action Pop_Auxiliary 025e e5fd | | Load 0x2,-0x3 025f 4800 |H | Short_Literal 0x0 0260 800b | | Call 0x0,0xb 0261 00d1 | | Pop_Control Pop_Count_1 0262 e5ff | | Load 0x2,-0x1 0263 0227 | ' | Execute Access,All_Reference 0264 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0265 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0266 a40d | | Store_Unchecked 0x2,0xd 0267 e5ff | | Load 0x2,-0x1 0268 0227 | ' | Execute Access,All_Reference 0269 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 026a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 026b 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 026c 00db | | Load_Top At_Offset_3 026d 00db | | Load_Top At_Offset_3 026e 027e | ~ | Execute Discrete,Not_Equal 026f 6806 |h | Jump_Zero 0x276 0270 e5fd | | Load 0x2,-0x3 0271 4800 |H | Short_Literal 0x0 0272 0092 0310 | | Action Push_String_Extended,0x310 ; "TTOP AND VTOP INCONSISTENT" 0274 8008 | | Call 0x0,0x8 0275 00d1 | | Pop_Control Pop_Count_1 0276 00db | | Load_Top At_Offset_3 0277 4c10 |L | Short_Literal -0x3f0 0278 0273 | s | Execute Discrete,Plus 0279 c40c | | Store 0x2,0xc 027a 00cf | | Action Mark_Auxiliary 027b 480f |H | Short_Literal 0xf 027c 4800 |H | Short_Literal 0x0 027d 0007 | | Action Break_Optional 027e e5fd | | Load 0x2,-0x3 027f 4800 |H | Short_Literal 0x0 0280 00da | | Load_Top At_Offset_2 0281 8410 | | Call 0x2,0x10 0282 e40c | | Load 0x2,0xc 0283 e5ff | | Load 0x2,-0x1 0284 0227 | ' | Execute Access,All_Reference 0285 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0286 3419 |4 | Execute Record,Field_Reference,Field_Number 0x19 0287 01d5 | | Execute Vector,Field_Reference 0288 800d | | Call 0x0,0xd 0289 01cc | | Execute Vector,Catenate 028a 8008 | | Call 0x0,0x8 028b 00d1 | | Pop_Control Pop_Count_1 028c e40c | | Load 0x2,0xc 028d 7003 |p | Jump_Nonzero 0x291 028e 480f |H | Short_Literal 0xf 028f a40c | | Store_Unchecked 0x2,0xc 0290 7803 |x | Jump 0x294 0291 e40c | | Load 0x2,0xc 0292 0aff | | Execute_Immediate Plus,-0x1 0293 c40c | | Store 0x2,0xc 0294 00c8 | | Action Pop_Auxiliary_Range 0295 3fe8 |? | Loop_Increasing 0x27e 0296 00ce | | Action Pop_Auxiliary 0297 e5fd | | Load 0x2,-0x3 0298 4800 |H | Short_Literal 0x0 0299 800b | | Call 0x0,0xb 029a 00d1 | | Pop_Control Pop_Count_1 029b e5fd | | Load 0x2,-0x3 029c 4800 |H | Short_Literal 0x0 029d 800b | | Call 0x0,0xb 029e 00d1 | | Pop_Control Pop_Count_1 029f e5fe | | Load 0x2,-0x2 02a0 680f |h | Jump_Zero 0x2b0 02a1 e5fd | | Load 0x2,-0x3 02a2 4800 |H | Short_Literal 0x0 02a3 0092 0311 | | Action Push_String_Extended,0x311 ; "PFMAR => " 02a5 49a0 |I | Short_Literal 0x1a0 02a6 e5ff | | Load 0x2,-0x1 02a7 8004 | | Call 0x0,0x4 02a8 800f | | Call 0x0,0xf 02a9 01cc | | Execute Vector,Catenate 02aa 8008 | | Call 0x0,0x8 02ab 00d1 | | Pop_Control Pop_Count_1 02ac e5fd | | Load 0x2,-0x3 02ad 4800 |H | Short_Literal 0x0 02ae 800b | | Call 0x0,0xb 02af 00d1 | | Pop_Control Pop_Count_1 02b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02b1 0000 0000 | | .BLANK 0000[0x7] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02c1 | | .CONST 0x02c1 ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0002 | | .CONST 0x0002 ; Number of locals 02bb INIT_02b8: 02bb 4880 |H | Short_Literal 0x80 02bc e010 | | Load 0x0,0x10 02bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02be 1c08 | | Execute_Immediate Run_Utility,0x8 02bf 00d8 | | Load_Top At_Offset_0 02c0 1c00 | | Execute_Immediate Run_Utility,0x0 02c1 BODY_02b8: 02c1 00d8 | | Load_Top At_Offset_0 02c2 00ea | | Load_Encached Null_String_Cache 02c3 e010 | | Load 0x0,0x10 02c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02c5 00d1 | | Pop_Control Pop_Count_1 02c6 00cf | | Action Mark_Auxiliary 02c7 480f |H | Short_Literal 0xf 02c8 4800 |H | Short_Literal 0x0 02c9 0007 | | Action Break_Optional 02ca 00d8 | | Load_Top At_Offset_0 02cb e5ff | | Load 0x2,-0x1 02cc 0227 | ' | Execute Access,All_Reference 02cd 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 02ce 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 02cf 01d7 | | Execute Vector,Field_Read 02d0 6807 |h | Jump_Zero 0x2d8 02d1 00db | | Load_Top At_Offset_3 02d2 00d9 | | Load_Top At_Offset_1 02d3 00e0 | | Load_Encached Standard_Cache 02d4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02d5 e010 | | Load 0x0,0x10 02d6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02d7 00d1 | | Pop_Control Pop_Count_1 02d8 00c8 | | Action Pop_Auxiliary_Range 02d9 3ff0 |? | Loop_Increasing 0x2ca 02da 00ce | | Action Pop_Auxiliary 02db 00d8 | | Load_Top At_Offset_0 02dc e010 | | Load 0x0,0x10 02dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02de 00ca | | Action Exit_Nullary_Function 02df 0000 | | .XXX[0x1] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 7003 |p | Jump_Nonzero 0x2e8 02e5 0092 0312 | | Action Push_String_Extended,0x312 ; "TOP => " 02e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02e8 0092 0313 | | Action Push_String_Extended,0x313 ; "TOP-" 02ea 4830 |H0 | Short_Literal 0x30 02eb 4801 |H | Short_Literal 0x1 02ec 4800 |H | Short_Literal 0x0 02ed e7ff | | Load 0x3,-0x1 02ee 800a | | Call 0x0,0xa 02ef 01cc | | Execute Vector,Catenate 02f0 0092 0314 | | Action Push_String_Extended,0x314 ; " => " 02f2 01cc | | Execute Vector,Catenate 02f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f4 ; -------------------------------------------------------------------------------------- 02f4 ; STRING TABLE 02f4 ; -------------------------------------------------------------------------------------- 02f4 0044 | D | .STRTAB 0x0044->0x0316 ; "CID => " 02f5 004c | L | .STRTAB 0x004c->0x031b ; "Top => " 02f6 0052 | R | .STRTAB 0x0052->0x031f ; " (" 02f7 0052 | R | .STRTAB 0x0052->0x0320 ; "Pred => " 02f8 0058 | X | .STRTAB 0x0058->0x0324 ; "Save => " 02f9 005e | ^ | .STRTAB 0x005e->0x0328 ; "PC => " 02fa 0063 | c | .STRTAB 0x0063->0x032b ; "DPC => " 02fb 0068 | h | .STRTAB 0x0068->0x032f ; "Lex levels valid =>" 02fc 0079 | y | .STRTAB 0x0079->0x0338 ; "." 02fd 0078 | x | .STRTAB 0x0078->0x0339 ; "TLC => " 02fe 007d | } | .STRTAB 0x007d->0x033c ; "VLC => " 02ff 0082 | | .STRTAB 0x0082->0x0340 ; "MAR => " 0300 0087 | | .STRTAB 0x0087->0x0343 ; "TAR => " 0301 008c | | .STRTAB 0x008c->0x0347 ; " VAR => " 0302 0092 | | .STRTAB 0x0092->0x034b ; "RDR => " 0303 0097 | | .STRTAB 0x0097->0x034e ; "WDR => " 0304 009c | | .STRTAB 0x009c->0x0352 ; "PRI HEAD TAIL" 0305 00af | | .STRTAB 0x00af->0x035c ; " " 0306 00af | | .STRTAB 0x00af->0x035d ; " Delay Queue Head - " 0307 00c1 | | .STRTAB 0x00c1->0x0367 ; " Disk Wait Head - " 0308 00d1 | | .STRTAB 0x00d1->0x0370 ; " FAQ Head - " 0309 00db | | .STRTAB 0x00db->0x0376 ; "CURRENT LOAD REG - " 030a 00ec | | .STRTAB 0x00ec->0x0380 ; " RUN LOAD - " 030b 00fc | | .STRTAB 0x00fc->0x0389 ; " DISK WAIT LOAD - " 030c 010c | | .STRTAB 0x010c->0x0392 ; " WITHHELD LOAD - " 030d 011c | | .STRTAB 0x011c->0x039b ; " ** Register File state not dumped to tombstone **" 030e 014c | L | .STRTAB 0x014c->0x03b4 ; "GP(" 030f 014d | M | .STRTAB 0x014d->0x03b5 ; ") => " 0310 0150 | P | .STRTAB 0x0150->0x03b8 ; "TTOP AND VTOP INCONSISTENT" 0311 0168 | h | .STRTAB 0x0168->0x03c5 ; "PFMAR => " 0312 0170 | p | .STRTAB 0x0170->0x03ca ; "TOP => " 0313 0177 | w | .STRTAB 0x0177->0x03ce ; "TOP-" 0314 0179 | y | .STRTAB 0x0179->0x03d0 ; " => " 0315 017b | { | .STREND 0x017b->0x03d2 0316 4349 4420 |CID | .STRTAB_STRINGS 03d3 0000 0000 | | .BLANK 0000[0x5] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; Debug Table 03d8 ; -------------------------------------------------------------------------------------- 03d8 0004 0012 | | .DEBUG4 0x0004,0x0012,0x5ae0,0x0000,0x0001,0x0000 03de 0000 0000 | | .BLANK 0000[0x22]