|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_11cacfe
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0358 | X | .CONST 0x0358 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 008c | | .CONST 0x008c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0027 | ' | .CONST 0x0027 ; Number of locals 000b INIT_0008: 000b 4818 |H | Short_Literal 0x18 000c 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected 000d 00e4 | | Load_Encached Positive_Cache 000e 0129 | ) | Execute Any,Make_Visible 000f 00d8 | | Load_Top At_Offset_0 0010 0266 | f | Execute Discrete,Bounds 0011 00db | | Load_Top At_Offset_3 0012 02a0 | | Declare_Subprogram Null_Subprogram 0013 4801 |H | Short_Literal 0x1 0014 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0015 e001 | | Load 0x0,0x1 0016 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0017 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0018 0129 | ) | Execute Any,Make_Visible 0019 e001 | | Load 0x0,0x1 001a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001b 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 001c 0129 | ) | Execute Any,Make_Visible 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 002e c220 | | Store 0x1,0x20 002f 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated 0031 c214 | | Store 0x1,0x14 0032 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0034 c215 | | Store 0x1,0x15 0035 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated 0037 c216 | | Store 0x1,0x16 0038 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 003a c217 | | Store 0x1,0x17 003b 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 003d c218 | | Store 0x1,0x18 003e 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated 0040 c219 | | Store 0x1,0x19 0041 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 0043 c21b | | Store 0x1,0x1b 0044 e20e | | Load 0x1,0xe 0045 4800 |H | Short_Literal 0x0 0046 4801 |H | Short_Literal 0x1 0047 4801 |H | Short_Literal 0x1 0048 4809 |H | Short_Literal 0x9 0049 0318 | | Declare_Type Variant_Record,Incomplete 004a 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call 004c 00d9 | | Load_Top At_Offset_1 004d 012a | * | Execute Any,Change_Utility 004e c21a | | Store 0x1,0x1a 004f e21a | | Load 0x1,0x1a 0050 02a0 | | Declare_Subprogram Null_Subprogram 0051 e20d | | Load 0x1,0xd 0052 03c7 | | Complete_Type Access,By_Defining 0053 00bf | | Action Accept_Activation 0054 e002 | | Load 0x0,0x2 0055 e003 | | Load 0x0,0x3 0056 e20d | | Load 0x1,0xd 0057 e004 | | Load 0x0,0x4 0058 0387 | | Declare_Variable Package 0059 00d8 | | Load_Top At_Offset_0 005a 020f | | Execute Module,Activate 005b 00d8 | | Load_Top At_Offset_0 005c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 005d 00e9 | | Load_Encached String_Cache 005e 02a0 | | Declare_Subprogram Null_Subprogram 005f 4818 |H | Short_Literal 0x18 0060 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0061 e20e | | Load 0x1,0xe 0062 0266 | f | Execute Discrete,Bounds 0063 00e1 | | Load_Encached Boolean_Cache 0064 02a0 | | Declare_Subprogram Null_Subprogram 0065 4801 |H | Short_Literal 0x1 0066 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0067 e210 | | Load 0x1,0x10 0068 00da | | Load_Top At_Offset_2 0069 e20e | | Load 0x1,0xe 006a 00e1 | | Load_Encached Boolean_Cache 006b 00e3 | | Load_Encached Natural_Cache 006c e222 | " | Load 0x1,0x22 006d 00e4 | | Load_Encached Positive_Cache 006e e224 | $ | Load 0x1,0x24 006f 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call 0071 4800 |H | Short_Literal 0x0 0072 4801 |H | Short_Literal 0x1 0073 4807 |H | Short_Literal 0x7 0074 e21a | | Load 0x1,0x1a 0075 0307 | | Complete_Type Variant_Record,By_Defining 0076 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call 0078 029d 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call 007a 029d 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call 007c 1d20 | | Execute_Immediate Reference_Lex_1,0x20 007d 00c7 | | Action Elaborate_Subprogram 007e 1d14 | | Execute_Immediate Reference_Lex_1,0x14 007f 00c7 | | Action Elaborate_Subprogram 0080 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0081 00c7 | | Action Elaborate_Subprogram 0082 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0083 00c7 | | Action Elaborate_Subprogram 0084 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0085 00c7 | | Action Elaborate_Subprogram 0086 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0087 00c7 | | Action Elaborate_Subprogram 0088 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0089 00c7 | | Action Elaborate_Subprogram 008a 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 008b 00c7 | | Action Elaborate_Subprogram 008c BODY_0008: 008c 00bc | | Action Signal_Activated 008d 00bb | | Action Signal_Completion 008e 0000 0000 | | .XXX[0x2] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0095 | | .CONST 0x0095 ; Address of begin 0091 0097 | | .CONST 0x0097 ; Address of exception handler 0092 0002 | | .CONST 0x0002 ; Number of locals 0093 INIT_0090: 0093 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call 0095 BODY_0090: 0095 8402 | | Call 0x2,0x2 0096 0831 | 1 | Execute_Immediate Raise,0x31 0097 TRAP_0090: 0097 010e | | Execute Exception,Is_Constraint_Error 0098 6808 |h | Jump_Zero 0xa1 0099 4801 |H | Short_Literal 0x1 009a 4800 |H | Short_Literal 0x0 009b e20f | | Load 0x1,0xf 009c 035b | [ | Declare_Type Array,Constrained 009d 0337 | 7 | Declare_Variable Array 009e e20f | | Load 0x1,0xf 009f 01c6 | | Execute Vector,Convert_To_Formal 00a0 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 00a1 0100 | | Execute Exception,Raise 00a2 0000 0000 | | .BLANK 0000[0x6] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 00da | | Load_Top At_Offset_2 00ac 0227 | ' | Execute Access,All_Reference 00ad 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00ae 00d8 | | Load_Top At_Offset_0 00af 0120 | | Execute Any,Is_Value 00b0 7002 |p | Jump_Nonzero 0xb3 00b1 00d8 | | Load_Top At_Offset_0 00b2 011e | | Execute Any,Convert 00b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b4 0000 0000 | | .BLANK 0000[0x4] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bb | | .CONST 0x00bb ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0001 | | .CONST 0x0001 ; Number of locals 00bb BODY_00b8: 00bb INIT_00b8: 00bb 00da | | Load_Top At_Offset_2 00bc 0227 | ' | Execute Access,All_Reference 00bd 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5 00be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00bf 0000 | | .XXX[0x1] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00ce | | .CONST 0x00ce ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0003 | | .CONST 0x0003 ; Number of locals 00c3 INIT_00c0: 00c3 4801 |H | Short_Literal 0x1 00c4 00db | | Load_Top At_Offset_3 00c5 0227 | ' | Execute Access,All_Reference 00c6 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 00c7 e221 | ! | Load 0x1,0x21 00c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00c9 e20f | | Load 0x1,0xf 00ca 035b | [ | Declare_Type Array,Constrained 00cb 0337 | 7 | Declare_Variable Array 00cc e221 | ! | Load 0x1,0x21 00cd 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00ce BODY_00c0: 00ce e221 | ! | Load 0x1,0x21 00cf 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00d0 e5ff | | Load 0x2,-0x1 00d1 0227 | ' | Execute Access,All_Reference 00d2 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 00d3 e221 | ! | Load 0x1,0x21 00d4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00d5 0039 | 9 | Store_Top Access,At_Offset_1 00d6 00cf | | Action Mark_Auxiliary 00d7 00da | | Load_Top At_Offset_2 00d8 01d9 | | Execute Vector,Reverse_Bounds 00d9 0263 | c | Execute Discrete,Above_Bound 00da 700c |p | Jump_Nonzero 0xe7 00db 00db | | Load_Top At_Offset_3 00dc e221 | ! | Load 0x1,0x21 00dd 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00de 00d9 | | Load_Top At_Offset_1 00df e402 | | Load 0x2,0x2 00e0 01d6 | | Execute Vector,Field_Write 00e1 00db | | Load_Top At_Offset_3 00e2 e221 | ! | Load 0x1,0x21 00e3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00e4 c403 | | Store 0x2,0x3 00e5 00c8 | | Action Pop_Auxiliary_Range 00e6 3ff4 |? | Loop_Increasing 0xdb 00e7 00ce | | Action Pop_Auxiliary 00e8 00d9 | | Load_Top At_Offset_1 00e9 e20f | | Load 0x1,0xf 00ea 01c6 | | Execute Vector,Convert_To_Formal 00eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ec 0000 0000 | | .BLANK 0000[0x4] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f3 | | .CONST 0x00f3 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0001 | | .CONST 0x0001 ; Number of locals 00f3 BODY_00f0: 00f3 INIT_00f0: 00f3 00da | | Load_Top At_Offset_2 00f4 0227 | ' | Execute Access,All_Reference 00f5 2c08 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8 00f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f7 0000 | | .XXX[0x1] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb 00db | | Load_Top At_Offset_3 00fc 00db | | Load_Top At_Offset_3 00fd 01dd | | Execute Vector,First 00fe 027f | | Execute Discrete,Equal 00ff 6802 |h | Jump_Zero 0x102 0100 4800 |H | Short_Literal 0x0 0101 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0102 00db | | Load_Top At_Offset_3 0103 00db | | Load_Top At_Offset_3 0104 01d7 | | Execute Vector,Field_Read 0105 0227 | ' | Execute Access,All_Reference 0106 2c08 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8 0107 e5fe | | Load 0x2,-0x2 0108 0aff | | Execute_Immediate Plus,-0x1 0109 e5ff | | Load 0x2,-0x1 010a 01d7 | | Execute Vector,Field_Read 010b 0227 | ' | Execute Access,All_Reference 010c 2c08 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8 010d 027d | } | Execute Discrete,Greater 010e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 010f 0000 | | .XXX[0x1] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0115 | | .CONST 0x0115 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0002 | | .CONST 0x0002 ; Number of locals 0113 INIT_0110: 0113 00e3 | | Load_Encached Natural_Cache 0114 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0115 BODY_0110: 0115 00cf | | Action Mark_Auxiliary 0116 e5ff | | Load 0x2,-0x1 0117 01d9 | | Execute Vector,Reverse_Bounds 0118 0263 | c | Execute Discrete,Above_Bound 0119 700c |p | Jump_Nonzero 0x126 011a 00db | | Load_Top At_Offset_3 011b 00d9 | | Load_Top At_Offset_1 011c e5ff | | Load 0x2,-0x1 011d 01d7 | | Execute Vector,Field_Read 011e 0227 | ' | Execute Access,All_Reference 011f 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 0120 e221 | ! | Load 0x1,0x21 0121 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0122 0273 | s | Execute Discrete,Plus 0123 c402 | | Store 0x2,0x2 0124 00c8 | | Action Pop_Auxiliary_Range 0125 3ff4 |? | Loop_Increasing 0x11a 0126 00ce | | Action Pop_Auxiliary 0127 00d8 | | Load_Top At_Offset_0 0128 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0129 0000 0000 | | .BLANK 0000[0x7] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 00da | | Load_Top At_Offset_2 0134 0227 | ' | Execute Access,All_Reference 0135 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 0136 e221 | ! | Load 0x1,0x21 0137 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0138 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0139 0000 0000 | | .BLANK 0000[0x7] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 BODY_0140: 0143 INIT_0140: 0143 INIT_0140: 0143 4608 |F | Jump_Case 0x9 0144 7808 |x | Jump 0x14d ; case 0x0 0145 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0146 781f |x | Jump 0x166 ; case 0x2 0147 781e |x | Jump 0x166 ; case 0x3 0148 781d |x | Jump 0x166 ; case 0x4 0149 781c |x | Jump 0x166 ; case 0x5 014a 781b |x | Jump 0x166 ; case 0x6 014b 7807 |x | Jump 0x153 ; case 0x7 014c 780f |x | Jump 0x15c ; case 0x8 014d 00da | | Load_Top At_Offset_2 014e 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2 014f 00da | | Load_Top At_Offset_2 0150 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2 0151 1c00 | | Execute_Immediate Run_Utility,0x0 0152 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0153 00db | | Load_Top At_Offset_3 0154 4801 |H | Short_Literal 0x1 0155 e5fe | | Load 0x2,-0x2 0156 e224 | $ | Load 0x1,0x24 0157 035b | [ | Declare_Type Array,Constrained 0158 4801 |H | Short_Literal 0x1 0159 e5ff | | Load 0x2,-0x1 015a 031b | | Declare_Type Variant_Record,Constrained 015b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 015c 00db | | Load_Top At_Offset_3 015d 00db | | Load_Top At_Offset_3 015e 02fc | | Declare_Variable Variant_Record,With_Constraint 015f 4801 |H | Short_Literal 0x1 0160 e5fe | | Load 0x2,-0x2 0161 e224 | $ | Load 0x1,0x24 0162 0334 | 4 | Declare_Variable Array,With_Constraint 0163 2d09 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x9 0164 016a | j | QQ_execute Variant_Record,XXX 0165 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0166 0869 | i | Execute_Immediate Raise,0x69 0167 0000 | | .XXX[0x1] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b INIT_0168: 016b 4800 |H | Short_Literal 0x0 016c 00ea | | Load_Encached Null_String_Cache 016d 4800 |H | Short_Literal 0x0 016e e5ff | | Load 0x2,-0x1 016f e001 | | Load 0x0,0x1 0170 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0171 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0172 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0173 0000 0000 | | .BLANK 0000[0x5] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 0183 | | .CONST 0x0183 ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0003 | | .CONST 0x0003 ; Number of locals 017b INIT_0178: 017b e001 | | Load 0x0,0x1 017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 017d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 017e 02c7 | | Declare_Variable Any 017f 00db | | Load_Top At_Offset_3 0180 a402 | | Store_Unchecked 0x2,0x2 0181 00e3 | | Load_Encached Natural_Cache 0182 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0183 BODY_0178: 0183 00d9 | | Load_Top At_Offset_1 0184 e001 | | Load 0x0,0x1 0185 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0186 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0187 00cf | | Action Mark_Auxiliary 0188 7809 |x | Jump 0x192 0189 00d9 | | Load_Top At_Offset_1 018a 0a01 | | Execute_Immediate Plus,0x1 018b 005a | Z | Store_Top Discrete,At_Offset_2 018c 00da | | Load_Top At_Offset_2 018d e001 | | Load 0x0,0x1 018e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0190 c402 | | Store 0x2,0x2 0191 00c9 | | Action Pop_Auxiliary_Loop 0192 00da | | Load_Top At_Offset_2 0193 e001 | | Load 0x0,0x1 0194 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0195 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0196 6ff2 |o | Jump_Zero 0x189 0197 00ce | | Action Pop_Auxiliary 0198 00d9 | | Load_Top At_Offset_1 0199 e001 | | Load 0x0,0x1 019a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 019b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 019c 00d8 | | Load_Top At_Offset_0 019d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019e 0000 0000 | | .XXX[0x2] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a7 | | .CONST 0x01a7 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0003 | | .CONST 0x0003 ; Number of locals 01a3 INIT_01a0: 01a3 e221 | ! | Load 0x1,0x21 01a4 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 01a5 e20d | | Load 0x1,0xd 01a6 0007 | | Action Break_Optional 01a7 BODY_01a0: 01a7 e221 | ! | Load 0x1,0x21 01a8 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 01a9 e5ff | | Load 0x2,-0x1 01aa e221 | ! | Load 0x1,0x21 01ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01ac 003a | : | Store_Top Access,At_Offset_2 01ad 00cf | | Action Mark_Auxiliary 01ae 7825 |x% | Jump 0x1d4 01af 00da | | Load_Top At_Offset_2 01b0 e221 | ! | Load 0x1,0x21 01b1 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01b2 003a | : | Store_Top Access,At_Offset_2 01b3 e5fe | | Load 0x2,-0x2 01b4 0227 | ' | Execute Access,All_Reference 01b5 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 01b6 00da | | Load_Top At_Offset_2 01b7 0227 | ' | Execute Access,All_Reference 01b8 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 01b9 01d7 | | Execute Vector,Field_Read 01ba 7014 |p | Jump_Nonzero 0x1cf 01bb 4801 |H | Short_Literal 0x1 01bc e5fe | | Load 0x2,-0x2 01bd 0227 | ' | Execute Access,All_Reference 01be 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 01bf 00db | | Load_Top At_Offset_3 01c0 0227 | ' | Execute Access,All_Reference 01c1 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 01c2 01d6 | | Execute Vector,Field_Write 01c3 00d9 | | Load_Top At_Offset_1 01c4 0227 | ' | Execute Access,All_Reference 01c5 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 01c6 0a01 | | Execute_Immediate Plus,0x1 01c7 00da | | Load_Top At_Offset_2 01c8 0227 | ' | Execute Access,All_Reference 01c9 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 01ca e5fe | | Load 0x2,-0x2 01cb 00da | | Load_Top At_Offset_2 01cc 0227 | ' | Execute Access,All_Reference 01cd 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 01ce 8227 | ' | Call 0x1,0x27 01cf 00da | | Load_Top At_Offset_2 01d0 e221 | ! | Load 0x1,0x21 01d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01d2 003b | ; | Store_Top Access,At_Offset_3 01d3 00c9 | | Action Pop_Auxiliary_Loop 01d4 00da | | Load_Top At_Offset_2 01d5 e221 | ! | Load 0x1,0x21 01d6 181e | | Execute Package,Field_Execute,Field_Number 0x1e 01d7 6fd7 |o | Jump_Zero 0x1af 01d8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01d9 0000 0000 | | .BLANK 0000[0x7] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 0228 | ( | .CONST 0x0228 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0016 | | .CONST 0x0016 ; Number of locals 01e3 INIT_01e0: 01e3 e211 | | Load 0x1,0x11 01e4 02c7 | | Declare_Variable Any 01e5 e5fb | | Load 0x2,-0x5 01e6 85fc | | Call 0x2,-0x4 01e7 a602 | | Store_Unchecked 0x3,0x2 01e8 00d8 | | Load_Top At_Offset_0 01e9 8226 | & | Call 0x1,0x26 01ea 00e3 | | Load_Encached Natural_Cache 01eb 03f1 | | Declare_Variable Discrete,With_Value 01ec e005 | | Load 0x0,0x5 01ed e006 | | Load 0x0,0x6 01ee 00da | | Load_Top At_Offset_2 01ef e20d | | Load 0x1,0xd 01f0 4801 |H | Short_Literal 0x1 01f1 e007 | | Load 0x0,0x7 01f2 0387 | | Declare_Variable Package 01f3 00d8 | | Load_Top At_Offset_0 01f4 020f | | Execute Module,Activate 01f5 00d8 | | Load_Top At_Offset_0 01f6 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01f7 e210 | | Load 0x1,0x10 01f8 02c7 | | Declare_Variable Any 01f9 00d8 | | Load_Top At_Offset_0 01fa 1c00 | | Execute_Immediate Run_Utility,0x0 01fb e211 | | Load 0x1,0x11 01fc 02c7 | | Declare_Variable Any 01fd 00d8 | | Load_Top At_Offset_0 01fe 1c00 | | Execute_Immediate Run_Utility,0x0 01ff e20d | | Load 0x1,0xd 0200 0007 | | Action Break_Optional 0201 00e1 | | Load_Encached Boolean_Cache 0202 4801 |H | Short_Literal 0x1 0203 e603 | | Load 0x3,0x3 0204 e20f | | Load 0x1,0xf 0205 035b | [ | Declare_Type Array,Constrained 0206 0337 | 7 | Declare_Variable Array 0207 e603 | | Load 0x3,0x3 0208 e20d | | Load 0x1,0xd 0209 022a | * | Execute Access,Element_Type 020a 1c07 | | Execute_Immediate Run_Utility,0x7 020b e20d | | Load 0x1,0xd 020c 03d1 | | Declare_Type Access,Constrained 020d 00e4 | | Load_Encached Positive_Cache 020e 0266 | f | Execute Discrete,Bounds 020f 00da | | Load_Top At_Offset_2 0210 02a0 | | Declare_Subprogram Null_Subprogram 0211 4801 |H | Short_Literal 0x1 0212 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0213 a008 | | Store_Unchecked 0x0,0x8 0214 00c6 | | Action Check_Subprogram_Elaborated 0215 00d9 | | Load_Top At_Offset_1 0216 00e4 | | Load_Encached Positive_Cache 0217 00da | | Load_Top At_Offset_2 0218 4ffe |O | Short_Literal -0x2 0219 4802 |H | Short_Literal 0x2 021a 0099 | | Action Reference_Dynamic 021b e009 | | Load 0x0,0x9 021c e00a | | Load 0x0,0xa 021d 4813 |H | Short_Literal 0x13 021e 0007 | | Action Break_Optional 021f 4801 |H | Short_Literal 0x1 0220 e603 | | Load 0x3,0x3 0221 e60c | | Load 0x3,0xc 0222 035b | [ | Declare_Type Array,Constrained 0223 0337 | 7 | Declare_Variable Array 0224 029f 0303 | | Declare_Subprogram INIT_0300,For_Call 0226 029f 031b | | Declare_Subprogram INIT_0318,For_Call 0228 BODY_01e0: 0228 e604 | | Load 0x3,0x4 0229 1b12 | | Execute Package,Field_Read,Field_Number 0x12 022a e604 | | Load 0x3,0x4 022b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 022c c605 | | Store 0x3,0x5 022d 00cf | | Action Mark_Auxiliary 022e 00db | | Load_Top At_Offset_3 022f 01d9 | | Execute Vector,Reverse_Bounds 0230 0263 | c | Execute Discrete,Above_Bound 0231 705e |p^ | Jump_Nonzero 0x290 0232 e602 | | Load 0x3,0x2 0233 e001 | | Load 0x0,0x1 0234 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0235 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0236 c606 | | Store 0x3,0x6 0237 e603 | | Load 0x3,0x3 0238 e21a | | Load 0x1,0x1a 0239 1c08 | | Execute_Immediate Run_Utility,0x8 023a e606 | | Load 0x3,0x6 023b e21a | | Load 0x1,0x1a 023c 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2 023d 0119 | | Execute Any,Check_In_Formal_Type 023e 00d9 | | Load_Top At_Offset_1 023f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0240 e606 | | Load 0x3,0x6 0241 8225 | % | Call 0x1,0x25 0242 e223 | # | Load 0x1,0x23 0243 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0244 00d9 | | Load_Top At_Offset_1 0245 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0246 00d9 | | Load_Top At_Offset_1 0247 00d9 | | Load_Top At_Offset_1 0248 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 0249 4800 |H | Short_Literal 0x0 024a 00d9 | | Load_Top At_Offset_1 024b 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 024c 00d8 | | Load_Top At_Offset_0 024d 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 024e 0335 | 5 | Declare_Variable Array,Duplicate 024f 00cd | | Action Spare6_Action 0250 00d9 | | Load_Top At_Offset_1 0251 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 0252 01d9 | | Execute Vector,Reverse_Bounds 0253 0263 | c | Execute Discrete,Above_Bound 0254 7005 |p | Jump_Nonzero 0x25a 0255 4800 |H | Short_Literal 0x0 0256 00d9 | | Load_Top At_Offset_1 0257 e61b | | Load 0x3,0x1b 0258 01d6 | | Execute Vector,Field_Write 0259 3ffb |? | Loop_Increasing 0x255 025a 00d9 | | Load_Top At_Offset_1 025b 00d8 | | Load_Top At_Offset_0 025c 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 025d 00da | | Load_Top At_Offset_2 025e 01da | | Execute Vector,Bounds 025f 00da | | Load_Top At_Offset_2 0260 01da | | Execute Vector,Bounds 0261 00da | | Load_Top At_Offset_2 0262 027f | | Execute Discrete,Equal 0263 7001 |p | Jump_Nonzero 0x265 0264 08e0 | | Execute_Immediate Raise,0xe0 0265 00cd | | Action Spare6_Action 0266 027f | | Execute Discrete,Equal 0267 7001 |p | Jump_Nonzero 0x269 0268 08e0 | | Execute_Immediate Raise,0xe0 0269 00d2 | | Pop_Control Pop_Count_2 026a 00d9 | | Load_Top At_Offset_1 026b 2909 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x9 026c 4800 |H | Short_Literal 0x0 026d 00d9 | | Load_Top At_Offset_1 026e 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 026f e221 | ! | Load 0x1,0x21 0270 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0271 00d9 | | Load_Top At_Offset_1 0272 2807 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x7 0273 4801 |H | Short_Literal 0x1 0274 00d9 | | Load_Top At_Offset_1 0275 2808 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x8 0276 e20d | | Load 0x1,0xd 0277 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0278 00d9 | | Load_Top At_Offset_1 0279 e614 | | Load 0x3,0x14 027a 01d6 | | Execute Vector,Field_Write 027b e605 | | Load 0x3,0x5 027c 4800 |H | Short_Literal 0x0 027d 00da | | Load_Top At_Offset_2 027e e614 | | Load 0x3,0x14 027f 01d7 | | Execute Vector,Field_Read 0280 00db | | Load_Top At_Offset_3 0281 e614 | | Load 0x3,0x14 0282 01d7 | | Execute Vector,Field_Read 0283 0227 | ' | Execute Access,All_Reference 0284 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 0285 0227 | ' | Execute Access,All_Reference 0286 e604 | | Load 0x3,0x4 0287 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0288 c605 | | Store 0x3,0x5 0289 e602 | | Load 0x3,0x2 028a e001 | | Load 0x0,0x1 028b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 028c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 028d c602 | | Store 0x3,0x2 028e 00c8 | | Action Pop_Auxiliary_Range 028f 3fa2 |? | Loop_Increasing 0x232 0290 00c9 | | Action Pop_Auxiliary_Loop 0291 00db | | Load_Top At_Offset_3 0292 01d9 | | Execute Vector,Reverse_Bounds 0293 0263 | c | Execute Discrete,Above_Bound 0294 7037 |p7 | Jump_Nonzero 0x2cc 0295 00d8 | | Load_Top At_Offset_0 0296 e614 | | Load 0x3,0x14 0297 01d7 | | Execute Vector,Field_Read 0298 0227 | ' | Execute Access,All_Reference 0299 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 029a 85fd | | Call 0x2,-0x3 029b c607 | | Store 0x3,0x7 029c 00cf | | Action Mark_Auxiliary 029d 7826 |x& | Jump 0x2c4 029e 8615 | | Call 0x3,0x15 029f e609 | | Load 0x3,0x9 02a0 680e |h | Jump_Zero 0x2af 02a1 00d9 | | Load_Top At_Offset_1 02a2 e614 | | Load 0x3,0x14 02a3 01d7 | | Execute Vector,Field_Read 02a4 0227 | ' | Execute Access,All_Reference 02a5 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 02a6 e608 | | Load 0x3,0x8 02a7 e221 | ! | Load 0x1,0x21 02a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02a9 00da | | Load_Top At_Offset_2 02aa e614 | | Load 0x3,0x14 02ab 01d7 | | Execute Vector,Field_Read 02ac 0227 | ' | Execute Access,All_Reference 02ad 2807 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x7 02ae 780f |x | Jump 0x2be 02af e607 | | Load 0x3,0x7 02b0 e001 | | Load 0x0,0x1 02b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02b2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 02b3 e00b | | Load 0x0,0xb 02b4 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02b5 6802 |h | Jump_Zero 0x2b8 02b6 8616 | | Call 0x3,0x16 02b7 7806 |x | Jump 0x2be 02b8 4801 |H | Short_Literal 0x1 02b9 00da | | Load_Top At_Offset_2 02ba e614 | | Load 0x3,0x14 02bb 01d7 | | Execute Vector,Field_Read 02bc 0227 | ' | Execute Access,All_Reference 02bd 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 02be e607 | | Load 0x3,0x7 02bf e001 | | Load 0x0,0x1 02c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02c1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 02c2 c607 | | Store 0x3,0x7 02c3 00c9 | | Action Pop_Auxiliary_Loop 02c4 e607 | | Load 0x3,0x7 02c5 e001 | | Load 0x0,0x1 02c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02c7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 02c8 6fd5 |o | Jump_Zero 0x29e 02c9 00ce | | Action Pop_Auxiliary 02ca 00c8 | | Action Pop_Auxiliary_Range 02cb 3fc9 |? | Loop_Increasing 0x295 02cc 00c9 | | Action Pop_Auxiliary_Loop 02cd 00db | | Load_Top At_Offset_3 02ce 01d9 | | Execute Vector,Reverse_Bounds 02cf 0263 | c | Execute Discrete,Above_Bound 02d0 700b |p | Jump_Nonzero 0x2dc 02d1 00d8 | | Load_Top At_Offset_0 02d2 e614 | | Load 0x3,0x14 02d3 01d7 | | Execute Vector,Field_Read 02d4 00d9 | | Load_Top At_Offset_1 02d5 e614 | | Load 0x3,0x14 02d6 01d7 | | Execute Vector,Field_Read 02d7 0227 | ' | Execute Access,All_Reference 02d8 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 02d9 8227 | ' | Call 0x1,0x27 02da 00c8 | | Action Pop_Auxiliary_Range 02db 3ff5 |? | Loop_Increasing 0x2d1 02dc 00ce | | Action Pop_Auxiliary 02dd 00da | | Load_Top At_Offset_2 02de e60d | | Load 0x3,0xd 02df e60e | | Load 0x3,0xe 02e0 e60f | | Load 0x3,0xf 02e1 4810 |H | Short_Literal 0x10 02e2 4803 |H | Short_Literal 0x3 02e3 0099 | | Action Reference_Dynamic 02e4 4811 |H | Short_Literal 0x11 02e5 4803 |H | Short_Literal 0x3 02e6 0099 | | Action Reference_Dynamic 02e7 8008 | | Call 0x0,0x8 02e8 00d1 | | Pop_Control Pop_Count_1 02e9 00cf | | Action Mark_Auxiliary 02ea 00db | | Load_Top At_Offset_3 02eb 01d9 | | Execute Vector,Reverse_Bounds 02ec 0263 | c | Execute Discrete,Above_Bound 02ed 7008 |p | Jump_Nonzero 0x2f6 02ee 00d8 | | Load_Top At_Offset_0 02ef e614 | | Load 0x3,0x14 02f0 01d7 | | Execute Vector,Field_Read 02f1 00d9 | | Load_Top At_Offset_1 02f2 e60a | | Load 0x3,0xa 02f3 01d6 | | Execute Vector,Field_Write 02f4 00c8 | | Action Pop_Auxiliary_Range 02f5 3ff8 |? | Loop_Increasing 0x2ee 02f6 00ce | | Action Pop_Auxiliary 02f7 e60a | | Load 0x3,0xa 02f8 e20f | | Load 0x1,0xf 02f9 01c6 | | Execute Vector,Convert_To_Formal 02fa 00cb | | Action Pop_Block_With_Result 02fb 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 02fc 0000 0000 | | .BLANK 0000[0x4] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0308 | | .CONST 0x0308 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0002 | | .CONST 0x0002 ; Number of locals 0303 INIT_0300: 0303 e607 | | Load 0x3,0x7 0304 e001 | | Load 0x0,0x1 0305 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0306 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0307 8225 | % | Call 0x1,0x25 0308 BODY_0300: 0308 00e1 | | Load_Encached Boolean_Cache 0309 e608 | | Load 0x3,0x8 030a 00da | | Load_Top At_Offset_2 030b e605 | | Load 0x3,0x5 030c e604 | | Load 0x3,0x4 030d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 030e c608 | | Store 0x3,0x8 030f c609 | | Store 0x3,0x9 0310 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0311 0000 0000 | | .BLANK 0000[0x7] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 0326 | & | .CONST 0x0326 ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0002 | | .CONST 0x0002 ; Number of locals 031b INIT_0318: 031b e001 | | Load 0x0,0x1 031c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 031d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 031e 02c7 | | Declare_Variable Any 031f e607 | | Load 0x3,0x7 0320 e001 | | Load 0x0,0x1 0321 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0322 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0323 e00b | | Load 0x0,0xb 0324 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0325 a802 | | Store_Unchecked 0x4,0x2 0326 BODY_0318: 0326 00d8 | | Load_Top At_Offset_0 0327 e001 | | Load 0x0,0x1 0328 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0329 180f | | Execute Package,Field_Execute,Field_Number 0xf 032a 7020 |p | Jump_Nonzero 0x34b 032b 00e1 | | Load_Encached Boolean_Cache 032c e608 | | Load 0x3,0x8 032d 00da | | Load_Top At_Offset_2 032e 8225 | % | Call 0x1,0x25 032f e605 | | Load 0x3,0x5 0330 e604 | | Load 0x3,0x4 0331 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0332 c608 | | Store 0x3,0x8 0333 c609 | | Store 0x3,0x9 0334 e609 | | Load 0x3,0x9 0335 680e |h | Jump_Zero 0x344 0336 e619 | | Load 0x3,0x19 0337 e614 | | Load 0x3,0x14 0338 01d7 | | Execute Vector,Field_Read 0339 0227 | ' | Execute Access,All_Reference 033a 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 033b e608 | | Load 0x3,0x8 033c e221 | ! | Load 0x1,0x21 033d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 033e e619 | | Load 0x3,0x19 033f e614 | | Load 0x3,0x14 0340 01d7 | | Execute Vector,Field_Read 0341 0227 | ' | Execute Access,All_Reference 0342 2807 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x7 0343 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0344 4801 |H | Short_Literal 0x1 0345 e619 | | Load 0x3,0x19 0346 e614 | | Load 0x3,0x14 0347 01d7 | | Execute Vector,Field_Read 0348 0227 | ' | Execute Access,All_Reference 0349 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 034a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 034b 4801 |H | Short_Literal 0x1 034c e619 | | Load 0x3,0x19 034d e614 | | Load 0x3,0x14 034e 01d7 | | Execute Vector,Field_Read 034f 0227 | ' | Execute Access,All_Reference 0350 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 0351 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0352 0000 0000 | | .BLANK 0000[0x6] 0358 ; -------------------------------------------------------------------------------------- 0358 ; Debug Table 0358 ; -------------------------------------------------------------------------------------- 0358 0004 0011 | | .DEBUG4 0x0004,0x0011,0x71f2,0x0000,0x0001,0x0000 035e 01bd 75e0 | u | .XXX[0x4a] 0360 025b f660 | [ `| 0362 01c1 76a0 | v | 0364 0236 7700 | 6w | 0366 025e 7780 | ^w | 0368 0261 f7c0 | a | 036a 0290 77e0 | w | 036c 01fc 7800 | x | 036e 0286 f820 | | 0370 01fd f840 | @| 0372 01ee f8a0 | | 0374 01ad 78c0 | x | 0376 025a f8e0 | Z | 0378 0186 7900 | y | 037a 020c f940 | @| 037c 0157 7980 | Wy | 037e 0169 79a0 | iy | 0380 01ad f9c0 | | 0382 01fa 7a00 | z | 0384 01df 7a40 | z@| 0386 022d 7b20 | -{ | 0388 0252 fb40 | R @| 038a 024a fb60 | J `| 038c 0259 7c00 | Y| | 038e 01fd 7d60 | }`| 0390 020c 7e60 | ~`| 0392 01ce fe80 | | 0394 01ed fea0 | | 0396 01e4 fec0 | | 0398 01cb fee0 | | 039a 014a ff00 | J | 039c 01f7 7f20 | | 039e 01e4 7f40 | @| 03a0 01d6 ff60 | `| 03a2 01f1 ff80 | | 03a4 01db ffc0 | | 03a6 0000 0020 | | 03a8 0000 0000 | | .BLANK 0000[0x4] 03ac 01db ffc0 | | .XXX[0x4] 03ae 0000 0020 | | 03b0 0000 0000 | | .BLANK 0000[0x50]