|
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_ccd4b9
└─⟦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 06c8 | | .CONST 0x06c8 ; 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 04b3 | | Declare_Subprogram INIT_04b0,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 051b | | Declare_Subprogram INIT_0518,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 0563 | c| Declare_Subprogram INIT_0560,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 057b | {| Declare_Subprogram INIT_0578,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 04b3 | | Declare_Subprogram INIT_04b0,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 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call
00df 029d 05cb | | Declare_Subprogram INIT_05c8,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 05e3 | | Declare_Subprogram INIT_05e0,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 05fb | | Declare_Subprogram INIT_05f8,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 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call
010f 029d 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call
0111 029d 0653 | S| Declare_Subprogram INIT_0650,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 0687 | | Action Push_String_Extended,0x687 ; "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 0688 | | Action Push_String_Extended,0x688 ; "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 0689 | | Action Push_String_Extended,0x689 ; ")"
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 044f | O | .CONST 0x044f ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0002 | | .CONST 0x0002 ; Number of locals
044b INIT_0448:
044b e22e | . | Load 0x1,0x2e
044c 02ff | | Declare_Variable Variant_Record
044d 00d8 | | Load_Top At_Offset_0
044e 1c00 | | Execute_Immediate Run_Utility,0x0
044f BODY_0448:
044f e5fd | | Load 0x2,-0x3
0450 e22d | - | Load 0x1,0x2d
0451 022e | . | Execute Access,Not_Equal
0452 6855 |hU | Jump_Zero 0x4a8
0453 e5fc | | Load 0x2,-0x4
0454 0092 068a | | Action Push_String_Extended,0x68a ; "Class'("
0456 8017 | | Call 0x0,0x17
0457 e5fc | | Load 0x2,-0x4
0458 8018 | | Call 0x0,0x18
0459 e5fc | | Load 0x2,-0x4
045a 0092 068b | | Action Push_String_Extended,0x68b ; "Kind => "
045c e5fd | | Load 0x2,-0x3
045d 0227 | ' | Execute Access,All_Reference
045e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
045f e00b | | Load 0x0,0xb
0460 1c04 | | Execute_Immediate Run_Utility,0x4
0461 e00b | | Load 0x0,0xb
0462 0122 | " | Execute Any,Make_Root_Type
0463 011c | | Execute Any,Convert_Unchecked
0464 1c01 | | Execute_Immediate Run_Utility,0x1
0465 01cc | | Execute Vector,Catenate
0466 8017 | | Call 0x0,0x17
0467 e5fc | | Load 0x2,-0x4
0468 0092 068c | | Action Push_String_Extended,0x68c ; "Size => "
046a e5fd | | Load 0x2,-0x3
046b 0227 | ' | Execute Access,All_Reference
046c 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
046d 00e0 | | Load_Encached Standard_Cache
046e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
046f 01cc | | Execute Vector,Catenate
0470 8017 | | Call 0x0,0x17
0471 e5fc | | Load 0x2,-0x4
0472 0092 068d | | Action Push_String_Extended,0x68d ; "Instances => Collection'("
0474 8017 | | Call 0x0,0x17
0475 e5fc | | Load 0x2,-0x4
0476 8018 | | Call 0x0,0x18
0477 00cf | | Action Mark_Auxiliary
0478 e5fd | | Load 0x2,-0x3
0479 821b | | Call 0x1,0x1b
047a 4801 |H | Short_Literal 0x1
047b 0263 | c | Execute Discrete,Above_Bound
047c 701e |p | Jump_Nonzero 0x49b
047d e5fc | | Load 0x2,-0x4
047e 00d9 | | Load_Top At_Offset_1
047f 801c | | Call 0x0,0x1c
0480 e5fc | | Load 0x2,-0x4
0481 0092 068e | | Action Push_String_Extended,0x68e ; " => "
0483 801d | | Call 0x0,0x1d
0484 00d8 | | Load_Top At_Offset_0
0485 e5fd | | Load 0x2,-0x3
0486 0227 | ' | Execute Access,All_Reference
0487 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
0488 01d5 | | Execute Vector,Field_Reference
0489 e402 | | Load 0x2,0x2
048a 016d | m | Execute Variant_Record,Structure_Write
048b 00db | | Load_Top At_Offset_3
048c e22f | / | Load 0x1,0x2f
048d 016e | n | Execute Variant_Record,Not_Equal
048e 6806 |h | Jump_Zero 0x495
048f e5fc | | Load 0x2,-0x4
0490 e5fd | | Load 0x2,-0x3
0491 00da | | Load_Top At_Offset_2
0492 8215 | | Call 0x1,0x15
0493 85fe | | Call 0x2,-0x2
0494 7804 |x | Jump 0x499
0495 e5fc | | Load 0x2,-0x4
0496 0092 068f | | Action Push_String_Extended,0x68f ; "FREE"
0498 8017 | | Call 0x0,0x17
0499 00c8 | | Action Pop_Auxiliary_Range
049a 3fe2 |? | Loop_Increasing 0x47d
049b 00ce | | Action Pop_Auxiliary
049c e5fc | | Load 0x2,-0x4
049d 8019 | | Call 0x0,0x19
049e e5fc | | Load 0x2,-0x4
049f 0092 0689 | | Action Push_String_Extended,0x689 ; ")"
04a1 8017 | | Call 0x0,0x17
04a2 e5fc | | Load 0x2,-0x4
04a3 8019 | | Call 0x0,0x19
04a4 e5fc | | Load 0x2,-0x4
04a5 0092 0689 | | Action Push_String_Extended,0x689 ; ")"
04a7 8017 | | Call 0x0,0x17
04a8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
04a9 0000 0000 | | .BLANK 0000[0x7]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3 | | .CONST 0x04b3 ; Address of begin
04b1 0004 | | .CONST 0x0004 ; Address of exception handler
04b2 0001 | | .CONST 0x0001 ; Number of locals
04b3 BODY_04b0:
04b3 BODY_04b0:
04b3 INIT_04b0:
04b3 INIT_04b0:
04b3 4609 |F | Jump_Case 0xa
04b4 7809 |x | Jump 0x4be ; case 0x0
04b5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
04b6 782d |x- | Jump 0x4e4 ; case 0x2
04b7 7830 |x0 | Jump 0x4e8 ; case 0x3
04b8 7835 |x5 | Jump 0x4ee ; case 0x4
04b9 783c |x< | Jump 0x4f6 ; case 0x5
04ba 7858 |xX | Jump 0x513 ; case 0x6
04bb 7844 |xD | Jump 0x500 ; case 0x7
04bc 784c |xL | Jump 0x509 ; case 0x8
04bd 7855 |xU | Jump 0x513 ; case 0x9
04be 4800 |H | Short_Literal 0x0
04bf 00db | | Load_Top At_Offset_3
04c0 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
04c1 00da | | Load_Top At_Offset_2
04c2 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04c3 0335 | 5 | Declare_Variable Array,Duplicate
04c4 00cd | | Action Spare6_Action
04c5 00db | | Load_Top At_Offset_3
04c6 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04c7 01d9 | | Execute Vector,Reverse_Bounds
04c8 0263 | c | Execute Discrete,Above_Bound
04c9 7005 |p | Jump_Nonzero 0x4cf
04ca e22f | / | Load 0x1,0x2f
04cb 00d9 | | Load_Top At_Offset_1
04cc e402 | | Load 0x2,0x2
04cd 01d6 | | Execute Vector,Field_Write
04ce 3ffb |? | Loop_Increasing 0x4ca
04cf 00db | | Load_Top At_Offset_3
04d0 00d8 | | Load_Top At_Offset_0
04d1 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
04d2 00da | | Load_Top At_Offset_2
04d3 01da | | Execute Vector,Bounds
04d4 00da | | Load_Top At_Offset_2
04d5 01da | | Execute Vector,Bounds
04d6 00da | | Load_Top At_Offset_2
04d7 027f | | Execute Discrete,Equal
04d8 7001 |p | Jump_Nonzero 0x4da
04d9 08e0 | | Execute_Immediate Raise,0xe0
04da 00cd | | Action Spare6_Action
04db 027f | | Execute Discrete,Equal
04dc 7001 |p | Jump_Nonzero 0x4de
04dd 08e0 | | Execute_Immediate Raise,0xe0
04de 00d1 | | Pop_Control Pop_Count_1
04df 2905 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x5
04e0 00da | | Load_Top At_Offset_2
04e1 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
04e2 1c00 | | Execute_Immediate Run_Utility,0x0
04e3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
04e4 4801 |H | Short_Literal 0x1
04e5 4805 |H | Short_Literal 0x5
04e6 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
04e7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
04e8 e5fd | | Load 0x2,-0x3
04e9 00db | | Load_Top At_Offset_3
04ea 1c07 | | Execute_Immediate Run_Utility,0x7
04eb e5fe | | Load 0x2,-0x2
04ec 0306 | | Complete_Type Variant_Record,By_Renaming
04ed 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4
04ee 4801 |H | Short_Literal 0x1
04ef 4805 |H | Short_Literal 0x5
04f0 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
04f1 e5fe | | Load 0x2,-0x2
04f2 e5ff | | Load 0x2,-0x1
04f3 00da | | Load_Top At_Offset_2
04f4 0305 | | Complete_Type Variant_Record,By_Constraining_Incomplete
04f5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04f6 4801 |H | Short_Literal 0x1
04f7 4801 |H | Short_Literal 0x1
04f8 e5ff | | Load 0x2,-0x1
04f9 0169 | i | Execute Variant_Record,Read_Discriminant_Constraint
04fa e230 | 0 | Load 0x1,0x30
04fb 035b | [ | Declare_Type Array,Constrained
04fc 4801 |H | Short_Literal 0x1
04fd e5ff | | Load 0x2,-0x1
04fe 0304 | | Complete_Type Variant_Record,By_Completing_Constraint
04ff 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0500 00db | | Load_Top At_Offset_3
0501 4801 |H | Short_Literal 0x1
0502 e5fe | | Load 0x2,-0x2
0503 e230 | 0 | Load 0x1,0x30
0504 035b | [ | Declare_Type Array,Constrained
0505 4801 |H | Short_Literal 0x1
0506 e5ff | | Load 0x2,-0x1
0507 031b | | Declare_Type Variant_Record,Constrained
0508 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0509 00db | | Load_Top At_Offset_3
050a 00db | | Load_Top At_Offset_3
050b 02fc | | Declare_Variable Variant_Record,With_Constraint
050c 4801 |H | Short_Literal 0x1
050d e5fe | | Load 0x2,-0x2
050e e230 | 0 | Load 0x1,0x30
050f 0334 | 4 | Declare_Variable Array,With_Constraint
0510 2d05 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x5
0511 016a | j | QQ_execute Variant_Record,XXX
0512 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0513 0869 | i | Execute_Immediate Raise,0x69
0514 0000 0000 | | .BLANK 0000[0x4]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b | | .CONST 0x051b ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0001 | | .CONST 0x0001 ; Number of locals
051b BODY_0518:
051b INIT_0518:
051b 4609 |F | Jump_Case 0xa
051c 7809 |x | Jump 0x526 ; case 0x0
051d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
051e 781a |x | Jump 0x539 ; case 0x2
051f 781d |x | Jump 0x53d ; case 0x3
0520 7839 |x9 | Jump 0x55a ; case 0x4
0521 7838 |x8 | Jump 0x55a ; case 0x5
0522 7837 |x7 | Jump 0x55a ; case 0x6
0523 781f |x | Jump 0x543 ; case 0x7
0524 7827 |x' | Jump 0x54c ; case 0x8
0525 7830 |x0 | Jump 0x556 ; case 0x9
0526 00da | | Load_Top At_Offset_2
0527 016c | l | Execute Variant_Record,Is_Constrained
0528 7009 |p | Jump_Nonzero 0x532
0529 00cf | | Action Mark_Auxiliary
052a 4800 |H | Short_Literal 0x0
052b e5ff | | Load 0x2,-0x1
052c 1c08 | | Execute_Immediate Run_Utility,0x8
052d 00d8 | | Load_Top At_Offset_0
052e 1c00 | | Execute_Immediate Run_Utility,0x0
052f c5ff | | Store 0x2,-0x1
0530 00ce | | Action Pop_Auxiliary
0531 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0532 00da | | Load_Top At_Offset_2
0533 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0534 1c00 | | Execute_Immediate Run_Utility,0x0
0535 00da | | Load_Top At_Offset_2
0536 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0537 1c00 | | Execute_Immediate Run_Utility,0x0
0538 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0539 4801 |H | Short_Literal 0x1
053a 4803 |H | Short_Literal 0x3
053b 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
053c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
053d e5fd | | Load 0x2,-0x3
053e 00db | | Load_Top At_Offset_3
053f 1c07 | | Execute_Immediate Run_Utility,0x7
0540 e5fe | | Load 0x2,-0x2
0541 0306 | | Complete_Type Variant_Record,By_Renaming
0542 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4
0543 00db | | Load_Top At_Offset_3
0544 4801 |H | Short_Literal 0x1
0545 e5fe | | Load 0x2,-0x2
0546 e212 | | Load 0x1,0x12
0547 035b | [ | Declare_Type Array,Constrained
0548 4801 |H | Short_Literal 0x1
0549 e5ff | | Load 0x2,-0x1
054a 031b | | Declare_Type Variant_Record,Constrained
054b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
054c 00db | | Load_Top At_Offset_3
054d 00db | | Load_Top At_Offset_3
054e 02fc | | Declare_Variable Variant_Record,With_Constraint
054f 4801 |H | Short_Literal 0x1
0550 e5fe | | Load 0x2,-0x2
0551 e212 | | Load 0x1,0x12
0552 0334 | 4 | Declare_Variable Array,With_Constraint
0553 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0554 016a | j | QQ_execute Variant_Record,XXX
0555 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0556 4800 |H | Short_Literal 0x0
0557 00db | | Load_Top At_Offset_3
0558 1c07 | | Execute_Immediate Run_Utility,0x7
0559 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
055a 0869 | i | Execute_Immediate Raise,0x69
055b 0000 0000 | | .BLANK 0000[0x5]
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 00d1 | | Pop_Control Pop_Count_1
0564 00da | | Load_Top At_Offset_2
0565 01d8 | | Execute Vector,Element_Type
0566 02ff | | Declare_Variable Variant_Record
0567 00d8 | | Load_Top At_Offset_0
0568 1c00 | | Execute_Immediate Run_Utility,0x0
0569 00db | | Load_Top At_Offset_3
056a 01dc | | Execute Vector,Last
056b e5ff | | Load 0x2,-0x1
056c 01dd | | Execute Vector,First
056d 0263 | c | Execute Discrete,Above_Bound
056e 7006 |p | Jump_Nonzero 0x575
056f 00da | | Load_Top At_Offset_2
0570 00d9 | | Load_Top At_Offset_1
0571 e5ff | | Load 0x2,-0x1
0572 01d6 | | Execute Vector,Field_Write
0573 0a01 | | Execute_Immediate Plus,0x1
0574 7ff8 | | Jump 0x56d
0575 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0576 0000 0000 | | .XXX[0x2]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b 4609 |F | Jump_Case 0xa
057c 7809 |x | Jump 0x586 ; case 0x0
057d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
057e 7813 |x | Jump 0x592 ; case 0x2
057f 7816 |x | Jump 0x596 ; case 0x3
0580 7832 |x2 | Jump 0x5b3 ; case 0x4
0581 7831 |x1 | Jump 0x5b3 ; case 0x5
0582 7830 |x0 | Jump 0x5b3 ; case 0x6
0583 7818 |x | Jump 0x59c ; case 0x7
0584 7820 |x | Jump 0x5a5 ; case 0x8
0585 7829 |x) | Jump 0x5af ; case 0x9
0586 00da | | Load_Top At_Offset_2
0587 016c | l | Execute Variant_Record,Is_Constrained
0588 7008 |p | Jump_Nonzero 0x591
0589 00cf | | Action Mark_Auxiliary
058a 4800 |H | Short_Literal 0x0
058b e5ff | | Load 0x2,-0x1
058c 1c08 | | Execute_Immediate Run_Utility,0x8
058d 00d8 | | Load_Top At_Offset_0
058e 1c00 | | Execute_Immediate Run_Utility,0x0
058f c5ff | | Store 0x2,-0x1
0590 00ce | | Action Pop_Auxiliary
0591 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0592 4801 |H | Short_Literal 0x1
0593 4802 |H | Short_Literal 0x2
0594 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
0595 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0596 e5fd | | Load 0x2,-0x3
0597 00db | | Load_Top At_Offset_3
0598 1c07 | | Execute_Immediate Run_Utility,0x7
0599 e5fe | | Load 0x2,-0x2
059a 0306 | | Complete_Type Variant_Record,By_Renaming
059b 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4
059c 00db | | Load_Top At_Offset_3
059d 4801 |H | Short_Literal 0x1
059e e5fe | | Load 0x2,-0x2
059f e213 | | Load 0x1,0x13
05a0 035b | [ | Declare_Type Array,Constrained
05a1 4801 |H | Short_Literal 0x1
05a2 e5ff | | Load 0x2,-0x1
05a3 031b | | Declare_Type Variant_Record,Constrained
05a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
05a5 00db | | Load_Top At_Offset_3
05a6 00db | | Load_Top At_Offset_3
05a7 02fc | | Declare_Variable Variant_Record,With_Constraint
05a8 4801 |H | Short_Literal 0x1
05a9 e5fe | | Load 0x2,-0x2
05aa e213 | | Load 0x1,0x13
05ab 0334 | 4 | Declare_Variable Array,With_Constraint
05ac 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
05ad 016a | j | QQ_execute Variant_Record,XXX
05ae 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
05af 4800 |H | Short_Literal 0x0
05b0 00db | | Load_Top At_Offset_3
05b1 1c07 | | Execute_Immediate Run_Utility,0x7
05b2 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
05b3 0869 | i | Execute_Immediate Raise,0x69
05b4 0000 0000 | | .BLANK 0000[0x4]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb 00da | | Load_Top At_Offset_2
05bc 821a | | Call 0x1,0x1a
05bd e00b | | Load 0x0,0xb
05be 1c04 | | Execute_Immediate Run_Utility,0x4
05bf 00d8 | | Load_Top At_Offset_0
05c0 00e3 | | Load_Encached Natural_Cache
05c1 0260 | ` | Execute Discrete,In_Type
05c2 7001 |p | Jump_Nonzero 0x5c4
05c3 0801 | | Execute_Immediate Raise,0x1
05c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05c5 0000 0000 | | .XXX[0x3]
05c7 0000 | |
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 e00b | | Load 0x0,0xb
05cd 1c05 | | Execute_Immediate Run_Utility,0x5
05ce 00d8 | | Load_Top At_Offset_0
05cf e00b | | Load 0x0,0xb
05d0 0122 | " | Execute Any,Make_Root_Type
05d1 0260 | ` | Execute Discrete,In_Type
05d2 7001 |p | Jump_Nonzero 0x5d4
05d3 0801 | | Execute_Immediate Raise,0x1
05d4 00d8 | | Load_Top At_Offset_0
05d5 e00b | | Load 0x0,0xb
05d6 0260 | ` | Execute Discrete,In_Type
05d7 7001 |p | Jump_Nonzero 0x5d9
05d8 0801 | | Execute_Immediate Raise,0x1
05d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05da 0000 0000 | | .BLANK 0000[0x6]
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 00db | | Load_Top At_Offset_3
05e4 e22d | - | Load 0x1,0x2d
05e5 022e | . | Execute Access,Not_Equal
05e6 680a |h | Jump_Zero 0x5f1
05e7 00da | | Load_Top At_Offset_2
05e8 6806 |h | Jump_Zero 0x5ef
05e9 00da | | Load_Top At_Offset_2
05ea e5fe | | Load 0x2,-0x2
05eb 0227 | ' | Execute Access,All_Reference
05ec 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
05ed 027a | z | Execute Discrete,Less_Equal
05ee 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05ef 4800 |H | Short_Literal 0x0
05f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05f1 4800 |H | Short_Literal 0x0
05f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05f3 0000 0000 | | .BLANK 0000[0x5]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
05fb INIT_05f8:
05fb 00cf | | Action Mark_Auxiliary
05fc 00db | | Load_Top At_Offset_3
05fd 01d9 | | Execute Vector,Reverse_Bounds
05fe 0263 | c | Execute Discrete,Above_Bound
05ff 700c |p | Jump_Nonzero 0x60c
0600 00d8 | | Load_Top At_Offset_0
0601 e5fe | | Load 0x2,-0x2
0602 01d7 | | Execute Vector,Field_Read
0603 00d9 | | Load_Top At_Offset_1
0604 e5ff | | Load 0x2,-0x1
0605 01d5 | | Execute Vector,Field_Reference
0606 801e | | Call 0x0,0x1e
0607 7002 |p | Jump_Nonzero 0x60a
0608 4800 |H | Short_Literal 0x0
0609 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
060a 00c8 | | Action Pop_Auxiliary_Range
060b 3ff4 |? | Loop_Increasing 0x600
060c 00ce | | Action Pop_Auxiliary
060d 4801 |H | Short_Literal 0x1
060e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
060f 0000 | | .XXX[0x1]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0617 | | .CONST 0x0617 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0002 | | .CONST 0x0002 ; Number of locals
0613 INIT_0610:
0613 e003 | | Load 0x0,0x3
0614 0322 | " | Declare_Variable Record
0615 00d8 | | Load_Top At_Offset_0
0616 1c00 | | Execute_Immediate Run_Utility,0x0
0617 BODY_0610:
0617 00db | | Load_Top At_Offset_3
0618 800c | | Call 0x0,0xc
0619 6808 |h | Jump_Zero 0x622
061a 00db | | Load_Top At_Offset_3
061b 8216 | | Call 0x1,0x16
061c 00d9 | | Load_Top At_Offset_1
061d 017d | } | Execute Record,Structure_Write
061e e5fe | | Load 0x2,-0x2
061f 00d9 | | Load_Top At_Offset_1
0620 8227 | ' | Call 0x1,0x27
0621 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0622 e5fe | | Load 0x2,-0x2
0623 e5ff | | Load 0x2,-0x1
0624 801f | | Call 0x0,0x1f
0625 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0626 0000 0000 | | .XXX[0x2]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062d | - | .CONST 0x062d ; Address of begin
0629 0004 | | .CONST 0x0004 ; Address of exception handler
062a 0002 | | .CONST 0x0002 ; Number of locals
062b INIT_0628:
062b 00e1 | | Load_Encached Boolean_Cache
062c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
062d BODY_0628:
062d 00cf | | Action Mark_Auxiliary
062e e5ff | | Load 0x2,-0x1
062f 01d9 | | Execute Vector,Reverse_Bounds
0630 0263 | c | Execute Discrete,Above_Bound
0631 7019 |p | Jump_Nonzero 0x64b
0632 00db | | Load_Top At_Offset_3
0633 6803 |h | Jump_Zero 0x637
0634 4800 |H | Short_Literal 0x0
0635 a402 | | Store_Unchecked 0x2,0x2
0636 7804 |x | Jump 0x63b
0637 e5fd | | Load 0x2,-0x3
0638 0092 0690 | | Action Push_String_Extended,0x690 ; ","
063a 8017 | | Call 0x0,0x17
063b e5fd | | Load 0x2,-0x3
063c 00d9 | | Load_Top At_Offset_1
063d e5fe | | Load 0x2,-0x2
063e 01d7 | | Execute Vector,Field_Read
063f 8013 | | Call 0x0,0x13
0640 0092 068e | | Action Push_String_Extended,0x68e ; " => "
0642 01cc | | Execute Vector,Catenate
0643 801d | | Call 0x0,0x1d
0644 e5fd | | Load 0x2,-0x3
0645 00d9 | | Load_Top At_Offset_1
0646 e5ff | | Load 0x2,-0x1
0647 01d5 | | Execute Vector,Field_Reference
0648 8236 | 6 | Call 0x1,0x36
0649 00c8 | | Action Pop_Auxiliary_Range
064a 3fe7 |? | Loop_Increasing 0x632
064b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
064c 0000 0000 | | .BLANK 0000[0x4]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 00db | | Load_Top At_Offset_3
0654 e22f | / | Load 0x1,0x2f
0655 016e | n | Execute Variant_Record,Not_Equal
0656 682b |h+ | Jump_Zero 0x682
0657 e5fd | | Load 0x2,-0x3
0658 00db | | Load_Top At_Offset_3
0659 0227 | ' | Execute Access,All_Reference
065a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
065b e00b | | Load 0x0,0xb
065c 1c04 | | Execute_Immediate Run_Utility,0x4
065d e00b | | Load 0x0,0xb
065e 0122 | " | Execute Any,Make_Root_Type
065f 011c | | Execute Any,Convert_Unchecked
0660 1c01 | | Execute_Immediate Run_Utility,0x1
0661 0092 0691 | | Action Push_String_Extended,0x691 ; "'("
0663 01cc | | Execute Vector,Catenate
0664 8017 | | Call 0x0,0x17
0665 e5fd | | Load 0x2,-0x3
0666 8018 | | Call 0x0,0x18
0667 e5fd | | Load 0x2,-0x3
0668 0092 0692 | | Action Push_String_Extended,0x692 ; "DATE =>"
066a 801d | | Call 0x0,0x1d
066b e5fd | | Load 0x2,-0x3
066c e5fe | | Load 0x2,-0x2
066d 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
066e 8020 | | Call 0x0,0x20
066f e5fd | | Load 0x2,-0x3
0670 0092 0690 | | Action Push_String_Extended,0x690 ; ","
0672 8017 | | Call 0x0,0x17
0673 e5fd | | Load 0x2,-0x3
0674 00db | | Load_Top At_Offset_3
0675 0227 | ' | Execute Access,All_Reference
0676 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
0677 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0678 e5fe | | Load 0x2,-0x2
0679 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
067a 8237 | 7 | Call 0x1,0x37
067b e5fd | | Load 0x2,-0x3
067c 8019 | | Call 0x0,0x19
067d e5fd | | Load 0x2,-0x3
067e 0092 0689 | | Action Push_String_Extended,0x689 ; ")"
0680 8017 | | Call 0x0,0x17
0681 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0682 e5fd | | Load 0x2,-0x3
0683 0092 068f | | Action Push_String_Extended,0x68f ; "FREE"
0685 8017 | | Call 0x0,0x17
0686 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0687 ; --------------------------------------------------------------------------------------
0687 ; STRING TABLE
0687 ; --------------------------------------------------------------------------------------
0687 001a | | .STRTAB 0x001a->0x0694 ; "null_object"
0688 0023 | # | .STRTAB 0x0023->0x0699 ; "Collection'("
0689 002d | - | .STRTAB 0x002d->0x069f ; ")"
068a 002c | , | .STRTAB 0x002c->0x06a0 ; "Class'("
068b 0031 | 1 | .STRTAB 0x0031->0x06a3 ; "Kind => "
068c 003c | < | .STRTAB 0x003c->0x06aa ; "Size => "
068d 0047 | G | .STRTAB 0x0047->0x06b0 ; "Instances => Collection'("
068e 005e | ^ | .STRTAB 0x005e->0x06bd ; " => "
068f 0060 | ` | .STRTAB 0x0060->0x06bf ; "FREE"
0690 0062 | b | .STRTAB 0x0062->0x06c1 ; ","
0691 0061 | a | .STRTAB 0x0061->0x06c1 ; "'("
0692 0061 | a | .STRTAB 0x0061->0x06c2 ; "DATE =>"
0693 0066 | f | .STREND 0x0066->0x06c6
0694 6e75 6c6c |null| .STRTAB_STRINGS
06c6 0000 0000 | | .XXX[0x2]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; Debug Table
06c8 ; --------------------------------------------------------------------------------------
06c8 0004 0009 | | .DEBUG4 0x0004,0x0009,0x10d9,0x0000,0x0001,0x0027
06ce 000b 076a | j| .DBG4T 0x000b,0x076a,0x0000,0x0000
06d2 007b 0794 | { | .DBG4T 0x007b,0x0794,0x0000,0x0000
06d6 0123 0000 | # | .DBG4T 0x0123,0x0000,0x0005,0x0000
06da 014b 07ba | K | .DBG4T 0x014b,0x07ba,0x0002,0x0000
06de 015b 0000 | [ | .DBG4T 0x015b,0x0000,0x0005,0x0000
06e2 0173 07bd | s | .DBG4T 0x0173,0x07bd,0x0002,0x0000
06e6 01ab 07ca | | .DBG4T 0x01ab,0x07ca,0x0002,0x0000
06ea 01b3 07cd | | .DBG4T 0x01b3,0x07cd,0x0002,0x0000
06ee 01bb 07d0 | | .DBG4T 0x01bb,0x07d0,0x0002,0x0000
06f2 01cb 07d3 | | .DBG4T 0x01cb,0x07d3,0x0002,0x0000
06f6 01d3 07d6 | | .DBG4T 0x01d3,0x07d6,0x0002,0x0000
06fa 01e3 07d9 | | .DBG4T 0x01e3,0x07d9,0x0002,0x0000
06fe 01fb 07de | | .DBG4T 0x01fb,0x07de,0x0002,0x0000
0702 0203 07e1 | | .DBG4T 0x0203,0x07e1,0x0002,0x0000
0706 024b 07e4 | K | .DBG4T 0x024b,0x07e4,0x0001,0x0000
070a 026b 07e8 | k | .DBG4T 0x026b,0x07e8,0x0002,0x0000
070e 027b 07ed | { | .DBG4T 0x027b,0x07ed,0x0002,0x0000
0712 0293 07f1 | | .DBG4T 0x0293,0x07f1,0x0002,0x0000
0716 02ab 07f6 | | .DBG4T 0x02ab,0x07f6,0x0002,0x0000
071a 02c3 07fb | | .DBG4T 0x02c3,0x07fb,0x0002,0x0000
071e 02e3 0802 | | .DBG4T 0x02e3,0x0802,0x0001,0x0000
0722 0343 0815 | C | .DBG4T 0x0343,0x0815,0x0001,0x0000
0726 037b 0822 | { "| .DBG4T 0x037b,0x0822,0x0001,0x0000
072a 03b3 0829 | )| .DBG4T 0x03b3,0x0829,0x0001,0x0000
072e 03db 0831 | 1| .DBG4T 0x03db,0x0831,0x0001,0x0000
0732 03fb 0838 | 8| .DBG4T 0x03fb,0x0838,0x0001,0x0000
0736 0423 0842 | # B| .DBG4T 0x0423,0x0842,0x0001,0x0000
073a 044b 0846 | K F| .DBG4T 0x044b,0x0846,0x2801,0x0002
073e 04b3 0000 | | .DBG4T 0x04b3,0x0000,0x0005,0x0000
0742 051b 0000 | | .DBG4T 0x051b,0x0000,0x0005,0x0000
0746 0563 0000 | c | .DBG4T 0x0563,0x0000,0x0005,0x0000
074a 057b 0000 | { | .DBG4T 0x057b,0x0000,0x0005,0x0000
074e 05bb 085b | [| .DBG4T 0x05bb,0x085b,0x0002,0x0000
0752 05cb 085e | ^| .DBG4T 0x05cb,0x085e,0x0002,0x0000
0756 05e3 0861 | a| .DBG4T 0x05e3,0x0861,0x0002,0x0000
075a 05fb 0864 | d| .DBG4T 0x05fb,0x0864,0x0002,0x0000
075e 0613 086a | j| .DBG4T 0x0613,0x086a,0x0001,0x0000
0762 062b 0871 | + q| .DBG4T 0x062b,0x0871,0x0001,0x0000
0766 0653 087a | S z| .DBG4T 0x0653,0x087a,0x0001,0x0000
076a ; --------------------------------------------------------------------------------------
076a ; Debug chain
076a ; --------------------------------------------------------------------------------------
076a 0028 0000 | ( | .DBGLEN 0x0028,0x0000
076c 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
0794 ; --------------------------------------------------------------------------------------
0794 ; Debug chain
0794 ; --------------------------------------------------------------------------------------
0794 0024 0000 | $ | .DBGLEN 0x0024,0x0000
0796 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
07ba ; --------------------------------------------------------------------------------------
07ba ; Debug chain
07ba ; --------------------------------------------------------------------------------------
07ba 0000 0001 | | .DBGLEN 0x0000,0x0001
07bc 014b | K | .DBGLNO 0x014b
07bd ; --------------------------------------------------------------------------------------
07bd ; Debug chain
07bd ; --------------------------------------------------------------------------------------
07bd 0002 0009 | | .DBGLEN 0x0002,0x0009
07bf 0173 0176 | s v| .DBGLNO 0x0173,0x0176,0x0179,0x0180,0x0184,0x0189,0x0191,0x0193,0x019b,0x01a0,0x01a2
07ca ; --------------------------------------------------------------------------------------
07ca ; Debug chain
07ca ; --------------------------------------------------------------------------------------
07ca 0000 0001 | | .DBGLEN 0x0000,0x0001
07cc 01ab | | .DBGLNO 0x01ab
07cd ; --------------------------------------------------------------------------------------
07cd ; Debug chain
07cd ; --------------------------------------------------------------------------------------
07cd 0000 0001 | | .DBGLEN 0x0000,0x0001
07cf 01b3 | | .DBGLNO 0x01b3
07d0 ; --------------------------------------------------------------------------------------
07d0 ; Debug chain
07d0 ; --------------------------------------------------------------------------------------
07d0 0000 0001 | | .DBGLEN 0x0000,0x0001
07d2 01bb | | .DBGLNO 0x01bb
07d3 ; --------------------------------------------------------------------------------------
07d3 ; Debug chain
07d3 ; --------------------------------------------------------------------------------------
07d3 0000 0001 | | .DBGLEN 0x0000,0x0001
07d5 01cb | | .DBGLNO 0x01cb
07d6 ; --------------------------------------------------------------------------------------
07d6 ; Debug chain
07d6 ; --------------------------------------------------------------------------------------
07d6 0000 0001 | | .DBGLEN 0x0000,0x0001
07d8 01d3 | | .DBGLNO 0x01d3
07d9 ; --------------------------------------------------------------------------------------
07d9 ; Debug chain
07d9 ; --------------------------------------------------------------------------------------
07d9 0000 0003 | | .DBGLEN 0x0000,0x0003
07db 01e3 01e7 | | .DBGLNO 0x01e3,0x01e7,0x01f0
07de ; --------------------------------------------------------------------------------------
07de ; Debug chain
07de ; --------------------------------------------------------------------------------------
07de 0000 0001 | | .DBGLEN 0x0000,0x0001
07e0 01fb | | .DBGLNO 0x01fb
07e1 ; --------------------------------------------------------------------------------------
07e1 ; Debug chain
07e1 ; --------------------------------------------------------------------------------------
07e1 0000 0001 | | .DBGLEN 0x0000,0x0001
07e3 0203 | | .DBGLNO 0x0203
07e4 ; --------------------------------------------------------------------------------------
07e4 ; Debug chain
07e4 ; --------------------------------------------------------------------------------------
07e4 0000 0002 | | .DBGLEN 0x0000,0x0002
07e6 024b 024f | K O| .DBGLNO 0x024b,0x024f
07e8 ; --------------------------------------------------------------------------------------
07e8 ; Debug chain
07e8 ; --------------------------------------------------------------------------------------
07e8 0001 0002 | | .DBGLEN 0x0001,0x0002
07ea 026b 026d | k m| .DBGLNO 0x026b,0x026d,0x0274
07ed ; --------------------------------------------------------------------------------------
07ed ; Debug chain
07ed ; --------------------------------------------------------------------------------------
07ed 0001 0001 | | .DBGLEN 0x0001,0x0001
07ef 027b 027f | { | .DBGLNO 0x027b,0x027f
07f1 ; --------------------------------------------------------------------------------------
07f1 ; Debug chain
07f1 ; --------------------------------------------------------------------------------------
07f1 0002 0001 | | .DBGLEN 0x0002,0x0001
07f3 0293 0297 | | .DBGLNO 0x0293,0x0297,0x029b
07f6 ; --------------------------------------------------------------------------------------
07f6 ; Debug chain
07f6 ; --------------------------------------------------------------------------------------
07f6 0002 0001 | | .DBGLEN 0x0002,0x0001
07f8 02ab 02af | | .DBGLNO 0x02ab,0x02af,0x02b3
07fb ; --------------------------------------------------------------------------------------
07fb ; Debug chain
07fb ; --------------------------------------------------------------------------------------
07fb 0002 0003 | | .DBGLEN 0x0002,0x0003
07fd 02c3 02c7 | | .DBGLNO 0x02c3,0x02c7,0x02cb,0x02cf,0x02d1
0802 ; --------------------------------------------------------------------------------------
0802 ; Debug chain
0802 ; --------------------------------------------------------------------------------------
0802 0006 000b | | .DBGLEN 0x0006,0x000b
0804 02e3 02e7 | | .DBGLNO 0x02e3,0x02e7,0x02eb,0x02f1,0x02f2,0x02f6,0x02fa,0x02fe,0x0302,0x0308,0x0325,0x0327,0x032b,0x032d,0x0332,0x0336,0x033a
0815 ; --------------------------------------------------------------------------------------
0815 ; Debug chain
0815 ; --------------------------------------------------------------------------------------
0815 0004 0007 | | .DBGLEN 0x0004,0x0007
0817 0343 0347 | C G| .DBGLNO 0x0343,0x0347,0x034b,0x034f,0x0353,0x0357,0x035c,0x035d,0x0360,0x0363,0x0366
0822 ; --------------------------------------------------------------------------------------
0822 ; Debug chain
0822 ; --------------------------------------------------------------------------------------
0822 0003 0002 | | .DBGLEN 0x0003,0x0002
0824 037b 037f | { | .DBGLNO 0x037b,0x037f,0x0383,0x0387,0x038a
0829 ; --------------------------------------------------------------------------------------
0829 ; Debug chain
0829 ; --------------------------------------------------------------------------------------
0829 0003 0003 | | .DBGLEN 0x0003,0x0003
082b 03b3 03b7 | | .DBGLNO 0x03b3,0x03b7,0x03bb,0x03bf,0x03c2,0x03cb
0831 ; --------------------------------------------------------------------------------------
0831 ; Debug chain
0831 ; --------------------------------------------------------------------------------------
0831 0002 0003 | | .DBGLEN 0x0002,0x0003
0833 03db 03df | | .DBGLNO 0x03db,0x03df,0x03e3,0x03e7,0x03f0
0838 ; --------------------------------------------------------------------------------------
0838 ; Debug chain
0838 ; --------------------------------------------------------------------------------------
0838 0000 0008 | | .DBGLEN 0x0000,0x0008
083a 03fb 03ff | | .DBGLNO 0x03fb,0x03ff,0x0401,0x0405,0x0409,0x0411,0x0413,0x0416
0842 ; --------------------------------------------------------------------------------------
0842 ; Debug chain
0842 ; --------------------------------------------------------------------------------------
0842 0001 0001 | | .DBGLEN 0x0001,0x0001
0844 0423 0433 | # 3| .DBGLNO 0x0423,0x0433
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug chain
0846 ; --------------------------------------------------------------------------------------
0846 0001 0012 | | .DBGLEN 0x0001,0x0012
0848 044b 044f | K O| .DBGLNO 0x044b,0x044f,0x0453,0x0457,0x0459,0x0467,0x0471,0x0475,0x0478,0x047d,0x0480,0x0484,0x048b,0x048f,0x0495,0x049c,0x049e,0x04a2,0x04a4
085b ; --------------------------------------------------------------------------------------
085b ; Debug chain
085b ; --------------------------------------------------------------------------------------
085b 0000 0001 | | .DBGLEN 0x0000,0x0001
085d 05bb | | .DBGLNO 0x05bb
085e ; --------------------------------------------------------------------------------------
085e ; Debug chain
085e ; --------------------------------------------------------------------------------------
085e 0000 0001 | | .DBGLEN 0x0000,0x0001
0860 05cb | | .DBGLNO 0x05cb
0861 ; --------------------------------------------------------------------------------------
0861 ; Debug chain
0861 ; --------------------------------------------------------------------------------------
0861 0000 0001 | | .DBGLEN 0x0000,0x0001
0863 05e3 | | .DBGLNO 0x05e3
0864 ; --------------------------------------------------------------------------------------
0864 ; Debug chain
0864 ; --------------------------------------------------------------------------------------
0864 0000 0004 | | .DBGLEN 0x0000,0x0004
0866 05fc 0600 | | .DBGLNO 0x05fc,0x0600,0x0608,0x060d
086a ; --------------------------------------------------------------------------------------
086a ; Debug chain
086a ; --------------------------------------------------------------------------------------
086a 0001 0004 | | .DBGLEN 0x0001,0x0004
086c 0613 0617 | | .DBGLNO 0x0613,0x0617,0x061a,0x061e,0x0622
0871 ; --------------------------------------------------------------------------------------
0871 ; Debug chain
0871 ; --------------------------------------------------------------------------------------
0871 0001 0006 | | .DBGLEN 0x0001,0x0006
0873 062b 062e | + .| .DBGLNO 0x062b,0x062e,0x0632,0x0634,0x0637,0x063b,0x0644
087a ; --------------------------------------------------------------------------------------
087a ; Debug chain
087a ; --------------------------------------------------------------------------------------
087a 0000 000a | | .DBGLEN 0x0000,0x000a
087c 0653 0657 | S W| .DBGLNO 0x0653,0x0657,0x0665,0x0667,0x066b,0x066f,0x0673,0x067b,0x067d,0x0682
0886 0000 0000 | | .BLANK 0000[0x17a]