|
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 - metrics - download
Length: 2048 (0x800) 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 0298 | | .CONST 0x0298 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00e8 | | .CONST 0x00e8 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0039 | 9 | .CONST 0x0039 ; Number of locals 000b INIT_0008: 000b 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 000d 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 000f 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 0011 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 0013 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0015 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated 0017 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0019 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 001b 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 001d 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 001f 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 0021 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0023 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0025 0093 0000 | | push_full_address 0x0 0027 60dc |` | Indirect_Literal Discrete,0x104,{0x80000000, 0x00010000} 0028 0273 | s | Execute Discrete,Plus 0029 e20d | | Load 0x1,0xd 002a 60d5 |` | Indirect_Literal Discrete,0x100,{0x00000000, 0x0000ffff} 002b 0279 | y | Execute Discrete,And 002c 0273 | s | Execute Discrete,Plus 002d 0129 | ) | Execute Any,Make_Visible 002e 4800 |H | Short_Literal 0x0 002f 0093 01f3 | | push_full_address INIT_01f0 0031 02a0 | | Declare_Subprogram Null_Subprogram 0032 038f | | Declare_Type Package,Defined,Visible 0033 0386 | | Declare_Variable Package,Visible 0034 0093 0000 | | push_full_address 0x0 0036 60c5 |` | Indirect_Literal Discrete,0xfc,{0x80000000, 0x00020000} 0037 0273 | s | Execute Discrete,Plus 0038 e20d | | Load 0x1,0xd 0039 60c6 |` | Indirect_Literal Discrete,0x100,{0x00000000, 0x0000ffff} 003a 0279 | y | Execute Discrete,And 003b 0273 | s | Execute Discrete,Plus 003c e002 | | Load 0x0,0x2 003d 0273 | s | Execute Discrete,Plus 003e e20e | | Load 0x1,0xe 003f e20f | | Load 0x1,0xf 0040 e210 | | Load 0x1,0x10 0041 e211 | | Load 0x1,0x11 0042 e212 | | Load 0x1,0x12 0043 e213 | | Load 0x1,0x13 0044 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0045 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0046 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0047 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0048 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0049 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 004a 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 004b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 004c 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 004d 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 004e 1d18 | | Execute_Immediate Reference_Lex_1,0x18 004f 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0050 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0051 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0052 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0053 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0054 e003 | | Load 0x0,0x3 0055 0386 | | Declare_Variable Package,Visible 0056 00d8 | | Load_Top At_Offset_0 0057 020f | | Execute Module,Activate 0058 0093 0000 | | push_full_address 0x0 005a 609d |` | Indirect_Literal Discrete,0xf8,{0x80000000, 0x00010000} 005b 0273 | s | Execute Discrete,Plus 005c e20d | | Load 0x1,0xd 005d 60a2 |` | Indirect_Literal Discrete,0x100,{0x00000000, 0x0000ffff} 005e 0279 | y | Execute Discrete,And 005f 0273 | s | Execute Discrete,Plus 0060 e004 | | Load 0x0,0x4 0061 0273 | s | Execute Discrete,Plus 0062 e005 | | Load 0x0,0x5 0063 00da | | Load_Top At_Offset_2 0064 0098 | | Execute Package,Field_Read_Dynamic 0065 e006 | | Load 0x0,0x6 0066 00db | | Load_Top At_Offset_3 0067 0098 | | Execute Package,Field_Read_Dynamic 0068 4801 |H | Short_Literal 0x1 0069 e007 | | Load 0x0,0x7 006a e236 | 6 | Load 0x1,0x36 006b 0095 | | Execute Package,Field_Reference_Dynamic 006c e008 | | Load 0x0,0x8 006d e236 | 6 | Load 0x1,0x36 006e 0095 | | Execute Package,Field_Reference_Dynamic 006f e009 | | Load 0x0,0x9 0070 e236 | 6 | Load 0x1,0x36 0071 0095 | | Execute Package,Field_Reference_Dynamic 0072 e00a | | Load 0x0,0xa 0073 e236 | 6 | Load 0x1,0x36 0074 0095 | | Execute Package,Field_Reference_Dynamic 0075 e00b | | Load 0x0,0xb 0076 e236 | 6 | Load 0x1,0x36 0077 0095 | | Execute Package,Field_Reference_Dynamic 0078 e00c | | Load 0x0,0xc 0079 e236 | 6 | Load 0x1,0x36 007a 0095 | | Execute Package,Field_Reference_Dynamic 007b e00d | | Load 0x0,0xd 007c e236 | 6 | Load 0x1,0x36 007d 0095 | | Execute Package,Field_Reference_Dynamic 007e e00e | | Load 0x0,0xe 007f e236 | 6 | Load 0x1,0x36 0080 0095 | | Execute Package,Field_Reference_Dynamic 0081 e00f | | Load 0x0,0xf 0082 e236 | 6 | Load 0x1,0x36 0083 0095 | | Execute Package,Field_Reference_Dynamic 0084 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0085 e224 | $ | Load 0x1,0x24 0086 e225 | % | Load 0x1,0x25 0087 00d8 | | Load_Top At_Offset_0 0088 e224 | $ | Load 0x1,0x24 0089 0260 | ` | Execute Discrete,In_Type 008a 7001 |p | Jump_Nonzero 0x8c 008b 0801 | | Execute_Immediate Raise,0x1 008c e010 | | Load 0x0,0x10 008d 0386 | | Declare_Variable Package,Visible 008e 00d8 | | Load_Top At_Offset_0 008f 020f | | Execute Module,Activate 0090 e011 | | Load 0x0,0x11 0091 00d9 | | Load_Top At_Offset_1 0092 0098 | | Execute Package,Field_Read_Dynamic 0093 0129 | ) | Execute Any,Make_Visible 0094 e012 | | Load 0x0,0x12 0095 00db | | Load_Top At_Offset_3 0096 0098 | | Execute Package,Field_Read_Dynamic 0097 0129 | ) | Execute Any,Make_Visible 0098 00bf | | Action Accept_Activation 0099 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 009a 00c7 | | Action Elaborate_Subprogram 009b 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 009c 00c7 | | Action Elaborate_Subprogram 009d 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 009e 00c7 | | Action Elaborate_Subprogram 009f 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 00a0 00c7 | | Action Elaborate_Subprogram 00a1 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 00a2 00c7 | | Action Elaborate_Subprogram 00a3 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00a4 00c7 | | Action Elaborate_Subprogram 00a5 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 00a6 00c7 | | Action Elaborate_Subprogram 00a7 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00a8 00c7 | | Action Elaborate_Subprogram 00a9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00aa 00c7 | | Action Elaborate_Subprogram 00ab 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 00ac 00c7 | | Action Elaborate_Subprogram 00ad 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 00ae 00c7 | | Action Elaborate_Subprogram 00af 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 00b0 00c7 | | Action Elaborate_Subprogram 00b1 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 00b2 00c7 | | Action Elaborate_Subprogram 00b3 e013 | | Load 0x0,0x13 00b4 e014 | | Load 0x0,0x14 00b5 e237 | 7 | Load 0x1,0x37 00b6 0098 | | Execute Package,Field_Read_Dynamic 00b7 0095 | | Execute Package,Field_Reference_Dynamic 00b8 e011 | | Load 0x0,0x11 00b9 e237 | 7 | Load 0x1,0x37 00ba 0098 | | Execute Package,Field_Read_Dynamic 00bb e015 | | Load 0x0,0x15 00bc e014 | | Load 0x0,0x14 00bd e237 | 7 | Load 0x1,0x37 00be 0098 | | Execute Package,Field_Read_Dynamic 00bf 0095 | | Execute Package,Field_Reference_Dynamic 00c0 e016 | | Load 0x0,0x16 00c1 e014 | | Load 0x0,0x14 00c2 e237 | 7 | Load 0x1,0x37 00c3 0098 | | Execute Package,Field_Read_Dynamic 00c4 0095 | | Execute Package,Field_Reference_Dynamic 00c5 e017 | | Load 0x0,0x17 00c6 e014 | | Load 0x0,0x14 00c7 e237 | 7 | Load 0x1,0x37 00c8 0098 | | Execute Package,Field_Read_Dynamic 00c9 0095 | | Execute Package,Field_Reference_Dynamic 00ca e018 | | Load 0x0,0x18 00cb e014 | | Load 0x0,0x14 00cc e237 | 7 | Load 0x1,0x37 00cd 0098 | | Execute Package,Field_Read_Dynamic 00ce 0095 | | Execute Package,Field_Reference_Dynamic 00cf e019 | | Load 0x0,0x19 00d0 e014 | | Load 0x0,0x14 00d1 e237 | 7 | Load 0x1,0x37 00d2 0098 | | Execute Package,Field_Read_Dynamic 00d3 0095 | | Execute Package,Field_Reference_Dynamic 00d4 e01a | | Load 0x0,0x1a 00d5 e014 | | Load 0x0,0x14 00d6 e237 | 7 | Load 0x1,0x37 00d7 0098 | | Execute Package,Field_Read_Dynamic 00d8 0095 | | Execute Package,Field_Reference_Dynamic 00d9 e01b | | Load 0x0,0x1b 00da e014 | | Load 0x0,0x14 00db e237 | 7 | Load 0x1,0x37 00dc 0098 | | Execute Package,Field_Read_Dynamic 00dd 0095 | | Execute Package,Field_Reference_Dynamic 00de e01c | | Load 0x0,0x1c 00df e014 | | Load 0x0,0x14 00e0 e237 | 7 | Load 0x1,0x37 00e1 0098 | | Execute Package,Field_Read_Dynamic 00e2 0095 | | Execute Package,Field_Reference_Dynamic 00e3 480a |H | Short_Literal 0xa 00e4 e235 | 5 | Load 0x1,0x35 00e5 020e | | Execute Module,Augment_Imports 00e6 e235 | 5 | Load 0x1,0x35 00e7 020f | | Execute Module,Activate 00e8 BODY_0008: 00e8 00bc | | Action Signal_Activated 00e9 00bb | | Action Signal_Completion 00ea 0000 0000 | | .BLANK 0000[0x6] 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 e01d | | Load 0x0,0x1d 00f5 e237 | 7 | Load 0x1,0x37 00f6 0096 | | Execute Package,Entry 00f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f8 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 00fc 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0100 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 0104 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 00da | | Load_Top At_Offset_2 010c e011 | | Load 0x0,0x11 010d e237 | 7 | Load 0x1,0x37 010e 0098 | | Execute Package,Field_Read_Dynamic 010f 0216 | | Execute Heap_Access,Convert 0110 e01e | | Load 0x0,0x1e 0111 e237 | 7 | Load 0x1,0x37 0112 0096 | | Execute Package,Entry 0113 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0114 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0115 0000 0000 | | .XXX[0x3] 0117 0000 | | 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 00db | | Load_Top At_Offset_3 011c e210 | | Load 0x1,0x10 011d 0119 | | Execute Any,Check_In_Formal_Type 011e 00db | | Load_Top At_Offset_3 011f e01f | | Load 0x0,0x1f 0120 e237 | 7 | Load 0x1,0x37 0121 0096 | | Execute Package,Entry 0122 e020 | | Load 0x0,0x20 0123 e236 | 6 | Load 0x1,0x36 0124 0096 | | Execute Package,Entry 0125 e20f | | Load 0x1,0xf 0126 0119 | | Execute Any,Check_In_Formal_Type 0127 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 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 00e1 | | Load_Encached Boolean_Cache 012c e5fd | | Load 0x2,-0x3 012d 00d8 | | Load_Top At_Offset_0 012e 0120 | | Execute Any,Is_Value 012f 6804 |h | Jump_Zero 0x134 0130 e236 | 6 | Load 0x1,0x36 0131 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0132 011e | | Execute Any,Convert 0133 7802 |x | Jump 0x136 0134 e20f | | Load 0x1,0xf 0135 0119 | | Execute Any,Check_In_Formal_Type 0136 e5fe | | Load 0x2,-0x2 0137 e210 | | Load 0x1,0x10 0138 0119 | | Execute Any,Check_In_Formal_Type 0139 e5ff | | Load 0x2,-0x1 013a e01f | | Load 0x0,0x1f 013b e237 | 7 | Load 0x1,0x37 013c 0096 | | Execute Package,Entry 013d e021 | ! | Load 0x0,0x21 013e e236 | 6 | Load 0x1,0x36 013f 0096 | | Execute Package,Entry 0140 c5fd | | Store 0x2,-0x3 0141 c5fc | | Store 0x2,-0x4 0142 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0143 0000 0000 | | .BLANK 0000[0x5] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014f | O | .CONST 0x014f ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b e5fd | | Load 0x2,-0x3 014c e01f | | Load 0x0,0x1f 014d e237 | 7 | Load 0x1,0x37 014e 0096 | | Execute Package,Entry 014f BODY_0148: 014f 00d8 | | Load_Top At_Offset_0 0150 e5fe | | Load 0x2,-0x2 0151 e20f | | Load 0x1,0xf 0152 0119 | | Execute Any,Check_In_Formal_Type 0153 e5ff | | Load 0x2,-0x1 0154 e210 | | Load 0x1,0x10 0155 0119 | | Execute Any,Check_In_Formal_Type 0156 e022 | " | Load 0x0,0x22 0157 e236 | 6 | Load 0x1,0x36 0158 0096 | | Execute Package,Entry 0159 0031 | 1 | Store_Top Heap_Access,At_Offset_1 015a e5fd | | Load 0x2,-0x3 015b e011 | | Load 0x0,0x11 015c e237 | 7 | Load 0x1,0x37 015d 0098 | | Execute Package,Field_Read_Dynamic 015e 0216 | | Execute Heap_Access,Convert 015f 00d9 | | Load_Top At_Offset_1 0160 e023 | # | Load 0x0,0x23 0161 e237 | 7 | Load 0x1,0x37 0162 0096 | | Execute Package,Entry 0163 c5fd | | Store 0x2,-0x3 0164 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0165 0000 0000 | | .XXX[0x3] 0167 0000 | | 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016f | o | .CONST 0x016f ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b 00db | | Load_Top At_Offset_3 016c e01f | | Load 0x0,0x1f 016d e237 | 7 | Load 0x1,0x37 016e 0096 | | Execute Package,Entry 016f BODY_0168: 016f 00d8 | | Load_Top At_Offset_0 0170 e5ff | | Load 0x2,-0x1 0171 e210 | | Load 0x1,0x10 0172 0119 | | Execute Any,Check_In_Formal_Type 0173 e024 | $ | Load 0x0,0x24 0174 e236 | 6 | Load 0x1,0x36 0175 0096 | | Execute Package,Entry 0176 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0177 e5fe | | Load 0x2,-0x2 0178 e011 | | Load 0x0,0x11 0179 e237 | 7 | Load 0x1,0x37 017a 0098 | | Execute Package,Field_Read_Dynamic 017b 0216 | | Execute Heap_Access,Convert 017c 00d9 | | Load_Top At_Offset_1 017d e023 | # | Load 0x0,0x23 017e e237 | 7 | Load 0x1,0x37 017f 0096 | | Execute Package,Entry 0180 c5fe | | Store 0x2,-0x2 0181 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0182 0000 0000 | | .BLANK 0000[0x6] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00da | | Load_Top At_Offset_2 018c e01f | | Load 0x0,0x1f 018d e237 | 7 | Load 0x1,0x37 018e 0096 | | Execute Package,Entry 018f e025 | % | Load 0x0,0x25 0190 e236 | 6 | Load 0x1,0x36 0191 0096 | | Execute Package,Entry 0192 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0193 0000 0000 | | .BLANK 0000[0x5] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019f | | .CONST 0x019f ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 019c e01f | | Load 0x0,0x1f 019d e237 | 7 | Load 0x1,0x37 019e 0096 | | Execute Package,Entry 019f BODY_0198: 019f 00d8 | | Load_Top At_Offset_0 01a0 e026 | & | Load 0x0,0x26 01a1 e236 | 6 | Load 0x1,0x36 01a2 0096 | | Execute Package,Entry 01a3 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01a4 00db | | Load_Top At_Offset_3 01a5 e011 | | Load 0x0,0x11 01a6 e237 | 7 | Load 0x1,0x37 01a7 0098 | | Execute Package,Field_Read_Dynamic 01a8 0216 | | Execute Heap_Access,Convert 01a9 00d9 | | Load_Top At_Offset_1 01aa e023 | # | Load 0x0,0x23 01ab e237 | 7 | Load 0x1,0x37 01ac 0096 | | Execute Package,Entry 01ad c5ff | | Store 0x2,-0x1 01ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01af 0000 | | .XXX[0x1] 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 a5fd | | Store_Unchecked 0x2,-0x3 01b5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 e012 | | Load 0x0,0x12 01bc e236 | 6 | Load 0x1,0x36 01bd 0098 | | Execute Package,Field_Read_Dynamic 01be 00db | | Load_Top At_Offset_3 01bf e01f | | Load 0x0,0x1f 01c0 e237 | 7 | Load 0x1,0x37 01c1 0096 | | Execute Package,Entry 01c2 e027 | ' | Load 0x0,0x27 01c3 e236 | 6 | Load 0x1,0x36 01c4 0096 | | Execute Package,Entry 01c5 c5fe | | Store 0x2,-0x2 01c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c7 0000 | | .XXX[0x1] 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 e012 | | Load 0x0,0x12 01cd e236 | 6 | Load 0x1,0x36 01ce 0098 | | Execute Package,Field_Read_Dynamic 01cf 0226 | & | Execute Access,Convert 01d0 e028 | ( | Load 0x0,0x28 01d1 e236 | 6 | Load 0x1,0x36 01d2 0096 | | Execute Package,Entry 01d3 003b | ; | Store_Top Access,At_Offset_3 01d4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01d5 0000 0000 | | .XXX[0x3] 01d7 0000 | | 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc e029 | ) | Load 0x0,0x29 01dd e236 | 6 | Load 0x1,0x36 01de 0096 | | Execute Package,Entry 01df e210 | | Load 0x1,0x10 01e0 0119 | | Execute Any,Check_In_Formal_Type 01e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e2 0000 0000 | | .BLANK 0000[0x6] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 00da | | Load_Top At_Offset_2 01ec e02a | * | Load 0x0,0x2a 01ed e236 | 6 | Load 0x1,0x36 01ee 0096 | | Execute Package,Entry 01ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 0218 | | .CONST 0x0218 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0015 | | .CONST 0x0015 ; Number of locals 01f3 INIT_01f0: 01f3 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 01f5 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 01f7 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 01f9 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 01fb 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 01fd 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 01ff 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 0201 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0203 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 0205 00bf | | Action Accept_Activation 0206 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0207 00c7 | | Action Elaborate_Subprogram 0208 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0209 00c7 | | Action Elaborate_Subprogram 020a 1d0f | | Execute_Immediate Reference_Lex_1,0xf 020b 00c7 | | Action Elaborate_Subprogram 020c 1d10 | | Execute_Immediate Reference_Lex_1,0x10 020d 00c7 | | Action Elaborate_Subprogram 020e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 020f 00c7 | | Action Elaborate_Subprogram 0210 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0211 00c7 | | Action Elaborate_Subprogram 0212 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0213 00c7 | | Action Elaborate_Subprogram 0214 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0215 00c7 | | Action Elaborate_Subprogram 0216 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0217 00c7 | | Action Elaborate_Subprogram 0218 BODY_01f0: 0218 00bc | | Action Signal_Activated 0219 00bb | | Action Signal_Completion 021a 0000 0000 | | .BLANK 0000[0x6] 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 00db | | Load_Top At_Offset_3 0224 00db | | Load_Top At_Offset_3 0225 8001 | | Call 0x0,0x1 0226 c5fe | | Store 0x2,-0x2 0227 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b e5fd | | Load 0x2,-0x3 022c e002 | | Load 0x0,0x2 022d 0216 | | Execute Heap_Access,Convert 022e e5fe | | Load 0x2,-0x2 022f e5ff | | Load 0x2,-0x1 0230 8003 | | Call 0x0,0x3 0231 c5fd | | Store 0x2,-0x3 0232 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0233 0000 0000 | | .BLANK 0000[0x5] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 00db | | Load_Top At_Offset_3 023c e002 | | Load 0x0,0x2 023d 0216 | | Execute Heap_Access,Convert 023e 00db | | Load_Top At_Offset_3 023f 8004 | | Call 0x0,0x4 0240 c5fe | | Store 0x2,-0x2 0241 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0242 0000 0000 | | .BLANK 0000[0x6] 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 00da | | Load_Top At_Offset_2 024c 8005 | | Call 0x0,0x5 024d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 024e 0000 0000 | | .XXX[0x2] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 00da | | Load_Top At_Offset_2 0254 e002 | | Load 0x0,0x2 0255 0216 | | Execute Heap_Access,Convert 0256 8006 | | Call 0x0,0x6 0257 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0258 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0259 0000 0000 | | .BLANK 0000[0x7] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 00db | | Load_Top At_Offset_3 0264 e002 | | Load 0x0,0x2 0265 0216 | | Execute Heap_Access,Convert 0266 00db | | Load_Top At_Offset_3 0267 8007 | | Call 0x0,0x7 0268 c5fe | | Store 0x2,-0x2 0269 4502 |E | Exit_Suprogram New_Top_Offset 0x2 026a 0000 0000 | | .BLANK 0000[0x6] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 00db | | Load_Top At_Offset_3 0274 e002 | | Load 0x0,0x2 0275 0216 | | Execute Heap_Access,Convert 0276 00db | | Load_Top At_Offset_3 0277 8008 | | Call 0x0,0x8 0278 c5fe | | Store 0x2,-0x2 0279 4502 |E | Exit_Suprogram New_Top_Offset 0x2 027a 0000 0000 | | .BLANK 0000[0x6] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 00da | | Load_Top At_Offset_2 0284 8009 | | Call 0x0,0x9 0285 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0286 0000 0000 | | .XXX[0x2] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b 00db | | Load_Top At_Offset_3 028c e002 | | Load 0x0,0x2 028d 0216 | | Execute Heap_Access,Convert 028e 00db | | Load_Top At_Offset_3 028f 800a | | Call 0x0,0xa 0290 c5fe | | Store 0x2,-0x2 0291 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0292 0000 0000 | | .BLANK 0000[0x6] 0298 ; -------------------------------------------------------------------------------------- 0298 ; Debug Table 0298 ; -------------------------------------------------------------------------------------- 0298 0004 0009 | | .DEBUG4 0x0004,0x0009,0xefb4,0x0000,0x0001,0x0000 029e 0000 0000 | | .BLANK 0000[0x162]