|
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: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0490 | | .CONST 0x0490 ; 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 00ed | | .CONST 0x00ed ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 002e | . | .CONST 0x002e ; Number of locals 000b INIT_0008: 000b 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 000d 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 000f 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated 0011 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0013 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 0015 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 0017 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0019 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 001b 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 001d 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 001f 4802 |H | Short_Literal 0x2 0020 e001 | | Load 0x0,0x1 0021 01d7 | | Execute Vector,Field_Read 0022 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0023 0093 0000 | | push_full_address 0x0 0025 615a |aZ | Indirect_Literal Discrete,0x180,{0x80000000, 0x00010000} 0026 0273 | s | Execute Discrete,Plus 0027 0129 | ) | Execute Any,Make_Visible 0028 0093 0000 | | push_full_address 0x0 002a 6151 |aQ | Indirect_Literal Discrete,0x17c,{0x80000000, 0x00020000} 002b 0273 | s | Execute Discrete,Plus 002c 0129 | ) | Execute Any,Make_Visible 002d 0093 0000 | | push_full_address 0x0 002f 6148 |aH | Indirect_Literal Discrete,0x178,{0x80000000, 0x00030000} 0030 0273 | s | Execute Discrete,Plus 0031 0129 | ) | Execute Any,Make_Visible 0032 0093 0000 | | push_full_address 0x0 0034 613f |a? | Indirect_Literal Discrete,0x174,{0x80000000, 0x00040000} 0035 0273 | s | Execute Discrete,Plus 0036 0129 | ) | Execute Any,Make_Visible 0037 00bf | | Action Accept_Activation 0038 4801 |H | Short_Literal 0x1 0039 483c |H< | Short_Literal 0x3c 003a 00e9 | | Load_Encached String_Cache 003b 035b | [ | Declare_Type Array,Constrained 003c e002 | | Load 0x0,0x2 003d e003 | | Load 0x0,0x3 003e e004 | | Load 0x0,0x4 003f e005 | | Load 0x0,0x5 0040 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0041 0387 | | Declare_Variable Package 0042 00d8 | | Load_Top At_Offset_0 0043 020f | | Execute Module,Activate 0044 e006 | | Load 0x0,0x6 0045 e007 | | Load 0x0,0x7 0046 00e9 | | Load_Encached String_Cache 0047 e005 | | Load 0x0,0x5 0048 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0049 0387 | | Declare_Variable Package 004a 00d8 | | Load_Top At_Offset_0 004b 020f | | Execute Module,Activate 004c e008 | | Load 0x0,0x8 004d e009 | | Load 0x0,0x9 004e 00e2 | | Load_Encached Integer_Cache 004f e005 | | Load 0x0,0x5 0050 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0051 0387 | | Declare_Variable Package 0052 00d8 | | Load_Top At_Offset_0 0053 020f | | Execute Module,Activate 0054 e00a | | Load 0x0,0xa 0055 e00b | | Load 0x0,0xb 0056 e004 | | Load 0x0,0x4 0057 e00c | | Load 0x0,0xc 0058 0387 | | Declare_Variable Package 0059 00d8 | | Load_Top At_Offset_0 005a 020f | | Execute Module,Activate 005b e00d | | Load 0x0,0xd 005c e00e | | Load 0x0,0xe 005d e21c | | Load 0x1,0x1c 005e e00c | | Load 0x0,0xc 005f 0387 | | Declare_Variable Package 0060 00d8 | | Load_Top At_Offset_0 0061 020f | | Execute Module,Activate 0062 4801 |H | Short_Literal 0x1 0063 4832 |H2 | Short_Literal 0x32 0064 00e9 | | Load_Encached String_Cache 0065 035b | [ | Declare_Type Array,Constrained 0066 4801 |H | Short_Literal 0x1 0067 4850 |HP | Short_Literal 0x50 0068 00e9 | | Load_Encached String_Cache 0069 035b | [ | Declare_Type Array,Constrained 006a e004 | | Load 0x0,0x4 006b 00da | | Load_Top At_Offset_2 006c 00da | | Load_Top At_Offset_2 006d 02a0 | | Declare_Subprogram Null_Subprogram 006e 4803 |H | Short_Literal 0x3 006f 032d | - | Declare_Type Record,Defined 0070 e00f | | Load 0x0,0xf 0071 e010 | | Load 0x0,0x10 0072 00da | | Load_Top At_Offset_2 0073 e00c | | Load 0x0,0xc 0074 0387 | | Declare_Variable Package 0075 00d8 | | Load_Top At_Offset_0 0076 020f | | Execute Module,Activate 0077 e005 | | Load 0x0,0x5 0078 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0079 02c7 | | Declare_Variable Any 007a 00d8 | | Load_Top At_Offset_0 007b 1c00 | | Execute_Immediate Run_Utility,0x0 007c e221 | ! | Load 0x1,0x21 007d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 007e e220 | | Load 0x1,0x20 007f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0080 00db | | Load_Top At_Offset_3 0081 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0082 e221 | ! | Load 0x1,0x21 0083 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0084 00e1 | | Load_Encached Boolean_Cache 0085 4801 |H | Short_Literal 0x1 0086 4811 |H | Short_Literal 0x11 0087 00e9 | | Load_Encached String_Cache 0088 035b | [ | Declare_Type Array,Constrained 0089 0337 | 7 | Declare_Variable Array 008a 00d8 | | Load_Top At_Offset_0 008b 0335 | 5 | Declare_Variable Array,Duplicate 008c 00cd | | Action Spare6_Action 008d 4821 |H! | Short_Literal 0x21 008e 4801 |H | Short_Literal 0x1 008f 00da | | Load_Top At_Offset_2 0090 01d6 | | Execute Vector,Field_Write 0091 4875 |Hu | Short_Literal 0x75 0092 4802 |H | Short_Literal 0x2 0093 00da | | Load_Top At_Offset_2 0094 01d6 | | Execute Vector,Field_Write 0095 4863 |Hc | Short_Literal 0x63 0096 4803 |H | Short_Literal 0x3 0097 00da | | Load_Top At_Offset_2 0098 01d6 | | Execute Vector,Field_Write 0099 486f |Ho | Short_Literal 0x6f 009a 4804 |H | Short_Literal 0x4 009b 00da | | Load_Top At_Offset_2 009c 01d6 | | Execute Vector,Field_Write 009d 4864 |Hd | Short_Literal 0x64 009e 4805 |H | Short_Literal 0x5 009f 00da | | Load_Top At_Offset_2 00a0 01d6 | | Execute Vector,Field_Write 00a1 4865 |He | Short_Literal 0x65 00a2 4806 |H | Short_Literal 0x6 00a3 00da | | Load_Top At_Offset_2 00a4 01d6 | | Execute Vector,Field_Write 00a5 482e |H. | Short_Literal 0x2e 00a6 4807 |H | Short_Literal 0x7 00a7 00da | | Load_Top At_Offset_2 00a8 01d6 | | Execute Vector,Field_Write 00a9 486d |Hm | Short_Literal 0x6d 00aa 4808 |H | Short_Literal 0x8 00ab 00da | | Load_Top At_Offset_2 00ac 01d6 | | Execute Vector,Field_Write 00ad 4869 |Hi | Short_Literal 0x69 00ae 4809 |H | Short_Literal 0x9 00af 00da | | Load_Top At_Offset_2 00b0 01d6 | | Execute Vector,Field_Write 00b1 4863 |Hc | Short_Literal 0x63 00b2 480a |H | Short_Literal 0xa 00b3 00da | | Load_Top At_Offset_2 00b4 01d6 | | Execute Vector,Field_Write 00b5 4872 |Hr | Short_Literal 0x72 00b6 480b |H | Short_Literal 0xb 00b7 00da | | Load_Top At_Offset_2 00b8 01d6 | | Execute Vector,Field_Write 00b9 486f |Ho | Short_Literal 0x6f 00ba 480c |H | Short_Literal 0xc 00bb 00da | | Load_Top At_Offset_2 00bc 01d6 | | Execute Vector,Field_Write 00bd 4863 |Hc | Short_Literal 0x63 00be 480d |H | Short_Literal 0xd 00bf 00da | | Load_Top At_Offset_2 00c0 01d6 | | Execute Vector,Field_Write 00c1 486f |Ho | Short_Literal 0x6f 00c2 480e |H | Short_Literal 0xe 00c3 00da | | Load_Top At_Offset_2 00c4 01d6 | | Execute Vector,Field_Write 00c5 4864 |Hd | Short_Literal 0x64 00c6 480f |H | Short_Literal 0xf 00c7 00da | | Load_Top At_Offset_2 00c8 01d6 | | Execute Vector,Field_Write 00c9 4865 |He | Short_Literal 0x65 00ca 4810 |H | Short_Literal 0x10 00cb 00da | | Load_Top At_Offset_2 00cc 01d6 | | Execute Vector,Field_Write 00cd 485f |H_ | Short_Literal 0x5f 00ce 4811 |H | Short_Literal 0x11 00cf 00da | | Load_Top At_Offset_2 00d0 01d6 | | Execute Vector,Field_Write 00d1 00d9 | | Load_Top At_Offset_1 00d2 01d4 | | Execute Vector,Structure_Write 00d3 1d0d | | Execute_Immediate Reference_Lex_1,0xd 00d4 00c7 | | Action Elaborate_Subprogram 00d5 1d0e | | Execute_Immediate Reference_Lex_1,0xe 00d6 00c7 | | Action Elaborate_Subprogram 00d7 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00d8 00c7 | | Action Elaborate_Subprogram 00d9 1d0f | | Execute_Immediate Reference_Lex_1,0xf 00da 00c7 | | Action Elaborate_Subprogram 00db 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00dc 00c7 | | Action Elaborate_Subprogram 00dd 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00de 00c7 | | Action Elaborate_Subprogram 00df 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00e0 00c7 | | Action Elaborate_Subprogram 00e1 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00e2 00c7 | | Action Elaborate_Subprogram 00e3 029d 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call 00e5 029d 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call 00e7 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00e8 00c7 | | Action Elaborate_Subprogram 00e9 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00ea 00c7 | | Action Elaborate_Subprogram 00eb 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00ec 00c7 | | Action Elaborate_Subprogram 00ed BODY_0008: 00ed 00bc | | Action Signal_Activated 00ee 00bb | | Action Signal_Completion 00ef 0000 | | .XXX[0x1] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f3 | | .CONST 0x00f3 ; Address of begin 00f1 0168 | h | .CONST 0x0168 ; Address of exception handler 00f2 0001 | | .CONST 0x0001 ; Number of locals 00f3 BODY_00f0: 00f3 INIT_00f0: 00f3 4801 |H | Short_Literal 0x1 00f4 0092 03d8 | | Action Push_String_Extended,0x3d8 ; "<default>" 00f6 e5fe | | Load 0x2,-0x2 00f7 e011 | | Load 0x0,0x11 00f8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00f9 6831 |h1 | Jump_Zero 0x12b 00fa e226 | & | Load 0x1,0x26 00fb 00ea | | Load_Encached Null_String_Cache 00fc e22c | , | Load 0x1,0x2c 00fd e5ff | | Load 0x2,-0x1 00fe 01cc | | Execute Vector,Catenate 00ff 0092 03d9 | | Action Push_String_Extended,0x3d9 ; ".packages" 0101 01cc | | Execute Vector,Catenate 0102 4800 |H | Short_Literal 0x0 0103 e005 | | Load 0x0,0x5 0104 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0105 c226 | & | Store 0x1,0x26 0106 e227 | ' | Load 0x1,0x27 0107 00ea | | Load_Encached Null_String_Cache 0108 e22c | , | Load 0x1,0x2c 0109 e5ff | | Load 0x2,-0x1 010a 01cc | | Execute Vector,Catenate 010b 0092 03da | | Action Push_String_Extended,0x3da ; ".labels" 010d 01cc | | Execute Vector,Catenate 010e 4800 |H | Short_Literal 0x0 010f e221 | ! | Load 0x1,0x21 0110 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0111 c227 | ' | Store 0x1,0x27 0112 e228 | ( | Load 0x1,0x28 0113 00ea | | Load_Encached Null_String_Cache 0114 e22c | , | Load 0x1,0x2c 0115 e5ff | | Load 0x2,-0x1 0116 01cc | | Execute Vector,Catenate 0117 0092 03db | | Action Push_String_Extended,0x3db ; ".addresses" 0119 01cc | | Execute Vector,Catenate 011a 4800 |H | Short_Literal 0x0 011b e220 | | Load 0x1,0x20 011c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 011d c228 | ( | Store 0x1,0x28 011e e229 | ) | Load 0x1,0x29 011f 00ea | | Load_Encached Null_String_Cache 0120 e22c | , | Load 0x1,0x2c 0121 e5ff | | Load 0x2,-0x1 0122 01cc | | Execute Vector,Catenate 0123 0092 03dc | | Action Push_String_Extended,0x3dc ; ".reasons" 0125 01cc | | Execute Vector,Catenate 0126 4800 |H | Short_Literal 0x0 0127 e225 | % | Load 0x1,0x25 0128 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0129 c229 | ) | Store 0x1,0x29 012a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 012b e226 | & | Load 0x1,0x26 012c 00ea | | Load_Encached Null_String_Cache 012d e5fe | | Load 0x2,-0x2 012e 0092 03dd | | Action Push_String_Extended,0x3dd ; ".microcode_" 0130 01cc | | Execute Vector,Catenate 0131 e5ff | | Load 0x2,-0x1 0132 01cc | | Execute Vector,Catenate 0133 0092 03d9 | | Action Push_String_Extended,0x3d9 ; ".packages" 0135 01cc | | Execute Vector,Catenate 0136 4800 |H | Short_Literal 0x0 0137 e005 | | Load 0x0,0x5 0138 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0139 c226 | & | Store 0x1,0x26 013a e227 | ' | Load 0x1,0x27 013b 00ea | | Load_Encached Null_String_Cache 013c e5fe | | Load 0x2,-0x2 013d 0092 03de | | Action Push_String_Extended,0x3de ; ".Microcode_" 013f 01cc | | Execute Vector,Catenate 0140 e5ff | | Load 0x2,-0x1 0141 01cc | | Execute Vector,Catenate 0142 0092 03da | | Action Push_String_Extended,0x3da ; ".labels" 0144 01cc | | Execute Vector,Catenate 0145 4800 |H | Short_Literal 0x0 0146 e221 | ! | Load 0x1,0x21 0147 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0148 c227 | ' | Store 0x1,0x27 0149 e228 | ( | Load 0x1,0x28 014a 00ea | | Load_Encached Null_String_Cache 014b e5fe | | Load 0x2,-0x2 014c 0092 03de | | Action Push_String_Extended,0x3de ; ".Microcode_" 014e 01cc | | Execute Vector,Catenate 014f e5ff | | Load 0x2,-0x1 0150 01cc | | Execute Vector,Catenate 0151 0092 03db | | Action Push_String_Extended,0x3db ; ".addresses" 0153 01cc | | Execute Vector,Catenate 0154 4800 |H | Short_Literal 0x0 0155 e220 | | Load 0x1,0x20 0156 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0157 c228 | ( | Store 0x1,0x28 0158 e229 | ) | Load 0x1,0x29 0159 00ea | | Load_Encached Null_String_Cache 015a e5fe | | Load 0x2,-0x2 015b 0092 03de | | Action Push_String_Extended,0x3de ; ".Microcode_" 015d 01cc | | Execute Vector,Catenate 015e e5ff | | Load 0x2,-0x1 015f 01cc | | Execute Vector,Catenate 0160 0092 03dc | | Action Push_String_Extended,0x3dc ; ".reasons" 0162 01cc | | Execute Vector,Catenate 0163 4800 |H | Short_Literal 0x0 0164 e225 | % | Load 0x1,0x25 0165 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0166 c229 | ) | Store 0x1,0x29 0167 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0168 TRAP_00f0: 0168 00d8 | | Load_Top At_Offset_0 0169 0107 | | Execute Exception,Get_Name 016a 4920 |I | Short_Literal 0x120 016b 492f |I/ | Short_Literal 0x12f 016c 0262 | b | Execute Discrete,In_Range 016d 6802 |h | Jump_Zero 0x170 016e e21a | | Load 0x1,0x1a 016f 0257 | W | Execute Discrete,Raise 0170 0100 | | Execute Exception,Raise 0171 0000 0000 | | .XXX[0x3] 0173 0000 | | 0174 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 0178 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 017c 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0180 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0184 0000 0000 | | .BLANK 0000[0x4] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b e226 | & | Load 0x1,0x26 018c e005 | | Load 0x0,0x5 018d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 018e c226 | & | Store 0x1,0x26 018f e227 | ' | Load 0x1,0x27 0190 e221 | ! | Load 0x1,0x21 0191 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0192 c227 | ' | Store 0x1,0x27 0193 e228 | ( | Load 0x1,0x28 0194 e220 | | Load 0x1,0x20 0195 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0196 c228 | ( | Store 0x1,0x28 0197 e229 | ) | Load 0x1,0x29 0198 e225 | % | Load 0x1,0x25 0199 1816 | | Execute Package,Field_Execute,Field_Number 0x16 019a c229 | ) | Store 0x1,0x29 019b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019c 0000 0000 | | .BLANK 0000[0x4] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a5 | | .CONST 0x01a5 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0003 | | .CONST 0x0003 ; Number of locals 01a3 INIT_01a0: 01a3 00e2 | | Load_Encached Integer_Cache 01a4 00e1 | | Load_Encached Boolean_Cache 01a5 BODY_01a0: 01a5 00e1 | | Load_Encached Boolean_Cache 01a6 00e2 | | Load_Encached Integer_Cache 01a7 4810 |H | Short_Literal 0x10 01a8 e5ff | | Load 0x2,-0x1 01a9 e011 | | Load 0x0,0x11 01aa 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01ab 005b | [ | Store_Top Discrete,At_Offset_3 01ac 0059 | Y | Store_Top Discrete,At_Offset_1 01ad 00d8 | | Load_Top At_Offset_0 01ae 7002 |p | Jump_Nonzero 0x1b1 01af e219 | | Load 0x1,0x19 01b0 0257 | W | Execute Discrete,Raise 01b1 00d9 | | Load_Top At_Offset_1 01b2 00d8 | | Load_Top At_Offset_0 01b3 e004 | | Load 0x0,0x4 01b4 0260 | ` | Execute Discrete,In_Type 01b5 7001 |p | Jump_Nonzero 0x1b7 01b6 0801 | | Execute_Immediate Raise,0x1 01b7 8210 | | Call 0x1,0x10 01b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b9 0000 0000 | | .BLANK 0000[0x7] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01cf | | .CONST 0x01cf ; Address of begin 01c1 0213 | | .CONST 0x0213 ; Address of exception handler 01c2 0006 | | .CONST 0x0006 ; Number of locals 01c3 INIT_01c0: 01c3 e004 | | Load 0x0,0x4 01c4 0007 | | Action Break_Optional 01c5 00d8 | | Load_Top At_Offset_0 01c6 0007 | | Action Break_Optional 01c7 4801 |H | Short_Literal 0x1 01c8 483c |H< | Short_Literal 0x3c 01c9 00e9 | | Load_Encached String_Cache 01ca 035b | [ | Declare_Type Array,Constrained 01cb 0337 | 7 | Declare_Variable Array 01cc 00e2 | | Load_Encached Integer_Cache 01cd 00e3 | | Load_Encached Natural_Cache 01ce 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 01cf BODY_01c0: 01cf e5ff | | Load 0x2,-0x1 01d0 4900 |I | Short_Literal 0x100 01d1 49ff |I | Short_Literal 0x1ff 01d2 0262 | b | Execute Discrete,In_Range 01d3 6803 |h | Jump_Zero 0x1d7 01d4 0092 03df | | Action Push_String_Extended,0x3df ; "EVENT" 01d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d7 e226 | & | Load 0x1,0x26 01d8 e005 | | Load 0x0,0x5 01d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01da c226 | & | Store 0x1,0x26 01db 00cf | | Action Mark_Auxiliary 01dc e21d | | Load 0x1,0x1d 01dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01de e226 | & | Load 0x1,0x26 01df e21d | | Load 0x1,0x1d 01e0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01e1 c402 | | Store 0x2,0x2 01e2 e21d | | Load 0x1,0x1d 01e3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01e4 e226 | & | Load 0x1,0x26 01e5 e21d | | Load 0x1,0x1d 01e6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01e7 c403 | | Store 0x2,0x3 01e8 00db | | Load_Top At_Offset_3 01e9 e226 | & | Load 0x1,0x26 01ea e21e | | Load 0x1,0x1e 01eb 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01ec 00d1 | | Pop_Control Pop_Count_1 01ed e21f | | Load 0x1,0x1f 01ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ef e226 | & | Load 0x1,0x26 01f0 e21f | | Load 0x1,0x1f 01f1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01f2 005b | [ | Store_Top Discrete,At_Offset_3 01f3 e5ff | | Load 0x2,-0x1 01f4 e403 | | Load 0x2,0x3 01f5 027a | z | Execute Discrete,Less_Equal 01f6 7002 |p | Jump_Nonzero 0x1f9 01f7 00c9 | | Action Pop_Auxiliary_Loop 01f8 7fe3 | | Jump 0x1dc 01f9 00ce | | Action Pop_Auxiliary 01fa e402 | | Load 0x2,0x2 01fb e5ff | | Load 0x2,-0x1 01fc 027a | z | Execute Discrete,Less_Equal 01fd 7002 |p | Jump_Nonzero 0x200 01fe e21b | | Load 0x1,0x1b 01ff 0257 | W | Execute Discrete,Raise 0200 00cf | | Action Mark_Auxiliary 0201 7804 |x | Jump 0x206 0202 00d9 | | Load_Top At_Offset_1 0203 0a01 | | Execute_Immediate Plus,0x1 0204 005a | Z | Store_Top Discrete,At_Offset_2 0205 00c9 | | Action Pop_Auxiliary_Loop 0206 00d9 | | Load_Top At_Offset_1 0207 e404 | | Load 0x2,0x4 0208 01d7 | | Execute Vector,Field_Read 0209 77f8 |w | Jump_Nonzero 0x202 020a 00ce | | Action Pop_Auxiliary 020b 4801 |H | Short_Literal 0x1 020c 00d9 | | Load_Top At_Offset_1 020d 0aff | | Execute_Immediate Plus,-0x1 020e e404 | | Load 0x2,0x4 020f 01cf | | Execute Vector,Slice_Read 0210 00e9 | | Load_Encached String_Cache 0211 01c6 | | Execute Vector,Convert_To_Formal 0212 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0213 TRAP_01c0: 0213 00d8 | | Load_Top At_Offset_0 0214 0107 | | Execute Exception,Get_Name 0215 4950 |IP | Short_Literal 0x150 0216 495f |I_ | Short_Literal 0x15f 0217 0262 | b | Execute Discrete,In_Range 0218 6802 |h | Jump_Zero 0x21b 0219 e21b | | Load 0x1,0x1b 021a 0257 | W | Execute Discrete,Raise 021b 0100 | | Execute Exception,Raise 021c 0000 0000 | | .BLANK 0000[0x4] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0227 | ' | .CONST 0x0227 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0003 | | .CONST 0x0003 ; Number of locals 0223 INIT_0220: 0223 e004 | | Load 0x0,0x4 0224 0007 | | Action Break_Optional 0225 00d8 | | Load_Top At_Offset_0 0226 0007 | | Action Break_Optional 0227 BODY_0220: 0227 e004 | | Load 0x0,0x4 0228 00d8 | | Load_Top At_Offset_0 0229 e5ff | | Load 0x2,-0x1 022a 8212 | | Call 0x1,0x12 022b 005a | Z | Store_Top Discrete,At_Offset_2 022c 005a | Z | Store_Top Discrete,At_Offset_2 022d 4820 |H | Short_Literal 0x20 022e 4805 |H | Short_Literal 0x5 022f 4810 |H | Short_Literal 0x10 0230 00db | | Load_Top At_Offset_3 0231 e011 | | Load 0x0,0x11 0232 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0233 4801 |H | Short_Literal 0x1 0234 4805 |H | Short_Literal 0x5 0235 e5fe | | Load 0x2,-0x2 0236 01ce | | Execute Vector,Slice_Write 0237 4820 |H | Short_Literal 0x20 0238 4805 |H | Short_Literal 0x5 0239 4810 |H | Short_Literal 0x10 023a e402 | | Load 0x2,0x2 023b e011 | | Load 0x0,0x11 023c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 023d 4801 |H | Short_Literal 0x1 023e 4805 |H | Short_Literal 0x5 023f e5fd | | Load 0x2,-0x3 0240 01ce | | Execute Vector,Slice_Write 0241 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0242 0000 0000 | | .BLANK 0000[0x6] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 0251 | Q | .CONST 0x0251 ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0003 | | .CONST 0x0003 ; Number of locals 024b INIT_0248: 024b 4801 |H | Short_Literal 0x1 024c 4832 |H2 | Short_Literal 0x32 024d 00e9 | | Load_Encached String_Cache 024e 035b | [ | Declare_Type Array,Constrained 024f 0337 | 7 | Declare_Variable Array 0250 00e2 | | Load_Encached Integer_Cache 0251 BODY_0248: 0251 e226 | & | Load 0x1,0x26 0252 e005 | | Load 0x0,0x5 0253 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0254 c226 | & | Store 0x1,0x26 0255 00cf | | Action Mark_Auxiliary 0256 e21d | | Load 0x1,0x1d 0257 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0258 e226 | & | Load 0x1,0x26 0259 e21d | | Load 0x1,0x1d 025a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 025b c5fe | | Store 0x2,-0x2 025c e21d | | Load 0x1,0x1d 025d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 025e e226 | & | Load 0x1,0x26 025f e21d | | Load 0x1,0x1d 0260 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0261 c5fd | | Store 0x2,-0x3 0262 00da | | Load_Top At_Offset_2 0263 e226 | & | Load 0x1,0x26 0264 e21e | | Load 0x1,0x1e 0265 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0266 00d1 | | Pop_Control Pop_Count_1 0267 e21f | | Load 0x1,0x1f 0268 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0269 e226 | & | Load 0x1,0x26 026a e21f | | Load 0x1,0x1f 026b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 026c 005a | Z | Store_Top Discrete,At_Offset_2 026d e5ff | | Load 0x2,-0x1 026e 01da | | Execute Vector,Bounds 026f e402 | | Load 0x2,0x2 0270 01cf | | Execute Vector,Slice_Read 0271 e5ff | | Load 0x2,-0x1 0272 01df | | Execute Vector,Equal 0273 7002 |p | Jump_Nonzero 0x276 0274 00c9 | | Action Pop_Auxiliary_Loop 0275 7fe0 | | Jump 0x256 0276 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0277 0000 | | .XXX[0x1] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 0295 | | .CONST 0x0295 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0007 | | .CONST 0x0007 ; Number of locals 027b INIT_0278: 027b e004 | | Load 0x0,0x4 027c 0007 | | Action Break_Optional 027d e21c | | Load 0x1,0x1c 027e 0337 | 7 | Declare_Variable Array 027f 00e3 | | Load_Encached Natural_Cache 0280 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0281 00e2 | | Load_Encached Integer_Cache 0282 e228 | ( | Load 0x1,0x28 0283 e220 | | Load 0x1,0x20 0284 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0285 e220 | | Load 0x1,0x20 0286 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0287 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0288 00d8 | | Load_Top At_Offset_0 0289 e5ff | | Load 0x2,-0x1 028a 0271 | q | Execute Discrete,Times 028b 09f2 | | Execute_Immediate Binary_Scale,-0xe 028c 00d8 | | Load_Top At_Offset_0 028d e220 | | Load 0x1,0x20 028e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 028f 0260 | ` | Execute Discrete,In_Type 0290 7001 |p | Jump_Nonzero 0x292 0291 0801 | | Execute_Immediate Raise,0x1 0292 e220 | | Load 0x1,0x20 0293 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0294 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0295 BODY_0278: 0295 e220 | | Load 0x1,0x20 0296 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0297 00d9 | | Load_Top At_Offset_1 0298 e228 | ( | Load 0x1,0x28 0299 e220 | | Load 0x1,0x20 029a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 029b c402 | | Store 0x2,0x2 029c e402 | | Load 0x2,0x2 029d e5ff | | Load 0x2,-0x1 029e 027b | { | Execute Discrete,Greater_Equal 029f 6813 |h | Jump_Zero 0x2b3 02a0 00cf | | Action Mark_Auxiliary 02a1 780b |x | Jump 0x2ad 02a2 00d9 | | Load_Top At_Offset_1 02a3 0aff | | Execute_Immediate Plus,-0x1 02a4 005a | Z | Store_Top Discrete,At_Offset_2 02a5 e220 | | Load 0x1,0x20 02a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02a7 00da | | Load_Top At_Offset_2 02a8 e228 | ( | Load 0x1,0x28 02a9 e220 | | Load 0x1,0x20 02aa 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02ab c402 | | Store 0x2,0x2 02ac 00c9 | | Action Pop_Auxiliary_Loop 02ad e402 | | Load 0x2,0x2 02ae e5ff | | Load 0x2,-0x1 02af 027d | } | Execute Discrete,Greater 02b0 77f1 |w | Jump_Nonzero 0x2a2 02b1 00ce | | Action Pop_Auxiliary 02b2 782b |x+ | Jump 0x2de 02b3 00cf | | Action Mark_Auxiliary 02b4 00d9 | | Load_Top At_Offset_1 02b5 00db | | Load_Top At_Offset_3 02b6 027b | { | Execute Discrete,Greater_Equal 02b7 6801 |h | Jump_Zero 0x2b9 02b8 7824 |x$ | Jump 0x2dd 02b9 00d9 | | Load_Top At_Offset_1 02ba 0a01 | | Execute_Immediate Plus,0x1 02bb 005a | Z | Store_Top Discrete,At_Offset_2 02bc e220 | | Load 0x1,0x20 02bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02be 00da | | Load_Top At_Offset_2 02bf e228 | ( | Load 0x1,0x28 02c0 e220 | | Load 0x1,0x20 02c1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02c2 c402 | | Store 0x2,0x2 02c3 e402 | | Load 0x2,0x2 02c4 e5ff | | Load 0x2,-0x1 02c5 027d | } | Execute Discrete,Greater 02c6 680b |h | Jump_Zero 0x2d2 02c7 00d9 | | Load_Top At_Offset_1 02c8 0aff | | Execute_Immediate Plus,-0x1 02c9 005a | Z | Store_Top Discrete,At_Offset_2 02ca e220 | | Load 0x1,0x20 02cb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02cc 00da | | Load_Top At_Offset_2 02cd e228 | ( | Load 0x1,0x28 02ce e220 | | Load 0x1,0x20 02cf 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02d0 c402 | | Store 0x2,0x2 02d1 780b |x | Jump 0x2dd 02d2 e402 | | Load 0x2,0x2 02d3 e5ff | | Load 0x2,-0x1 02d4 027f | | Execute Discrete,Equal 02d5 00da | | Load_Top At_Offset_2 02d6 e406 | | Load 0x2,0x6 02d7 027f | | Execute Discrete,Equal 02d8 0278 | x | Execute Discrete,Or 02d9 6801 |h | Jump_Zero 0x2db 02da 7802 |x | Jump 0x2dd 02db 00c9 | | Action Pop_Auxiliary_Loop 02dc 7fd7 | | Jump 0x2b4 02dd 00ce | | Action Pop_Auxiliary 02de e5ff | | Load 0x2,-0x1 02df e402 | | Load 0x2,0x2 02e0 0272 | r | Execute Discrete,Minus 02e1 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 02e2 e403 | | Load 0x2,0x3 02e3 00d9 | | Load_Top At_Offset_1 02e4 00d8 | | Load_Top At_Offset_0 02e5 e221 | ! | Load 0x1,0x21 02e6 1b13 | | Execute Package,Field_Read,Field_Number 0x13 02e7 0260 | ` | Execute Discrete,In_Type 02e8 7001 |p | Jump_Nonzero 0x2ea 02e9 0801 | | Execute_Immediate Raise,0x1 02ea e227 | ' | Load 0x1,0x27 02eb e221 | ! | Load 0x1,0x21 02ec 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02ed 00d1 | | Pop_Control Pop_Count_1 02ee 00cf | | Action Mark_Auxiliary 02ef 7804 |x | Jump 0x2f4 02f0 e404 | | Load 0x2,0x4 02f1 0a01 | | Execute_Immediate Plus,0x1 02f2 c404 | | Store 0x2,0x4 02f3 00c9 | | Action Pop_Auxiliary_Loop 02f4 e404 | | Load 0x2,0x4 02f5 e403 | | Load 0x2,0x3 02f6 01d7 | | Execute Vector,Field_Read 02f7 77f8 |w | Jump_Nonzero 0x2f0 02f8 00ce | | Action Pop_Auxiliary 02f9 00da | | Load_Top At_Offset_2 02fa 700c |p | Jump_Nonzero 0x307 02fb e5ff | | Load 0x2,-0x1 02fc 8210 | | Call 0x1,0x10 02fd 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "." 02ff 01cc | | Execute Vector,Catenate 0300 4801 |H | Short_Literal 0x1 0301 e404 | | Load 0x2,0x4 0302 0aff | | Execute_Immediate Plus,-0x1 0303 e403 | | Load 0x2,0x3 0304 01cf | | Execute Vector,Slice_Read 0305 01cc | | Execute Vector,Catenate 0306 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0307 482b |H+ | Short_Literal 0x2b 0308 482e |H. | Short_Literal 0x2e 0309 e5ff | | Load 0x2,-0x1 030a 8210 | | Call 0x1,0x10 030b 01cb | | Execute Vector,Append 030c 4801 |H | Short_Literal 0x1 030d e404 | | Load 0x2,0x4 030e 0aff | | Execute_Immediate Plus,-0x1 030f e403 | | Load 0x2,0x3 0310 01cf | | Execute Vector,Slice_Read 0311 01cc | | Execute Vector,Catenate 0312 01cb | | Execute Vector,Append 0313 4820 |H | Short_Literal 0x20 0314 4800 |H | Short_Literal 0x0 0315 480a |H | Short_Literal 0xa 0316 e405 | | Load 0x2,0x5 0317 e011 | | Load 0x0,0x11 0318 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0319 01cc | | Execute Vector,Catenate 031a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 031b 0000 0000 | | .BLANK 0000[0x5] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0323 | # | .CONST 0x0323 ; Address of begin 0321 032b | + | .CONST 0x032b ; Address of exception handler 0322 0001 | | .CONST 0x0001 ; Number of locals 0323 BODY_0320: 0323 INIT_0320: 0323 00da | | Load_Top At_Offset_2 0324 00d8 | | Load_Top At_Offset_0 0325 e004 | | Load 0x0,0x4 0326 0260 | ` | Execute Discrete,In_Type 0327 7001 |p | Jump_Nonzero 0x329 0328 0801 | | Execute_Immediate Raise,0x1 0329 8213 | | Call 0x1,0x13 032a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 032b TRAP_0320: 032b 0007 | | Action Break_Optional 032c 4820 |H | Short_Literal 0x20 032d 4805 |H | Short_Literal 0x5 032e 4810 |H | Short_Literal 0x10 032f e5ff | | Load 0x2,-0x1 0330 e011 | | Load 0x0,0x11 0331 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0332 0092 03e1 | | Action Push_String_Extended,0x3e1 ; " *** could not resolve" 0334 01cc | | Execute Vector,Catenate 0335 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0336 0000 0000 | | .XXX[0x2] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033b | ; | .CONST 0x033b ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0001 | | .CONST 0x0001 ; Number of locals 033b BODY_0338: 033b INIT_0338: 033b 480a |H | Short_Literal 0xa 033c 0092 03e2 | | Action Push_String_Extended,0x3e2 ; "Error - " 033e e5ff | | Load 0x2,-0x1 033f 822e | . | Call 0x1,0x2e 0340 01cc | | Execute Vector,Catenate 0341 01cb | | Execute Vector,Append 0342 0092 03e3 | | Action Push_String_Extended,0x3e3 ; "For reason - " 0344 01cc | | Execute Vector,Catenate 0345 e5fe | | Load 0x2,-0x2 0346 822d | - | Call 0x1,0x2d 0347 01cc | | Execute Vector,Catenate 0348 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0349 0000 0000 | | .BLANK 0000[0x7] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 00db | | Load_Top At_Offset_3 0354 00d8 | | Load_Top At_Offset_0 0355 e004 | | Load 0x0,0x4 0356 0260 | ` | Execute Discrete,In_Type 0357 7001 |p | Jump_Nonzero 0x359 0358 0801 | | Execute_Immediate Raise,0x1 0359 00db | | Load_Top At_Offset_3 035a 00d8 | | Load_Top At_Offset_0 035b e004 | | Load 0x0,0x4 035c 0260 | ` | Execute Discrete,In_Type 035d 7001 |p | Jump_Nonzero 0x35f 035e 0801 | | Execute_Immediate Raise,0x1 035f 8215 | | Call 0x1,0x15 0360 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0361 0000 0000 | | .BLANK 0000[0x7] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036d | m | .CONST 0x036d ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0002 | | .CONST 0x0002 ; Number of locals 036b INIT_0368: 036b e224 | $ | Load 0x1,0x24 036c 0322 | " | Declare_Variable Record 036d BODY_0368: 036d 00cf | | Action Mark_Auxiliary 036e e229 | ) | Load 0x1,0x29 036f e225 | % | Load 0x1,0x25 0370 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0371 4801 |H | Short_Literal 0x1 0372 0263 | c | Execute Discrete,Above_Bound 0373 7026 |p& | Jump_Nonzero 0x39a 0374 00db | | Load_Top At_Offset_3 0375 00d9 | | Load_Top At_Offset_1 0376 e225 | % | Load 0x1,0x25 0377 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0378 00d9 | | Load_Top At_Offset_1 0379 00d0 | | Action Swap_Control 037a 0260 | ` | Execute Discrete,In_Type 037b 7001 |p | Jump_Nonzero 0x37d 037c 0801 | | Execute_Immediate Raise,0x1 037d e229 | ) | Load 0x1,0x29 037e e225 | % | Load 0x1,0x25 037f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0380 00d1 | | Pop_Control Pop_Count_1 0381 00db | | Load_Top At_Offset_3 0382 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0383 e5ff | | Load 0x2,-0x1 0384 027f | | Execute Discrete,Equal 0385 6812 |h | Jump_Zero 0x398 0386 4820 |H | Short_Literal 0x20 0387 e402 | | Load 0x2,0x2 0388 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0389 e011 | | Load 0x0,0x11 038a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 038b 0092 03e4 | | Action Push_String_Extended,0x3e4 ; " : " 038d 01cc | | Execute Vector,Catenate 038e 4809 |H | Short_Literal 0x9 038f 4820 |H | Short_Literal 0x20 0390 e402 | | Load 0x2,0x2 0391 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0392 e011 | | Load 0x0,0x11 0393 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0394 e011 | | Load 0x0,0x11 0395 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0396 01cc | | Execute Vector,Catenate 0397 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0398 00c8 | | Action Pop_Auxiliary_Range 0399 3fda |? | Loop_Increasing 0x374 039a 00ce | | Action Pop_Auxiliary 039b 0092 03e5 | | Action Push_String_Extended,0x3e5 ; "not found" 039d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 039e 0000 0000 | | .XXX[0x2] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a3 | | .CONST 0x03a3 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0001 | | .CONST 0x0001 ; Number of locals 03a3 BODY_03a0: 03a3 INIT_03a0: 03a3 00da | | Load_Top At_Offset_2 03a4 00d8 | | Load_Top At_Offset_0 03a5 4a00 |J | Short_Literal 0x200 03a6 4a09 |J | Short_Literal 0x209 03a7 0262 | b | Execute Discrete,In_Range 03a8 682b |h+ | Jump_Zero 0x3d4 03a9 4e00 |N | Short_Literal -0x200 03aa 0273 | s | Execute Discrete,Plus 03ab 4609 |F | Jump_Case 0xa 03ac 780c |x | Jump 0x3b9 ; case 0x0 03ad 780e |x | Jump 0x3bc ; case 0x1 03ae 7810 |x | Jump 0x3bf ; case 0x2 03af 7812 |x | Jump 0x3c2 ; case 0x3 03b0 7814 |x | Jump 0x3c5 ; case 0x4 03b1 7816 |x | Jump 0x3c8 ; case 0x5 03b2 7818 |x | Jump 0x3cb ; case 0x6 03b3 781a |x | Jump 0x3ce ; case 0x7 03b4 781c |x | Jump 0x3d1 ; case 0x8 03b5 7800 |x | Jump 0x3b6 ; case 0x9 03b6 0092 03e6 | | Action Push_String_Extended,0x3e6 ; "SOFTWARE CRASH" 03b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b9 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "SYSTEM ERROR" 03bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03bc 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "IOP HARDWARE ERROR" 03be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03bf 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "IOP SOFTWARE ERROR" 03c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03c2 0092 03ea | | Action Push_String_Extended,0x3ea ; "CPU HARDWARE ERROR" 03c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03c5 0092 03eb | | Action Push_String_Extended,0x3eb ; "MULTI BIT MEMORY ERROR" 03c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03c8 0092 03ec | | Action Push_String_Extended,0x3ec ; "SYSBUS HARDWARE ERROR" 03ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03cb 0092 03ed | | Action Push_String_Extended,0x3ed ; "CPU MICROCODE ERROR" 03cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ce 0092 03ee | | Action Push_String_Extended,0x3ee ; "CPU SOFTWARE ERROR" 03d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03d1 0092 03ef | | Action Push_String_Extended,0x3ef ; "SYSTEM SHUTDOWN" 03d3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03d4 00d1 | | Pop_Control Pop_Count_1 03d5 0092 03e5 | | Action Push_String_Extended,0x3e5 ; "not found" 03d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; STRING TABLE 03d8 ; -------------------------------------------------------------------------------------- 03d8 0032 | 2 | .STRTAB 0x0032->0x03f1 ; "<default>" 03d9 0039 | 9 | .STRTAB 0x0039->0x03f5 ; ".packages" 03da 0040 | @ | .STRTAB 0x0040->0x03fa ; ".labels" 03db 0045 | E | .STRTAB 0x0045->0x03fd ; ".addresses" 03dc 004d | M | .STRTAB 0x004d->0x0402 ; ".reasons" 03dd 0053 | S | .STRTAB 0x0053->0x0406 ; ".microcode_" 03de 005c | \ | .STRTAB 0x005c->0x040c ; ".Microcode_" 03df 0065 | e | .STRTAB 0x0065->0x0411 ; "EVENT" 03e0 0068 | h | .STRTAB 0x0068->0x0414 ; "." 03e1 0067 | g | .STRTAB 0x0067->0x0414 ; " *** could not resolve" 03e2 007b | { | .STRTAB 0x007b->0x041f ; "Error - " 03e3 0086 | | .STRTAB 0x0086->0x0426 ; "For reason - " 03e4 0091 | | .STRTAB 0x0091->0x042c ; " : " 03e5 0092 | | .STRTAB 0x0092->0x042e ; "not found" 03e6 0099 | | .STRTAB 0x0099->0x0432 ; "SOFTWARE CRASH" 03e7 00a5 | | .STRTAB 0x00a5->0x0439 ; "SYSTEM ERROR" 03e8 00af | | .STRTAB 0x00af->0x043f ; "IOP HARDWARE ERROR" 03e9 00bf | | .STRTAB 0x00bf->0x0448 ; "IOP SOFTWARE ERROR" 03ea 00cf | | .STRTAB 0x00cf->0x0451 ; "CPU HARDWARE ERROR" 03eb 00df | | .STRTAB 0x00df->0x045a ; "MULTI BIT MEMORY ERROR" 03ec 00f3 | | .STRTAB 0x00f3->0x0465 ; "SYSBUS HARDWARE ERROR" 03ed 0106 | | .STRTAB 0x0106->0x0470 ; "CPU MICROCODE ERROR" 03ee 0117 | | .STRTAB 0x0117->0x0479 ; "CPU SOFTWARE ERROR" 03ef 0127 | ' | .STRTAB 0x0127->0x0482 ; "SYSTEM SHUTDOWN" 03f0 0134 | 4 | .STREND 0x0134->0x048a 03f1 3c64 6566 |<def| .STRTAB_STRINGS 048a 0000 0000 | | .BLANK 0000[0x6] 0490 ; -------------------------------------------------------------------------------------- 0490 ; Debug Table 0490 ; -------------------------------------------------------------------------------------- 0490 0004 0011 | | .DEBUG4 0x0004,0x0011,0x34cf,0x0000,0x0001,0x0000 0496 0001 4000 | @ | .XXX[0xa] 0498 0000 008b | | 049a 3300 2d79 |3 -y| 049c 2000 0000 | | 049e 02d2 4200 | B | 04a0 0000 0000 | | .BLANK 0000[0x7] 04a7 0025 a600 | % | .XXX[0x1d] 04a9 0b5a 7800 | Zx | 04ab 0000 0120 | | 04ad 0000 b4cc | | 04af 0000 0000 | | 04b1 08e0 0000 | | 04b3 0002 d4f5 | | 04b5 0890 005a | Z| 04b7 f240 0000 | @ | 04b9 0005 ac68 | h| 04bb 00b7 cbc1 | | 04bd 8e40 0ad7 | @ | 04bf 7000 0000 |p | 04c1 016b 4f00 | kO | 04c3 5a66 |Zf | 04c4 0000 0000 | | .BLANK 0000[0x7] 04cb 000b 6668 | fh| .XXX[0x13] 04cd 0001 6a7a | jz| 04cf 0000 0027 | '| 04d1 62e0 0b6c |b l| 04d3 0800 0000 | | 04d5 00a0 0000 | | 04d7 0000 4599 | E | 04d9 8016 fb20 | | 04db 0000 0001 | | 04dd 6d0a |m | 04de 0000 0000 | | .BLANK 0000[0x8] 04e6 12d3 0005 | | .XXX[0x1d] 04e8 bce0 0000 | | 04ea 0000 4600 | F | 04ec 005b 6040 | [`@| 04ee 0000 0004 | | 04f0 9000 0000 | | 04f2 016e 6384 | nc | 04f4 4800 2df6 |H - | 04f6 4000 0000 |@ | 04f8 02de 0600 | | 04fa 5ce0 20c7 |\ | 04fc 2005 6bb8 | k | 04fe 0000 0000 | | 0500 b79c 002d | -| 0502 b020 | | 0503 0000 0000 | | .BLANK 0000[0x7] 050a 05c2 d800 | | .XXX[0x13] 050c 00b7 3180 | 1 | 050e 0000 13b1 | | 0510 7005 c5a8 |p | 0512 0000 0000 | | 0514 5000 0000 |P | 0516 0022 ccc0 | " | 0518 0b9c d800 | | 051a 0000 00b8 | | 051c 7980 |y | 051d 0000 0000 | | .BLANK 0000[0x7] 0524 0009 6980 | i | .XXX[0x1e] 0526 02e6 4200 | B | 0528 0000 0084 | | 052a 0000 2e2d | .-| 052c 4000 0000 |@ | 052e 0258 0000 | X | 0530 0000 b926 | &| 0532 4224 0017 |B$ | 0534 39b0 0000 |9 | 0536 0001 72ec | r | 0538 002e ed30 | . 0| 053a 6390 02b5 |c | 053c dc00 0000 | | 053e 005c c840 | \ @| 0540 1716 a000 | | 0542 0000 0000 | | .BLANK 0000[0x6] 0548 0002 e93e | >| .XXX[0x13] 054a 0000 5c93 | \ | 054c 0000 0009 | | 054e d8b8 02ea | | 0550 a600 0000 | | 0552 0028 0000 | ( | 0554 0000 1166 | f| 0556 6005 de10 |` | 0558 0000 0000 | | 055a 5d37 |]7 | 055b 0000 0000 | | .BLANK 0000[0x8] 0563 04b4 c001 | | .XXX[0x37] 0565 770a 0000 |w | 0567 0000 4280 | B | 0569 0017 5530 | U0| 056b 0000 0001 | | 056d 3400 0000 |4 | 056f 005d 8d61 | ] a| 0571 1200 0bbc | | 0573 2000 0000 | | 0575 00bb 6a80 | j | 0577 17b5 2831 | (1| 0579 c801 5aee | Z | 057b 0000 0000 | | 057d 2ee1 400b |. @ | 057f aa98 0000 | | 0581 0000 0000 | | 0583 011e 3900 | 9 | 0585 0000 0000 | | 0587 0178 8800 | x | 0589 002e c6a0 | . | 058b 0000 04ec | | 058d 5c01 793c |\ y<| 058f 0000 0000 | | 0591 1400 0000 | | 0593 0008 b330 | 0| 0595 02f6 da00 | | 0597 0000 002f | /| 0599 18a0 | | 059a 0000 0000 | | .BLANK 0000[0x7] 05a1 0002 5a60 | Z`| .XXX[0x1e] 05a3 00bd 7980 | y | 05a5 0000 0021 | !| 05a7 8000 0bc9 | | 05a9 e000 0000 | | 05ab 009e 0000 | | 05ad 0000 2f43 | /C| 05af d089 0005 | | 05b1 edb4 0000 | | 05b3 0000 5eaf | ^ | 05b5 800b f9dc | | 05b7 18e4 00ad | | 05b9 7700 0000 |w | 05bb 0017 af30 | 0| 05bd 05e4 f000 | | 05bf 0000 0000 | | .BLANK 0000[0x7] 05c6 be38 8000 | 8 | .XXX[0x13] 05c8 17a1 e000 | | 05ca 0002 762e | v.| 05cc 00be 9280 | | 05ce 0000 000a | | 05d0 0000 0000 | | 05d2 0459 9801 | Y | 05d4 7f56 0000 | V | 05d6 0000 17ca | | 05d8 e000 | | 05d9 0000 0000 | | .BLANK 0000[0x7] 05e0 012d 3000 | -0 | .XXX[0x20] 05e2 5fb7 0000 |_ | 05e4 0000 10e0 | | 05e6 0005 f494 | | 05e8 0000 0000 | | 05ea 5100 0000 |Q | 05ec 0017 e078 | x| 05ee 4480 02fe |D | 05f0 ac00 0000 | | 05f2 002f d4e0 | / | 05f4 060c 920c | | 05f6 7200 56bb |r V | 05f8 8000 0000 | | 05fa 0bf6 e002 | | 05fc fa4a 0000 | J | 05fe 0000 0000 | |