|
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: 4096 (0x1000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0718 | | .CONST 0x0718 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 029e | | .CONST 0x029e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0029 | ) | .CONST 0x0029 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4809 |H | Short_Literal 0x9 000d 029f 02ab | | Declare_Subprogram INIT_02a8,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 00d8 | | Load_Top At_Offset_0 0011 0266 | f | Execute Discrete,Bounds 0012 00e1 | | Load_Encached Boolean_Cache 0013 02a0 | | Declare_Subprogram Null_Subprogram 0014 4801 |H | Short_Literal 0x1 0015 035e | ^ | Declare_Type Array,Defined,Visible 0016 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 0018 00d9 | | Load_Top At_Offset_1 0019 0336 | 6 | Declare_Variable Array,Visible 001a 00d8 | | Load_Top At_Offset_0 001b 0335 | 5 | Declare_Variable Array,Duplicate 001c 00cd | | Action Spare6_Action 001d 4809 |H | Short_Literal 0x9 001e 4800 |H | Short_Literal 0x0 001f 4801 |H | Short_Literal 0x1 0020 00d9 | | Load_Top At_Offset_1 0021 e211 | | Load 0x1,0x11 0022 01d6 | | Execute Vector,Field_Write 0023 3ffb |? | Loop_Increasing 0x1f 0024 00d9 | | Load_Top At_Offset_1 0025 01d4 | | Execute Vector,Structure_Write 0026 00da | | Load_Top At_Offset_2 0027 0336 | 6 | Declare_Variable Array,Visible 0028 00d8 | | Load_Top At_Offset_0 0029 0335 | 5 | Declare_Variable Array,Duplicate 002a 00cd | | Action Spare6_Action 002b 4801 |H | Short_Literal 0x1 002c 4800 |H | Short_Literal 0x0 002d 00da | | Load_Top At_Offset_2 002e 01d6 | | Execute Vector,Field_Write 002f 4801 |H | Short_Literal 0x1 0030 4801 |H | Short_Literal 0x1 0031 00da | | Load_Top At_Offset_2 0032 01d6 | | Execute Vector,Field_Write 0033 4801 |H | Short_Literal 0x1 0034 4802 |H | Short_Literal 0x2 0035 00da | | Load_Top At_Offset_2 0036 01d6 | | Execute Vector,Field_Write 0037 4801 |H | Short_Literal 0x1 0038 4803 |H | Short_Literal 0x3 0039 00da | | Load_Top At_Offset_2 003a 01d6 | | Execute Vector,Field_Write 003b 4801 |H | Short_Literal 0x1 003c 4804 |H | Short_Literal 0x4 003d 00da | | Load_Top At_Offset_2 003e 01d6 | | Execute Vector,Field_Write 003f 4801 |H | Short_Literal 0x1 0040 4805 |H | Short_Literal 0x5 0041 00da | | Load_Top At_Offset_2 0042 01d6 | | Execute Vector,Field_Write 0043 4800 |H | Short_Literal 0x0 0044 4806 |H | Short_Literal 0x6 0045 00da | | Load_Top At_Offset_2 0046 01d6 | | Execute Vector,Field_Write 0047 4800 |H | Short_Literal 0x0 0048 4807 |H | Short_Literal 0x7 0049 00da | | Load_Top At_Offset_2 004a 01d6 | | Execute Vector,Field_Write 004b 4800 |H | Short_Literal 0x0 004c 4808 |H | Short_Literal 0x8 004d 00da | | Load_Top At_Offset_2 004e 01d6 | | Execute Vector,Field_Write 004f 4800 |H | Short_Literal 0x0 0050 4809 |H | Short_Literal 0x9 0051 00da | | Load_Top At_Offset_2 0052 01d6 | | Execute Vector,Field_Write 0053 00d9 | | Load_Top At_Offset_1 0054 01d4 | | Execute Vector,Structure_Write 0055 00db | | Load_Top At_Offset_3 0056 0336 | 6 | Declare_Variable Array,Visible 0057 00d8 | | Load_Top At_Offset_0 0058 0335 | 5 | Declare_Variable Array,Duplicate 0059 00cd | | Action Spare6_Action 005a 4800 |H | Short_Literal 0x0 005b 4800 |H | Short_Literal 0x0 005c 00da | | Load_Top At_Offset_2 005d 01d6 | | Execute Vector,Field_Write 005e 4800 |H | Short_Literal 0x0 005f 4801 |H | Short_Literal 0x1 0060 00da | | Load_Top At_Offset_2 0061 01d6 | | Execute Vector,Field_Write 0062 4800 |H | Short_Literal 0x0 0063 4802 |H | Short_Literal 0x2 0064 00da | | Load_Top At_Offset_2 0065 01d6 | | Execute Vector,Field_Write 0066 4800 |H | Short_Literal 0x0 0067 4803 |H | Short_Literal 0x3 0068 00da | | Load_Top At_Offset_2 0069 01d6 | | Execute Vector,Field_Write 006a 4800 |H | Short_Literal 0x0 006b 4804 |H | Short_Literal 0x4 006c 00da | | Load_Top At_Offset_2 006d 01d6 | | Execute Vector,Field_Write 006e 4800 |H | Short_Literal 0x0 006f 4805 |H | Short_Literal 0x5 0070 00da | | Load_Top At_Offset_2 0071 01d6 | | Execute Vector,Field_Write 0072 4801 |H | Short_Literal 0x1 0073 4806 |H | Short_Literal 0x6 0074 00da | | Load_Top At_Offset_2 0075 01d6 | | Execute Vector,Field_Write 0076 4800 |H | Short_Literal 0x0 0077 4807 |H | Short_Literal 0x7 0078 00da | | Load_Top At_Offset_2 0079 01d6 | | Execute Vector,Field_Write 007a 4800 |H | Short_Literal 0x0 007b 4808 |H | Short_Literal 0x8 007c 00da | | Load_Top At_Offset_2 007d 01d6 | | Execute Vector,Field_Write 007e 4800 |H | Short_Literal 0x0 007f 4809 |H | Short_Literal 0x9 0080 00da | | Load_Top At_Offset_2 0081 01d6 | | Execute Vector,Field_Write 0082 00d9 | | Load_Top At_Offset_1 0083 01d4 | | Execute Vector,Structure_Write 0084 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0085 0129 | ) | Execute Any,Make_Visible 0086 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 0088 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0089 0129 | ) | Execute Any,Make_Visible 008a 1d0f | | Execute_Immediate Reference_Lex_1,0xf 008b 0129 | ) | Execute Any,Make_Visible 008c 00bf | | Action Accept_Activation 008d e001 | | Load 0x0,0x1 008e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 008f e001 | | Load 0x0,0x1 0090 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0091 e002 | | Load 0x0,0x2 0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0093 02c7 | | Declare_Variable Any 0094 00d8 | | Load_Top At_Offset_0 0095 1c00 | | Execute_Immediate Run_Utility,0x0 0096 e003 | | Load 0x0,0x3 0097 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0098 02c7 | | Declare_Variable Any 0099 00d8 | | Load_Top At_Offset_0 009a 1c00 | | Execute_Immediate Run_Utility,0x0 009b 00e1 | | Load_Encached Boolean_Cache 009c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009d 00e9 | | Load_Encached String_Cache 009e 02a0 | | Declare_Subprogram Null_Subprogram 009f 480d |H | Short_Literal 0xd 00a0 03d3 | | Declare_Type Access,Defined,Accesses_Protected 00a1 622e |b. | Indirect_Literal Discrete,0x2d0,{0x00000000, 0x00001180} 00a2 0aff | | Execute_Immediate Plus,-0x1 00a3 4800 |H | Short_Literal 0x0 00a4 026b | k | Execute Discrete,Maximum 00a5 00d9 | | Load_Top At_Offset_1 00a6 0082 | | QQucode_0x0082 00a7 e20d | | Load 0x1,0xd 00a8 0266 | f | Execute Discrete,Bounds 00a9 00da | | Load_Top At_Offset_2 00aa 02a0 | | Declare_Subprogram Null_Subprogram 00ab 4801 |H | Short_Literal 0x1 00ac 035d | ] | Declare_Type Array,Defined 00ad 00d8 | | Load_Top At_Offset_0 00ae 0337 | 7 | Declare_Variable Array 00af 00d8 | | Load_Top At_Offset_0 00b0 0335 | 5 | Declare_Variable Array,Duplicate 00b1 00cd | | Action Spare6_Action 00b2 0092 05e7 | | Action Push_String_Extended,0x5e7 ; "COMMENTS" 00b4 e21c | | Load 0x1,0x1c 00b5 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00b6 4800 |H | Short_Literal 0x0 00b7 00da | | Load_Top At_Offset_2 00b8 01d6 | | Execute Vector,Field_Write 00b9 0092 05e8 | | Action Push_String_Extended,0x5e8 ; "IOP_DUMP0" 00bb e21c | | Load 0x1,0x1c 00bc 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00bd 4801 |H | Short_Literal 0x1 00be 00da | | Load_Top At_Offset_2 00bf 01d6 | | Execute Vector,Field_Write 00c0 0092 05e9 | | Action Push_String_Extended,0x5e9 ; "IOP_DUMP1" 00c2 e21c | | Load 0x1,0x1c 00c3 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00c4 4802 |H | Short_Literal 0x2 00c5 00da | | Load_Top At_Offset_2 00c6 01d6 | | Execute Vector,Field_Write 00c7 0092 05ea | | Action Push_String_Extended,0x5ea ; "IOP_DUMP2" 00c9 e21c | | Load 0x1,0x1c 00ca 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00cb 4803 |H | Short_Literal 0x3 00cc 00da | | Load_Top At_Offset_2 00cd 01d6 | | Execute Vector,Field_Write 00ce 0092 05eb | | Action Push_String_Extended,0x5eb ; "IOP_DUMP3" 00d0 e21c | | Load 0x1,0x1c 00d1 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00d2 4804 |H | Short_Literal 0x4 00d3 00da | | Load_Top At_Offset_2 00d4 01d6 | | Execute Vector,Field_Write 00d5 0092 05ec | | Action Push_String_Extended,0x5ec ; "IOP_DUMP4" 00d7 e21c | | Load 0x1,0x1c 00d8 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00d9 4805 |H | Short_Literal 0x5 00da 00da | | Load_Top At_Offset_2 00db 01d6 | | Execute Vector,Field_Write 00dc 0092 05ed | | Action Push_String_Extended,0x5ed ; "SAVED_STATE" 00de e21c | | Load 0x1,0x1c 00df 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00e0 4806 |H | Short_Literal 0x6 00e1 00da | | Load_Top At_Offset_2 00e2 01d6 | | Execute Vector,Field_Write 00e3 0092 05ee | | Action Push_String_Extended,0x5ee ; "REGISTERS" 00e5 e21c | | Load 0x1,0x1c 00e6 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00e7 4807 |H | Short_Literal 0x7 00e8 00da | | Load_Top At_Offset_2 00e9 01d6 | | Execute Vector,Field_Write 00ea 0092 05ef | | Action Push_String_Extended,0x5ef ; "TAG_STORE" 00ec e21c | | Load 0x1,0x1c 00ed 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00ee 4808 |H | Short_Literal 0x8 00ef 00da | | Load_Top At_Offset_2 00f0 01d6 | | Execute Vector,Field_Write 00f1 0092 05f0 | | Action Push_String_Extended,0x5f0 ; "MEMORY" 00f3 e21c | | Load 0x1,0x1c 00f4 03b6 | | Declare_Variable Access,By_Allocation,With_Value 00f5 4809 |H | Short_Literal 0x9 00f6 00da | | Load_Top At_Offset_2 00f7 01d6 | | Execute Vector,Field_Write 00f8 00d9 | | Load_Top At_Offset_1 00f9 01d4 | | Execute Vector,Structure_Write 00fa e20d | | Load 0x1,0xd 00fb 0266 | f | Execute Discrete,Bounds 00fc 00e1 | | Load_Encached Boolean_Cache 00fd 02a0 | | Declare_Subprogram Null_Subprogram 00fe 4801 |H | Short_Literal 0x1 00ff 035d | ] | Declare_Type Array,Defined 0100 00d8 | | Load_Top At_Offset_0 0101 0337 | 7 | Declare_Variable Array 0102 00d8 | | Load_Top At_Offset_0 0103 0335 | 5 | Declare_Variable Array,Duplicate 0104 00cd | | Action Spare6_Action 0105 4800 |H | Short_Literal 0x0 0106 4800 |H | Short_Literal 0x0 0107 00da | | Load_Top At_Offset_2 0108 01d6 | | Execute Vector,Field_Write 0109 4801 |H | Short_Literal 0x1 010a 4801 |H | Short_Literal 0x1 010b 00da | | Load_Top At_Offset_2 010c 01d6 | | Execute Vector,Field_Write 010d 4800 |H | Short_Literal 0x0 010e 4802 |H | Short_Literal 0x2 010f 00da | | Load_Top At_Offset_2 0110 01d6 | | Execute Vector,Field_Write 0111 4800 |H | Short_Literal 0x0 0112 4803 |H | Short_Literal 0x3 0113 00da | | Load_Top At_Offset_2 0114 01d6 | | Execute Vector,Field_Write 0115 4801 |H | Short_Literal 0x1 0116 4804 |H | Short_Literal 0x4 0117 00da | | Load_Top At_Offset_2 0118 01d6 | | Execute Vector,Field_Write 0119 4801 |H | Short_Literal 0x1 011a 4805 |H | Short_Literal 0x5 011b 00da | | Load_Top At_Offset_2 011c 01d6 | | Execute Vector,Field_Write 011d 4800 |H | Short_Literal 0x0 011e 4806 |H | Short_Literal 0x6 011f 00da | | Load_Top At_Offset_2 0120 01d6 | | Execute Vector,Field_Write 0121 4800 |H | Short_Literal 0x0 0122 4807 |H | Short_Literal 0x7 0123 00da | | Load_Top At_Offset_2 0124 01d6 | | Execute Vector,Field_Write 0125 4800 |H | Short_Literal 0x0 0126 4808 |H | Short_Literal 0x8 0127 00da | | Load_Top At_Offset_2 0128 01d6 | | Execute Vector,Field_Write 0129 4800 |H | Short_Literal 0x0 012a 4809 |H | Short_Literal 0x9 012b 00da | | Load_Top At_Offset_2 012c 01d6 | | Execute Vector,Field_Write 012d 00d9 | | Load_Top At_Offset_1 012e 01d4 | | Execute Vector,Structure_Write 012f 0092 05f1 | | Action Push_String_Extended,0x5f1 ; "LABELS" 0131 4801 |H | Short_Literal 0x1 0132 4850 |HP | Short_Literal 0x50 0133 e218 | | Load 0x1,0x18 0134 035b | [ | Declare_Type Array,Constrained 0135 4801 |H | Short_Literal 0x1 0136 4851 |HQ | Short_Literal 0x51 0137 e218 | | Load 0x1,0x18 0138 035b | [ | Declare_Type Array,Constrained 0139 4801 |H | Short_Literal 0x1 013a 4850 |HP | Short_Literal 0x50 013b 00e9 | | Load_Encached String_Cache 013c 035b | [ | Declare_Type Array,Constrained 013d 0337 | 7 | Declare_Variable Array 013e 00d8 | | Load_Top At_Offset_0 013f 0335 | 5 | Declare_Variable Array,Duplicate 0140 00cd | | Action Spare6_Action 0141 482a |H* | Short_Literal 0x2a 0142 4801 |H | Short_Literal 0x1 0143 00da | | Load_Top At_Offset_2 0144 01d6 | | Execute Vector,Field_Write 0145 482a |H* | Short_Literal 0x2a 0146 4802 |H | Short_Literal 0x2 0147 00da | | Load_Top At_Offset_2 0148 01d6 | | Execute Vector,Field_Write 0149 482a |H* | Short_Literal 0x2a 014a 4803 |H | Short_Literal 0x3 014b 00da | | Load_Top At_Offset_2 014c 01d6 | | Execute Vector,Field_Write 014d 484d |HM | Short_Literal 0x4d 014e 4804 |H | Short_Literal 0x4 014f 00da | | Load_Top At_Offset_2 0150 01d6 | | Execute Vector,Field_Write 0151 4841 |HA | Short_Literal 0x41 0152 4805 |H | Short_Literal 0x5 0153 00da | | Load_Top At_Offset_2 0154 01d6 | | Execute Vector,Field_Write 0155 4852 |HR | Short_Literal 0x52 0156 4806 |H | Short_Literal 0x6 0157 00da | | Load_Top At_Offset_2 0158 01d6 | | Execute Vector,Field_Write 0159 484b |HK | Short_Literal 0x4b 015a 4807 |H | Short_Literal 0x7 015b 00da | | Load_Top At_Offset_2 015c 01d6 | | Execute Vector,Field_Write 015d 482a |H* | Short_Literal 0x2a 015e 4808 |H | Short_Literal 0x8 015f 00da | | Load_Top At_Offset_2 0160 01d6 | | Execute Vector,Field_Write 0161 482a |H* | Short_Literal 0x2a 0162 4809 |H | Short_Literal 0x9 0163 00da | | Load_Top At_Offset_2 0164 01d6 | | Execute Vector,Field_Write 0165 482a |H* | Short_Literal 0x2a 0166 480a |H | Short_Literal 0xa 0167 00da | | Load_Top At_Offset_2 0168 01d6 | | Execute Vector,Field_Write 0169 4820 |H | Short_Literal 0x20 016a 480b |H | Short_Literal 0xb 016b 00da | | Load_Top At_Offset_2 016c 01d6 | | Execute Vector,Field_Write 016d 4820 |H | Short_Literal 0x20 016e 480c |H | Short_Literal 0xc 016f 00da | | Load_Top At_Offset_2 0170 01d6 | | Execute Vector,Field_Write 0171 4820 |H | Short_Literal 0x20 0172 480d |H | Short_Literal 0xd 0173 00da | | Load_Top At_Offset_2 0174 01d6 | | Execute Vector,Field_Write 0175 4820 |H | Short_Literal 0x20 0176 480e |H | Short_Literal 0xe 0177 00da | | Load_Top At_Offset_2 0178 01d6 | | Execute Vector,Field_Write 0179 4820 |H | Short_Literal 0x20 017a 480f |H | Short_Literal 0xf 017b 00da | | Load_Top At_Offset_2 017c 01d6 | | Execute Vector,Field_Write 017d 4820 |H | Short_Literal 0x20 017e 4810 |H | Short_Literal 0x10 017f 00da | | Load_Top At_Offset_2 0180 01d6 | | Execute Vector,Field_Write 0181 4820 |H | Short_Literal 0x20 0182 4811 |H | Short_Literal 0x11 0183 00da | | Load_Top At_Offset_2 0184 01d6 | | Execute Vector,Field_Write 0185 4820 |H | Short_Literal 0x20 0186 4812 |H | Short_Literal 0x12 0187 00da | | Load_Top At_Offset_2 0188 01d6 | | Execute Vector,Field_Write 0189 4820 |H | Short_Literal 0x20 018a 4813 |H | Short_Literal 0x13 018b 00da | | Load_Top At_Offset_2 018c 01d6 | | Execute Vector,Field_Write 018d 4820 |H | Short_Literal 0x20 018e 4814 |H | Short_Literal 0x14 018f 00da | | Load_Top At_Offset_2 0190 01d6 | | Execute Vector,Field_Write 0191 4820 |H | Short_Literal 0x20 0192 4815 |H | Short_Literal 0x15 0193 00da | | Load_Top At_Offset_2 0194 01d6 | | Execute Vector,Field_Write 0195 4820 |H | Short_Literal 0x20 0196 4816 |H | Short_Literal 0x16 0197 00da | | Load_Top At_Offset_2 0198 01d6 | | Execute Vector,Field_Write 0199 4820 |H | Short_Literal 0x20 019a 4817 |H | Short_Literal 0x17 019b 00da | | Load_Top At_Offset_2 019c 01d6 | | Execute Vector,Field_Write 019d 4820 |H | Short_Literal 0x20 019e 4818 |H | Short_Literal 0x18 019f 00da | | Load_Top At_Offset_2 01a0 01d6 | | Execute Vector,Field_Write 01a1 4820 |H | Short_Literal 0x20 01a2 4819 |H | Short_Literal 0x19 01a3 00da | | Load_Top At_Offset_2 01a4 01d6 | | Execute Vector,Field_Write 01a5 4820 |H | Short_Literal 0x20 01a6 481a |H | Short_Literal 0x1a 01a7 00da | | Load_Top At_Offset_2 01a8 01d6 | | Execute Vector,Field_Write 01a9 4820 |H | Short_Literal 0x20 01aa 481b |H | Short_Literal 0x1b 01ab 00da | | Load_Top At_Offset_2 01ac 01d6 | | Execute Vector,Field_Write 01ad 4820 |H | Short_Literal 0x20 01ae 481c |H | Short_Literal 0x1c 01af 00da | | Load_Top At_Offset_2 01b0 01d6 | | Execute Vector,Field_Write 01b1 4820 |H | Short_Literal 0x20 01b2 481d |H | Short_Literal 0x1d 01b3 00da | | Load_Top At_Offset_2 01b4 01d6 | | Execute Vector,Field_Write 01b5 4820 |H | Short_Literal 0x20 01b6 481e |H | Short_Literal 0x1e 01b7 00da | | Load_Top At_Offset_2 01b8 01d6 | | Execute Vector,Field_Write 01b9 4820 |H | Short_Literal 0x20 01ba 481f |H | Short_Literal 0x1f 01bb 00da | | Load_Top At_Offset_2 01bc 01d6 | | Execute Vector,Field_Write 01bd 4820 |H | Short_Literal 0x20 01be 4820 |H | Short_Literal 0x20 01bf 00da | | Load_Top At_Offset_2 01c0 01d6 | | Execute Vector,Field_Write 01c1 4820 |H | Short_Literal 0x20 01c2 4821 |H! | Short_Literal 0x21 01c3 00da | | Load_Top At_Offset_2 01c4 01d6 | | Execute Vector,Field_Write 01c5 4820 |H | Short_Literal 0x20 01c6 4822 |H" | Short_Literal 0x22 01c7 00da | | Load_Top At_Offset_2 01c8 01d6 | | Execute Vector,Field_Write 01c9 4820 |H | Short_Literal 0x20 01ca 4823 |H# | Short_Literal 0x23 01cb 00da | | Load_Top At_Offset_2 01cc 01d6 | | Execute Vector,Field_Write 01cd 4820 |H | Short_Literal 0x20 01ce 4824 |H$ | Short_Literal 0x24 01cf 00da | | Load_Top At_Offset_2 01d0 01d6 | | Execute Vector,Field_Write 01d1 4820 |H | Short_Literal 0x20 01d2 4825 |H% | Short_Literal 0x25 01d3 00da | | Load_Top At_Offset_2 01d4 01d6 | | Execute Vector,Field_Write 01d5 4820 |H | Short_Literal 0x20 01d6 4826 |H& | Short_Literal 0x26 01d7 00da | | Load_Top At_Offset_2 01d8 01d6 | | Execute Vector,Field_Write 01d9 4820 |H | Short_Literal 0x20 01da 4827 |H' | Short_Literal 0x27 01db 00da | | Load_Top At_Offset_2 01dc 01d6 | | Execute Vector,Field_Write 01dd 4820 |H | Short_Literal 0x20 01de 4828 |H( | Short_Literal 0x28 01df 00da | | Load_Top At_Offset_2 01e0 01d6 | | Execute Vector,Field_Write 01e1 4820 |H | Short_Literal 0x20 01e2 4829 |H) | Short_Literal 0x29 01e3 00da | | Load_Top At_Offset_2 01e4 01d6 | | Execute Vector,Field_Write 01e5 4820 |H | Short_Literal 0x20 01e6 482a |H* | Short_Literal 0x2a 01e7 00da | | Load_Top At_Offset_2 01e8 01d6 | | Execute Vector,Field_Write 01e9 4820 |H | Short_Literal 0x20 01ea 482b |H+ | Short_Literal 0x2b 01eb 00da | | Load_Top At_Offset_2 01ec 01d6 | | Execute Vector,Field_Write 01ed 4820 |H | Short_Literal 0x20 01ee 482c |H, | Short_Literal 0x2c 01ef 00da | | Load_Top At_Offset_2 01f0 01d6 | | Execute Vector,Field_Write 01f1 4820 |H | Short_Literal 0x20 01f2 482d |H- | Short_Literal 0x2d 01f3 00da | | Load_Top At_Offset_2 01f4 01d6 | | Execute Vector,Field_Write 01f5 4820 |H | Short_Literal 0x20 01f6 482e |H. | Short_Literal 0x2e 01f7 00da | | Load_Top At_Offset_2 01f8 01d6 | | Execute Vector,Field_Write 01f9 4820 |H | Short_Literal 0x20 01fa 482f |H/ | Short_Literal 0x2f 01fb 00da | | Load_Top At_Offset_2 01fc 01d6 | | Execute Vector,Field_Write 01fd 4820 |H | Short_Literal 0x20 01fe 4830 |H0 | Short_Literal 0x30 01ff 00da | | Load_Top At_Offset_2 0200 01d6 | | Execute Vector,Field_Write 0201 4820 |H | Short_Literal 0x20 0202 4831 |H1 | Short_Literal 0x31 0203 00da | | Load_Top At_Offset_2 0204 01d6 | | Execute Vector,Field_Write 0205 4820 |H | Short_Literal 0x20 0206 4832 |H2 | Short_Literal 0x32 0207 00da | | Load_Top At_Offset_2 0208 01d6 | | Execute Vector,Field_Write 0209 4820 |H | Short_Literal 0x20 020a 4833 |H3 | Short_Literal 0x33 020b 00da | | Load_Top At_Offset_2 020c 01d6 | | Execute Vector,Field_Write 020d 4820 |H | Short_Literal 0x20 020e 4834 |H4 | Short_Literal 0x34 020f 00da | | Load_Top At_Offset_2 0210 01d6 | | Execute Vector,Field_Write 0211 4820 |H | Short_Literal 0x20 0212 4835 |H5 | Short_Literal 0x35 0213 00da | | Load_Top At_Offset_2 0214 01d6 | | Execute Vector,Field_Write 0215 4820 |H | Short_Literal 0x20 0216 4836 |H6 | Short_Literal 0x36 0217 00da | | Load_Top At_Offset_2 0218 01d6 | | Execute Vector,Field_Write 0219 4820 |H | Short_Literal 0x20 021a 4837 |H7 | Short_Literal 0x37 021b 00da | | Load_Top At_Offset_2 021c 01d6 | | Execute Vector,Field_Write 021d 4820 |H | Short_Literal 0x20 021e 4838 |H8 | Short_Literal 0x38 021f 00da | | Load_Top At_Offset_2 0220 01d6 | | Execute Vector,Field_Write 0221 4820 |H | Short_Literal 0x20 0222 4839 |H9 | Short_Literal 0x39 0223 00da | | Load_Top At_Offset_2 0224 01d6 | | Execute Vector,Field_Write 0225 4820 |H | Short_Literal 0x20 0226 483a |H: | Short_Literal 0x3a 0227 00da | | Load_Top At_Offset_2 0228 01d6 | | Execute Vector,Field_Write 0229 4820 |H | Short_Literal 0x20 022a 483b |H; | Short_Literal 0x3b 022b 00da | | Load_Top At_Offset_2 022c 01d6 | | Execute Vector,Field_Write 022d 4820 |H | Short_Literal 0x20 022e 483c |H< | Short_Literal 0x3c 022f 00da | | Load_Top At_Offset_2 0230 01d6 | | Execute Vector,Field_Write 0231 4820 |H | Short_Literal 0x20 0232 483d |H= | Short_Literal 0x3d 0233 00da | | Load_Top At_Offset_2 0234 01d6 | | Execute Vector,Field_Write 0235 4820 |H | Short_Literal 0x20 0236 483e |H> | Short_Literal 0x3e 0237 00da | | Load_Top At_Offset_2 0238 01d6 | | Execute Vector,Field_Write 0239 4820 |H | Short_Literal 0x20 023a 483f |H? | Short_Literal 0x3f 023b 00da | | Load_Top At_Offset_2 023c 01d6 | | Execute Vector,Field_Write 023d 4820 |H | Short_Literal 0x20 023e 4840 |H@ | Short_Literal 0x40 023f 00da | | Load_Top At_Offset_2 0240 01d6 | | Execute Vector,Field_Write 0241 4820 |H | Short_Literal 0x20 0242 4841 |HA | Short_Literal 0x41 0243 00da | | Load_Top At_Offset_2 0244 01d6 | | Execute Vector,Field_Write 0245 4820 |H | Short_Literal 0x20 0246 4842 |HB | Short_Literal 0x42 0247 00da | | Load_Top At_Offset_2 0248 01d6 | | Execute Vector,Field_Write 0249 4820 |H | Short_Literal 0x20 024a 4843 |HC | Short_Literal 0x43 024b 00da | | Load_Top At_Offset_2 024c 01d6 | | Execute Vector,Field_Write 024d 4820 |H | Short_Literal 0x20 024e 4844 |HD | Short_Literal 0x44 024f 00da | | Load_Top At_Offset_2 0250 01d6 | | Execute Vector,Field_Write 0251 4820 |H | Short_Literal 0x20 0252 4845 |HE | Short_Literal 0x45 0253 00da | | Load_Top At_Offset_2 0254 01d6 | | Execute Vector,Field_Write 0255 4820 |H | Short_Literal 0x20 0256 4846 |HF | Short_Literal 0x46 0257 00da | | Load_Top At_Offset_2 0258 01d6 | | Execute Vector,Field_Write 0259 4820 |H | Short_Literal 0x20 025a 4847 |HG | Short_Literal 0x47 025b 00da | | Load_Top At_Offset_2 025c 01d6 | | Execute Vector,Field_Write 025d 4820 |H | Short_Literal 0x20 025e 4848 |HH | Short_Literal 0x48 025f 00da | | Load_Top At_Offset_2 0260 01d6 | | Execute Vector,Field_Write 0261 4820 |H | Short_Literal 0x20 0262 4849 |HI | Short_Literal 0x49 0263 00da | | Load_Top At_Offset_2 0264 01d6 | | Execute Vector,Field_Write 0265 4820 |H | Short_Literal 0x20 0266 484a |HJ | Short_Literal 0x4a 0267 00da | | Load_Top At_Offset_2 0268 01d6 | | Execute Vector,Field_Write 0269 4820 |H | Short_Literal 0x20 026a 484b |HK | Short_Literal 0x4b 026b 00da | | Load_Top At_Offset_2 026c 01d6 | | Execute Vector,Field_Write 026d 4820 |H | Short_Literal 0x20 026e 484c |HL | Short_Literal 0x4c 026f 00da | | Load_Top At_Offset_2 0270 01d6 | | Execute Vector,Field_Write 0271 4820 |H | Short_Literal 0x20 0272 484d |HM | Short_Literal 0x4d 0273 00da | | Load_Top At_Offset_2 0274 01d6 | | Execute Vector,Field_Write 0275 4820 |H | Short_Literal 0x20 0276 484e |HN | Short_Literal 0x4e 0277 00da | | Load_Top At_Offset_2 0278 01d6 | | Execute Vector,Field_Write 0279 4820 |H | Short_Literal 0x20 027a 484f |HO | Short_Literal 0x4f 027b 00da | | Load_Top At_Offset_2 027c 01d6 | | Execute Vector,Field_Write 027d 4820 |H | Short_Literal 0x20 027e 4850 |HP | Short_Literal 0x50 027f 00da | | Load_Top At_Offset_2 0280 01d6 | | Execute Vector,Field_Write 0281 00d9 | | Load_Top At_Offset_1 0282 01d4 | | Execute Vector,Structure_Write 0283 00da | | Load_Top At_Offset_2 0284 0337 | 7 | Declare_Variable Array 0285 00d9 | | Load_Top At_Offset_1 0286 e004 | | Load 0x0,0x4 0287 180e | | Execute Package,Field_Execute,Field_Number 0xe 0288 00d9 | | Load_Top At_Offset_1 0289 01d4 | | Execute Vector,Structure_Write 028a e005 | | Load 0x0,0x5 028b e006 | | Load 0x0,0x6 028c e223 | # | Load 0x1,0x23 028d e002 | | Load 0x0,0x2 028e 1b19 | | Execute Package,Field_Read,Field_Number 0x19 028f 0387 | | Declare_Variable Package 0290 00d8 | | Load_Top At_Offset_0 0291 020f | | Execute Module,Activate 0292 029d 031b | | Declare_Subprogram INIT_0318,For_Outer_Call 0294 029d 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call 0296 029b 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Unelaborated 0298 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0299 00c7 | | Action Elaborate_Subprogram 029a 1d0f | | Execute_Immediate Reference_Lex_1,0xf 029b 00c7 | | Action Elaborate_Subprogram 029c 1d14 | | Execute_Immediate Reference_Lex_1,0x14 029d 00c7 | | Action Elaborate_Subprogram 029e BODY_0008: 029e 00be | | Action Activate_Tasks 029f 00bc | | Action Signal_Activated 02a0 00bb | | Action Signal_Completion 02a1 0000 0000 | | .BLANK 0000[0x7] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 4607 |F | Jump_Case 0x8 02ac 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02ad 7806 |x | Jump 0x2b4 ; case 0x1 02ae 7809 |x | Jump 0x2b8 ; case 0x2 02af 780d |x | Jump 0x2bd ; case 0x3 02b0 7810 |x | Jump 0x2c1 ; case 0x4 02b1 7811 |x | Jump 0x2c3 ; case 0x5 02b2 7812 |x | Jump 0x2c5 ; case 0x6 02b3 7815 |x | Jump 0x2c9 ; case 0x7 02b4 00da | | Load_Top At_Offset_2 02b5 0091 05e7 | | Action Push_String_Extended_Indexed,0x5e7 ; "COMMENTS" 02b7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02b8 00db | | Load_Top At_Offset_3 02b9 00db | | Load_Top At_Offset_3 02ba 00e0 | | Load_Encached Standard_Cache 02bb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02bd 00da | | Load_Top At_Offset_2 02be 00e0 | | Load_Encached Standard_Cache 02bf 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02c1 00db | | Load_Top At_Offset_3 02c2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c3 00db | | Load_Top At_Offset_3 02c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c5 e20d | | Load 0x1,0xd 02c6 00dc | | Load_Top At_Offset_4 02c7 0267 | g | Execute Discrete,Predecessor 02c8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c9 e20d | | Load 0x1,0xd 02ca 00dc | | Load_Top At_Offset_4 02cb 0268 | h | Execute Discrete,Successor 02cc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02cd 0000 0000 | | .XXX[0x3] 02cf 0000 | | 02d0 0000 0000 | | .LITERAL {0x00000000, 0x00001180} 02d4 0000 0000 | | .BLANK 0000[0x4] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02e6 | | .CONST 0x02e6 ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0006 | | .CONST 0x0006 ; Number of locals 02db INIT_02d8: 02db 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call 02dd 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 02de 00c6 | | Action Check_Subprogram_Elaborated 02df 4802 |H | Short_Literal 0x2 02e0 4802 |H | Short_Literal 0x2 02e1 0099 | | Action Reference_Dynamic 02e2 e007 | | Load 0x0,0x7 02e3 e008 | | Load 0x0,0x8 02e4 4806 |H | Short_Literal 0x6 02e5 0007 | | Action Break_Optional 02e6 BODY_02d8: 02e6 e5fb | | Load 0x2,-0x5 02e7 e5fc | | Load 0x2,-0x4 02e8 e5fd | | Load 0x2,-0x3 02e9 e5fe | | Load 0x2,-0x2 02ea 4800 |H | Short_Literal 0x0 02eb e5ff | | Load 0x2,-0x1 02ec 4803 |H | Short_Literal 0x3 02ed 4802 |H | Short_Literal 0x2 02ee 0099 | | Action Reference_Dynamic 02ef 4804 |H | Short_Literal 0x4 02f0 4802 |H | Short_Literal 0x2 02f1 0099 | | Action Reference_Dynamic 02f2 8229 | ) | Call 0x1,0x29 02f3 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02f4 0000 0000 | | .BLANK 0000[0x4] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 0304 | | .CONST 0x0304 ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0005 | | .CONST 0x0005 ; Number of locals 02fb INIT_02f8: 02fb 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 02fc 00c6 | | Action Check_Subprogram_Elaborated 02fd 4ffe |O | Short_Literal -0x2 02fe 4802 |H | Short_Literal 0x2 02ff 0099 | | Action Reference_Dynamic 0300 e009 | | Load 0x0,0x9 0301 e00a | | Load 0x0,0xa 0302 4805 |H | Short_Literal 0x5 0303 0007 | | Action Break_Optional 0304 BODY_02f8: 0304 e5f9 | | Load 0x2,-0x7 0305 e5fa | | Load 0x2,-0x6 0306 e5fb | | Load 0x2,-0x5 0307 e5fc | | Load 0x2,-0x4 0308 4800 |H | Short_Literal 0x0 0309 e5fd | | Load 0x2,-0x3 030a 4802 |H | Short_Literal 0x2 030b 4802 |H | Short_Literal 0x2 030c 0099 | | Action Reference_Dynamic 030d 4803 |H | Short_Literal 0x3 030e 4802 |H | Short_Literal 0x2 030f 0099 | | Action Reference_Dynamic 0310 8229 | ) | Call 0x1,0x29 0311 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0312 0000 0000 | | .BLANK 0000[0x6] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 0320 | | .CONST 0x0320 ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0002 | | .CONST 0x0002 ; Number of locals 031b INIT_0318: 031b e222 | " | Load 0x1,0x22 031c 01da | | Execute Vector,Bounds 031d 00e9 | | Load_Encached String_Cache 031e 035b | [ | Declare_Type Array,Constrained 031f 0337 | 7 | Declare_Variable Array 0320 BODY_0318: 0320 00d8 | | Load_Top At_Offset_0 0321 4801 |H | Short_Literal 0x1 0322 4803 |H | Short_Literal 0x3 0323 00da | | Load_Top At_Offset_2 0324 035b | [ | Declare_Type Array,Constrained 0325 00d9 | | Load_Top At_Offset_1 0326 01cd | | Execute Vector,Slice_Reference 0327 4801 |H | Short_Literal 0x1 0328 4803 |H | Short_Literal 0x3 0329 00e9 | | Load_Encached String_Cache 032a 035b | [ | Declare_Type Array,Constrained 032b 0337 | 7 | Declare_Variable Array 032c 482a |H* | Short_Literal 0x2a 032d 4801 |H | Short_Literal 0x1 032e 00da | | Load_Top At_Offset_2 032f 01d6 | | Execute Vector,Field_Write 0330 482a |H* | Short_Literal 0x2a 0331 4802 |H | Short_Literal 0x2 0332 00da | | Load_Top At_Offset_2 0333 01d6 | | Execute Vector,Field_Write 0334 482a |H* | Short_Literal 0x2a 0335 4803 |H | Short_Literal 0x3 0336 00da | | Load_Top At_Offset_2 0337 01d6 | | Execute Vector,Field_Write 0338 00cd | | Action Spare6_Action 0339 4801 |H | Short_Literal 0x1 033a 4803 |H | Short_Literal 0x3 033b 00db | | Load_Top At_Offset_3 033c 01ce | | Execute Vector,Slice_Write 033d 00d1 | | Pop_Control Pop_Count_1 033e 00db | | Load_Top At_Offset_3 033f 01db | | Execute Vector,Length 0340 0d4e | N | Execute_Immediate Less,0x4e 0341 6819 |h | Jump_Zero 0x35b 0342 00db | | Load_Top At_Offset_3 0343 4801 |H | Short_Literal 0x1 0344 484d |HM | Short_Literal 0x4d 0345 e5ff | | Load 0x2,-0x1 0346 01db | | Execute Vector,Length 0347 0272 | r | Execute Discrete,Minus 0348 00e9 | | Load_Encached String_Cache 0349 035b | [ | Declare_Type Array,Constrained 034a 0337 | 7 | Declare_Variable Array 034b 00d8 | | Load_Top At_Offset_0 034c 01dc | | Execute Vector,Last 034d 4801 |H | Short_Literal 0x1 034e 0263 | c | Execute Discrete,Above_Bound 034f 7005 |p | Jump_Nonzero 0x355 0350 4820 |H | Short_Literal 0x20 0351 00d9 | | Load_Top At_Offset_1 0352 e404 | | Load 0x2,0x4 0353 01d6 | | Execute Vector,Field_Write 0354 3ffb |? | Loop_Increasing 0x350 0355 01cc | | Execute Vector,Catenate 0356 4804 |H | Short_Literal 0x4 0357 4850 |HP | Short_Literal 0x50 0358 00db | | Load_Top At_Offset_3 0359 01ce | | Execute Vector,Slice_Write 035a 7811 |x | Jump 0x36c 035b 00db | | Load_Top At_Offset_3 035c 01dd | | Execute Vector,First 035d e5ff | | Load 0x2,-0x1 035e 01dd | | Execute Vector,First 035f 0a4f | O | Execute_Immediate Plus,0x4f 0360 0afd | | Execute_Immediate Plus,-0x3 0361 00d8 | | Load_Top At_Offset_0 0362 00e2 | | Load_Encached Integer_Cache 0363 0260 | ` | Execute Discrete,In_Type 0364 7001 |p | Jump_Nonzero 0x366 0365 0801 | | Execute_Immediate Raise,0x1 0366 e5ff | | Load 0x2,-0x1 0367 01cf | | Execute Vector,Slice_Read 0368 4804 |H | Short_Literal 0x4 0369 4850 |HP | Short_Literal 0x50 036a 00db | | Load_Top At_Offset_3 036b 01ce | | Execute Vector,Slice_Write 036c 00d8 | | Load_Top At_Offset_0 036d e004 | | Load 0x0,0x4 036e 180e | | Execute Package,Field_Execute,Field_Number 0xe 036f e222 | " | Load 0x1,0x22 0370 01c6 | | Execute Vector,Convert_To_Formal 0371 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0372 0000 0000 | | .BLANK 0000[0x6] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 037b | { | .CONST 0x037b ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0001 | | .CONST 0x0001 ; Number of locals 037b BODY_0378: 037b INIT_0378: 037b 480a |H | Short_Literal 0xa 037c 00db | | Load_Top At_Offset_3 037d 01cb | | Execute Vector,Append 037e e223 | # | Load 0x1,0x23 037f 01c3 | | Execute Vector,Check_In_Type 0380 e219 | | Load 0x1,0x19 0381 e226 | & | Load 0x1,0x26 0382 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0383 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0384 0000 0000 | | .BLANK 0000[0x4] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 03a7 | | .CONST 0x03a7 ; Address of begin 0389 03da | | .CONST 0x03da ; Address of exception handler 038a 000b | | .CONST 0x000b ; Number of locals 038b INIT_0388: 038b 4801 |H | Short_Literal 0x1 038c e5f8 | | Load 0x2,-0x8 038d e218 | | Load 0x1,0x18 038e 035b | [ | Declare_Type Array,Constrained 038f e00b | | Load 0x0,0xb 0390 e00c | | Load 0x0,0xc 0391 00da | | Load_Top At_Offset_2 0392 e002 | | Load 0x0,0x2 0393 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0394 0387 | | Declare_Variable Package 0395 00d8 | | Load_Top At_Offset_0 0396 020f | | Execute Module,Activate 0397 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call 0399 029f 041b | | Declare_Subprogram INIT_0418,For_Call 039b 029f 0433 | 3| Declare_Subprogram INIT_0430,For_Call 039d 029f 046b | k| Declare_Subprogram INIT_0468,For_Call 039f 029f 04bb | | Declare_Subprogram INIT_04b8,For_Call 03a1 029f 0523 | #| Declare_Subprogram INIT_0520,For_Call 03a3 029f 0563 | c| Declare_Subprogram INIT_0560,For_Call 03a5 029f 058b | | Declare_Subprogram INIT_0588,For_Call 03a7 BODY_0388: 03a7 8409 | | Call 0x2,0x9 03a8 00cf | | Action Mark_Auxiliary 03a9 e20d | | Load 0x1,0xd 03aa 0265 | e | Execute Discrete,Reverse_Bounds 03ab 0007 | | Action Break_Optional 03ac 00d8 | | Load_Top At_Offset_0 03ad 840b | | Call 0x2,0xb 03ae 7002 |p | Jump_Nonzero 0x3b1 03af 00d2 | | Pop_Control Pop_Count_2 03b0 7826 |x& | Jump 0x3d7 03b1 e21b | | Load 0x1,0x1b 03b2 00d9 | | Load_Top At_Offset_1 03b3 e220 | | Load 0x1,0x20 03b4 01d7 | | Execute Vector,Field_Read 03b5 0f00 | | Execute_Immediate Equal,0x0 03b6 0278 | x | Execute Discrete,Or 03b7 681d |h | Jump_Zero 0x3d5 03b8 00d8 | | Load_Top At_Offset_0 03b9 e5fb | | Load 0x2,-0x5 03ba 01d7 | | Execute Vector,Field_Read 03bb 6814 |h | Jump_Zero 0x3d0 03bc 00d8 | | Load_Top At_Offset_0 03bd 85fe | | Call 0x2,-0x2 03be 7002 |p | Jump_Nonzero 0x3c1 03bf 00d2 | | Pop_Control Pop_Count_2 03c0 7816 |x | Jump 0x3d7 03c1 6022 |`" | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x7fffffff} 03c2 8406 | | Call 0x2,0x6 03c3 00d8 | | Load_Top At_Offset_0 03c4 e21e | | Load 0x1,0x1e 03c5 01d7 | | Execute Vector,Field_Read 03c6 0227 | ' | Execute Access,All_Reference 03c7 8408 | | Call 0x2,0x8 03c8 601b |` | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x7fffffff} 03c9 8406 | | Call 0x2,0x6 03ca 00d8 | | Load_Top At_Offset_0 03cb 0f09 | | Execute_Immediate Equal,0x9 03cc 6808 |h | Jump_Zero 0x3d5 03cd 6016 |` | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x7fffffff} 03ce 8406 | | Call 0x2,0x6 03cf 7805 |x | Jump 0x3d5 03d0 00d8 | | Load_Top At_Offset_0 03d1 e21e | | Load 0x1,0x1e 03d2 01d7 | | Execute Vector,Field_Read 03d3 0227 | ' | Execute Access,All_Reference 03d4 8407 | | Call 0x2,0x7 03d5 00c8 | | Action Pop_Auxiliary_Range 03d6 3fd5 |? | Loop_Increasing 0x3ac 03d7 00ce | | Action Pop_Auxiliary 03d8 840a | | Call 0x2,0xa 03d9 4509 |E | Exit_Suprogram New_Top_Offset 0x9 03da TRAP_0388: 03da 0007 | | Action Break_Optional 03db e219 | | Load 0x1,0x19 03dc e002 | | Load 0x0,0x2 03dd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03de c219 | | Store 0x1,0x19 03df 00d8 | | Load_Top At_Offset_0 03e0 0101 | | Execute Exception,Reraise 03e1 0000 0000 | | .XXX[0x3] 03e3 0000 | | 03e4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03eb | | .CONST 0x03eb ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0001 | | .CONST 0x0001 ; Number of locals 03eb BODY_03e8: 03eb INIT_03e8: 03eb 4801 |H | Short_Literal 0x1 03ec 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ed 0000 0000 | | .XXX[0x3] 03ef 0000 | | 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0405 | | .CONST 0x0405 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 00d8 | | Load_Top At_Offset_0 03f5 e00d | | Load 0x0,0xd 03f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03f7 0260 | ` | Execute Discrete,In_Type 03f8 7001 |p | Jump_Nonzero 0x3fa 03f9 0801 | | Execute_Immediate Raise,0x1 03fa e21a | | Load 0x1,0x1a 03fb e00d | | Load 0x0,0xd 03fc 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03fd 00da | | Load_Top At_Offset_2 03fe 0e50 | P | Execute_Immediate Not_Equal,0x50 03ff 6804 |h | Jump_Zero 0x404 0400 4800 |H | Short_Literal 0x0 0401 e21a | | Load 0x1,0x1a 0402 e00d | | Load 0x0,0xd 0403 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0404 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0405 TRAP_03f0: 0405 0007 | | Action Break_Optional 0406 e00e | | Load 0x0,0xe 0407 180e | | Execute Package,Field_Execute,Field_Number 0xe 0408 4808 |H | Short_Literal 0x8 0409 0092 05f2 | | Action Push_String_Extended,0x5f2 ; "unexpected exception from Set_Block_Size or Set_Streaming_Mode(On):" 040b 4801 |H | Short_Literal 0x1 040c 4801 |H | Short_Literal 0x1 040d e00f | | Load 0x0,0xf 040e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 040f 01cc | | Execute Vector,Catenate 0410 e010 | | Load 0x0,0x10 0411 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0412 00d8 | | Load_Top At_Offset_0 0413 0101 | | Execute Exception,Reraise 0414 0000 0000 | | .BLANK 0000[0x4] 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 041b | | .CONST 0x041b ; Address of begin 0419 0420 | | .CONST 0x0420 ; Address of exception handler 041a 0001 | | .CONST 0x0001 ; Number of locals 041b BODY_0418: 041b INIT_0418: 041b 4801 |H | Short_Literal 0x1 041c e21a | | Load 0x1,0x1a 041d e00d | | Load 0x0,0xd 041e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 041f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0420 TRAP_0418: 0420 0007 | | Action Break_Optional 0421 e00e | | Load 0x0,0xe 0422 180e | | Execute Package,Field_Execute,Field_Number 0xe 0423 4808 |H | Short_Literal 0x8 0424 0092 05f3 | | Action Push_String_Extended,0x5f3 ; "unexpected exception from Set_Streaming_Mode(Off):" 0426 4801 |H | Short_Literal 0x1 0427 4801 |H | Short_Literal 0x1 0428 e00f | | Load 0x0,0xf 0429 1815 | | Execute Package,Field_Execute,Field_Number 0x15 042a 01cc | | Execute Vector,Catenate 042b e010 | | Load 0x0,0x10 042c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 042d 00d8 | | Load_Top At_Offset_0 042e 0101 | | Execute Exception,Reraise 042f 0000 | | .XXX[0x1] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0438 | 8 | .CONST 0x0438 ; Address of begin 0431 0459 | Y | .CONST 0x0459 ; Address of exception handler 0432 0004 | | .CONST 0x0004 ; Number of locals 0433 INIT_0430: 0433 00e3 | | Load_Encached Natural_Cache 0434 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0435 00e3 | | Load_Encached Natural_Cache 0436 e222 | " | Load 0x1,0x22 0437 0337 | 7 | Declare_Variable Array 0438 BODY_0430: 0438 4850 |HP | Short_Literal 0x50 0439 8404 | | Call 0x2,0x4 043a 00cf | | Action Mark_Auxiliary 043b 7816 |x | Jump 0x452 043c 00e3 | | Load_Encached Natural_Cache 043d 00da | | Load_Top At_Offset_2 043e e21a | | Load 0x1,0x1a 043f e00d | | Load 0x0,0xd 0440 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0441 00d1 | | Pop_Control Pop_Count_1 0442 005b | [ | Store_Top Discrete,At_Offset_3 0443 00da | | Load_Top At_Offset_2 0444 7003 |p | Jump_Nonzero 0x448 0445 e225 | % | Load 0x1,0x25 0446 8228 | ( | Call 0x1,0x28 0447 780e |x | Jump 0x456 0448 00da | | Load_Top At_Offset_2 0449 0f50 | P | Execute_Immediate Equal,0x50 044a 7001 |p | Jump_Nonzero 0x44c 044b 0887 | | Execute_Immediate Raise,0x87 044c 00d9 | | Load_Top At_Offset_1 044d 8228 | ( | Call 0x1,0x28 044e 00db | | Load_Top At_Offset_3 044f 0a01 | | Execute_Immediate Plus,0x1 0450 c602 | | Store 0x3,0x2 0451 00c9 | | Action Pop_Auxiliary_Loop 0452 00db | | Load_Top At_Offset_3 0453 e7ff | | Load 0x3,-0x1 0454 027c | | | Execute Discrete,Less 0455 77e6 |w | Jump_Nonzero 0x43c 0456 00ce | | Action Pop_Auxiliary 0457 8405 | | Call 0x2,0x5 0458 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0459 TRAP_0430: 0459 0007 | | Action Break_Optional 045a e00e | | Load 0x0,0xe 045b 180e | | Execute Package,Field_Execute,Field_Number 0xe 045c 4808 |H | Short_Literal 0x8 045d 0092 05f4 | | Action Push_String_Extended,0x5f4 ; "unexpected exception reading labels: " 045f 4801 |H | Short_Literal 0x1 0460 4801 |H | Short_Literal 0x1 0461 e00f | | Load 0x0,0xf 0462 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0463 01cc | | Execute Vector,Catenate 0464 e010 | | Load 0x0,0x10 0465 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0466 00d8 | | Load_Top At_Offset_0 0467 0101 | | Execute Exception,Reraise 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 046e | n | .CONST 0x046e ; Address of begin 0469 04a2 | | .CONST 0x04a2 ; Address of exception handler 046a 0003 | | .CONST 0x0003 ; Number of locals 046b INIT_0468: 046b e00d | | Load 0x0,0xd 046c 1b18 | | Execute Package,Field_Read,Field_Number 0x18 046d 00e3 | | Load_Encached Natural_Cache 046e BODY_0468: 046e e7ff | | Load 0x3,-0x1 046f 0092 05f5 | | Action Push_String_Extended,0x5f5 ; " Skipped" 0471 01cc | | Execute Vector,Catenate 0472 8227 | ' | Call 0x1,0x27 0473 8228 | ( | Call 0x1,0x28 0474 00e3 | | Load_Encached Natural_Cache 0475 e00d | | Load 0x0,0xd 0476 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0477 4803 |H | Short_Literal 0x3 0478 e21a | | Load 0x1,0x1a 0479 e00d | | Load 0x0,0xd 047a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 047b 005b | [ | Store_Top Discrete,At_Offset_3 047c 0059 | Y | Store_Top Discrete,At_Offset_1 047d 00d8 | | Load_Top At_Offset_0 047e 0e03 | | Execute_Immediate Not_Equal,0x3 047f 6821 |h! | Jump_Zero 0x4a1 0480 e00e | | Load 0x0,0xe 0481 180e | | Execute Package,Field_Execute,Field_Number 0xe 0482 4807 |H | Short_Literal 0x7 0483 0092 05f6 | | Action Push_String_Extended,0x5f6 ; "skipping " 0485 e7ff | | Load 0x3,-0x1 0486 01cc | | Execute Vector,Catenate 0487 0092 05f7 | | Action Push_String_Extended,0x5f7 ; " file skipped" 0489 01cc | | Execute Vector,Catenate 048a 00db | | Load_Top At_Offset_3 048b 00e0 | | Load_Encached Standard_Cache 048c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 048d 01cc | | Execute Vector,Catenate 048e 0092 05f8 | | Action Push_String_Extended,0x5f8 ; " instead of" 0490 01cc | | Execute Vector,Catenate 0491 0092 05f9 | | Action Push_String_Extended,0x5f9 ; " 3" 0493 01cc | | Execute Vector,Catenate 0494 0092 05fa | | Action Push_String_Extended,0x5fa ; " marks; obstacle encountered => " 0496 01cc | | Execute Vector,Catenate 0497 e602 | | Load 0x3,0x2 0498 e00d | | Load 0x0,0xd 0499 1b18 | | Execute Package,Field_Read,Field_Number 0x18 049a 011c | | Execute Any,Convert_Unchecked 049b 1c01 | | Execute_Immediate Run_Utility,0x1 049c 01cc | | Execute Vector,Catenate 049d e010 | | Load 0x0,0x10 049e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 049f e011 | | Load 0x0,0x11 04a0 0257 | W | Execute Discrete,Raise 04a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04a2 TRAP_0468: 04a2 0007 | | Action Break_Optional 04a3 e00e | | Load 0x0,0xe 04a4 180e | | Execute Package,Field_Execute,Field_Number 0xe 04a5 4808 |H | Short_Literal 0x8 04a6 0092 05fb | | Action Push_String_Extended,0x5fb ; "unexpected exception skipping " 04a8 e7ff | | Load 0x3,-0x1 04a9 01cc | | Execute Vector,Catenate 04aa 0092 05fc | | Action Push_String_Extended,0x5fc ; ": " 04ac 01cc | | Execute Vector,Catenate 04ad 4801 |H | Short_Literal 0x1 04ae 4801 |H | Short_Literal 0x1 04af e00f | | Load 0x0,0xf 04b0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 04b1 01cc | | Execute Vector,Catenate 04b2 e010 | | Load 0x0,0x10 04b3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04b4 00d8 | | Load_Top At_Offset_0 04b5 0101 | | Execute Exception,Reraise 04b6 0000 0000 | | .XXX[0x2] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04c5 | | .CONST 0x04c5 ; Address of begin 04b9 0509 | | .CONST 0x0509 ; Address of exception handler 04ba 0005 | | .CONST 0x0005 ; Number of locals 04bb INIT_04b8: 04bb e002 | | Load 0x0,0x2 04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04bd 02c7 | | Declare_Variable Any 04be 00d8 | | Load_Top At_Offset_0 04bf 1c00 | | Execute_Immediate Run_Utility,0x0 04c0 00e3 | | Load_Encached Natural_Cache 04c1 e402 | | Load 0x2,0x2 04c2 0337 | 7 | Declare_Variable Array 04c3 e00d | | Load 0x0,0xd 04c4 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04c5 BODY_04b8: 04c5 00be | | Action Activate_Tasks 04c6 e5f8 | | Load 0x2,-0x8 04c7 8404 | | Call 0x2,0x4 04c8 00db | | Load_Top At_Offset_3 04c9 00ea | | Load_Encached Null_String_Cache 04ca 482e |H. | Short_Literal 0x2e 04cb e5fd | | Load 0x2,-0x3 04cc 01cb | | Execute Vector,Append 04cd e7ff | | Load 0x3,-0x1 04ce 01cc | | Execute Vector,Catenate 04cf 4801 |H | Short_Literal 0x1 04d0 e002 | | Load 0x0,0x2 04d1 180f | | Execute Package,Field_Execute,Field_Number 0xf 04d2 c602 | | Store 0x3,0x2 04d3 e7ff | | Load 0x3,-0x1 04d4 8227 | ' | Call 0x1,0x27 04d5 8228 | ( | Call 0x1,0x28 04d6 00cf | | Action Mark_Auxiliary 04d7 e00d | | Load 0x0,0xd 04d8 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04d9 00e3 | | Load_Encached Natural_Cache 04da e604 | | Load 0x3,0x4 04db e21a | | Load 0x1,0x1a 04dc e00d | | Load 0x0,0xd 04dd 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04de 00d1 | | Pop_Control Pop_Count_1 04df c603 | | Store 0x3,0x3 04e0 005a | Z | Store_Top Discrete,At_Offset_2 04e1 00d9 | | Load_Top At_Offset_1 04e2 6814 |h | Jump_Zero 0x4f7 04e3 e00e | | Load 0x0,0xe 04e4 180e | | Execute Package,Field_Execute,Field_Number 0xe 04e5 4807 |H | Short_Literal 0x7 04e6 0092 05fd | | Action Push_String_Extended,0x5fd ; "failed to read " 04e8 e7ff | | Load 0x3,-0x1 04e9 01cc | | Execute Vector,Catenate 04ea 0092 05fe | | Action Push_String_Extended,0x5fe ; " from tape because " 04ec 01cc | | Execute Vector,Catenate 04ed e605 | | Load 0x3,0x5 04ee e00d | | Load 0x0,0xd 04ef 1b19 | | Execute Package,Field_Read,Field_Number 0x19 04f0 011c | | Execute Any,Convert_Unchecked 04f1 1c01 | | Execute_Immediate Run_Utility,0x1 04f2 01cc | | Execute Vector,Catenate 04f3 e010 | | Load 0x0,0x10 04f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04f5 e011 | | Load 0x0,0x11 04f6 0257 | W | Execute Discrete,Raise 04f7 00db | | Load_Top At_Offset_3 04f8 7003 |p | Jump_Nonzero 0x4fc 04f9 e225 | % | Load 0x1,0x25 04fa 8228 | ( | Call 0x1,0x28 04fb 7806 |x | Jump 0x502 04fc 00da | | Load_Top At_Offset_2 04fd e602 | | Load 0x3,0x2 04fe e403 | | Load 0x2,0x3 04ff 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0500 00c9 | | Action Pop_Auxiliary_Loop 0501 7fd5 | | Jump 0x4d7 0502 00ce | | Action Pop_Auxiliary 0503 00db | | Load_Top At_Offset_3 0504 e002 | | Load 0x0,0x2 0505 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0506 c602 | | Store 0x3,0x2 0507 8405 | | Call 0x2,0x5 0508 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0509 TRAP_04b8: 0509 0007 | | Action Break_Optional 050a e00e | | Load 0x0,0xe 050b 180e | | Execute Package,Field_Execute,Field_Number 0xe 050c 4808 |H | Short_Literal 0x8 050d 0092 05ff | | Action Push_String_Extended,0x5ff ; "unexpected exception reading " 050f e7ff | | Load 0x3,-0x1 0510 01cc | | Execute Vector,Catenate 0511 0092 0600 | | Action Push_String_Extended,0x600 ; " from tape: " 0513 01cc | | Execute Vector,Catenate 0514 4801 |H | Short_Literal 0x1 0515 4801 |H | Short_Literal 0x1 0516 e00f | | Load 0x0,0xf 0517 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0518 01cc | | Execute Vector,Catenate 0519 e010 | | Load 0x0,0x10 051a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 051b 00d8 | | Load_Top At_Offset_0 051c 0101 | | Execute Exception,Reraise 051d 0000 0000 | | .XXX[0x3] 051f 0000 | | 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0525 | % | .CONST 0x0525 ; Address of begin 0521 0546 | F | .CONST 0x0546 ; Address of exception handler 0522 0002 | | .CONST 0x0002 ; Number of locals 0523 INIT_0520: 0523 029f 05a3 | | Declare_Subprogram INIT_05a0,For_Call 0525 BODY_0520: 0525 e219 | | Load 0x1,0x19 0526 00ea | | Load_Encached Null_String_Cache 0527 482e |H. | Short_Literal 0x2e 0528 e5fd | | Load 0x2,-0x3 0529 01cb | | Execute Vector,Append 052a e221 | ! | Load 0x1,0x21 052b 01cc | | Execute Vector,Catenate 052c 4801 |H | Short_Literal 0x1 052d e002 | | Load 0x0,0x2 052e 180f | | Execute Package,Field_Execute,Field_Number 0xf 052f c219 | | Store 0x1,0x19 0530 e21a | | Load 0x1,0x1a 0531 e012 | | Load 0x0,0x12 0532 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0533 e013 | | Load 0x0,0x13 0534 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0535 00ea | | Load_Encached Null_String_Cache 0536 e5f9 | | Load 0x2,-0x7 0537 e014 | | Load 0x0,0x14 0538 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0539 00d9 | | Load_Top At_Offset_1 053a 00d0 | | Action Swap_Control 053b 0260 | ` | Execute Discrete,In_Type 053c 7001 |p | Jump_Nonzero 0x53e 053d 0801 | | Execute_Immediate Raise,0x1 053e e014 | | Load 0x0,0x14 053f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0540 4800 |H | Short_Literal 0x0 0541 e003 | | Load 0x0,0x3 0542 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0543 c21a | | Store 0x1,0x1a 0544 8602 | | Call 0x3,0x2 0545 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0546 TRAP_0520: 0546 e011 | | Load 0x0,0x11 0547 010f | | Execute Exception,Equal 0548 6802 |h | Jump_Zero 0x54b 0549 00d8 | | Load_Top At_Offset_0 054a 0101 | | Execute Exception,Reraise 054b e00e | | Load 0x0,0xe 054c 180e | | Execute Package,Field_Execute,Field_Number 0xe 054d 4808 |H | Short_Literal 0x8 054e 0092 0601 | | Action Push_String_Extended,0x601 ; "unexpected exception opening tape: " 0550 4801 |H | Short_Literal 0x1 0551 4801 |H | Short_Literal 0x1 0552 e00f | | Load 0x0,0xf 0553 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0554 01cc | | Execute Vector,Catenate 0555 e010 | | Load 0x0,0x10 0556 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0557 00d8 | | Load_Top At_Offset_0 0558 0101 | | Execute Exception,Reraise 0559 0000 0000 | | .BLANK 0000[0x7] 0560 ; -------------------------------------------------------------------------------------- 0560 ; SUBPROGRAM 0560 ; -------------------------------------------------------------------------------------- 0560 0563 | c | .CONST 0x0563 ; Address of begin 0561 0572 | r | .CONST 0x0572 ; Address of exception handler 0562 0001 | | .CONST 0x0001 ; Number of locals 0563 BODY_0560: 0563 INIT_0560: 0563 e219 | | Load 0x1,0x19 0564 e002 | | Load 0x0,0x2 0565 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0566 c219 | | Store 0x1,0x19 0567 e5fa | | Load 0x2,-0x6 0568 6804 |h | Jump_Zero 0x56d 0569 e21a | | Load 0x1,0x1a 056a e00d | | Load 0x0,0xd 056b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 056c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 056d e21a | | Load 0x1,0x1a 056e e003 | | Load 0x0,0x3 056f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0570 c21a | | Store 0x1,0x1a 0571 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0572 TRAP_0560: 0572 0007 | | Action Break_Optional 0573 e00e | | Load 0x0,0xe 0574 180e | | Execute Package,Field_Execute,Field_Number 0xe 0575 4808 |H | Short_Literal 0x8 0576 0092 0602 | | Action Push_String_Extended,0x602 ; "unexpected exception closing tape: " 0578 4801 |H | Short_Literal 0x1 0579 4801 |H | Short_Literal 0x1 057a e00f | | Load 0x0,0xf 057b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 057c 01cc | | Execute Vector,Catenate 057d e010 | | Load 0x0,0x10 057e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 057f 00d8 | | Load_Top At_Offset_0 0580 0101 | | Execute Exception,Reraise 0581 0000 0000 | | .BLANK 0000[0x7] 0588 ; -------------------------------------------------------------------------------------- 0588 ; SUBPROGRAM 0588 ; -------------------------------------------------------------------------------------- 0588 058b | | .CONST 0x058b ; Address of begin 0589 0004 | | .CONST 0x0004 ; Address of exception handler 058a 0001 | | .CONST 0x0001 ; Number of locals 058b BODY_0588: 058b INIT_0588: 058b 00cf | | Action Mark_Auxiliary 058c 4809 |H | Short_Literal 0x9 058d e7ff | | Load 0x3,-0x1 058e 0263 | c | Execute Discrete,Above_Bound 058f 7008 |p | Jump_Nonzero 0x598 0590 00d8 | | Load_Top At_Offset_0 0591 e5fb | | Load 0x2,-0x5 0592 01d7 | | Execute Vector,Field_Read 0593 6802 |h | Jump_Zero 0x596 0594 4801 |H | Short_Literal 0x1 0595 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0596 00c8 | | Action Pop_Auxiliary_Range 0597 3ff8 |? | Loop_Increasing 0x590 0598 00ce | | Action Pop_Auxiliary 0599 4800 |H | Short_Literal 0x0 059a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 059b 0000 0000 | | .BLANK 0000[0x5] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a6 | | .CONST 0x05a6 ; Address of begin 05a1 05d8 | | .CONST 0x05d8 ; Address of exception handler 05a2 0003 | | .CONST 0x0003 ; Number of locals 05a3 INIT_05a0: 05a3 00e3 | | Load_Encached Natural_Cache 05a4 e222 | " | Load 0x1,0x22 05a5 0337 | 7 | Declare_Variable Array 05a6 BODY_05a0: 05a6 4802 |H | Short_Literal 0x2 05a7 8406 | | Call 0x2,0x6 05a8 4850 |HP | Short_Literal 0x50 05a9 8404 | | Call 0x2,0x4 05aa 00e3 | | Load_Encached Natural_Cache 05ab 00d9 | | Load_Top At_Offset_1 05ac e21a | | Load 0x1,0x1a 05ad e00d | | Load 0x0,0xd 05ae 181c | | Execute Package,Field_Execute,Field_Number 0x1c 05af 00d1 | | Pop_Control Pop_Count_1 05b0 005a | Z | Store_Top Discrete,At_Offset_2 05b1 00d9 | | Load_Top At_Offset_1 05b2 0f50 | P | Execute_Immediate Equal,0x50 05b3 7001 |p | Jump_Nonzero 0x5b5 05b4 0887 | | Execute_Immediate Raise,0x87 05b5 00d8 | | Load_Top At_Offset_0 05b6 8228 | ( | Call 0x1,0x28 05b7 8405 | | Call 0x2,0x5 05b8 4850 |HP | Short_Literal 0x50 05b9 00d9 | | Load_Top At_Offset_1 05ba 01d7 | | Execute Vector,Field_Read 05bb 0f31 | 1 | Execute_Immediate Equal,0x31 05bc 6803 |h | Jump_Zero 0x5c0 05bd 4800 |H | Short_Literal 0x0 05be a21b | | Store_Unchecked 0x1,0x1b 05bf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05c0 4850 |HP | Short_Literal 0x50 05c1 00d9 | | Load_Top At_Offset_1 05c2 01d7 | | Execute Vector,Field_Read 05c3 0f32 | 2 | Execute_Immediate Equal,0x32 05c4 6803 |h | Jump_Zero 0x5c8 05c5 4801 |H | Short_Literal 0x1 05c6 a21b | | Store_Unchecked 0x1,0x1b 05c7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05c8 e00e | | Load 0x0,0xe 05c9 180e | | Execute Package,Field_Execute,Field_Number 0xe 05ca 4807 |H | Short_Literal 0x7 05cb 0092 0603 | | Action Push_String_Extended,0x603 ; "unexpected tape format; UVL2 label = \x22" 05cd 00db | | Load_Top At_Offset_3 05ce e004 | | Load 0x0,0x4 05cf 180d | | Execute Package,Field_Execute,Field_Number 0xd 05d0 01cc | | Execute Vector,Catenate 05d1 0092 0604 | | Action Push_String_Extended,0x604 ; "\x22" 05d3 01cc | | Execute Vector,Catenate 05d4 e010 | | Load 0x0,0x10 05d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05d6 e011 | | Load 0x0,0x11 05d7 0257 | W | Execute Discrete,Raise 05d8 TRAP_05a0: 05d8 0007 | | Action Break_Optional 05d9 e00e | | Load 0x0,0xe 05da 180e | | Execute Package,Field_Execute,Field_Number 0xe 05db 4808 |H | Short_Literal 0x8 05dc 0092 05f4 | | Action Push_String_Extended,0x5f4 ; "unexpected exception reading labels: " 05de 4801 |H | Short_Literal 0x1 05df 4801 |H | Short_Literal 0x1 05e0 e00f | | Load 0x0,0xf 05e1 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05e2 01cc | | Execute Vector,Catenate 05e3 e010 | | Load 0x0,0x10 05e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05e5 e011 | | Load 0x0,0x11 05e6 0257 | W | Execute Discrete,Raise 05e7 ; -------------------------------------------------------------------------------------- 05e7 ; STRING TABLE 05e7 ; -------------------------------------------------------------------------------------- 05e7 003e | > | .STRTAB 0x003e->0x0606 ; "COMMENTS" 05e8 0044 | D | .STRTAB 0x0044->0x060a ; "IOP_DUMP0" 05e9 004b | K | .STRTAB 0x004b->0x060e ; "IOP_DUMP1" 05ea 0052 | R | .STRTAB 0x0052->0x0613 ; "IOP_DUMP2" 05eb 0059 | Y | .STRTAB 0x0059->0x0617 ; "IOP_DUMP3" 05ec 0060 | ` | .STRTAB 0x0060->0x061c ; "IOP_DUMP4" 05ed 0067 | g | .STRTAB 0x0067->0x0620 ; "SAVED_STATE" 05ee 0070 | p | .STRTAB 0x0070->0x0626 ; "REGISTERS" 05ef 0077 | w | .STRTAB 0x0077->0x062a ; "TAG_STORE" 05f0 007e | ~ | .STRTAB 0x007e->0x062f ; "MEMORY" 05f1 0082 | | .STRTAB 0x0082->0x0632 ; "LABELS" 05f2 0086 | | .STRTAB 0x0086->0x0635 ; "unexpected exception from Set_Block_Size or Set_Streaming_Mode(On):" 05f3 00c7 | | .STRTAB 0x00c7->0x0656 ; "unexpected exception from Set_Streaming_Mode(Off):" 05f4 00f7 | | .STRTAB 0x00f7->0x066f ; "unexpected exception reading labels: " 05f5 011a | | .STRTAB 0x011a->0x0682 ; " Skipped" 05f6 0120 | | .STRTAB 0x0120->0x0686 ; "skipping " 05f7 0127 | ' | .STRTAB 0x0127->0x068a ; " file skipped" 05f8 0132 | 2 | .STRTAB 0x0132->0x0691 ; " instead of" 05f9 013b | ; | .STRTAB 0x013b->0x0696 ; " 3" 05fa 013b | ; | .STRTAB 0x013b->0x0697 ; " marks; obstacle encountered => " 05fb 0159 | Y | .STRTAB 0x0159->0x06a7 ; "unexpected exception skipping " 05fc 0175 | u | .STRTAB 0x0175->0x06b6 ; ": " 05fd 0175 | u | .STRTAB 0x0175->0x06b7 ; "failed to read " 05fe 0182 | | .STRTAB 0x0182->0x06bf ; " from tape because " 05ff 0193 | | .STRTAB 0x0193->0x06c8 ; "unexpected exception reading " 0600 01ae | | .STRTAB 0x01ae->0x06d7 ; " from tape: " 0601 01b8 | | .STRTAB 0x01b8->0x06dd ; "unexpected exception opening tape: " 0602 01d9 | | .STRTAB 0x01d9->0x06ee ; "unexpected exception closing tape: " 0603 01fa | | .STRTAB 0x01fa->0x0700 ; "unexpected tape format; UVL2 label = \x22" 0604 021e | | .STRTAB 0x021e->0x0713 ; "\x22" 0605 021d | | .STREND 0x021d->0x0713 0606 434f 4d4d |COMM| .STRTAB_STRINGS 0714 0000 0000 | | .BLANK 0000[0x4] 0718 ; -------------------------------------------------------------------------------------- 0718 ; Debug Table 0718 ; -------------------------------------------------------------------------------------- 0718 0004 000e | | .DEBUG4 0x0004,0x000e,0x1e79,0x0000,0x0001,0x0000 071e e000 0006 | | .XXX[0x1e] 0720 4404 09ad |D | 0722 2dcd 2dae |- - | 0724 ada4 0c2c | ,| 0726 6c6c ae6e |ll n| 0728 640c 6d8c |d m | 072a 2e6e 640c |.nd | 072c cdee 440e | D | 072e 6eac 4e6f |n No| 0730 2e6e 8cad |.n | 0732 a5ee 6f2e | o.| 0734 6e8c ada7 |n | 0736 4409 eeed |D | 0738 ccae 4000 | @ | 073a 0000 2000 | | 073c 0000 0000 | | .BLANK 0000[0x4] 0740 000e 4000 | @ | .XXX[0x5d] 0742 0000 0000 | | 0744 000e 2000 | | 0746 000e 8000 | | 0748 0006 088c | | 074a ae6e 8e4d | n M| 074c ef2b e86d | + m| 074e edcc cd2c | ,| 0750 e407 440c | D | 0752 6ded ce6e |m n| 0754 8c2d ce84 | - | 0756 08af 0cac | | 0758 6eae 8d2d |n -| 075a edcb ea4d | M| 075c 2ced 0e84 |, | 075e 0747 a406 | G | 0760 6647 6000 |fG` | 0762 000e 6000 | ` | 0764 0006 2408 | $ | 0766 8cae 6e8e | n | 0768 4def 2be8 |M + | 076a 6ded cccd |m | 076c 2ce4 0744 |, D| 076e 0c6d edce | m | 0770 6e8c 2dce |n - | 0772 8408 af0c | | 0774 ac6e ae8d | n | 0776 2ded cbea |- | 0778 4d2c ed0e |M, | 077a 8407 47a4 | G | 077c 0666 4760 | fG`| 077e 0000 0e60 | `| 0780 0000 0624 | $| 0782 088c ae6e | n| 0784 8e4d ef2b | M +| 0786 e86d edcc | m | 0788 cd2c e407 | , | 078a 440c 6ded |D m | 078c ce6e 8c2d | n -| 078e ce84 08af | | 0790 0cac 6eae | n | 0792 8d2d edcb | - | 0794 ea4d 2ced | M, | 0796 0e84 0747 | G| 0798 a406 6647 | fG| 079a 6000 0000 |` | 079c 2000 | | 079d 0000 0000 | | .BLANK 0000[0x4] 07a1 0004 a000 | | .XXX[0x5f] 07a3 0000 0000 | | 07a5 0004 8000 | | 07a7 0004 e000 | | 07a9 0007 ea6e | n| 07ab ac4e 6f2e | No.| 07ad 6e8c ada5 |n | 07af ee6f 2e6e | o.n| 07b1 8cad a40c | | 07b3 af0c ac6e | n| 07b5 ae8d 2ded | - | 07b7 c40e 4d2c | M,| 07b9 ed0e 85c4 | | 07bb 040a 0cae | | 07bd 4dad 2e8e |M . | 07bf 640c 240c |d $ | 07c1 ee4d eeae | M | 07c3 040e 8de4 | | 07c5 0c8c ae6e | n| 07c7 8e4d ef24 | M $| 07c9 0c20 0000 | | 07cb 04c0 0000 | | 07cd 0804 0a6e | n| 07cf ac4e 6f2e | No.| 07d1 6e8c ada5 |n | 07d3 ee6f 2e6e | o.n| 07d5 8cad a40c | | 07d7 af0c ac6e | n| 07d9 ae8d 2ded | - | 07db c40e 4d2c | M,| 07dd ed0e 85c4 | | 07df 040a 0cae | | 07e1 4dad 2e8e |M . | 07e3 640c 240c |d $ | 07e5 ee4d eeae | M | 07e7 040e 8de4 | | 07e9 0c8c ae6e | n| 07eb 8e4d ef24 | M $| 07ed 0c20 0000 | | 07ef 04c0 0000 | | 07f1 0804 0a6e | n| 07f3 ac4e 6f2e | No.| 07f5 6e8c ada5 |n | 07f7 ee6f 2e6e | o.n| 07f9 8cad a40c | | 07fb af0c ac6e | n| 07fd ae8d 2ded | - | 07ff c40e | |