|
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: 7168 (0x1c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦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 0cd8 | | .CONST 0x0cd8 ; 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 8008 | | .CONST 0x8008 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 015b | [ | .CONST 0x015b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0054 | T | .CONST 0x0054 ; Number of locals 000b INIT_0008: 000b 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 000d 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 000f 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 0011 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0013 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0015 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0017 029c 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible 0019 029c 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible 001b 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 001d 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 001f 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0021 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0023 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0025 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 0027 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated 0029 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated 002b 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 002d 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 002f 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0031 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0033 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0035 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 0037 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0039 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 003b 029a 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call,Visible,Unelaborated 003d 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated 003f 029a 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call,Visible,Unelaborated 0041 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 0043 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated 0045 029a 058b | | Declare_Subprogram INIT_0588,For_Outer_Call,Visible,Unelaborated 0047 029a 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call,Visible,Unelaborated 0049 029a 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Visible,Unelaborated 004b 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 004d 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 004f 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated 0051 029a 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call,Visible,Unelaborated 0053 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated 0055 029a 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call,Visible,Unelaborated 0057 029a 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call,Visible,Unelaborated 0059 029a 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call,Visible,Unelaborated 005b 029a 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call,Visible,Unelaborated 005d 029a 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call,Visible,Unelaborated 005f 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated 0061 029a 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call,Visible,Unelaborated 0063 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated 0065 029a 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call,Visible,Unelaborated 0067 029a 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call,Visible,Unelaborated 0069 029a 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Visible,Unelaborated 006b 029a 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call,Visible,Unelaborated 006d 029a 089b | | Declare_Subprogram INIT_0898,For_Outer_Call,Visible,Unelaborated 006f 029a 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call,Visible,Unelaborated 0071 00bf | | Action Accept_Activation 0072 60f9 |` | Indirect_Literal Discrete,0x16c,{0x00000000, 0x80000000} 0073 60f8 |` | Indirect_Literal Discrete,0x16c,{0x00000000, 0x80000000} 0074 00e5 | | Load_Encached Long_Integer_Cache 0075 03f8 | | Declare_Type Discrete,Constrained 0076 4801 |H | Short_Literal 0x1 0077 4820 |H | Short_Literal 0x20 0078 e001 | | Load 0x0,0x1 0079 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 007a 035b | [ | Declare_Type Array,Constrained 007b 4801 |H | Short_Literal 0x1 007c 4840 |H@ | Short_Literal 0x40 007d e001 | | Load 0x0,0x1 007e 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 007f 035b | [ | Declare_Type Array,Constrained 0080 4801 |H | Short_Literal 0x1 0081 4835 |H5 | Short_Literal 0x35 0082 e001 | | Load 0x0,0x1 0083 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 0084 035b | [ | Declare_Type Array,Constrained 0085 00da | | Load_Top At_Offset_2 0086 0337 | 7 | Declare_Variable Array 0087 00d8 | | Load_Top At_Offset_0 0088 0335 | 5 | Declare_Variable Array,Duplicate 0089 00cd | | Action Spare6_Action 008a 4820 |H | Short_Literal 0x20 008b 4801 |H | Short_Literal 0x1 008c 4800 |H | Short_Literal 0x0 008d 00d9 | | Load_Top At_Offset_1 008e e245 | E | Load 0x1,0x45 008f 01d6 | | Execute Vector,Field_Write 0090 3ffb |? | Loop_Increasing 0x8c 0091 00d9 | | Load_Top At_Offset_1 0092 01d4 | | Execute Vector,Structure_Write 0093 00da | | Load_Top At_Offset_2 0094 0337 | 7 | Declare_Variable Array 0095 00d8 | | Load_Top At_Offset_0 0096 0335 | 5 | Declare_Variable Array,Duplicate 0097 00cd | | Action Spare6_Action 0098 4840 |H@ | Short_Literal 0x40 0099 4801 |H | Short_Literal 0x1 009a 4800 |H | Short_Literal 0x0 009b 00d9 | | Load_Top At_Offset_1 009c e246 | F | Load 0x1,0x46 009d 01d6 | | Execute Vector,Field_Write 009e 3ffb |? | Loop_Increasing 0x9a 009f 00d9 | | Load_Top At_Offset_1 00a0 01d4 | | Execute Vector,Structure_Write 00a1 00da | | Load_Top At_Offset_2 00a2 0337 | 7 | Declare_Variable Array 00a3 00d8 | | Load_Top At_Offset_0 00a4 0335 | 5 | Declare_Variable Array,Duplicate 00a5 00cd | | Action Spare6_Action 00a6 4835 |H5 | Short_Literal 0x35 00a7 4801 |H | Short_Literal 0x1 00a8 4800 |H | Short_Literal 0x0 00a9 00d9 | | Load_Top At_Offset_1 00aa e247 | G | Load 0x1,0x47 00ab 01d6 | | Execute Vector,Field_Write 00ac 3ffb |? | Loop_Increasing 0xa8 00ad 00d9 | | Load_Top At_Offset_1 00ae 01d4 | | Execute Vector,Structure_Write 00af e002 | | Load 0x0,0x2 00b0 e003 | | Load 0x0,0x3 00b1 e001 | | Load 0x0,0x1 00b2 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 00b3 e241 | A | Load 0x1,0x41 00b4 e004 | | Load 0x0,0x4 00b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b6 0387 | | Declare_Variable Package 00b7 00d8 | | Load_Top At_Offset_0 00b8 020f | | Execute Module,Activate 00b9 e005 | | Load 0x0,0x5 00ba e006 | | Load 0x0,0x6 00bb e241 | A | Load 0x1,0x41 00bc e001 | | Load 0x0,0x1 00bd 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 00be e004 | | Load 0x0,0x4 00bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00c0 0387 | | Declare_Variable Package 00c1 00d8 | | Load_Top At_Offset_0 00c2 020f | | Execute Module,Activate 00c3 e007 | | Load 0x0,0x7 00c4 e008 | | Load 0x0,0x8 00c5 e009 | | Load 0x0,0x9 00c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c7 e243 | C | Load 0x1,0x43 00c8 e004 | | Load 0x0,0x4 00c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ca 0387 | | Declare_Variable Package 00cb 00d8 | | Load_Top At_Offset_0 00cc 020f | | Execute Module,Activate 00cd e00a | | Load 0x0,0xa 00ce e00b | | Load 0x0,0xb 00cf e243 | C | Load 0x1,0x43 00d0 e009 | | Load 0x0,0x9 00d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00d2 e004 | | Load 0x0,0x4 00d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00d4 0387 | | Declare_Variable Package 00d5 00d8 | | Load_Top At_Offset_0 00d6 020f | | Execute Module,Activate 00d7 e00c | | Load 0x0,0xc 00d8 e00d | | Load 0x0,0xd 00d9 00e5 | | Load_Encached Long_Integer_Cache 00da e242 | B | Load 0x1,0x42 00db e004 | | Load 0x0,0x4 00dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00dd 0387 | | Declare_Variable Package 00de 00d8 | | Load_Top At_Offset_0 00df 020f | | Execute Module,Activate 00e0 e00e | | Load 0x0,0xe 00e1 e00f | | Load 0x0,0xf 00e2 e242 | B | Load 0x1,0x42 00e3 00e5 | | Load_Encached Long_Integer_Cache 00e4 e004 | | Load 0x0,0x4 00e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e6 0387 | | Declare_Variable Package 00e7 00d8 | | Load_Top At_Offset_0 00e8 020f | | Execute Module,Activate 00e9 1d0d | | Execute_Immediate Reference_Lex_1,0xd 00ea 00c7 | | Action Elaborate_Subprogram 00eb 1d0e | | Execute_Immediate Reference_Lex_1,0xe 00ec 00c7 | | Action Elaborate_Subprogram 00ed 1d0f | | Execute_Immediate Reference_Lex_1,0xf 00ee 00c7 | | Action Elaborate_Subprogram 00ef 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00f0 00c7 | | Action Elaborate_Subprogram 00f1 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00f2 00c7 | | Action Elaborate_Subprogram 00f3 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00f4 00c7 | | Action Elaborate_Subprogram 00f5 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00f6 00c7 | | Action Elaborate_Subprogram 00f7 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00f8 00c7 | | Action Elaborate_Subprogram 00f9 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00fa 00c7 | | Action Elaborate_Subprogram 00fb 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00fc 00c7 | | Action Elaborate_Subprogram 00fd 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00fe 00c7 | | Action Elaborate_Subprogram 00ff 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0100 00c7 | | Action Elaborate_Subprogram 0101 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0102 00c7 | | Action Elaborate_Subprogram 0103 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0104 00c7 | | Action Elaborate_Subprogram 0105 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0106 00c7 | | Action Elaborate_Subprogram 0107 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0108 00c7 | | Action Elaborate_Subprogram 0109 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 010a 00c7 | | Action Elaborate_Subprogram 010b 029d 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call 010d 029d 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call 010f 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0110 00c7 | | Action Elaborate_Subprogram 0111 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0112 00c7 | | Action Elaborate_Subprogram 0113 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0114 00c7 | | Action Elaborate_Subprogram 0115 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0116 00c7 | | Action Elaborate_Subprogram 0117 029d 093b | ;| Declare_Subprogram INIT_0938,For_Outer_Call 0119 029d 09cb | | Declare_Subprogram INIT_09c8,For_Outer_Call 011b 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 011c 00c7 | | Action Elaborate_Subprogram 011d 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 011e 00c7 | | Action Elaborate_Subprogram 011f 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0120 00c7 | | Action Elaborate_Subprogram 0121 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0122 00c7 | | Action Elaborate_Subprogram 0123 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0124 00c7 | | Action Elaborate_Subprogram 0125 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0126 00c7 | | Action Elaborate_Subprogram 0127 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0128 00c7 | | Action Elaborate_Subprogram 0129 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 012a 00c7 | | Action Elaborate_Subprogram 012b 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 012c 00c7 | | Action Elaborate_Subprogram 012d 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 012e 00c7 | | Action Elaborate_Subprogram 012f 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0130 00c7 | | Action Elaborate_Subprogram 0131 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0132 00c7 | | Action Elaborate_Subprogram 0133 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 0134 00c7 | | Action Elaborate_Subprogram 0135 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 0136 00c7 | | Action Elaborate_Subprogram 0137 029d 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call 0139 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 013a 00c7 | | Action Elaborate_Subprogram 013b 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 013c 00c7 | | Action Elaborate_Subprogram 013d 029d 0a5b | [| Declare_Subprogram INIT_0a58,For_Outer_Call 013f 029d 0a7b | {| Declare_Subprogram INIT_0a78,For_Outer_Call 0141 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 0142 00c7 | | Action Elaborate_Subprogram 0143 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 0144 00c7 | | Action Elaborate_Subprogram 0145 029d 0ac3 | | Declare_Subprogram INIT_0ac0,For_Outer_Call 0147 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 0148 00c7 | | Action Elaborate_Subprogram 0149 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 014a 00c7 | | Action Elaborate_Subprogram 014b 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 014c 00c7 | | Action Elaborate_Subprogram 014d 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 014e 00c7 | | Action Elaborate_Subprogram 014f 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 0150 00c7 | | Action Elaborate_Subprogram 0151 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 0152 00c7 | | Action Elaborate_Subprogram 0153 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 0154 00c7 | | Action Elaborate_Subprogram 0155 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 0156 00c7 | | Action Elaborate_Subprogram 0157 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 0158 00c7 | | Action Elaborate_Subprogram 0159 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 015a 00c7 | | Action Elaborate_Subprogram 015b BODY_0008: 015b 00bc | | Action Signal_Activated 015c 00bb | | Action Signal_Completion 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 00da | | Load_Top At_Offset_2 0164 00d8 | | Load_Top At_Offset_0 0165 00e2 | | Load_Encached Integer_Cache 0166 0260 | ` | Execute Discrete,In_Type 0167 7001 |p | Jump_Nonzero 0x169 0168 0801 | | Execute_Immediate Raise,0x1 0169 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 016a 0000 0000 | | .XXX[0x2] 016c 0000 0000 | | .LITERAL {0x00000000, 0x80000000} 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 0174 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0175 0000 0000 | | .XXX[0x3] 0177 0000 | | 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 00da | | Load_Top At_Offset_2 017c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017d 0000 0000 | | .XXX[0x3] 017f 0000 | | 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 00da | | Load_Top At_Offset_2 0184 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0185 0000 0000 | | .XXX[0x3] 0187 0000 | | 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00da | | Load_Top At_Offset_2 018c e24b | K | Load 0x1,0x4b 018d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 018e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018f 0000 | | .XXX[0x1] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0198 | | .CONST 0x0198 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0002 | | .CONST 0x0002 ; Number of locals 0193 INIT_0190: 0193 e242 | B | Load 0x1,0x42 0194 0337 | 7 | Declare_Variable Array 0195 e245 | E | Load 0x1,0x45 0196 00d9 | | Load_Top At_Offset_1 0197 01d4 | | Execute Vector,Structure_Write 0198 BODY_0190: 0198 00db | | Load_Top At_Offset_3 0199 01db | | Execute Vector,Length 019a 0c41 | A | Execute_Immediate Greater_Equal,0x41 019b 6801 |h | Jump_Zero 0x19d 019c 08e0 | | Execute_Immediate Raise,0xe0 019d 00db | | Load_Top At_Offset_3 019e 4841 |HA | Short_Literal 0x41 019f e5ff | | Load 0x2,-0x1 01a0 01db | | Execute Vector,Length 01a1 0272 | r | Execute Discrete,Minus 01a2 00d8 | | Load_Top At_Offset_0 01a3 00e2 | | Load_Encached Integer_Cache 01a4 0260 | ` | Execute Discrete,In_Type 01a5 7001 |p | Jump_Nonzero 0x1a7 01a6 0801 | | Execute_Immediate Raise,0x1 01a7 4840 |H@ | Short_Literal 0x40 01a8 00db | | Load_Top At_Offset_3 01a9 01ce | | Execute Vector,Slice_Write 01aa 00d8 | | Load_Top At_Offset_0 01ab e24c | L | Load 0x1,0x4c 01ac 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ae 0000 0000 | | .XXX[0x2] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 00da | | Load_Top At_Offset_2 01b4 00e0 | | Load_Encached Standard_Cache 01b5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b7 0000 | | .XXX[0x1] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 00da | | Load_Top At_Offset_2 01bc 00e5 | | Load_Encached Long_Integer_Cache 01bd 00e0 | | Load_Encached Standard_Cache 01be 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00da | | Load_Top At_Offset_2 01c4 0235 | 5 | Execute Float,Round_To_Discrete 01c5 e001 | | Load 0x0,0x1 01c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01c7 025e | ^ | Execute Discrete,Convert 01c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c9 0000 0000 | | .BLANK 0000[0x7] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00da | | Load_Top At_Offset_2 01d4 0237 | 7 | Execute Float,Convert_From_Discrete 01d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d6 0000 0000 | | .XXX[0x2] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01dd 0000 0000 | | .XXX[0x3] 01df 0000 | | 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 00da | | Load_Top At_Offset_2 01e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e5 0000 0000 | | .XXX[0x3] 01e7 0000 | | 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb e5fc | | Load 0x2,-0x4 01ec e5fd | | Load 0x2,-0x3 01ed e5fe | | Load 0x2,-0x2 01ee e5ff | | Load 0x2,-0x1 01ef 822e | . | Call 0x1,0x2e 01f0 8232 | 2 | Call 0x1,0x32 01f1 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 01f2 0000 0000 | | .BLANK 0000[0x6] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 00da | | Load_Top At_Offset_2 01fc 8233 | 3 | Call 0x1,0x33 01fd 822d | - | Call 0x1,0x2d 01fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ff 0000 | | .XXX[0x1] 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 0203 | | .CONST 0x0203 ; Address of begin 0201 0004 | | .CONST 0x0004 ; Address of exception handler 0202 0001 | | .CONST 0x0001 ; Number of locals 0203 BODY_0200: 0203 INIT_0200: 0203 00da | | Load_Top At_Offset_2 0204 e009 | | Load 0x0,0x9 0205 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0206 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0207 e249 | I | Load 0x1,0x49 0208 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0209 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 020a 0000 0000 | | .BLANK 0000[0x6] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 00da | | Load_Top At_Offset_2 0214 e009 | | Load 0x0,0x9 0215 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0216 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0217 0a35 | 5 | Execute_Immediate Plus,0x35 0218 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0219 0000 0000 | | .BLANK 0000[0x7] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0228 | ( | .CONST 0x0228 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0002 | | .CONST 0x0002 ; Number of locals 0223 INIT_0220: 0223 e243 | C | Load 0x1,0x43 0224 0337 | 7 | Declare_Variable Array 0225 e246 | F | Load 0x1,0x46 0226 00d9 | | Load_Top At_Offset_1 0227 01d4 | | Execute Vector,Structure_Write 0228 BODY_0220: 0228 00db | | Load_Top At_Offset_3 0229 01db | | Execute Vector,Length 022a 0c35 | 5 | Execute_Immediate Greater_Equal,0x35 022b 680f |h | Jump_Zero 0x23b 022c 00db | | Load_Top At_Offset_3 022d 01dd | | Execute Vector,First 022e e5ff | | Load 0x2,-0x1 022f 01dd | | Execute Vector,First 0230 0a34 | 4 | Execute_Immediate Plus,0x34 0231 00d8 | | Load_Top At_Offset_0 0232 00e2 | | Load_Encached Integer_Cache 0233 0260 | ` | Execute Discrete,In_Type 0234 7001 |p | Jump_Nonzero 0x236 0235 0801 | | Execute_Immediate Raise,0x1 0236 e5ff | | Load 0x2,-0x1 0237 01cf | | Execute Vector,Slice_Read 0238 00d9 | | Load_Top At_Offset_1 0239 01d4 | | Execute Vector,Structure_Write 023a 780b |x | Jump 0x246 023b 00db | | Load_Top At_Offset_3 023c 4801 |H | Short_Literal 0x1 023d e5ff | | Load 0x2,-0x1 023e 01db | | Execute Vector,Length 023f 00d8 | | Load_Top At_Offset_0 0240 00e2 | | Load_Encached Integer_Cache 0241 0260 | ` | Execute Discrete,In_Type 0242 7001 |p | Jump_Nonzero 0x244 0243 0801 | | Execute_Immediate Raise,0x1 0244 00db | | Load_Top At_Offset_3 0245 01ce | | Execute Vector,Slice_Write 0246 e009 | | Load 0x0,0x9 0247 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0248 0322 | " | Declare_Variable Record 0249 4800 |H | Short_Literal 0x0 024a 00d9 | | Load_Top At_Offset_1 024b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 024c e5fe | | Load 0x2,-0x2 024d 0acb | | Execute_Immediate Plus,-0x35 024e 00d9 | | Load_Top At_Offset_1 024f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0250 00d9 | | Load_Top At_Offset_1 0251 e24a | J | Load 0x1,0x4a 0252 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0253 00d9 | | Load_Top At_Offset_1 0254 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0255 e009 | | Load 0x0,0x9 0256 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0257 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025e | ^ | .CONST 0x025e ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0002 | | .CONST 0x0002 ; Number of locals 025b INIT_0258: 025b e001 | | Load 0x0,0x1 025c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 025d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 025e BODY_0258: 025e 00cf | | Action Mark_Auxiliary 025f e5ff | | Load 0x2,-0x1 0260 01d9 | | Execute Vector,Reverse_Bounds 0261 0263 | c | Execute Discrete,Above_Bound 0262 700a |p | Jump_Nonzero 0x26d 0263 00db | | Load_Top At_Offset_3 0264 091f | | Execute_Immediate Binary_Scale,0x1f 0265 00d9 | | Load_Top At_Offset_1 0266 e5ff | | Load 0x2,-0x1 0267 01d7 | | Execute Vector,Field_Read 0268 0274 | t | Execute Discrete,Absolute_Value 0269 0272 | r | Execute Discrete,Minus 026a a402 | | Store_Unchecked 0x2,0x2 026b 00c8 | | Action Pop_Auxiliary_Range 026c 3ff6 |? | Loop_Increasing 0x263 026d 00ce | | Action Pop_Auxiliary 026e 4801 |H | Short_Literal 0x1 026f e5ff | | Load 0x2,-0x1 0270 01d7 | | Execute Vector,Field_Read 0271 0d00 | | Execute_Immediate Less,0x0 0272 6802 |h | Jump_Zero 0x275 0273 00d8 | | Load_Top At_Offset_0 0274 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0275 00d8 | | Load_Top At_Offset_0 0276 0275 | u | Execute Discrete,Unary_Minus 0277 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 0288 | | .CONST 0x0288 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0004 | | .CONST 0x0004 ; Number of locals 027b INIT_0278: 027b 4801 |H | Short_Literal 0x1 027c 4803 |H | Short_Literal 0x3 027d e001 | | Load 0x0,0x1 027e 1b20 | | Execute Package,Field_Read,Field_Number 0x20 027f 035b | [ | Declare_Type Array,Constrained 0280 0337 | 7 | Declare_Variable Array 0281 00db | | Load_Top At_Offset_3 0282 00e5 | | Load_Encached Long_Integer_Cache 0283 03f1 | | Declare_Variable Discrete,With_Value 0284 00d8 | | Load_Top At_Offset_0 0285 0d00 | | Execute_Immediate Less,0x0 0286 00e1 | | Load_Encached Boolean_Cache 0287 03f1 | | Declare_Variable Discrete,With_Value 0288 BODY_0278: 0288 00d9 | | Load_Top At_Offset_1 0289 6032 |`2 | Indirect_Literal Discrete,0x2bc,{0xffffffff, 0x80000000} 028a 027d | } | Execute Discrete,Greater 028b 6812 |h | Jump_Zero 0x29e 028c 00d9 | | Load_Top At_Offset_1 028d 602a |`* | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x80000000} 028e 027c | | | Execute Discrete,Less 028f 680e |h | Jump_Zero 0x29e 0290 4801 |H | Short_Literal 0x1 0291 4801 |H | Short_Literal 0x1 0292 e001 | | Load 0x0,0x1 0293 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0294 035b | [ | Declare_Type Array,Constrained 0295 0337 | 7 | Declare_Variable Array 0296 00da | | Load_Top At_Offset_2 0297 4801 |H | Short_Literal 0x1 0298 00da | | Load_Top At_Offset_2 0299 01d6 | | Execute Vector,Field_Write 029a e001 | | Load 0x0,0x1 029b 1b20 | | Execute Package,Field_Read,Field_Number 0x20 029c 01c6 | | Execute Vector,Convert_To_Formal 029d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 029e 00cf | | Action Mark_Auxiliary 029f 00db | | Load_Top At_Offset_3 02a0 01da | | Execute Vector,Bounds 02a1 0007 | | Action Break_Optional 02a2 e403 | | Load 0x2,0x3 02a3 6014 |` | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x80000000} 02a4 026f | o | Execute Discrete,Remainder 02a5 0274 | t | Execute Discrete,Absolute_Value 02a6 00d9 | | Load_Top At_Offset_1 02a7 e402 | | Load 0x2,0x2 02a8 01d6 | | Execute Vector,Field_Write 02a9 e403 | | Load 0x2,0x3 02aa 09e1 | | Execute_Immediate Binary_Scale,-0x1f 02ab a403 | | Store_Unchecked 0x2,0x3 02ac 00c8 | | Action Pop_Auxiliary_Range 02ad 37f4 |7 | Loop_Decreasing 0x2a2 02ae 00ce | | Action Pop_Auxiliary 02af 00d8 | | Load_Top At_Offset_0 02b0 00db | | Load_Top At_Offset_3 02b1 8010 | | Call 0x0,0x10 02b2 e001 | | Load 0x0,0x1 02b3 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02b4 01c6 | | Execute Vector,Convert_To_Formal 02b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b6 0000 0000 | | .XXX[0x2] 02b8 0000 0000 | | .LITERAL {0x00000000, 0x80000000} 02bc ffff ffff | | .LITERAL {0xffffffff, 0x80000000} 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 4801 |H | Short_Literal 0x1 02c4 00db | | Load_Top At_Offset_3 02c5 01d7 | | Execute Vector,Field_Read 02c6 7003 |p | Jump_Nonzero 0x2ca 02c7 0092 0cd1 | | Action Push_String_Extended,0xcd1 ; " 0" 02c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ca 4801 |H | Short_Literal 0x1 02cb 00db | | Load_Top At_Offset_3 02cc 01d7 | | Execute Vector,Field_Read 02cd 0d00 | | Execute_Immediate Less,0x0 02ce 6805 |h | Jump_Zero 0x2d4 02cf 482d |H- | Short_Literal 0x2d 02d0 00db | | Load_Top At_Offset_3 02d1 824e | N | Call 0x1,0x4e 02d2 01ca | | Execute Vector,Prepend 02d3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d4 4820 |H | Short_Literal 0x20 02d5 00db | | Load_Top At_Offset_3 02d6 824e | N | Call 0x1,0x4e 02d7 01ca | | Execute Vector,Prepend 02d8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d9 0000 0000 | | .BLANK 0000[0x7] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 030a | | .CONST 0x030a ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0008 | | .CONST 0x0008 ; Number of locals 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 01db | | Execute Vector,Length 02e5 4809 |H | Short_Literal 0x9 02e6 0270 | p | Execute Discrete,Divide 02e7 0a01 | | Execute_Immediate Plus,0x1 02e8 00e2 | | Load_Encached Integer_Cache 02e9 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 02ea 4801 |H | Short_Literal 0x1 02eb 00d9 | | Load_Top At_Offset_1 02ec e001 | | Load 0x0,0x1 02ed 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02ee 035b | [ | Declare_Type Array,Constrained 02ef 0337 | 7 | Declare_Variable Array 02f0 4801 |H | Short_Literal 0x1 02f1 00da | | Load_Top At_Offset_2 02f2 e001 | | Load 0x0,0x1 02f3 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02f4 035b | [ | Declare_Type Array,Constrained 02f5 0337 | 7 | Declare_Variable Array 02f6 00d8 | | Load_Top At_Offset_0 02f7 01dc | | Execute Vector,Last 02f8 4801 |H | Short_Literal 0x1 02f9 0263 | c | Execute Discrete,Above_Bound 02fa 7005 |p | Jump_Nonzero 0x300 02fb 4800 |H | Short_Literal 0x0 02fc 00d9 | | Load_Top At_Offset_1 02fd e404 | | Load 0x2,0x4 02fe 01d6 | | Execute Vector,Field_Write 02ff 3ffb |? | Loop_Increasing 0x2fb 0300 00d9 | | Load_Top At_Offset_1 0301 01d4 | | Execute Vector,Structure_Write 0302 00e2 | | Load_Encached Integer_Cache 0303 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0304 00e1 | | Load_Encached Boolean_Cache 0305 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0306 00e1 | | Load_Encached Boolean_Cache 0307 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0308 00e8 | | Load_Encached Character_Cache 0309 00e2 | | Load_Encached Integer_Cache 030a BODY_02e0: 030a e5ff | | Load 0x2,-0x1 030b 01db | | Execute Vector,Length 030c 7001 |p | Jump_Nonzero 0x30e 030d 08e0 | | Execute_Immediate Raise,0xe0 030e e5ff | | Load 0x2,-0x1 030f 01dd | | Execute Vector,First 0310 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0311 00d8 | | Load_Top At_Offset_0 0312 e5ff | | Load 0x2,-0x1 0313 01d7 | | Execute Vector,Field_Read 0314 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0315 00d9 | | Load_Top At_Offset_1 0316 0f2d | - | Execute_Immediate Equal,0x2d 0317 7006 |p | Jump_Nonzero 0x31e 0318 00d9 | | Load_Top At_Offset_1 0319 0f2b | + | Execute_Immediate Equal,0x2b 031a 7003 |p | Jump_Nonzero 0x31e 031b 00d9 | | Load_Top At_Offset_1 031c 0f20 | | Execute_Immediate Equal,0x20 031d 680e |h | Jump_Zero 0x32c 031e 00d8 | | Load_Top At_Offset_0 031f 0a01 | | Execute_Immediate Plus,0x1 0320 0059 | Y | Store_Top Discrete,At_Offset_1 0321 00d8 | | Load_Top At_Offset_0 0322 e5ff | | Load 0x2,-0x1 0323 01d7 | | Execute Vector,Field_Read 0324 4830 |H0 | Short_Literal 0x30 0325 4839 |H9 | Short_Literal 0x39 0326 0261 | a | Execute Discrete,Not_In_Range 0327 6801 |h | Jump_Zero 0x329 0328 08e0 | | Execute_Immediate Raise,0xe0 0329 00d9 | | Load_Top At_Offset_1 032a 0f2d | - | Execute_Immediate Equal,0x2d 032b a405 | | Store_Unchecked 0x2,0x5 032c 00cf | | Action Mark_Auxiliary 032d 7869 |xi | Jump 0x397 032e 00d9 | | Load_Top At_Offset_1 032f e5ff | | Load 0x2,-0x1 0330 01d7 | | Execute Vector,Field_Read 0331 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0332 00da | | Load_Top At_Offset_2 0333 00d8 | | Load_Top At_Offset_0 0334 0d46 | F | Execute_Immediate Less,0x46 0335 700a |p | Jump_Nonzero 0x340 0336 00d8 | | Load_Top At_Offset_0 0337 0c5f | _ | Execute_Immediate Greater_Equal,0x5f 0338 7002 |p | Jump_Nonzero 0x33b 0339 00d1 | | Pop_Control Pop_Count_1 033a 08e0 | | Execute_Immediate Raise,0xe0 033b 0b5f | _ | Execute_Immediate Case_Compare,0x5f 033c 7025 |p% | Jump_Nonzero 0x362 033d 0f65 | e | Execute_Immediate Equal,0x65 033e 7035 |p5 | Jump_Nonzero 0x374 033f 7ffa | | Jump 0x33a 0340 00d8 | | Load_Top At_Offset_0 0341 4830 |H0 | Short_Literal 0x30 0342 4839 |H9 | Short_Literal 0x39 0343 0262 | b | Execute Discrete,In_Range 0344 7003 |p | Jump_Nonzero 0x348 0345 0f45 | E | Execute_Immediate Equal,0x45 0346 702d |p- | Jump_Nonzero 0x374 0347 7ff2 | | Jump 0x33a 0348 00d1 | | Pop_Control Pop_Count_1 0349 00db | | Load_Top At_Offset_3 034a 6808 |h | Jump_Zero 0x353 034b e404 | | Load 0x2,0x4 034c 480a |H | Short_Literal 0xa 034d 0271 | q | Execute Discrete,Times 034e 00db | | Load_Top At_Offset_3 034f 0ad0 | | Execute_Immediate Plus,-0x30 0350 0273 | s | Execute Discrete,Plus 0351 c404 | | Store 0x2,0x4 0352 7840 |x@ | Jump 0x393 0353 e403 | | Load 0x2,0x3 0354 00db | | Load_Top At_Offset_3 0355 0ad0 | | Execute_Immediate Plus,-0x30 0356 8011 | | Call 0x0,0x11 0357 e012 | | Load 0x0,0x12 0358 4800 |H | Short_Literal 0x0 0359 e403 | | Load 0x2,0x3 035a 824d | M | Call 0x1,0x4d 035b e001 | | Load 0x0,0x1 035c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 035d e001 | | Load 0x0,0x1 035e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 035f 8013 | | Call 0x0,0x13 0360 00d1 | | Pop_Control Pop_Count_1 0361 7831 |x1 | Jump 0x393 0362 00d1 | | Pop_Control Pop_Count_1 0363 00d9 | | Load_Top At_Offset_1 0364 0aff | | Execute_Immediate Plus,-0x1 0365 e5ff | | Load 0x2,-0x1 0366 01d7 | | Execute Vector,Field_Read 0367 4830 |H0 | Short_Literal 0x30 0368 4839 |H9 | Short_Literal 0x39 0369 0261 | a | Execute Discrete,Not_In_Range 036a 7008 |p | Jump_Nonzero 0x373 036b 00d9 | | Load_Top At_Offset_1 036c 0a01 | | Execute_Immediate Plus,0x1 036d e5ff | | Load 0x2,-0x1 036e 01d7 | | Execute Vector,Field_Read 036f 4830 |H0 | Short_Literal 0x30 0370 4839 |H9 | Short_Literal 0x39 0371 0261 | a | Execute Discrete,Not_In_Range 0372 6820 |h | Jump_Zero 0x393 0373 08e0 | | Execute_Immediate Raise,0xe0 0374 00db | | Load_Top At_Offset_3 0375 7008 |p | Jump_Nonzero 0x37e 0376 00d9 | | Load_Top At_Offset_1 0377 0aff | | Execute_Immediate Plus,-0x1 0378 e5ff | | Load 0x2,-0x1 0379 01d7 | | Execute Vector,Field_Read 037a 4830 |H0 | Short_Literal 0x30 037b 4839 |H9 | Short_Literal 0x39 037c 0261 | a | Execute Discrete,Not_In_Range 037d 6801 |h | Jump_Zero 0x37f 037e 08e0 | | Execute_Immediate Raise,0xe0 037f 4801 |H | Short_Literal 0x1 0380 a406 | | Store_Unchecked 0x2,0x6 0381 00d9 | | Load_Top At_Offset_1 0382 0a01 | | Execute_Immediate Plus,0x1 0383 e5ff | | Load 0x2,-0x1 0384 01d7 | | Execute Vector,Field_Read 0385 0f2b | + | Execute_Immediate Equal,0x2b 0386 6803 |h | Jump_Zero 0x38a 0387 00d9 | | Load_Top At_Offset_1 0388 0a01 | | Execute_Immediate Plus,0x1 0389 005a | Z | Store_Top Discrete,At_Offset_2 038a 00d9 | | Load_Top At_Offset_1 038b 0a01 | | Execute_Immediate Plus,0x1 038c e5ff | | Load 0x2,-0x1 038d 01d7 | | Execute Vector,Field_Read 038e 4830 |H0 | Short_Literal 0x30 038f 4839 |H9 | Short_Literal 0x39 0390 0261 | a | Execute Discrete,Not_In_Range 0391 6801 |h | Jump_Zero 0x393 0392 08e0 | | Execute_Immediate Raise,0xe0 0393 00d9 | | Load_Top At_Offset_1 0394 0a01 | | Execute_Immediate Plus,0x1 0395 005a | Z | Store_Top Discrete,At_Offset_2 0396 00c9 | | Action Pop_Auxiliary_Loop 0397 00d9 | | Load_Top At_Offset_1 0398 e5ff | | Load 0x2,-0x1 0399 01dc | | Execute Vector,Last 039a 027a | z | Execute Discrete,Less_Equal 039b 7792 |w | Jump_Nonzero 0x32e 039c 00ce | | Action Pop_Auxiliary 039d 00db | | Load_Top At_Offset_3 039e 680f |h | Jump_Zero 0x3ae 039f e404 | | Load 0x2,0x4 03a0 e012 | | Load 0x0,0x12 03a1 e001 | | Load 0x0,0x1 03a2 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 03a3 4800 |H | Short_Literal 0x0 03a4 e403 | | Load 0x2,0x3 03a5 824d | M | Call 0x1,0x4d 03a6 e001 | | Load 0x0,0x1 03a7 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 03a8 e001 | | Load 0x0,0x1 03a9 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03aa e001 | | Load 0x0,0x1 03ab 1b20 | | Execute Package,Field_Read,Field_Number 0x20 03ac 01c6 | | Execute Vector,Convert_To_Formal 03ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ae e404 | | Load 0x2,0x4 03af e012 | | Load 0x0,0x12 03b0 e001 | | Load 0x0,0x1 03b1 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 03b2 4800 |H | Short_Literal 0x0 03b3 e403 | | Load 0x2,0x3 03b4 824d | M | Call 0x1,0x4d 03b5 e001 | | Load 0x0,0x1 03b6 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 03b7 e001 | | Load 0x0,0x1 03b8 1b20 | | Execute Package,Field_Read,Field_Number 0x20 03b9 01c6 | | Execute Vector,Convert_To_Formal 03ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03bb 0000 0000 | | .BLANK 0000[0x5] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03d1 | | .CONST 0x03d1 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0005 | | .CONST 0x0005 ; Number of locals 03c3 INIT_03c0: 03c3 4801 |H | Short_Literal 0x1 03c4 4804 |H | Short_Literal 0x4 03c5 e001 | | Load 0x0,0x1 03c6 1b20 | | Execute Package,Field_Read,Field_Number 0x20 03c7 035b | [ | Declare_Type Array,Constrained 03c8 0337 | 7 | Declare_Variable Array 03c9 4801 |H | Short_Literal 0x1 03ca 4802 |H | Short_Literal 0x2 03cb e001 | | Load 0x0,0x1 03cc 1b20 | | Execute Package,Field_Read,Field_Number 0x20 03cd 035b | [ | Declare_Type Array,Constrained 03ce 0337 | 7 | Declare_Variable Array 03cf 00e2 | | Load_Encached Integer_Cache 03d0 03e9 | | Declare_Variable Discrete,Duplicate 03d1 BODY_03c0: 03d1 00e2 | | Load_Encached Integer_Cache 03d2 e402 | | Load 0x2,0x2 03d3 e5ff | | Load 0x2,-0x1 03d4 824f | O | Call 0x1,0x4f 03d5 00d1 | | Pop_Control Pop_Count_1 03d6 005a | Z | Store_Top Discrete,At_Offset_2 03d7 00e2 | | Load_Encached Integer_Cache 03d8 00db | | Load_Top At_Offset_3 03d9 e5fe | | Load 0x2,-0x2 03da 824f | O | Call 0x1,0x4f 03db 00d1 | | Pop_Control Pop_Count_1 03dc 0059 | Y | Store_Top Discrete,At_Offset_1 03dd 00d9 | | Load_Top At_Offset_1 03de 00d9 | | Load_Top At_Offset_1 03df 0272 | r | Execute Discrete,Minus 03e0 00d8 | | Load_Top At_Offset_0 03e1 00e2 | | Load_Encached Integer_Cache 03e2 0260 | ` | Execute Discrete,In_Type 03e3 7001 |p | Jump_Nonzero 0x3e5 03e4 0801 | | Execute_Immediate Raise,0x1 03e5 00db | | Load_Top At_Offset_3 03e6 e402 | | Load 0x2,0x2 03e7 e001 | | Load 0x0,0x1 03e8 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 03e9 8250 | P | Call 0x1,0x50 03ea e001 | | Load 0x0,0x1 03eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03ec 0238 | 8 | Execute Float,Convert 03ed 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03ee 0000 0000 | | .XXX[0x2] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 0403 | | .CONST 0x0403 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0003 | | .CONST 0x0003 ; Number of locals 03f3 INIT_03f0: 03f3 4801 |H | Short_Literal 0x1 03f4 00db | | Load_Top At_Offset_3 03f5 01db | | Execute Vector,Length 03f6 481f |H | Short_Literal 0x1f 03f7 0271 | q | Execute Discrete,Times 03f8 00d8 | | Load_Top At_Offset_0 03f9 00e2 | | Load_Encached Integer_Cache 03fa 0260 | ` | Execute Discrete,In_Type 03fb 7001 |p | Jump_Nonzero 0x3fd 03fc 0801 | | Execute_Immediate Raise,0x1 03fd e001 | | Load 0x0,0x1 03fe 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 03ff 035b | [ | Declare_Type Array,Constrained 0400 0337 | 7 | Declare_Variable Array 0401 00e2 | | Load_Encached Integer_Cache 0402 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0403 BODY_03f0: 0403 00cf | | Action Mark_Auxiliary 0404 e5ff | | Load 0x2,-0x1 0405 01d9 | | Execute Vector,Reverse_Bounds 0406 0263 | c | Execute Discrete,Above_Bound 0407 7025 |p% | Jump_Nonzero 0x42d 0408 4802 |H | Short_Literal 0x2 0409 4820 |H | Short_Literal 0x20 040a 00da | | Load_Top At_Offset_2 040b e5ff | | Load 0x2,-0x1 040c 01d7 | | Execute Vector,Field_Read 040d 0274 | t | Execute Discrete,Absolute_Value 040e e001 | | Load 0x0,0x1 040f 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0410 00d9 | | Load_Top At_Offset_1 0411 00d0 | | Action Swap_Control 0412 0260 | ` | Execute Discrete,In_Type 0413 7001 |p | Jump_Nonzero 0x415 0414 0801 | | Execute_Immediate Raise,0x1 0415 e247 | G | Load 0x1,0x47 0416 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0417 01cf | | Execute Vector,Slice_Read 0418 e403 | | Load 0x2,0x3 0419 0a01 | | Execute_Immediate Plus,0x1 041a 00d8 | | Load_Top At_Offset_0 041b 00e2 | | Load_Encached Integer_Cache 041c 0260 | ` | Execute Discrete,In_Type 041d 7001 |p | Jump_Nonzero 0x41f 041e 0801 | | Execute_Immediate Raise,0x1 041f e403 | | Load 0x2,0x3 0420 0a1f | | Execute_Immediate Plus,0x1f 0421 00d8 | | Load_Top At_Offset_0 0422 00e2 | | Load_Encached Integer_Cache 0423 0260 | ` | Execute Discrete,In_Type 0424 7001 |p | Jump_Nonzero 0x426 0425 0801 | | Execute_Immediate Raise,0x1 0426 e402 | | Load 0x2,0x2 0427 01ce | | Execute Vector,Slice_Write 0428 00db | | Load_Top At_Offset_3 0429 0a1f | | Execute_Immediate Plus,0x1f 042a c403 | | Store 0x2,0x3 042b 00c8 | | Action Pop_Auxiliary_Range 042c 3fdb |? | Loop_Increasing 0x408 042d 00c9 | | Action Pop_Auxiliary_Loop 042e 00da | | Load_Top At_Offset_2 042f 01d9 | | Execute Vector,Reverse_Bounds 0430 0263 | c | Execute Discrete,Above_Bound 0431 7025 |p% | Jump_Nonzero 0x457 0432 00d8 | | Load_Top At_Offset_0 0433 e402 | | Load 0x2,0x2 0434 01d7 | | Execute Vector,Field_Read 0435 681f |h | Jump_Zero 0x455 0436 00d8 | | Load_Top At_Offset_0 0437 0c02 | | Execute_Immediate Greater_Equal,0x2 0438 6817 |h | Jump_Zero 0x450 0439 e402 | | Load 0x2,0x2 043a 01dc | | Execute Vector,Last 043b 00d9 | | Load_Top At_Offset_1 043c 0272 | r | Execute Discrete,Minus 043d 0a01 | | Execute_Immediate Plus,0x1 043e c403 | | Store 0x2,0x3 043f 00d8 | | Load_Top At_Offset_0 0440 e402 | | Load 0x2,0x2 0441 01dc | | Execute Vector,Last 0442 e402 | | Load 0x2,0x2 0443 01cf | | Execute Vector,Slice_Read 0444 4801 |H | Short_Literal 0x1 0445 e403 | | Load 0x2,0x3 0446 e402 | | Load 0x2,0x2 0447 01ce | | Execute Vector,Slice_Write 0448 4801 |H | Short_Literal 0x1 0449 e403 | | Load 0x2,0x3 044a e402 | | Load 0x2,0x2 044b 01cf | | Execute Vector,Slice_Read 044c e001 | | Load 0x0,0x1 044d 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 044e 01c6 | | Execute Vector,Convert_To_Formal 044f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0450 e402 | | Load 0x2,0x2 0451 e001 | | Load 0x0,0x1 0452 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 0453 01c6 | | Execute Vector,Convert_To_Formal 0454 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0455 00c8 | | Action Pop_Auxiliary_Range 0456 3fdb |? | Loop_Increasing 0x432 0457 00ce | | Action Pop_Auxiliary 0458 4801 |H | Short_Literal 0x1 0459 4801 |H | Short_Literal 0x1 045a e001 | | Load 0x0,0x1 045b 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 045c 035b | [ | Declare_Type Array,Constrained 045d 0337 | 7 | Declare_Variable Array 045e 4800 |H | Short_Literal 0x0 045f 4801 |H | Short_Literal 0x1 0460 00da | | Load_Top At_Offset_2 0461 01d6 | | Execute Vector,Field_Write 0462 e001 | | Load 0x0,0x1 0463 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 0464 01c6 | | Execute Vector,Convert_To_Formal 0465 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0466 0000 0000 | | .XXX[0x2] 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 0483 | | .CONST 0x0483 ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0004 | | .CONST 0x0004 ; Number of locals 046b INIT_0468: 046b 4801 |H | Short_Literal 0x1 046c 00db | | Load_Top At_Offset_3 046d 01db | | Execute Vector,Length 046e 0a1e | | Execute_Immediate Plus,0x1e 046f 481f |H | Short_Literal 0x1f 0470 0270 | p | Execute Discrete,Divide 0471 00d8 | | Load_Top At_Offset_0 0472 00e2 | | Load_Encached Integer_Cache 0473 0260 | ` | Execute Discrete,In_Type 0474 7001 |p | Jump_Nonzero 0x476 0475 0801 | | Execute_Immediate Raise,0x1 0476 e001 | | Load 0x0,0x1 0477 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0478 035b | [ | Declare_Type Array,Constrained 0479 0337 | 7 | Declare_Variable Array 047a e241 | A | Load 0x1,0x41 047b 0337 | 7 | Declare_Variable Array 047c e244 | D | Load 0x1,0x44 047d 00d9 | | Load_Top At_Offset_1 047e 01d4 | | Execute Vector,Structure_Write 047f e5ff | | Load 0x2,-0x1 0480 01dc | | Execute Vector,Last 0481 00e2 | | Load_Encached Integer_Cache 0482 03f1 | | Declare_Variable Discrete,With_Value 0483 BODY_0468: 0483 00cf | | Action Mark_Auxiliary 0484 4801 |H | Short_Literal 0x1 0485 e402 | | Load 0x2,0x2 0486 01dc | | Execute Vector,Last 0487 0264 | d | Execute Discrete,Below_Bound 0488 7041 |pA | Jump_Nonzero 0x4ca 0489 00db | | Load_Top At_Offset_3 048a 0ae1 | | Execute_Immediate Plus,-0x1f 048b c404 | | Store 0x2,0x4 048c 00db | | Load_Top At_Offset_3 048d 0a01 | | Execute_Immediate Plus,0x1 048e e5ff | | Load 0x2,-0x1 048f 01dd | | Execute Vector,First 0490 027c | | | Execute Discrete,Less 0491 681c |h | Jump_Zero 0x4ae 0492 e244 | D | Load 0x1,0x44 0493 e403 | | Load 0x2,0x3 0494 01d4 | | Execute Vector,Structure_Write 0495 e5ff | | Load 0x2,-0x1 0496 01dd | | Execute Vector,First 0497 e404 | | Load 0x2,0x4 0498 0a1f | | Execute_Immediate Plus,0x1f 0499 00d8 | | Load_Top At_Offset_0 049a 00e2 | | Load_Encached Integer_Cache 049b 0260 | ` | Execute Discrete,In_Type 049c 7001 |p | Jump_Nonzero 0x49e 049d 0801 | | Execute_Immediate Raise,0x1 049e e5ff | | Load 0x2,-0x1 049f 01cf | | Execute Vector,Slice_Read 04a0 e5ff | | Load 0x2,-0x1 04a1 01dd | | Execute Vector,First 04a2 e404 | | Load 0x2,0x4 04a3 0272 | r | Execute Discrete,Minus 04a4 0a01 | | Execute_Immediate Plus,0x1 04a5 00d8 | | Load_Top At_Offset_0 04a6 00e2 | | Load_Encached Integer_Cache 04a7 0260 | ` | Execute Discrete,In_Type 04a8 7001 |p | Jump_Nonzero 0x4aa 04a9 0801 | | Execute_Immediate Raise,0x1 04aa 4820 |H | Short_Literal 0x20 04ab e403 | | Load 0x2,0x3 04ac 01ce | | Execute Vector,Slice_Write 04ad 7814 |x | Jump 0x4c2 04ae 00db | | Load_Top At_Offset_3 04af 0a01 | | Execute_Immediate Plus,0x1 04b0 00d8 | | Load_Top At_Offset_0 04b1 00e2 | | Load_Encached Integer_Cache 04b2 0260 | ` | Execute Discrete,In_Type 04b3 7001 |p | Jump_Nonzero 0x4b5 04b4 0801 | | Execute_Immediate Raise,0x1 04b5 e404 | | Load 0x2,0x4 04b6 0a1f | | Execute_Immediate Plus,0x1f 04b7 00d8 | | Load_Top At_Offset_0 04b8 00e2 | | Load_Encached Integer_Cache 04b9 0260 | ` | Execute Discrete,In_Type 04ba 7001 |p | Jump_Nonzero 0x4bc 04bb 0801 | | Execute_Immediate Raise,0x1 04bc e5ff | | Load 0x2,-0x1 04bd 01cf | | Execute Vector,Slice_Read 04be 4802 |H | Short_Literal 0x2 04bf 4820 |H | Short_Literal 0x20 04c0 e403 | | Load 0x2,0x3 04c1 01ce | | Execute Vector,Slice_Write 04c2 e403 | | Load 0x2,0x3 04c3 e248 | H | Load 0x1,0x48 04c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04c5 00d9 | | Load_Top At_Offset_1 04c6 e402 | | Load 0x2,0x2 04c7 01d6 | | Execute Vector,Field_Write 04c8 00c8 | | Action Pop_Auxiliary_Range 04c9 37bf |7 | Loop_Decreasing 0x489 04ca 00ce | | Action Pop_Auxiliary 04cb 00da | | Load_Top At_Offset_2 04cc e001 | | Load 0x0,0x1 04cd 1b20 | | Execute Package,Field_Read,Field_Number 0x20 04ce 01c6 | | Execute Vector,Convert_To_Formal 04cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04fe | | .CONST 0x04fe ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0009 | | .CONST 0x0009 ; Number of locals 04d3 INIT_04d0: 04d3 4801 |H | Short_Literal 0x1 04d4 00db | | Load_Top At_Offset_3 04d5 01db | | Execute Vector,Length 04d6 00d8 | | Load_Top At_Offset_0 04d7 00e2 | | Load_Encached Integer_Cache 04d8 0260 | ` | Execute Discrete,In_Type 04d9 7001 |p | Jump_Nonzero 0x4db 04da 0801 | | Execute_Immediate Raise,0x1 04db e001 | | Load 0x0,0x1 04dc 1b20 | | Execute Package,Field_Read,Field_Number 0x20 04dd 035b | [ | Declare_Type Array,Constrained 04de 00d8 | | Load_Top At_Offset_0 04df 0337 | 7 | Declare_Variable Array 04e0 e5ff | | Load 0x2,-0x1 04e1 00d9 | | Load_Top At_Offset_1 04e2 01d4 | | Execute Vector,Structure_Write 04e3 4801 |H | Short_Literal 0x1 04e4 e5ff | | Load 0x2,-0x1 04e5 01db | | Execute Vector,Length 04e6 e001 | | Load 0x0,0x1 04e7 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 04e8 012c | , | Execute Any,Size 04e9 0271 | q | Execute Discrete,Times 04ea e014 | | Load 0x0,0x14 04eb 1b11 | | Execute Package,Field_Read,Field_Number 0x11 04ec 012c | , | Execute Any,Size 04ed 0270 | p | Execute Discrete,Divide 04ee 00d8 | | Load_Top At_Offset_0 04ef 00e2 | | Load_Encached Integer_Cache 04f0 0260 | ` | Execute Discrete,In_Type 04f1 7001 |p | Jump_Nonzero 0x4f3 04f2 0801 | | Execute_Immediate Raise,0x1 04f3 e014 | | Load 0x0,0x14 04f4 1b12 | | Execute Package,Field_Read,Field_Number 0x12 04f5 035b | [ | Declare_Type Array,Constrained 04f6 a015 | | Store_Unchecked 0x0,0x15 04f7 00c6 | | Action Check_Subprogram_Elaborated 04f8 00da | | Load_Top At_Offset_2 04f9 00d9 | | Load_Top At_Offset_1 04fa e016 | | Load 0x0,0x16 04fb e017 | | Load 0x0,0x17 04fc 4809 |H | Short_Literal 0x9 04fd 0007 | | Action Break_Optional 04fe BODY_04d0: 04fe e403 | | Load 0x2,0x3 04ff e405 | | Load 0x2,0x5 0500 e406 | | Load 0x2,0x6 0501 4807 |H | Short_Literal 0x7 0502 4802 |H | Short_Literal 0x2 0503 0099 | | Action Reference_Dynamic 0504 8015 | | Call 0x0,0x15 0505 e014 | | Load 0x0,0x14 0506 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0507 01c6 | | Execute Vector,Convert_To_Formal 0508 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0509 0000 0000 | | .BLANK 0000[0x7] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 0539 | 9 | .CONST 0x0539 ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0008 | | .CONST 0x0008 ; Number of locals 0513 INIT_0510: 0513 4801 |H | Short_Literal 0x1 0514 00db | | Load_Top At_Offset_3 0515 01db | | Execute Vector,Length 0516 e014 | | Load 0x0,0x14 0517 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0518 012c | , | Execute Any,Size 0519 0271 | q | Execute Discrete,Times 051a e001 | | Load 0x0,0x1 051b 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 051c 012c | , | Execute Any,Size 051d 0270 | p | Execute Discrete,Divide 051e 00d8 | | Load_Top At_Offset_0 051f 00e2 | | Load_Encached Integer_Cache 0520 0260 | ` | Execute Discrete,In_Type 0521 7001 |p | Jump_Nonzero 0x523 0522 0801 | | Execute_Immediate Raise,0x1 0523 e001 | | Load 0x0,0x1 0524 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0525 035b | [ | Declare_Type Array,Constrained 0526 4801 |H | Short_Literal 0x1 0527 e5ff | | Load 0x2,-0x1 0528 01db | | Execute Vector,Length 0529 00d8 | | Load_Top At_Offset_0 052a 00e2 | | Load_Encached Integer_Cache 052b 0260 | ` | Execute Discrete,In_Type 052c 7001 |p | Jump_Nonzero 0x52e 052d 0801 | | Execute_Immediate Raise,0x1 052e e014 | | Load 0x0,0x14 052f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0530 035b | [ | Declare_Type Array,Constrained 0531 a015 | | Store_Unchecked 0x0,0x15 0532 00c6 | | Action Check_Subprogram_Elaborated 0533 00d8 | | Load_Top At_Offset_0 0534 00da | | Load_Top At_Offset_2 0535 e018 | | Load 0x0,0x18 0536 e019 | | Load 0x0,0x19 0537 4808 |H | Short_Literal 0x8 0538 0007 | | Action Break_Optional 0539 BODY_0510: 0539 e5ff | | Load 0x2,-0x1 053a e403 | | Load 0x2,0x3 053b 01c7 | | Execute Vector,Convert 053c e404 | | Load 0x2,0x4 053d e405 | | Load 0x2,0x5 053e 4806 |H | Short_Literal 0x6 053f 4802 |H | Short_Literal 0x2 0540 0099 | | Action Reference_Dynamic 0541 8015 | | Call 0x0,0x15 0542 e001 | | Load 0x0,0x1 0543 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0544 01c6 | | Execute Vector,Convert_To_Formal 0545 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0546 0000 0000 | | .XXX[0x2] 0548 ; -------------------------------------------------------------------------------------- 0548 ; SUBPROGRAM 0548 ; -------------------------------------------------------------------------------------- 0548 054b | K | .CONST 0x054b ; Address of begin 0549 0004 | | .CONST 0x0004 ; Address of exception handler 054a 0001 | | .CONST 0x0001 ; Number of locals 054b BODY_0548: 054b INIT_0548: 054b 00da | | Load_Top At_Offset_2 054c 8229 | ) | Call 0x1,0x29 054d 821e | | Call 0x1,0x1e 054e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 054f 0000 | | .XXX[0x1] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 e01a | | Load 0x0,0x1a 0554 00db | | Load_Top At_Offset_3 0555 821f | | Call 0x1,0x1f 0556 822f | / | Call 0x1,0x2f 0557 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 0561 | a | .CONST 0x0561 ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0002 | | .CONST 0x0002 ; Number of locals 055b INIT_0558: 055b 00da | | Load_Top At_Offset_2 055c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 055d 00db | | Load_Top At_Offset_3 055e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 055f e001 | | Load 0x0,0x1 0560 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0561 BODY_0558: 0561 00db | | Load_Top At_Offset_3 0562 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0563 e01b | | Load 0x0,0x1b 0564 01df | | Execute Vector,Equal 0565 6802 |h | Jump_Zero 0x568 0566 e01b | | Load 0x0,0x1b 0567 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0568 e01c | | Load 0x0,0x1c 0569 e5ff | | Load 0x2,-0x1 056a 00da | | Load_Top At_Offset_2 056b 822a | * | Call 0x1,0x2a 056c e001 | | Load 0x0,0x1 056d 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 056e e001 | | Load 0x0,0x1 056f 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0570 e001 | | Load 0x0,0x1 0571 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0572 6811 |h | Jump_Zero 0x584 0573 00db | | Load_Top At_Offset_3 0574 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0575 e001 | | Load 0x0,0x1 0576 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0577 4fff |O | Short_Literal -0x1 0578 027f | | Execute Discrete,Equal 0579 6805 |h | Jump_Zero 0x57f 057a e01a | | Load 0x0,0x1a 057b 00d9 | | Load_Top At_Offset_1 057c e001 | | Load 0x0,0x1 057d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 057e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 057f e01a | | Load 0x0,0x1a 0580 00d9 | | Load_Top At_Offset_1 0581 e001 | | Load 0x0,0x1 0582 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0583 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0584 00d8 | | Load_Top At_Offset_0 0585 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0586 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 058c 01db | | Execute Vector,Length 058d 4801 |H | Short_Literal 0x1 058e e001 | | Load 0x0,0x1 058f 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0590 1c08 | | Execute_Immediate Run_Utility,0x8 0591 00db | | Load_Top At_Offset_3 0592 00d9 | | Load_Top At_Offset_1 0593 00d8 | | Load_Top At_Offset_0 0594 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0595 00da | | Load_Top At_Offset_2 0596 01da | | Execute Vector,Bounds 0597 00da | | Load_Top At_Offset_2 0598 01da | | Execute Vector,Bounds 0599 00da | | Load_Top At_Offset_2 059a 027f | | Execute Discrete,Equal 059b 7001 |p | Jump_Nonzero 0x59d 059c 08e0 | | Execute_Immediate Raise,0xe0 059d 00cd | | Action Spare6_Action 059e 027f | | Execute Discrete,Equal 059f 7001 |p | Jump_Nonzero 0x5a1 05a0 08e0 | | Execute_Immediate Raise,0xe0 05a1 00d2 | | Pop_Control Pop_Count_2 05a2 00d9 | | Load_Top At_Offset_1 05a3 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 05a4 e01a | | Load 0x0,0x1a 05a5 00d9 | | Load_Top At_Offset_1 05a6 00d8 | | Load_Top At_Offset_0 05a7 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 05a8 00da | | Load_Top At_Offset_2 05a9 01da | | Execute Vector,Bounds 05aa 00da | | Load_Top At_Offset_2 05ab 01da | | Execute Vector,Bounds 05ac 00da | | Load_Top At_Offset_2 05ad 027f | | Execute Discrete,Equal 05ae 7001 |p | Jump_Nonzero 0x5b0 05af 08e0 | | Execute_Immediate Raise,0xe0 05b0 00cd | | Action Spare6_Action 05b1 027f | | Execute Discrete,Equal 05b2 7001 |p | Jump_Nonzero 0x5b4 05b3 08e0 | | Execute_Immediate Raise,0xe0 05b4 00d2 | | Pop_Control Pop_Count_2 05b5 00d9 | | Load_Top At_Offset_1 05b6 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 05b7 4401 |D | Exit_Subprogram With_Value,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 00da | | Load_Top At_Offset_2 05bc 823f | ? | Call 0x1,0x3f 05bd 00db | | Load_Top At_Offset_3 05be 823e | > | Call 0x1,0x3e 05bf e001 | | Load 0x0,0x1 05c0 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 05c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05c2 0000 0000 | | .BLANK 0000[0x6] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05d3 | | .CONST 0x05d3 ; Address of begin 05c9 05ed | | .CONST 0x05ed ; Address of exception handler 05ca 0002 | | .CONST 0x0002 ; Number of locals 05cb INIT_05c8: 05cb e009 | | Load 0x0,0x9 05cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05cd 0322 | " | Declare_Variable Record 05ce 00db | | Load_Top At_Offset_3 05cf e009 | | Load 0x0,0x9 05d0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05d1 00d9 | | Load_Top At_Offset_1 05d2 017d | } | Execute Record,Structure_Write 05d3 BODY_05c8: 05d3 00d8 | | Load_Top At_Offset_0 05d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05d5 680c |h | Jump_Zero 0x5e2 05d6 00d8 | | Load_Top At_Offset_0 05d7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05d8 e01d | | Load 0x0,0x1d 05d9 e001 | | Load 0x0,0x1 05da 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 05db 00d9 | | Load_Top At_Offset_1 05dc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 05dd 0275 | u | Execute Discrete,Unary_Minus 05de 821f | | Call 0x1,0x1f 05df e001 | | Load 0x0,0x1 05e0 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 05e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05e2 00d8 | | Load_Top At_Offset_0 05e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05e4 e01d | | Load 0x0,0x1d 05e5 e001 | | Load 0x0,0x1 05e6 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 05e7 00d9 | | Load_Top At_Offset_1 05e8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 05e9 821f | | Call 0x1,0x1f 05ea e001 | | Load 0x0,0x1 05eb 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 05ec 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05ed TRAP_05c8: 05ed 0007 | | Action Break_Optional 05ee e01e | | Load 0x0,0x1e 05ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f3 | | .CONST 0x05f3 ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0001 | | .CONST 0x0001 ; Number of locals 05f3 BODY_05f0: 05f3 INIT_05f0: 05f3 00da | | Load_Top At_Offset_2 05f4 822b | + | Call 0x1,0x2b 05f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f6 0000 0000 | | .XXX[0x2] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb 00da | | Load_Top At_Offset_2 05fc 822c | , | Call 0x1,0x2c 05fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05fe 0000 0000 | | .XXX[0x2] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0605 | | .CONST 0x0605 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0002 | | .CONST 0x0002 ; Number of locals 0603 INIT_0600: 0603 029f 0af3 | | Declare_Subprogram INIT_0af0,For_Call 0605 BODY_0600: 0605 e5fe | | Load 0x2,-0x2 0606 e01b | | Load 0x0,0x1b 0607 01df | | Execute Vector,Equal 0608 6801 |h | Jump_Zero 0x60a 0609 08e1 | | Execute_Immediate Raise,0xe1 060a 00db | | Load_Top At_Offset_3 060b e01b | | Load 0x0,0x1b 060c 01df | | Execute Vector,Equal 060d 6802 |h | Jump_Zero 0x610 060e e01e | | Load 0x0,0x1e 060f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0610 00db | | Load_Top At_Offset_3 0611 01db | | Execute Vector,Length 0612 0f01 | | Execute_Immediate Equal,0x1 0613 6806 |h | Jump_Zero 0x61a 0614 4801 |H | Short_Literal 0x1 0615 e5ff | | Load 0x2,-0x1 0616 01d7 | | Execute Vector,Field_Read 0617 0274 | t | Execute Discrete,Absolute_Value 0618 0f01 | | Execute_Immediate Equal,0x1 0619 700a |p | Jump_Nonzero 0x624 061a e5fe | | Load 0x2,-0x2 061b 01db | | Execute Vector,Length 061c 0f01 | | Execute_Immediate Equal,0x1 061d 6818 |h | Jump_Zero 0x636 061e 4801 |H | Short_Literal 0x1 061f e5fe | | Load 0x2,-0x2 0620 01d7 | | Execute Vector,Field_Read 0621 0274 | t | Execute Discrete,Absolute_Value 0622 0f01 | | Execute_Immediate Equal,0x1 0623 6812 |h | Jump_Zero 0x636 0624 e5fe | | Load 0x2,-0x2 0625 e001 | | Load 0x0,0x1 0626 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0627 4fff |O | Short_Literal -0x1 0628 027f | | Execute Discrete,Equal 0629 6808 |h | Jump_Zero 0x632 062a e5fe | | Load 0x2,-0x2 062b e001 | | Load 0x0,0x1 062c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 062d e5ff | | Load 0x2,-0x1 062e e001 | | Load 0x0,0x1 062f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0630 801f | | Call 0x0,0x1f 0631 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0632 e5fe | | Load 0x2,-0x2 0633 e5ff | | Load 0x2,-0x1 0634 801f | | Call 0x0,0x1f 0635 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0636 8402 | | Call 0x2,0x2 0637 0831 | 1 | Execute_Immediate Raise,0x31 0638 ; -------------------------------------------------------------------------------------- 0638 ; SUBPROGRAM 0638 ; -------------------------------------------------------------------------------------- 0638 063b | ; | .CONST 0x063b ; Address of begin 0639 0004 | | .CONST 0x0004 ; Address of exception handler 063a 0001 | | .CONST 0x0001 ; Number of locals 063b BODY_0638: 063b INIT_0638: 063b 00db | | Load_Top At_Offset_3 063c 821f | | Call 0x1,0x1f 063d 00db | | Load_Top At_Offset_3 063e 821f | | Call 0x1,0x1f 063f 822f | / | Call 0x1,0x2f 0640 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0641 0000 0000 | | .BLANK 0000[0x7] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 00db | | Load_Top At_Offset_3 064c 8221 | ! | Call 0x1,0x21 064d 00db | | Load_Top At_Offset_3 064e 8221 | ! | Call 0x1,0x21 064f 822f | / | Call 0x1,0x2f 0650 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0651 0000 0000 | | .BLANK 0000[0x7] 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065e | ^ | .CONST 0x065e ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0003 | | .CONST 0x0003 ; Number of locals 065b INIT_0658: 065b 00e5 | | Load_Encached Long_Integer_Cache 065c 029f 0b63 | c| Declare_Subprogram INIT_0b60,For_Call 065e BODY_0658: 065e e5fc | | Load 0x2,-0x4 065f 0d00 | | Execute_Immediate Less,0x0 0660 680b |h | Jump_Zero 0x66c 0661 e5ff | | Load 0x2,-0x1 0662 e001 | | Load 0x0,0x1 0663 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 0664 0092 0cd2 | | Action Push_String_Extended,0xcd2 ; "/" 0666 01cc | | Execute Vector,Catenate 0667 e5ff | | Load 0x2,-0x1 0668 e001 | | Load 0x0,0x1 0669 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 066a 01cc | | Execute Vector,Catenate 066b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 066c e5fc | | Load 0x2,-0x4 066d 7002 |p | Jump_Nonzero 0x670 066e 8403 | | Call 0x2,0x3 066f 7873 |xs | Jump 0x6e3 0670 4801 |H | Short_Literal 0x1 0671 e5ff | | Load 0x2,-0x1 0672 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0673 01d7 | | Execute Vector,Field_Read 0674 685f |h_ | Jump_Zero 0x6d4 0675 e5ff | | Load 0x2,-0x1 0676 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0677 e001 | | Load 0x0,0x1 0678 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0679 e5ff | | Load 0x2,-0x1 067a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 067b e001 | | Load 0x0,0x1 067c 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 067d 0272 | r | Execute Discrete,Minus 067e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 067f 00d9 | | Load_Top At_Offset_1 0680 00da | | Load_Top At_Offset_2 0681 0275 | u | Execute Discrete,Unary_Minus 0682 00d8 | | Load_Top At_Offset_0 0683 00e2 | | Load_Encached Integer_Cache 0684 0260 | ` | Execute Discrete,In_Type 0685 7001 |p | Jump_Nonzero 0x687 0686 0801 | | Execute_Immediate Raise,0x1 0687 e020 | | Load 0x0,0x20 0688 e001 | | Load 0x0,0x1 0689 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 068a e5ff | | Load 0x2,-0x1 068b e001 | | Load 0x0,0x1 068c 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 068d e001 | | Load 0x0,0x1 068e 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 068f 8252 | R | Call 0x1,0x52 0690 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0691 00d9 | | Load_Top At_Offset_1 0692 0d00 | | Execute_Immediate Less,0x0 0693 681f |h | Jump_Zero 0x6b3 0694 4845 |HE | Short_Literal 0x45 0695 4800 |H | Short_Literal 0x0 0696 e5fd | | Load 0x2,-0x3 0697 e5fe | | Load 0x2,-0x2 0698 e402 | | Load 0x2,0x2 0699 0275 | u | Execute Discrete,Unary_Minus 069a 00d8 | | Load_Top At_Offset_0 069b 00e2 | | Load_Encached Integer_Cache 069c 0260 | ` | Execute Discrete,In_Type 069d 7001 |p | Jump_Nonzero 0x69f 069e 0801 | | Execute_Immediate Raise,0x1 069f e020 | | Load 0x0,0x20 06a0 e001 | | Load 0x0,0x1 06a1 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 06a2 e5ff | | Load 0x2,-0x1 06a3 e001 | | Load 0x0,0x1 06a4 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 06a5 e001 | | Load 0x0,0x1 06a6 188b | | Execute Package,Field_Execute,Field_Number 0x8b 06a7 01cb | | Execute Vector,Append 06a8 4830 |H0 | Short_Literal 0x30 06a9 e5fc | | Load 0x2,-0x4 06aa 4820 |H | Short_Literal 0x20 06ab 4800 |H | Short_Literal 0x0 06ac 480a |H | Short_Literal 0xa 06ad e402 | | Load 0x2,0x2 06ae e021 | ! | Load 0x0,0x21 06af 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06b0 8253 | S | Call 0x1,0x53 06b1 01cc | | Execute Vector,Catenate 06b2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 06b3 4845 |HE | Short_Literal 0x45 06b4 4800 |H | Short_Literal 0x0 06b5 e5fd | | Load 0x2,-0x3 06b6 e5fe | | Load 0x2,-0x2 06b7 e402 | | Load 0x2,0x2 06b8 0275 | u | Execute Discrete,Unary_Minus 06b9 00d8 | | Load_Top At_Offset_0 06ba 00e2 | | Load_Encached Integer_Cache 06bb 0260 | ` | Execute Discrete,In_Type 06bc 7001 |p | Jump_Nonzero 0x6be 06bd 0801 | | Execute_Immediate Raise,0x1 06be e020 | | Load 0x0,0x20 06bf e001 | | Load 0x0,0x1 06c0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 06c1 e5ff | | Load 0x2,-0x1 06c2 e001 | | Load 0x0,0x1 06c3 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 06c4 e001 | | Load 0x0,0x1 06c5 188b | | Execute Package,Field_Execute,Field_Number 0x8b 06c6 01cb | | Execute Vector,Append 06c7 4830 |H0 | Short_Literal 0x30 06c8 e5fc | | Load 0x2,-0x4 06c9 482b |H+ | Short_Literal 0x2b 06ca 4820 |H | Short_Literal 0x20 06cb 4800 |H | Short_Literal 0x0 06cc 480a |H | Short_Literal 0xa 06cd e402 | | Load 0x2,0x2 06ce e021 | ! | Load 0x0,0x21 06cf 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06d0 01ca | | Execute Vector,Prepend 06d1 8253 | S | Call 0x1,0x53 06d2 01cc | | Execute Vector,Catenate 06d3 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 06d4 4845 |HE | Short_Literal 0x45 06d5 4800 |H | Short_Literal 0x0 06d6 e5fd | | Load 0x2,-0x3 06d7 e5fe | | Load 0x2,-0x2 06d8 e5ff | | Load 0x2,-0x1 06d9 e001 | | Load 0x0,0x1 06da 188b | | Execute Package,Field_Execute,Field_Number 0x8b 06db 01cb | | Execute Vector,Append 06dc 4830 |H0 | Short_Literal 0x30 06dd e5fc | | Load 0x2,-0x4 06de 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "+0" 06e0 8253 | S | Call 0x1,0x53 06e1 01cc | | Execute Vector,Catenate 06e2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 06e3 0831 | 1 | Execute_Immediate Raise,0x31 06e4 0000 0000 | | .BLANK 0000[0x4] 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06f9 | | .CONST 0x06f9 ; Address of begin 06e9 0004 | | .CONST 0x0004 ; Address of exception handler 06ea 0005 | | .CONST 0x0005 ; Number of locals 06eb INIT_06e8: 06eb 00e1 | | Load_Encached Boolean_Cache 06ec 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06ed 00db | | Load_Top At_Offset_3 06ee 01dd | | Execute Vector,First 06ef 0aff | | Execute_Immediate Plus,-0x1 06f0 00e2 | | Load_Encached Integer_Cache 06f1 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 06f2 e5ff | | Load 0x2,-0x1 06f3 01dc | | Execute Vector,Last 06f4 0a01 | | Execute_Immediate Plus,0x1 06f5 00e2 | | Load_Encached Integer_Cache 06f6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 06f7 00e2 | | Load_Encached Integer_Cache 06f8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06f9 BODY_06e8: 06f9 00cf | | Action Mark_Auxiliary 06fa e5ff | | Load 0x2,-0x1 06fb 01d9 | | Execute Vector,Reverse_Bounds 06fc 0263 | c | Execute Discrete,Above_Bound 06fd 703b |p; | Jump_Nonzero 0x739 06fe 00d8 | | Load_Top At_Offset_0 06ff e5ff | | Load 0x2,-0x1 0700 01d7 | | Execute Vector,Field_Read 0701 00d8 | | Load_Top At_Offset_0 0702 0d2e | . | Execute_Immediate Less,0x2e 0703 7010 |p | Jump_Nonzero 0x714 0704 00d8 | | Load_Top At_Offset_0 0705 0c46 | F | Execute_Immediate Greater_Equal,0x46 0706 700a |p | Jump_Nonzero 0x711 0707 0b2e | . | Execute_Immediate Case_Compare,0x2e 0708 7029 |p) | Jump_Nonzero 0x732 0709 00d8 | | Load_Top At_Offset_0 070a 4830 |H0 | Short_Literal 0x30 070b 4839 |H9 | Short_Literal 0x39 070c 0262 | b | Execute Discrete,In_Range 070d 701d |p | Jump_Nonzero 0x72b 070e 0f45 | E | Execute_Immediate Equal,0x45 070f 7006 |p | Jump_Nonzero 0x716 0710 7826 |x& | Jump 0x737 0711 0f65 | e | Execute_Immediate Equal,0x65 0712 7003 |p | Jump_Nonzero 0x716 0713 7823 |x# | Jump 0x737 0714 00d1 | | Pop_Control Pop_Count_1 0715 7821 |x! | Jump 0x737 0716 00d8 | | Load_Top At_Offset_0 0717 a404 | | Store_Unchecked 0x2,0x4 0718 00db | | Load_Top At_Offset_3 0719 00d9 | | Load_Top At_Offset_1 071a 0a01 | | Execute_Immediate Plus,0x1 071b 00d8 | | Load_Top At_Offset_0 071c 00e2 | | Load_Encached Integer_Cache 071d 0260 | ` | Execute Discrete,In_Type 071e 7001 |p | Jump_Nonzero 0x720 071f 0801 | | Execute_Immediate Raise,0x1 0720 e5ff | | Load 0x2,-0x1 0721 01dc | | Execute Vector,Last 0722 e5ff | | Load 0x2,-0x1 0723 01cf | | Execute Vector,Slice_Read 0724 00e2 | | Load_Encached Integer_Cache 0725 00e0 | | Load_Encached Standard_Cache 0726 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0727 0273 | s | Execute Discrete,Plus 0728 c405 | | Store 0x2,0x5 0729 00d2 | | Pop_Control Pop_Count_2 072a 780e |x | Jump 0x739 072b 00d1 | | Pop_Control Pop_Count_1 072c e402 | | Load 0x2,0x2 072d 6809 |h | Jump_Zero 0x737 072e 00db | | Load_Top At_Offset_3 072f 0aff | | Execute_Immediate Plus,-0x1 0730 c405 | | Store 0x2,0x5 0731 7805 |x | Jump 0x737 0732 00d1 | | Pop_Control Pop_Count_1 0733 00d8 | | Load_Top At_Offset_0 0734 a403 | | Store_Unchecked 0x2,0x3 0735 4801 |H | Short_Literal 0x1 0736 a402 | | Store_Unchecked 0x2,0x2 0737 00c8 | | Action Pop_Auxiliary_Range 0738 3fc5 |? | Loop_Increasing 0x6fe 0739 00ce | | Action Pop_Auxiliary 073a 00d8 | | Load_Top At_Offset_0 073b 6825 |h% | Jump_Zero 0x761 073c 00d8 | | Load_Top At_Offset_0 073d e020 | | Load 0x0,0x20 073e e001 | | Load 0x0,0x1 073f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0740 e5ff | | Load 0x2,-0x1 0741 01dd | | Execute Vector,First 0742 e403 | | Load 0x2,0x3 0743 0aff | | Execute_Immediate Plus,-0x1 0744 00d8 | | Load_Top At_Offset_0 0745 00e2 | | Load_Encached Integer_Cache 0746 0260 | ` | Execute Discrete,In_Type 0747 7001 |p | Jump_Nonzero 0x749 0748 0801 | | Execute_Immediate Raise,0x1 0749 e5ff | | Load 0x2,-0x1 074a 01cf | | Execute Vector,Slice_Read 074b e403 | | Load 0x2,0x3 074c 0a01 | | Execute_Immediate Plus,0x1 074d 00d8 | | Load_Top At_Offset_0 074e 00e2 | | Load_Encached Integer_Cache 074f 0260 | ` | Execute Discrete,In_Type 0750 7001 |p | Jump_Nonzero 0x752 0751 0801 | | Execute_Immediate Raise,0x1 0752 e404 | | Load 0x2,0x4 0753 0aff | | Execute_Immediate Plus,-0x1 0754 00d8 | | Load_Top At_Offset_0 0755 00e2 | | Load_Encached Integer_Cache 0756 0260 | ` | Execute Discrete,In_Type 0757 7001 |p | Jump_Nonzero 0x759 0758 0801 | | Execute_Immediate Raise,0x1 0759 e5ff | | Load 0x2,-0x1 075a 01cf | | Execute Vector,Slice_Read 075b 01cc | | Execute Vector,Catenate 075c 8221 | ! | Call 0x1,0x21 075d 822a | * | Call 0x1,0x2a 075e e001 | | Load 0x0,0x1 075f 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0760 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0761 e5ff | | Load 0x2,-0x1 0762 01dd | | Execute Vector,First 0763 00db | | Load_Top At_Offset_3 0764 0aff | | Execute_Immediate Plus,-0x1 0765 00d8 | | Load_Top At_Offset_0 0766 00e2 | | Load_Encached Integer_Cache 0767 0260 | ` | Execute Discrete,In_Type 0768 7001 |p | Jump_Nonzero 0x76a 0769 0801 | | Execute_Immediate Raise,0x1 076a e5ff | | Load 0x2,-0x1 076b 01cf | | Execute Vector,Slice_Read 076c 00db | | Load_Top At_Offset_3 076d 0a01 | | Execute_Immediate Plus,0x1 076e 00d8 | | Load_Top At_Offset_0 076f 00e2 | | Load_Encached Integer_Cache 0770 0260 | ` | Execute Discrete,In_Type 0771 7001 |p | Jump_Nonzero 0x773 0772 0801 | | Execute_Immediate Raise,0x1 0773 00db | | Load_Top At_Offset_3 0774 0aff | | Execute_Immediate Plus,-0x1 0775 00d8 | | Load_Top At_Offset_0 0776 00e2 | | Load_Encached Integer_Cache 0777 0260 | ` | Execute Discrete,In_Type 0778 7001 |p | Jump_Nonzero 0x77a 0779 0801 | | Execute_Immediate Raise,0x1 077a e5ff | | Load 0x2,-0x1 077b 01cf | | Execute Vector,Slice_Read 077c 01cc | | Execute Vector,Catenate 077d 8221 | ! | Call 0x1,0x21 077e 822a | * | Call 0x1,0x2a 077f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0786 | | .CONST 0x0786 ; Address of begin 0781 0004 | | .CONST 0x0004 ; Address of exception handler 0782 0003 | | .CONST 0x0003 ; Number of locals 0783 INIT_0780: 0783 00e2 | | Load_Encached Integer_Cache 0784 029f 0bc3 | | Declare_Subprogram INIT_0bc0,For_Call 0786 BODY_0780: 0786 e5ff | | Load 0x2,-0x1 0787 e01e | | Load 0x0,0x1e 0788 016f | o | Execute Variant_Record,Equal 0789 6802 |h | Jump_Zero 0x78c 078a 8403 | | Call 0x2,0x3 078b 7820 |x | Jump 0x7ac 078c e5ff | | Load 0x2,-0x1 078d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 078e e001 | | Load 0x0,0x1 078f 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0790 e5ff | | Load 0x2,-0x1 0791 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0792 e001 | | Load 0x0,0x1 0793 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0794 0272 | r | Execute Discrete,Minus 0795 00d8 | | Load_Top At_Offset_0 0796 00e2 | | Load_Encached Integer_Cache 0797 0260 | ` | Execute Discrete,In_Type 0798 7001 |p | Jump_Nonzero 0x79a 0799 0801 | | Execute_Immediate Raise,0x1 079a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 079b e5ff | | Load 0x2,-0x1 079c e001 | | Load 0x0,0x1 079d 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 079e e5fe | | Load 0x2,-0x2 079f 00db | | Load_Top At_Offset_3 07a0 e402 | | Load 0x2,0x2 07a1 0275 | u | Execute Discrete,Unary_Minus 07a2 e01d | | Load 0x0,0x1d 07a3 e001 | | Load 0x0,0x1 07a4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 07a5 e5ff | | Load 0x2,-0x1 07a6 e001 | | Load 0x0,0x1 07a7 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 07a8 e001 | | Load 0x0,0x1 07a9 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 07aa 8254 | T | Call 0x1,0x54 07ab 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07ac 0831 | 1 | Execute_Immediate Raise,0x31 07ad 0000 0000 | | .XXX[0x3] 07af 0000 | | 07b0 ; -------------------------------------------------------------------------------------- 07b0 ; SUBPROGRAM 07b0 ; -------------------------------------------------------------------------------------- 07b0 07b3 | | .CONST 0x07b3 ; Address of begin 07b1 0004 | | .CONST 0x0004 ; Address of exception handler 07b2 0001 | | .CONST 0x0001 ; Number of locals 07b3 BODY_07b0: 07b3 INIT_07b0: 07b3 00da | | Load_Top At_Offset_2 07b4 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 07b5 00db | | Load_Top At_Offset_3 07b6 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5 07b7 e5ff | | Load 0x2,-0x1 07b8 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 07b9 e5ff | | Load 0x2,-0x1 07ba 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 07bb 8239 | 9 | Call 0x1,0x39 07bc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07bd 0000 0000 | | .XXX[0x3] 07bf 0000 | | 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 00db | | Load_Top At_Offset_3 07c4 00db | | Load_Top At_Offset_3 07c5 e001 | | Load 0x0,0x1 07c6 188d | | Execute Package,Field_Execute,Field_Number 0x8d 07c7 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 07c8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07c9 0000 0000 | | .BLANK 0000[0x7] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 00db | | Load_Top At_Offset_3 07d4 00db | | Load_Top At_Offset_3 07d5 e001 | | Load 0x0,0x1 07d6 188d | | Execute Package,Field_Execute,Field_Number 0x8d 07d7 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 07d8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07d9 0000 0000 | | .BLANK 0000[0x7] 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; SUBPROGRAM 07e0 ; -------------------------------------------------------------------------------------- 07e0 07e3 | | .CONST 0x07e3 ; Address of begin 07e1 0004 | | .CONST 0x0004 ; Address of exception handler 07e2 0001 | | .CONST 0x0001 ; Number of locals 07e3 BODY_07e0: 07e3 INIT_07e0: 07e3 4801 |H | Short_Literal 0x1 07e4 00db | | Load_Top At_Offset_3 07e5 e001 | | Load 0x0,0x1 07e6 188d | | Execute Package,Field_Execute,Field_Number 0x8d 07e7 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5 07e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e9 0000 0000 | | .BLANK 0000[0x7] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f3 | | .CONST 0x07f3 ; Address of begin 07f1 0825 | % | .CONST 0x0825 ; Address of exception handler 07f2 0001 | | .CONST 0x0001 ; Number of locals 07f3 BODY_07f0: 07f3 INIT_07f0: 07f3 00db | | Load_Top At_Offset_3 07f4 0a01 | | Execute_Immediate Plus,0x1 07f5 4602 |F | Jump_Case 0x3 07f6 7816 |x | Jump 0x80d ; case 0x0 07f7 782b |x+ | Jump 0x823 ; case 0x1 07f8 7800 |x | Jump 0x7f9 ; case 0x2 07f9 e5fc | | Load 0x2,-0x4 07fa e5fd | | Load 0x2,-0x3 07fb e5ff | | Load 0x2,-0x1 07fc 01db | | Execute Vector,Length 07fd 0272 | r | Execute Discrete,Minus 07fe 00d8 | | Load_Top At_Offset_0 07ff 00e2 | | Load_Encached Integer_Cache 0800 0260 | ` | Execute Discrete,In_Type 0801 7001 |p | Jump_Nonzero 0x803 0802 0801 | | Execute_Immediate Raise,0x1 0803 e01d | | Load 0x0,0x1d 0804 e001 | | Load 0x0,0x1 0805 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0806 e5ff | | Load 0x2,-0x1 0807 8224 | $ | Call 0x1,0x24 0808 e001 | | Load 0x0,0x1 0809 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 080a e001 | | Load 0x0,0x1 080b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 080c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 080d e5fc | | Load 0x2,-0x4 080e e5fd | | Load 0x2,-0x3 080f e5ff | | Load 0x2,-0x1 0810 01db | | Execute Vector,Length 0811 0272 | r | Execute Discrete,Minus 0812 00d8 | | Load_Top At_Offset_0 0813 00e2 | | Load_Encached Integer_Cache 0814 0260 | ` | Execute Discrete,In_Type 0815 7001 |p | Jump_Nonzero 0x817 0816 0801 | | Execute_Immediate Raise,0x1 0817 e01d | | Load 0x0,0x1d 0818 e001 | | Load 0x0,0x1 0819 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 081a e5ff | | Load 0x2,-0x1 081b 8224 | $ | Call 0x1,0x24 081c e001 | | Load 0x0,0x1 081d 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 081e e001 | | Load 0x0,0x1 081f 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0820 e001 | | Load 0x0,0x1 0821 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0822 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0823 e01e | | Load 0x0,0x1e 0824 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0825 TRAP_07f0: 0825 0007 | | Action Break_Optional 0826 08e1 | | Execute_Immediate Raise,0xe1 0827 0000 | | .XXX[0x1] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 0831 | 1 | .CONST 0x0831 ; Address of begin 0829 0004 | | .CONST 0x0004 ; Address of exception handler 082a 0003 | | .CONST 0x0003 ; Number of locals 082b INIT_0828: 082b 00da | | Load_Top At_Offset_2 082c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 082d 8225 | % | Call 0x1,0x25 082e 00db | | Load_Top At_Offset_3 082f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0830 8225 | % | Call 0x1,0x25 0831 BODY_0828: 0831 00d9 | | Load_Top At_Offset_1 0832 01db | | Execute Vector,Length 0833 8251 | Q | Call 0x1,0x51 0834 00da | | Load_Top At_Offset_2 0835 01cc | | Execute Vector,Catenate 0836 00d9 | | Load_Top At_Offset_1 0837 01cc | | Execute Vector,Catenate 0838 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0839 0000 0000 | | .BLANK 0000[0x7] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0848 | H | .CONST 0x0848 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0004 | | .CONST 0x0004 ; Number of locals 0843 INIT_0840: 0843 00e2 | | Load_Encached Integer_Cache 0844 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0845 00e2 | | Load_Encached Integer_Cache 0846 00e2 | | Load_Encached Integer_Cache 0847 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0848 BODY_0840: 0848 00cf | | Action Mark_Auxiliary 0849 e5ff | | Load 0x2,-0x1 084a 01d9 | | Execute Vector,Reverse_Bounds 084b 0263 | c | Execute Discrete,Above_Bound 084c 7038 |p8 | Jump_Nonzero 0x885 084d 00d8 | | Load_Top At_Offset_0 084e e5ff | | Load 0x2,-0x1 084f 01d7 | | Execute Vector,Field_Read 0850 a403 | | Store_Unchecked 0x2,0x3 0851 e403 | | Load 0x2,0x3 0852 487f |H | Short_Literal 0x7f 0853 0279 | y | Execute Discrete,And 0854 e404 | | Load 0x2,0x4 0855 0271 | q | Execute Discrete,Times 0856 e402 | | Load 0x2,0x2 0857 0273 | s | Execute Discrete,Plus 0858 c402 | | Store 0x2,0x2 0859 00db | | Load_Top At_Offset_3 085a 0907 | | Execute_Immediate Binary_Scale,0x7 085b c404 | | Store 0x2,0x4 085c e403 | | Load 0x2,0x3 085d 0d80 | | Execute_Immediate Less,-0x80 085e 6824 |h$ | Jump_Zero 0x883 085f 00d8 | | Load_Top At_Offset_0 0860 e402 | | Load 0x2,0x2 0861 0273 | s | Execute Discrete,Plus 0862 0a01 | | Execute_Immediate Plus,0x1 0863 00d8 | | Load_Top At_Offset_0 0864 00e2 | | Load_Encached Integer_Cache 0865 0260 | ` | Execute Discrete,In_Type 0866 7001 |p | Jump_Nonzero 0x868 0867 0801 | | Execute_Immediate Raise,0x1 0868 e5ff | | Load 0x2,-0x1 0869 01dc | | Execute Vector,Last 086a e5ff | | Load 0x2,-0x1 086b 01cf | | Execute Vector,Slice_Read 086c e001 | | Load 0x0,0x1 086d 187c | | | Execute Package,Field_Execute,Field_Number 0x7c 086e 00d9 | | Load_Top At_Offset_1 086f 0a01 | | Execute_Immediate Plus,0x1 0870 00d8 | | Load_Top At_Offset_0 0871 00e2 | | Load_Encached Integer_Cache 0872 0260 | ` | Execute Discrete,In_Type 0873 7001 |p | Jump_Nonzero 0x875 0874 0801 | | Execute_Immediate Raise,0x1 0875 00da | | Load_Top At_Offset_2 0876 e402 | | Load 0x2,0x2 0877 0273 | s | Execute Discrete,Plus 0878 00d8 | | Load_Top At_Offset_0 0879 00e2 | | Load_Encached Integer_Cache 087a 0260 | ` | Execute Discrete,In_Type 087b 7001 |p | Jump_Nonzero 0x87d 087c 0801 | | Execute_Immediate Raise,0x1 087d e5ff | | Load 0x2,-0x1 087e 01cf | | Execute Vector,Slice_Read 087f e001 | | Load 0x0,0x1 0880 187c | | | Execute Package,Field_Execute,Field_Number 0x7c 0881 801f | | Call 0x0,0x1f 0882 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0883 00c8 | | Action Pop_Auxiliary_Range 0884 3fc8 |? | Loop_Increasing 0x84d 0885 00ce | | Action Pop_Auxiliary 0886 0831 | 1 | Execute_Immediate Raise,0x31 0887 0000 | | .XXX[0x1] 0888 ; -------------------------------------------------------------------------------------- 0888 ; SUBPROGRAM 0888 ; -------------------------------------------------------------------------------------- 0888 088b | | .CONST 0x088b ; Address of begin 0889 0004 | | .CONST 0x0004 ; Address of exception handler 088a 0001 | | .CONST 0x0001 ; Number of locals 088b BODY_0888: 088b INIT_0888: 088b 00da | | Load_Top At_Offset_2 088c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 088d 821e | | Call 0x1,0x1e 088e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088f 0000 | | .XXX[0x1] 0890 ; -------------------------------------------------------------------------------------- 0890 ; SUBPROGRAM 0890 ; -------------------------------------------------------------------------------------- 0890 0893 | | .CONST 0x0893 ; Address of begin 0891 0004 | | .CONST 0x0004 ; Address of exception handler 0892 0001 | | .CONST 0x0001 ; Number of locals 0893 BODY_0890: 0893 INIT_0890: 0893 00da | | Load_Top At_Offset_2 0894 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0895 821e | | Call 0x1,0x1e 0896 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0897 0000 | | .XXX[0x1] 0898 ; -------------------------------------------------------------------------------------- 0898 ; SUBPROGRAM 0898 ; -------------------------------------------------------------------------------------- 0898 089b | | .CONST 0x089b ; Address of begin 0899 0004 | | .CONST 0x0004 ; Address of exception handler 089a 0001 | | .CONST 0x0001 ; Number of locals 089b BODY_0898: 089b INIT_0898: 089b 00da | | Load_Top At_Offset_2 089c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 089d 0335 | 5 | Declare_Variable Array,Duplicate 089e 00cd | | Action Spare6_Action 089f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a0 ; -------------------------------------------------------------------------------------- 08a0 ; SUBPROGRAM 08a0 ; -------------------------------------------------------------------------------------- 08a0 08a3 | | .CONST 0x08a3 ; Address of begin 08a1 0004 | | .CONST 0x0004 ; Address of exception handler 08a2 0001 | | .CONST 0x0001 ; Number of locals 08a3 BODY_08a0: 08a3 INIT_08a0: 08a3 00da | | Load_Top At_Offset_2 08a4 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 08a5 0335 | 5 | Declare_Variable Array,Duplicate 08a6 00cd | | Action Spare6_Action 08a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a8 ; -------------------------------------------------------------------------------------- 08a8 ; SUBPROGRAM 08a8 ; -------------------------------------------------------------------------------------- 08a8 08ad | | .CONST 0x08ad ; Address of begin 08a9 0004 | | .CONST 0x0004 ; Address of exception handler 08aa 0002 | | .CONST 0x0002 ; Number of locals 08ab INIT_08a8: 08ab 029f 0c03 | | Declare_Subprogram INIT_0c00,For_Call 08ad BODY_08a8: 08ad 00cf | | Action Mark_Auxiliary 08ae e5ff | | Load 0x2,-0x1 08af 01d9 | | Execute Vector,Reverse_Bounds 08b0 0263 | c | Execute Discrete,Above_Bound 08b1 7007 |p | Jump_Nonzero 0x8b9 08b2 00d8 | | Load_Top At_Offset_0 08b3 e5ff | | Load 0x2,-0x1 08b4 01d7 | | Execute Vector,Field_Read 08b5 6801 |h | Jump_Zero 0x8b7 08b6 8402 | | Call 0x2,0x2 08b7 00c8 | | Action Pop_Auxiliary_Range 08b8 3ff9 |? | Loop_Increasing 0x8b2 08b9 00ce | | Action Pop_Auxiliary 08ba e01b | | Load 0x0,0x1b 08bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08bc 0000 0000 | | .BLANK 0000[0x4] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08e4 | | .CONST 0x08e4 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0006 | | .CONST 0x0006 ; Number of locals 08c3 INIT_08c0: 08c3 4801 |H | Short_Literal 0x1 08c4 00db | | Load_Top At_Offset_3 08c5 01db | | Execute Vector,Length 08c6 00d8 | | Load_Top At_Offset_0 08c7 00e2 | | Load_Encached Integer_Cache 08c8 0260 | ` | Execute Discrete,In_Type 08c9 7001 |p | Jump_Nonzero 0x8cb 08ca 0801 | | Execute_Immediate Raise,0x1 08cb e001 | | Load 0x0,0x1 08cc 1b20 | | Execute Package,Field_Read,Field_Number 0x20 08cd 035b | [ | Declare_Type Array,Constrained 08ce 0337 | 7 | Declare_Variable Array 08cf 00db | | Load_Top At_Offset_3 08d0 00d9 | | Load_Top At_Offset_1 08d1 01d4 | | Execute Vector,Structure_Write 08d2 00e5 | | Load_Encached Long_Integer_Cache 08d3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 08d4 00e5 | | Load_Encached Long_Integer_Cache 08d5 4801 |H | Short_Literal 0x1 08d6 e5ff | | Load 0x2,-0x1 08d7 01db | | Execute Vector,Length 08d8 480b |H | Short_Literal 0xb 08d9 0271 | q | Execute Discrete,Times 08da 00d8 | | Load_Top At_Offset_0 08db 00e2 | | Load_Encached Integer_Cache 08dc 0260 | ` | Execute Discrete,In_Type 08dd 7001 |p | Jump_Nonzero 0x8df 08de 0801 | | Execute_Immediate Raise,0x1 08df 00e9 | | Load_Encached String_Cache 08e0 035b | [ | Declare_Type Array,Constrained 08e1 0337 | 7 | Declare_Variable Array 08e2 00e2 | | Load_Encached Integer_Cache 08e3 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 08e4 BODY_08c0: 08e4 4801 |H | Short_Literal 0x1 08e5 e402 | | Load 0x2,0x2 08e6 01d7 | | Execute Vector,Field_Read 08e7 0274 | t | Execute Discrete,Absolute_Value 08e8 4801 |H | Short_Literal 0x1 08e9 e402 | | Load 0x2,0x2 08ea 01d6 | | Execute Vector,Field_Write 08eb 00cf | | Action Mark_Auxiliary 08ec 00da | | Load_Top At_Offset_2 08ed 01da | | Execute Vector,Bounds 08ee 0264 | d | Execute Discrete,Below_Bound 08ef 7046 |pF | Jump_Nonzero 0x936 08f0 4800 |H | Short_Literal 0x0 08f1 a403 | | Store_Unchecked 0x2,0x3 08f2 00cf | | Action Mark_Auxiliary 08f3 e402 | | Load 0x2,0x2 08f4 01dc | | Execute Vector,Last 08f5 e406 | | Load 0x2,0x6 08f6 0263 | c | Execute Discrete,Above_Bound 08f7 7013 |p | Jump_Nonzero 0x90b 08f8 e403 | | Load 0x2,0x3 08f9 091f | | Execute_Immediate Binary_Scale,0x1f 08fa 00d9 | | Load_Top At_Offset_1 08fb e402 | | Load 0x2,0x2 08fc 01d7 | | Execute Vector,Field_Read 08fd 0273 | s | Execute Discrete,Plus 08fe a404 | | Store_Unchecked 0x2,0x4 08ff e404 | | Load 0x2,0x4 0900 480a |H | Short_Literal 0xa 0901 0270 | p | Execute Discrete,Divide 0902 00d9 | | Load_Top At_Offset_1 0903 e402 | | Load 0x2,0x2 0904 01d6 | | Execute Vector,Field_Write 0905 e404 | | Load 0x2,0x4 0906 480a |H | Short_Literal 0xa 0907 026f | o | Execute Discrete,Remainder 0908 a403 | | Store_Unchecked 0x2,0x3 0909 00c8 | | Action Pop_Auxiliary_Range 090a 3fed |? | Loop_Increasing 0x8f8 090b 00ce | | Action Pop_Auxiliary 090c e403 | | Load 0x2,0x3 090d 0a30 | 0 | Execute_Immediate Plus,0x30 090e 00d8 | | Load_Top At_Offset_0 090f 00e8 | | Load_Encached Character_Cache 0910 0260 | ` | Execute Discrete,In_Type 0911 7001 |p | Jump_Nonzero 0x913 0912 0801 | | Execute_Immediate Raise,0x1 0913 00d9 | | Load_Top At_Offset_1 0914 e405 | | Load 0x2,0x5 0915 01d6 | | Execute Vector,Field_Write 0916 00cf | | Action Mark_Auxiliary 0917 e402 | | Load 0x2,0x2 0918 01dc | | Execute Vector,Last 0919 e406 | | Load 0x2,0x6 091a 0263 | c | Execute Discrete,Above_Bound 091b 7017 |p | Jump_Nonzero 0x933 091c 00d8 | | Load_Top At_Offset_0 091d e402 | | Load 0x2,0x2 091e 01d7 | | Execute Vector,Field_Read 091f 6804 |h | Jump_Zero 0x924 0920 00d8 | | Load_Top At_Offset_0 0921 a406 | | Store_Unchecked 0x2,0x6 0922 00d2 | | Pop_Control Pop_Count_2 0923 780f |x | Jump 0x933 0924 00d8 | | Load_Top At_Offset_0 0925 e402 | | Load 0x2,0x2 0926 01dc | | Execute Vector,Last 0927 027f | | Execute Discrete,Equal 0928 6808 |h | Jump_Zero 0x931 0929 00db | | Load_Top At_Offset_3 092a e405 | | Load 0x2,0x5 092b 01dc | | Execute Vector,Last 092c e405 | | Load 0x2,0x5 092d 01cf | | Execute Vector,Slice_Read 092e 00e9 | | Load_Encached String_Cache 092f 01c6 | | Execute Vector,Convert_To_Formal 0930 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0931 00c8 | | Action Pop_Auxiliary_Range 0932 3fe9 |? | Loop_Increasing 0x91c 0933 00ce | | Action Pop_Auxiliary 0934 00c8 | | Action Pop_Auxiliary_Range 0935 37ba |7 | Loop_Decreasing 0x8f0 0936 00ce | | Action Pop_Auxiliary 0937 0831 | 1 | Execute_Immediate Raise,0x31 0938 ; -------------------------------------------------------------------------------------- 0938 ; SUBPROGRAM 0938 ; -------------------------------------------------------------------------------------- 0938 0959 | Y | .CONST 0x0959 ; Address of begin 0939 0004 | | .CONST 0x0004 ; Address of exception handler 093a 0006 | | .CONST 0x0006 ; Number of locals 093b INIT_0938: 093b 00db | | Load_Top At_Offset_3 093c 01dd | | Execute Vector,First 093d e5fe | | Load 0x2,-0x2 093e 01dc | | Execute Vector,Last 093f 0a01 | | Execute_Immediate Plus,0x1 0940 00d8 | | Load_Top At_Offset_0 0941 00e2 | | Load_Encached Integer_Cache 0942 0260 | ` | Execute Discrete,In_Type 0943 7001 |p | Jump_Nonzero 0x945 0944 0801 | | Execute_Immediate Raise,0x1 0945 e001 | | Load 0x0,0x1 0946 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0947 035b | [ | Declare_Type Array,Constrained 0948 0337 | 7 | Declare_Variable Array 0949 00db | | Load_Top At_Offset_3 094a 01db | | Execute Vector,Length 094b e5fe | | Load 0x2,-0x2 094c 01db | | Execute Vector,Length 094d 0272 | r | Execute Discrete,Minus 094e 481f |H | Short_Literal 0x1f 094f 0271 | q | Execute Discrete,Times 0950 00e2 | | Load_Encached Integer_Cache 0951 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0952 606d |`m | Indirect_Literal Discrete,0x9c0,{0x00000000, 0x40000000} 0953 00e5 | | Load_Encached Long_Integer_Cache 0954 03f1 | | Declare_Variable Discrete,With_Value 0955 00e5 | | Load_Encached Long_Integer_Cache 0956 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0957 00e5 | | Load_Encached Long_Integer_Cache 0958 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0959 BODY_0938: 0959 00cf | | Action Mark_Auxiliary 095a e402 | | Load 0x2,0x2 095b 01d9 | | Execute Vector,Reverse_Bounds 095c 0263 | c | Execute Discrete,Above_Bound 095d 7013 |p | Jump_Nonzero 0x971 095e 00d8 | | Load_Top At_Offset_0 095f e5ff | | Load 0x2,-0x1 0960 01dc | | Execute Vector,Last 0961 027d | } | Execute Discrete,Greater 0962 6805 |h | Jump_Zero 0x968 0963 4800 |H | Short_Literal 0x0 0964 00d9 | | Load_Top At_Offset_1 0965 e402 | | Load 0x2,0x2 0966 01d6 | | Execute Vector,Field_Write 0967 7807 |x | Jump 0x96f 0968 00d8 | | Load_Top At_Offset_0 0969 e5ff | | Load 0x2,-0x1 096a 01d7 | | Execute Vector,Field_Read 096b 0274 | t | Execute Discrete,Absolute_Value 096c 00d9 | | Load_Top At_Offset_1 096d e402 | | Load 0x2,0x2 096e 01d6 | | Execute Vector,Field_Write 096f 00c8 | | Action Pop_Auxiliary_Range 0970 3fed |? | Loop_Increasing 0x95e 0971 00ce | | Action Pop_Auxiliary 0972 4801 |H | Short_Literal 0x1 0973 e402 | | Load 0x2,0x2 0974 01d7 | | Execute Vector,Field_Read 0975 7003 |p | Jump_Nonzero 0x979 0976 4800 |H | Short_Literal 0x0 0977 a403 | | Store_Unchecked 0x2,0x3 0978 782d |x- | Jump 0x9a6 0979 00cf | | Action Mark_Auxiliary 097a 780a |x | Jump 0x985 097b e403 | | Load 0x2,0x3 097c 0aff | | Execute_Immediate Plus,-0x1 097d c403 | | Store 0x2,0x3 097e 00db | | Load_Top At_Offset_3 097f 09ff | | Execute_Immediate Binary_Scale,-0x1 0980 a404 | | Store_Unchecked 0x2,0x4 0981 00da | | Load_Top At_Offset_2 0982 0901 | | Execute_Immediate Binary_Scale,0x1 0983 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0984 00c9 | | Action Pop_Auxiliary_Loop 0985 4801 |H | Short_Literal 0x1 0986 e402 | | Load 0x2,0x2 0987 01d7 | | Execute Vector,Field_Read 0988 e404 | | Load 0x2,0x4 0989 027c | | | Execute Discrete,Less 098a 77f0 |w | Jump_Nonzero 0x97b 098b 00ce | | Action Pop_Auxiliary 098c 00d9 | | Load_Top At_Offset_1 098d 0c02 | | Execute_Immediate Greater_Equal,0x2 098e 6817 |h | Jump_Zero 0x9a6 098f 00cf | | Action Mark_Auxiliary 0990 e402 | | Load 0x2,0x2 0991 01da | | Execute Vector,Bounds 0992 0264 | d | Execute Discrete,Below_Bound 0993 7011 |p | Jump_Nonzero 0x9a5 0994 00db | | Load_Top At_Offset_3 0995 09e1 | | Execute_Immediate Binary_Scale,-0x1f 0996 00d9 | | Load_Top At_Offset_1 0997 e402 | | Load 0x2,0x2 0998 01d7 | | Execute Vector,Field_Read 0999 e405 | | Load 0x2,0x5 099a 0271 | q | Execute Discrete,Times 099b 0273 | s | Execute Discrete,Plus 099c a406 | | Store_Unchecked 0x2,0x6 099d 00db | | Load_Top At_Offset_3 099e 601d |` | Indirect_Literal Discrete,0x9bc,{0x00000000, 0x7fffffff} 099f 0279 | y | Execute Discrete,And 09a0 00d9 | | Load_Top At_Offset_1 09a1 e402 | | Load 0x2,0x2 09a2 01d6 | | Execute Vector,Field_Write 09a3 00c8 | | Action Pop_Auxiliary_Range 09a4 37ef |7 | Loop_Decreasing 0x994 09a5 00ce | | Action Pop_Auxiliary 09a6 4801 |H | Short_Literal 0x1 09a7 e5ff | | Load 0x2,-0x1 09a8 01d7 | | Execute Vector,Field_Read 09a9 0d00 | | Execute_Immediate Less,0x0 09aa 6807 |h | Jump_Zero 0x9b2 09ab 4801 |H | Short_Literal 0x1 09ac e402 | | Load 0x2,0x2 09ad 01d7 | | Execute Vector,Field_Read 09ae 0275 | u | Execute Discrete,Unary_Minus 09af 4801 |H | Short_Literal 0x1 09b0 e402 | | Load 0x2,0x2 09b1 01d6 | | Execute Vector,Field_Write 09b2 e5fe | | Load 0x2,-0x2 09b3 01da | | Execute Vector,Bounds 09b4 e402 | | Load 0x2,0x2 09b5 01cf | | Execute Vector,Slice_Read 09b6 e5fe | | Load 0x2,-0x2 09b7 01d4 | | Execute Vector,Structure_Write 09b8 00db | | Load_Top At_Offset_3 09b9 a5fd | | Store_Unchecked 0x2,-0x3 09ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 09bb 0000 | | .XXX[0x1] 09bc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 09c0 0000 0000 | | .LITERAL {0x00000000, 0x40000000} 09c4 0000 0000 | | .BLANK 0000[0x4] 09c8 ; -------------------------------------------------------------------------------------- 09c8 ; SUBPROGRAM 09c8 ; -------------------------------------------------------------------------------------- 09c8 09da | | .CONST 0x09da ; Address of begin 09c9 0004 | | .CONST 0x0004 ; Address of exception handler 09ca 0005 | | .CONST 0x0005 ; Number of locals 09cb INIT_09c8: 09cb 5844 |XD | Indirect_Literal Float,0xa10,0.0 09cc e001 | | Load 0x0,0x1 09cd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09ce 03df | | Declare_Variable Float,With_Value 09cf 5840 |X@ | Indirect_Literal Float,0xa10,0.0 09d0 e001 | | Load 0x0,0x1 09d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09d2 03df | | Declare_Variable Float,With_Value 09d3 5838 |X8 | Indirect_Literal Float,0xa0c,2147483648.0 09d4 e001 | | Load 0x0,0x1 09d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09d6 03df | | Declare_Variable Float,With_Value 09d7 e5fe | | Load 0x2,-0x2 09d8 00e2 | | Load_Encached Integer_Cache 09d9 03f1 | | Declare_Variable Discrete,With_Value 09da BODY_09c8: 09da 00cf | | Action Mark_Auxiliary 09db e5ff | | Load 0x2,-0x1 09dc 01da | | Execute Vector,Bounds 09dd 0264 | d | Execute Discrete,Below_Bound 09de 701a |p | Jump_Nonzero 0x9f9 09df e403 | | Load 0x2,0x3 09e0 7008 |p | Jump_Nonzero 0x9e9 09e1 5826 |X& | Indirect_Literal Float,0xa08,2.0 09e2 e405 | | Load 0x2,0x5 09e3 0239 | 9 | Execute Float,Exponentiate 09e4 a403 | | Store_Unchecked 0x2,0x3 09e5 00db | | Load_Top At_Offset_3 09e6 0a1f | | Execute_Immediate Plus,0x1f 09e7 c405 | | Store 0x2,0x5 09e8 7804 |x | Jump 0x9ed 09e9 e403 | | Load 0x2,0x3 09ea e404 | | Load 0x2,0x4 09eb 023b | ; | Execute Float,Times 09ec a403 | | Store_Unchecked 0x2,0x3 09ed e402 | | Load 0x2,0x2 09ee 00d9 | | Load_Top At_Offset_1 09ef e5ff | | Load 0x2,-0x1 09f0 01d7 | | Execute Vector,Field_Read 09f1 0274 | t | Execute Discrete,Absolute_Value 09f2 0237 | 7 | Execute Float,Convert_From_Discrete 09f3 e403 | | Load 0x2,0x3 09f4 023b | ; | Execute Float,Times 09f5 023d | = | Execute Float,Plus 09f6 a402 | | Store_Unchecked 0x2,0x2 09f7 00c8 | | Action Pop_Auxiliary_Range 09f8 37e6 |7 | Loop_Decreasing 0x9df 09f9 00ce | | Action Pop_Auxiliary 09fa e5ff | | Load 0x2,-0x1 09fb 01dd | | Execute Vector,First 09fc e5ff | | Load 0x2,-0x1 09fd 01d7 | | Execute Vector,Field_Read 09fe 0d00 | | Execute_Immediate Less,0x0 09ff 6803 |h | Jump_Zero 0xa03 0a00 00db | | Load_Top At_Offset_3 0a01 023f | ? | Execute Float,Unary_Minus 0a02 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a03 00db | | Load_Top At_Offset_3 0a04 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a05 0000 0000 | | .XXX[0x3] 0a07 0000 | | 0a08 4000 0000 |@ | .DBL 2.0 0a0a 0000 0000 | | 0a0c 41e0 0000 |A | .DBL 2147483648.0 0a0e 0000 0000 | | 0a10 0000 0000 | | .DBL 0.0 0a12 0000 0000 | | 0a14 0000 0000 | | .BLANK 0000[0x4] 0a18 ; -------------------------------------------------------------------------------------- 0a18 ; SUBPROGRAM 0a18 ; -------------------------------------------------------------------------------------- 0a18 0a27 | ' | .CONST 0x0a27 ; Address of begin 0a19 0004 | | .CONST 0x0004 ; Address of exception handler 0a1a 0004 | | .CONST 0x0004 ; Number of locals 0a1b INIT_0a18: 0a1b 4801 |H | Short_Literal 0x1 0a1c 480a |H | Short_Literal 0xa 0a1d e014 | | Load 0x0,0x14 0a1e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a1f 035b | [ | Declare_Type Array,Constrained 0a20 0337 | 7 | Declare_Variable Array 0a21 00db | | Load_Top At_Offset_3 0a22 e001 | | Load 0x0,0x1 0a23 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a24 03f1 | | Declare_Variable Discrete,With_Value 0a25 00e2 | | Load_Encached Integer_Cache 0a26 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0a27 BODY_0a18: 0a27 00cf | | Action Mark_Auxiliary 0a28 7815 |x | Jump 0xa3e 0a29 00da | | Load_Top At_Offset_2 0a2a 4880 |H | Short_Literal 0x80 0a2b 026f | o | Execute Discrete,Remainder 0a2c 4880 |H | Short_Literal 0x80 0a2d 0273 | s | Execute Discrete,Plus 0a2e 00d8 | | Load_Top At_Offset_0 0a2f e014 | | Load 0x0,0x14 0a30 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0a31 0260 | ` | Execute Discrete,In_Type 0a32 7001 |p | Jump_Nonzero 0xa34 0a33 0801 | | Execute_Immediate Raise,0x1 0a34 00da | | Load_Top At_Offset_2 0a35 e402 | | Load 0x2,0x2 0a36 01d6 | | Execute Vector,Field_Write 0a37 00da | | Load_Top At_Offset_2 0a38 09f9 | | Execute_Immediate Binary_Scale,-0x7 0a39 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0a3a 00d9 | | Load_Top At_Offset_1 0a3b 0a01 | | Execute_Immediate Plus,0x1 0a3c 005a | Z | Store_Top Discrete,At_Offset_2 0a3d 00c9 | | Action Pop_Auxiliary_Loop 0a3e 00da | | Load_Top At_Offset_2 0a3f 0c81 | | Execute_Immediate Greater_Equal,-0x7f 0a40 77e8 |w | Jump_Nonzero 0xa29 0a41 00ce | | Action Pop_Auxiliary 0a42 00d9 | | Load_Top At_Offset_1 0a43 00d8 | | Load_Top At_Offset_0 0a44 e014 | | Load 0x0,0x14 0a45 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0a46 0260 | ` | Execute Discrete,In_Type 0a47 7001 |p | Jump_Nonzero 0xa49 0a48 0801 | | Execute_Immediate Raise,0x1 0a49 00d9 | | Load_Top At_Offset_1 0a4a e402 | | Load 0x2,0x2 0a4b 01d6 | | Execute Vector,Field_Write 0a4c 4801 |H | Short_Literal 0x1 0a4d 00d9 | | Load_Top At_Offset_1 0a4e e402 | | Load 0x2,0x2 0a4f 01cf | | Execute Vector,Slice_Read 0a50 e014 | | Load 0x0,0x14 0a51 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a52 01c6 | | Execute Vector,Convert_To_Formal 0a53 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a54 0000 0000 | | .BLANK 0000[0x4] 0a58 ; -------------------------------------------------------------------------------------- 0a58 ; SUBPROGRAM 0a58 ; -------------------------------------------------------------------------------------- 0a58 0a5b | [ | .CONST 0x0a5b ; Address of begin 0a59 0004 | | .CONST 0x0004 ; Address of exception handler 0a5a 0001 | | .CONST 0x0001 ; Number of locals 0a5b BODY_0a58: 0a5b INIT_0a58: 0a5b e020 | | Load 0x0,0x20 0a5c 00db | | Load_Top At_Offset_3 0a5d e001 | | Load 0x0,0x1 0a5e 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0a5f 6808 |h | Jump_Zero 0xa68 0a60 00db | | Load_Top At_Offset_3 0a61 0a01 | | Execute_Immediate Plus,0x1 0a62 e020 | | Load 0x0,0x20 0a63 e5ff | | Load 0x2,-0x1 0a64 e001 | | Load 0x0,0x1 0a65 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0a66 8252 | R | Call 0x1,0x52 0a67 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a68 e022 | " | Load 0x0,0x22 0a69 00db | | Load_Top At_Offset_3 0a6a e001 | | Load 0x0,0x1 0a6b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0a6c 6808 |h | Jump_Zero 0xa75 0a6d 00db | | Load_Top At_Offset_3 0a6e 0aff | | Execute_Immediate Plus,-0x1 0a6f e020 | | Load 0x0,0x20 0a70 e5ff | | Load 0x2,-0x1 0a71 e001 | | Load 0x0,0x1 0a72 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0a73 8252 | R | Call 0x1,0x52 0a74 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a75 00db | | Load_Top At_Offset_3 0a76 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a77 0000 | | .XXX[0x1] 0a78 ; -------------------------------------------------------------------------------------- 0a78 ; SUBPROGRAM 0a78 ; -------------------------------------------------------------------------------------- 0a78 0a7b | { | .CONST 0x0a7b ; Address of begin 0a79 0004 | | .CONST 0x0004 ; Address of exception handler 0a7a 0001 | | .CONST 0x0001 ; Number of locals 0a7b BODY_0a78: 0a7b INIT_0a78: 0a7b 00da | | Load_Top At_Offset_2 0a7c 01db | | Execute Vector,Length 0a7d e5fe | | Load 0x2,-0x2 0a7e 027b | { | Execute Discrete,Greater_Equal 0a7f 6802 |h | Jump_Zero 0xa82 0a80 00da | | Load_Top At_Offset_2 0a81 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a82 e5fd | | Load 0x2,-0x3 0a83 0f20 | | Execute_Immediate Equal,0x20 0a84 6813 |h | Jump_Zero 0xa98 0a85 00da | | Load_Top At_Offset_2 0a86 01db | | Execute Vector,Length 0a87 0a01 | | Execute_Immediate Plus,0x1 0a88 e5fe | | Load 0x2,-0x2 0a89 00e9 | | Load_Encached String_Cache 0a8a 035b | [ | Declare_Type Array,Constrained 0a8b 0337 | 7 | Declare_Variable Array 0a8c 00d8 | | Load_Top At_Offset_0 0a8d 01d9 | | Execute Vector,Reverse_Bounds 0a8e 0263 | c | Execute Discrete,Above_Bound 0a8f 7005 |p | Jump_Nonzero 0xa95 0a90 e5fd | | Load 0x2,-0x3 0a91 00d9 | | Load_Top At_Offset_1 0a92 e402 | | Load 0x2,0x2 0a93 01d6 | | Execute Vector,Field_Write 0a94 3ffb |? | Loop_Increasing 0xa90 0a95 00db | | Load_Top At_Offset_3 0a96 01cc | | Execute Vector,Catenate 0a97 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a98 00da | | Load_Top At_Offset_2 0a99 01dd | | Execute Vector,First 0a9a 00db | | Load_Top At_Offset_3 0a9b 01d7 | | Execute Vector,Field_Read 0a9c 00db | | Load_Top At_Offset_3 0a9d 01db | | Execute Vector,Length 0a9e 0a01 | | Execute_Immediate Plus,0x1 0a9f e5fe | | Load 0x2,-0x2 0aa0 00e9 | | Load_Encached String_Cache 0aa1 035b | [ | Declare_Type Array,Constrained 0aa2 0337 | 7 | Declare_Variable Array 0aa3 00d8 | | Load_Top At_Offset_0 0aa4 01d9 | | Execute Vector,Reverse_Bounds 0aa5 0263 | c | Execute Discrete,Above_Bound 0aa6 7005 |p | Jump_Nonzero 0xaac 0aa7 e5fd | | Load 0x2,-0x3 0aa8 00d9 | | Load_Top At_Offset_1 0aa9 e403 | | Load 0x2,0x3 0aaa 01d6 | | Execute Vector,Field_Write 0aab 3ffb |? | Loop_Increasing 0xaa7 0aac 01ca | | Execute Vector,Prepend 0aad 00db | | Load_Top At_Offset_3 0aae 01dd | | Execute Vector,First 0aaf 0a01 | | Execute_Immediate Plus,0x1 0ab0 00d8 | | Load_Top At_Offset_0 0ab1 00e2 | | Load_Encached Integer_Cache 0ab2 0260 | ` | Execute Discrete,In_Type 0ab3 7001 |p | Jump_Nonzero 0xab5 0ab4 0801 | | Execute_Immediate Raise,0x1 0ab5 e5ff | | Load 0x2,-0x1 0ab6 01dc | | Execute Vector,Last 0ab7 e5ff | | Load 0x2,-0x1 0ab8 01cf | | Execute Vector,Slice_Read 0ab9 01cc | | Execute Vector,Catenate 0aba 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0abb 0000 0000 | | .BLANK 0000[0x5] 0ac0 ; -------------------------------------------------------------------------------------- 0ac0 ; SUBPROGRAM 0ac0 ; -------------------------------------------------------------------------------------- 0ac0 0ac5 | | .CONST 0x0ac5 ; Address of begin 0ac1 0004 | | .CONST 0x0004 ; Address of exception handler 0ac2 0002 | | .CONST 0x0002 ; Number of locals 0ac3 INIT_0ac0: 0ac3 029f 0c2b | +| Declare_Subprogram INIT_0c28,For_Call 0ac5 BODY_0ac0: 0ac5 e022 | " | Load 0x0,0x22 0ac6 e5ff | | Load 0x2,-0x1 0ac7 e001 | | Load 0x0,0x1 0ac8 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0ac9 680f |h | Jump_Zero 0xad9 0aca e5fc | | Load 0x2,-0x4 0acb e5fd | | Load 0x2,-0x3 0acc e5fe | | Load 0x2,-0x2 0acd 0a01 | | Execute_Immediate Plus,0x1 0ace 00d8 | | Load_Top At_Offset_0 0acf 00e2 | | Load_Encached Integer_Cache 0ad0 0260 | ` | Execute Discrete,In_Type 0ad1 7001 |p | Jump_Nonzero 0xad3 0ad2 0801 | | Execute_Immediate Raise,0x1 0ad3 e01c | | Load 0x0,0x1c 0ad4 e5ff | | Load 0x2,-0x1 0ad5 e001 | | Load 0x0,0x1 0ad6 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0ad7 8254 | T | Call 0x1,0x54 0ad8 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0ad9 e01c | | Load 0x0,0x1c 0ada e5ff | | Load 0x2,-0x1 0adb e001 | | Load 0x0,0x1 0adc 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0add 680f |h | Jump_Zero 0xaed 0ade e5fc | | Load 0x2,-0x4 0adf e5fd | | Load 0x2,-0x3 0ae0 e5fe | | Load 0x2,-0x2 0ae1 0aff | | Execute_Immediate Plus,-0x1 0ae2 00d8 | | Load_Top At_Offset_0 0ae3 00e2 | | Load_Encached Integer_Cache 0ae4 0260 | ` | Execute Discrete,In_Type 0ae5 7001 |p | Jump_Nonzero 0xae7 0ae6 0801 | | Execute_Immediate Raise,0x1 0ae7 e01d | | Load 0x0,0x1d 0ae8 e5ff | | Load 0x2,-0x1 0ae9 e001 | | Load 0x0,0x1 0aea 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0aeb 8254 | T | Call 0x1,0x54 0aec 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0aed 8402 | | Call 0x2,0x2 0aee 0831 | 1 | Execute_Immediate Raise,0x31 0aef 0000 | | .XXX[0x1] 0af0 ; -------------------------------------------------------------------------------------- 0af0 ; SUBPROGRAM 0af0 ; -------------------------------------------------------------------------------------- 0af0 0b17 | | .CONST 0x0b17 ; Address of begin 0af1 0004 | | .CONST 0x0004 ; Address of exception handler 0af2 0008 | | .CONST 0x0008 ; Number of locals 0af3 INIT_0af0: 0af3 4801 |H | Short_Literal 0x1 0af4 e5fe | | Load 0x2,-0x2 0af5 01db | | Execute Vector,Length 0af6 00d8 | | Load_Top At_Offset_0 0af7 00e2 | | Load_Encached Integer_Cache 0af8 0260 | ` | Execute Discrete,In_Type 0af9 7001 |p | Jump_Nonzero 0xafb 0afa 0801 | | Execute_Immediate Raise,0x1 0afb e5ff | | Load 0x2,-0x1 0afc 01db | | Execute Vector,Length 0afd 00d8 | | Load_Top At_Offset_0 0afe 00e2 | | Load_Encached Integer_Cache 0aff 0260 | ` | Execute Discrete,In_Type 0b00 7001 |p | Jump_Nonzero 0xb02 0b01 0801 | | Execute_Immediate Raise,0x1 0b02 8023 | # | Call 0x0,0x23 0b03 e001 | | Load 0x0,0x1 0b04 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0b05 035b | [ | Declare_Type Array,Constrained 0b06 0337 | 7 | Declare_Variable Array 0b07 00d8 | | Load_Top At_Offset_0 0b08 01da | | Execute Vector,Bounds 0b09 e001 | | Load 0x0,0x1 0b0a 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0b0b 035b | [ | Declare_Type Array,Constrained 0b0c 0337 | 7 | Declare_Variable Array 0b0d 00d9 | | Load_Top At_Offset_1 0b0e 01da | | Execute Vector,Bounds 0b0f e001 | | Load 0x0,0x1 0b10 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0b11 035b | [ | Declare_Type Array,Constrained 0b12 0337 | 7 | Declare_Variable Array 0b13 00e2 | | Load_Encached Integer_Cache 0b14 03e9 | | Declare_Variable Discrete,Duplicate 0b15 03e9 | | Declare_Variable Discrete,Duplicate 0b16 00e1 | | Load_Encached Boolean_Cache 0b17 BODY_0af0: 0b17 e602 | | Load 0x3,0x2 0b18 e5fe | | Load 0x2,-0x2 0b19 e5ff | | Load 0x2,-0x1 0b1a 8024 | $ | Call 0x0,0x24 0b1b 00d1 | | Pop_Control Pop_Count_1 0b1c e602 | | Load 0x3,0x2 0b1d 8025 | % | Call 0x0,0x25 0b1e a605 | | Store_Unchecked 0x3,0x5 0b1f 4801 |H | Short_Literal 0x1 0b20 e5fe | | Load 0x2,-0x2 0b21 01d7 | | Execute Vector,Field_Read 0b22 0d00 | | Execute_Immediate Less,0x0 0b23 6807 |h | Jump_Zero 0xb2b 0b24 00db | | Load_Top At_Offset_3 0b25 e602 | | Load 0x3,0x2 0b26 01d7 | | Execute Vector,Field_Read 0b27 0275 | u | Execute Discrete,Unary_Minus 0b28 e605 | | Load 0x3,0x5 0b29 e602 | | Load 0x3,0x2 0b2a 01d6 | | Execute Vector,Field_Write 0b2b 00e1 | | Load_Encached Boolean_Cache 0b2c e026 | & | Load 0x0,0x26 0b2d e603 | | Load 0x3,0x3 0b2e e605 | | Load 0x3,0x5 0b2f e602 | | Load 0x3,0x2 0b30 01dc | | Execute Vector,Last 0b31 e602 | | Load 0x3,0x2 0b32 01cf | | Execute Vector,Slice_Read 0b33 e5ff | | Load 0x2,-0x1 0b34 8027 | ' | Call 0x0,0x27 0b35 00d2 | | Pop_Control Pop_Count_2 0b36 0059 | Y | Store_Top Discrete,At_Offset_1 0b37 00e1 | | Load_Encached Boolean_Cache 0b38 e026 | & | Load 0x0,0x26 0b39 e604 | | Load 0x3,0x4 0b3a e605 | | Load 0x3,0x5 0b3b e602 | | Load 0x3,0x2 0b3c 01dc | | Execute Vector,Last 0b3d e602 | | Load 0x3,0x2 0b3e 01cf | | Execute Vector,Slice_Read 0b3f e5fe | | Load 0x2,-0x2 0b40 8027 | ' | Call 0x0,0x27 0b41 00d2 | | Pop_Control Pop_Count_2 0b42 0059 | Y | Store_Top Discrete,At_Offset_1 0b43 00e2 | | Load_Encached Integer_Cache 0b44 e603 | | Load 0x3,0x3 0b45 4800 |H | Short_Literal 0x0 0b46 8028 | ( | Call 0x0,0x28 0b47 00d1 | | Pop_Control Pop_Count_1 0b48 005b | [ | Store_Top Discrete,At_Offset_3 0b49 00e2 | | Load_Encached Integer_Cache 0b4a e604 | | Load 0x3,0x4 0b4b 4800 |H | Short_Literal 0x0 0b4c 8028 | ( | Call 0x0,0x28 0b4d 00d1 | | Pop_Control Pop_Count_1 0b4e 005a | Z | Store_Top Discrete,At_Offset_2 0b4f 4801 |H | Short_Literal 0x1 0b50 00da | | Load_Top At_Offset_2 0b51 e604 | | Load 0x3,0x4 0b52 01cf | | Execute Vector,Slice_Read 0b53 4801 |H | Short_Literal 0x1 0b54 e606 | | Load 0x3,0x6 0b55 e603 | | Load 0x3,0x3 0b56 01cf | | Execute Vector,Slice_Read 0b57 801f | | Call 0x0,0x1f 0b58 e001 | | Load 0x0,0x1 0b59 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0b5a 0165 | e | Execute Variant_Record,Convert 0b5b 00cb | | Action Pop_Block_With_Result 0b5c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0b5d 0000 0000 | | .XXX[0x3] 0b5f 0000 | | 0b60 ; -------------------------------------------------------------------------------------- 0b60 ; SUBPROGRAM 0b60 ; -------------------------------------------------------------------------------------- 0b60 0b8c | | .CONST 0x0b8c ; Address of begin 0b61 0004 | | .CONST 0x0004 ; Address of exception handler 0b62 0002 | | .CONST 0x0002 ; Number of locals 0b63 INIT_0b60: 0b63 4830 |H0 | Short_Literal 0x30 0b64 e5fd | | Load 0x2,-0x3 0b65 0a01 | | Execute_Immediate Plus,0x1 0b66 00d8 | | Load_Top At_Offset_0 0b67 00e2 | | Load_Encached Integer_Cache 0b68 0260 | ` | Execute Discrete,In_Type 0b69 7001 |p | Jump_Nonzero 0xb6b 0b6a 0801 | | Execute_Immediate Raise,0x1 0b6b e5ff | | Load 0x2,-0x1 0b6c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0b6d e029 | ) | Load 0x0,0x29 0b6e e001 | | Load 0x0,0x1 0b6f 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0b70 e5ff | | Load 0x2,-0x1 0b71 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0b72 e5fd | | Load 0x2,-0x3 0b73 e012 | | Load 0x0,0x12 0b74 e001 | | Load 0x0,0x1 0b75 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0b76 e5ff | | Load 0x2,-0x1 0b77 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0b78 e001 | | Load 0x0,0x1 0b79 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0b7a e029 | ) | Load 0x0,0x29 0b7b e001 | | Load 0x0,0x1 0b7c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0b7d e001 | | Load 0x0,0x1 0b7e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0b7f e001 | | Load 0x0,0x1 0b80 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0b81 e001 | | Load 0x0,0x1 0b82 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0b83 e5ff | | Load 0x2,-0x1 0b84 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0b85 e001 | | Load 0x0,0x1 0b86 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0b87 821f | | Call 0x1,0x1f 0b88 e001 | | Load 0x0,0x1 0b89 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0b8a 8220 | | Call 0x1,0x20 0b8b 8253 | S | Call 0x1,0x53 0b8c BODY_0b60: 0b8c e5fd | | Load 0x2,-0x3 0b8d 7006 |p | Jump_Nonzero 0xb94 0b8e 4820 |H | Short_Literal 0x20 0b8f e5fe | | Load 0x2,-0x2 0b90 00da | | Load_Top At_Offset_2 0b91 8253 | S | Call 0x1,0x53 0b92 00cb | | Action Pop_Block_With_Result 0b93 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0b94 4820 |H | Short_Literal 0x20 0b95 e5fe | | Load 0x2,-0x2 0b96 e5fd | | Load 0x2,-0x3 0b97 0273 | s | Execute Discrete,Plus 0b98 0a01 | | Execute_Immediate Plus,0x1 0b99 00d8 | | Load_Top At_Offset_0 0b9a 00e2 | | Load_Encached Integer_Cache 0b9b 0260 | ` | Execute Discrete,In_Type 0b9c 7001 |p | Jump_Nonzero 0xb9e 0b9d 0801 | | Execute_Immediate Raise,0x1 0b9e 482e |H. | Short_Literal 0x2e 0b9f 00db | | Load_Top At_Offset_3 0ba0 01dd | | Execute Vector,First 0ba1 e602 | | Load 0x3,0x2 0ba2 01dc | | Execute Vector,Last 0ba3 e5fd | | Load 0x2,-0x3 0ba4 0272 | r | Execute Discrete,Minus 0ba5 00d8 | | Load_Top At_Offset_0 0ba6 00e2 | | Load_Encached Integer_Cache 0ba7 0260 | ` | Execute Discrete,In_Type 0ba8 7001 |p | Jump_Nonzero 0xbaa 0ba9 0801 | | Execute_Immediate Raise,0x1 0baa e602 | | Load 0x3,0x2 0bab 01cf | | Execute Vector,Slice_Read 0bac 01cb | | Execute Vector,Append 0bad 00db | | Load_Top At_Offset_3 0bae 01dc | | Execute Vector,Last 0baf e5fd | | Load 0x2,-0x3 0bb0 0272 | r | Execute Discrete,Minus 0bb1 0a01 | | Execute_Immediate Plus,0x1 0bb2 00d8 | | Load_Top At_Offset_0 0bb3 00e2 | | Load_Encached Integer_Cache 0bb4 0260 | ` | Execute Discrete,In_Type 0bb5 7001 |p | Jump_Nonzero 0xbb7 0bb6 0801 | | Execute_Immediate Raise,0x1 0bb7 e602 | | Load 0x3,0x2 0bb8 01dc | | Execute Vector,Last 0bb9 e602 | | Load 0x3,0x2 0bba 01cf | | Execute Vector,Slice_Read 0bbb 01cc | | Execute Vector,Catenate 0bbc 8253 | S | Call 0x1,0x53 0bbd 00cb | | Action Pop_Block_With_Result 0bbe 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0bbf 0000 | | .XXX[0x1] 0bc0 ; -------------------------------------------------------------------------------------- 0bc0 ; SUBPROGRAM 0bc0 ; -------------------------------------------------------------------------------------- 0bc0 0bd7 | | .CONST 0x0bd7 ; Address of begin 0bc1 0004 | | .CONST 0x0004 ; Address of exception handler 0bc2 0002 | | .CONST 0x0002 ; Number of locals 0bc3 INIT_0bc0: 0bc3 4801 |H | Short_Literal 0x1 0bc4 e5fe | | Load 0x2,-0x2 0bc5 e001 | | Load 0x0,0x1 0bc6 1b5e | ^ | Execute Package,Field_Read,Field_Number 0x5e 0bc7 035b | [ | Declare_Type Array,Constrained 0bc8 0337 | 7 | Declare_Variable Array 0bc9 00d8 | | Load_Top At_Offset_0 0bca 0335 | 5 | Declare_Variable Array,Duplicate 0bcb 00cd | | Action Spare6_Action 0bcc 00d9 | | Load_Top At_Offset_1 0bcd 01d9 | | Execute Vector,Reverse_Bounds 0bce 0263 | c | Execute Discrete,Above_Bound 0bcf 7005 |p | Jump_Nonzero 0xbd5 0bd0 4800 |H | Short_Literal 0x0 0bd1 00d9 | | Load_Top At_Offset_1 0bd2 e603 | | Load 0x3,0x3 0bd3 01d6 | | Execute Vector,Field_Write 0bd4 3ffb |? | Loop_Increasing 0xbd0 0bd5 00d9 | | Load_Top At_Offset_1 0bd6 01d4 | | Execute Vector,Structure_Write 0bd7 BODY_0bc0: 0bd7 e5fe | | Load 0x2,-0x2 0bd8 4801 |H | Short_Literal 0x1 0bd9 4801 |H | Short_Literal 0x1 0bda e001 | | Load 0x0,0x1 0bdb 1b61 | a | Execute Package,Field_Read,Field_Number 0x61 0bdc 1c08 | | Execute_Immediate Run_Utility,0x8 0bdd 00d8 | | Load_Top At_Offset_0 0bde 1c01 | | Execute_Immediate Run_Utility,0x1 0bdf 4800 |H | Short_Literal 0x0 0be0 00d9 | | Load_Top At_Offset_1 0be1 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 0be2 00d9 | | Load_Top At_Offset_1 0be3 00d9 | | Load_Top At_Offset_1 0be4 00d8 | | Load_Top At_Offset_0 0be5 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 0be6 00da | | Load_Top At_Offset_2 0be7 01da | | Execute Vector,Bounds 0be8 00da | | Load_Top At_Offset_2 0be9 01da | | Execute Vector,Bounds 0bea 00da | | Load_Top At_Offset_2 0beb 027f | | Execute Discrete,Equal 0bec 7001 |p | Jump_Nonzero 0xbee 0bed 08e0 | | Execute_Immediate Raise,0xe0 0bee 00cd | | Action Spare6_Action 0bef 027f | | Execute Discrete,Equal 0bf0 7001 |p | Jump_Nonzero 0xbf2 0bf1 08e0 | | Execute_Immediate Raise,0xe0 0bf2 00d2 | | Pop_Control Pop_Count_2 0bf3 00d9 | | Load_Top At_Offset_1 0bf4 2906 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6 0bf5 4800 |H | Short_Literal 0x0 0bf6 00d9 | | Load_Top At_Offset_1 0bf7 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 0bf8 e01e | | Load 0x0,0x1e 0bf9 00d9 | | Load_Top At_Offset_1 0bfa 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7 0bfb 00cb | | Action Pop_Block_With_Result 0bfc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0bfd 0000 0000 | | .XXX[0x3] 0bff 0000 | | 0c00 ; -------------------------------------------------------------------------------------- 0c00 ; SUBPROGRAM 0c00 ; -------------------------------------------------------------------------------------- 0c00 0c19 | | .CONST 0x0c19 ; Address of begin 0c01 0004 | | .CONST 0x0004 ; Address of exception handler 0c02 0002 | | .CONST 0x0002 ; Number of locals 0c03 INIT_0c00: 0c03 4801 |H | Short_Literal 0x1 0c04 e5ff | | Load 0x2,-0x1 0c05 01dc | | Execute Vector,Last 0c06 e405 | | Load 0x2,0x5 0c07 0272 | r | Execute Discrete,Minus 0c08 0a01 | | Execute_Immediate Plus,0x1 0c09 00d8 | | Load_Top At_Offset_0 0c0a 00e2 | | Load_Encached Integer_Cache 0c0b 0260 | ` | Execute Discrete,In_Type 0c0c 7001 |p | Jump_Nonzero 0xc0e 0c0d 0801 | | Execute_Immediate Raise,0x1 0c0e e001 | | Load 0x0,0x1 0c0f 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0c10 035b | [ | Declare_Type Array,Constrained 0c11 0337 | 7 | Declare_Variable Array 0c12 e405 | | Load 0x2,0x5 0c13 e5ff | | Load 0x2,-0x1 0c14 01dc | | Execute Vector,Last 0c15 e5ff | | Load 0x2,-0x1 0c16 01cf | | Execute Vector,Slice_Read 0c17 00d9 | | Load_Top At_Offset_1 0c18 01d4 | | Execute Vector,Structure_Write 0c19 BODY_0c00: 0c19 e5fe | | Load 0x2,-0x2 0c1a 6807 |h | Jump_Zero 0xc22 0c1b 4801 |H | Short_Literal 0x1 0c1c 00d9 | | Load_Top At_Offset_1 0c1d 01d7 | | Execute Vector,Field_Read 0c1e 0275 | u | Execute Discrete,Unary_Minus 0c1f 4801 |H | Short_Literal 0x1 0c20 00da | | Load_Top At_Offset_2 0c21 01d6 | | Execute Vector,Field_Write 0c22 00d8 | | Load_Top At_Offset_0 0c23 e001 | | Load 0x0,0x1 0c24 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0c25 01c6 | | Execute Vector,Convert_To_Formal 0c26 00cb | | Action Pop_Block_With_Result 0c27 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0c28 ; -------------------------------------------------------------------------------------- 0c28 ; SUBPROGRAM 0c28 ; -------------------------------------------------------------------------------------- 0c28 0c4d | M | .CONST 0x0c4d ; Address of begin 0c29 0004 | | .CONST 0x0004 ; Address of exception handler 0c2a 0007 | | .CONST 0x0007 ; Number of locals 0c2b INIT_0c28: 0c2b e5fd | | Load 0x2,-0x3 0c2c e01d | | Load 0x0,0x1d 0c2d e001 | | Load 0x0,0x1 0c2e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0c2f 00d8 | | Load_Top At_Offset_0 0c30 e5ff | | Load 0x2,-0x1 0c31 e001 | | Load 0x0,0x1 0c32 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0c33 00d8 | | Load_Top At_Offset_0 0c34 8229 | ) | Call 0x1,0x29 0c35 00d8 | | Load_Top At_Offset_0 0c36 e001 | | Load 0x0,0x1 0c37 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0c38 e5fe | | Load 0x2,-0x2 0c39 e5fd | | Load 0x2,-0x3 0c3a 0272 | r | Execute Discrete,Minus 0c3b 00d8 | | Load_Top At_Offset_0 0c3c 00e2 | | Load_Encached Integer_Cache 0c3d 0260 | ` | Execute Discrete,In_Type 0c3e 7001 |p | Jump_Nonzero 0xc40 0c3f 0801 | | Execute_Immediate Raise,0x1 0c40 e01d | | Load 0x0,0x1d 0c41 e001 | | Load 0x0,0x1 0c42 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0c43 00da | | Load_Top At_Offset_2 0c44 822a | * | Call 0x1,0x2a 0c45 e603 | | Load 0x3,0x3 0c46 e001 | | Load 0x0,0x1 0c47 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0c48 e001 | | Load 0x0,0x1 0c49 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0c4a e5fe | | Load 0x2,-0x2 0c4b 00e2 | | Load_Encached Integer_Cache 0c4c 03f1 | | Declare_Variable Discrete,With_Value 0c4d BODY_0c28: 0c4d 00da | | Load_Top At_Offset_2 0c4e 01db | | Execute Vector,Length 0c4f e5fd | | Load 0x2,-0x3 0c50 027e | ~ | Execute Discrete,Not_Equal 0c51 680b |h | Jump_Zero 0xc5d 0c52 00da | | Load_Top At_Offset_2 0c53 01db | | Execute Vector,Length 0c54 e5fd | | Load 0x2,-0x3 0c55 0a01 | | Execute_Immediate Plus,0x1 0c56 027f | | Execute Discrete,Equal 0c57 6804 |h | Jump_Zero 0xc5c 0c58 00d8 | | Load_Top At_Offset_0 0c59 0a01 | | Execute_Immediate Plus,0x1 0c5a 0059 | Y | Store_Top Discrete,At_Offset_1 0c5b 7801 |x | Jump 0xc5d 0c5c 08e2 | | Execute_Immediate Raise,0xe2 0c5d e5fc | | Load 0x2,-0x4 0c5e 4fff |O | Short_Literal -0x1 0c5f 027f | | Execute Discrete,Equal 0c60 6839 |h9 | Jump_Zero 0xc9a 0c61 e5fd | | Load 0x2,-0x3 0c62 00da | | Load_Top At_Offset_2 0c63 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0c64 01db | | Execute Vector,Length 0c65 00db | | Load_Top At_Offset_3 0c66 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0c67 01db | | Execute Vector,Length 0c68 e001 | | Load 0x0,0x1 0c69 1b61 | a | Execute Package,Field_Read,Field_Number 0x61 0c6a 1c08 | | Execute_Immediate Run_Utility,0x8 0c6b 00d8 | | Load_Top At_Offset_0 0c6c 1c01 | | Execute_Immediate Run_Utility,0x1 0c6d e5fc | | Load 0x2,-0x4 0c6e 00d9 | | Load_Top At_Offset_1 0c6f 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 0c70 00db | | Load_Top At_Offset_3 0c71 01dd | | Execute Vector,First 0c72 e605 | | Load 0x3,0x5 0c73 01dd | | Execute Vector,First 0c74 e5fd | | Load 0x2,-0x3 0c75 0273 | s | Execute Discrete,Plus 0c76 0aff | | Execute_Immediate Plus,-0x1 0c77 00d8 | | Load_Top At_Offset_0 0c78 00e2 | | Load_Encached Integer_Cache 0c79 0260 | ` | Execute Discrete,In_Type 0c7a 7001 |p | Jump_Nonzero 0xc7c 0c7b 0801 | | Execute_Immediate Raise,0x1 0c7c e605 | | Load 0x3,0x5 0c7d 01cf | | Execute Vector,Slice_Read 0c7e 00d9 | | Load_Top At_Offset_1 0c7f 00d8 | | Load_Top At_Offset_0 0c80 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 0c81 00da | | Load_Top At_Offset_2 0c82 01da | | Execute Vector,Bounds 0c83 00da | | Load_Top At_Offset_2 0c84 01da | | Execute Vector,Bounds 0c85 00da | | Load_Top At_Offset_2 0c86 027f | | Execute Discrete,Equal 0c87 7001 |p | Jump_Nonzero 0xc89 0c88 08e0 | | Execute_Immediate Raise,0xe0 0c89 00cd | | Action Spare6_Action 0c8a 027f | | Execute Discrete,Equal 0c8b 7001 |p | Jump_Nonzero 0xc8d 0c8c 08e0 | | Execute_Immediate Raise,0xe0 0c8d 00d2 | | Pop_Control Pop_Count_2 0c8e 00d9 | | Load_Top At_Offset_1 0c8f 2906 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6 0c90 00d9 | | Load_Top At_Offset_1 0c91 00d9 | | Load_Top At_Offset_1 0c92 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 0c93 00da | | Load_Top At_Offset_2 0c94 e001 | | Load 0x0,0x1 0c95 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0c96 00d9 | | Load_Top At_Offset_1 0c97 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7 0c98 00cb | | Action Pop_Block_With_Result 0c99 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0c9a e5fd | | Load 0x2,-0x3 0c9b 00da | | Load_Top At_Offset_2 0c9c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0c9d 01db | | Execute Vector,Length 0c9e 00db | | Load_Top At_Offset_3 0c9f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0ca0 01db | | Execute Vector,Length 0ca1 e001 | | Load 0x0,0x1 0ca2 1b61 | a | Execute Package,Field_Read,Field_Number 0x61 0ca3 1c08 | | Execute_Immediate Run_Utility,0x8 0ca4 00d8 | | Load_Top At_Offset_0 0ca5 1c01 | | Execute_Immediate Run_Utility,0x1 0ca6 e5fc | | Load 0x2,-0x4 0ca7 00d9 | | Load_Top At_Offset_1 0ca8 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 0ca9 00db | | Load_Top At_Offset_3 0caa 01dd | | Execute Vector,First 0cab e605 | | Load 0x3,0x5 0cac 01dd | | Execute Vector,First 0cad e5fd | | Load 0x2,-0x3 0cae 0273 | s | Execute Discrete,Plus 0caf 0aff | | Execute_Immediate Plus,-0x1 0cb0 00d8 | | Load_Top At_Offset_0 0cb1 00e2 | | Load_Encached Integer_Cache 0cb2 0260 | ` | Execute Discrete,In_Type 0cb3 7001 |p | Jump_Nonzero 0xcb5 0cb4 0801 | | Execute_Immediate Raise,0x1 0cb5 e605 | | Load 0x3,0x5 0cb6 01cf | | Execute Vector,Slice_Read 0cb7 00d9 | | Load_Top At_Offset_1 0cb8 00d8 | | Load_Top At_Offset_0 0cb9 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 0cba 00da | | Load_Top At_Offset_2 0cbb 01da | | Execute Vector,Bounds 0cbc 00da | | Load_Top At_Offset_2 0cbd 01da | | Execute Vector,Bounds 0cbe 00da | | Load_Top At_Offset_2 0cbf 027f | | Execute Discrete,Equal 0cc0 7001 |p | Jump_Nonzero 0xcc2 0cc1 08e0 | | Execute_Immediate Raise,0xe0 0cc2 00cd | | Action Spare6_Action 0cc3 027f | | Execute Discrete,Equal 0cc4 7001 |p | Jump_Nonzero 0xcc6 0cc5 08e0 | | Execute_Immediate Raise,0xe0 0cc6 00d2 | | Pop_Control Pop_Count_2 0cc7 00d9 | | Load_Top At_Offset_1 0cc8 2906 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6 0cc9 00d9 | | Load_Top At_Offset_1 0cca 00d9 | | Load_Top At_Offset_1 0ccb 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 0ccc 00da | | Load_Top At_Offset_2 0ccd 00d9 | | Load_Top At_Offset_1 0cce 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7 0ccf 00cb | | Action Pop_Block_With_Result 0cd0 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0cd1 ; -------------------------------------------------------------------------------------- 0cd1 ; STRING TABLE 0cd1 ; -------------------------------------------------------------------------------------- 0cd1 0008 | | .STRTAB 0x0008->0x0cd5 ; " 0" 0cd2 0008 | | .STRTAB 0x0008->0x0cd6 ; "/" 0cd3 0007 | | .STRTAB 0x0007->0x0cd6 ; "+0" 0cd4 0007 | | .STREND 0x0007->0x0cd7 0cd5 2030 2f2b | 0/+| .STRTAB_STRINGS 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 ; Debug Table 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 0004 000d | | .DEBUG4 0x0004,0x000d,0x7a73,0x0000,0x0001,0x0000 0cde 0000 0000 | | .XXX[0xe] 0ce0 0002 a8fa | | 0ce2 0000 0844 | D| 0ce4 0000 0000 | | 0ce6 0000 0003 | | 0ce8 0002 a8fa | | 0cea 0800 0ab8 | | 0cec 0000 0000 | | .BLANK 0000[0x4] 0cf0 000b 8c04 | | .XXX[0x14] 0cf2 0000 02d8 | | 0cf4 0002 e4fa | | 0cf6 0000 0000 | | 0cf8 0002 a8fa | | 0cfa 0000 0cc4 | | 0cfc 0000 0000 | | 0cfe 0000 0003 | | 0d00 0002 a8fa | | 0d02 0800 0f38 | 8| 0d04 0000 0000 | | .BLANK 0000[0x4] 0d08 0002 a8fa | | .XXX[0x4] 0d0a 0800 10b8 | | 0d0c 0000 0000 | | .BLANK 0000[0x4] 0d10 0002 a8fa | | .XXX[0x14] 0d12 0000 0cc4 | | 0d14 0002 a8fa | | 0d16 0000 0001 | | 0d18 000b 8c04 | | 0d1a 0000 02d8 | | 0d1c 0002 f0fa | | 0d1e 0000 0000 | | 0d20 0002 a8fa | | 0d22 0800 126c | l| 0d24 0000 0000 | | .BLANK 0000[0x4] 0d28 000b 8c04 | | .XXX[0x2c] 0d2a 0000 02d8 | | 0d2c 0002 fcfa | | 0d2e 0000 0000 | | 0d30 000b 8c04 | | 0d32 0000 02d8 | | 0d34 0003 08fa | | 0d36 0000 0000 | | 0d38 0002 a8fa | | 0d3a 0000 0016 | | 0d3c 0011 690b | i | 0d3e 0000 2432 | $2| 0d40 0002 a8fa | | 0d42 0000 0016 | | 0d44 0011 690b | i | 0d46 0000 2532 | %2| 0d48 0002 a8fa | | 0d4a 0000 0016 | | 0d4c 0011 690b | i | 0d4e 0000 2632 | &2| 0d50 000b 8c04 | | 0d52 0000 02d8 | | 0d54 0000 0000 | | .BLANK 0000[0xac]