|
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: 6144 (0x1800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 07b8 | | .CONST 0x07b8 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0031 | 1 | .CONST 0x0031 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0018 | | .CONST 0x0018 ; Number of locals 000b INIT_0008: 000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 000d 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated 000f 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0011 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0013 00bf | | Action Accept_Activation 0014 0093 0000 | | push_full_address 0x0 0016 60b1 |` | Indirect_Literal Discrete,0xc8,{0x80000000, 0x00010000} 0017 0273 | s | Execute Discrete,Plus 0018 0007 | | Action Break_Optional 0019 0007 | | Action Break_Optional 001a 0007 | | Action Break_Optional 001b 1d0d | | Execute_Immediate Reference_Lex_1,0xd 001c 00c7 | | Action Elaborate_Subprogram 001d 1d0e | | Execute_Immediate Reference_Lex_1,0xe 001e 00c7 | | Action Elaborate_Subprogram 001f 029d 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call 0021 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0022 00c7 | | Action Elaborate_Subprogram 0023 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call 0025 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call 0027 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call 0029 029d 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call 002b 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call 002d 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call 002f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0030 00c7 | | Action Elaborate_Subprogram 0031 BODY_0008: 0031 00bc | | Action Signal_Activated 0032 00bb | | Action Signal_Completion 0033 0000 0000 | | .BLANK 0000[0x5] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 0048 | H | .CONST 0x0048 ; Address of begin 0039 00c1 | | .CONST 0x00c1 ; Address of exception handler 003a 0005 | | .CONST 0x0005 ; Number of locals 003b INIT_0038: 003b e002 | | Load 0x0,0x2 003c 03bc | | Declare_Variable Access,By_Allocation 003d 00d8 | | Load_Top At_Offset_0 003e 0227 | ' | Execute Access,All_Reference 003f 1c00 | | Execute_Immediate Run_Utility,0x0 0040 e003 | | Load 0x0,0x3 0041 0007 | | Action Break_Optional 0042 e004 | | Load 0x0,0x4 0043 0322 | " | Declare_Variable Record 0044 e005 | | Load 0x0,0x5 0045 0322 | " | Declare_Variable Record 0046 00d8 | | Load_Top At_Offset_0 0047 1c00 | | Execute_Immediate Run_Utility,0x0 0048 BODY_0038: 0048 4801 |H | Short_Literal 0x1 0049 e5fb | | Load 0x2,-0x5 004a 00d8 | | Load_Top At_Offset_0 004b e006 | | Load 0x0,0x6 004c 0260 | ` | Execute Discrete,In_Type 004d 7001 |p | Jump_Nonzero 0x4f 004e 0801 | | Execute_Immediate Raise,0x1 004f e5fc | | Load 0x2,-0x4 0050 00d8 | | Load_Top At_Offset_0 0051 e006 | | Load 0x0,0x6 0052 0260 | ` | Execute Discrete,In_Type 0053 7001 |p | Jump_Nonzero 0x55 0054 0801 | | Execute_Immediate Raise,0x1 0055 e5fe | | Load 0x2,-0x2 0056 e5ff | | Load 0x2,-0x1 0057 8007 | | Call 0x0,0x7 0058 00da | | Load_Top At_Offset_2 0059 017d | } | Execute Record,Structure_Write 005a 00d9 | | Load_Top At_Offset_1 005b e008 | | Load 0x0,0x8 005c 017f | | Execute Record,Equal 005d 6804 |h | Jump_Zero 0x62 005e e008 | | Load 0x0,0x8 005f 0320 | | Declare_Variable Record,Duplicate 0060 00cd | | Action Spare6_Action 0061 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0062 00d8 | | Load_Top At_Offset_0 0063 e009 | | Load 0x0,0x9 0064 00db | | Load_Top At_Offset_3 0065 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0066 e5ff | | Load 0x2,-0x1 0067 800a | | Call 0x0,0xa 0068 003b | ; | Store_Top Access,At_Offset_3 0069 00da | | Load_Top At_Offset_2 006a e003 | | Load 0x0,0x3 006b 022f | / | Execute Access,Equal 006c 6804 |h | Jump_Zero 0x71 006d e008 | | Load 0x0,0x8 006e 0320 | | Declare_Variable Record,Duplicate 006f 00cd | | Action Spare6_Action 0070 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0071 e5fb | | Load 0x2,-0x5 0072 e402 | | Load 0x2,0x2 0073 0227 | ' | Execute Access,All_Reference 0074 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0075 e5fc | | Load 0x2,-0x4 0076 e402 | | Load 0x2,0x2 0077 0227 | ' | Execute Access,All_Reference 0078 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0079 4801 |H | Short_Literal 0x1 007a e402 | | Load 0x2,0x2 007b 0227 | ' | Execute Access,All_Reference 007c 380a |8 | Execute Record,Field_Write,Field_Number 0xa 007d 4800 |H | Short_Literal 0x0 007e e402 | | Load 0x2,0x2 007f 0227 | ' | Execute Access,All_Reference 0080 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0081 4802 |H | Short_Literal 0x2 0082 e402 | | Load 0x2,0x2 0083 0227 | ' | Execute Access,All_Reference 0084 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0085 e5fd | | Load 0x2,-0x3 0086 e00b | | Load 0x0,0xb 0087 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0088 e402 | | Load 0x2,0x2 0089 0227 | ' | Execute Access,All_Reference 008a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 008b 4800 |H | Short_Literal 0x0 008c e402 | | Load 0x2,0x2 008d 0227 | ' | Execute Access,All_Reference 008e 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 008f 4808 |H | Short_Literal 0x8 0090 e402 | | Load 0x2,0x2 0091 0227 | ' | Execute Access,All_Reference 0092 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0093 4800 |H | Short_Literal 0x0 0094 e402 | | Load 0x2,0x2 0095 0227 | ' | Execute Access,All_Reference 0096 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0097 4808 |H | Short_Literal 0x8 0098 e402 | | Load 0x2,0x2 0099 0227 | ' | Execute Access,All_Reference 009a 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 009b e5fc | | Load 0x2,-0x4 009c 0a07 | | Execute_Immediate Plus,0x7 009d 09fd | | Execute_Immediate Binary_Scale,-0x3 009e e402 | | Load 0x2,0x2 009f 0227 | ' | Execute Access,All_Reference 00a0 380b |8 | Execute Record,Field_Write,Field_Number 0xb 00a1 e5fb | | Load 0x2,-0x5 00a2 e5fc | | Load 0x2,-0x4 00a3 4800 |H | Short_Literal 0x0 00a4 4800 |H | Short_Literal 0x0 00a5 4800 |H | Short_Literal 0x0 00a6 4800 |H | Short_Literal 0x0 00a7 e402 | | Load 0x2,0x2 00a8 e403 | | Load 0x2,0x3 00a9 e404 | | Load 0x2,0x4 00aa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00ab e5ff | | Load 0x2,-0x1 00ac 800c | | Call 0x0,0xc 00ad 00db | | Load_Top At_Offset_3 00ae 0229 | ) | Execute Access,All_Read 00af 00d8 | | Load_Top At_Offset_0 00b0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00b1 e00d | | Load 0x0,0xd 00b2 e00e | | Load 0x0,0xe 00b3 a00f | | Store_Unchecked 0x0,0xf 00b4 8010 | | Call 0x0,0x10 00b5 00d9 | | Load_Top At_Offset_1 00b6 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 00b7 00d1 | | Pop_Control Pop_Count_1 00b8 00db | | Load_Top At_Offset_3 00b9 8011 | | Call 0x0,0x11 00ba c402 | | Store 0x2,0x2 00bb 00da | | Load_Top At_Offset_2 00bc e5ff | | Load 0x2,-0x1 00bd 8012 | | Call 0x0,0x12 00be 003b | ; | Store_Top Access,At_Offset_3 00bf 00d9 | | Load_Top At_Offset_1 00c0 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 00c1 TRAP_0038: 00c1 0007 | | Action Break_Optional 00c2 e402 | | Load 0x2,0x2 00c3 8011 | | Call 0x0,0x11 00c4 c402 | | Store 0x2,0x2 00c5 00d8 | | Load_Top At_Offset_0 00c6 0101 | | Execute Exception,Reraise 00c7 0000 | | .XXX[0x1] 00c8 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 00cc 0000 0000 | | .BLANK 0000[0x4] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00dd | | .CONST 0x00dd ; Address of begin 00d1 017c | | | .CONST 0x017c ; Address of exception handler 00d2 0005 | | .CONST 0x0005 ; Number of locals 00d3 INIT_00d0: 00d3 e002 | | Load 0x0,0x2 00d4 0007 | | Action Break_Optional 00d5 e003 | | Load 0x0,0x3 00d6 0007 | | Action Break_Optional 00d7 e005 | | Load 0x0,0x5 00d8 0322 | " | Declare_Variable Record 00d9 00d8 | | Load_Top At_Offset_0 00da 1c00 | | Execute_Immediate Run_Utility,0x0 00db e004 | | Load 0x0,0x4 00dc 0322 | " | Declare_Variable Record 00dd BODY_00d0: 00dd e5f8 | | Load 0x2,-0x8 00de e5fb | | Load 0x2,-0x5 00df 00d8 | | Load_Top At_Offset_0 00e0 e006 | | Load 0x0,0x6 00e1 0260 | ` | Execute Discrete,In_Type 00e2 7001 |p | Jump_Nonzero 0xe4 00e3 0801 | | Execute_Immediate Raise,0x1 00e4 e5fc | | Load 0x2,-0x4 00e5 00d8 | | Load_Top At_Offset_0 00e6 e006 | | Load 0x0,0x6 00e7 0260 | ` | Execute Discrete,In_Type 00e8 7001 |p | Jump_Nonzero 0xea 00e9 0801 | | Execute_Immediate Raise,0x1 00ea e5fe | | Load 0x2,-0x2 00eb e5ff | | Load 0x2,-0x1 00ec 8007 | | Call 0x0,0x7 00ed 00d9 | | Load_Top At_Offset_1 00ee 017d | } | Execute Record,Structure_Write 00ef 00d8 | | Load_Top At_Offset_0 00f0 e008 | | Load 0x0,0x8 00f1 017f | | Execute Record,Equal 00f2 6804 |h | Jump_Zero 0xf7 00f3 e008 | | Load 0x0,0x8 00f4 0320 | | Declare_Variable Record,Duplicate 00f5 00cd | | Action Spare6_Action 00f6 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 00f7 e5fa | | Load 0x2,-0x6 00f8 00da | | Load_Top At_Offset_2 00f9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00fa e5f9 | | Load 0x2,-0x7 00fb 00da | | Load_Top At_Offset_2 00fc 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 00fd 00d9 | | Load_Top At_Offset_1 00fe e013 | | Load 0x0,0x13 00ff 0337 | 7 | Declare_Variable Array 0100 4801 |H | Short_Literal 0x1 0101 481d |H | Short_Literal 0x1d 0102 00da | | Load_Top At_Offset_2 0103 01d6 | | Execute Vector,Field_Write 0104 4801 |H | Short_Literal 0x1 0105 481c |H | Short_Literal 0x1c 0106 00da | | Load_Top At_Offset_2 0107 01d6 | | Execute Vector,Field_Write 0108 481b |H | Short_Literal 0x1b 0109 4800 |H | Short_Literal 0x0 010a 4800 |H | Short_Literal 0x0 010b 00d9 | | Load_Top At_Offset_1 010c e407 | | Load 0x2,0x7 010d 01d6 | | Execute Vector,Field_Write 010e 3ffb |? | Loop_Increasing 0x10a 010f 4800 |H | Short_Literal 0x0 0110 481e |H | Short_Literal 0x1e 0111 00da | | Load_Top At_Offset_2 0112 01d6 | | Execute Vector,Field_Write 0113 4800 |H | Short_Literal 0x0 0114 481f |H | Short_Literal 0x1f 0115 00da | | Load_Top At_Offset_2 0116 01d6 | | Execute Vector,Field_Write 0117 e013 | | Load 0x0,0x13 0118 01c3 | | Execute Vector,Check_In_Type 0119 00da | | Load_Top At_Offset_2 011a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 011b e5ff | | Load 0x2,-0x1 011c 800a | | Call 0x0,0xa 011d 003b | ; | Store_Top Access,At_Offset_3 011e 00da | | Load_Top At_Offset_2 011f e003 | | Load 0x0,0x3 0120 022f | / | Execute Access,Equal 0121 6804 |h | Jump_Zero 0x126 0122 e008 | | Load 0x0,0x8 0123 0320 | | Declare_Variable Record,Duplicate 0124 00cd | | Action Spare6_Action 0125 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 0126 e002 | | Load 0x0,0x2 0127 03bc | | Declare_Variable Access,By_Allocation 0128 00d8 | | Load_Top At_Offset_0 0129 0227 | ' | Execute Access,All_Reference 012a 1c00 | | Execute_Immediate Run_Utility,0x0 012b a402 | | Store_Unchecked 0x2,0x2 012c e5fb | | Load 0x2,-0x5 012d e402 | | Load 0x2,0x2 012e 0227 | ' | Execute Access,All_Reference 012f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0130 e5fc | | Load 0x2,-0x4 0131 e402 | | Load 0x2,0x2 0132 0227 | ' | Execute Access,All_Reference 0133 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0134 4801 |H | Short_Literal 0x1 0135 e402 | | Load 0x2,0x2 0136 0227 | ' | Execute Access,All_Reference 0137 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0138 4800 |H | Short_Literal 0x0 0139 e402 | | Load 0x2,0x2 013a 0227 | ' | Execute Access,All_Reference 013b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 013c 4800 |H | Short_Literal 0x0 013d e402 | | Load 0x2,0x2 013e 0227 | ' | Execute Access,All_Reference 013f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0140 e5fd | | Load 0x2,-0x3 0141 e00b | | Load 0x0,0xb 0142 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0143 e402 | | Load 0x2,0x2 0144 0227 | ' | Execute Access,All_Reference 0145 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0146 4800 |H | Short_Literal 0x0 0147 e402 | | Load 0x2,0x2 0148 0227 | ' | Execute Access,All_Reference 0149 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 014a 4808 |H | Short_Literal 0x8 014b e402 | | Load 0x2,0x2 014c 0227 | ' | Execute Access,All_Reference 014d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 014e 4800 |H | Short_Literal 0x0 014f e402 | | Load 0x2,0x2 0150 0227 | ' | Execute Access,All_Reference 0151 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0152 4808 |H | Short_Literal 0x8 0153 e402 | | Load 0x2,0x2 0154 0227 | ' | Execute Access,All_Reference 0155 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0156 e5fc | | Load 0x2,-0x4 0157 0a07 | | Execute_Immediate Plus,0x7 0158 09fd | | Execute_Immediate Binary_Scale,-0x3 0159 e402 | | Load 0x2,0x2 015a 0227 | ' | Execute Access,All_Reference 015b 380b |8 | Execute Record,Field_Write,Field_Number 0xb 015c e5fb | | Load 0x2,-0x5 015d e5fc | | Load 0x2,-0x4 015e 4800 |H | Short_Literal 0x0 015f 4800 |H | Short_Literal 0x0 0160 4800 |H | Short_Literal 0x0 0161 4800 |H | Short_Literal 0x0 0162 e402 | | Load 0x2,0x2 0163 e403 | | Load 0x2,0x3 0164 e405 | | Load 0x2,0x5 0165 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0166 e5ff | | Load 0x2,-0x1 0167 800c | | Call 0x0,0xc 0168 00db | | Load_Top At_Offset_3 0169 0229 | ) | Execute Access,All_Read 016a 00d8 | | Load_Top At_Offset_0 016b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 016c e00d | | Load 0x0,0xd 016d e00e | | Load 0x0,0xe 016e a00f | | Store_Unchecked 0x0,0xf 016f 8010 | | Call 0x0,0x10 0170 00d9 | | Load_Top At_Offset_1 0171 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0172 00d1 | | Pop_Control Pop_Count_1 0173 00db | | Load_Top At_Offset_3 0174 8011 | | Call 0x0,0x11 0175 c402 | | Store 0x2,0x2 0176 00da | | Load_Top At_Offset_2 0177 e5ff | | Load 0x2,-0x1 0178 8012 | | Call 0x0,0x12 0179 003b | ; | Store_Top Access,At_Offset_3 017a 00d8 | | Load_Top At_Offset_0 017b 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 017c TRAP_00d0: 017c 0007 | | Action Break_Optional 017d e402 | | Load 0x2,0x2 017e 8011 | | Call 0x0,0x11 017f c402 | | Store 0x2,0x2 0180 00d8 | | Load_Top At_Offset_0 0181 0101 | | Execute Exception,Reraise 0182 0000 0000 | | .BLANK 0000[0x6] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 019d | | .CONST 0x019d ; Address of begin 0189 02d1 | | .CONST 0x02d1 ; Address of exception handler 018a 0009 | | .CONST 0x0009 ; Number of locals 018b INIT_0188: 018b e00b | | Load 0x0,0xb 018c 0007 | | Action Break_Optional 018d e014 | | Load 0x0,0x14 018e 0007 | | Action Break_Optional 018f e014 | | Load 0x0,0x14 0190 0007 | | Action Break_Optional 0191 e015 | | Load 0x0,0x15 0192 0007 | | Action Break_Optional 0193 e002 | | Load 0x0,0x2 0194 0007 | | Action Break_Optional 0195 e016 | | Load 0x0,0x16 0196 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0197 02c7 | | Declare_Variable Any 0198 00d8 | | Load_Top At_Offset_0 0199 1c00 | | Execute_Immediate Run_Utility,0x0 019a 00e3 | | Load_Encached Natural_Cache 019b 029f 06e3 | | Declare_Subprogram INIT_06e0,For_Call 019d BODY_0188: 019d 00be | | Action Activate_Tasks 019e 4800 |H | Short_Literal 0x0 019f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 01a0 00cf | | Action Mark_Auxiliary 01a1 e5fe | | Load 0x2,-0x2 01a2 01da | | Execute Vector,Bounds 01a3 0264 | d | Execute Discrete,Below_Bound 01a4 700b |p | Jump_Nonzero 0x1b0 01a5 00d8 | | Load_Top At_Offset_0 01a6 e5fe | | Load 0x2,-0x2 01a7 01d7 | | Execute Vector,Field_Read 01a8 0f2e | . | Execute_Immediate Equal,0x2e 01a9 6804 |h | Jump_Zero 0x1ae 01aa 00d8 | | Load_Top At_Offset_0 01ab a408 | | Store_Unchecked 0x2,0x8 01ac 00d2 | | Pop_Control Pop_Count_2 01ad 7802 |x | Jump 0x1b0 01ae 00c8 | | Action Pop_Auxiliary_Range 01af 37f5 |7 | Loop_Decreasing 0x1a5 01b0 00ce | | Action Pop_Auxiliary 01b1 00d9 | | Load_Top At_Offset_1 01b2 7004 |p | Jump_Nonzero 0x1b7 01b3 e5fe | | Load 0x2,-0x2 01b4 01dd | | Execute Vector,First 01b5 005a | Z | Store_Top Discrete,At_Offset_2 01b6 7803 |x | Jump 0x1ba 01b7 00d9 | | Load_Top At_Offset_1 01b8 0a01 | | Execute_Immediate Plus,0x1 01b9 005a | Z | Store_Top Discrete,At_Offset_2 01ba 8409 | | Call 0x2,0x9 01bb 4801 |H | Short_Literal 0x1 01bc 4801 |H | Short_Literal 0x1 01bd e5fb | | Load 0x2,-0x5 01be e5fc | | Load 0x2,-0x4 01bf 4800 |H | Short_Literal 0x0 01c0 4800 |H | Short_Literal 0x0 01c1 e5fd | | Load 0x2,-0x3 01c2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 01c3 e5ff | | Load 0x2,-0x1 01c4 8017 | | Call 0x0,0x17 01c5 a406 | | Store_Unchecked 0x2,0x6 01c6 00db | | Load_Top At_Offset_3 01c7 e002 | | Load 0x0,0x2 01c8 022f | / | Execute Access,Equal 01c9 6806 |h | Jump_Zero 0x1d0 01ca 00da | | Load_Top At_Offset_2 01cb e016 | | Load 0x0,0x16 01cc 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01cd c407 | | Store 0x2,0x7 01ce 4804 |H | Short_Literal 0x4 01cf 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 01d0 e00b | | Load 0x0,0xb 01d1 e014 | | Load 0x0,0x14 01d2 e406 | | Load 0x2,0x6 01d3 8212 | | Call 0x1,0x12 01d4 c404 | | Store 0x2,0x4 01d5 c402 | | Store 0x2,0x2 01d6 00db | | Load_Top At_Offset_3 01d7 8018 | | Call 0x0,0x18 01d8 c406 | | Store 0x2,0x6 01d9 e402 | | Load 0x2,0x2 01da 7006 |p | Jump_Nonzero 0x1e1 01db 00da | | Load_Top At_Offset_2 01dc e016 | | Load 0x0,0x16 01dd 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01de c407 | | Store 0x2,0x7 01df 4803 |H | Short_Literal 0x3 01e0 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 01e1 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define " 01e3 00db | | Load_Top At_Offset_3 01e4 e016 | | Load 0x0,0x16 01e5 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01e6 00d9 | | Load_Top At_Offset_1 01e7 e5fe | | Load 0x2,-0x2 01e8 01dc | | Execute Vector,Last 01e9 e5fe | | Load 0x2,-0x2 01ea 01cf | | Execute Vector,Slice_Read 01eb 00db | | Load_Top At_Offset_3 01ec e016 | | Load 0x0,0x16 01ed 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01ee 0092 0751 | Q| Action Push_String_Extended,0x751 ; "_width" 01f0 00db | | Load_Top At_Offset_3 01f1 e016 | | Load 0x0,0x16 01f2 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01f3 e019 | | Load 0x0,0x19 01f4 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01f5 e019 | | Load 0x0,0x19 01f6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01f7 e5fc | | Load 0x2,-0x4 01f8 e407 | | Load 0x2,0x7 01f9 e019 | | Load 0x0,0x19 01fa 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01fb 4801 |H | Short_Literal 0x1 01fc 00db | | Load_Top At_Offset_3 01fd e016 | | Load 0x0,0x16 01fe 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 01ff 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define " 0201 00db | | Load_Top At_Offset_3 0202 e016 | | Load 0x0,0x16 0203 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0204 00d9 | | Load_Top At_Offset_1 0205 e5fe | | Load 0x2,-0x2 0206 01dc | | Execute Vector,Last 0207 e5fe | | Load 0x2,-0x2 0208 01cf | | Execute Vector,Slice_Read 0209 00db | | Load_Top At_Offset_3 020a e016 | | Load 0x0,0x16 020b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 020c 0092 0752 | R| Action Push_String_Extended,0x752 ; "_height" 020e 00db | | Load_Top At_Offset_3 020f e016 | | Load 0x0,0x16 0210 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0211 e019 | | Load 0x0,0x19 0212 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0213 e019 | | Load 0x0,0x19 0214 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0215 e5fb | | Load 0x2,-0x5 0216 e407 | | Load 0x2,0x7 0217 e019 | | Load 0x0,0x19 0218 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0219 4801 |H | Short_Literal 0x1 021a 00db | | Load_Top At_Offset_3 021b e016 | | Load 0x0,0x16 021c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 021d e5fa | | Load 0x2,-0x6 021e 4fff |O | Short_Literal -0x1 021f 027e | ~ | Execute Discrete,Not_Equal 0220 683c |h< | Jump_Zero 0x25d 0221 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define " 0223 00db | | Load_Top At_Offset_3 0224 e016 | | Load 0x0,0x16 0225 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0226 00d9 | | Load_Top At_Offset_1 0227 e5fe | | Load 0x2,-0x2 0228 01dc | | Execute Vector,Last 0229 e5fe | | Load 0x2,-0x2 022a 01cf | | Execute Vector,Slice_Read 022b 00db | | Load_Top At_Offset_3 022c e016 | | Load 0x0,0x16 022d 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 022e 0092 0753 | S| Action Push_String_Extended,0x753 ; "_x_hot " 0230 00db | | Load_Top At_Offset_3 0231 e016 | | Load 0x0,0x16 0232 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0233 e019 | | Load 0x0,0x19 0234 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0235 e019 | | Load 0x0,0x19 0236 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0237 e5fa | | Load 0x2,-0x6 0238 e407 | | Load 0x2,0x7 0239 e019 | | Load 0x0,0x19 023a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 023b 4801 |H | Short_Literal 0x1 023c 00db | | Load_Top At_Offset_3 023d e016 | | Load 0x0,0x16 023e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 023f 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define " 0241 00db | | Load_Top At_Offset_3 0242 e016 | | Load 0x0,0x16 0243 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0244 00d9 | | Load_Top At_Offset_1 0245 e5fe | | Load 0x2,-0x2 0246 01dc | | Execute Vector,Last 0247 e5fe | | Load 0x2,-0x2 0248 01cf | | Execute Vector,Slice_Read 0249 00db | | Load_Top At_Offset_3 024a e016 | | Load 0x0,0x16 024b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 024c 0092 0754 | T| Action Push_String_Extended,0x754 ; "_y_hot " 024e 00db | | Load_Top At_Offset_3 024f e016 | | Load 0x0,0x16 0250 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0251 e019 | | Load 0x0,0x19 0252 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0253 e019 | | Load 0x0,0x19 0254 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0255 e5f9 | | Load 0x2,-0x7 0256 e407 | | Load 0x2,0x7 0257 e019 | | Load 0x0,0x19 0258 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0259 4801 |H | Short_Literal 0x1 025a 00db | | Load_Top At_Offset_3 025b e016 | | Load 0x0,0x16 025c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 025d 0092 0755 | U| Action Push_String_Extended,0x755 ; "static char " 025f 00db | | Load_Top At_Offset_3 0260 e016 | | Load 0x0,0x16 0261 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0262 00d9 | | Load_Top At_Offset_1 0263 e5fe | | Load 0x2,-0x2 0264 01dc | | Execute Vector,Last 0265 e5fe | | Load 0x2,-0x2 0266 01cf | | Execute Vector,Slice_Read 0267 00db | | Load_Top At_Offset_3 0268 e016 | | Load 0x0,0x16 0269 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 026a 0092 0756 | V| Action Push_String_Extended,0x756 ; "_bits() := {" 026c 00db | | Load_Top At_Offset_3 026d e016 | | Load 0x0,0x16 026e 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 026f 4801 |H | Short_Literal 0x1 0270 00db | | Load_Top At_Offset_3 0271 e016 | | Load 0x0,0x16 0272 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0273 e402 | | Load 0x2,0x2 0274 0227 | ' | Execute Access,All_Reference 0275 01dd | | Execute Vector,First 0276 c403 | | Store 0x2,0x3 0277 00cf | | Action Mark_Auxiliary 0278 e404 | | Load 0x2,0x4 0279 0aff | | Execute_Immediate Plus,-0x1 027a 4800 |H | Short_Literal 0x0 027b 0263 | c | Execute Discrete,Above_Bound 027c 703e |p> | Jump_Nonzero 0x2bb 027d 00d8 | | Load_Top At_Offset_0 027e 700a |p | Jump_Nonzero 0x289 027f 4801 |H | Short_Literal 0x1 0280 e407 | | Load 0x2,0x7 0281 e016 | | Load 0x0,0x16 0282 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0283 0092 0757 | W| Action Push_String_Extended,0x757 ; " " 0285 e407 | | Load 0x2,0x7 0286 e016 | | Load 0x0,0x16 0287 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0288 7813 |x | Jump 0x29c 0289 00d8 | | Load_Top At_Offset_0 028a 480c |H | Short_Literal 0xc 028b 026f | o | Execute Discrete,Remainder 028c 700a |p | Jump_Nonzero 0x297 028d 4801 |H | Short_Literal 0x1 028e e407 | | Load 0x2,0x7 028f e016 | | Load 0x0,0x16 0290 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0291 0092 0757 | W| Action Push_String_Extended,0x757 ; " " 0293 e407 | | Load 0x2,0x7 0294 e016 | | Load 0x0,0x16 0295 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0296 7805 |x | Jump 0x29c 0297 0092 0758 | X| Action Push_String_Extended,0x758 ; ", " 0299 e407 | | Load 0x2,0x7 029a e016 | | Load 0x0,0x16 029b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 029c e403 | | Load 0x2,0x3 029d e402 | | Load 0x2,0x2 029e 0227 | ' | Execute Access,All_Reference 029f 01d7 | | Execute Vector,Field_Read 02a0 a405 | | Store_Unchecked 0x2,0x5 02a1 e405 | | Load 0x2,0x5 02a2 0d10 | | Execute_Immediate Less,0x10 02a3 6806 |h | Jump_Zero 0x2aa 02a4 0092 0759 | Y| Action Push_String_Extended,0x759 ; "0x0" 02a6 e407 | | Load 0x2,0x7 02a7 e016 | | Load 0x0,0x16 02a8 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 02a9 7805 |x | Jump 0x2af 02aa 0092 075a | Z| Action Push_String_Extended,0x75a ; "0x" 02ac e407 | | Load 0x2,0x7 02ad e016 | | Load 0x0,0x16 02ae 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 02af 4810 |H | Short_Literal 0x10 02b0 e019 | | Load 0x0,0x19 02b1 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02b2 e405 | | Load 0x2,0x5 02b3 e407 | | Load 0x2,0x7 02b4 e019 | | Load 0x0,0x19 02b5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02b6 e403 | | Load 0x2,0x3 02b7 0a01 | | Execute_Immediate Plus,0x1 02b8 c403 | | Store 0x2,0x3 02b9 00c8 | | Action Pop_Auxiliary_Range 02ba 3fc2 |? | Loop_Increasing 0x27d 02bb 00ce | | Action Pop_Auxiliary 02bc 0092 075b | [| Action Push_String_Extended,0x75b ; "}" 02be 00db | | Load_Top At_Offset_3 02bf e016 | | Load 0x0,0x16 02c0 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 02c1 4801 |H | Short_Literal 0x1 02c2 00db | | Load_Top At_Offset_3 02c3 e016 | | Load 0x0,0x16 02c4 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 02c5 e402 | | Load 0x2,0x2 02c6 e00d | | Load 0x0,0xd 02c7 e00e | | Load 0x0,0xe 02c8 a00f | | Store_Unchecked 0x0,0xf 02c9 8010 | | Call 0x0,0x10 02ca c402 | | Store 0x2,0x2 02cb 00da | | Load_Top At_Offset_2 02cc e016 | | Load 0x0,0x16 02cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02ce c407 | | Store 0x2,0x7 02cf 4800 |H | Short_Literal 0x0 02d0 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 02d1 TRAP_0188: 02d1 0007 | | Action Break_Optional 02d2 e402 | | Load 0x2,0x2 02d3 e00d | | Load 0x0,0xd 02d4 e00e | | Load 0x0,0xe 02d5 a00f | | Store_Unchecked 0x0,0xf 02d6 8010 | | Call 0x0,0x10 02d7 c402 | | Store 0x2,0x2 02d8 00db | | Load_Top At_Offset_3 02d9 e016 | | Load 0x0,0x16 02da 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02db c407 | | Store 0x2,0x7 02dc 00d8 | | Load_Top At_Offset_0 02dd 0101 | | Execute Exception,Reraise 02de 0000 0000 | | .XXX[0x2] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 0315 | | .CONST 0x0315 ; Address of begin 02e1 0520 | | .CONST 0x0520 ; Address of exception handler 02e2 0019 | | .CONST 0x0019 ; Number of locals 02e3 INIT_02e0: 02e3 e016 | | Load 0x0,0x16 02e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02e5 02c7 | | Declare_Variable Any 02e6 00d8 | | Load_Top At_Offset_0 02e7 1c00 | | Execute_Immediate Run_Utility,0x0 02e8 e00b | | Load 0x0,0xb 02e9 0007 | | Action Break_Optional 02ea e014 | | Load 0x0,0x14 02eb 0007 | | Action Break_Optional 02ec 4801 |H | Short_Literal 0x1 02ed 4be8 |K | Short_Literal 0x3e8 02ee 00e9 | | Load_Encached String_Cache 02ef 035b | [ | Declare_Type Array,Constrained 02f0 0337 | 7 | Declare_Variable Array 02f1 00e3 | | Load_Encached Natural_Cache 02f2 00e3 | | Load_Encached Natural_Cache 02f3 e014 | | Load 0x0,0x14 02f4 0007 | | Action Break_Optional 02f5 e014 | | Load 0x0,0x14 02f6 0007 | | Action Break_Optional 02f7 00e3 | | Load_Encached Natural_Cache 02f8 00e3 | | Load_Encached Natural_Cache 02f9 00e3 | | Load_Encached Natural_Cache 02fa e01a | | Load 0x0,0x1a 02fb 0007 | | Action Break_Optional 02fc e01a | | Load 0x0,0x1a 02fd 0007 | | Action Break_Optional 02fe 00e1 | | Load_Encached Boolean_Cache 02ff e014 | | Load 0x0,0x14 0300 0007 | | Action Break_Optional 0301 e014 | | Load 0x0,0x14 0302 0007 | | Action Break_Optional 0303 e01b | | Load 0x0,0x1b 0304 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0305 e01b | | Load 0x0,0x1b 0306 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0307 4fff |O | Short_Literal -0x1 0308 e01c | | Load 0x0,0x1c 0309 03f1 | | Declare_Variable Discrete,With_Value 030a 4fff |O | Short_Literal -0x1 030b e01c | | Load 0x0,0x1c 030c 03f1 | | Declare_Variable Discrete,With_Value 030d e004 | | Load 0x0,0x4 030e 0322 | " | Declare_Variable Record 030f 029f 06f3 | | Declare_Subprogram INIT_06f0,For_Call 0311 029f 0703 | | Declare_Subprogram INIT_0700,For_Call 0313 029f 071b | | Declare_Subprogram INIT_0718,For_Call 0315 BODY_02e0: 0315 00be | | Action Activate_Tasks 0316 8417 | | Call 0x2,0x17 0317 00cf | | Action Mark_Auxiliary 0318 79d0 |y | Jump 0x4e9 0319 00e3 | | Load_Encached Natural_Cache 031a e405 | | Load 0x2,0x5 031b e402 | | Load 0x2,0x2 031c e016 | | Load 0x0,0x16 031d 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 031e 00d1 | | Pop_Control Pop_Count_1 031f c407 | | Store 0x2,0x7 0320 e402 | | Load 0x2,0x2 0321 e016 | | Load 0x0,0x16 0322 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0323 7002 |p | Jump_Nonzero 0x326 0324 e211 | | Load 0x1,0x11 0325 0257 | W | Execute Discrete,Raise 0326 4801 |H | Short_Literal 0x1 0327 a406 | | Store_Unchecked 0x2,0x6 0328 e406 | | Load 0x2,0x6 0329 4800 |H | Short_Literal 0x0 032a 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define " 032c e407 | | Load 0x2,0x7 032d e405 | | Load 0x2,0x5 032e 8214 | | Call 0x1,0x14 032f c406 | | Store 0x2,0x6 0330 e406 | | Load 0x2,0x6 0331 0c02 | | Execute_Immediate Greater_Equal,0x2 0332 6881 |h | Jump_Zero 0x3b4 0333 00e3 | | Load_Encached Natural_Cache 0334 00e3 | | Load_Encached Natural_Cache 0335 e406 | | Load 0x2,0x6 0336 e407 | | Load 0x2,0x7 0337 e405 | | Load 0x2,0x5 0338 8216 | | Call 0x1,0x16 0339 c406 | | Store 0x2,0x6 033a c40a | | Store 0x2,0xa 033b c40b | | Store 0x2,0xb 033c e406 | | Load 0x2,0x6 033d 4801 |H | Short_Literal 0x1 033e 0092 0757 | W| Action Push_String_Extended,0x757 ; " " 0340 e407 | | Load 0x2,0x7 0341 e405 | | Load 0x2,0x5 0342 8214 | | Call 0x1,0x14 0343 c406 | | Store 0x2,0x6 0344 e01a | | Load 0x0,0x1a 0345 e406 | | Load 0x2,0x6 0346 e407 | | Load 0x2,0x7 0347 e405 | | Load 0x2,0x5 0348 8217 | | Call 0x1,0x17 0349 c406 | | Store 0x2,0x6 034a c40d | | Store 0x2,0xd 034b e40a | | Load 0x2,0xa 034c a40c | | Store_Unchecked 0x2,0xc 034d 00cf | | Action Mark_Auxiliary 034e e40a | | Load 0x2,0xa 034f e40b | | Load 0x2,0xb 0350 0264 | d | Execute Discrete,Below_Bound 0351 700c |p | Jump_Nonzero 0x35e 0352 00d8 | | Load_Top At_Offset_0 0353 e405 | | Load 0x2,0x5 0354 01d7 | | Execute Vector,Field_Read 0355 0f5f | _ | Execute_Immediate Equal,0x5f 0356 6805 |h | Jump_Zero 0x35c 0357 00d8 | | Load_Top At_Offset_0 0358 0a01 | | Execute_Immediate Plus,0x1 0359 c40c | | Store 0x2,0xc 035a 00d2 | | Pop_Control Pop_Count_2 035b 7802 |x | Jump 0x35e 035c 00c8 | | Action Pop_Auxiliary_Range 035d 37f4 |7 | Loop_Decreasing 0x352 035e 00ce | | Action Pop_Auxiliary 035f 0092 075c | \| Action Push_String_Extended,0x75c ; "width" 0361 e40c | | Load 0x2,0xc 0362 e40b | | Load 0x2,0xb 0363 e405 | | Load 0x2,0x5 0364 01cf | | Execute Vector,Slice_Read 0365 01de | | Execute Vector,Not_Equal 0366 6807 |h | Jump_Zero 0x36e 0367 e40d | | Load 0x2,0xd 0368 00d8 | | Load_Top At_Offset_0 0369 e01b | | Load 0x0,0x1b 036a 0260 | ` | Execute Discrete,In_Type 036b 7001 |p | Jump_Nonzero 0x36d 036c 0801 | | Execute_Immediate Raise,0x1 036d a412 | | Store_Unchecked 0x2,0x12 036e 0092 075d | ]| Action Push_String_Extended,0x75d ; "height" 0370 e40c | | Load 0x2,0xc 0371 e40b | | Load 0x2,0xb 0372 e405 | | Load 0x2,0x5 0373 01cf | | Execute Vector,Slice_Read 0374 01de | | Execute Vector,Not_Equal 0375 6807 |h | Jump_Zero 0x37d 0376 e40d | | Load 0x2,0xd 0377 00d8 | | Load_Top At_Offset_0 0378 e01b | | Load 0x0,0x1b 0379 0260 | ` | Execute Discrete,In_Type 037a 7001 |p | Jump_Nonzero 0x37c 037b 0801 | | Execute_Immediate Raise,0x1 037c a413 | | Store_Unchecked 0x2,0x13 037d 0092 075e | ^| Action Push_String_Extended,0x75e ; "hot" 037f e40c | | Load 0x2,0xc 0380 e40b | | Load 0x2,0xb 0381 e405 | | Load 0x2,0x5 0382 01cf | | Execute Vector,Slice_Read 0383 01de | | Execute Vector,Not_Equal 0384 6962 |ib | Jump_Zero 0x4e7 0385 e40c | | Load 0x2,0xc 0386 0aff | | Execute_Immediate Plus,-0x1 0387 c40c | | Store 0x2,0xc 0388 e40c | | Load 0x2,0xc 0389 e40a | | Load 0x2,0xa 038a 027f | | Execute Discrete,Equal 038b 6801 |h | Jump_Zero 0x38d 038c 795a |yZ | Jump 0x4e7 038d e40c | | Load 0x2,0xc 038e 0aff | | Execute_Immediate Plus,-0x1 038f c40c | | Store 0x2,0xc 0390 e40c | | Load 0x2,0xc 0391 e40a | | Load 0x2,0xa 0392 027f | | Execute Discrete,Equal 0393 6801 |h | Jump_Zero 0x395 0394 7952 |yR | Jump 0x4e7 0395 0092 075f | _| Action Push_String_Extended,0x75f ; "x_hot" 0397 e40c | | Load 0x2,0xc 0398 e40b | | Load 0x2,0xb 0399 e405 | | Load 0x2,0x5 039a 01cf | | Execute Vector,Slice_Read 039b 01de | | Execute Vector,Not_Equal 039c 6807 |h | Jump_Zero 0x3a4 039d e40d | | Load 0x2,0xd 039e 00d8 | | Load_Top At_Offset_0 039f e01c | | Load 0x0,0x1c 03a0 0260 | ` | Execute Discrete,In_Type 03a1 7001 |p | Jump_Nonzero 0x3a3 03a2 0801 | | Execute_Immediate Raise,0x1 03a3 a414 | | Store_Unchecked 0x2,0x14 03a4 0092 0760 | `| Action Push_String_Extended,0x760 ; "y_hot" 03a6 e40c | | Load 0x2,0xc 03a7 e40b | | Load 0x2,0xb 03a8 e405 | | Load 0x2,0x5 03a9 01cf | | Execute Vector,Slice_Read 03aa 01de | | Execute Vector,Not_Equal 03ab 693b |i; | Jump_Zero 0x4e7 03ac e40d | | Load 0x2,0xd 03ad 00d8 | | Load_Top At_Offset_0 03ae e01c | | Load 0x0,0x1c 03af 0260 | ` | Execute Discrete,In_Type 03b0 7001 |p | Jump_Nonzero 0x3b2 03b1 0801 | | Execute_Immediate Raise,0x1 03b2 a415 | | Store_Unchecked 0x2,0x15 03b3 7933 |y3 | Jump 0x4e7 03b4 e406 | | Load 0x2,0x6 03b5 4800 |H | Short_Literal 0x0 03b6 0092 0761 | a| Action Push_String_Extended,0x761 ; "static short " 03b8 e407 | | Load 0x2,0x7 03b9 e405 | | Load 0x2,0x5 03ba 8214 | | Call 0x1,0x14 03bb c406 | | Store 0x2,0x6 03bc e406 | | Load 0x2,0x6 03bd 0c02 | | Execute_Immediate Greater_Equal,0x2 03be 6803 |h | Jump_Zero 0x3c2 03bf 4801 |H | Short_Literal 0x1 03c0 a40f | | Store_Unchecked 0x2,0xf 03c1 781c |x | Jump 0x3de 03c2 e406 | | Load 0x2,0x6 03c3 4800 |H | Short_Literal 0x0 03c4 0092 0762 | b| Action Push_String_Extended,0x762 ; "static unsigned char " 03c6 e407 | | Load 0x2,0x7 03c7 e405 | | Load 0x2,0x5 03c8 8214 | | Call 0x1,0x14 03c9 c406 | | Store 0x2,0x6 03ca e406 | | Load 0x2,0x6 03cb 0c02 | | Execute_Immediate Greater_Equal,0x2 03cc 6803 |h | Jump_Zero 0x3d0 03cd 4800 |H | Short_Literal 0x0 03ce a40f | | Store_Unchecked 0x2,0xf 03cf 780e |x | Jump 0x3de 03d0 e406 | | Load 0x2,0x6 03d1 4800 |H | Short_Literal 0x0 03d2 0092 0755 | U| Action Push_String_Extended,0x755 ; "static char " 03d4 e407 | | Load 0x2,0x7 03d5 e405 | | Load 0x2,0x5 03d6 8214 | | Call 0x1,0x14 03d7 c406 | | Store 0x2,0x6 03d8 e406 | | Load 0x2,0x6 03d9 0c02 | | Execute_Immediate Greater_Equal,0x2 03da 690c |i | Jump_Zero 0x4e7 03db 4800 |H | Short_Literal 0x0 03dc a40f | | Store_Unchecked 0x2,0xf 03dd 7800 |x | Jump 0x3de 03de 00e3 | | Load_Encached Natural_Cache 03df 00e3 | | Load_Encached Natural_Cache 03e0 e406 | | Load 0x2,0x6 03e1 e407 | | Load 0x2,0x7 03e2 e405 | | Load 0x2,0x5 03e3 8216 | | Call 0x1,0x16 03e4 c406 | | Store 0x2,0x6 03e5 c40a | | Store 0x2,0xa 03e6 c40b | | Store 0x2,0xb 03e7 e406 | | Load 0x2,0x6 03e8 4801 |H | Short_Literal 0x1 03e9 0092 0763 | c| Action Push_String_Extended,0x763 ; " := {" 03eb e407 | | Load 0x2,0x7 03ec e405 | | Load 0x2,0x5 03ed 8214 | | Call 0x1,0x14 03ee c406 | | Store 0x2,0x6 03ef e40a | | Load 0x2,0xa 03f0 a40c | | Store_Unchecked 0x2,0xc 03f1 00cf | | Action Mark_Auxiliary 03f2 e40a | | Load 0x2,0xa 03f3 e40b | | Load 0x2,0xb 03f4 0264 | d | Execute Discrete,Below_Bound 03f5 700c |p | Jump_Nonzero 0x402 03f6 00d8 | | Load_Top At_Offset_0 03f7 e405 | | Load 0x2,0x5 03f8 01d7 | | Execute Vector,Field_Read 03f9 0f5f | _ | Execute_Immediate Equal,0x5f 03fa 6805 |h | Jump_Zero 0x400 03fb 00d8 | | Load_Top At_Offset_0 03fc 0a01 | | Execute_Immediate Plus,0x1 03fd c40c | | Store 0x2,0xc 03fe 00d2 | | Pop_Control Pop_Count_2 03ff 7802 |x | Jump 0x402 0400 00c8 | | Action Pop_Auxiliary_Range 0401 37f4 |7 | Loop_Decreasing 0x3f6 0402 00ce | | Action Pop_Auxiliary 0403 0092 0764 | d| Action Push_String_Extended,0x764 ; "bits()" 0405 e40c | | Load 0x2,0xc 0406 e40b | | Load 0x2,0xb 0407 e405 | | Load 0x2,0x5 0408 01cf | | Execute Vector,Slice_Read 0409 01df | | Execute Vector,Equal 040a 6801 |h | Jump_Zero 0x40c 040b 78db |x | Jump 0x4e7 040c e412 | | Load 0x2,0x12 040d 7002 |p | Jump_Nonzero 0x410 040e e413 | | Load 0x2,0x13 040f 6802 |h | Jump_Zero 0x412 0410 e211 | | Load 0x1,0x11 0411 0257 | W | Execute Discrete,Raise 0412 4801 |H | Short_Literal 0x1 0413 a410 | | Store_Unchecked 0x2,0x10 0414 e412 | | Load 0x2,0x12 0415 0a07 | | Execute_Immediate Plus,0x7 0416 00d8 | | Load_Top At_Offset_0 0417 e014 | | Load 0x0,0x14 0418 0260 | ` | Execute Discrete,In_Type 0419 7001 |p | Jump_Nonzero 0x41b 041a 0801 | | Execute_Immediate Raise,0x1 041b 09fd | | Execute_Immediate Binary_Scale,-0x3 041c e410 | | Load 0x2,0x10 041d 0273 | s | Execute Discrete,Plus 041e c411 | | Store 0x2,0x11 041f e411 | | Load 0x2,0x11 0420 e413 | | Load 0x2,0x13 0421 0271 | q | Execute Discrete,Times 0422 c408 | | Store 0x2,0x8 0423 8418 | | Call 0x2,0x18 0424 e40f | | Load 0x2,0xf 0425 6872 |hr | Jump_Zero 0x498 0426 4800 |H | Short_Literal 0x0 0427 a409 | | Store_Unchecked 0x2,0x9 0428 e403 | | Load 0x2,0x3 0429 0227 | ' | Execute Access,All_Reference 042a 01dd | | Execute Vector,First 042b c404 | | Store 0x2,0x4 042c 00cf | | Action Mark_Auxiliary 042d 7864 |xd | Jump 0x492 042e e406 | | Load 0x2,0x6 042f e407 | | Load 0x2,0x7 0430 027d | } | Execute Discrete,Greater 0431 6817 |h | Jump_Zero 0x449 0432 e409 | | Load 0x2,0x9 0433 e408 | | Load 0x2,0x8 0434 027c | | | Execute Discrete,Less 0435 6813 |h | Jump_Zero 0x449 0436 e402 | | Load 0x2,0x2 0437 e016 | | Load 0x0,0x16 0438 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0439 6802 |h | Jump_Zero 0x43c 043a e211 | | Load 0x1,0x11 043b 0257 | W | Execute Discrete,Raise 043c 00e3 | | Load_Encached Natural_Cache 043d e405 | | Load 0x2,0x5 043e e402 | | Load 0x2,0x2 043f e016 | | Load 0x0,0x16 0440 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 0441 00d1 | | Pop_Control Pop_Count_1 0442 c407 | | Store 0x2,0x7 0443 e402 | | Load 0x2,0x2 0444 e016 | | Load 0x0,0x16 0445 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0446 7002 |p | Jump_Nonzero 0x449 0447 e211 | | Load 0x1,0x11 0448 0257 | W | Execute Discrete,Raise 0449 e406 | | Load 0x2,0x6 044a 4801 |H | Short_Literal 0x1 044b 0092 0765 | e| Action Push_String_Extended,0x765 ; " 0x" 044d e407 | | Load 0x2,0x7 044e e405 | | Load 0x2,0x5 044f 8214 | | Call 0x1,0x14 0450 c406 | | Store 0x2,0x6 0451 e01a | | Load 0x0,0x1a 0452 e406 | | Load 0x2,0x6 0453 e407 | | Load 0x2,0x7 0454 e405 | | Load 0x2,0x5 0455 8218 | | Call 0x1,0x18 0456 c406 | | Store 0x2,0x6 0457 c40e | | Store 0x2,0xe 0458 e406 | | Load 0x2,0x6 0459 0092 0766 | f| Action Push_String_Extended,0x766 ; ",}" 045b e407 | | Load 0x2,0x7 045c e405 | | Load 0x2,0x5 045d 8215 | | Call 0x1,0x15 045e c406 | | Store 0x2,0x6 045f e406 | | Load 0x2,0x6 0460 e407 | | Load 0x2,0x7 0461 027a | z | Execute Discrete,Less_Equal 0462 6807 |h | Jump_Zero 0x46a 0463 e406 | | Load 0x2,0x6 0464 0092 0757 | W| Action Push_String_Extended,0x757 ; " " 0466 e407 | | Load 0x2,0x7 0467 e405 | | Load 0x2,0x5 0468 8215 | | Call 0x1,0x15 0469 c406 | | Store 0x2,0x6 046a e404 | | Load 0x2,0x4 046b 0a01 | | Execute_Immediate Plus,0x1 046c c404 | | Store 0x2,0x4 046d e40e | | Load 0x2,0xe 046e 4900 |I | Short_Literal 0x100 046f 026f | o | Execute Discrete,Remainder 0470 00d8 | | Load_Top At_Offset_0 0471 e015 | | Load 0x0,0x15 0472 0260 | ` | Execute Discrete,In_Type 0473 7001 |p | Jump_Nonzero 0x475 0474 0801 | | Execute_Immediate Raise,0x1 0475 e404 | | Load 0x2,0x4 0476 e403 | | Load 0x2,0x3 0477 0227 | ' | Execute Access,All_Reference 0478 01d6 | | Execute Vector,Field_Write 0479 e410 | | Load 0x2,0x10 047a 6805 |h | Jump_Zero 0x480 047b e409 | | Load 0x2,0x9 047c 0a02 | | Execute_Immediate Plus,0x2 047d e411 | | Load 0x2,0x11 047e 026f | o | Execute Discrete,Remainder 047f 680e |h | Jump_Zero 0x48e 0480 e404 | | Load 0x2,0x4 0481 0a01 | | Execute_Immediate Plus,0x1 0482 c404 | | Store 0x2,0x4 0483 e40e | | Load 0x2,0xe 0484 09f8 | | Execute_Immediate Binary_Scale,-0x8 0485 00d8 | | Load_Top At_Offset_0 0486 e015 | | Load 0x0,0x15 0487 0260 | ` | Execute Discrete,In_Type 0488 7001 |p | Jump_Nonzero 0x48a 0489 0801 | | Execute_Immediate Raise,0x1 048a e404 | | Load 0x2,0x4 048b e403 | | Load 0x2,0x3 048c 0227 | ' | Execute Access,All_Reference 048d 01d6 | | Execute Vector,Field_Write 048e e409 | | Load 0x2,0x9 048f 0a02 | | Execute_Immediate Plus,0x2 0490 c409 | | Store 0x2,0x9 0491 00c9 | | Action Pop_Auxiliary_Loop 0492 e409 | | Load 0x2,0x9 0493 e408 | | Load 0x2,0x8 0494 027c | | | Execute Discrete,Less 0495 7798 |w | Jump_Nonzero 0x42e 0496 00ce | | Action Pop_Auxiliary 0497 784f |xO | Jump 0x4e7 0498 00cf | | Action Mark_Auxiliary 0499 e403 | | Load 0x2,0x3 049a 0227 | ' | Execute Access,All_Reference 049b 01d9 | | Execute Vector,Reverse_Bounds 049c 0263 | c | Execute Discrete,Above_Bound 049d 7048 |pH | Jump_Nonzero 0x4e6 049e e406 | | Load 0x2,0x6 049f e407 | | Load 0x2,0x7 04a0 027d | } | Execute Discrete,Greater 04a1 6817 |h | Jump_Zero 0x4b9 04a2 e409 | | Load 0x2,0x9 04a3 e408 | | Load 0x2,0x8 04a4 027c | | | Execute Discrete,Less 04a5 6813 |h | Jump_Zero 0x4b9 04a6 e402 | | Load 0x2,0x2 04a7 e016 | | Load 0x0,0x16 04a8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 04a9 6802 |h | Jump_Zero 0x4ac 04aa e211 | | Load 0x1,0x11 04ab 0257 | W | Execute Discrete,Raise 04ac 00e3 | | Load_Encached Natural_Cache 04ad e405 | | Load 0x2,0x5 04ae e402 | | Load 0x2,0x2 04af e016 | | Load 0x0,0x16 04b0 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 04b1 00d1 | | Pop_Control Pop_Count_1 04b2 c407 | | Store 0x2,0x7 04b3 e402 | | Load 0x2,0x2 04b4 e016 | | Load 0x0,0x16 04b5 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 04b6 7002 |p | Jump_Nonzero 0x4b9 04b7 e211 | | Load 0x1,0x11 04b8 0257 | W | Execute Discrete,Raise 04b9 e406 | | Load 0x2,0x6 04ba 4801 |H | Short_Literal 0x1 04bb 0092 0765 | e| Action Push_String_Extended,0x765 ; " 0x" 04bd e407 | | Load 0x2,0x7 04be e405 | | Load 0x2,0x5 04bf 8214 | | Call 0x1,0x14 04c0 c406 | | Store 0x2,0x6 04c1 e01a | | Load 0x0,0x1a 04c2 e406 | | Load 0x2,0x6 04c3 e407 | | Load 0x2,0x7 04c4 e405 | | Load 0x2,0x5 04c5 8218 | | Call 0x1,0x18 04c6 c406 | | Store 0x2,0x6 04c7 c40e | | Store 0x2,0xe 04c8 e406 | | Load 0x2,0x6 04c9 0092 0766 | f| Action Push_String_Extended,0x766 ; ",}" 04cb e407 | | Load 0x2,0x7 04cc e405 | | Load 0x2,0x5 04cd 8215 | | Call 0x1,0x15 04ce c406 | | Store 0x2,0x6 04cf e406 | | Load 0x2,0x6 04d0 e407 | | Load 0x2,0x7 04d1 027a | z | Execute Discrete,Less_Equal 04d2 6807 |h | Jump_Zero 0x4da 04d3 e406 | | Load 0x2,0x6 04d4 0092 0757 | W| Action Push_String_Extended,0x757 ; " " 04d6 e407 | | Load 0x2,0x7 04d7 e405 | | Load 0x2,0x5 04d8 8215 | | Call 0x1,0x15 04d9 c406 | | Store 0x2,0x6 04da e40e | | Load 0x2,0xe 04db 00d8 | | Load_Top At_Offset_0 04dc e015 | | Load 0x0,0x15 04dd 0260 | ` | Execute Discrete,In_Type 04de 7001 |p | Jump_Nonzero 0x4e0 04df 0801 | | Execute_Immediate Raise,0x1 04e0 00d9 | | Load_Top At_Offset_1 04e1 e403 | | Load 0x2,0x3 04e2 0227 | ' | Execute Access,All_Reference 04e3 01d6 | | Execute Vector,Field_Write 04e4 00c8 | | Action Pop_Auxiliary_Range 04e5 3fb8 |? | Loop_Increasing 0x49e 04e6 00ce | | Action Pop_Auxiliary 04e7 0008 | | Action Idle 04e8 00c9 | | Action Pop_Auxiliary_Loop 04e9 e402 | | Load 0x2,0x2 04ea e016 | | Load 0x0,0x16 04eb 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 04ec 6e2c |n, | Jump_Zero 0x319 04ed 00ce | | Action Pop_Auxiliary 04ee e403 | | Load 0x2,0x3 04ef 7008 |p | Jump_Nonzero 0x4f8 04f0 e402 | | Load 0x2,0x2 04f1 e403 | | Load 0x2,0x3 04f2 8213 | | Call 0x1,0x13 04f3 c403 | | Store 0x2,0x3 04f4 c402 | | Store 0x2,0x2 04f5 4802 |H | Short_Literal 0x2 04f6 a5f7 | | Store_Unchecked 0x2,-0x9 04f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04f8 e413 | | Load 0x2,0x13 04f9 e412 | | Load 0x2,0x12 04fa e403 | | Load 0x2,0x3 04fb 0227 | ' | Execute Access,All_Reference 04fc e5fe | | Load 0x2,-0x2 04fd e5ff | | Load 0x2,-0x1 04fe 820d | | Call 0x1,0xd 04ff e416 | | Load 0x2,0x16 0500 017d | } | Execute Record,Structure_Write 0501 00db | | Load_Top At_Offset_3 0502 e008 | | Load 0x0,0x8 0503 017f | | Execute Record,Equal 0504 6808 |h | Jump_Zero 0x50d 0505 e402 | | Load 0x2,0x2 0506 e403 | | Load 0x2,0x3 0507 8213 | | Call 0x1,0x13 0508 c403 | | Store 0x2,0x3 0509 c402 | | Store 0x2,0x2 050a 4803 |H | Short_Literal 0x3 050b a5f7 | | Store_Unchecked 0x2,-0x9 050c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 050d 00db | | Load_Top At_Offset_3 050e e5fa | | Load 0x2,-0x6 050f 017d | } | Execute Record,Structure_Write 0510 e412 | | Load 0x2,0x12 0511 a5fc | | Store_Unchecked 0x2,-0x4 0512 e413 | | Load 0x2,0x13 0513 a5fb | | Store_Unchecked 0x2,-0x5 0514 e414 | | Load 0x2,0x14 0515 a5f9 | | Store_Unchecked 0x2,-0x7 0516 e415 | | Load 0x2,0x15 0517 a5f8 | | Store_Unchecked 0x2,-0x8 0518 e402 | | Load 0x2,0x2 0519 e403 | | Load 0x2,0x3 051a 8213 | | Call 0x1,0x13 051b c403 | | Store 0x2,0x3 051c c402 | | Store 0x2,0x2 051d 4800 |H | Short_Literal 0x0 051e a5f7 | | Store_Unchecked 0x2,-0x9 051f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0520 TRAP_02e0: 0520 0007 | | Action Break_Optional 0521 8419 | | Call 0x2,0x19 0522 4800 |H | Short_Literal 0x0 0523 a5fc | | Store_Unchecked 0x2,-0x4 0524 4800 |H | Short_Literal 0x0 0525 a5fb | | Store_Unchecked 0x2,-0x5 0526 e008 | | Load 0x0,0x8 0527 e5fa | | Load 0x2,-0x6 0528 017d | } | Execute Record,Structure_Write 0529 4800 |H | Short_Literal 0x0 052a a5f9 | | Store_Unchecked 0x2,-0x7 052b 4800 |H | Short_Literal 0x0 052c a5f8 | | Store_Unchecked 0x2,-0x8 052d 4802 |H | Short_Literal 0x2 052e a5f7 | | Store_Unchecked 0x2,-0x9 052f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0542 | B | .CONST 0x0542 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0009 | | .CONST 0x0009 ; Number of locals 0533 INIT_0530: 0533 e015 | | Load 0x0,0x15 0534 0007 | | Action Break_Optional 0535 e015 | | Load 0x0,0x15 0536 0007 | | Action Break_Optional 0537 e014 | | Load 0x0,0x14 0538 0007 | | Action Break_Optional 0539 e00b | | Load 0x0,0xb 053a 0007 | | Action Break_Optional 053b e01b | | Load 0x0,0x1b 053c 0007 | | Action Break_Optional 053d e01b | | Load 0x0,0x1b 053e 0007 | | Action Break_Optional 053f e01b | | Load 0x0,0x1b 0540 029f 072b | +| Declare_Subprogram INIT_0728,For_Call 0542 BODY_0530: 0542 e5ff | | Load 0x2,-0x1 0543 0227 | ' | Execute Access,All_Reference 0544 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0545 a406 | | Store_Unchecked 0x2,0x6 0546 e5ff | | Load 0x2,-0x1 0547 0227 | ' | Execute Access,All_Reference 0548 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0549 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 054a 00db | | Load_Top At_Offset_3 054b 0a07 | | Execute_Immediate Plus,0x7 054c 09fd | | Execute_Immediate Binary_Scale,-0x3 054d 005a | Z | Store_Top Discrete,At_Offset_2 054e 00d9 | | Load_Top At_Offset_1 054f 00db | | Load_Top At_Offset_3 0550 0271 | q | Execute Discrete,Times 0551 c5fe | | Store 0x2,-0x2 0552 8409 | | Call 0x2,0x9 0553 e405 | | Load 0x2,0x5 0554 0227 | ' | Execute Access,All_Reference 0555 01dd | | Execute Vector,First 0556 c404 | | Store 0x2,0x4 0557 4800 |H | Short_Literal 0x0 0558 a402 | | Store_Unchecked 0x2,0x2 0559 4801 |H | Short_Literal 0x1 055a a403 | | Store_Unchecked 0x2,0x3 055b 00cf | | Action Mark_Auxiliary 055c 00db | | Load_Top At_Offset_3 055d 00d8 | | Load_Top At_Offset_0 055e e01c | | Load 0x0,0x1c 055f 0260 | ` | Execute Discrete,In_Type 0560 7001 |p | Jump_Nonzero 0x562 0561 0801 | | Execute_Immediate Raise,0x1 0562 0aff | | Execute_Immediate Plus,-0x1 0563 4800 |H | Short_Literal 0x0 0564 0263 | c | Execute Discrete,Above_Bound 0565 703d |p= | Jump_Nonzero 0x5a3 0566 00cf | | Action Mark_Auxiliary 0567 e406 | | Load 0x2,0x6 0568 00d8 | | Load_Top At_Offset_0 0569 e01c | | Load 0x0,0x1c 056a 0260 | ` | Execute Discrete,In_Type 056b 7001 |p | Jump_Nonzero 0x56d 056c 0801 | | Execute_Immediate Raise,0x1 056d 0aff | | Execute_Immediate Plus,-0x1 056e 4800 |H | Short_Literal 0x0 056f 0263 | c | Execute Discrete,Above_Bound 0570 7020 |p | Jump_Nonzero 0x591 0571 00db | | Load_Top At_Offset_3 0572 00d9 | | Load_Top At_Offset_1 0573 e5ff | | Load 0x2,-0x1 0574 801d | | Call 0x0,0x1d 0575 6804 |h | Jump_Zero 0x57a 0576 e402 | | Load 0x2,0x2 0577 e403 | | Load 0x2,0x3 0578 0273 | s | Execute Discrete,Plus 0579 c402 | | Store 0x2,0x2 057a e403 | | Load 0x2,0x3 057b 00d8 | | Load_Top At_Offset_0 057c 0273 | s | Execute Discrete,Plus 057d c403 | | Store 0x2,0x3 057e 00d8 | | Load_Top At_Offset_0 057f 4808 |H | Short_Literal 0x8 0580 026f | o | Execute Discrete,Remainder 0581 0f07 | | Execute_Immediate Equal,0x7 0582 680c |h | Jump_Zero 0x58f 0583 e402 | | Load 0x2,0x2 0584 e404 | | Load 0x2,0x4 0585 e405 | | Load 0x2,0x5 0586 0227 | ' | Execute Access,All_Reference 0587 01d6 | | Execute Vector,Field_Write 0588 e404 | | Load 0x2,0x4 0589 0a01 | | Execute_Immediate Plus,0x1 058a c404 | | Store 0x2,0x4 058b 4800 |H | Short_Literal 0x0 058c a402 | | Store_Unchecked 0x2,0x2 058d 4801 |H | Short_Literal 0x1 058e a403 | | Store_Unchecked 0x2,0x3 058f 00c8 | | Action Pop_Auxiliary_Range 0590 3fe0 |? | Loop_Increasing 0x571 0591 00ce | | Action Pop_Auxiliary 0592 e403 | | Load 0x2,0x3 0593 0e01 | | Execute_Immediate Not_Equal,0x1 0594 680c |h | Jump_Zero 0x5a1 0595 e402 | | Load 0x2,0x2 0596 e404 | | Load 0x2,0x4 0597 e405 | | Load 0x2,0x5 0598 0227 | ' | Execute Access,All_Reference 0599 01d6 | | Execute Vector,Field_Write 059a e404 | | Load 0x2,0x4 059b 0a01 | | Execute_Immediate Plus,0x1 059c c404 | | Store 0x2,0x4 059d 4800 |H | Short_Literal 0x0 059e a402 | | Store_Unchecked 0x2,0x2 059f 4801 |H | Short_Literal 0x1 05a0 a403 | | Store_Unchecked 0x2,0x3 05a1 00c8 | | Action Pop_Auxiliary_Range 05a2 3fc3 |? | Loop_Increasing 0x566 05a3 00ce | | Action Pop_Auxiliary 05a4 e405 | | Load 0x2,0x5 05a5 a5fd | | Store_Unchecked 0x2,-0x3 05a6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05a7 0000 | | .XXX[0x1] 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab 00da | | Load_Top At_Offset_2 05ac 6806 |h | Jump_Zero 0x5b3 05ad 00da | | Load_Top At_Offset_2 05ae e00d | | Load 0x0,0xd 05af e00e | | Load 0x0,0xe 05b0 a00f | | Store_Unchecked 0x0,0xf 05b1 8010 | | Call 0x0,0x10 05b2 003b | ; | Store_Top Access,At_Offset_3 05b3 00db | | Load_Top At_Offset_3 05b4 e016 | | Load 0x0,0x16 05b5 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05b6 c5fe | | Store 0x2,-0x2 05b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05bb | | .CONST 0x05bb ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0001 | | .CONST 0x0001 ; Number of locals 05bb BODY_05b8: 05bb INIT_05b8: 05bb e5fb | | Load 0x2,-0x5 05bc 0aff | | Execute_Immediate Plus,-0x1 05bd e5fd | | Load 0x2,-0x3 05be 01db | | Execute Vector,Length 05bf 0273 | s | Execute Discrete,Plus 05c0 e5fe | | Load 0x2,-0x2 05c1 027a | z | Execute Discrete,Less_Equal 05c2 6816 |h | Jump_Zero 0x5d9 05c3 e5fb | | Load 0x2,-0x5 05c4 00d8 | | Load_Top At_Offset_0 05c5 0aff | | Execute_Immediate Plus,-0x1 05c6 e5fd | | Load 0x2,-0x3 05c7 01db | | Execute Vector,Length 05c8 0273 | s | Execute Discrete,Plus 05c9 00d8 | | Load_Top At_Offset_0 05ca 00e2 | | Load_Encached Integer_Cache 05cb 0260 | ` | Execute Discrete,In_Type 05cc 7001 |p | Jump_Nonzero 0x5ce 05cd 0801 | | Execute_Immediate Raise,0x1 05ce e5ff | | Load 0x2,-0x1 05cf 01cf | | Execute Vector,Slice_Read 05d0 e5fd | | Load 0x2,-0x3 05d1 01df | | Execute Vector,Equal 05d2 6806 |h | Jump_Zero 0x5d9 05d3 e5fb | | Load 0x2,-0x5 05d4 e5fd | | Load 0x2,-0x3 05d5 01db | | Execute Vector,Length 05d6 0273 | s | Execute Discrete,Plus 05d7 c5fb | | Store 0x2,-0x5 05d8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 05d9 e5fc | | Load 0x2,-0x4 05da 6802 |h | Jump_Zero 0x5dd 05db e211 | | Load 0x1,0x11 05dc 0257 | W | Execute Discrete,Raise 05dd 4505 |E | Exit_Suprogram New_Top_Offset 0x5 05de 0000 0000 | | .XXX[0x2] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05e3 | | .CONST 0x05e3 ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 0001 | | .CONST 0x0001 ; Number of locals 05e3 BODY_05e0: 05e3 INIT_05e0: 05e3 e5fc | | Load 0x2,-0x4 05e4 e5fe | | Load 0x2,-0x2 05e5 027a | z | Execute Discrete,Less_Equal 05e6 6815 |h | Jump_Zero 0x5fc 05e7 00cf | | Action Mark_Auxiliary 05e8 e5fd | | Load 0x2,-0x3 05e9 01d9 | | Execute Vector,Reverse_Bounds 05ea 0263 | c | Execute Discrete,Above_Bound 05eb 700e |p | Jump_Nonzero 0x5fa 05ec e5fc | | Load 0x2,-0x4 05ed e5ff | | Load 0x2,-0x1 05ee 01d7 | | Execute Vector,Field_Read 05ef 00d9 | | Load_Top At_Offset_1 05f0 e5fd | | Load 0x2,-0x3 05f1 01d7 | | Execute Vector,Field_Read 05f2 027f | | Execute Discrete,Equal 05f3 6804 |h | Jump_Zero 0x5f8 05f4 e5fc | | Load 0x2,-0x4 05f5 0a01 | | Execute_Immediate Plus,0x1 05f6 c5fc | | Store 0x2,-0x4 05f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05f8 00c8 | | Action Pop_Auxiliary_Range 05f9 3ff2 |? | Loop_Increasing 0x5ec 05fa 00ce | | Action Pop_Auxiliary 05fb 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05fc e211 | | Load 0x1,0x11 05fd 0257 | W | Execute Discrete,Raise 05fe 0000 0000 | | .XXX[0x2] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0603 | | .CONST 0x0603 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0001 | | .CONST 0x0001 ; Number of locals 0603 BODY_0600: 0603 INIT_0600: 0603 e5fd | | Load 0x2,-0x3 0604 e5fe | | Load 0x2,-0x2 0605 027d | } | Execute Discrete,Greater 0606 7013 |p | Jump_Nonzero 0x61a 0607 e5fd | | Load 0x2,-0x3 0608 00db | | Load_Top At_Offset_3 0609 01d7 | | Execute Vector,Field_Read 060a 4841 |HA | Short_Literal 0x41 060b 485a |HZ | Short_Literal 0x5a 060c 0261 | a | Execute Discrete,Not_In_Range 060d 680e |h | Jump_Zero 0x61c 060e e5fd | | Load 0x2,-0x3 060f 00db | | Load_Top At_Offset_3 0610 01d7 | | Execute Vector,Field_Read 0611 4861 |Ha | Short_Literal 0x61 0612 487a |Hz | Short_Literal 0x7a 0613 0261 | a | Execute Discrete,Not_In_Range 0614 6807 |h | Jump_Zero 0x61c 0615 e5fd | | Load 0x2,-0x3 0616 00db | | Load_Top At_Offset_3 0617 01d7 | | Execute Vector,Field_Read 0618 0e5f | _ | Execute_Immediate Not_Equal,0x5f 0619 6802 |h | Jump_Zero 0x61c 061a e211 | | Load 0x1,0x11 061b 0257 | W | Execute Discrete,Raise 061c e5fd | | Load 0x2,-0x3 061d a5fc | | Store_Unchecked 0x2,-0x4 061e e5fd | | Load 0x2,-0x3 061f 0a01 | | Execute_Immediate Plus,0x1 0620 c5fd | | Store 0x2,-0x3 0621 00cf | | Action Mark_Auxiliary 0622 7804 |x | Jump 0x627 0623 e5fd | | Load 0x2,-0x3 0624 0a01 | | Execute_Immediate Plus,0x1 0625 c5fd | | Store 0x2,-0x3 0626 00c9 | | Action Pop_Auxiliary_Loop 0627 e5fd | | Load 0x2,-0x3 0628 e5fe | | Load 0x2,-0x2 0629 027a | z | Execute Discrete,Less_Equal 062a 6813 |h | Jump_Zero 0x63e 062b e5fd | | Load 0x2,-0x3 062c e5ff | | Load 0x2,-0x1 062d 01d7 | | Execute Vector,Field_Read 062e 4841 |HA | Short_Literal 0x41 062f 485a |HZ | Short_Literal 0x5a 0630 0262 | b | Execute Discrete,In_Range 0631 77f1 |w | Jump_Nonzero 0x623 0632 e5fd | | Load 0x2,-0x3 0633 e5ff | | Load 0x2,-0x1 0634 01d7 | | Execute Vector,Field_Read 0635 4861 |Ha | Short_Literal 0x61 0636 487a |Hz | Short_Literal 0x7a 0637 0262 | b | Execute Discrete,In_Range 0638 77ea |w | Jump_Nonzero 0x623 0639 e5fd | | Load 0x2,-0x3 063a e5ff | | Load 0x2,-0x1 063b 01d7 | | Execute Vector,Field_Read 063c 0f5f | _ | Execute_Immediate Equal,0x5f 063d 77e5 |w | Jump_Nonzero 0x623 063e 00ce | | Action Pop_Auxiliary 063f e5fd | | Load 0x2,-0x3 0640 0aff | | Execute_Immediate Plus,-0x1 0641 c5fb | | Store 0x2,-0x5 0642 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0643 0000 0000 | | .BLANK 0000[0x5] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064c | L | .CONST 0x064c ; Address of begin 0649 067c | | | .CONST 0x067c ; Address of exception handler 064a 0002 | | .CONST 0x0002 ; Number of locals 064b INIT_0648: 064b 00e3 | | Load_Encached Natural_Cache 064c BODY_0648: 064c e5fd | | Load 0x2,-0x3 064d e5fe | | Load 0x2,-0x2 064e 027d | } | Execute Discrete,Greater 064f 7007 |p | Jump_Nonzero 0x657 0650 e5fd | | Load 0x2,-0x3 0651 e5ff | | Load 0x2,-0x1 0652 01d7 | | Execute Vector,Field_Read 0653 4830 |H0 | Short_Literal 0x30 0654 4839 |H9 | Short_Literal 0x39 0655 0261 | a | Execute Discrete,Not_In_Range 0656 6804 |h | Jump_Zero 0x65b 0657 4800 |H | Short_Literal 0x0 0658 a5fc | | Store_Unchecked 0x2,-0x4 0659 e211 | | Load 0x1,0x11 065a 0257 | W | Execute Discrete,Raise 065b e5fd | | Load 0x2,-0x3 065c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 065d e5fd | | Load 0x2,-0x3 065e 0a01 | | Execute_Immediate Plus,0x1 065f c5fd | | Store 0x2,-0x3 0660 00cf | | Action Mark_Auxiliary 0661 7804 |x | Jump 0x666 0662 e5fd | | Load 0x2,-0x3 0663 0a01 | | Execute_Immediate Plus,0x1 0664 c5fd | | Store 0x2,-0x3 0665 00c9 | | Action Pop_Auxiliary_Loop 0666 e5fd | | Load 0x2,-0x3 0667 e5fe | | Load 0x2,-0x2 0668 027a | z | Execute Discrete,Less_Equal 0669 6807 |h | Jump_Zero 0x671 066a e5fd | | Load 0x2,-0x3 066b e5ff | | Load 0x2,-0x1 066c 01d7 | | Execute Vector,Field_Read 066d 4830 |H0 | Short_Literal 0x30 066e 4839 |H9 | Short_Literal 0x39 066f 0262 | b | Execute Discrete,In_Range 0670 77f1 |w | Jump_Nonzero 0x662 0671 00ce | | Action Pop_Auxiliary 0672 00d8 | | Load_Top At_Offset_0 0673 e5fd | | Load 0x2,-0x3 0674 0aff | | Execute_Immediate Plus,-0x1 0675 e5ff | | Load 0x2,-0x1 0676 01cf | | Execute Vector,Slice_Read 0677 00e5 | | Load_Encached Long_Integer_Cache 0678 00e0 | | Load_Encached Standard_Cache 0679 1819 | | Execute Package,Field_Execute,Field_Number 0x19 067a c5fc | | Store 0x2,-0x4 067b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 067c TRAP_0648: 067c 0007 | | Action Break_Optional 067d e211 | | Load 0x1,0x11 067e 0257 | W | Execute Discrete,Raise 067f 0000 | | .XXX[0x1] 0680 ; -------------------------------------------------------------------------------------- 0680 ; SUBPROGRAM 0680 ; -------------------------------------------------------------------------------------- 0680 0684 | | .CONST 0x0684 ; Address of begin 0681 06d6 | | .CONST 0x06d6 ; Address of exception handler 0682 0002 | | .CONST 0x0002 ; Number of locals 0683 INIT_0680: 0683 00e3 | | Load_Encached Natural_Cache 0684 BODY_0680: 0684 e5fd | | Load 0x2,-0x3 0685 e5fe | | Load 0x2,-0x2 0686 027d | } | Execute Discrete,Greater 0687 7015 |p | Jump_Nonzero 0x69d 0688 e5fd | | Load 0x2,-0x3 0689 e5ff | | Load 0x2,-0x1 068a 01d7 | | Execute Vector,Field_Read 068b 4830 |H0 | Short_Literal 0x30 068c 4839 |H9 | Short_Literal 0x39 068d 0261 | a | Execute Discrete,Not_In_Range 068e 6812 |h | Jump_Zero 0x6a1 068f e5fd | | Load 0x2,-0x3 0690 e5ff | | Load 0x2,-0x1 0691 01d7 | | Execute Vector,Field_Read 0692 4841 |HA | Short_Literal 0x41 0693 4846 |HF | Short_Literal 0x46 0694 0261 | a | Execute Discrete,Not_In_Range 0695 680b |h | Jump_Zero 0x6a1 0696 e5fd | | Load 0x2,-0x3 0697 e5ff | | Load 0x2,-0x1 0698 01d7 | | Execute Vector,Field_Read 0699 4861 |Ha | Short_Literal 0x61 069a 4866 |Hf | Short_Literal 0x66 069b 0261 | a | Execute Discrete,Not_In_Range 069c 6804 |h | Jump_Zero 0x6a1 069d 4800 |H | Short_Literal 0x0 069e a5fc | | Store_Unchecked 0x2,-0x4 069f e211 | | Load 0x1,0x11 06a0 0257 | W | Execute Discrete,Raise 06a1 e5fd | | Load 0x2,-0x3 06a2 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06a3 e5fd | | Load 0x2,-0x3 06a4 0a01 | | Execute_Immediate Plus,0x1 06a5 c5fd | | Store 0x2,-0x3 06a6 00cf | | Action Mark_Auxiliary 06a7 7804 |x | Jump 0x6ac 06a8 e5fd | | Load 0x2,-0x3 06a9 0a01 | | Execute_Immediate Plus,0x1 06aa c5fd | | Store 0x2,-0x3 06ab 00c9 | | Action Pop_Auxiliary_Loop 06ac e5fd | | Load 0x2,-0x3 06ad e5fe | | Load 0x2,-0x2 06ae 027a | z | Execute Discrete,Less_Equal 06af 6815 |h | Jump_Zero 0x6c5 06b0 e5fd | | Load 0x2,-0x3 06b1 e5ff | | Load 0x2,-0x1 06b2 01d7 | | Execute Vector,Field_Read 06b3 4830 |H0 | Short_Literal 0x30 06b4 4839 |H9 | Short_Literal 0x39 06b5 0262 | b | Execute Discrete,In_Range 06b6 77f1 |w | Jump_Nonzero 0x6a8 06b7 e5fd | | Load 0x2,-0x3 06b8 e5ff | | Load 0x2,-0x1 06b9 01d7 | | Execute Vector,Field_Read 06ba 4841 |HA | Short_Literal 0x41 06bb 4846 |HF | Short_Literal 0x46 06bc 0262 | b | Execute Discrete,In_Range 06bd 77ea |w | Jump_Nonzero 0x6a8 06be e5fd | | Load 0x2,-0x3 06bf e5ff | | Load 0x2,-0x1 06c0 01d7 | | Execute Vector,Field_Read 06c1 4861 |Ha | Short_Literal 0x61 06c2 4866 |Hf | Short_Literal 0x66 06c3 0262 | b | Execute Discrete,In_Range 06c4 77e3 |w | Jump_Nonzero 0x6a8 06c5 00ce | | Action Pop_Auxiliary 06c6 0092 0767 | g| Action Push_String_Extended,0x767 ; "16#" 06c8 00d9 | | Load_Top At_Offset_1 06c9 e5fd | | Load 0x2,-0x3 06ca 0aff | | Execute_Immediate Plus,-0x1 06cb e5ff | | Load 0x2,-0x1 06cc 01cf | | Execute Vector,Slice_Read 06cd 01cc | | Execute Vector,Catenate 06ce 0092 0768 | h| Action Push_String_Extended,0x768 ; "#" 06d0 01cc | | Execute Vector,Catenate 06d1 00e5 | | Load_Encached Long_Integer_Cache 06d2 00e0 | | Load_Encached Standard_Cache 06d3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06d4 c5fc | | Store 0x2,-0x4 06d5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06d6 TRAP_0680: 06d6 0007 | | Action Break_Optional 06d7 e211 | | Load 0x1,0x11 06d8 0257 | W | Execute Discrete,Raise 06d9 0000 0000 | | .BLANK 0000[0x7] 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e5 | | .CONST 0x06e5 ; Address of begin 06e1 06ed | | .CONST 0x06ed ; Address of exception handler 06e2 0002 | | .CONST 0x0002 ; Number of locals 06e3 INIT_06e0: 06e3 029f 0743 | C| Declare_Subprogram INIT_0740,For_Call 06e5 BODY_06e0: 06e5 e407 | | Load 0x2,0x7 06e6 00ea | | Load_Encached Null_String_Cache 06e7 e5fe | | Load 0x2,-0x2 06e8 4801 |H | Short_Literal 0x1 06e9 e016 | | Load 0x0,0x16 06ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06eb c407 | | Store 0x2,0x7 06ec 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06ed TRAP_06e0: 06ed 0007 | | Action Break_Optional 06ee 8602 | | Call 0x3,0x2 06ef 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f3 | | .CONST 0x06f3 ; Address of begin 06f1 06fb | | .CONST 0x06fb ; Address of exception handler 06f2 0001 | | .CONST 0x0001 ; Number of locals 06f3 BODY_06f0: 06f3 INIT_06f0: 06f3 e402 | | Load 0x2,0x2 06f4 00ea | | Load_Encached Null_String_Cache 06f5 e5fd | | Load 0x2,-0x3 06f6 4800 |H | Short_Literal 0x0 06f7 e016 | | Load 0x0,0x16 06f8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 06f9 c402 | | Store 0x2,0x2 06fa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06fb TRAP_06f0: 06fb 0007 | | Action Break_Optional 06fc 4801 |H | Short_Literal 0x1 06fd a5f7 | | Store_Unchecked 0x2,-0x9 06fe 00cc | | Action Pop_Block 06ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0703 | | .CONST 0x0703 ; Address of begin 0701 070a | | .CONST 0x070a ; Address of exception handler 0702 0001 | | .CONST 0x0001 ; Number of locals 0703 BODY_0700: 0703 INIT_0700: 0703 4800 |H | Short_Literal 0x0 0704 e408 | | Load 0x2,0x8 0705 0aff | | Execute_Immediate Plus,-0x1 0706 e00b | | Load 0x0,0xb 0707 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0708 a403 | | Store_Unchecked 0x2,0x3 0709 4501 |E | Exit_Suprogram New_Top_Offset 0x1 070a TRAP_0700: 070a 010b | | Execute Exception,Is_Storage_Error 070b 6809 |h | Jump_Zero 0x715 070c e402 | | Load 0x2,0x2 070d e403 | | Load 0x2,0x3 070e 8213 | | Call 0x1,0x13 070f c403 | | Store 0x2,0x3 0710 c402 | | Store 0x2,0x2 0711 4803 |H | Short_Literal 0x3 0712 a5f7 | | Store_Unchecked 0x2,-0x9 0713 00cc | | Action Pop_Block 0714 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0715 0100 | | Execute Exception,Raise 0716 0000 0000 | | .XXX[0x2] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071b | | .CONST 0x071b ; Address of begin 0719 0721 | ! | .CONST 0x0721 ; Address of exception handler 071a 0001 | | .CONST 0x0001 ; Number of locals 071b BODY_0718: 071b INIT_0718: 071b e402 | | Load 0x2,0x2 071c e403 | | Load 0x2,0x3 071d 8213 | | Call 0x1,0x13 071e c403 | | Store 0x2,0x3 071f c402 | | Store 0x2,0x2 0720 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0721 TRAP_0718: 0721 0007 | | Action Break_Optional 0722 0008 | | Action Idle 0723 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0724 0000 0000 | | .BLANK 0000[0x4] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072b | + | .CONST 0x072b ; Address of begin 0729 0734 | 4 | .CONST 0x0734 ; Address of exception handler 072a 0001 | | .CONST 0x0001 ; Number of locals 072b BODY_0728: 072b INIT_0728: 072b 4800 |H | Short_Literal 0x0 072c e408 | | Load 0x2,0x8 072d e407 | | Load 0x2,0x7 072e 0271 | q | Execute Discrete,Times 072f 0aff | | Execute_Immediate Plus,-0x1 0730 e00b | | Load 0x0,0xb 0731 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0732 a405 | | Store_Unchecked 0x2,0x5 0733 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0734 TRAP_0728: 0734 010b | | Execute Exception,Is_Storage_Error 0735 6804 |h | Jump_Zero 0x73a 0736 e00b | | Load 0x0,0xb 0737 a5fd | | Store_Unchecked 0x2,-0x3 0738 00cc | | Action Pop_Block 0739 4502 |E | Exit_Suprogram New_Top_Offset 0x2 073a 0100 | | Execute Exception,Raise 073b 0000 0000 | | .BLANK 0000[0x5] 0740 ; -------------------------------------------------------------------------------------- 0740 ; SUBPROGRAM 0740 ; -------------------------------------------------------------------------------------- 0740 0743 | C | .CONST 0x0743 ; Address of begin 0741 074b | K | .CONST 0x074b ; Address of exception handler 0742 0001 | | .CONST 0x0001 ; Number of locals 0743 BODY_0740: 0743 INIT_0740: 0743 e407 | | Load 0x2,0x7 0744 00ea | | Load_Encached Null_String_Cache 0745 e5fe | | Load 0x2,-0x2 0746 4801 |H | Short_Literal 0x1 0747 e016 | | Load 0x0,0x16 0748 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0749 c407 | | Store 0x2,0x7 074a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 074b TRAP_0740: 074b 0007 | | Action Break_Optional 074c 4801 |H | Short_Literal 0x1 074d 00cb | | Action Pop_Block_With_Result 074e 00cb | | Action Pop_Block_With_Result 074f 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 0750 ; -------------------------------------------------------------------------------------- 0750 ; STRING TABLE 0750 ; -------------------------------------------------------------------------------------- 0750 0034 | 4 | .STRTAB 0x0034->0x076a ; "#define " 0751 003a | : | .STRTAB 0x003a->0x076e ; "_width" 0752 003e | > | .STRTAB 0x003e->0x0771 ; "_height" 0753 0043 | C | .STRTAB 0x0043->0x0774 ; "_x_hot " 0754 0048 | H | .STRTAB 0x0048->0x0778 ; "_y_hot " 0755 004d | M | .STRTAB 0x004d->0x077b ; "static char " 0756 0057 | W | .STRTAB 0x0057->0x0781 ; "_bits() := {" 0757 0061 | a | .STRTAB 0x0061->0x0787 ; " " 0758 0060 | ` | .STRTAB 0x0060->0x0788 ; ", " 0759 0060 | ` | .STRTAB 0x0060->0x0789 ; "0x0" 075a 0061 | a | .STRTAB 0x0061->0x078a ; "0x" 075b 0061 | a | .STRTAB 0x0061->0x078b ; "}" 075c 0060 | ` | .STRTAB 0x0060->0x078c ; "width" 075d 0063 | c | .STRTAB 0x0063->0x078e ; "height" 075e 0067 | g | .STRTAB 0x0067->0x0791 ; "hot" 075f 0068 | h | .STRTAB 0x0068->0x0793 ; "x_hot" 0760 006b | k | .STRTAB 0x006b->0x0795 ; "y_hot" 0761 006e | n | .STRTAB 0x006e->0x0798 ; "static short " 0762 0079 | y | .STRTAB 0x0079->0x079e ; "static unsigned char " 0763 008c | | .STRTAB 0x008c->0x07a9 ; " := {" 0764 008f | | .STRTAB 0x008f->0x07ab ; "bits()" 0765 0093 | | .STRTAB 0x0093->0x07ae ; " 0x" 0766 0094 | | .STRTAB 0x0094->0x07b0 ; ",}" 0767 0094 | | .STRTAB 0x0094->0x07b1 ; "16#" 0768 0095 | | .STRTAB 0x0095->0x07b2 ; "#" 0769 0094 | | .STREND 0x0094->0x07b3 076a 2364 6566 |#def| .STRTAB_STRINGS 07b3 0000 0000 | | .BLANK 0000[0x5] 07b8 ; -------------------------------------------------------------------------------------- 07b8 ; Debug Table 07b8 ; -------------------------------------------------------------------------------------- 07b8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6801,0x0000,0x0001,0x0013 07be 000b 080a | | .DBG4T 0x000b,0x080a,0x8000,0x0000 07c2 0014 0810 | | .DBG4T 0x0014,0x0810,0x8000,0x0000 07c6 003b 0820 | ; | .DBG4T 0x003b,0x0820,0x0002,0x0000 07ca 00d3 083e | >| .DBG4T 0x00d3,0x083e,0x0002,0x0000 07ce 018b 085f | _| .DBG4T 0x018b,0x085f,0x0002,0x0000 07d2 02e3 08aa | | .DBG4T 0x02e3,0x08aa,0x0001,0x4000 07d6 0533 09a5 | 3 | .DBG4T 0x0533,0x09a5,0x0001,0x0000 07da 05ab 09c6 | | .DBG4T 0x05ab,0x09c6,0x0001,0x0000 07de 05bb 09cb | | .DBG4T 0x05bb,0x09cb,0x0001,0x0000 07e2 05e3 09d2 | | .DBG4T 0x05e3,0x09d2,0x0001,0x0000 07e6 0603 09db | | .DBG4T 0x0603,0x09db,0x0001,0x4000 07ea 064b 09eb | K | .DBG4T 0x064b,0x09eb,0x0001,0x4000 07ee 0683 0a00 | | .DBG4T 0x0683,0x0a00,0x0001,0x4000 07f2 06e3 0a15 | | .DBG4T 0x06e3,0x0a15,0x0004,0x0000 07f6 06f3 0a19 | | .DBG4T 0x06f3,0x0a19,0x0004,0x0000 07fa 0703 0a1e | | .DBG4T 0x0703,0x0a1e,0x0004,0x0000 07fe 071b 0a24 | $| .DBG4T 0x071b,0x0a24,0x0004,0x0000 0802 072b 0a28 | + (| .DBG4T 0x072b,0x0a28,0x0004,0x0000 0806 0743 0a2d | C -| .DBG4T 0x0743,0x0a2d,0x0004,0x0000 080a ; -------------------------------------------------------------------------------------- 080a ; Debug chain 080a ; -------------------------------------------------------------------------------------- 080a 0004 0000 | | .DBGLEN 0x0004,0x0000 080c 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011 0810 ; -------------------------------------------------------------------------------------- 0810 ; Debug chain 0810 ; -------------------------------------------------------------------------------------- 0810 000e 0000 | | .DBGLEN 0x000e,0x0000 0812 0014 0019 | | .DBGLNO 0x0014,0x0019,0x001a,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f 0820 ; -------------------------------------------------------------------------------------- 0820 ; Debug chain 0820 ; -------------------------------------------------------------------------------------- 0820 0004 0018 | | .DBGLEN 0x0004,0x0018 0822 003b 0040 | ; @| .DBGLNO 0x003b,0x0040,0x0042,0x0044,0x0048,0x005a,0x005e,0x0062,0x0069,0x006d,0x0071,0x0075,0x0079,0x007d,0x0081,0x0085,0x008b,0x008f,0x0093,0x0097,0x009b,0x00a1,0x00ad,0x00b8,0x00bb,0x00bf,0x00c2,0x00c5 083e ; -------------------------------------------------------------------------------------- 083e ; Debug chain 083e ; -------------------------------------------------------------------------------------- 083e 0004 001b | | .DBGLEN 0x0004,0x001b 0840 00d3 00d5 | | .DBGLNO 0x00d3,0x00d5,0x00d7,0x00db,0x00dd,0x00ef,0x00f3,0x00f7,0x00fa,0x00fd,0x011e,0x0122,0x0126,0x012c,0x0130,0x0134,0x0138,0x013c,0x0140,0x0146,0x014a,0x014e,0x0152,0x0156,0x015c,0x0168,0x0173,0x0176,0x017a,0x017d,0x0180 085f ; -------------------------------------------------------------------------------------- 085f ; Debug chain 085f ; -------------------------------------------------------------------------------------- 085f 0007 0042 | B| .DBGLEN 0x0007,0x0042 0861 018b 018d | | .DBGLNO 0x018b,0x018d,0x018f,0x0191,0x0193,0x0195,0x019a,0x019e,0x01a1,0x01a5,0x01aa,0x01ac,0x01b1,0x01b3,0x01b7,0x01ba,0x01bb,0x01c6,0x01ca,0x01ce,0x01d0,0x01d6,0x01d9,0x01db,0x01df,0x01e1,0x01e6,0x01ee,0x01f3,0x01fb,0x01ff,0x0204,0x020c,0x0211,0x0219,0x021d,0x0221,0x0226,0x022e,0x0233,0x023b,0x023f,0x0244,0x024c,0x0251,0x0259,0x025d,0x0262,0x026a,0x026f,0x0273,0x0278,0x027d,0x027f,0x0283,0x0289,0x028d,0x0291,0x0297,0x029c,0x02a1,0x02a4,0x02aa,0x02af,0x02b6,0x02bc,0x02c1,0x02c5,0x02cb,0x02cf,0x02d2,0x02d8,0x02dc 08aa ; -------------------------------------------------------------------------------------- 08aa ; Debug chain 08aa ; -------------------------------------------------------------------------------------- 08aa 0015 0072 | r| .DBGLEN 0x0015,0x0072 08ac 02e3 02e8 | | .DBGLNO 0x02e3,0x02e8,0x02ea,0x02ec,0x02f1,0x02f2,0x02f3,0x02f5,0x02f7,0x02f8,0x02f9,0x02fa,0x02fc,0x02fe,0x02ff,0x0301,0x0303,0x0305,0x0307,0x030a,0x030d,0x0316,0x0319,0x0320,0x0324,0x0326,0x0328,0x0330,0x0333,0x033c,0x0344,0x034b,0x034e,0x0352,0x0357,0x035a,0x035f,0x0367,0x036e,0x0376,0x037d,0x0385,0x0388,0x038c,0x038d,0x0390,0x0394,0x0395,0x039d,0x03a4,0x03ac,0x03b3,0x03b4,0x03bc,0x03bf,0x03c2,0x03ca,0x03cd,0x03d0,0x03d8,0x03db,0x03de,0x03e7,0x03ef,0x03f2,0x03f6,0x03fb,0x03fe,0x0403,0x040b,0x040c,0x0410,0x0412,0x0414,0x041f,0x0423,0x0424,0x0426,0x0428,0x042e,0x0436,0x043a,0x043c,0x0443,0x0447,0x0449,0x0451,0x0458,0x045f,0x0463,0x046a,0x046d,0x0479,0x0480,0x0483,0x048e,0x0492,0x0499,0x049e,0x04a6,0x04aa,0x04ac,0x04b3,0x04b7,0x04b9,0x04c1,0x04c8,0x04cf,0x04d3,0x04da,0x04e7,0x04e9,0x04ee,0x04f0,0x04f5,0x04f7,0x04f8,0x0501,0x0505,0x050a,0x050c,0x050d,0x0510,0x0512,0x0514,0x0516,0x0518,0x051d,0x0521,0x0522,0x0524,0x0526,0x0529,0x052b,0x052d 0933 0001 0003 | | .XXX[0x72] 0935 0004 0005 | | 0937 0006 0007 | | 0939 0008 0009 | | 093b 000a 000b | | 093d 000c 000d | | 093f 000e 000f | | 0941 0010 0011 | | 0943 0012 0013 | | 0945 0014 0015 | | 0947 0016 0017 | | 0949 0018 0019 | | 094b 001a 001b | | 094d 001c 001d | | 094f 001e 001f | | 0951 0020 0021 | !| 0953 0022 0023 | " #| 0955 0024 0025 | $ %| 0957 0026 0027 | & '| 0959 0028 0029 | ( )| 095b 002b 002c | + ,| 095d 002d 002e | - .| 095f 002f 0030 | / 0| 0961 0031 0032 | 1 2| 0963 0033 0034 | 3 4| 0965 0035 0036 | 5 6| 0967 0037 0038 | 7 8| 0969 0039 003a | 9 :| 096b 003b 003c | ; <| 096d 003e 003f | > ?| 096f 0040 0041 | @ A| 0971 0042 0043 | B C| 0973 0044 0045 | D E| 0975 0046 0047 | F G| 0977 0048 0049 | H I| 0979 004a 004b | J K| 097b 004c 004d | L M| 097d 004e 003d | N =| 097f 004f 0050 | O P| 0981 0051 0052 | Q R| 0983 0053 0054 | S T| 0985 0055 0056 | U V| 0987 0057 0058 | W X| 0989 0059 005a | Y Z| 098b 005b 005c | [ \| 098d 0002 005d | ]| 098f 005e 005f | ^ _| 0991 0060 0061 | ` a| 0993 0062 0063 | b c| 0995 0064 0065 | d e| 0997 0066 0067 | f g| 0999 0068 0069 | h i| 099b 006a 006b | j k| 099d 006c 006d | l m| 099f 006e 006f | n o| 09a1 0070 0071 | p q| 09a3 0072 0073 | r s| 09a5 ; -------------------------------------------------------------------------------------- 09a5 ; Debug chain 09a5 ; -------------------------------------------------------------------------------------- 09a5 0007 0018 | | .DBGLEN 0x0007,0x0018 09a7 0533 0535 | 3 5| .DBGLNO 0x0533,0x0535,0x0537,0x0539,0x053b,0x053d,0x053f,0x0542,0x0546,0x054a,0x054e,0x0552,0x0553,0x0557,0x0559,0x055c,0x0567,0x0571,0x0576,0x057a,0x057e,0x0583,0x0588,0x058b,0x058d,0x0592,0x0595,0x059a,0x059d,0x059f,0x05a4 09c6 ; -------------------------------------------------------------------------------------- 09c6 ; Debug chain 09c6 ; -------------------------------------------------------------------------------------- 09c6 0000 0003 | | .DBGLEN 0x0000,0x0003 09c8 05ab 05ad | | .DBGLNO 0x05ab,0x05ad,0x05b3 09cb ; -------------------------------------------------------------------------------------- 09cb ; Debug chain 09cb ; -------------------------------------------------------------------------------------- 09cb 0000 0005 | | .DBGLEN 0x0000,0x0005 09cd 05bb 05d3 | | .DBGLNO 0x05bb,0x05d3,0x05d8,0x05d9,0x05db 09d2 ; -------------------------------------------------------------------------------------- 09d2 ; Debug chain 09d2 ; -------------------------------------------------------------------------------------- 09d2 0000 0007 | | .DBGLEN 0x0000,0x0007 09d4 05e3 05e8 | | .DBGLNO 0x05e3,0x05e8,0x05ec,0x05f4,0x05f7,0x05fb,0x05fc 09db ; -------------------------------------------------------------------------------------- 09db ; Debug chain 09db ; -------------------------------------------------------------------------------------- 09db 0000 0007 | | .DBGLEN 0x0000,0x0007 09dd 0603 061a | | .DBGLNO 0x0603,0x061a,0x061c,0x061e,0x0623,0x0627,0x063f 09e4 0001 0002 | | .XXX[0x7] 09e6 0003 0004 | | 09e8 0006 0005 | | 09ea 0007 | | 09eb ; -------------------------------------------------------------------------------------- 09eb ; Debug chain 09eb ; -------------------------------------------------------------------------------------- 09eb 0001 0009 | | .DBGLEN 0x0001,0x0009 09ed 064b 064c | K L| .DBGLNO 0x064b,0x064c,0x0657,0x0659,0x065b,0x065d,0x0662,0x0666,0x0672,0x067d 09f7 0001 0002 | | .XXX[0x9] 09f9 0003 0004 | | 09fb 0005 0007 | | 09fd 0006 0008 | | 09ff 0009 | | 0a00 ; -------------------------------------------------------------------------------------- 0a00 ; Debug chain 0a00 ; -------------------------------------------------------------------------------------- 0a00 0001 0009 | | .DBGLEN 0x0001,0x0009 0a02 0683 0684 | | .DBGLNO 0x0683,0x0684,0x069d,0x069f,0x06a1,0x06a3,0x06a8,0x06ac,0x06c6,0x06d7 0a0c 0001 0002 | | .XXX[0x9] 0a0e 0003 0004 | | 0a10 0005 0007 | | 0a12 0006 0008 | | 0a14 0009 | | 0a15 ; -------------------------------------------------------------------------------------- 0a15 ; Debug chain 0a15 ; -------------------------------------------------------------------------------------- 0a15 0000 0002 | | .DBGLEN 0x0000,0x0002 0a17 06e5 06ee | | .DBGLNO 0x06e5,0x06ee 0a19 ; -------------------------------------------------------------------------------------- 0a19 ; Debug chain 0a19 ; -------------------------------------------------------------------------------------- 0a19 0000 0003 | | .DBGLEN 0x0000,0x0003 0a1b 06f3 06fc | | .DBGLNO 0x06f3,0x06fc,0x06fe 0a1e ; -------------------------------------------------------------------------------------- 0a1e ; Debug chain 0a1e ; -------------------------------------------------------------------------------------- 0a1e 0000 0004 | | .DBGLEN 0x0000,0x0004 0a20 0703 070c | | .DBGLNO 0x0703,0x070c,0x0711,0x0713 0a24 ; -------------------------------------------------------------------------------------- 0a24 ; Debug chain 0a24 ; -------------------------------------------------------------------------------------- 0a24 0000 0002 | | .DBGLEN 0x0000,0x0002 0a26 071b 0722 | "| .DBGLNO 0x071b,0x0722 0a28 ; -------------------------------------------------------------------------------------- 0a28 ; Debug chain 0a28 ; -------------------------------------------------------------------------------------- 0a28 0000 0003 | | .DBGLEN 0x0000,0x0003 0a2a 072b 0736 | + 6| .DBGLNO 0x072b,0x0736,0x0738 0a2d ; -------------------------------------------------------------------------------------- 0a2d ; Debug chain 0a2d ; -------------------------------------------------------------------------------------- 0a2d 0000 0002 | | .DBGLEN 0x0000,0x0002 0a2f 0743 074c | C L| .DBGLNO 0x0743,0x074c 0a31 0000 0000 | | .BLANK 0000[0x1cf]