|
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_1c4cec
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 06c0 | | .CONST 0x06c0 ; 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 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated
0059 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated
005b 029a 0473 | s| Declare_Subprogram INIT_0470,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 04c3 | | Declare_Subprogram INIT_04c0,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 052b | +| Declare_Subprogram INIT_0528,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 0573 | s| Declare_Subprogram INIT_0570,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 058b | | Declare_Subprogram INIT_0588,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 04c3 | | Declare_Subprogram INIT_04c0,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 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call
00df 029d 05db | | Declare_Subprogram INIT_05d8,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 05f3 | | Declare_Subprogram INIT_05f0,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 060b | | Declare_Subprogram INIT_0608,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 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call
010f 029d 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call
0111 029d 0663 | c| Declare_Subprogram INIT_0660,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 6815 |h | Jump_Zero 0x370
035b 00d8 | | Load_Top At_Offset_0
035c 0aff | | Execute_Immediate Plus,-0x1
035d c405 | | Store 0x2,0x5
035e 00cf | | Action Mark_Auxiliary
035f 4801 |H | Short_Literal 0x1
0360 00da | | Load_Top At_Offset_2
0361 0264 | d | Execute Discrete,Below_Bound
0362 700c |p | Jump_Nonzero 0x36f
0363 00d8 | | Load_Top At_Offset_0
0364 e404 | | Load 0x2,0x4
0365 01d5 | | Execute Vector,Field_Reference
0366 e22f | / | Load 0x1,0x2f
0367 016e | n | Execute Variant_Record,Not_Equal
0368 6802 |h | Jump_Zero 0x36b
0369 00d2 | | Pop_Control Pop_Count_2
036a 7804 |x | Jump 0x36f
036b 00d8 | | Load_Top At_Offset_0
036c a405 | | Store_Unchecked 0x2,0x5
036d 00c8 | | Action Pop_Auxiliary_Range
036e 37f4 |7 | Loop_Decreasing 0x363
036f 00ce | | Action Pop_Auxiliary
0370 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0371 0000 0000 | | .BLANK 0000[0x7]
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 03e9 | | .CONST 0x03e9 ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0004 | | .CONST 0x0004 ; 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 e008 | | Load 0x0,0x8
03e4 02ff | | Declare_Variable Variant_Record
03e5 e5ff | | Load 0x2,-0x1
03e6 8222 | " | Call 0x1,0x22
03e7 00d9 | | Load_Top At_Offset_1
03e8 016d | m | Execute Variant_Record,Structure_Write
03e9 BODY_03d8:
03e9 00d9 | | Load_Top At_Offset_1
03ea 00db | | Load_Top At_Offset_3
03eb 8234 | 4 | Call 0x1,0x34
03ec 6829 |h) | Jump_Zero 0x416
03ed e5fe | | Load 0x2,-0x2
03ee 00da | | Load_Top At_Offset_2
03ef 0227 | ' | Execute Access,All_Reference
03f0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03f1 e00b | | Load 0x0,0xb
03f2 1c04 | | Execute_Immediate Run_Utility,0x4
03f3 e00b | | Load 0x0,0xb
03f4 0122 | " | Execute Any,Make_Root_Type
03f5 011c | | Execute Any,Convert_Unchecked
03f6 1c01 | | Execute_Immediate Run_Utility,0x1
03f7 0092 0686 | | Action Push_String_Extended,0x686 ; "'("
03f9 01cc | | Execute Vector,Catenate
03fa 8017 | | Call 0x0,0x17
03fb e5fe | | Load 0x2,-0x2
03fc 8018 | | Call 0x0,0x18
03fd e5fe | | Load 0x2,-0x2
03fe 00da | | Load_Top At_Offset_2
03ff 0227 | ' | Execute Access,All_Reference
0400 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
0401 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0402 e402 | | Load 0x2,0x2
0403 e403 | | Load 0x2,0x3
0404 0227 | ' | Execute Access,All_Reference
0405 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
0406 01d5 | | Execute Vector,Field_Reference
0407 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0408 8237 | 7 | Call 0x1,0x37
0409 4801 |H | Short_Literal 0x1
040a e5fe | | Load 0x2,-0x2
040b 8019 | | Call 0x0,0x19
040c e5fe | | Load 0x2,-0x2
040d 00d9 | | Load_Top At_Offset_1
040e 801a | | Call 0x0,0x1a
040f e5fe | | Load 0x2,-0x2
0410 801b | | Call 0x0,0x1b
0411 e5fe | | Load 0x2,-0x2
0412 0092 0687 | | Action Push_String_Extended,0x687 ; ")"
0414 8017 | | Call 0x0,0x17
0415 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0416 e5fe | | Load 0x2,-0x2
0417 0092 0688 | | Action Push_String_Extended,0x688 ; "null_object"
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 0423 | # | .CONST 0x0423 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0001 | | .CONST 0x0001 ; Number of locals
0423 BODY_0420:
0423 INIT_0420:
0423 00db | | Load_Top At_Offset_3
0424 0092 0689 | | Action Push_String_Extended,0x689 ; "Collection'("
0426 8017 | | Call 0x0,0x17
0427 00db | | Load_Top At_Offset_3
0428 8018 | | Call 0x0,0x18
0429 00da | | Load_Top At_Offset_2
042a 01db | | Execute Vector,Length
042b 680d |h | Jump_Zero 0x439
042c 00cf | | Action Mark_Auxiliary
042d 00db | | Load_Top At_Offset_3
042e 01d9 | | Execute Vector,Reverse_Bounds
042f 0263 | c | Execute Discrete,Above_Bound
0430 7007 |p | Jump_Nonzero 0x438
0431 e5fe | | Load 0x2,-0x2
0432 00d9 | | Load_Top At_Offset_1
0433 e5ff | | Load 0x2,-0x1
0434 01d5 | | Execute Vector,Field_Reference
0435 8227 | ' | Call 0x1,0x27
0436 00c8 | | Action Pop_Auxiliary_Range
0437 3ff9 |? | Loop_Increasing 0x431
0438 00ce | | Action Pop_Auxiliary
0439 00db | | Load_Top At_Offset_3
043a 801b | | Call 0x0,0x1b
043b 4801 |H | Short_Literal 0x1
043c e5fe | | Load 0x2,-0x2
043d 8019 | | Call 0x0,0x19
043e 00db | | Load_Top At_Offset_3
043f 0092 0687 | | Action Push_String_Extended,0x687 ; ")"
0441 8017 | | Call 0x0,0x17
0442 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0443 0000 0000 | | .BLANK 0000[0x5]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 045b | [ | .CONST 0x045b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0004 | | .CONST 0x0004 ; Number of locals
044b INIT_0448:
044b 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
044c 00c6 | | Action Check_Subprogram_Elaborated
044d 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
044e 0093 0000 | | push_full_address 0x0
0450 601b |` | Indirect_Literal Discrete,0x46c,{0x80000000, 0x00010000}
0451 0273 | s | Execute Discrete,Plus
0452 e007 | | Load 0x0,0x7
0453 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0454 6013 |` | Indirect_Literal Discrete,0x468,{0x00000000, 0x0000ffff}
0455 0279 | y | Execute Discrete,And
0456 0273 | s | Execute Discrete,Plus
0457 e01c | | Load 0x0,0x1c
0458 0273 | s | Execute Discrete,Plus
0459 4804 |H | Short_Literal 0x4
045a 0007 | | Action Break_Optional
045b BODY_0448:
045b e5fe | | Load 0x2,-0x2
045c e5ff | | Load 0x2,-0x1
045d 4802 |H | Short_Literal 0x2
045e 4802 |H | Short_Literal 0x2
045f 0099 | | Action Reference_Dynamic
0460 4803 |H | Short_Literal 0x3
0461 4802 |H | Short_Literal 0x2
0462 0099 | | Action Reference_Dynamic
0463 822a | * | Call 0x1,0x2a
0464 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0465 0000 0000 | | .XXX[0x3]
0467 0000 | |
0468 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
046c 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473 | s | .CONST 0x0473 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0001 | | .CONST 0x0001 ; Number of locals
0473 BODY_0470:
0473 INIT_0470:
0473 e5fd | | Load 0x2,-0x3
0474 e22d | - | Load 0x1,0x2d
0475 022e | . | Execute Access,Not_Equal
0476 6845 |hE | Jump_Zero 0x4bc
0477 e5fc | | Load 0x2,-0x4
0478 0092 068a | | Action Push_String_Extended,0x68a ; "Class'("
047a 8017 | | Call 0x0,0x17
047b e5fc | | Load 0x2,-0x4
047c 8018 | | Call 0x0,0x18
047d e5fc | | Load 0x2,-0x4
047e 0092 068b | | Action Push_String_Extended,0x68b ; "Kind => "
0480 e5fd | | Load 0x2,-0x3
0481 0227 | ' | Execute Access,All_Reference
0482 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0483 e00b | | Load 0x0,0xb
0484 1c04 | | Execute_Immediate Run_Utility,0x4
0485 e00b | | Load 0x0,0xb
0486 0122 | " | Execute Any,Make_Root_Type
0487 011c | | Execute Any,Convert_Unchecked
0488 1c01 | | Execute_Immediate Run_Utility,0x1
0489 01cc | | Execute Vector,Catenate
048a 8017 | | Call 0x0,0x17
048b e5fc | | Load 0x2,-0x4
048c 0092 068c | | Action Push_String_Extended,0x68c ; "Size => "
048e e5fd | | Load 0x2,-0x3
048f 0227 | ' | Execute Access,All_Reference
0490 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0491 00e0 | | Load_Encached Standard_Cache
0492 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0493 01cc | | Execute Vector,Catenate
0494 8017 | | Call 0x0,0x17
0495 e5fc | | Load 0x2,-0x4
0496 0092 068d | | Action Push_String_Extended,0x68d ; "Instances => Collection'("
0498 8017 | | Call 0x0,0x17
0499 e5fc | | Load 0x2,-0x4
049a 8018 | | Call 0x0,0x18
049b 00cf | | Action Mark_Auxiliary
049c e5fd | | Load 0x2,-0x3
049d 821b | | Call 0x1,0x1b
049e 4801 |H | Short_Literal 0x1
049f 0263 | c | Execute Discrete,Above_Bound
04a0 700e |p | Jump_Nonzero 0x4af
04a1 e5fc | | Load 0x2,-0x4
04a2 00d9 | | Load_Top At_Offset_1
04a3 801d | | Call 0x0,0x1d
04a4 e5fc | | Load 0x2,-0x4
04a5 0092 068e | | Action Push_String_Extended,0x68e ; " => "
04a7 801e | | Call 0x0,0x1e
04a8 e5fc | | Load 0x2,-0x4
04a9 e5fd | | Load 0x2,-0x3
04aa 00da | | Load_Top At_Offset_2
04ab 8215 | | Call 0x1,0x15
04ac 85fe | | Call 0x2,-0x2
04ad 00c8 | | Action Pop_Auxiliary_Range
04ae 3ff2 |? | Loop_Increasing 0x4a1
04af 00ce | | Action Pop_Auxiliary
04b0 e5fc | | Load 0x2,-0x4
04b1 801b | | Call 0x0,0x1b
04b2 e5fc | | Load 0x2,-0x4
04b3 0092 0687 | | Action Push_String_Extended,0x687 ; ")"
04b5 8017 | | Call 0x0,0x17
04b6 e5fc | | Load 0x2,-0x4
04b7 801b | | Call 0x0,0x1b
04b8 e5fc | | Load 0x2,-0x4
04b9 0092 0687 | | Action Push_String_Extended,0x687 ; ")"
04bb 8017 | | Call 0x0,0x17
04bc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
04bd 0000 0000 | | .XXX[0x3]
04bf 0000 | |
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3 | | .CONST 0x04c3 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0001 | | .CONST 0x0001 ; Number of locals
04c3 BODY_04c0:
04c3 BODY_04c0:
04c3 INIT_04c0:
04c3 INIT_04c0:
04c3 4609 |F | Jump_Case 0xa
04c4 7809 |x | Jump 0x4ce ; case 0x0
04c5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
04c6 782d |x- | Jump 0x4f4 ; case 0x2
04c7 7830 |x0 | Jump 0x4f8 ; case 0x3
04c8 7835 |x5 | Jump 0x4fe ; case 0x4
04c9 783c |x< | Jump 0x506 ; case 0x5
04ca 7858 |xX | Jump 0x523 ; case 0x6
04cb 7844 |xD | Jump 0x510 ; case 0x7
04cc 784c |xL | Jump 0x519 ; case 0x8
04cd 7855 |xU | Jump 0x523 ; case 0x9
04ce 4800 |H | Short_Literal 0x0
04cf 00db | | Load_Top At_Offset_3
04d0 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
04d1 00da | | Load_Top At_Offset_2
04d2 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04d3 0335 | 5 | Declare_Variable Array,Duplicate
04d4 00cd | | Action Spare6_Action
04d5 00db | | Load_Top At_Offset_3
04d6 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04d7 01d9 | | Execute Vector,Reverse_Bounds
04d8 0263 | c | Execute Discrete,Above_Bound
04d9 7005 |p | Jump_Nonzero 0x4df
04da e22f | / | Load 0x1,0x2f
04db 00d9 | | Load_Top At_Offset_1
04dc e402 | | Load 0x2,0x2
04dd 01d6 | | Execute Vector,Field_Write
04de 3ffb |? | Loop_Increasing 0x4da
04df 00db | | Load_Top At_Offset_3
04e0 00d8 | | Load_Top At_Offset_0
04e1 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04e2 00da | | Load_Top At_Offset_2
04e3 01da | | Execute Vector,Bounds
04e4 00da | | Load_Top At_Offset_2
04e5 01da | | Execute Vector,Bounds
04e6 00da | | Load_Top At_Offset_2
04e7 027f | | Execute Discrete,Equal
04e8 7001 |p | Jump_Nonzero 0x4ea
04e9 08e0 | | Execute_Immediate Raise,0xe0
04ea 00cd | | Action Spare6_Action
04eb 027f | | Execute Discrete,Equal
04ec 7001 |p | Jump_Nonzero 0x4ee
04ed 08e0 | | Execute_Immediate Raise,0xe0
04ee 00d1 | | Pop_Control Pop_Count_1
04ef 2905 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5
04f0 00da | | Load_Top At_Offset_2
04f1 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
04f2 1c00 | | Execute_Immediate Run_Utility,0x0
04f3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
04f4 4801 |H | Short_Literal 0x1
04f5 4805 |H | Short_Literal 0x5
04f6 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
04f7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
04f8 e5fd | | Load 0x2,-0x3
04f9 00db | | Load_Top At_Offset_3
04fa 1c07 | | Execute_Immediate Run_Utility,0x7
04fb e5fe | | Load 0x2,-0x2
04fc 0306 | | Complete_Type Variant_Record,By_Renaming
04fd 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4
04fe 4801 |H | Short_Literal 0x1
04ff 4805 |H | Short_Literal 0x5
0500 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
0501 e5fe | | Load 0x2,-0x2
0502 e5ff | | Load 0x2,-0x1
0503 00da | | Load_Top At_Offset_2
0504 0305 | | Complete_Type Variant_Record,By_Constraining_Incomplete
0505 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0506 4801 |H | Short_Literal 0x1
0507 4801 |H | Short_Literal 0x1
0508 e5ff | | Load 0x2,-0x1
0509 0169 | i | Execute Variant_Record,Read_Discriminant_Constraint
050a e230 | 0 | Load 0x1,0x30
050b 035b | [ | Declare_Type Array,Constrained
050c 4801 |H | Short_Literal 0x1
050d e5ff | | Load 0x2,-0x1
050e 0304 | | Complete_Type Variant_Record,By_Completing_Constraint
050f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0510 00db | | Load_Top At_Offset_3
0511 4801 |H | Short_Literal 0x1
0512 e5fe | | Load 0x2,-0x2
0513 e230 | 0 | Load 0x1,0x30
0514 035b | [ | Declare_Type Array,Constrained
0515 4801 |H | Short_Literal 0x1
0516 e5ff | | Load 0x2,-0x1
0517 031b | | Declare_Type Variant_Record,Constrained
0518 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0519 00db | | Load_Top At_Offset_3
051a 00db | | Load_Top At_Offset_3
051b 02fc | | Declare_Variable Variant_Record,With_Constraint
051c 4801 |H | Short_Literal 0x1
051d e5fe | | Load 0x2,-0x2
051e e230 | 0 | Load 0x1,0x30
051f 0334 | 4 | Declare_Variable Array,With_Constraint
0520 2d05 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x5
0521 016a | j | QQ_execute Variant_Record,XXX
0522 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0523 0869 | i | Execute_Immediate Raise,0x69
0524 0000 0000 | | .BLANK 0000[0x4]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b | + | .CONST 0x052b ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0001 | | .CONST 0x0001 ; Number of locals
052b BODY_0528:
052b INIT_0528:
052b 4609 |F | Jump_Case 0xa
052c 7809 |x | Jump 0x536 ; case 0x0
052d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
052e 781a |x | Jump 0x549 ; case 0x2
052f 781d |x | Jump 0x54d ; case 0x3
0530 7839 |x9 | Jump 0x56a ; case 0x4
0531 7838 |x8 | Jump 0x56a ; case 0x5
0532 7837 |x7 | Jump 0x56a ; case 0x6
0533 781f |x | Jump 0x553 ; case 0x7
0534 7827 |x' | Jump 0x55c ; case 0x8
0535 7830 |x0 | Jump 0x566 ; case 0x9
0536 00da | | Load_Top At_Offset_2
0537 016c | l | Execute Variant_Record,Is_Constrained
0538 7009 |p | Jump_Nonzero 0x542
0539 00cf | | Action Mark_Auxiliary
053a 4800 |H | Short_Literal 0x0
053b e5ff | | Load 0x2,-0x1
053c 1c08 | | Execute_Immediate Run_Utility,0x8
053d 00d8 | | Load_Top At_Offset_0
053e 1c00 | | Execute_Immediate Run_Utility,0x0
053f c5ff | | Store 0x2,-0x1
0540 00ce | | Action Pop_Auxiliary
0541 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0542 00da | | Load_Top At_Offset_2
0543 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0544 1c00 | | Execute_Immediate Run_Utility,0x0
0545 00da | | Load_Top At_Offset_2
0546 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0547 1c00 | | Execute_Immediate Run_Utility,0x0
0548 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0549 4801 |H | Short_Literal 0x1
054a 4803 |H | Short_Literal 0x3
054b 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
054c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
054d e5fd | | Load 0x2,-0x3
054e 00db | | Load_Top At_Offset_3
054f 1c07 | | Execute_Immediate Run_Utility,0x7
0550 e5fe | | Load 0x2,-0x2
0551 0306 | | Complete_Type Variant_Record,By_Renaming
0552 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4
0553 00db | | Load_Top At_Offset_3
0554 4801 |H | Short_Literal 0x1
0555 e5fe | | Load 0x2,-0x2
0556 e212 | | Load 0x1,0x12
0557 035b | [ | Declare_Type Array,Constrained
0558 4801 |H | Short_Literal 0x1
0559 e5ff | | Load 0x2,-0x1
055a 031b | | Declare_Type Variant_Record,Constrained
055b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
055c 00db | | Load_Top At_Offset_3
055d 00db | | Load_Top At_Offset_3
055e 02fc | | Declare_Variable Variant_Record,With_Constraint
055f 4801 |H | Short_Literal 0x1
0560 e5fe | | Load 0x2,-0x2
0561 e212 | | Load 0x1,0x12
0562 0334 | 4 | Declare_Variable Array,With_Constraint
0563 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0564 016a | j | QQ_execute Variant_Record,XXX
0565 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0566 4800 |H | Short_Literal 0x0
0567 00db | | Load_Top At_Offset_3
0568 1c07 | | Execute_Immediate Run_Utility,0x7
0569 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
056a 0869 | i | Execute_Immediate Raise,0x69
056b 0000 0000 | | .BLANK 0000[0x5]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 00d1 | | Pop_Control Pop_Count_1
0574 00da | | Load_Top At_Offset_2
0575 01d8 | | Execute Vector,Element_Type
0576 02ff | | Declare_Variable Variant_Record
0577 00d8 | | Load_Top At_Offset_0
0578 1c00 | | Execute_Immediate Run_Utility,0x0
0579 00db | | Load_Top At_Offset_3
057a 01dc | | Execute Vector,Last
057b e5ff | | Load 0x2,-0x1
057c 01dd | | Execute Vector,First
057d 0263 | c | Execute Discrete,Above_Bound
057e 7006 |p | Jump_Nonzero 0x585
057f 00da | | Load_Top At_Offset_2
0580 00d9 | | Load_Top At_Offset_1
0581 e5ff | | Load 0x2,-0x1
0582 01d6 | | Execute Vector,Field_Write
0583 0a01 | | Execute_Immediate Plus,0x1
0584 7ff8 | | Jump 0x57d
0585 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
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 4609 |F | Jump_Case 0xa
058c 7809 |x | Jump 0x596 ; case 0x0
058d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
058e 7813 |x | Jump 0x5a2 ; case 0x2
058f 7816 |x | Jump 0x5a6 ; case 0x3
0590 7832 |x2 | Jump 0x5c3 ; case 0x4
0591 7831 |x1 | Jump 0x5c3 ; case 0x5
0592 7830 |x0 | Jump 0x5c3 ; case 0x6
0593 7818 |x | Jump 0x5ac ; case 0x7
0594 7820 |x | Jump 0x5b5 ; case 0x8
0595 7829 |x) | Jump 0x5bf ; case 0x9
0596 00da | | Load_Top At_Offset_2
0597 016c | l | Execute Variant_Record,Is_Constrained
0598 7008 |p | Jump_Nonzero 0x5a1
0599 00cf | | Action Mark_Auxiliary
059a 4800 |H | Short_Literal 0x0
059b e5ff | | Load 0x2,-0x1
059c 1c08 | | Execute_Immediate Run_Utility,0x8
059d 00d8 | | Load_Top At_Offset_0
059e 1c00 | | Execute_Immediate Run_Utility,0x0
059f c5ff | | Store 0x2,-0x1
05a0 00ce | | Action Pop_Auxiliary
05a1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
05a2 4801 |H | Short_Literal 0x1
05a3 4802 |H | Short_Literal 0x2
05a4 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
05a5 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
05a6 e5fd | | Load 0x2,-0x3
05a7 00db | | Load_Top At_Offset_3
05a8 1c07 | | Execute_Immediate Run_Utility,0x7
05a9 e5fe | | Load 0x2,-0x2
05aa 0306 | | Complete_Type Variant_Record,By_Renaming
05ab 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4
05ac 00db | | Load_Top At_Offset_3
05ad 4801 |H | Short_Literal 0x1
05ae e5fe | | Load 0x2,-0x2
05af e213 | | Load 0x1,0x13
05b0 035b | [ | Declare_Type Array,Constrained
05b1 4801 |H | Short_Literal 0x1
05b2 e5ff | | Load 0x2,-0x1
05b3 031b | | Declare_Type Variant_Record,Constrained
05b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
05b5 00db | | Load_Top At_Offset_3
05b6 00db | | Load_Top At_Offset_3
05b7 02fc | | Declare_Variable Variant_Record,With_Constraint
05b8 4801 |H | Short_Literal 0x1
05b9 e5fe | | Load 0x2,-0x2
05ba e213 | | Load 0x1,0x13
05bb 0334 | 4 | Declare_Variable Array,With_Constraint
05bc 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
05bd 016a | j | QQ_execute Variant_Record,XXX
05be 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
05bf 4800 |H | Short_Literal 0x0
05c0 00db | | Load_Top At_Offset_3
05c1 1c07 | | Execute_Immediate Run_Utility,0x7
05c2 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
05c3 0869 | i | Execute_Immediate Raise,0x69
05c4 0000 0000 | | .BLANK 0000[0x4]
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 00da | | Load_Top At_Offset_2
05cc 821a | | Call 0x1,0x1a
05cd e00b | | Load 0x0,0xb
05ce 1c04 | | Execute_Immediate Run_Utility,0x4
05cf 00d8 | | Load_Top At_Offset_0
05d0 00e3 | | Load_Encached Natural_Cache
05d1 0260 | ` | Execute Discrete,In_Type
05d2 7001 |p | Jump_Nonzero 0x5d4
05d3 0801 | | Execute_Immediate Raise,0x1
05d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05d5 0000 0000 | | .XXX[0x3]
05d7 0000 | |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00da | | Load_Top At_Offset_2
05dc e00b | | Load 0x0,0xb
05dd 1c05 | | Execute_Immediate Run_Utility,0x5
05de 00d8 | | Load_Top At_Offset_0
05df e00b | | Load 0x0,0xb
05e0 0122 | " | Execute Any,Make_Root_Type
05e1 0260 | ` | Execute Discrete,In_Type
05e2 7001 |p | Jump_Nonzero 0x5e4
05e3 0801 | | Execute_Immediate Raise,0x1
05e4 00d8 | | Load_Top At_Offset_0
05e5 e00b | | Load 0x0,0xb
05e6 0260 | ` | Execute Discrete,In_Type
05e7 7001 |p | Jump_Nonzero 0x5e9
05e8 0801 | | Execute_Immediate Raise,0x1
05e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ea 0000 0000 | | .BLANK 0000[0x6]
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 00db | | Load_Top At_Offset_3
05f4 e22d | - | Load 0x1,0x2d
05f5 022e | . | Execute Access,Not_Equal
05f6 680a |h | Jump_Zero 0x601
05f7 00da | | Load_Top At_Offset_2
05f8 6806 |h | Jump_Zero 0x5ff
05f9 00da | | Load_Top At_Offset_2
05fa e5fe | | Load 0x2,-0x2
05fb 0227 | ' | Execute Access,All_Reference
05fc 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
05fd 027a | z | Execute Discrete,Less_Equal
05fe 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05ff 4800 |H | Short_Literal 0x0
0600 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0601 4800 |H | Short_Literal 0x0
0602 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0603 0000 0000 | | .BLANK 0000[0x5]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b | | .CONST 0x060b ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0001 | | .CONST 0x0001 ; Number of locals
060b BODY_0608:
060b INIT_0608:
060b 00cf | | Action Mark_Auxiliary
060c 00db | | Load_Top At_Offset_3
060d 01d9 | | Execute Vector,Reverse_Bounds
060e 0263 | c | Execute Discrete,Above_Bound
060f 700c |p | Jump_Nonzero 0x61c
0610 00d8 | | Load_Top At_Offset_0
0611 e5fe | | Load 0x2,-0x2
0612 01d7 | | Execute Vector,Field_Read
0613 00d9 | | Load_Top At_Offset_1
0614 e5ff | | Load 0x2,-0x1
0615 01d5 | | Execute Vector,Field_Reference
0616 801f | | Call 0x0,0x1f
0617 7002 |p | Jump_Nonzero 0x61a
0618 4800 |H | Short_Literal 0x0
0619 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
061a 00c8 | | Action Pop_Auxiliary_Range
061b 3ff4 |? | Loop_Increasing 0x610
061c 00ce | | Action Pop_Auxiliary
061d 4801 |H | Short_Literal 0x1
061e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
061f 0000 | | .XXX[0x1]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0627 | ' | .CONST 0x0627 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0002 | | .CONST 0x0002 ; Number of locals
0623 INIT_0620:
0623 e003 | | Load 0x0,0x3
0624 0322 | " | Declare_Variable Record
0625 00d8 | | Load_Top At_Offset_0
0626 1c00 | | Execute_Immediate Run_Utility,0x0
0627 BODY_0620:
0627 00db | | Load_Top At_Offset_3
0628 800c | | Call 0x0,0xc
0629 6808 |h | Jump_Zero 0x632
062a 00db | | Load_Top At_Offset_3
062b 8216 | | Call 0x1,0x16
062c 00d9 | | Load_Top At_Offset_1
062d 017d | } | Execute Record,Structure_Write
062e e5fe | | Load 0x2,-0x2
062f 00d9 | | Load_Top At_Offset_1
0630 8227 | ' | Call 0x1,0x27
0631 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0632 e5fe | | Load 0x2,-0x2
0633 e5ff | | Load 0x2,-0x1
0634 8020 | | Call 0x0,0x20
0635 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0636 0000 0000 | | .XXX[0x2]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063d | = | .CONST 0x063d ; Address of begin
0639 0004 | | .CONST 0x0004 ; Address of exception handler
063a 0002 | | .CONST 0x0002 ; Number of locals
063b INIT_0638:
063b 00e1 | | Load_Encached Boolean_Cache
063c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
063d BODY_0638:
063d 00cf | | Action Mark_Auxiliary
063e e5ff | | Load 0x2,-0x1
063f 01d9 | | Execute Vector,Reverse_Bounds
0640 0263 | c | Execute Discrete,Above_Bound
0641 7019 |p | Jump_Nonzero 0x65b
0642 00db | | Load_Top At_Offset_3
0643 6803 |h | Jump_Zero 0x647
0644 4800 |H | Short_Literal 0x0
0645 a402 | | Store_Unchecked 0x2,0x2
0646 7804 |x | Jump 0x64b
0647 e5fd | | Load 0x2,-0x3
0648 0092 068f | | Action Push_String_Extended,0x68f ; ","
064a 8017 | | Call 0x0,0x17
064b e5fd | | Load 0x2,-0x3
064c 00d9 | | Load_Top At_Offset_1
064d e5fe | | Load 0x2,-0x2
064e 01d7 | | Execute Vector,Field_Read
064f 8013 | | Call 0x0,0x13
0650 0092 068e | | Action Push_String_Extended,0x68e ; " => "
0652 01cc | | Execute Vector,Catenate
0653 801e | | Call 0x0,0x1e
0654 e5fd | | Load 0x2,-0x3
0655 00d9 | | Load_Top At_Offset_1
0656 e5ff | | Load 0x2,-0x1
0657 01d5 | | Execute Vector,Field_Reference
0658 8236 | 6 | Call 0x1,0x36
0659 00c8 | | Action Pop_Auxiliary_Range
065a 3fe7 |? | Loop_Increasing 0x642
065b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
065c 0000 0000 | | .BLANK 0000[0x4]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663 | c | .CONST 0x0663 ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0001 | | .CONST 0x0001 ; Number of locals
0663 BODY_0660:
0663 INIT_0660:
0663 00db | | Load_Top At_Offset_3
0664 e22f | / | Load 0x1,0x2f
0665 016e | n | Execute Variant_Record,Not_Equal
0666 681e |h | Jump_Zero 0x685
0667 e5fd | | Load 0x2,-0x3
0668 00db | | Load_Top At_Offset_3
0669 0227 | ' | Execute Access,All_Reference
066a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
066b e00b | | Load 0x0,0xb
066c 1c04 | | Execute_Immediate Run_Utility,0x4
066d e00b | | Load 0x0,0xb
066e 0122 | " | Execute Any,Make_Root_Type
066f 011c | | Execute Any,Convert_Unchecked
0670 1c01 | | Execute_Immediate Run_Utility,0x1
0671 0092 0686 | | Action Push_String_Extended,0x686 ; "'("
0673 01cc | | Execute Vector,Catenate
0674 8017 | | Call 0x0,0x17
0675 e5fd | | Load 0x2,-0x3
0676 8018 | | Call 0x0,0x18
0677 e5fd | | Load 0x2,-0x3
0678 00db | | Load_Top At_Offset_3
0679 0227 | ' | Execute Access,All_Reference
067a 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
067b 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
067c e5fe | | Load 0x2,-0x2
067d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
067e 8237 | 7 | Call 0x1,0x37
067f e5fd | | Load 0x2,-0x3
0680 801b | | Call 0x0,0x1b
0681 e5fd | | Load 0x2,-0x3
0682 0092 0687 | | Action Push_String_Extended,0x687 ; ")"
0684 8017 | | Call 0x0,0x17
0685 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0686 ; --------------------------------------------------------------------------------------
0686 ; STRING TABLE
0686 ; --------------------------------------------------------------------------------------
0686 0016 | | .STRTAB 0x0016->0x0691 ; "'("
0687 0016 | | .STRTAB 0x0016->0x0692 ; ")"
0688 0015 | | .STRTAB 0x0015->0x0692 ; "null_object"
0689 001e | | .STRTAB 0x001e->0x0698 ; "Collection'("
068a 0028 | ( | .STRTAB 0x0028->0x069e ; "Class'("
068b 002d | - | .STRTAB 0x002d->0x06a1 ; "Kind => "
068c 0038 | 8 | .STRTAB 0x0038->0x06a8 ; "Size => "
068d 0043 | C | .STRTAB 0x0043->0x06ae ; "Instances => Collection'("
068e 005a | Z | .STRTAB 0x005a->0x06bb ; " => "
068f 005c | \ | .STRTAB 0x005c->0x06bd ; ","
0690 005b | [ | .STREND 0x005b->0x06bd
0691 2728 296e |'()n| .STRTAB_STRINGS
06be 0000 0000 | | .XXX[0x2]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; Debug Table
06c0 ; --------------------------------------------------------------------------------------
06c0 0004 0006 | | .DEBUG4 0x0004,0x0006,0xb32f,0x0000,0x0001,0x0027
06c6 000b 0762 | b| .DBG4T 0x000b,0x0762,0x0000,0x0000
06ca 007b 078c | { | .DBG4T 0x007b,0x078c,0x0000,0x0000
06ce 0123 0000 | # | .DBG4T 0x0123,0x0000,0x0005,0x0000
06d2 014b 07b2 | K | .DBG4T 0x014b,0x07b2,0x0002,0x0000
06d6 015b 0000 | [ | .DBG4T 0x015b,0x0000,0x0005,0x0000
06da 0173 07b5 | s | .DBG4T 0x0173,0x07b5,0x0002,0x0000
06de 01ab 07c2 | | .DBG4T 0x01ab,0x07c2,0x0002,0x0000
06e2 01b3 07c5 | | .DBG4T 0x01b3,0x07c5,0x0002,0x0000
06e6 01bb 07c8 | | .DBG4T 0x01bb,0x07c8,0x0002,0x0000
06ea 01cb 07cb | | .DBG4T 0x01cb,0x07cb,0x0002,0x0000
06ee 01d3 07ce | | .DBG4T 0x01d3,0x07ce,0x0002,0x0000
06f2 01e3 07d1 | | .DBG4T 0x01e3,0x07d1,0x0002,0x0000
06f6 01fb 07d6 | | .DBG4T 0x01fb,0x07d6,0x0002,0x0000
06fa 0203 07d9 | | .DBG4T 0x0203,0x07d9,0x0002,0x0000
06fe 024b 07dc | K | .DBG4T 0x024b,0x07dc,0x0001,0x0000
0702 026b 07e0 | k | .DBG4T 0x026b,0x07e0,0x0002,0x0000
0706 027b 07e5 | { | .DBG4T 0x027b,0x07e5,0x0002,0x0000
070a 0293 07e9 | | .DBG4T 0x0293,0x07e9,0x0002,0x0000
070e 02ab 07ee | | .DBG4T 0x02ab,0x07ee,0x0002,0x0000
0712 02c3 07f3 | | .DBG4T 0x02c3,0x07f3,0x0002,0x0000
0716 02e3 07fa | | .DBG4T 0x02e3,0x07fa,0x0001,0x0000
071a 0343 080d | C | .DBG4T 0x0343,0x080d,0x0001,0x0000
071e 037b 0819 | { | .DBG4T 0x037b,0x0819,0x0001,0x0000
0722 03b3 0820 | | .DBG4T 0x03b3,0x0820,0x0001,0x0000
0726 03db 0828 | (| .DBG4T 0x03db,0x0828,0x0001,0x0000
072a 0423 0836 | # 6| .DBG4T 0x0423,0x0836,0x0001,0x0000
072e 044b 0840 | K @| .DBG4T 0x044b,0x0840,0x0001,0x0000
0732 0473 0844 | s D| .DBG4T 0x0473,0x0844,0x2801,0x0002
0736 04c3 0000 | | .DBG4T 0x04c3,0x0000,0x0005,0x0000
073a 052b 0000 | + | .DBG4T 0x052b,0x0000,0x0005,0x0000
073e 0573 0000 | s | .DBG4T 0x0573,0x0000,0x0005,0x0000
0742 058b 0000 | | .DBG4T 0x058b,0x0000,0x0005,0x0000
0746 05cb 0855 | U| .DBG4T 0x05cb,0x0855,0x0002,0x0000
074a 05db 0858 | X| .DBG4T 0x05db,0x0858,0x0002,0x0000
074e 05f3 085b | [| .DBG4T 0x05f3,0x085b,0x0002,0x0000
0752 060b 085e | ^| .DBG4T 0x060b,0x085e,0x0002,0x0000
0756 0623 0864 | # d| .DBG4T 0x0623,0x0864,0x0001,0x0000
075a 063b 086b | ; k| .DBG4T 0x063b,0x086b,0x0001,0x0000
075e 0663 0874 | c t| .DBG4T 0x0663,0x0874,0x0001,0x0000
0762 ; --------------------------------------------------------------------------------------
0762 ; Debug chain
0762 ; --------------------------------------------------------------------------------------
0762 0028 0000 | ( | .DBGLEN 0x0028,0x0000
0764 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
078c ; --------------------------------------------------------------------------------------
078c ; Debug chain
078c ; --------------------------------------------------------------------------------------
078c 0024 0000 | $ | .DBGLEN 0x0024,0x0000
078e 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
07b2 ; --------------------------------------------------------------------------------------
07b2 ; Debug chain
07b2 ; --------------------------------------------------------------------------------------
07b2 0000 0001 | | .DBGLEN 0x0000,0x0001
07b4 014b | K | .DBGLNO 0x014b
07b5 ; --------------------------------------------------------------------------------------
07b5 ; Debug chain
07b5 ; --------------------------------------------------------------------------------------
07b5 0002 0009 | | .DBGLEN 0x0002,0x0009
07b7 0173 0176 | s v| .DBGLNO 0x0173,0x0176,0x0179,0x0180,0x0184,0x0189,0x0191,0x0193,0x019b,0x01a0,0x01a2
07c2 ; --------------------------------------------------------------------------------------
07c2 ; Debug chain
07c2 ; --------------------------------------------------------------------------------------
07c2 0000 0001 | | .DBGLEN 0x0000,0x0001
07c4 01ab | | .DBGLNO 0x01ab
07c5 ; --------------------------------------------------------------------------------------
07c5 ; Debug chain
07c5 ; --------------------------------------------------------------------------------------
07c5 0000 0001 | | .DBGLEN 0x0000,0x0001
07c7 01b3 | | .DBGLNO 0x01b3
07c8 ; --------------------------------------------------------------------------------------
07c8 ; Debug chain
07c8 ; --------------------------------------------------------------------------------------
07c8 0000 0001 | | .DBGLEN 0x0000,0x0001
07ca 01bb | | .DBGLNO 0x01bb
07cb ; --------------------------------------------------------------------------------------
07cb ; Debug chain
07cb ; --------------------------------------------------------------------------------------
07cb 0000 0001 | | .DBGLEN 0x0000,0x0001
07cd 01cb | | .DBGLNO 0x01cb
07ce ; --------------------------------------------------------------------------------------
07ce ; Debug chain
07ce ; --------------------------------------------------------------------------------------
07ce 0000 0001 | | .DBGLEN 0x0000,0x0001
07d0 01d3 | | .DBGLNO 0x01d3
07d1 ; --------------------------------------------------------------------------------------
07d1 ; Debug chain
07d1 ; --------------------------------------------------------------------------------------
07d1 0000 0003 | | .DBGLEN 0x0000,0x0003
07d3 01e3 01e7 | | .DBGLNO 0x01e3,0x01e7,0x01f0
07d6 ; --------------------------------------------------------------------------------------
07d6 ; Debug chain
07d6 ; --------------------------------------------------------------------------------------
07d6 0000 0001 | | .DBGLEN 0x0000,0x0001
07d8 01fb | | .DBGLNO 0x01fb
07d9 ; --------------------------------------------------------------------------------------
07d9 ; Debug chain
07d9 ; --------------------------------------------------------------------------------------
07d9 0000 0001 | | .DBGLEN 0x0000,0x0001
07db 0203 | | .DBGLNO 0x0203
07dc ; --------------------------------------------------------------------------------------
07dc ; Debug chain
07dc ; --------------------------------------------------------------------------------------
07dc 0000 0002 | | .DBGLEN 0x0000,0x0002
07de 024b 024f | K O| .DBGLNO 0x024b,0x024f
07e0 ; --------------------------------------------------------------------------------------
07e0 ; Debug chain
07e0 ; --------------------------------------------------------------------------------------
07e0 0001 0002 | | .DBGLEN 0x0001,0x0002
07e2 026b 026d | k m| .DBGLNO 0x026b,0x026d,0x0274
07e5 ; --------------------------------------------------------------------------------------
07e5 ; Debug chain
07e5 ; --------------------------------------------------------------------------------------
07e5 0001 0001 | | .DBGLEN 0x0001,0x0001
07e7 027b 027f | { | .DBGLNO 0x027b,0x027f
07e9 ; --------------------------------------------------------------------------------------
07e9 ; Debug chain
07e9 ; --------------------------------------------------------------------------------------
07e9 0002 0001 | | .DBGLEN 0x0002,0x0001
07eb 0293 0297 | | .DBGLNO 0x0293,0x0297,0x029b
07ee ; --------------------------------------------------------------------------------------
07ee ; Debug chain
07ee ; --------------------------------------------------------------------------------------
07ee 0002 0001 | | .DBGLEN 0x0002,0x0001
07f0 02ab 02af | | .DBGLNO 0x02ab,0x02af,0x02b3
07f3 ; --------------------------------------------------------------------------------------
07f3 ; Debug chain
07f3 ; --------------------------------------------------------------------------------------
07f3 0002 0003 | | .DBGLEN 0x0002,0x0003
07f5 02c3 02c7 | | .DBGLNO 0x02c3,0x02c7,0x02cb,0x02cf,0x02d1
07fa ; --------------------------------------------------------------------------------------
07fa ; Debug chain
07fa ; --------------------------------------------------------------------------------------
07fa 0006 000b | | .DBGLEN 0x0006,0x000b
07fc 02e3 02e7 | | .DBGLNO 0x02e3,0x02e7,0x02eb,0x02f1,0x02f2,0x02f6,0x02fa,0x02fe,0x0302,0x0308,0x0325,0x0327,0x032b,0x032d,0x0332,0x0336,0x033a
080d ; --------------------------------------------------------------------------------------
080d ; Debug chain
080d ; --------------------------------------------------------------------------------------
080d 0004 0006 | | .DBGLEN 0x0004,0x0006
080f 0343 0347 | C G| .DBGLNO 0x0343,0x0347,0x034b,0x034f,0x0353,0x0357,0x035b,0x035f,0x0363,0x036b
0819 ; --------------------------------------------------------------------------------------
0819 ; Debug chain
0819 ; --------------------------------------------------------------------------------------
0819 0003 0002 | | .DBGLEN 0x0003,0x0002
081b 037b 037f | { | .DBGLNO 0x037b,0x037f,0x0383,0x0387,0x038a
0820 ; --------------------------------------------------------------------------------------
0820 ; Debug chain
0820 ; --------------------------------------------------------------------------------------
0820 0003 0003 | | .DBGLEN 0x0003,0x0003
0822 03b3 03b7 | | .DBGLNO 0x03b3,0x03b7,0x03bb,0x03bf,0x03c2,0x03cb
0828 ; --------------------------------------------------------------------------------------
0828 ; Debug chain
0828 ; --------------------------------------------------------------------------------------
0828 0003 0009 | | .DBGLEN 0x0003,0x0009
082a 03db 03df | | .DBGLNO 0x03db,0x03df,0x03e3,0x03e9,0x03ed,0x03fb,0x03fd,0x0409,0x040c,0x040f,0x0411,0x0416
0836 ; --------------------------------------------------------------------------------------
0836 ; Debug chain
0836 ; --------------------------------------------------------------------------------------
0836 0000 0008 | | .DBGLEN 0x0000,0x0008
0838 0423 0427 | # '| .DBGLNO 0x0423,0x0427,0x0429,0x042d,0x0431,0x0439,0x043b,0x043e
0840 ; --------------------------------------------------------------------------------------
0840 ; Debug chain
0840 ; --------------------------------------------------------------------------------------
0840 0001 0001 | | .DBGLEN 0x0001,0x0001
0842 044b 045b | K [| .DBGLNO 0x044b,0x045b
0844 ; --------------------------------------------------------------------------------------
0844 ; Debug chain
0844 ; --------------------------------------------------------------------------------------
0844 0000 000f | | .DBGLEN 0x0000,0x000f
0846 0473 0477 | s w| .DBGLNO 0x0473,0x0477,0x047b,0x047d,0x048b,0x0495,0x0499,0x049c,0x04a1,0x04a4,0x04a8,0x04b0,0x04b2,0x04b6,0x04b8
0855 ; --------------------------------------------------------------------------------------
0855 ; Debug chain
0855 ; --------------------------------------------------------------------------------------
0855 0000 0001 | | .DBGLEN 0x0000,0x0001
0857 05cb | | .DBGLNO 0x05cb
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug chain
0858 ; --------------------------------------------------------------------------------------
0858 0000 0001 | | .DBGLEN 0x0000,0x0001
085a 05db | | .DBGLNO 0x05db
085b ; --------------------------------------------------------------------------------------
085b ; Debug chain
085b ; --------------------------------------------------------------------------------------
085b 0000 0001 | | .DBGLEN 0x0000,0x0001
085d 05f3 | | .DBGLNO 0x05f3
085e ; --------------------------------------------------------------------------------------
085e ; Debug chain
085e ; --------------------------------------------------------------------------------------
085e 0000 0004 | | .DBGLEN 0x0000,0x0004
0860 060c 0610 | | .DBGLNO 0x060c,0x0610,0x0618,0x061d
0864 ; --------------------------------------------------------------------------------------
0864 ; Debug chain
0864 ; --------------------------------------------------------------------------------------
0864 0001 0004 | | .DBGLEN 0x0001,0x0004
0866 0623 0627 | # '| .DBGLNO 0x0623,0x0627,0x062a,0x062e,0x0632
086b ; --------------------------------------------------------------------------------------
086b ; Debug chain
086b ; --------------------------------------------------------------------------------------
086b 0001 0006 | | .DBGLEN 0x0001,0x0006
086d 063b 063e | ; >| .DBGLNO 0x063b,0x063e,0x0642,0x0644,0x0647,0x064b,0x0654
0874 ; --------------------------------------------------------------------------------------
0874 ; Debug chain
0874 ; --------------------------------------------------------------------------------------
0874 0000 0006 | | .DBGLEN 0x0000,0x0006
0876 0663 0667 | c g| .DBGLNO 0x0663,0x0667,0x0675,0x0677,0x067f,0x0681
087c 0000 0000 | | .BLANK 0000[0x184]