|
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: 5120 (0x1400) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_10018b7
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 06b0 | | .CONST 0x06b0 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 011b | | .CONST 0x011b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0038 | 8 | .CONST 0x0038 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional 000c 00c4 | | Action Make_Default 000d 0007 | | Action Break_Optional 000e 0007 | | Action Break_Optional 000f 00e4 | | Load_Encached Positive_Cache 0010 0266 | f | Execute Discrete,Bounds 0011 e003 | | Load 0x0,0x3 0012 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call 0014 4801 |H | Short_Literal 0x1 0015 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0016 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0018 0007 | | Action Break_Optional 0019 4800 |H | Short_Literal 0x0 001a e004 | | Load 0x0,0x4 001b 00e3 | | Load_Encached Natural_Cache 001c 03f9 | | Declare_Type Discrete,Constrained,Visible 001d 4801 |H | Short_Literal 0x1 001e e004 | | Load 0x0,0x4 001f 00da | | Load_Top At_Offset_2 0020 03f9 | | Declare_Type Discrete,Constrained,Visible 0021 00d8 | | Load_Top At_Offset_0 0022 0266 | f | Execute Discrete,Bounds 0023 e005 | | Load 0x0,0x5 0024 029f 015b | [| Declare_Subprogram INIT_0158,For_Call 0026 4801 |H | Short_Literal 0x1 0027 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0028 00d9 | | Load_Top At_Offset_1 0029 0266 | f | Execute Discrete,Bounds 002a e006 | | Load 0x0,0x6 002b 02a0 | | Declare_Subprogram Null_Subprogram 002c 4801 |H | Short_Literal 0x1 002d 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 002e 0007 | | Action Break_Optional 002f 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 0031 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0033 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 0035 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 0037 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 0039 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 003b 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 003d 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 003f 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated 0041 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 0043 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0045 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0047 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated 0049 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 004b 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 004d 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 004f 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated 0051 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated 0053 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 0055 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0057 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated 0059 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated 005b 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated 005d 0093 0000 | | push_full_address 0x0 005f 60e0 |` | Indirect_Literal Discrete,0x140,{0x80000000, 0x00020000} 0060 0273 | s | Execute Discrete,Plus 0061 e007 | | Load 0x0,0x7 0062 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0063 60d8 |` | Indirect_Literal Discrete,0x13c,{0x00000000, 0x0000ffff} 0064 0279 | y | Execute Discrete,And 0065 0273 | s | Execute Discrete,Plus 0066 0129 | ) | Execute Any,Make_Visible 0067 0007 | | Action Break_Optional 0068 00e3 | | Load_Encached Natural_Cache 0069 4800 |H | Short_Literal 0x0 006a 4801 |H | Short_Literal 0x1 006b 4801 |H | Short_Literal 0x1 006c 4805 |H | Short_Literal 0x5 006d 0319 | | Declare_Type Variant_Record,Incomplete,Visible 006e 029f 049b | | Declare_Subprogram INIT_0498,For_Call 0070 00d9 | | Load_Top At_Offset_1 0071 012a | * | Execute Any,Change_Utility 0072 0007 | | Action Break_Optional 0073 00d8 | | Load_Top At_Offset_0 0074 02a0 | | Declare_Subprogram Null_Subprogram 0075 4818 |H | Short_Literal 0x18 0076 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0077 00d8 | | Load_Top At_Offset_0 0078 0129 | ) | Execute Any,Make_Visible 0079 c20d | | Store 0x1,0xd 007a 00bf | | Action Accept_Activation 007b e210 | | Load 0x1,0x10 007c e008 | | Load 0x0,0x8 007d 4801 |H | Short_Literal 0x1 007e e212 | | Load 0x1,0x12 007f 01dc | | Execute Vector,Last 0080 e210 | | Load 0x1,0x10 0081 0269 | i | Execute Discrete,Last 0082 026c | l | Execute Discrete,Minimum 0083 e212 | | Load 0x1,0x12 0084 034e | N | QQ_Declare_Type Array,Constrained,Bounds_With_Object 0085 029f 0503 | | Declare_Subprogram INIT_0500,For_Call 0087 4800 |H | Short_Literal 0x0 0088 4801 |H | Short_Literal 0x1 0089 4801 |H | Short_Literal 0x1 008a 4800 |H | Short_Literal 0x0 008b 4801 |H | Short_Literal 0x1 008c 4801 |H | Short_Literal 0x1 008d 031d | | Declare_Type Variant_Record,Defined 008e 4800 |H | Short_Literal 0x0 008f 00d9 | | Load_Top At_Offset_1 0090 1c08 | | Execute_Immediate Run_Utility,0x8 0091 00d8 | | Load_Top At_Offset_0 0092 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0093 0335 | 5 | Declare_Variable Array,Duplicate 0094 00cd | | Action Spare6_Action 0095 00d9 | | Load_Top At_Offset_1 0096 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0097 01d9 | | Execute Vector,Reverse_Bounds 0098 0263 | c | Execute Discrete,Above_Bound 0099 7005 |p | Jump_Nonzero 0x9f 009a e009 | | Load 0x0,0x9 009b 00d9 | | Load_Top At_Offset_1 009c e230 | 0 | Load 0x1,0x30 009d 01d6 | | Execute Vector,Field_Write 009e 3ffb |? | Loop_Increasing 0x9a 009f 00d9 | | Load_Top At_Offset_1 00a0 00d8 | | Load_Top At_Offset_0 00a1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 00a2 00da | | Load_Top At_Offset_2 00a3 01da | | Execute Vector,Bounds 00a4 00da | | Load_Top At_Offset_2 00a5 01da | | Execute Vector,Bounds 00a6 00da | | Load_Top At_Offset_2 00a7 027f | | Execute Discrete,Equal 00a8 7001 |p | Jump_Nonzero 0xaa 00a9 08e0 | | Execute_Immediate Raise,0xe0 00aa 00cd | | Action Spare6_Action 00ab 027f | | Execute Discrete,Equal 00ac 7001 |p | Jump_Nonzero 0xae 00ad 08e0 | | Execute_Immediate Raise,0xe0 00ae 00d2 | | Pop_Control Pop_Count_2 00af 00d9 | | Load_Top At_Offset_1 00b0 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 00b1 e00a | | Load 0x0,0xa 00b2 00d9 | | Load_Top At_Offset_1 00b3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 00b4 00e3 | | Load_Encached Natural_Cache 00b5 0266 | f | Execute Discrete,Bounds 00b6 00db | | Load_Top At_Offset_3 00b7 029f 054b | K| Declare_Subprogram INIT_0548,For_Call 00b9 4801 |H | Short_Literal 0x1 00ba 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 00bb e210 | | Load 0x1,0x10 00bc 4801 |H | Short_Literal 0x1 00bd e213 | | Load 0x1,0x13 00be 01dc | | Execute Vector,Last 00bf e210 | | Load 0x1,0x10 00c0 0269 | i | Execute Discrete,Last 00c1 026c | l | Execute Discrete,Minimum 00c2 e213 | | Load 0x1,0x13 00c3 034e | N | QQ_Declare_Type Array,Constrained,Bounds_With_Object 00c4 029f 0563 | c| Declare_Subprogram INIT_0560,For_Call 00c6 4800 |H | Short_Literal 0x0 00c7 4801 |H | Short_Literal 0x1 00c8 4800 |H | Short_Literal 0x0 00c9 4800 |H | Short_Literal 0x0 00ca 4801 |H | Short_Literal 0x1 00cb 4801 |H | Short_Literal 0x1 00cc 031d | | Declare_Type Variant_Record,Defined 00cd e00b | | Load 0x0,0xb 00ce 00e3 | | Load_Encached Natural_Cache 00cf 00da | | Load_Top At_Offset_2 00d0 4801 |H | Short_Literal 0x1 00d1 6066 |`f | Indirect_Literal Discrete,0x138,{0x00000000, 0x7fffffff} 00d2 e230 | 0 | Load 0x1,0x30 00d3 034e | N | QQ_Declare_Type Array,Constrained,Bounds_With_Object 00d4 029f 049b | | Declare_Subprogram INIT_0498,For_Call 00d6 4800 |H | Short_Literal 0x0 00d7 4801 |H | Short_Literal 0x1 00d8 4803 |H | Short_Literal 0x3 00d9 e22c | , | Load 0x1,0x2c 00da 0307 | | Complete_Type Variant_Record,By_Defining 00db e22d | - | Load 0x1,0x2d 00dc 03c4 | | Complete_Type Access,By_Component_Completion 00dd 029d 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call 00df 029d 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call 00e1 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00e2 00c7 | | Action Elaborate_Subprogram 00e3 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00e4 00c7 | | Action Elaborate_Subprogram 00e5 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00e6 00c7 | | Action Elaborate_Subprogram 00e7 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00e8 00c7 | | Action Elaborate_Subprogram 00e9 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00ea 00c7 | | Action Elaborate_Subprogram 00eb 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00ec 00c7 | | Action Elaborate_Subprogram 00ed 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00ee 00c7 | | Action Elaborate_Subprogram 00ef 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call 00f1 1d0f | | Execute_Immediate Reference_Lex_1,0xf 00f2 00c7 | | Action Elaborate_Subprogram 00f3 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00f4 00c7 | | Action Elaborate_Subprogram 00f5 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00f6 00c7 | | Action Elaborate_Subprogram 00f7 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00f8 00c7 | | Action Elaborate_Subprogram 00f9 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call 00fb 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00fc 00c7 | | Action Elaborate_Subprogram 00fd 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00fe 00c7 | | Action Elaborate_Subprogram 00ff 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0100 00c7 | | Action Elaborate_Subprogram 0101 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0102 00c7 | | Action Elaborate_Subprogram 0103 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0104 00c7 | | Action Elaborate_Subprogram 0105 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0106 00c7 | | Action Elaborate_Subprogram 0107 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0108 00c7 | | Action Elaborate_Subprogram 0109 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 010a 00c7 | | Action Elaborate_Subprogram 010b 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 010c 00c7 | | Action Elaborate_Subprogram 010d 029d 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call 010f 029d 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call 0111 029d 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call 0113 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0114 00c7 | | Action Elaborate_Subprogram 0115 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0116 00c7 | | Action Elaborate_Subprogram 0117 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0118 00c7 | | Action Elaborate_Subprogram 0119 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 011a 00c7 | | Action Elaborate_Subprogram 011b BODY_0008: 011b 00bc | | Action Signal_Activated 011c 00bb | | Action Signal_Completion 011d 0000 0000 | | .XXX[0x3] 011f 0000 | | 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00d1 | | Pop_Control Pop_Count_1 0124 00da | | Load_Top At_Offset_2 0125 01d8 | | Execute Vector,Element_Type 0126 0322 | " | Declare_Variable Record 0127 00d8 | | Load_Top At_Offset_0 0128 1c00 | | Execute_Immediate Run_Utility,0x0 0129 00db | | Load_Top At_Offset_3 012a 01dc | | Execute Vector,Last 012b e5ff | | Load 0x2,-0x1 012c 01dd | | Execute Vector,First 012d 0263 | c | Execute Discrete,Above_Bound 012e 7006 |p | Jump_Nonzero 0x135 012f 00da | | Load_Top At_Offset_2 0130 00d9 | | Load_Top At_Offset_1 0131 e5ff | | Load 0x2,-0x1 0132 01d6 | | Execute Vector,Field_Write 0133 0a01 | | Execute_Immediate Plus,0x1 0134 7ff8 | | Jump 0x12d 0135 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0136 0000 0000 | | .XXX[0x2] 0138 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 013c 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 0140 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0144 0000 0000 | | .BLANK 0000[0x4] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 4801 |H | Short_Literal 0x1 014c 4800 |H | Short_Literal 0x0 014d e20e | | Load 0x1,0xe 014e 035b | [ | Declare_Type Array,Constrained 014f 0337 | 7 | Declare_Variable Array 0150 e20e | | Load 0x1,0xe 0151 01c6 | | Execute Vector,Convert_To_Formal 0152 00ca | | Action Exit_Nullary_Function 0153 0000 0000 | | .BLANK 0000[0x5] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 00d1 | | Pop_Control Pop_Count_1 015c 00da | | Load_Top At_Offset_2 015d 01d8 | | Execute Vector,Element_Type 015e 02ff | | Declare_Variable Variant_Record 015f 00d8 | | Load_Top At_Offset_0 0160 1c00 | | Execute_Immediate Run_Utility,0x0 0161 00db | | Load_Top At_Offset_3 0162 01dc | | Execute Vector,Last 0163 e5ff | | Load 0x2,-0x1 0164 01dd | | Execute Vector,First 0165 0263 | c | Execute Discrete,Above_Bound 0166 7006 |p | Jump_Nonzero 0x16d 0167 00da | | Load_Top At_Offset_2 0168 00d9 | | Load_Top At_Offset_1 0169 e5ff | | Load 0x2,-0x1 016a 01d6 | | Execute Vector,Field_Write 016b 0a01 | | Execute_Immediate Plus,0x1 016c 7ff8 | | Jump 0x165 016d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 016e 0000 0000 | | .XXX[0x2] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0179 | y | .CONST 0x0179 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0003 | | .CONST 0x0003 ; Number of locals 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 0174 8216 | | Call 0x1,0x16 0175 8220 | | Call 0x1,0x20 0176 e5fe | | Load 0x2,-0x2 0177 8216 | | Call 0x1,0x16 0178 8220 | | Call 0x1,0x20 0179 BODY_0170: 0179 00d9 | | Load_Top At_Offset_1 017a 01db | | Execute Vector,Length 017b 00d9 | | Load_Top At_Offset_1 017c 01db | | Execute Vector,Length 017d 027f | | Execute Discrete,Equal 017e 6823 |h# | Jump_Zero 0x1a2 017f 00cf | | Action Mark_Auxiliary 0180 00da | | Load_Top At_Offset_2 0181 01d9 | | Execute Vector,Reverse_Bounds 0182 0263 | c | Execute Discrete,Above_Bound 0183 701b |p | Jump_Nonzero 0x19f 0184 00d8 | | Load_Top At_Offset_0 0185 e402 | | Load 0x2,0x2 0186 01d5 | | Execute Vector,Field_Reference 0187 800c | | Call 0x0,0xc 0188 680a |h | Jump_Zero 0x193 0189 00d8 | | Load_Top At_Offset_0 018a e403 | | Load 0x2,0x3 018b 01d5 | | Execute Vector,Field_Reference 018c 00d9 | | Load_Top At_Offset_1 018d e402 | | Load 0x2,0x2 018e 01d5 | | Execute Vector,Field_Reference 018f 8214 | | Call 0x1,0x14 0190 700c |p | Jump_Nonzero 0x19d 0191 4800 |H | Short_Literal 0x0 0192 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0193 00d8 | | Load_Top At_Offset_0 0194 e402 | | Load 0x2,0x2 0195 01d5 | | Execute Vector,Field_Reference 0196 00d9 | | Load_Top At_Offset_1 0197 e403 | | Load 0x2,0x3 0198 01d5 | | Execute Vector,Field_Reference 0199 016f | o | Execute Variant_Record,Equal 019a 7002 |p | Jump_Nonzero 0x19d 019b 4800 |H | Short_Literal 0x0 019c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 019d 00c8 | | Action Pop_Auxiliary_Range 019e 3fe5 |? | Loop_Increasing 0x184 019f 00ce | | Action Pop_Auxiliary 01a0 4801 |H | Short_Literal 0x1 01a1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01a2 4800 |H | Short_Literal 0x0 01a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01a4 0000 0000 | | .BLANK 0000[0x4] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab 00da | | Load_Top At_Offset_2 01ac e5fe | | Load 0x2,-0x2 01ad 8232 | 2 | Call 0x1,0x32 01ae 800d | | Call 0x0,0xd 01af 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 800e | | Call 0x0,0xe 01b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b6 0000 0000 | | .XXX[0x2] 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 800f | | Call 0x0,0xf 01bd 8233 | 3 | Call 0x1,0x33 01be 00d8 | | Load_Top At_Offset_0 01bf e00b | | Load 0x0,0xb 01c0 0260 | ` | Execute Discrete,In_Type 01c1 7001 |p | Jump_Nonzero 0x1c3 01c2 0801 | | Execute_Immediate Raise,0x1 01c3 8010 | | Call 0x0,0x10 01c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c5 0000 0000 | | .XXX[0x3] 01c7 0000 | | 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 00da | | Load_Top At_Offset_2 01cc 8011 | | Call 0x0,0x11 01cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ce 0000 0000 | | .XXX[0x2] 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 800f | | Call 0x0,0xf 01d5 8233 | 3 | Call 0x1,0x33 01d6 00d8 | | Load_Top At_Offset_0 01d7 e00b | | Load 0x0,0xb 01d8 0260 | ` | Execute Discrete,In_Type 01d9 7001 |p | Jump_Nonzero 0x1db 01da 0801 | | Execute_Immediate Raise,0x1 01db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01dc 0000 0000 | | .BLANK 0000[0x4] 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 e22d | - | Load 0x1,0x2d 01e5 022e | . | Execute Access,Not_Equal 01e6 6809 |h | Jump_Zero 0x1f0 01e7 00da | | Load_Top At_Offset_2 01e8 0227 | ' | Execute Access,All_Reference 01e9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01ea 00d8 | | Load_Top At_Offset_0 01eb e00b | | Load 0x0,0xb 01ec 0260 | ` | Execute Discrete,In_Type 01ed 7001 |p | Jump_Nonzero 0x1ef 01ee 0801 | | Execute_Immediate Raise,0x1 01ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f0 e012 | | Load 0x0,0x12 01f1 00d8 | | Load_Top At_Offset_0 01f2 e00b | | Load 0x0,0xb 01f3 0260 | ` | Execute Discrete,In_Type 01f4 7001 |p | Jump_Nonzero 0x1f6 01f5 0801 | | Execute_Immediate Raise,0x1 01f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f7 0000 | | .XXX[0x1] 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 0227 | ' | Execute Access,All_Reference 01fd 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 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 00db | | Load_Top At_Offset_3 0204 e22c | , | Load 0x1,0x2c 0205 1c08 | | Execute_Immediate Run_Utility,0x8 0206 00db | | Load_Top At_Offset_3 0207 00d9 | | Load_Top At_Offset_1 0208 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0209 4800 |H | Short_Literal 0x0 020a 00d9 | | Load_Top At_Offset_1 020b 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 020c 00d8 | | Load_Top At_Offset_0 020d 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 020e 0335 | 5 | Declare_Variable Array,Duplicate 020f 00cd | | Action Spare6_Action 0210 00d9 | | Load_Top At_Offset_1 0211 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 0212 01d9 | | Execute Vector,Reverse_Bounds 0213 0263 | c | Execute Discrete,Above_Bound 0214 7005 |p | Jump_Nonzero 0x21a 0215 e22f | / | Load 0x1,0x2f 0216 00d9 | | Load_Top At_Offset_1 0217 e403 | | Load 0x2,0x3 0218 01d6 | | Execute Vector,Field_Write 0219 3ffb |? | Loop_Increasing 0x215 021a 00d9 | | Load_Top At_Offset_1 021b 00d8 | | Load_Top At_Offset_0 021c 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 021d 00da | | Load_Top At_Offset_2 021e 01da | | Execute Vector,Bounds 021f 00da | | Load_Top At_Offset_2 0220 01da | | Execute Vector,Bounds 0221 00da | | Load_Top At_Offset_2 0222 027f | | Execute Discrete,Equal 0223 7001 |p | Jump_Nonzero 0x225 0224 08e0 | | Execute_Immediate Raise,0xe0 0225 00cd | | Action Spare6_Action 0226 027f | | Execute Discrete,Equal 0227 7001 |p | Jump_Nonzero 0x229 0228 08e0 | | Execute_Immediate Raise,0xe0 0229 00d2 | | Pop_Control Pop_Count_2 022a 00d9 | | Load_Top At_Offset_1 022b 2905 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5 022c e5fd | | Load 0x2,-0x3 022d 01db | | Execute Vector,Length 022e e231 | 1 | Load 0x1,0x31 022f 1c08 | | Execute_Immediate Run_Utility,0x8 0230 e5fd | | Load 0x2,-0x3 0231 00d9 | | Load_Top At_Offset_1 0232 00d8 | | Load_Top At_Offset_0 0233 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 0234 00da | | Load_Top At_Offset_2 0235 01da | | Execute Vector,Bounds 0236 00da | | Load_Top At_Offset_2 0237 01da | | Execute Vector,Bounds 0238 00da | | Load_Top At_Offset_2 0239 027f | | Execute Discrete,Equal 023a 7001 |p | Jump_Nonzero 0x23c 023b 08e0 | | Execute_Immediate Raise,0xe0 023c 00cd | | Action Spare6_Action 023d 027f | | Execute Discrete,Equal 023e 7001 |p | Jump_Nonzero 0x240 023f 08e0 | | Execute_Immediate Raise,0xe0 0240 00d2 | | Pop_Control Pop_Count_2 0241 00d9 | | Load_Top At_Offset_1 0242 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2 0243 00d9 | | Load_Top At_Offset_1 0244 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 0245 e22d | - | Load 0x1,0x2d 0246 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0247 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 4800 |H | Short_Literal 0x0 024c 00db | | Load_Top At_Offset_3 024d 0227 | ' | Execute Access,All_Reference 024e 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 024f 00da | | Load_Top At_Offset_2 0250 0229 | ) | Execute Access,All_Read 0251 00d8 | | Load_Top At_Offset_0 0252 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 0253 00d8 | | Load_Top At_Offset_0 0254 0335 | 5 | Declare_Variable Array,Duplicate 0255 00cd | | Action Spare6_Action 0256 00d9 | | Load_Top At_Offset_1 0257 01d9 | | Execute Vector,Reverse_Bounds 0258 0263 | c | Execute Discrete,Above_Bound 0259 7005 |p | Jump_Nonzero 0x25f 025a e22f | / | Load 0x1,0x2f 025b 00d9 | | Load_Top At_Offset_1 025c e404 | | Load 0x2,0x4 025d 01d6 | | Execute Vector,Field_Write 025e 3ffb |? | Loop_Increasing 0x25a 025f 00cd | | Action Spare6_Action 0260 00d9 | | Load_Top At_Offset_1 0261 2905 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5 0262 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0263 0000 0000 | | .BLANK 0000[0x5] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026d | m | .CONST 0x026d ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0002 | | .CONST 0x0002 ; Number of locals 026b INIT_0268: 026b e006 | | Load 0x0,0x6 026c 0007 | | Action Break_Optional 026d BODY_0268: 026d e5fe | | Load 0x2,-0x2 026e e5ff | | Load 0x2,-0x1 026f 0227 | ' | Execute Access,All_Reference 0270 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4 0271 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 0272 01d7 | | Execute Vector,Field_Read 0273 0039 | 9 | Store_Top Access,At_Offset_1 0274 00d8 | | Load_Top At_Offset_0 0275 8013 | | Call 0x0,0x13 0276 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0277 0000 | | .XXX[0x1] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027f | | .CONST 0x027f ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0002 | | .CONST 0x0002 ; Number of locals 027b INIT_0278: 027b e5fd | | Load 0x2,-0x3 027c 0227 | ' | Execute Access,All_Reference 027d 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 027e 0007 | | Action Break_Optional 027f BODY_0278: 027f 00db | | Load_Top At_Offset_3 0280 00d9 | | Load_Top At_Offset_1 0281 01d5 | | Execute Vector,Field_Reference 0282 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0283 6807 |h | Jump_Zero 0x28b 0284 e5fe | | Load 0x2,-0x2 0285 e5ff | | Load 0x2,-0x1 0286 00da | | Load_Top At_Offset_2 0287 01d5 | | Execute Vector,Field_Reference 0288 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0289 8235 | 5 | Call 0x1,0x35 028a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 028b 4800 |H | Short_Literal 0x0 028c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 028d 0000 0000 | | .XXX[0x3] 028f 0000 | | 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 029b | | .CONST 0x029b ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0003 | | .CONST 0x0003 ; Number of locals 0293 INIT_0290: 0293 e22d | - | Load 0x1,0x2d 0294 00db | | Load_Top At_Offset_3 0295 8217 | | Call 0x1,0x17 0296 0039 | 9 | Store_Top Access,At_Offset_1 0297 00db | | Load_Top At_Offset_3 0298 8218 | | Call 0x1,0x18 0299 00e3 | | Load_Encached Natural_Cache 029a 03f1 | | Declare_Variable Discrete,With_Value 029b BODY_0290: 029b 00d8 | | Load_Top At_Offset_0 029c 00da | | Load_Top At_Offset_2 029d 0227 | ' | Execute Access,All_Reference 029e 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 029f 01d5 | | Execute Vector,Field_Reference 02a0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02a1 0335 | 5 | Declare_Variable Array,Duplicate 02a2 00cd | | Action Spare6_Action 02a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a4 0000 0000 | | .BLANK 0000[0x4] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02b3 | | .CONST 0x02b3 ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0003 | | .CONST 0x0003 ; Number of locals 02ab INIT_02a8: 02ab e22d | - | Load 0x1,0x2d 02ac 00db | | Load_Top At_Offset_3 02ad 8217 | | Call 0x1,0x17 02ae 0039 | 9 | Store_Top Access,At_Offset_1 02af 00db | | Load_Top At_Offset_3 02b0 8218 | | Call 0x1,0x18 02b1 00e3 | | Load_Encached Natural_Cache 02b2 03f1 | | Declare_Variable Discrete,With_Value 02b3 BODY_02a8: 02b3 e5fe | | Load 0x2,-0x2 02b4 00d9 | | Load_Top At_Offset_1 02b5 00db | | Load_Top At_Offset_3 02b6 0227 | ' | Execute Access,All_Reference 02b7 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 02b8 01d5 | | Execute Vector,Field_Reference 02b9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02ba 01d5 | | Execute Vector,Field_Reference 02bb 02fd | | Declare_Variable Variant_Record,Duplicate 02bc 00cd | | Action Spare6_Action 02bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02be 0000 0000 | | .XXX[0x2] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02cb | | .CONST 0x02cb ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0003 | | .CONST 0x0003 ; Number of locals 02c3 INIT_02c0: 02c3 e22d | - | Load 0x1,0x2d 02c4 00db | | Load_Top At_Offset_3 02c5 8217 | | Call 0x1,0x17 02c6 0039 | 9 | Store_Top Access,At_Offset_1 02c7 00db | | Load_Top At_Offset_3 02c8 8218 | | Call 0x1,0x18 02c9 00e3 | | Load_Encached Natural_Cache 02ca 03f1 | | Declare_Variable Discrete,With_Value 02cb BODY_02c0: 02cb e5ff | | Load 0x2,-0x1 02cc e014 | | Load 0x0,0x14 02cd 017f | | Execute Record,Equal 02ce 6802 |h | Jump_Zero 0x2d1 02cf e00a | | Load 0x0,0xa 02d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d1 00d8 | | Load_Top At_Offset_0 02d2 00da | | Load_Top At_Offset_2 02d3 0227 | ' | Execute Access,All_Reference 02d4 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 02d5 01d5 | | Execute Vector,Field_Reference 02d6 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2 02d7 02fd | | Declare_Variable Variant_Record,Duplicate 02d8 00cd | | Action Spare6_Action 02d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02da 0000 0000 | | .BLANK 0000[0x6] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02fa | | .CONST 0x02fa ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0007 | | .CONST 0x0007 ; Number of locals 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 0227 | ' | Execute Access,All_Reference 02e5 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 02e6 0007 | | Action Break_Optional 02e7 00db | | Load_Top At_Offset_3 02e8 0227 | ' | Execute Access,All_Reference 02e9 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 02ea 0007 | | Action Break_Optional 02eb e5ff | | Load 0x2,-0x1 02ec 821a | | Call 0x1,0x1a 02ed e00b | | Load 0x0,0xb 02ee 1c04 | | Execute_Immediate Run_Utility,0x4 02ef 00e3 | | Load_Encached Natural_Cache 02f0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 02f1 00e3 | | Load_Encached Natural_Cache 02f2 e003 | | Load 0x0,0x3 02f3 0322 | " | Declare_Variable Record 02f4 00d8 | | Load_Top At_Offset_0 02f5 1c00 | | Execute_Immediate Run_Utility,0x0 02f6 e008 | | Load 0x0,0x8 02f7 02ff | | Declare_Variable Variant_Record 02f8 00d8 | | Load_Top At_Offset_0 02f9 1c00 | | Execute_Immediate Run_Utility,0x0 02fa BODY_02e0: 02fa 00d8 | | Load_Top At_Offset_0 02fb 8015 | | Call 0x0,0x15 02fc 00d1 | | Pop_Control Pop_Count_1 02fd 00cf | | Action Mark_Auxiliary 02fe e402 | | Load 0x2,0x2 02ff 01d9 | | Execute Vector,Reverse_Bounds 0300 0263 | c | Execute Discrete,Above_Bound 0301 7037 |p7 | Jump_Nonzero 0x339 0302 00d8 | | Load_Top At_Offset_0 0303 e402 | | Load 0x2,0x2 0304 01d5 | | Execute Vector,Field_Reference 0305 e22f | / | Load 0x1,0x2f 0306 016f | o | Execute Variant_Record,Equal 0307 682f |h/ | Jump_Zero 0x337 0308 e5fe | | Load 0x2,-0x2 0309 01db | | Execute Vector,Length 030a e22e | . | Load 0x1,0x2e 030b 1c08 | | Execute_Immediate Run_Utility,0x8 030c e5fe | | Load 0x2,-0x2 030d 00d9 | | Load_Top At_Offset_1 030e 00d8 | | Load_Top At_Offset_0 030f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0310 00da | | Load_Top At_Offset_2 0311 01da | | Execute Vector,Bounds 0312 00da | | Load_Top At_Offset_2 0313 01da | | Execute Vector,Bounds 0314 00da | | Load_Top At_Offset_2 0315 027f | | Execute Discrete,Equal 0316 7001 |p | Jump_Nonzero 0x318 0317 08e0 | | Execute_Immediate Raise,0xe0 0318 00cd | | Action Spare6_Action 0319 027f | | Execute Discrete,Equal 031a 7001 |p | Jump_Nonzero 0x31c 031b 08e0 | | Execute_Immediate Raise,0xe0 031c 00d2 | | Pop_Control Pop_Count_2 031d 00d9 | | Load_Top At_Offset_1 031e 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 031f e407 | | Load 0x2,0x7 0320 00d9 | | Load_Top At_Offset_1 0321 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0322 00d9 | | Load_Top At_Offset_1 0323 e402 | | Load 0x2,0x2 0324 01d6 | | Execute Vector,Field_Write 0325 00d8 | | Load_Top At_Offset_0 0326 a405 | | Store_Unchecked 0x2,0x5 0327 00d8 | | Load_Top At_Offset_0 0328 e403 | | Load 0x2,0x3 0329 027d | } | Execute Discrete,Greater 032a 6802 |h | Jump_Zero 0x32d 032b 00d8 | | Load_Top At_Offset_0 032c a403 | | Store_Unchecked 0x2,0x3 032d e405 | | Load 0x2,0x5 032e e404 | | Load 0x2,0x4 032f 800d | | Call 0x0,0xd 0330 e406 | | Load 0x2,0x6 0331 017d | } | Execute Record,Structure_Write 0332 e406 | | Load 0x2,0x6 0333 8016 | | Call 0x0,0x16 0334 e5fd | | Load 0x2,-0x3 0335 016d | m | Execute Variant_Record,Structure_Write 0336 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0337 00c8 | | Action Pop_Auxiliary_Range 0338 3fc9 |? | Loop_Increasing 0x302 0339 00ce | | Action Pop_Auxiliary 033a e22b | + | Load 0x1,0x2b 033b 0257 | W | Execute Discrete,Raise 033c 0000 0000 | | .BLANK 0000[0x4] 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0353 | S | .CONST 0x0353 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0005 | | .CONST 0x0005 ; Number of locals 0343 INIT_0340: 0343 e22d | - | Load 0x1,0x2d 0344 00db | | Load_Top At_Offset_3 0345 8217 | | Call 0x1,0x17 0346 0039 | 9 | Store_Top Access,At_Offset_1 0347 00db | | Load_Top At_Offset_3 0348 8218 | | Call 0x1,0x18 0349 00e3 | | Load_Encached Natural_Cache 034a 03f1 | | Declare_Variable Discrete,With_Value 034b 00d9 | | Load_Top At_Offset_1 034c 0227 | ' | Execute Access,All_Reference 034d 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 034e 0007 | | Action Break_Optional 034f 00da | | Load_Top At_Offset_2 0350 0227 | ' | Execute Access,All_Reference 0351 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 0352 0007 | | Action Break_Optional 0353 BODY_0340: 0353 e22f | / | Load 0x1,0x2f 0354 00db | | Load_Top At_Offset_3 0355 00db | | Load_Top At_Offset_3 0356 01d6 | | Execute Vector,Field_Write 0357 00d8 | | Load_Top At_Offset_0 0358 00db | | Load_Top At_Offset_3 0359 027f | | Execute Discrete,Equal 035a 6816 |h | Jump_Zero 0x371 035b 00cf | | Action Mark_Auxiliary 035c 0007 | | Action Break_Optional 035d 00d9 | | Load_Top At_Offset_1 035e 0f01 | | Execute_Immediate Equal,0x1 035f 6803 |h | Jump_Zero 0x363 0360 4800 |H | Short_Literal 0x0 0361 a405 | | Store_Unchecked 0x2,0x5 0362 7803 |x | Jump 0x366 0363 00d9 | | Load_Top At_Offset_1 0364 0aff | | Execute_Immediate Plus,-0x1 0365 c405 | | Store 0x2,0x5 0366 00d9 | | Load_Top At_Offset_1 0367 6808 |h | Jump_Zero 0x370 0368 00d9 | | Load_Top At_Offset_1 0369 00db | | Load_Top At_Offset_3 036a 01d5 | | Execute Vector,Field_Reference 036b e22f | / | Load 0x1,0x2f 036c 016e | n | Execute Variant_Record,Not_Equal 036d 7002 |p | Jump_Nonzero 0x370 036e 00c9 | | Action Pop_Auxiliary_Loop 036f 7fed | | Jump 0x35d 0370 00ce | | Action Pop_Auxiliary 0371 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0372 0000 0000 | | .BLANK 0000[0x6] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 0387 | | .CONST 0x0387 ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0004 | | .CONST 0x0004 ; Number of locals 037b INIT_0378: 037b e22d | - | Load 0x1,0x2d 037c 00db | | Load_Top At_Offset_3 037d 8217 | | Call 0x1,0x17 037e 0039 | 9 | Store_Top Access,At_Offset_1 037f 00db | | Load_Top At_Offset_3 0380 8218 | | Call 0x1,0x18 0381 00e3 | | Load_Encached Natural_Cache 0382 03f1 | | Declare_Variable Discrete,With_Value 0383 e008 | | Load 0x0,0x8 0384 02ff | | Declare_Variable Variant_Record 0385 00d8 | | Load_Top At_Offset_0 0386 1c00 | | Execute_Immediate Run_Utility,0x0 0387 BODY_0378: 0387 00d8 | | Load_Top At_Offset_0 0388 8015 | | Call 0x0,0x15 0389 00d1 | | Pop_Control Pop_Count_1 038a e5fe | | Load 0x2,-0x2 038b 01db | | Execute Vector,Length 038c e22e | . | Load 0x1,0x2e 038d 1c08 | | Execute_Immediate Run_Utility,0x8 038e e5fe | | Load 0x2,-0x2 038f 00d9 | | Load_Top At_Offset_1 0390 00d8 | | Load_Top At_Offset_0 0391 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0392 00da | | Load_Top At_Offset_2 0393 01da | | Execute Vector,Bounds 0394 00da | | Load_Top At_Offset_2 0395 01da | | Execute Vector,Bounds 0396 00da | | Load_Top At_Offset_2 0397 027f | | Execute Discrete,Equal 0398 7001 |p | Jump_Nonzero 0x39a 0399 08e0 | | Execute_Immediate Raise,0xe0 039a 00cd | | Action Spare6_Action 039b 027f | | Execute Discrete,Equal 039c 7001 |p | Jump_Nonzero 0x39e 039d 08e0 | | Execute_Immediate Raise,0xe0 039e 00d2 | | Pop_Control Pop_Count_2 039f 00d9 | | Load_Top At_Offset_1 03a0 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 03a1 00d9 | | Load_Top At_Offset_1 03a2 00d9 | | Load_Top At_Offset_1 03a3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 03a4 00da | | Load_Top At_Offset_2 03a5 e402 | | Load 0x2,0x2 03a6 0227 | ' | Execute Access,All_Reference 03a7 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 03a8 01d6 | | Execute Vector,Field_Write 03a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03aa 0000 0000 | | .BLANK 0000[0x6] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03bf | | .CONST 0x03bf ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0004 | | .CONST 0x0004 ; Number of locals 03b3 INIT_03b0: 03b3 e22d | - | Load 0x1,0x2d 03b4 00db | | Load_Top At_Offset_3 03b5 8217 | | Call 0x1,0x17 03b6 0039 | 9 | Store_Top Access,At_Offset_1 03b7 00db | | Load_Top At_Offset_3 03b8 8218 | | Call 0x1,0x18 03b9 00e3 | | Load_Encached Natural_Cache 03ba 03f1 | | Declare_Variable Discrete,With_Value 03bb e008 | | Load 0x0,0x8 03bc 02ff | | Declare_Variable Variant_Record 03bd 00d8 | | Load_Top At_Offset_0 03be 1c00 | | Execute_Immediate Run_Utility,0x0 03bf BODY_03b0: 03bf 00d8 | | Load_Top At_Offset_0 03c0 8015 | | Call 0x0,0x15 03c1 00d1 | | Pop_Control Pop_Count_1 03c2 e5fd | | Load 0x2,-0x3 03c3 e5fe | | Load 0x2,-0x2 03c4 00db | | Load_Top At_Offset_3 03c5 e402 | | Load 0x2,0x2 03c6 0227 | ' | Execute Access,All_Reference 03c7 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 03c8 01d5 | | Execute Vector,Field_Reference 03c9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 03ca 01d6 | | Execute Vector,Field_Write 03cb 00d8 | | Load_Top At_Offset_0 03cc 00da | | Load_Top At_Offset_2 03cd e402 | | Load 0x2,0x2 03ce 0227 | ' | Execute Access,All_Reference 03cf 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 03d0 01d5 | | Execute Vector,Field_Reference 03d1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 03d2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03d3 0000 0000 | | .BLANK 0000[0x5] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03e3 | | .CONST 0x03e3 ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0003 | | .CONST 0x0003 ; Number of locals 03db INIT_03d8: 03db 00da | | Load_Top At_Offset_2 03dc 8218 | | Call 0x1,0x18 03dd 00e3 | | Load_Encached Natural_Cache 03de 03f1 | | Declare_Variable Discrete,With_Value 03df e22d | - | Load 0x1,0x2d 03e0 e5ff | | Load 0x2,-0x1 03e1 8217 | | Call 0x1,0x17 03e2 0039 | 9 | Store_Top Access,At_Offset_1 03e3 BODY_03d8: 03e3 00d8 | | Load_Top At_Offset_0 03e4 00da | | Load_Top At_Offset_2 03e5 8234 | 4 | Call 0x1,0x34 03e6 6809 |h | Jump_Zero 0x3f0 03e7 e5fe | | Load 0x2,-0x2 03e8 00da | | Load_Top At_Offset_2 03e9 00da | | Load_Top At_Offset_2 03ea 0227 | ' | Execute Access,All_Reference 03eb 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 03ec 01d5 | | Execute Vector,Field_Reference 03ed 00da | | Load_Top At_Offset_2 03ee 8238 | 8 | Call 0x1,0x38 03ef 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03f0 e5fe | | Load 0x2,-0x2 03f1 0092 066f | o| Action Push_String_Extended,0x66f ; "null_object" 03f3 8017 | | Call 0x0,0x17 03f4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03f5 0000 0000 | | .XXX[0x3] 03f7 0000 | | 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 03fb | | .CONST 0x03fb ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0001 | | .CONST 0x0001 ; Number of locals 03fb BODY_03f8: 03fb INIT_03f8: 03fb 00db | | Load_Top At_Offset_3 03fc 0092 0670 | p| Action Push_String_Extended,0x670 ; "Collection'(" 03fe 8017 | | Call 0x0,0x17 03ff 00db | | Load_Top At_Offset_3 0400 8018 | | Call 0x0,0x18 0401 00da | | Load_Top At_Offset_2 0402 01db | | Execute Vector,Length 0403 680d |h | Jump_Zero 0x411 0404 00cf | | Action Mark_Auxiliary 0405 00db | | Load_Top At_Offset_3 0406 01d9 | | Execute Vector,Reverse_Bounds 0407 0263 | c | Execute Discrete,Above_Bound 0408 7007 |p | Jump_Nonzero 0x410 0409 e5fe | | Load 0x2,-0x2 040a 00d9 | | Load_Top At_Offset_1 040b e5ff | | Load 0x2,-0x1 040c 01d5 | | Execute Vector,Field_Reference 040d 8227 | ' | Call 0x1,0x27 040e 00c8 | | Action Pop_Auxiliary_Range 040f 3ff9 |? | Loop_Increasing 0x409 0410 00ce | | Action Pop_Auxiliary 0411 00db | | Load_Top At_Offset_3 0412 8019 | | Call 0x0,0x19 0413 4801 |H | Short_Literal 0x1 0414 e5fe | | Load 0x2,-0x2 0415 801a | | Call 0x0,0x1a 0416 00db | | Load_Top At_Offset_3 0417 0092 0671 | q| Action Push_String_Extended,0x671 ; ")" 0419 8017 | | Call 0x0,0x17 041a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 041b 0000 0000 | | .BLANK 0000[0x5] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0433 | 3 | .CONST 0x0433 ; Address of begin 0421 0004 | | .CONST 0x0004 ; Address of exception handler 0422 0004 | | .CONST 0x0004 ; Number of locals 0423 INIT_0420: 0423 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0424 00c6 | | Action Check_Subprogram_Elaborated 0425 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0426 0093 0000 | | push_full_address 0x0 0428 601b |` | Indirect_Literal Discrete,0x444,{0x80000000, 0x00010000} 0429 0273 | s | Execute Discrete,Plus 042a e007 | | Load 0x0,0x7 042b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 042c 6013 |` | Indirect_Literal Discrete,0x440,{0x00000000, 0x0000ffff} 042d 0279 | y | Execute Discrete,And 042e 0273 | s | Execute Discrete,Plus 042f e01b | | Load 0x0,0x1b 0430 0273 | s | Execute Discrete,Plus 0431 4804 |H | Short_Literal 0x4 0432 0007 | | Action Break_Optional 0433 BODY_0420: 0433 e5fe | | Load 0x2,-0x2 0434 e5ff | | Load 0x2,-0x1 0435 4802 |H | Short_Literal 0x2 0436 4802 |H | Short_Literal 0x2 0437 0099 | | Action Reference_Dynamic 0438 4803 |H | Short_Literal 0x3 0439 4802 |H | Short_Literal 0x2 043a 0099 | | Action Reference_Dynamic 043b 822a | * | Call 0x1,0x2a 043c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 043d 0000 0000 | | .XXX[0x3] 043f 0000 | | 0440 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 0444 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b e5fd | | Load 0x2,-0x3 044c e22d | - | Load 0x1,0x2d 044d 022e | . | Execute Access,Not_Equal 044e 6845 |hE | Jump_Zero 0x494 044f e5fc | | Load 0x2,-0x4 0450 0092 0672 | r| Action Push_String_Extended,0x672 ; "Class'(" 0452 8017 | | Call 0x0,0x17 0453 e5fc | | Load 0x2,-0x4 0454 8018 | | Call 0x0,0x18 0455 e5fc | | Load 0x2,-0x4 0456 0092 0673 | s| Action Push_String_Extended,0x673 ; "Kind => " 0458 e5fd | | Load 0x2,-0x3 0459 0227 | ' | Execute Access,All_Reference 045a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 045b e00b | | Load 0x0,0xb 045c 1c04 | | Execute_Immediate Run_Utility,0x4 045d e00b | | Load 0x0,0xb 045e 0122 | " | Execute Any,Make_Root_Type 045f 011c | | Execute Any,Convert_Unchecked 0460 1c01 | | Execute_Immediate Run_Utility,0x1 0461 01cc | | Execute Vector,Catenate 0462 8017 | | Call 0x0,0x17 0463 e5fc | | Load 0x2,-0x4 0464 0092 0674 | t| Action Push_String_Extended,0x674 ; "Size => " 0466 e5fd | | Load 0x2,-0x3 0467 0227 | ' | Execute Access,All_Reference 0468 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 0469 00e0 | | Load_Encached Standard_Cache 046a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 046b 01cc | | Execute Vector,Catenate 046c 8017 | | Call 0x0,0x17 046d e5fc | | Load 0x2,-0x4 046e 0092 0675 | u| Action Push_String_Extended,0x675 ; "Instances => Collection'(" 0470 8017 | | Call 0x0,0x17 0471 e5fc | | Load 0x2,-0x4 0472 8018 | | Call 0x0,0x18 0473 00cf | | Action Mark_Auxiliary 0474 e5fd | | Load 0x2,-0x3 0475 821b | | Call 0x1,0x1b 0476 4801 |H | Short_Literal 0x1 0477 0263 | c | Execute Discrete,Above_Bound 0478 700e |p | Jump_Nonzero 0x487 0479 e5fc | | Load 0x2,-0x4 047a 00d9 | | Load_Top At_Offset_1 047b 801c | | Call 0x0,0x1c 047c e5fc | | Load 0x2,-0x4 047d 0092 0676 | v| Action Push_String_Extended,0x676 ; " => " 047f 801d | | Call 0x0,0x1d 0480 e5fc | | Load 0x2,-0x4 0481 e5fd | | Load 0x2,-0x3 0482 00da | | Load_Top At_Offset_2 0483 8215 | | Call 0x1,0x15 0484 85fe | | Call 0x2,-0x2 0485 00c8 | | Action Pop_Auxiliary_Range 0486 3ff2 |? | Loop_Increasing 0x479 0487 00ce | | Action Pop_Auxiliary 0488 e5fc | | Load 0x2,-0x4 0489 8019 | | Call 0x0,0x19 048a e5fc | | Load 0x2,-0x4 048b 0092 0671 | q| Action Push_String_Extended,0x671 ; ")" 048d 8017 | | Call 0x0,0x17 048e e5fc | | Load 0x2,-0x4 048f 8019 | | Call 0x0,0x19 0490 e5fc | | Load 0x2,-0x4 0491 0092 0671 | q| Action Push_String_Extended,0x671 ; ")" 0493 8017 | | Call 0x0,0x17 0494 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0495 0000 0000 | | .XXX[0x3] 0497 0000 | | 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 0004 | | .CONST 0x0004 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b BODY_0498: 049b INIT_0498: 049b INIT_0498: 049b 4609 |F | Jump_Case 0xa 049c 7809 |x | Jump 0x4a6 ; case 0x0 049d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 049e 782d |x- | Jump 0x4cc ; case 0x2 049f 7830 |x0 | Jump 0x4d0 ; case 0x3 04a0 7835 |x5 | Jump 0x4d6 ; case 0x4 04a1 783c |x< | Jump 0x4de ; case 0x5 04a2 7858 |xX | Jump 0x4fb ; case 0x6 04a3 7844 |xD | Jump 0x4e8 ; case 0x7 04a4 784c |xL | Jump 0x4f1 ; case 0x8 04a5 7855 |xU | Jump 0x4fb ; case 0x9 04a6 4800 |H | Short_Literal 0x0 04a7 00db | | Load_Top At_Offset_3 04a8 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 04a9 00da | | Load_Top At_Offset_2 04aa 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 04ab 0335 | 5 | Declare_Variable Array,Duplicate 04ac 00cd | | Action Spare6_Action 04ad 00db | | Load_Top At_Offset_3 04ae 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 04af 01d9 | | Execute Vector,Reverse_Bounds 04b0 0263 | c | Execute Discrete,Above_Bound 04b1 7005 |p | Jump_Nonzero 0x4b7 04b2 e22f | / | Load 0x1,0x2f 04b3 00d9 | | Load_Top At_Offset_1 04b4 e402 | | Load 0x2,0x2 04b5 01d6 | | Execute Vector,Field_Write 04b6 3ffb |? | Loop_Increasing 0x4b2 04b7 00db | | Load_Top At_Offset_3 04b8 00d8 | | Load_Top At_Offset_0 04b9 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 04ba 00da | | Load_Top At_Offset_2 04bb 01da | | Execute Vector,Bounds 04bc 00da | | Load_Top At_Offset_2 04bd 01da | | Execute Vector,Bounds 04be 00da | | Load_Top At_Offset_2 04bf 027f | | Execute Discrete,Equal 04c0 7001 |p | Jump_Nonzero 0x4c2 04c1 08e0 | | Execute_Immediate Raise,0xe0 04c2 00cd | | Action Spare6_Action 04c3 027f | | Execute Discrete,Equal 04c4 7001 |p | Jump_Nonzero 0x4c6 04c5 08e0 | | Execute_Immediate Raise,0xe0 04c6 00d1 | | Pop_Control Pop_Count_1 04c7 2905 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5 04c8 00da | | Load_Top At_Offset_2 04c9 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4 04ca 1c00 | | Execute_Immediate Run_Utility,0x0 04cb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04cc 4801 |H | Short_Literal 0x1 04cd 4805 |H | Short_Literal 0x5 04ce 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 04cf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 04d0 e5fd | | Load 0x2,-0x3 04d1 00db | | Load_Top At_Offset_3 04d2 1c07 | | Execute_Immediate Run_Utility,0x7 04d3 e5fe | | Load 0x2,-0x2 04d4 0306 | | Complete_Type Variant_Record,By_Renaming 04d5 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 04d6 4801 |H | Short_Literal 0x1 04d7 4805 |H | Short_Literal 0x5 04d8 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 04d9 e5fe | | Load 0x2,-0x2 04da e5ff | | Load 0x2,-0x1 04db 00da | | Load_Top At_Offset_2 04dc 0305 | | Complete_Type Variant_Record,By_Constraining_Incomplete 04dd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04de 4801 |H | Short_Literal 0x1 04df 4801 |H | Short_Literal 0x1 04e0 e5ff | | Load 0x2,-0x1 04e1 0169 | i | Execute Variant_Record,Read_Discriminant_Constraint 04e2 e230 | 0 | Load 0x1,0x30 04e3 035b | [ | Declare_Type Array,Constrained 04e4 4801 |H | Short_Literal 0x1 04e5 e5ff | | Load 0x2,-0x1 04e6 0304 | | Complete_Type Variant_Record,By_Completing_Constraint 04e7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04e8 00db | | Load_Top At_Offset_3 04e9 4801 |H | Short_Literal 0x1 04ea e5fe | | Load 0x2,-0x2 04eb e230 | 0 | Load 0x1,0x30 04ec 035b | [ | Declare_Type Array,Constrained 04ed 4801 |H | Short_Literal 0x1 04ee e5ff | | Load 0x2,-0x1 04ef 031b | | Declare_Type Variant_Record,Constrained 04f0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04f1 00db | | Load_Top At_Offset_3 04f2 00db | | Load_Top At_Offset_3 04f3 02fc | | Declare_Variable Variant_Record,With_Constraint 04f4 4801 |H | Short_Literal 0x1 04f5 e5fe | | Load 0x2,-0x2 04f6 e230 | 0 | Load 0x1,0x30 04f7 0334 | 4 | Declare_Variable Array,With_Constraint 04f8 2d05 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x5 04f9 016a | j | QQ_execute Variant_Record,XXX 04fa 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04fb 0869 | i | Execute_Immediate Raise,0x69 04fc 0000 0000 | | .BLANK 0000[0x4] 0500 ; -------------------------------------------------------------------------------------- 0500 ; SUBPROGRAM 0500 ; -------------------------------------------------------------------------------------- 0500 0503 | | .CONST 0x0503 ; Address of begin 0501 0004 | | .CONST 0x0004 ; Address of exception handler 0502 0001 | | .CONST 0x0001 ; Number of locals 0503 BODY_0500: 0503 INIT_0500: 0503 4609 |F | Jump_Case 0xa 0504 7809 |x | Jump 0x50e ; case 0x0 0505 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0506 781a |x | Jump 0x521 ; case 0x2 0507 781d |x | Jump 0x525 ; case 0x3 0508 7839 |x9 | Jump 0x542 ; case 0x4 0509 7838 |x8 | Jump 0x542 ; case 0x5 050a 7837 |x7 | Jump 0x542 ; case 0x6 050b 781f |x | Jump 0x52b ; case 0x7 050c 7827 |x' | Jump 0x534 ; case 0x8 050d 7830 |x0 | Jump 0x53e ; case 0x9 050e 00da | | Load_Top At_Offset_2 050f 016c | l | Execute Variant_Record,Is_Constrained 0510 7009 |p | Jump_Nonzero 0x51a 0511 00cf | | Action Mark_Auxiliary 0512 4800 |H | Short_Literal 0x0 0513 e5ff | | Load 0x2,-0x1 0514 1c08 | | Execute_Immediate Run_Utility,0x8 0515 00d8 | | Load_Top At_Offset_0 0516 1c00 | | Execute_Immediate Run_Utility,0x0 0517 c5ff | | Store 0x2,-0x1 0518 00ce | | Action Pop_Auxiliary 0519 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 051a 00da | | Load_Top At_Offset_2 051b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 051c 1c00 | | Execute_Immediate Run_Utility,0x0 051d 00da | | Load_Top At_Offset_2 051e 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2 051f 1c00 | | Execute_Immediate Run_Utility,0x0 0520 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0521 4801 |H | Short_Literal 0x1 0522 4803 |H | Short_Literal 0x3 0523 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 0524 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0525 e5fd | | Load 0x2,-0x3 0526 00db | | Load_Top At_Offset_3 0527 1c07 | | Execute_Immediate Run_Utility,0x7 0528 e5fe | | Load 0x2,-0x2 0529 0306 | | Complete_Type Variant_Record,By_Renaming 052a 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 052b 00db | | Load_Top At_Offset_3 052c 4801 |H | Short_Literal 0x1 052d e5fe | | Load 0x2,-0x2 052e e212 | | Load 0x1,0x12 052f 035b | [ | Declare_Type Array,Constrained 0530 4801 |H | Short_Literal 0x1 0531 e5ff | | Load 0x2,-0x1 0532 031b | | Declare_Type Variant_Record,Constrained 0533 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0534 00db | | Load_Top At_Offset_3 0535 00db | | Load_Top At_Offset_3 0536 02fc | | Declare_Variable Variant_Record,With_Constraint 0537 4801 |H | Short_Literal 0x1 0538 e5fe | | Load 0x2,-0x2 0539 e212 | | Load 0x1,0x12 053a 0334 | 4 | Declare_Variable Array,With_Constraint 053b 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 053c 016a | j | QQ_execute Variant_Record,XXX 053d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 053e 4800 |H | Short_Literal 0x0 053f 00db | | Load_Top At_Offset_3 0540 1c07 | | Execute_Immediate Run_Utility,0x7 0541 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0542 0869 | i | Execute_Immediate Raise,0x69 0543 0000 0000 | | .BLANK 0000[0x5] 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 00d1 | | Pop_Control Pop_Count_1 054c 00da | | Load_Top At_Offset_2 054d 01d8 | | Execute Vector,Element_Type 054e 02ff | | Declare_Variable Variant_Record 054f 00d8 | | Load_Top At_Offset_0 0550 1c00 | | Execute_Immediate Run_Utility,0x0 0551 00db | | Load_Top At_Offset_3 0552 01dc | | Execute Vector,Last 0553 e5ff | | Load 0x2,-0x1 0554 01dd | | Execute Vector,First 0555 0263 | c | Execute Discrete,Above_Bound 0556 7006 |p | Jump_Nonzero 0x55d 0557 00da | | Load_Top At_Offset_2 0558 00d9 | | Load_Top At_Offset_1 0559 e5ff | | Load 0x2,-0x1 055a 01d6 | | Execute Vector,Field_Write 055b 0a01 | | Execute_Immediate Plus,0x1 055c 7ff8 | | Jump 0x555 055d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 055e 0000 0000 | | .XXX[0x2] 0560 ; -------------------------------------------------------------------------------------- 0560 ; SUBPROGRAM 0560 ; -------------------------------------------------------------------------------------- 0560 0563 | c | .CONST 0x0563 ; Address of begin 0561 0004 | | .CONST 0x0004 ; Address of exception handler 0562 0001 | | .CONST 0x0001 ; Number of locals 0563 BODY_0560: 0563 INIT_0560: 0563 4609 |F | Jump_Case 0xa 0564 7809 |x | Jump 0x56e ; case 0x0 0565 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0566 7813 |x | Jump 0x57a ; case 0x2 0567 7816 |x | Jump 0x57e ; case 0x3 0568 7832 |x2 | Jump 0x59b ; case 0x4 0569 7831 |x1 | Jump 0x59b ; case 0x5 056a 7830 |x0 | Jump 0x59b ; case 0x6 056b 7818 |x | Jump 0x584 ; case 0x7 056c 7820 |x | Jump 0x58d ; case 0x8 056d 7829 |x) | Jump 0x597 ; case 0x9 056e 00da | | Load_Top At_Offset_2 056f 016c | l | Execute Variant_Record,Is_Constrained 0570 7008 |p | Jump_Nonzero 0x579 0571 00cf | | Action Mark_Auxiliary 0572 4800 |H | Short_Literal 0x0 0573 e5ff | | Load 0x2,-0x1 0574 1c08 | | Execute_Immediate Run_Utility,0x8 0575 00d8 | | Load_Top At_Offset_0 0576 1c00 | | Execute_Immediate Run_Utility,0x0 0577 c5ff | | Store 0x2,-0x1 0578 00ce | | Action Pop_Auxiliary 0579 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 057a 4801 |H | Short_Literal 0x1 057b 4802 |H | Short_Literal 0x2 057c 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 057d 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 057e e5fd | | Load 0x2,-0x3 057f 00db | | Load_Top At_Offset_3 0580 1c07 | | Execute_Immediate Run_Utility,0x7 0581 e5fe | | Load 0x2,-0x2 0582 0306 | | Complete_Type Variant_Record,By_Renaming 0583 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 0584 00db | | Load_Top At_Offset_3 0585 4801 |H | Short_Literal 0x1 0586 e5fe | | Load 0x2,-0x2 0587 e213 | | Load 0x1,0x13 0588 035b | [ | Declare_Type Array,Constrained 0589 4801 |H | Short_Literal 0x1 058a e5ff | | Load 0x2,-0x1 058b 031b | | Declare_Type Variant_Record,Constrained 058c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 058d 00db | | Load_Top At_Offset_3 058e 00db | | Load_Top At_Offset_3 058f 02fc | | Declare_Variable Variant_Record,With_Constraint 0590 4801 |H | Short_Literal 0x1 0591 e5fe | | Load 0x2,-0x2 0592 e213 | | Load 0x1,0x13 0593 0334 | 4 | Declare_Variable Array,With_Constraint 0594 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2 0595 016a | j | QQ_execute Variant_Record,XXX 0596 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0597 4800 |H | Short_Literal 0x0 0598 00db | | Load_Top At_Offset_3 0599 1c07 | | Execute_Immediate Run_Utility,0x7 059a 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 059b 0869 | i | Execute_Immediate Raise,0x69 059c 0000 0000 | | .BLANK 0000[0x4] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 00da | | Load_Top At_Offset_2 05a4 821a | | Call 0x1,0x1a 05a5 e00b | | Load 0x0,0xb 05a6 1c04 | | Execute_Immediate Run_Utility,0x4 05a7 00d8 | | Load_Top At_Offset_0 05a8 00e3 | | Load_Encached Natural_Cache 05a9 0260 | ` | Execute Discrete,In_Type 05aa 7001 |p | Jump_Nonzero 0x5ac 05ab 0801 | | Execute_Immediate Raise,0x1 05ac 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05ad 0000 0000 | | .XXX[0x3] 05af 0000 | | 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b3 | | .CONST 0x05b3 ; Address of begin 05b1 0004 | | .CONST 0x0004 ; Address of exception handler 05b2 0001 | | .CONST 0x0001 ; Number of locals 05b3 BODY_05b0: 05b3 INIT_05b0: 05b3 00da | | Load_Top At_Offset_2 05b4 e00b | | Load 0x0,0xb 05b5 1c05 | | Execute_Immediate Run_Utility,0x5 05b6 00d8 | | Load_Top At_Offset_0 05b7 e00b | | Load 0x0,0xb 05b8 0122 | " | Execute Any,Make_Root_Type 05b9 0260 | ` | Execute Discrete,In_Type 05ba 7001 |p | Jump_Nonzero 0x5bc 05bb 0801 | | Execute_Immediate Raise,0x1 05bc 00d8 | | Load_Top At_Offset_0 05bd e00b | | Load 0x0,0xb 05be 0260 | ` | Execute Discrete,In_Type 05bf 7001 |p | Jump_Nonzero 0x5c1 05c0 0801 | | Execute_Immediate Raise,0x1 05c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05c2 0000 0000 | | .BLANK 0000[0x6] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cb | | .CONST 0x05cb ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0001 | | .CONST 0x0001 ; Number of locals 05cb BODY_05c8: 05cb INIT_05c8: 05cb 00db | | Load_Top At_Offset_3 05cc e22d | - | Load 0x1,0x2d 05cd 022e | . | Execute Access,Not_Equal 05ce 680a |h | Jump_Zero 0x5d9 05cf 00da | | Load_Top At_Offset_2 05d0 6806 |h | Jump_Zero 0x5d7 05d1 00da | | Load_Top At_Offset_2 05d2 e5fe | | Load 0x2,-0x2 05d3 0227 | ' | Execute Access,All_Reference 05d4 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 05d5 027a | z | Execute Discrete,Less_Equal 05d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05d7 4800 |H | Short_Literal 0x0 05d8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05d9 4800 |H | Short_Literal 0x0 05da 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05db 0000 0000 | | .BLANK 0000[0x5] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05e3 | | .CONST 0x05e3 ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 0001 | | .CONST 0x0001 ; Number of locals 05e3 BODY_05e0: 05e3 INIT_05e0: 05e3 00cf | | Action Mark_Auxiliary 05e4 00db | | Load_Top At_Offset_3 05e5 01d9 | | Execute Vector,Reverse_Bounds 05e6 0263 | c | Execute Discrete,Above_Bound 05e7 700c |p | Jump_Nonzero 0x5f4 05e8 00d8 | | Load_Top At_Offset_0 05e9 e5fe | | Load 0x2,-0x2 05ea 01d7 | | Execute Vector,Field_Read 05eb 00d9 | | Load_Top At_Offset_1 05ec e5ff | | Load 0x2,-0x1 05ed 01d5 | | Execute Vector,Field_Reference 05ee 801e | | Call 0x0,0x1e 05ef 7002 |p | Jump_Nonzero 0x5f2 05f0 4800 |H | Short_Literal 0x0 05f1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f2 00c8 | | Action Pop_Auxiliary_Range 05f3 3ff4 |? | Loop_Increasing 0x5e8 05f4 00ce | | Action Pop_Auxiliary 05f5 4801 |H | Short_Literal 0x1 05f6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f7 0000 | | .XXX[0x1] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05ff | | .CONST 0x05ff ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0002 | | .CONST 0x0002 ; Number of locals 05fb INIT_05f8: 05fb e003 | | Load 0x0,0x3 05fc 0322 | " | Declare_Variable Record 05fd 00d8 | | Load_Top At_Offset_0 05fe 1c00 | | Execute_Immediate Run_Utility,0x0 05ff BODY_05f8: 05ff 00db | | Load_Top At_Offset_3 0600 800c | | Call 0x0,0xc 0601 6808 |h | Jump_Zero 0x60a 0602 00db | | Load_Top At_Offset_3 0603 8216 | | Call 0x1,0x16 0604 00d9 | | Load_Top At_Offset_1 0605 017d | } | Execute Record,Structure_Write 0606 e5fe | | Load 0x2,-0x2 0607 00d9 | | Load_Top At_Offset_1 0608 8227 | ' | Call 0x1,0x27 0609 4503 |E | Exit_Suprogram New_Top_Offset 0x3 060a e5fe | | Load 0x2,-0x2 060b e5ff | | Load 0x2,-0x1 060c 801f | | Call 0x0,0x1f 060d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 060e 0000 0000 | | .XXX[0x2] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0615 | | .CONST 0x0615 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0002 | | .CONST 0x0002 ; Number of locals 0613 INIT_0610: 0613 00e1 | | Load_Encached Boolean_Cache 0614 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0615 BODY_0610: 0615 00cf | | Action Mark_Auxiliary 0616 e5ff | | Load 0x2,-0x1 0617 01d9 | | Execute Vector,Reverse_Bounds 0618 0263 | c | Execute Discrete,Above_Bound 0619 7019 |p | Jump_Nonzero 0x633 061a 00db | | Load_Top At_Offset_3 061b 6803 |h | Jump_Zero 0x61f 061c 4800 |H | Short_Literal 0x0 061d a402 | | Store_Unchecked 0x2,0x2 061e 7804 |x | Jump 0x623 061f e5fd | | Load 0x2,-0x3 0620 0092 0677 | w| Action Push_String_Extended,0x677 ; "," 0622 8017 | | Call 0x0,0x17 0623 e5fd | | Load 0x2,-0x3 0624 00d9 | | Load_Top At_Offset_1 0625 e5fe | | Load 0x2,-0x2 0626 01d7 | | Execute Vector,Field_Read 0627 8013 | | Call 0x0,0x13 0628 0092 0676 | v| Action Push_String_Extended,0x676 ; " => " 062a 01cc | | Execute Vector,Catenate 062b 801d | | Call 0x0,0x1d 062c e5fd | | Load 0x2,-0x3 062d 00d9 | | Load_Top At_Offset_1 062e e5ff | | Load 0x2,-0x1 062f 01d5 | | Execute Vector,Field_Reference 0630 8236 | 6 | Call 0x1,0x36 0631 00c8 | | Action Pop_Auxiliary_Range 0632 3fe7 |? | Loop_Increasing 0x61a 0633 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0634 0000 0000 | | .BLANK 0000[0x4] 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 e22f | / | Load 0x1,0x2f 063d 016e | n | Execute Variant_Record,Not_Equal 063e 682b |h+ | Jump_Zero 0x66a 063f e5fd | | Load 0x2,-0x3 0640 00db | | Load_Top At_Offset_3 0641 0227 | ' | Execute Access,All_Reference 0642 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0643 e00b | | Load 0x0,0xb 0644 1c04 | | Execute_Immediate Run_Utility,0x4 0645 e00b | | Load 0x0,0xb 0646 0122 | " | Execute Any,Make_Root_Type 0647 011c | | Execute Any,Convert_Unchecked 0648 1c01 | | Execute_Immediate Run_Utility,0x1 0649 0092 0678 | x| Action Push_String_Extended,0x678 ; "'(" 064b 01cc | | Execute Vector,Catenate 064c 8017 | | Call 0x0,0x17 064d e5fd | | Load 0x2,-0x3 064e 8018 | | Call 0x0,0x18 064f e5fd | | Load 0x2,-0x3 0650 0092 0679 | y| Action Push_String_Extended,0x679 ; "DATE =>" 0652 801d | | Call 0x0,0x1d 0653 e5fd | | Load 0x2,-0x3 0654 e5fe | | Load 0x2,-0x2 0655 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2 0656 8020 | | Call 0x0,0x20 0657 e5fd | | Load 0x2,-0x3 0658 0092 0677 | w| Action Push_String_Extended,0x677 ; "," 065a 8017 | | Call 0x0,0x17 065b e5fd | | Load 0x2,-0x3 065c 00db | | Load_Top At_Offset_3 065d 0227 | ' | Execute Access,All_Reference 065e 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4 065f 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 0660 e5fe | | Load 0x2,-0x2 0661 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0662 8237 | 7 | Call 0x1,0x37 0663 e5fd | | Load 0x2,-0x3 0664 8019 | | Call 0x0,0x19 0665 e5fd | | Load 0x2,-0x3 0666 0092 0671 | q| Action Push_String_Extended,0x671 ; ")" 0668 8017 | | Call 0x0,0x17 0669 4504 |E | Exit_Suprogram New_Top_Offset 0x4 066a e5fd | | Load 0x2,-0x3 066b 0092 067a | z| Action Push_String_Extended,0x67a ; "FREE" 066d 8017 | | Call 0x0,0x17 066e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 066f ; -------------------------------------------------------------------------------------- 066f ; STRING TABLE 066f ; -------------------------------------------------------------------------------------- 066f 001a | | .STRTAB 0x001a->0x067c ; "null_object" 0670 0023 | # | .STRTAB 0x0023->0x0681 ; "Collection'(" 0671 002d | - | .STRTAB 0x002d->0x0687 ; ")" 0672 002c | , | .STRTAB 0x002c->0x0688 ; "Class'(" 0673 0031 | 1 | .STRTAB 0x0031->0x068b ; "Kind => " 0674 003c | < | .STRTAB 0x003c->0x0692 ; "Size => " 0675 0047 | G | .STRTAB 0x0047->0x0698 ; "Instances => Collection'(" 0676 005e | ^ | .STRTAB 0x005e->0x06a5 ; " => " 0677 0060 | ` | .STRTAB 0x0060->0x06a7 ; "," 0678 005f | _ | .STRTAB 0x005f->0x06a7 ; "'(" 0679 005f | _ | .STRTAB 0x005f->0x06a8 ; "DATE =>" 067a 0064 | d | .STRTAB 0x0064->0x06ac ; "FREE" 067b 0066 | f | .STREND 0x0066->0x06ae 067c 6e75 6c6c |null| .STRTAB_STRINGS 06ae 0000 0000 | | .XXX[0x2] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; Debug Table 06b0 ; -------------------------------------------------------------------------------------- 06b0 0004 0008 | | .DEBUG4 0x0004,0x0008,0xf117,0x0000,0x0001,0x0027 06b6 000b 0752 | R| .DBG4T 0x000b,0x0752,0x0000,0x0000 06ba 007b 077c | { || .DBG4T 0x007b,0x077c,0x0000,0x0000 06be 0123 0000 | # | .DBG4T 0x0123,0x0000,0x0005,0x0000 06c2 014b 07a2 | K | .DBG4T 0x014b,0x07a2,0x0002,0x0000 06c6 015b 0000 | [ | .DBG4T 0x015b,0x0000,0x0005,0x0000 06ca 0173 07a5 | s | .DBG4T 0x0173,0x07a5,0x0002,0x0000 06ce 01ab 07b2 | | .DBG4T 0x01ab,0x07b2,0x0002,0x0000 06d2 01b3 07b5 | | .DBG4T 0x01b3,0x07b5,0x0002,0x0000 06d6 01bb 07b8 | | .DBG4T 0x01bb,0x07b8,0x0002,0x0000 06da 01cb 07bb | | .DBG4T 0x01cb,0x07bb,0x0002,0x0000 06de 01d3 07be | | .DBG4T 0x01d3,0x07be,0x0002,0x0000 06e2 01e3 07c1 | | .DBG4T 0x01e3,0x07c1,0x0002,0x0000 06e6 01fb 07c6 | | .DBG4T 0x01fb,0x07c6,0x0002,0x0000 06ea 0203 07c9 | | .DBG4T 0x0203,0x07c9,0x0002,0x0000 06ee 024b 07cc | K | .DBG4T 0x024b,0x07cc,0x0001,0x0000 06f2 026b 07d0 | k | .DBG4T 0x026b,0x07d0,0x0002,0x0000 06f6 027b 07d5 | { | .DBG4T 0x027b,0x07d5,0x0002,0x0000 06fa 0293 07d9 | | .DBG4T 0x0293,0x07d9,0x0002,0x0000 06fe 02ab 07de | | .DBG4T 0x02ab,0x07de,0x0002,0x0000 0702 02c3 07e3 | | .DBG4T 0x02c3,0x07e3,0x0002,0x0000 0706 02e3 07ea | | .DBG4T 0x02e3,0x07ea,0x0001,0x0000 070a 0343 07fd | C | .DBG4T 0x0343,0x07fd,0x0001,0x0000 070e 037b 080a | { | .DBG4T 0x037b,0x080a,0x0001,0x0000 0712 03b3 0811 | | .DBG4T 0x03b3,0x0811,0x0001,0x0000 0716 03db 0819 | | .DBG4T 0x03db,0x0819,0x0001,0x0000 071a 03fb 0820 | | .DBG4T 0x03fb,0x0820,0x0001,0x0000 071e 0423 082a | # *| .DBG4T 0x0423,0x082a,0x0001,0x0000 0722 044b 082e | K .| .DBG4T 0x044b,0x082e,0x2801,0x0002 0726 049b 0000 | | .DBG4T 0x049b,0x0000,0x0005,0x0000 072a 0503 0000 | | .DBG4T 0x0503,0x0000,0x0005,0x0000 072e 054b 0000 | K | .DBG4T 0x054b,0x0000,0x0005,0x0000 0732 0563 0000 | c | .DBG4T 0x0563,0x0000,0x0005,0x0000 0736 05a3 083f | ?| .DBG4T 0x05a3,0x083f,0x0002,0x0000 073a 05b3 0842 | B| .DBG4T 0x05b3,0x0842,0x0002,0x0000 073e 05cb 0845 | E| .DBG4T 0x05cb,0x0845,0x0002,0x0000 0742 05e3 0848 | H| .DBG4T 0x05e3,0x0848,0x0002,0x0000 0746 05fb 084e | N| .DBG4T 0x05fb,0x084e,0x0001,0x0000 074a 0613 0855 | U| .DBG4T 0x0613,0x0855,0x0001,0x0000 074e 063b 085e | ; ^| .DBG4T 0x063b,0x085e,0x0001,0x0000 0752 ; -------------------------------------------------------------------------------------- 0752 ; Debug chain 0752 ; -------------------------------------------------------------------------------------- 0752 0028 0000 | ( | .DBGLEN 0x0028,0x0000 0754 000b 000c | | .DBGLNO 0x000b,0x000c,0x000d,0x000e,0x000f,0x0016,0x0018,0x0019,0x001d,0x0021,0x0028,0x002e,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x0067,0x0068,0x0073,0x0077 077c ; -------------------------------------------------------------------------------------- 077c ; Debug chain 077c ; -------------------------------------------------------------------------------------- 077c 0024 0000 | $ | .DBGLEN 0x0024,0x0000 077e 007b 008e | { | .DBGLNO 0x007b,0x008e,0x00b4,0x00bb,0x00cd,0x00dd,0x00df,0x00e1,0x00e3,0x00e5,0x00e7,0x00e9,0x00eb,0x00ed,0x00ef,0x00f1,0x00f3,0x00f5,0x00f7,0x00f9,0x00fb,0x00fd,0x00ff,0x0101,0x0103,0x0105,0x0107,0x0109,0x010b,0x010d,0x010f,0x0111,0x0113,0x0115,0x0117,0x0119 07a2 ; -------------------------------------------------------------------------------------- 07a2 ; Debug chain 07a2 ; -------------------------------------------------------------------------------------- 07a2 0000 0001 | | .DBGLEN 0x0000,0x0001 07a4 014b | K | .DBGLNO 0x014b 07a5 ; -------------------------------------------------------------------------------------- 07a5 ; Debug chain 07a5 ; -------------------------------------------------------------------------------------- 07a5 0002 0009 | | .DBGLEN 0x0002,0x0009 07a7 0173 0176 | s v| .DBGLNO 0x0173,0x0176,0x0179,0x0180,0x0184,0x0189,0x0191,0x0193,0x019b,0x01a0,0x01a2 07b2 ; -------------------------------------------------------------------------------------- 07b2 ; Debug chain 07b2 ; -------------------------------------------------------------------------------------- 07b2 0000 0001 | | .DBGLEN 0x0000,0x0001 07b4 01ab | | .DBGLNO 0x01ab 07b5 ; -------------------------------------------------------------------------------------- 07b5 ; Debug chain 07b5 ; -------------------------------------------------------------------------------------- 07b5 0000 0001 | | .DBGLEN 0x0000,0x0001 07b7 01b3 | | .DBGLNO 0x01b3 07b8 ; -------------------------------------------------------------------------------------- 07b8 ; Debug chain 07b8 ; -------------------------------------------------------------------------------------- 07b8 0000 0001 | | .DBGLEN 0x0000,0x0001 07ba 01bb | | .DBGLNO 0x01bb 07bb ; -------------------------------------------------------------------------------------- 07bb ; Debug chain 07bb ; -------------------------------------------------------------------------------------- 07bb 0000 0001 | | .DBGLEN 0x0000,0x0001 07bd 01cb | | .DBGLNO 0x01cb 07be ; -------------------------------------------------------------------------------------- 07be ; Debug chain 07be ; -------------------------------------------------------------------------------------- 07be 0000 0001 | | .DBGLEN 0x0000,0x0001 07c0 01d3 | | .DBGLNO 0x01d3 07c1 ; -------------------------------------------------------------------------------------- 07c1 ; Debug chain 07c1 ; -------------------------------------------------------------------------------------- 07c1 0000 0003 | | .DBGLEN 0x0000,0x0003 07c3 01e3 01e7 | | .DBGLNO 0x01e3,0x01e7,0x01f0 07c6 ; -------------------------------------------------------------------------------------- 07c6 ; Debug chain 07c6 ; -------------------------------------------------------------------------------------- 07c6 0000 0001 | | .DBGLEN 0x0000,0x0001 07c8 01fb | | .DBGLNO 0x01fb 07c9 ; -------------------------------------------------------------------------------------- 07c9 ; Debug chain 07c9 ; -------------------------------------------------------------------------------------- 07c9 0000 0001 | | .DBGLEN 0x0000,0x0001 07cb 0203 | | .DBGLNO 0x0203 07cc ; -------------------------------------------------------------------------------------- 07cc ; Debug chain 07cc ; -------------------------------------------------------------------------------------- 07cc 0000 0002 | | .DBGLEN 0x0000,0x0002 07ce 024b 024f | K O| .DBGLNO 0x024b,0x024f 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; Debug chain 07d0 ; -------------------------------------------------------------------------------------- 07d0 0001 0002 | | .DBGLEN 0x0001,0x0002 07d2 026b 026d | k m| .DBGLNO 0x026b,0x026d,0x0274 07d5 ; -------------------------------------------------------------------------------------- 07d5 ; Debug chain 07d5 ; -------------------------------------------------------------------------------------- 07d5 0001 0001 | | .DBGLEN 0x0001,0x0001 07d7 027b 027f | { | .DBGLNO 0x027b,0x027f 07d9 ; -------------------------------------------------------------------------------------- 07d9 ; Debug chain 07d9 ; -------------------------------------------------------------------------------------- 07d9 0002 0001 | | .DBGLEN 0x0002,0x0001 07db 0293 0297 | | .DBGLNO 0x0293,0x0297,0x029b 07de ; -------------------------------------------------------------------------------------- 07de ; Debug chain 07de ; -------------------------------------------------------------------------------------- 07de 0002 0001 | | .DBGLEN 0x0002,0x0001 07e0 02ab 02af | | .DBGLNO 0x02ab,0x02af,0x02b3 07e3 ; -------------------------------------------------------------------------------------- 07e3 ; Debug chain 07e3 ; -------------------------------------------------------------------------------------- 07e3 0002 0003 | | .DBGLEN 0x0002,0x0003 07e5 02c3 02c7 | | .DBGLNO 0x02c3,0x02c7,0x02cb,0x02cf,0x02d1 07ea ; -------------------------------------------------------------------------------------- 07ea ; Debug chain 07ea ; -------------------------------------------------------------------------------------- 07ea 0006 000b | | .DBGLEN 0x0006,0x000b 07ec 02e3 02e7 | | .DBGLNO 0x02e3,0x02e7,0x02eb,0x02f1,0x02f2,0x02f6,0x02fa,0x02fe,0x0302,0x0308,0x0325,0x0327,0x032b,0x032d,0x0332,0x0336,0x033a 07fd ; -------------------------------------------------------------------------------------- 07fd ; Debug chain 07fd ; -------------------------------------------------------------------------------------- 07fd 0004 0007 | | .DBGLEN 0x0004,0x0007 07ff 0343 0347 | C G| .DBGLNO 0x0343,0x0347,0x034b,0x034f,0x0353,0x0357,0x035c,0x035d,0x0360,0x0363,0x0366 080a ; -------------------------------------------------------------------------------------- 080a ; Debug chain 080a ; -------------------------------------------------------------------------------------- 080a 0003 0002 | | .DBGLEN 0x0003,0x0002 080c 037b 037f | { | .DBGLNO 0x037b,0x037f,0x0383,0x0387,0x038a 0811 ; -------------------------------------------------------------------------------------- 0811 ; Debug chain 0811 ; -------------------------------------------------------------------------------------- 0811 0003 0003 | | .DBGLEN 0x0003,0x0003 0813 03b3 03b7 | | .DBGLNO 0x03b3,0x03b7,0x03bb,0x03bf,0x03c2,0x03cb 0819 ; -------------------------------------------------------------------------------------- 0819 ; Debug chain 0819 ; -------------------------------------------------------------------------------------- 0819 0002 0003 | | .DBGLEN 0x0002,0x0003 081b 03db 03df | | .DBGLNO 0x03db,0x03df,0x03e3,0x03e7,0x03f0 0820 ; -------------------------------------------------------------------------------------- 0820 ; Debug chain 0820 ; -------------------------------------------------------------------------------------- 0820 0000 0008 | | .DBGLEN 0x0000,0x0008 0822 03fb 03ff | | .DBGLNO 0x03fb,0x03ff,0x0401,0x0405,0x0409,0x0411,0x0413,0x0416 082a ; -------------------------------------------------------------------------------------- 082a ; Debug chain 082a ; -------------------------------------------------------------------------------------- 082a 0001 0001 | | .DBGLEN 0x0001,0x0001 082c 0423 0433 | # 3| .DBGLNO 0x0423,0x0433 082e ; -------------------------------------------------------------------------------------- 082e ; Debug chain 082e ; -------------------------------------------------------------------------------------- 082e 0000 000f | | .DBGLEN 0x0000,0x000f 0830 044b 044f | K O| .DBGLNO 0x044b,0x044f,0x0453,0x0455,0x0463,0x046d,0x0471,0x0474,0x0479,0x047c,0x0480,0x0488,0x048a,0x048e,0x0490 083f ; -------------------------------------------------------------------------------------- 083f ; Debug chain 083f ; -------------------------------------------------------------------------------------- 083f 0000 0001 | | .DBGLEN 0x0000,0x0001 0841 05a3 | | .DBGLNO 0x05a3 0842 ; -------------------------------------------------------------------------------------- 0842 ; Debug chain 0842 ; -------------------------------------------------------------------------------------- 0842 0000 0001 | | .DBGLEN 0x0000,0x0001 0844 05b3 | | .DBGLNO 0x05b3 0845 ; -------------------------------------------------------------------------------------- 0845 ; Debug chain 0845 ; -------------------------------------------------------------------------------------- 0845 0000 0001 | | .DBGLEN 0x0000,0x0001 0847 05cb | | .DBGLNO 0x05cb 0848 ; -------------------------------------------------------------------------------------- 0848 ; Debug chain 0848 ; -------------------------------------------------------------------------------------- 0848 0000 0004 | | .DBGLEN 0x0000,0x0004 084a 05e4 05e8 | | .DBGLNO 0x05e4,0x05e8,0x05f0,0x05f5 084e ; -------------------------------------------------------------------------------------- 084e ; Debug chain 084e ; -------------------------------------------------------------------------------------- 084e 0001 0004 | | .DBGLEN 0x0001,0x0004 0850 05fb 05ff | | .DBGLNO 0x05fb,0x05ff,0x0602,0x0606,0x060a 0855 ; -------------------------------------------------------------------------------------- 0855 ; Debug chain 0855 ; -------------------------------------------------------------------------------------- 0855 0001 0006 | | .DBGLEN 0x0001,0x0006 0857 0613 0616 | | .DBGLNO 0x0613,0x0616,0x061a,0x061c,0x061f,0x0623,0x062c 085e ; -------------------------------------------------------------------------------------- 085e ; Debug chain 085e ; -------------------------------------------------------------------------------------- 085e 0000 000a | | .DBGLEN 0x0000,0x000a 0860 063b 063f | ; ?| .DBGLNO 0x063b,0x063f,0x064d,0x064f,0x0653,0x0657,0x065b,0x0663,0x0665,0x066a 086a 0000 0000 | | .BLANK 0000[0x196]