|
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: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0438 | 8 | .CONST 0x0438 ; 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 010a | | .CONST 0x010a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 003a | : | .CONST 0x003a ; Number of locals 000b INIT_0008: 000b 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated 000d 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 000f 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0011 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated 0013 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 0015 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 0017 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0019 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 001b 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 001d 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 001f 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0021 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated 0023 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated 0025 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated 0027 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 0029 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated 002b 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 002d 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 002f 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 0031 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated 0033 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 0035 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 0037 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0039 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 003b 0093 0000 | | push_full_address 0x0 003d 60e6 |` | Indirect_Literal Discrete,0x124,{0x80000000, 0x00010000} 003e 0273 | s | Execute Discrete,Plus 003f e20d | | Load 0x1,0xd 0040 60df |` | Indirect_Literal Discrete,0x120,{0x00000000, 0x0000ffff} 0041 0279 | y | Execute Discrete,And 0042 0273 | s | Execute Discrete,Plus 0043 0129 | ) | Execute Any,Make_Visible 0044 4800 |H | Short_Literal 0x0 0045 0093 0393 | | push_full_address INIT_0390 0047 02a0 | | Declare_Subprogram Null_Subprogram 0048 038f | | Declare_Type Package,Defined,Visible 0049 0386 | | Declare_Variable Package,Visible 004a 0093 0000 | | push_full_address 0x0 004c 60cf |` | Indirect_Literal Discrete,0x11c,{0x80000000, 0x00020000} 004d 0273 | s | Execute Discrete,Plus 004e e20d | | Load 0x1,0xd 004f 60d0 |` | Indirect_Literal Discrete,0x120,{0x00000000, 0x0000ffff} 0050 0279 | y | Execute Discrete,And 0051 0273 | s | Execute Discrete,Plus 0052 e002 | | Load 0x0,0x2 0053 0273 | s | Execute Discrete,Plus 0054 e20e | | Load 0x1,0xe 0055 e20f | | Load 0x1,0xf 0056 e210 | | Load 0x1,0x10 0057 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0058 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0059 1d13 | | Execute_Immediate Reference_Lex_1,0x13 005a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 005b 1d15 | | Execute_Immediate Reference_Lex_1,0x15 005c 1d16 | | Execute_Immediate Reference_Lex_1,0x16 005d 1d17 | | Execute_Immediate Reference_Lex_1,0x17 005e 1d18 | | Execute_Immediate Reference_Lex_1,0x18 005f 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0060 e003 | | Load 0x0,0x3 0061 0386 | | Declare_Variable Package,Visible 0062 00d8 | | Load_Top At_Offset_0 0063 020f | | Execute Module,Activate 0064 0093 0000 | | push_full_address 0x0 0066 60b1 |` | Indirect_Literal Discrete,0x118,{0x80000000, 0x00010000} 0067 0273 | s | Execute Discrete,Plus 0068 e20d | | Load 0x1,0xd 0069 60b6 |` | Indirect_Literal Discrete,0x120,{0x00000000, 0x0000ffff} 006a 0279 | y | Execute Discrete,And 006b 0273 | s | Execute Discrete,Plus 006c e004 | | Load 0x0,0x4 006d 0273 | s | Execute Discrete,Plus 006e e005 | | Load 0x0,0x5 006f 00da | | Load_Top At_Offset_2 0070 0098 | | Execute Package,Field_Read_Dynamic 0071 e006 | | Load 0x0,0x6 0072 00db | | Load_Top At_Offset_3 0073 0098 | | Execute Package,Field_Read_Dynamic 0074 4801 |H | Short_Literal 0x1 0075 e007 | | Load 0x0,0x7 0076 e237 | 7 | Load 0x1,0x37 0077 0095 | | Execute Package,Field_Reference_Dynamic 0078 e008 | | Load 0x0,0x8 0079 e237 | 7 | Load 0x1,0x37 007a 0095 | | Execute Package,Field_Reference_Dynamic 007b e009 | | Load 0x0,0x9 007c e237 | 7 | Load 0x1,0x37 007d 0095 | | Execute Package,Field_Reference_Dynamic 007e e00a | | Load 0x0,0xa 007f e237 | 7 | Load 0x1,0x37 0080 0095 | | Execute Package,Field_Reference_Dynamic 0081 e00b | | Load 0x0,0xb 0082 e237 | 7 | Load 0x1,0x37 0083 0095 | | Execute Package,Field_Reference_Dynamic 0084 e00c | | Load 0x0,0xc 0085 e237 | 7 | Load 0x1,0x37 0086 0095 | | Execute Package,Field_Reference_Dynamic 0087 e00d | | Load 0x0,0xd 0088 e237 | 7 | Load 0x1,0x37 0089 0095 | | Execute Package,Field_Reference_Dynamic 008a e00e | | Load 0x0,0xe 008b e237 | 7 | Load 0x1,0x37 008c 0095 | | Execute Package,Field_Reference_Dynamic 008d e00f | | Load 0x0,0xf 008e e237 | 7 | Load 0x1,0x37 008f 0095 | | Execute Package,Field_Reference_Dynamic 0090 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0091 e21b | | Load 0x1,0x1b 0092 e21c | | Load 0x1,0x1c 0093 00d8 | | Load_Top At_Offset_0 0094 e21b | | Load 0x1,0x1b 0095 0260 | ` | Execute Discrete,In_Type 0096 7001 |p | Jump_Nonzero 0x98 0097 0801 | | Execute_Immediate Raise,0x1 0098 e010 | | Load 0x0,0x10 0099 0386 | | Declare_Variable Package,Visible 009a 00d8 | | Load_Top At_Offset_0 009b 020f | | Execute Module,Activate 009c e011 | | Load 0x0,0x11 009d 00d9 | | Load_Top At_Offset_1 009e 0098 | | Execute Package,Field_Read_Dynamic 009f 0129 | ) | Execute Any,Make_Visible 00a0 e012 | | Load 0x0,0x12 00a1 00db | | Load_Top At_Offset_3 00a2 0098 | | Execute Package,Field_Read_Dynamic 00a3 0129 | ) | Execute Any,Make_Visible 00a4 00bf | | Action Accept_Activation 00a5 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00a6 00c7 | | Action Elaborate_Subprogram 00a7 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00a8 00c7 | | Action Elaborate_Subprogram 00a9 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00aa 00c7 | | Action Elaborate_Subprogram 00ab 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00ac 00c7 | | Action Elaborate_Subprogram 00ad 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00ae 00c7 | | Action Elaborate_Subprogram 00af 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00b0 00c7 | | Action Elaborate_Subprogram 00b1 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00b2 00c7 | | Action Elaborate_Subprogram 00b3 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00b4 00c7 | | Action Elaborate_Subprogram 00b5 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00b6 00c7 | | Action Elaborate_Subprogram 00b7 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00b8 00c7 | | Action Elaborate_Subprogram 00b9 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 00ba 00c7 | | Action Elaborate_Subprogram 00bb 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 00bc 00c7 | | Action Elaborate_Subprogram 00bd 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 00be 00c7 | | Action Elaborate_Subprogram 00bf 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 00c0 00c7 | | Action Elaborate_Subprogram 00c1 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 00c2 00c7 | | Action Elaborate_Subprogram 00c3 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00c4 00c7 | | Action Elaborate_Subprogram 00c5 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 00c6 00c7 | | Action Elaborate_Subprogram 00c7 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00c8 00c7 | | Action Elaborate_Subprogram 00c9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00ca 00c7 | | Action Elaborate_Subprogram 00cb 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 00cc 00c7 | | Action Elaborate_Subprogram 00cd 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 00ce 00c7 | | Action Elaborate_Subprogram 00cf 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 00d0 00c7 | | Action Elaborate_Subprogram 00d1 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 00d2 00c7 | | Action Elaborate_Subprogram 00d3 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 00d4 00c7 | | Action Elaborate_Subprogram 00d5 e013 | | Load 0x0,0x13 00d6 e014 | | Load 0x0,0x14 00d7 e238 | 8 | Load 0x1,0x38 00d8 0098 | | Execute Package,Field_Read_Dynamic 00d9 0095 | | Execute Package,Field_Reference_Dynamic 00da e011 | | Load 0x0,0x11 00db e238 | 8 | Load 0x1,0x38 00dc 0098 | | Execute Package,Field_Read_Dynamic 00dd e015 | | Load 0x0,0x15 00de e014 | | Load 0x0,0x14 00df e238 | 8 | Load 0x1,0x38 00e0 0098 | | Execute Package,Field_Read_Dynamic 00e1 0095 | | Execute Package,Field_Reference_Dynamic 00e2 e016 | | Load 0x0,0x16 00e3 e014 | | Load 0x0,0x14 00e4 e238 | 8 | Load 0x1,0x38 00e5 0098 | | Execute Package,Field_Read_Dynamic 00e6 0095 | | Execute Package,Field_Reference_Dynamic 00e7 e017 | | Load 0x0,0x17 00e8 e014 | | Load 0x0,0x14 00e9 e238 | 8 | Load 0x1,0x38 00ea 0098 | | Execute Package,Field_Read_Dynamic 00eb 0095 | | Execute Package,Field_Reference_Dynamic 00ec e018 | | Load 0x0,0x18 00ed e014 | | Load 0x0,0x14 00ee e238 | 8 | Load 0x1,0x38 00ef 0098 | | Execute Package,Field_Read_Dynamic 00f0 0095 | | Execute Package,Field_Reference_Dynamic 00f1 e019 | | Load 0x0,0x19 00f2 e014 | | Load 0x0,0x14 00f3 e238 | 8 | Load 0x1,0x38 00f4 0098 | | Execute Package,Field_Read_Dynamic 00f5 0095 | | Execute Package,Field_Reference_Dynamic 00f6 e01a | | Load 0x0,0x1a 00f7 e014 | | Load 0x0,0x14 00f8 e238 | 8 | Load 0x1,0x38 00f9 0098 | | Execute Package,Field_Read_Dynamic 00fa 0095 | | Execute Package,Field_Reference_Dynamic 00fb e01b | | Load 0x0,0x1b 00fc e014 | | Load 0x0,0x14 00fd e238 | 8 | Load 0x1,0x38 00fe 0098 | | Execute Package,Field_Read_Dynamic 00ff 0095 | | Execute Package,Field_Reference_Dynamic 0100 e01c | | Load 0x0,0x1c 0101 e014 | | Load 0x0,0x14 0102 e238 | 8 | Load 0x1,0x38 0103 0098 | | Execute Package,Field_Read_Dynamic 0104 0095 | | Execute Package,Field_Reference_Dynamic 0105 480a |H | Short_Literal 0xa 0106 e236 | 6 | Load 0x1,0x36 0107 020e | | Execute Module,Augment_Imports 0108 e236 | 6 | Load 0x1,0x36 0109 020f | | Execute Module,Activate 010a BODY_0008: 010a 00bc | | Action Signal_Activated 010b 00bb | | Action Signal_Completion 010c 0000 0000 | | .BLANK 0000[0x4] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0113 | | .CONST 0x0113 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0001 | | .CONST 0x0001 ; Number of locals 0113 BODY_0110: 0113 INIT_0110: 0113 00da | | Load_Top At_Offset_2 0114 e01d | | Load 0x0,0x1d 0115 e238 | 8 | Load 0x1,0x38 0116 0096 | | Execute Package,Entry 0117 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0118 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 011c 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0120 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 0124 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 00da | | Load_Top At_Offset_2 012c e011 | | Load 0x0,0x11 012d e238 | 8 | Load 0x1,0x38 012e 0098 | | Execute Package,Field_Read_Dynamic 012f 0216 | | Execute Heap_Access,Convert 0130 e01e | | Load 0x0,0x1e 0131 e238 | 8 | Load 0x1,0x38 0132 0096 | | Execute Package,Entry 0133 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0134 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0135 0000 0000 | | .XXX[0x3] 0137 0000 | | 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 013c a5fd | | Store_Unchecked 0x2,-0x3 013d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 013e 0000 0000 | | .XXX[0x2] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 014d | M | .CONST 0x014d ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0002 | | .CONST 0x0002 ; Number of locals 0143 INIT_0140: 0143 e005 | | Load 0x0,0x5 0144 e237 | 7 | Load 0x1,0x37 0145 0098 | | Execute Package,Field_Read_Dynamic 0146 0322 | " | Declare_Variable Record 0147 e5fe | | Load 0x2,-0x2 0148 e01f | | Load 0x0,0x1f 0149 e238 | 8 | Load 0x1,0x38 014a 0096 | | Execute Package,Entry 014b 00d9 | | Load_Top At_Offset_1 014c 017d | } | Execute Record,Structure_Write 014d BODY_0140: 014d 00d8 | | Load_Top At_Offset_0 014e e5ff | | Load 0x2,-0x1 014f e20e | | Load 0x1,0xe 0150 0119 | | Execute Any,Check_In_Formal_Type 0151 e020 | | Load 0x0,0x20 0152 e237 | 7 | Load 0x1,0x37 0153 0096 | | Execute Package,Entry 0154 00d1 | | Pop_Control Pop_Count_1 0155 e5fe | | Load 0x2,-0x2 0156 e011 | | Load 0x0,0x11 0157 e238 | 8 | Load 0x1,0x38 0158 0098 | | Execute Package,Field_Read_Dynamic 0159 0216 | | Execute Heap_Access,Convert 015a 00d9 | | Load_Top At_Offset_1 015b e021 | ! | Load 0x0,0x21 015c e238 | 8 | Load 0x1,0x38 015d 0096 | | Execute Package,Entry 015e c5fe | | Store 0x2,-0x2 015f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0165 | e | .CONST 0x0165 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0002 | | .CONST 0x0002 ; Number of locals 0163 INIT_0160: 0163 e239 | 9 | Load 0x1,0x39 0164 0007 | | Action Break_Optional 0165 BODY_0160: 0165 00d8 | | Load_Top At_Offset_0 0166 e011 | | Load 0x0,0x11 0167 e238 | 8 | Load 0x1,0x38 0168 0098 | | Execute Package,Field_Read_Dynamic 0169 0216 | | Execute Heap_Access,Convert 016a e022 | " | Load 0x0,0x22 016b e237 | 7 | Load 0x1,0x37 016c 0096 | | Execute Package,Entry 016d e021 | ! | Load 0x0,0x21 016e e238 | 8 | Load 0x1,0x38 016f 0096 | | Execute Package,Entry 0170 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0171 00d8 | | Load_Top At_Offset_0 0172 00ca | | Action Exit_Nullary_Function 0173 0000 0000 | | .BLANK 0000[0x5] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 00da | | Load_Top At_Offset_2 017c e01f | | Load 0x0,0x1f 017d e238 | 8 | Load 0x1,0x38 017e 0096 | | Execute Package,Entry 017f e023 | # | Load 0x0,0x23 0180 e237 | 7 | Load 0x1,0x37 0181 0096 | | Execute Package,Entry 0182 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0183 0000 0000 | | .BLANK 0000[0x5] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 0195 | | .CONST 0x0195 ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0002 | | .CONST 0x0002 ; Number of locals 018b INIT_0188: 018b e005 | | Load 0x0,0x5 018c e237 | 7 | Load 0x1,0x37 018d 0098 | | Execute Package,Field_Read_Dynamic 018e 0322 | " | Declare_Variable Record 018f 00db | | Load_Top At_Offset_3 0190 e01f | | Load 0x0,0x1f 0191 e238 | 8 | Load 0x1,0x38 0192 0096 | | Execute Package,Entry 0193 00d9 | | Load_Top At_Offset_1 0194 017d | } | Execute Record,Structure_Write 0195 BODY_0188: 0195 00d8 | | Load_Top At_Offset_0 0196 e024 | $ | Load 0x0,0x24 0197 e237 | 7 | Load 0x1,0x37 0198 0096 | | Execute Package,Entry 0199 00d1 | | Pop_Control Pop_Count_1 019a 00db | | Load_Top At_Offset_3 019b e011 | | Load 0x0,0x11 019c e238 | 8 | Load 0x1,0x38 019d 0098 | | Execute Package,Field_Read_Dynamic 019e 0216 | | Execute Heap_Access,Convert 019f 00d9 | | Load_Top At_Offset_1 01a0 e021 | ! | Load 0x0,0x21 01a1 e238 | 8 | Load 0x1,0x38 01a2 0096 | | Execute Package,Entry 01a3 c5ff | | Store 0x2,-0x1 01a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01a5 0000 0000 | | .XXX[0x3] 01a7 0000 | | 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 e01f | | Load 0x0,0x1f 01ad e238 | 8 | Load 0x1,0x38 01ae 0096 | | Execute Package,Entry 01af e025 | % | Load 0x0,0x25 01b0 e237 | 7 | Load 0x1,0x37 01b1 0096 | | Execute Package,Entry 01b2 e20e | | Load 0x1,0xe 01b3 0119 | | Execute Any,Check_In_Formal_Type 01b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b5 0000 0000 | | .XXX[0x3] 01b7 0000 | | 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bd | | .CONST 0x01bd ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0002 | | .CONST 0x0002 ; Number of locals 01bb INIT_01b8: 01bb e239 | 9 | Load 0x1,0x39 01bc 0007 | | Action Break_Optional 01bd BODY_01b8: 01bd 00d8 | | Load_Top At_Offset_0 01be e011 | | Load 0x0,0x11 01bf e238 | 8 | Load 0x1,0x38 01c0 0098 | | Execute Package,Field_Read_Dynamic 01c1 0216 | | Execute Heap_Access,Convert 01c2 e5ff | | Load 0x2,-0x1 01c3 e01f | | Load 0x0,0x1f 01c4 e238 | 8 | Load 0x1,0x38 01c5 0096 | | Execute Package,Entry 01c6 e026 | & | Load 0x0,0x26 01c7 e237 | 7 | Load 0x1,0x37 01c8 0096 | | Execute Package,Entry 01c9 e021 | ! | Load 0x0,0x21 01ca e238 | 8 | Load 0x1,0x38 01cb 0096 | | Execute Package,Entry 01cc 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01cd 00d8 | | Load_Top At_Offset_0 01ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cf 0000 | | .XXX[0x1] 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 00db | | Load_Top At_Offset_3 01d4 e01f | | Load 0x0,0x1f 01d5 e238 | 8 | Load 0x1,0x38 01d6 0096 | | Execute Package,Entry 01d7 00db | | Load_Top At_Offset_3 01d8 e01f | | Load 0x0,0x1f 01d9 e238 | 8 | Load 0x1,0x38 01da 0096 | | Execute Package,Entry 01db e027 | ' | Load 0x0,0x27 01dc e237 | 7 | Load 0x1,0x37 01dd 0096 | | Execute Package,Entry 01de 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01df 0000 | | .XXX[0x1] 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 00db | | Load_Top At_Offset_3 01e4 e20e | | Load 0x1,0xe 01e5 0119 | | Execute Any,Check_In_Formal_Type 01e6 00db | | Load_Top At_Offset_3 01e7 e01f | | Load 0x0,0x1f 01e8 e238 | 8 | Load 0x1,0x38 01e9 0096 | | Execute Package,Entry 01ea e028 | ( | Load 0x0,0x28 01eb e237 | 7 | Load 0x1,0x37 01ec 0096 | | Execute Package,Entry 01ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01ee 0000 0000 | | .XXX[0x2] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 00da | | Load_Top At_Offset_2 01f4 e01f | | Load 0x0,0x1f 01f5 e238 | 8 | Load 0x1,0x38 01f6 0096 | | Execute Package,Entry 01f7 e029 | ) | Load 0x0,0x29 01f8 e237 | 7 | Load 0x1,0x37 01f9 0096 | | Execute Package,Entry 01fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01fb 0000 0000 | | .BLANK 0000[0x5] 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 e012 | | Load 0x0,0x12 0204 e237 | 7 | Load 0x1,0x37 0205 0098 | | Execute Package,Field_Read_Dynamic 0206 00db | | Load_Top At_Offset_3 0207 e01f | | Load 0x0,0x1f 0208 e238 | 8 | Load 0x1,0x38 0209 0096 | | Execute Package,Entry 020a e02a | * | Load 0x0,0x2a 020b e237 | 7 | Load 0x1,0x37 020c 0096 | | Execute Package,Entry 020d c5fe | | Store 0x2,-0x2 020e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 020f 0000 | | .XXX[0x1] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 00da | | Load_Top At_Offset_2 0214 e012 | | Load 0x0,0x12 0215 e237 | 7 | Load 0x1,0x37 0216 0098 | | Execute Package,Field_Read_Dynamic 0217 0226 | & | Execute Access,Convert 0218 e02b | + | Load 0x0,0x2b 0219 e237 | 7 | Load 0x1,0x37 021a 0096 | | Execute Package,Entry 021b 003b | ; | Store_Top Access,At_Offset_3 021c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 021d 0000 0000 | | .XXX[0x3] 021f 0000 | | 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 00da | | Load_Top At_Offset_2 0224 e02c | , | Load 0x0,0x2c 0225 e237 | 7 | Load 0x1,0x37 0226 0096 | | Execute Package,Entry 0227 e20e | | Load 0x1,0xe 0228 0119 | | Execute Any,Check_In_Formal_Type 0229 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 022a 0000 0000 | | .BLANK 0000[0x6] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 00da | | Load_Top At_Offset_2 0234 e02d | - | Load 0x0,0x2d 0235 e237 | 7 | Load 0x1,0x37 0236 0096 | | Execute Package,Entry 0237 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 024f | O | .CONST 0x024f ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0003 | | .CONST 0x0003 ; Number of locals 023b INIT_0238: 023b e005 | | Load 0x0,0x5 023c e237 | 7 | Load 0x1,0x37 023d 0098 | | Execute Package,Field_Read_Dynamic 023e 0322 | " | Declare_Variable Record 023f 00db | | Load_Top At_Offset_3 0240 e01f | | Load 0x0,0x1f 0241 e238 | 8 | Load 0x1,0x38 0242 0096 | | Execute Package,Entry 0243 00d9 | | Load_Top At_Offset_1 0244 017d | } | Execute Record,Structure_Write 0245 e005 | | Load 0x0,0x5 0246 e237 | 7 | Load 0x1,0x37 0247 0098 | | Execute Package,Field_Read_Dynamic 0248 0322 | " | Declare_Variable Record 0249 e5fe | | Load 0x2,-0x2 024a e01f | | Load 0x0,0x1f 024b e238 | 8 | Load 0x1,0x38 024c 0096 | | Execute Package,Entry 024d 00d9 | | Load_Top At_Offset_1 024e 017d | } | Execute Record,Structure_Write 024f BODY_0238: 024f 00d8 | | Load_Top At_Offset_0 0250 00da | | Load_Top At_Offset_2 0251 e02e | . | Load 0x0,0x2e 0252 e237 | 7 | Load 0x1,0x37 0253 0096 | | Execute Package,Entry 0254 00d2 | | Pop_Control Pop_Count_2 0255 e5ff | | Load 0x2,-0x1 0256 e011 | | Load 0x0,0x11 0257 e238 | 8 | Load 0x1,0x38 0258 0098 | | Execute Package,Field_Read_Dynamic 0259 0216 | | Execute Heap_Access,Convert 025a 00da | | Load_Top At_Offset_2 025b e021 | ! | Load 0x0,0x21 025c e238 | 8 | Load 0x1,0x38 025d 0096 | | Execute Package,Entry 025e c5ff | | Store 0x2,-0x1 025f e5fe | | Load 0x2,-0x2 0260 e011 | | Load 0x0,0x11 0261 e238 | 8 | Load 0x1,0x38 0262 0098 | | Execute Package,Field_Read_Dynamic 0263 0216 | | Execute Heap_Access,Convert 0264 00d9 | | Load_Top At_Offset_1 0265 e021 | ! | Load 0x0,0x21 0266 e238 | 8 | Load 0x1,0x38 0267 0096 | | Execute Package,Entry 0268 c5fe | | Store 0x2,-0x2 0269 4501 |E | Exit_Suprogram New_Top_Offset 0x1 026a 0000 0000 | | .BLANK 0000[0x6] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0287 | | .CONST 0x0287 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0003 | | .CONST 0x0003 ; Number of locals 0273 INIT_0270: 0273 e005 | | Load 0x0,0x5 0274 e237 | 7 | Load 0x1,0x37 0275 0098 | | Execute Package,Field_Read_Dynamic 0276 0322 | " | Declare_Variable Record 0277 e5fe | | Load 0x2,-0x2 0278 e01f | | Load 0x0,0x1f 0279 e238 | 8 | Load 0x1,0x38 027a 0096 | | Execute Package,Entry 027b 00d9 | | Load_Top At_Offset_1 027c 017d | } | Execute Record,Structure_Write 027d e005 | | Load 0x0,0x5 027e e237 | 7 | Load 0x1,0x37 027f 0098 | | Execute Package,Field_Read_Dynamic 0280 0322 | " | Declare_Variable Record 0281 e5fd | | Load 0x2,-0x3 0282 e01f | | Load 0x0,0x1f 0283 e238 | 8 | Load 0x1,0x38 0284 0096 | | Execute Package,Entry 0285 00d9 | | Load_Top At_Offset_1 0286 017d | } | Execute Record,Structure_Write 0287 BODY_0270: 0287 00d8 | | Load_Top At_Offset_0 0288 00da | | Load_Top At_Offset_2 0289 e5ff | | Load 0x2,-0x1 028a e02f | / | Load 0x0,0x2f 028b e237 | 7 | Load 0x1,0x37 028c 0096 | | Execute Package,Entry 028d 00d2 | | Pop_Control Pop_Count_2 028e e5fe | | Load 0x2,-0x2 028f e011 | | Load 0x0,0x11 0290 e238 | 8 | Load 0x1,0x38 0291 0098 | | Execute Package,Field_Read_Dynamic 0292 0216 | | Execute Heap_Access,Convert 0293 00da | | Load_Top At_Offset_2 0294 e021 | ! | Load 0x0,0x21 0295 e238 | 8 | Load 0x1,0x38 0296 0096 | | Execute Package,Entry 0297 c5fe | | Store 0x2,-0x2 0298 e5fd | | Load 0x2,-0x3 0299 e011 | | Load 0x0,0x11 029a e238 | 8 | Load 0x1,0x38 029b 0098 | | Execute Package,Field_Read_Dynamic 029c 0216 | | Execute Heap_Access,Convert 029d 00d9 | | Load_Top At_Offset_1 029e e021 | ! | Load 0x0,0x21 029f e238 | 8 | Load 0x1,0x38 02a0 0096 | | Execute Package,Entry 02a1 c5fd | | Store 0x2,-0x3 02a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02a3 0000 0000 | | .BLANK 0000[0x5] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02b5 | | .CONST 0x02b5 ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0002 | | .CONST 0x0002 ; Number of locals 02ab INIT_02a8: 02ab e005 | | Load 0x0,0x5 02ac e237 | 7 | Load 0x1,0x37 02ad 0098 | | Execute Package,Field_Read_Dynamic 02ae 0322 | " | Declare_Variable Record 02af e5fd | | Load 0x2,-0x3 02b0 e01f | | Load 0x0,0x1f 02b1 e238 | 8 | Load 0x1,0x38 02b2 0096 | | Execute Package,Entry 02b3 00d9 | | Load_Top At_Offset_1 02b4 017d | } | Execute Record,Structure_Write 02b5 BODY_02a8: 02b5 00d8 | | Load_Top At_Offset_0 02b6 e5fe | | Load 0x2,-0x2 02b7 e5ff | | Load 0x2,-0x1 02b8 e20e | | Load 0x1,0xe 02b9 0119 | | Execute Any,Check_In_Formal_Type 02ba e030 | 0 | Load 0x0,0x30 02bb e237 | 7 | Load 0x1,0x37 02bc 0096 | | Execute Package,Entry 02bd 00d1 | | Pop_Control Pop_Count_1 02be e5fd | | Load 0x2,-0x3 02bf e011 | | Load 0x0,0x11 02c0 e238 | 8 | Load 0x1,0x38 02c1 0098 | | Execute Package,Field_Read_Dynamic 02c2 0216 | | Execute Heap_Access,Convert 02c3 00d9 | | Load_Top At_Offset_1 02c4 e021 | ! | Load 0x0,0x21 02c5 e238 | 8 | Load 0x1,0x38 02c6 0096 | | Execute Package,Entry 02c7 c5fd | | Store 0x2,-0x3 02c8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02c9 0000 0000 | | .BLANK 0000[0x7] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02e7 | | .CONST 0x02e7 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0003 | | .CONST 0x0003 ; Number of locals 02d3 INIT_02d0: 02d3 e005 | | Load 0x0,0x5 02d4 e237 | 7 | Load 0x1,0x37 02d5 0098 | | Execute Package,Field_Read_Dynamic 02d6 0322 | " | Declare_Variable Record 02d7 e5fe | | Load 0x2,-0x2 02d8 e01f | | Load 0x0,0x1f 02d9 e238 | 8 | Load 0x1,0x38 02da 0096 | | Execute Package,Entry 02db 00d9 | | Load_Top At_Offset_1 02dc 017d | } | Execute Record,Structure_Write 02dd e005 | | Load 0x0,0x5 02de e237 | 7 | Load 0x1,0x37 02df 0098 | | Execute Package,Field_Read_Dynamic 02e0 0322 | " | Declare_Variable Record 02e1 e5fd | | Load 0x2,-0x3 02e2 e01f | | Load 0x0,0x1f 02e3 e238 | 8 | Load 0x1,0x38 02e4 0096 | | Execute Package,Entry 02e5 00d9 | | Load_Top At_Offset_1 02e6 017d | } | Execute Record,Structure_Write 02e7 BODY_02d0: 02e7 00d8 | | Load_Top At_Offset_0 02e8 00da | | Load_Top At_Offset_2 02e9 e5ff | | Load 0x2,-0x1 02ea e031 | 1 | Load 0x0,0x31 02eb e237 | 7 | Load 0x1,0x37 02ec 0096 | | Execute Package,Entry 02ed 00d2 | | Pop_Control Pop_Count_2 02ee e5fe | | Load 0x2,-0x2 02ef e011 | | Load 0x0,0x11 02f0 e238 | 8 | Load 0x1,0x38 02f1 0098 | | Execute Package,Field_Read_Dynamic 02f2 0216 | | Execute Heap_Access,Convert 02f3 00da | | Load_Top At_Offset_2 02f4 e021 | ! | Load 0x0,0x21 02f5 e238 | 8 | Load 0x1,0x38 02f6 0096 | | Execute Package,Entry 02f7 c5fe | | Store 0x2,-0x2 02f8 e5fd | | Load 0x2,-0x3 02f9 e011 | | Load 0x0,0x11 02fa e238 | 8 | Load 0x1,0x38 02fb 0098 | | Execute Package,Field_Read_Dynamic 02fc 0216 | | Execute Heap_Access,Convert 02fd 00d9 | | Load_Top At_Offset_1 02fe e021 | ! | Load 0x0,0x21 02ff e238 | 8 | Load 0x1,0x38 0300 0096 | | Execute Package,Entry 0301 c5fd | | Store 0x2,-0x3 0302 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0303 0000 0000 | | .BLANK 0000[0x5] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 0315 | | .CONST 0x0315 ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0002 | | .CONST 0x0002 ; Number of locals 030b INIT_0308: 030b e005 | | Load 0x0,0x5 030c e237 | 7 | Load 0x1,0x37 030d 0098 | | Execute Package,Field_Read_Dynamic 030e 0322 | " | Declare_Variable Record 030f e5fe | | Load 0x2,-0x2 0310 e01f | | Load 0x0,0x1f 0311 e238 | 8 | Load 0x1,0x38 0312 0096 | | Execute Package,Entry 0313 00d9 | | Load_Top At_Offset_1 0314 017d | } | Execute Record,Structure_Write 0315 BODY_0308: 0315 00d8 | | Load_Top At_Offset_0 0316 e5ff | | Load 0x2,-0x1 0317 e20e | | Load 0x1,0xe 0318 0119 | | Execute Any,Check_In_Formal_Type 0319 e032 | 2 | Load 0x0,0x32 031a e237 | 7 | Load 0x1,0x37 031b 0096 | | Execute Package,Entry 031c 00d1 | | Pop_Control Pop_Count_1 031d e5fe | | Load 0x2,-0x2 031e e011 | | Load 0x0,0x11 031f e238 | 8 | Load 0x1,0x38 0320 0098 | | Execute Package,Field_Read_Dynamic 0321 0216 | | Execute Heap_Access,Convert 0322 00d9 | | Load_Top At_Offset_1 0323 e021 | ! | Load 0x0,0x21 0324 e238 | 8 | Load 0x1,0x38 0325 0096 | | Execute Package,Entry 0326 c5fe | | Store 0x2,-0x2 0327 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 0335 | 5 | .CONST 0x0335 ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0002 | | .CONST 0x0002 ; Number of locals 032b INIT_0328: 032b e005 | | Load 0x0,0x5 032c e237 | 7 | Load 0x1,0x37 032d 0098 | | Execute Package,Field_Read_Dynamic 032e 0322 | " | Declare_Variable Record 032f e5fe | | Load 0x2,-0x2 0330 e01f | | Load 0x0,0x1f 0331 e238 | 8 | Load 0x1,0x38 0332 0096 | | Execute Package,Entry 0333 00d9 | | Load_Top At_Offset_1 0334 017d | } | Execute Record,Structure_Write 0335 BODY_0328: 0335 00d8 | | Load_Top At_Offset_0 0336 e5ff | | Load 0x2,-0x1 0337 e01f | | Load 0x0,0x1f 0338 e238 | 8 | Load 0x1,0x38 0339 0096 | | Execute Package,Entry 033a e033 | 3 | Load 0x0,0x33 033b e237 | 7 | Load 0x1,0x37 033c 0096 | | Execute Package,Entry 033d 00d1 | | Pop_Control Pop_Count_1 033e e5fe | | Load 0x2,-0x2 033f e011 | | Load 0x0,0x11 0340 e238 | 8 | Load 0x1,0x38 0341 0098 | | Execute Package,Field_Read_Dynamic 0342 0216 | | Execute Heap_Access,Convert 0343 00d9 | | Load_Top At_Offset_1 0344 e021 | ! | Load 0x0,0x21 0345 e238 | 8 | Load 0x1,0x38 0346 0096 | | Execute Package,Entry 0347 c5fe | | Store 0x2,-0x2 0348 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0349 0000 0000 | | .BLANK 0000[0x7] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 035d | ] | .CONST 0x035d ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0002 | | .CONST 0x0002 ; Number of locals 0353 INIT_0350: 0353 e005 | | Load 0x0,0x5 0354 e237 | 7 | Load 0x1,0x37 0355 0098 | | Execute Package,Field_Read_Dynamic 0356 0322 | " | Declare_Variable Record 0357 e5fe | | Load 0x2,-0x2 0358 e01f | | Load 0x0,0x1f 0359 e238 | 8 | Load 0x1,0x38 035a 0096 | | Execute Package,Entry 035b 00d9 | | Load_Top At_Offset_1 035c 017d | } | Execute Record,Structure_Write 035d BODY_0350: 035d 00d8 | | Load_Top At_Offset_0 035e e5ff | | Load 0x2,-0x1 035f e034 | 4 | Load 0x0,0x34 0360 e237 | 7 | Load 0x1,0x37 0361 0096 | | Execute Package,Entry 0362 00d1 | | Pop_Control Pop_Count_1 0363 e5fe | | Load 0x2,-0x2 0364 e011 | | Load 0x0,0x11 0365 e238 | 8 | Load 0x1,0x38 0366 0098 | | Execute Package,Field_Read_Dynamic 0367 0216 | | Execute Heap_Access,Convert 0368 00d9 | | Load_Top At_Offset_1 0369 e021 | ! | Load 0x0,0x21 036a e238 | 8 | Load 0x1,0x38 036b 0096 | | Execute Package,Entry 036c c5fe | | Store 0x2,-0x2 036d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 036e 0000 0000 | | .XXX[0x2] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0379 | y | .CONST 0x0379 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0003 | | .CONST 0x0003 ; Number of locals 0373 INIT_0370: 0373 e005 | | Load 0x0,0x5 0374 e237 | 7 | Load 0x1,0x37 0375 0098 | | Execute Package,Field_Read_Dynamic 0376 0322 | " | Declare_Variable Record 0377 e239 | 9 | Load 0x1,0x39 0378 0007 | | Action Break_Optional 0379 BODY_0370: 0379 e5ff | | Load 0x2,-0x1 037a e01f | | Load 0x0,0x1f 037b e238 | 8 | Load 0x1,0x38 037c 0096 | | Execute Package,Entry 037d e035 | 5 | Load 0x0,0x35 037e e237 | 7 | Load 0x1,0x37 037f 0096 | | Execute Package,Entry 0380 00da | | Load_Top At_Offset_2 0381 017d | } | Execute Record,Structure_Write 0382 00d8 | | Load_Top At_Offset_0 0383 e011 | | Load 0x0,0x11 0384 e238 | 8 | Load 0x1,0x38 0385 0098 | | Execute Package,Field_Read_Dynamic 0386 0216 | | Execute Heap_Access,Convert 0387 00da | | Load_Top At_Offset_2 0388 e021 | ! | Load 0x0,0x21 0389 e238 | 8 | Load 0x1,0x38 038a 0096 | | Execute Package,Entry 038b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 038c 00d8 | | Load_Top At_Offset_0 038d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 038e 0000 0000 | | .XXX[0x2] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 03b8 | | .CONST 0x03b8 ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0015 | | .CONST 0x0015 ; Number of locals 0393 INIT_0390: 0393 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 0395 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated 0397 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0399 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated 039b 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 039d 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 039f 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 03a1 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated 03a3 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 03a5 00bf | | Action Accept_Activation 03a6 1d0d | | Execute_Immediate Reference_Lex_1,0xd 03a7 00c7 | | Action Elaborate_Subprogram 03a8 1d0e | | Execute_Immediate Reference_Lex_1,0xe 03a9 00c7 | | Action Elaborate_Subprogram 03aa 1d0f | | Execute_Immediate Reference_Lex_1,0xf 03ab 00c7 | | Action Elaborate_Subprogram 03ac 1d10 | | Execute_Immediate Reference_Lex_1,0x10 03ad 00c7 | | Action Elaborate_Subprogram 03ae 1d11 | | Execute_Immediate Reference_Lex_1,0x11 03af 00c7 | | Action Elaborate_Subprogram 03b0 1d12 | | Execute_Immediate Reference_Lex_1,0x12 03b1 00c7 | | Action Elaborate_Subprogram 03b2 1d13 | | Execute_Immediate Reference_Lex_1,0x13 03b3 00c7 | | Action Elaborate_Subprogram 03b4 1d14 | | Execute_Immediate Reference_Lex_1,0x14 03b5 00c7 | | Action Elaborate_Subprogram 03b6 1d15 | | Execute_Immediate Reference_Lex_1,0x15 03b7 00c7 | | Action Elaborate_Subprogram 03b8 BODY_0390: 03b8 00bc | | Action Signal_Activated 03b9 00bb | | Action Signal_Completion 03ba 0000 0000 | | .BLANK 0000[0x6] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 00db | | Load_Top At_Offset_3 03c4 00db | | Load_Top At_Offset_3 03c5 8001 | | Call 0x0,0x1 03c6 c5fe | | Store 0x2,-0x2 03c7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cb | | .CONST 0x03cb ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0001 | | .CONST 0x0001 ; Number of locals 03cb BODY_03c8: 03cb INIT_03c8: 03cb e5fd | | Load 0x2,-0x3 03cc e002 | | Load 0x0,0x2 03cd 0216 | | Execute Heap_Access,Convert 03ce e5fe | | Load 0x2,-0x2 03cf e5ff | | Load 0x2,-0x1 03d0 8003 | | Call 0x0,0x3 03d1 c5fd | | Store 0x2,-0x3 03d2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03d3 0000 0000 | | .BLANK 0000[0x5] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03db | | .CONST 0x03db ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0001 | | .CONST 0x0001 ; Number of locals 03db BODY_03d8: 03db INIT_03d8: 03db 00db | | Load_Top At_Offset_3 03dc e002 | | Load 0x0,0x2 03dd 0216 | | Execute Heap_Access,Convert 03de 00db | | Load_Top At_Offset_3 03df 8004 | | Call 0x0,0x4 03e0 c5fe | | Store 0x2,-0x2 03e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03e2 0000 0000 | | .BLANK 0000[0x6] 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03eb | | .CONST 0x03eb ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0001 | | .CONST 0x0001 ; Number of locals 03eb BODY_03e8: 03eb INIT_03e8: 03eb 00da | | Load_Top At_Offset_2 03ec 8005 | | Call 0x0,0x5 03ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ee 0000 0000 | | .XXX[0x2] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 e002 | | Load 0x0,0x2 03f5 0216 | | Execute Heap_Access,Convert 03f6 8006 | | Call 0x0,0x6 03f7 0033 | 3 | Store_Top Heap_Access,At_Offset_3 03f8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03f9 0000 0000 | | .BLANK 0000[0x7] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 00db | | Load_Top At_Offset_3 0404 e002 | | Load 0x0,0x2 0405 0216 | | Execute Heap_Access,Convert 0406 00db | | Load_Top At_Offset_3 0407 8007 | | Call 0x0,0x7 0408 c5fe | | Store 0x2,-0x2 0409 4502 |E | Exit_Suprogram New_Top_Offset 0x2 040a 0000 0000 | | .BLANK 0000[0x6] 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0413 | | .CONST 0x0413 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0001 | | .CONST 0x0001 ; Number of locals 0413 BODY_0410: 0413 INIT_0410: 0413 00db | | Load_Top At_Offset_3 0414 e002 | | Load 0x0,0x2 0415 0216 | | Execute Heap_Access,Convert 0416 00db | | Load_Top At_Offset_3 0417 8008 | | Call 0x0,0x8 0418 c5fe | | Store 0x2,-0x2 0419 4502 |E | Exit_Suprogram New_Top_Offset 0x2 041a 0000 0000 | | .BLANK 0000[0x6] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0423 | # | .CONST 0x0423 ; Address of begin 0421 0004 | | .CONST 0x0004 ; Address of exception handler 0422 0001 | | .CONST 0x0001 ; Number of locals 0423 BODY_0420: 0423 INIT_0420: 0423 00da | | Load_Top At_Offset_2 0424 8009 | | Call 0x0,0x9 0425 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0426 0000 0000 | | .XXX[0x2] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b 00db | | Load_Top At_Offset_3 042c e002 | | Load 0x0,0x2 042d 0216 | | Execute Heap_Access,Convert 042e 00db | | Load_Top At_Offset_3 042f 800a | | Call 0x0,0xa 0430 c5fe | | Store 0x2,-0x2 0431 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0432 0000 0000 | | .BLANK 0000[0x6] 0438 ; -------------------------------------------------------------------------------------- 0438 ; Debug Table 0438 ; -------------------------------------------------------------------------------------- 0438 0004 0009 | | .DEBUG4 0x0004,0x0009,0xfc2b,0x0000,0x0001,0x0000 043e 0000 0000 | | .BLANK 0000[0x1c2]