|
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: 6144 (0x1800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦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 0be8 | | .CONST 0x0be8 ; 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 8007 | | .CONST 0x8007 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00d1 | | .CONST 0x00d1 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 003c | < | .CONST 0x003c ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000d 0129 | ) | Execute Any,Make_Visible 000e e002 | | Load 0x0,0x2 000f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0010 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0011 0129 | ) | Execute Any,Make_Visible 0012 e002 | | Load 0x0,0x2 0013 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0014 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0015 0129 | ) | Execute Any,Make_Visible 0016 e002 | | Load 0x0,0x2 0017 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0019 0129 | ) | Execute Any,Make_Visible 001a e002 | | Load 0x0,0x2 001b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 001d 0129 | ) | Execute Any,Make_Visible 001e e002 | | Load 0x0,0x2 001f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0020 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0021 0129 | ) | Execute Any,Make_Visible 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 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 e002 | | Load 0x0,0x2 0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0032 180e | | Execute Package,Field_Execute,Field_Number 0xe 0033 e002 | | Load 0x0,0x2 0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0035 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0036 011e | | Execute Any,Convert 0037 0129 | ) | Execute Any,Make_Visible 0038 c21d | | Store 0x1,0x1d 0039 e002 | | Load 0x0,0x2 003a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003b 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 003c 02c6 | | Declare_Variable Any,Visible 003d e002 | | Load 0x0,0x2 003e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0040 a221 | ! | Store_Unchecked 0x1,0x21 0041 c21e | | Store 0x1,0x1e 0042 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0044 c213 | | Store 0x1,0x13 0045 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 0047 c214 | | Store 0x1,0x14 0048 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 004a c215 | | Store 0x1,0x15 004b 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 004d c216 | | Store 0x1,0x16 004e 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated 0050 c217 | | Store 0x1,0x17 0051 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated 0053 c218 | | Store 0x1,0x18 0054 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated 0056 c21f | | Store 0x1,0x1f 0057 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0059 c21a | | Store 0x1,0x1a 005a 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 005c c220 | | Store 0x1,0x20 005d 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 005f c21b | | Store 0x1,0x1b 0060 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 0062 c21c | | Store 0x1,0x1c 0063 00bf | | Action Accept_Activation 0064 0092 0932 | 2| Action Push_String_Extended,0x932 ; "[]" 0066 e002 | | Load 0x0,0x2 0067 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0068 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0069 02c7 | | Declare_Variable Any 006a e002 | | Load 0x0,0x2 006b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 006c 180f | | Execute Package,Field_Execute,Field_Number 0xf 006d a222 | " | Store_Unchecked 0x1,0x22 006e 00e2 | | Load_Encached Integer_Cache 006f e002 | | Load 0x0,0x2 0070 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0071 191e | | Execute Package,Field_Reference,Field_Number 0x1e 0072 0007 | | Action Break_Optional 0073 0092 0933 | 3| Action Push_String_Extended,0x933 ; "SYSTEM_SUBSYSTEM" 0075 e002 | | Load 0x0,0x2 0076 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0077 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0078 8224 | $ | Call 0x1,0x24 0079 0092 0934 | 4| Action Push_String_Extended,0x934 ; "SYS_VIEW" 007b e002 | | Load 0x0,0x2 007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 007d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 007e 8224 | $ | Call 0x1,0x24 007f 0092 0935 | 5| Action Push_String_Extended,0x935 ; "SUBSYSTEM" 0081 e002 | | Load 0x0,0x2 0082 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0083 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0084 8224 | $ | Call 0x1,0x24 0085 0092 0936 | 6| Action Push_String_Extended,0x936 ; "SPEC_VIEW" 0087 e002 | | Load 0x0,0x2 0088 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0089 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 008a 8224 | $ | Call 0x1,0x24 008b 0092 0937 | 7| Action Push_String_Extended,0x937 ; "LOAD_VIEW" 008d e002 | | Load 0x0,0x2 008e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0090 8224 | $ | Call 0x1,0x24 0091 0092 0938 | 8| Action Push_String_Extended,0x938 ; "COMB_VIEW" 0093 e002 | | Load 0x0,0x2 0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0095 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0096 8224 | $ | Call 0x1,0x24 0097 029d 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call 0099 029d 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call 009b 029d 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call 009d 029d 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call 009f 029d 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call 00a1 029d 050b | | Declare_Subprogram INIT_0508,For_Outer_Call 00a3 029d 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call 00a5 029d 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call 00a7 029d 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call 00a9 029d 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call 00ab 029d 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call 00ad 029d 058b | | Declare_Subprogram INIT_0588,For_Outer_Call 00af 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call 00b1 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call 00b3 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call 00b5 029d 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call 00b7 029d 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call 00b9 029d 0663 | c| Declare_Subprogram INIT_0660,For_Outer_Call 00bb 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00bc 00c7 | | Action Elaborate_Subprogram 00bd 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00be 00c7 | | Action Elaborate_Subprogram 00bf 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00c0 00c7 | | Action Elaborate_Subprogram 00c1 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00c2 00c7 | | Action Elaborate_Subprogram 00c3 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00c4 00c7 | | Action Elaborate_Subprogram 00c5 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00c6 00c7 | | Action Elaborate_Subprogram 00c7 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00c8 00c7 | | Action Elaborate_Subprogram 00c9 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00ca 00c7 | | Action Elaborate_Subprogram 00cb 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00cc 00c7 | | Action Elaborate_Subprogram 00cd 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00ce 00c7 | | Action Elaborate_Subprogram 00cf 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00d0 00c7 | | Action Elaborate_Subprogram 00d1 BODY_0008: 00d1 00bc | | Action Signal_Activated 00d2 00bb | | Action Signal_Completion 00d3 0000 0000 | | .BLANK 0000[0x5] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00df | | .CONST 0x00df ; Address of begin 00d9 00ee | | .CONST 0x00ee ; Address of exception handler 00da 0003 | | .CONST 0x0003 ; Number of locals 00db INIT_00d8: 00db 029f 0693 | | Declare_Subprogram INIT_0690,For_Call 00dd 029f 06ab | | Declare_Subprogram INIT_06a8,For_Call 00df BODY_00d8: 00df e5ff | | Load 0x2,-0x1 00e0 e001 | | Load 0x0,0x1 00e1 180f | | Execute Package,Field_Execute,Field_Number 0xf 00e2 6802 |h | Jump_Zero 0xe5 00e3 8402 | | Call 0x2,0x2 00e4 7808 |x | Jump 0xed 00e5 e5ff | | Load 0x2,-0x1 00e6 e003 | | Load 0x0,0x3 00e7 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00e8 e001 | | Load 0x0,0x1 00e9 1b58 | X | Execute Package,Field_Read,Field_Number 0x58 00ea 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00eb 823b | ; | Call 0x1,0x3b 00ec 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ed 0831 | 1 | Execute_Immediate Raise,0x31 00ee TRAP_00d8: 00ee 0007 | | Action Break_Optional 00ef 8403 | | Call 0x2,0x3 00f0 0831 | 1 | Execute_Immediate Raise,0x31 00f1 0000 0000 | | .BLANK 0000[0x7] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fd | | .CONST 0x00fd ; Address of begin 00f9 0100 | | .CONST 0x0100 ; Address of exception handler 00fa 0002 | | .CONST 0x0002 ; Number of locals 00fb INIT_00f8: 00fb 029f 06c3 | | Declare_Subprogram INIT_06c0,For_Call 00fd BODY_00f8: 00fd 00db | | Load_Top At_Offset_3 00fe 823b | ; | Call 0x1,0x3b 00ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0100 TRAP_00f8: 0100 0007 | | Action Break_Optional 0101 8402 | | Call 0x2,0x2 0102 0831 | 1 | Execute_Immediate Raise,0x31 0103 0000 0000 | | .BLANK 0000[0x5] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010d | | .CONST 0x010d ; Address of begin 0109 0117 | | .CONST 0x0117 ; Address of exception handler 010a 0002 | | .CONST 0x0002 ; Number of locals 010b INIT_0108: 010b 029f 06db | | Declare_Subprogram INIT_06d8,For_Call 010d BODY_0108: 010d 4800 |H | Short_Literal 0x0 010e e002 | | Load 0x0,0x2 010f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0110 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0111 e5ff | | Load 0x2,-0x1 0112 e002 | | Load 0x0,0x2 0113 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0114 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0115 823b | ; | Call 0x1,0x3b 0116 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0117 TRAP_0108: 0117 0007 | | Action Break_Optional 0118 8402 | | Call 0x2,0x2 0119 0831 | 1 | Execute_Immediate Raise,0x31 011a 0000 0000 | | .BLANK 0000[0x6] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0127 | ' | .CONST 0x0127 ; Address of begin 0121 0136 | 6 | .CONST 0x0136 ; Address of exception handler 0122 0003 | | .CONST 0x0003 ; Number of locals 0123 INIT_0120: 0123 029f 06f3 | | Declare_Subprogram INIT_06f0,For_Call 0125 029f 070b | | Declare_Subprogram INIT_0708,For_Call 0127 BODY_0120: 0127 e5ff | | Load 0x2,-0x1 0128 e001 | | Load 0x0,0x1 0129 180f | | Execute Package,Field_Execute,Field_Number 0xf 012a 6802 |h | Jump_Zero 0x12d 012b 8402 | | Call 0x2,0x2 012c 7808 |x | Jump 0x135 012d e5ff | | Load 0x2,-0x1 012e e003 | | Load 0x0,0x3 012f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0130 e001 | | Load 0x0,0x1 0131 1b58 | X | Execute Package,Field_Read,Field_Number 0x58 0132 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0133 823a | : | Call 0x1,0x3a 0134 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0135 0831 | 1 | Execute_Immediate Raise,0x31 0136 TRAP_0120: 0136 0007 | | Action Break_Optional 0137 8403 | | Call 0x2,0x3 0138 0831 | 1 | Execute_Immediate Raise,0x31 0139 0000 0000 | | .BLANK 0000[0x7] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0145 | E | .CONST 0x0145 ; Address of begin 0141 0148 | H | .CONST 0x0148 ; Address of exception handler 0142 0002 | | .CONST 0x0002 ; Number of locals 0143 INIT_0140: 0143 029f 0723 | #| Declare_Subprogram INIT_0720,For_Call 0145 BODY_0140: 0145 00db | | Load_Top At_Offset_3 0146 823a | : | Call 0x1,0x3a 0147 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0148 TRAP_0140: 0148 0007 | | Action Break_Optional 0149 8402 | | Call 0x2,0x2 014a 0831 | 1 | Execute_Immediate Raise,0x31 014b 0000 0000 | | .BLANK 0000[0x5] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0155 | U | .CONST 0x0155 ; Address of begin 0151 015f | _ | .CONST 0x015f ; Address of exception handler 0152 0002 | | .CONST 0x0002 ; Number of locals 0153 INIT_0150: 0153 029f 073b | ;| Declare_Subprogram INIT_0738,For_Call 0155 BODY_0150: 0155 4800 |H | Short_Literal 0x0 0156 e002 | | Load 0x0,0x2 0157 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0158 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0159 e5ff | | Load 0x2,-0x1 015a e002 | | Load 0x0,0x2 015b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 015c 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 015d 823a | : | Call 0x1,0x3a 015e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 015f TRAP_0150: 015f 0007 | | Action Break_Optional 0160 8402 | | Call 0x2,0x2 0161 0831 | 1 | Execute_Immediate Raise,0x31 0162 0000 0000 | | .BLANK 0000[0x6] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0171 | q | .CONST 0x0171 ; Address of begin 0169 0179 | y | .CONST 0x0179 ; Address of exception handler 016a 0004 | | .CONST 0x0004 ; Number of locals 016b INIT_0168: 016b 029f 0753 | S| Declare_Subprogram INIT_0750,For_Call 016d 029f 0773 | s| Declare_Subprogram INIT_0770,For_Call 016f 029f 0793 | | Declare_Subprogram INIT_0790,For_Call 0171 BODY_0168: 0171 e5ff | | Load 0x2,-0x1 0172 e002 | | Load 0x0,0x2 0173 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0174 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0175 6801 |h | Jump_Zero 0x177 0176 8402 | | Call 0x2,0x2 0177 8403 | | Call 0x2,0x3 0178 0831 | 1 | Execute_Immediate Raise,0x31 0179 TRAP_0168: 0179 0007 | | Action Break_Optional 017a 8404 | | Call 0x2,0x4 017b 0831 | 1 | Execute_Immediate Raise,0x31 017c 0000 0000 | | .BLANK 0000[0x4] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0189 | | .CONST 0x0189 ; Address of begin 0181 019f | | .CONST 0x019f ; Address of exception handler 0182 0003 | | .CONST 0x0003 ; Number of locals 0183 INIT_0180: 0183 e20f | | Load 0x1,0xf 0184 02c7 | | Declare_Variable Any 0185 e222 | " | Load 0x1,0x22 0186 a402 | | Store_Unchecked 0x2,0x2 0187 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call 0189 BODY_0180: 0189 e5ff | | Load 0x2,-0x1 018a e002 | | Load 0x0,0x2 018b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018c 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 018d 680f |h | Jump_Zero 0x19d 018e 00d9 | | Load_Top At_Offset_1 018f 4829 |H) | Short_Literal 0x29 0190 0092 0939 | 9| Action Push_String_Extended,0x939 ; "Cannot determine parent (" 0192 e5ff | | Load 0x2,-0x1 0193 e002 | | Load 0x0,0x2 0194 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0195 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0196 01cc | | Execute Vector,Catenate 0197 01cb | | Execute Vector,Append 0198 4808 |H | Short_Literal 0x8 0199 822c | , | Call 0x1,0x2c 019a c402 | | Store 0x2,0x2 019b 00d9 | | Load_Top At_Offset_1 019c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019d 8403 | | Call 0x2,0x3 019e 0831 | 1 | Execute_Immediate Raise,0x31 019f TRAP_0180: 019f 0007 | | Action Break_Optional 01a0 00da | | Load_Top At_Offset_2 01a1 0092 093a | :| Action Push_String_Extended,0x93a ; "Parent" 01a3 8233 | 3 | Call 0x1,0x33 01a4 c402 | | Store 0x2,0x2 01a5 00da | | Load_Top At_Offset_2 01a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a7 0000 | | .XXX[0x1] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01be | | .CONST 0x01be ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0007 | | .CONST 0x0007 ; Number of locals 01ab INIT_01a8: 01ab e210 | | Load 0x1,0x10 01ac 02c7 | | Declare_Variable Any 01ad 00d8 | | Load_Top At_Offset_0 01ae 1c00 | | Execute_Immediate Run_Utility,0x0 01af 00e1 | | Load_Encached Boolean_Cache 01b0 e004 | | Load 0x0,0x4 01b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01b2 e211 | | Load 0x1,0x11 01b3 02c7 | | Declare_Variable Any 01b4 e5ff | | Load 0x2,-0x1 01b5 a405 | | Store_Unchecked 0x2,0x5 01b6 e212 | | Load 0x1,0x12 01b7 02c7 | | Declare_Variable Any 01b8 e002 | | Load 0x0,0x2 01b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ba 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 01bb a406 | | Store_Unchecked 0x2,0x6 01bc 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call 01be BODY_01a8: 01be e5ff | | Load 0x2,-0x1 01bf e002 | | Load 0x0,0x2 01c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01c1 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 01c2 6811 |h | Jump_Zero 0x1d4 01c3 e5fd | | Load 0x2,-0x3 01c4 0092 093b | ;| Action Push_String_Extended,0x93b ; "Unable to determine applicable views (Subsystem iterator is invalid (" 01c6 e5ff | | Load 0x2,-0x1 01c7 e002 | | Load 0x0,0x2 01c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01c9 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 01ca 01cc | | Execute Vector,Catenate 01cb 0092 093c | <| Action Push_String_Extended,0x93c ; "))" 01cd 01cc | | Execute Vector,Catenate 01ce e005 | | Load 0x0,0x5 01cf 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 01d0 e005 | | Load 0x0,0x5 01d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01d2 c5fd | | Store 0x2,-0x3 01d3 782d |x- | Jump 0x201 01d4 00da | | Load_Top At_Offset_2 01d5 e002 | | Load 0x0,0x2 01d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01d7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 01d8 00cf | | Action Mark_Auxiliary 01d9 7821 |x! | Jump 0x1fb 01da 00db | | Load_Top At_Offset_3 01db e002 | | Load 0x0,0x2 01dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01dd 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 01de 8217 | | Call 0x1,0x17 01df c402 | | Store 0x2,0x2 01e0 e402 | | Load 0x2,0x2 01e1 e002 | | Load 0x0,0x2 01e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01e3 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 01e4 680b |h | Jump_Zero 0x1f0 01e5 00e1 | | Load_Encached Boolean_Cache 01e6 e002 | | Load 0x0,0x2 01e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01e8 180e | | Execute Package,Field_Execute,Field_Number 0xe 01e9 e402 | | Load 0x2,0x2 01ea e406 | | Load 0x2,0x6 01eb e002 | | Load 0x0,0x2 01ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ed 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 01ee c403 | | Store 0x2,0x3 01ef 7805 |x | Jump 0x1f5 01f0 e402 | | Load 0x2,0x2 01f1 e002 | | Load 0x0,0x2 01f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01f3 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 01f4 8407 | | Call 0x2,0x7 01f5 00db | | Load_Top At_Offset_3 01f6 e002 | | Load 0x0,0x2 01f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01f8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01f9 c405 | | Store 0x2,0x5 01fa 00c9 | | Action Pop_Auxiliary_Loop 01fb 00db | | Load_Top At_Offset_3 01fc e002 | | Load 0x0,0x2 01fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01fe 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 01ff 6fda |o | Jump_Zero 0x1da 0200 00ce | | Action Pop_Auxiliary 0201 00d9 | | Load_Top At_Offset_1 0202 e002 | | Load 0x0,0x2 0203 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0204 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0205 00d9 | | Load_Top At_Offset_1 0206 c5fe | | Store 0x2,-0x2 0207 00db | | Load_Top At_Offset_3 0208 7005 |p | Jump_Nonzero 0x20e 0209 e5fd | | Load 0x2,-0x3 020a e005 | | Load 0x0,0x5 020b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 020c c5fd | | Store 0x2,-0x3 020d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 020e e5fd | | Load 0x2,-0x3 020f 4829 |H) | Short_Literal 0x29 0210 0092 093d | =| Action Push_String_Extended,0x93d ; "Some views could not be determined from the current activity (" 0212 e404 | | Load 0x2,0x4 0213 0217 | | Execute Heap_Access,All_Reference 0214 01cc | | Execute Vector,Catenate 0215 01cb | | Execute Vector,Append 0216 e005 | | Load 0x0,0x5 0217 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0218 e005 | | Load 0x0,0x5 0219 1813 | | Execute Package,Field_Execute,Field_Number 0x13 021a c5fd | | Store 0x2,-0x3 021b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 021c 0000 0000 | | .BLANK 0000[0x4] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0257 | W | .CONST 0x0257 ; Address of begin 0221 02f8 | | .CONST 0x02f8 ; Address of exception handler 0222 000c | | .CONST 0x000c ; Number of locals 0223 INIT_0220: 0223 e006 | | Load 0x0,0x6 0224 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0225 02c7 | | Declare_Variable Any 0226 00d8 | | Load_Top At_Offset_0 0227 1c00 | | Execute_Immediate Run_Utility,0x0 0228 e006 | | Load 0x0,0x6 0229 1b0f | | Execute Package,Field_Read,Field_Number 0xf 022a 02c7 | | Declare_Variable Any 022b 00d8 | | Load_Top At_Offset_0 022c 1c00 | | Execute_Immediate Run_Utility,0x0 022d 00e1 | | Load_Encached Boolean_Cache 022e e5ff | | Load 0x2,-0x1 022f e002 | | Load 0x0,0x2 0230 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0231 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0232 0092 093e | >| Action Push_String_Extended,0x93e ; ".STATE.IMPORTS" 0234 01cc | | Execute Vector,Catenate 0235 0007 | | Action Break_Optional 0236 e007 | | Load 0x0,0x7 0237 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0238 02c7 | | Declare_Variable Any 0239 00d8 | | Load_Top At_Offset_0 023a 1c00 | | Execute_Immediate Run_Utility,0x0 023b e006 | | Load 0x0,0x6 023c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 023d 02c7 | | Declare_Variable Any 023e 00d8 | | Load_Top At_Offset_0 023f 1c00 | | Execute_Immediate Run_Utility,0x0 0240 e007 | | Load 0x0,0x7 0241 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0242 02c7 | | Declare_Variable Any 0243 00d8 | | Load_Top At_Offset_0 0244 1c00 | | Execute_Immediate Run_Utility,0x0 0245 e002 | | Load 0x0,0x2 0246 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0247 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0248 02c7 | | Declare_Variable Any 0249 e002 | | Load 0x0,0x2 024a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 024b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 024c a409 | | Store_Unchecked 0x2,0x9 024d e006 | | Load 0x0,0x6 024e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 024f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0250 e006 | | Load 0x0,0x6 0251 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0252 e008 | | Load 0x0,0x8 0253 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0254 02c7 | | Declare_Variable Any 0255 00d8 | | Load_Top At_Offset_0 0256 1c00 | | Execute_Immediate Run_Utility,0x0 0257 BODY_0220: 0257 00be | | Action Activate_Tasks 0258 e5ff | | Load 0x2,-0x1 0259 e002 | | Load 0x0,0x2 025a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 025b 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 025c 680f |h | Jump_Zero 0x26c 025d 00db | | Load_Top At_Offset_3 025e 4829 |H) | Short_Literal 0x29 025f 0092 093f | ?| Action Push_String_Extended,0x93f ; "Cannot determine imported views (" 0261 e5ff | | Load 0x2,-0x1 0262 e002 | | Load 0x0,0x2 0263 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0264 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0265 01cc | | Execute Vector,Catenate 0266 01cb | | Execute Vector,Append 0267 4808 |H | Short_Literal 0x8 0268 822d | - | Call 0x1,0x2d 0269 c409 | | Store 0x2,0x9 026a 00db | | Load_Top At_Offset_3 026b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 026c e006 | | Load 0x0,0x6 026d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 026e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 026f e407 | | Load 0x2,0x7 0270 0120 | | Execute Any,Is_Value 0271 6803 |h | Jump_Zero 0x275 0272 e006 | | Load 0x0,0x6 0273 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0274 7801 |x | Jump 0x276 0275 e407 | | Load 0x2,0x7 0276 60a9 |` | Indirect_Literal Discrete,0x320,{0x00000000, 0x00028000} 0277 e009 | | Load 0x0,0x9 0278 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0279 e00a | | Load 0x0,0xa 027a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 027b e006 | | Load 0x0,0x6 027c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 027d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 027e e405 | | Load 0x2,0x5 027f e006 | | Load 0x0,0x6 0280 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0281 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0282 c407 | | Store 0x2,0x7 0283 005b | [ | Store_Top Discrete,At_Offset_3 0284 00db | | Load_Top At_Offset_3 0285 0092 0940 | @| Action Push_String_Extended,0x940 ; "Unable to obtain import set for " 0287 e5ff | | Load 0x2,-0x1 0288 e002 | | Load 0x0,0x2 0289 1b0e | | Execute Package,Field_Read,Field_Number 0xe 028a 1820 | | Execute Package,Field_Execute,Field_Number 0x20 028b 01cc | | Execute Vector,Catenate 028c e40a | | Load 0x2,0xa 028d 822f | / | Call 0x1,0x2f 028e c409 | | Store 0x2,0x9 028f e006 | | Load 0x0,0x6 0290 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0291 e408 | | Load 0x2,0x8 0292 0120 | | Execute Any,Is_Value 0293 6803 |h | Jump_Zero 0x297 0294 e007 | | Load 0x0,0x7 0295 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0296 7801 |x | Jump 0x298 0297 e408 | | Load 0x2,0x8 0298 4800 |H | Short_Literal 0x0 0299 4800 |H | Short_Literal 0x0 029a e009 | | Load 0x0,0x9 029b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 029c e407 | | Load 0x2,0x7 029d e007 | | Load 0x0,0x7 029e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 029f c408 | | Store 0x2,0x8 02a0 005a | Z | Store_Top Discrete,At_Offset_2 02a1 00db | | Load_Top At_Offset_3 02a2 0092 0941 | A| Action Push_String_Extended,0x941 ; "Unable to open the import set for " 02a4 e5ff | | Load 0x2,-0x1 02a5 e002 | | Load 0x0,0x2 02a6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02a7 1820 | | Execute Package,Field_Execute,Field_Number 0x20 02a8 01cc | | Execute Vector,Catenate 02a9 00db | | Load_Top At_Offset_3 02aa 8230 | 0 | Call 0x1,0x30 02ab c409 | | Store 0x2,0x9 02ac e006 | | Load 0x0,0x6 02ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ae 00d9 | | Load_Top At_Offset_1 02af 4800 |H | Short_Literal 0x0 02b0 4800 |H | Short_Literal 0x0 02b1 e009 | | Load 0x0,0x9 02b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02b3 e008 | | Load 0x0,0x8 02b4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02b5 e008 | | Load 0x0,0x8 02b6 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02b7 c40c | | Store 0x2,0xc 02b8 005a | Z | Store_Top Discrete,At_Offset_2 02b9 00db | | Load_Top At_Offset_3 02ba 0092 0942 | B| Action Push_String_Extended,0x942 ; "Unable to open the current activity" 02bc 00db | | Load_Top At_Offset_3 02bd 8230 | 0 | Call 0x1,0x30 02be c409 | | Store 0x2,0x9 02bf e406 | | Load 0x2,0x6 02c0 0120 | | Execute Any,Is_Value 02c1 6803 |h | Jump_Zero 0x2c5 02c2 e007 | | Load 0x0,0x7 02c3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02c4 7801 |x | Jump 0x2c6 02c5 e406 | | Load 0x2,0x6 02c6 e408 | | Load 0x2,0x8 02c7 e007 | | Load 0x0,0x7 02c8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02c9 c406 | | Store 0x2,0x6 02ca 00cf | | Action Mark_Auxiliary 02cb 7814 |x | Jump 0x2e0 02cc e406 | | Load 0x2,0x6 02cd e007 | | Load 0x0,0x7 02ce 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02cf c403 | | Store 0x2,0x3 02d0 00e1 | | Load_Encached Boolean_Cache 02d1 e002 | | Load 0x0,0x2 02d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02d3 180e | | Execute Package,Field_Execute,Field_Number 0xe 02d4 e403 | | Load 0x2,0x3 02d5 8239 | 9 | Call 0x1,0x39 02d6 e409 | | Load 0x2,0x9 02d7 e002 | | Load 0x0,0x2 02d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02d9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 02da c404 | | Store 0x2,0x4 02db e406 | | Load 0x2,0x6 02dc e007 | | Load 0x0,0x7 02dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02de c406 | | Store 0x2,0x6 02df 00c9 | | Action Pop_Auxiliary_Loop 02e0 e406 | | Load 0x2,0x6 02e1 e007 | | Load 0x0,0x7 02e2 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02e3 6fe8 |o | Jump_Zero 0x2cc 02e4 00ce | | Action Pop_Auxiliary 02e5 e006 | | Load 0x0,0x6 02e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02e7 00d9 | | Load_Top At_Offset_1 02e8 e008 | | Load 0x0,0x8 02e9 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02ea c40c | | Store 0x2,0xc 02eb 005a | Z | Store_Top Discrete,At_Offset_2 02ec e006 | | Load 0x0,0x6 02ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ee e408 | | Load 0x2,0x8 02ef e007 | | Load 0x0,0x7 02f0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02f1 005a | Z | Store_Top Discrete,At_Offset_2 02f2 00db | | Load_Top At_Offset_3 02f3 e002 | | Load 0x0,0x2 02f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02f5 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02f6 00db | | Load_Top At_Offset_3 02f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f8 TRAP_0220: 02f8 e00b | | Load 0x0,0xb 02f9 010f | | Execute Exception,Equal 02fa 680f |h | Jump_Zero 0x30a 02fb e006 | | Load 0x0,0x6 02fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02fd 00da | | Load_Top At_Offset_2 02fe e008 | | Load 0x0,0x8 02ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0300 c40c | | Store 0x2,0xc 0301 005b | [ | Store_Top Discrete,At_Offset_3 0302 e006 | | Load 0x0,0x6 0303 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0304 e408 | | Load 0x2,0x8 0305 e007 | | Load 0x0,0x7 0306 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0307 005b | [ | Store_Top Discrete,At_Offset_3 0308 e409 | | Load 0x2,0x9 0309 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 030a e409 | | Load 0x2,0x9 030b 0092 0943 | C| Action Push_String_Extended,0x943 ; "Imported_Views" 030d 8234 | 4 | Call 0x1,0x34 030e c409 | | Store 0x2,0x9 030f e006 | | Load 0x0,0x6 0310 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0311 00da | | Load_Top At_Offset_2 0312 e008 | | Load 0x0,0x8 0313 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0314 c40c | | Store 0x2,0xc 0315 005b | [ | Store_Top Discrete,At_Offset_3 0316 e006 | | Load 0x0,0x6 0317 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0318 e408 | | Load 0x2,0x8 0319 e007 | | Load 0x0,0x7 031a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 031b 005b | [ | Store_Top Discrete,At_Offset_3 031c e409 | | Load 0x2,0x9 031d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 031e 0000 0000 | | .XXX[0x2] 0320 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 0324 0000 0000 | | .BLANK 0000[0x4] 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 035e | ^ | .CONST 0x035e ; Address of begin 0329 0457 | W | .CONST 0x0457 ; Address of exception handler 032a 000d | | .CONST 0x000d ; Number of locals 032b INIT_0328: 032b e006 | | Load 0x0,0x6 032c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 032d 02c7 | | Declare_Variable Any 032e 00d8 | | Load_Top At_Offset_0 032f 1c00 | | Execute_Immediate Run_Utility,0x0 0330 e006 | | Load 0x0,0x6 0331 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0332 02c7 | | Declare_Variable Any 0333 00d8 | | Load_Top At_Offset_0 0334 1c00 | | Execute_Immediate Run_Utility,0x0 0335 00e1 | | Load_Encached Boolean_Cache 0336 e007 | | Load 0x0,0x7 0337 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0338 02c7 | | Declare_Variable Any 0339 00d8 | | Load_Top At_Offset_0 033a 1c00 | | Execute_Immediate Run_Utility,0x0 033b e006 | | Load 0x0,0x6 033c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 033d 02c7 | | Declare_Variable Any 033e 00d8 | | Load_Top At_Offset_0 033f 1c00 | | Execute_Immediate Run_Utility,0x0 0340 e007 | | Load 0x0,0x7 0341 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0342 02c7 | | Declare_Variable Any 0343 00d8 | | Load_Top At_Offset_0 0344 1c00 | | Execute_Immediate Run_Utility,0x0 0345 e002 | | Load 0x0,0x2 0346 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0347 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0348 02c7 | | Declare_Variable Any 0349 e002 | | Load 0x0,0x2 034a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 034b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 034c a408 | | Store_Unchecked 0x2,0x8 034d e006 | | Load 0x0,0x6 034e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 034f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0350 e006 | | Load 0x0,0x6 0351 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0352 e008 | | Load 0x0,0x8 0353 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0354 02c7 | | Declare_Variable Any 0355 00d8 | | Load_Top At_Offset_0 0356 1c00 | | Execute_Immediate Run_Utility,0x0 0357 e210 | | Load 0x1,0x10 0358 02c7 | | Declare_Variable Any 0359 e5ff | | Load 0x2,-0x1 035a 823c | < | Call 0x1,0x3c 035b a40c | | Store_Unchecked 0x2,0xc 035c 0092 0944 | D| Action Push_String_Extended,0x944 ; ".STATE.REFERENCERS" 035e BODY_0328: 035e 00be | | Action Activate_Tasks 035f e5ff | | Load 0x2,-0x1 0360 e002 | | Load 0x0,0x2 0361 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0362 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0363 680f |h | Jump_Zero 0x373 0364 e408 | | Load 0x2,0x8 0365 4829 |H) | Short_Literal 0x29 0366 0092 0945 | E| Action Push_String_Extended,0x945 ; "Cannot determine referencing views (" 0368 e5ff | | Load 0x2,-0x1 0369 e002 | | Load 0x0,0x2 036a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 036b 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 036c 01cc | | Execute Vector,Catenate 036d 01cb | | Execute Vector,Append 036e 4808 |H | Short_Literal 0x8 036f 822d | - | Call 0x1,0x2d 0370 c408 | | Store 0x2,0x8 0371 e408 | | Load 0x2,0x8 0372 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0373 00d9 | | Load_Top At_Offset_1 0374 e002 | | Load 0x0,0x2 0375 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0376 180f | | Execute Package,Field_Execute,Field_Number 0xf 0377 6810 |h | Jump_Zero 0x388 0378 e408 | | Load 0x2,0x8 0379 0092 0946 | F| Action Push_String_Extended,0x946 ; "No spec view defined for \x22" 037b e5ff | | Load 0x2,-0x1 037c e002 | | Load 0x0,0x2 037d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 037e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 037f 01cc | | Execute Vector,Catenate 0380 0092 0947 | G| Action Push_String_Extended,0x947 ; "\x22, referencer information may be lost." 0382 01cc | | Execute Vector,Catenate 0383 4801 |H | Short_Literal 0x1 0384 822d | - | Call 0x1,0x2d 0385 c408 | | Store 0x2,0x8 0386 e408 | | Load 0x2,0x8 0387 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0388 00d9 | | Load_Top At_Offset_1 0389 e002 | | Load 0x0,0x2 038a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 038b 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 038c 6817 |h | Jump_Zero 0x3a4 038d e408 | | Load 0x2,0x8 038e 4829 |H) | Short_Literal 0x29 038f 0092 0948 | H| Action Push_String_Extended,0x948 ; "Unable to obtain spec view for \x22" 0391 e5ff | | Load 0x2,-0x1 0392 e002 | | Load 0x0,0x2 0393 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0394 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0395 01cc | | Execute Vector,Catenate 0396 0092 0949 | I| Action Push_String_Extended,0x949 ; "\x22 (" 0398 01cc | | Execute Vector,Catenate 0399 e40c | | Load 0x2,0xc 039a e002 | | Load 0x0,0x2 039b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 039c 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 039d 01cc | | Execute Vector,Catenate 039e 01cb | | Execute Vector,Append 039f 4808 |H | Short_Literal 0x8 03a0 822d | - | Call 0x1,0x2d 03a1 c408 | | Store 0x2,0x8 03a2 e408 | | Load 0x2,0x8 03a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03a4 e006 | | Load 0x0,0x6 03a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03a6 00db | | Load_Top At_Offset_3 03a7 4800 |H | Short_Literal 0x0 03a8 4800 |H | Short_Literal 0x0 03a9 e009 | | Load 0x0,0x9 03aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03ab e008 | | Load 0x0,0x8 03ac 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03ad e008 | | Load 0x0,0x8 03ae 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03af c40b | | Store 0x2,0xb 03b0 c40a | | Store 0x2,0xa 03b1 e408 | | Load 0x2,0x8 03b2 0092 0942 | B| Action Push_String_Extended,0x942 ; "Unable to open the current activity" 03b4 e40a | | Load 0x2,0xa 03b5 8230 | 0 | Call 0x1,0x30 03b6 c408 | | Store 0x2,0x8 03b7 e006 | | Load 0x0,0x6 03b8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 03b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03ba e406 | | Load 0x2,0x6 03bb 0120 | | Execute Any,Is_Value 03bc 6803 |h | Jump_Zero 0x3c0 03bd e006 | | Load 0x0,0x6 03be 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03bf 7801 |x | Jump 0x3c1 03c0 e406 | | Load 0x2,0x6 03c1 675e |g^ | Indirect_Literal Discrete,0x320,{0x00000000, 0x00028000} 03c2 e009 | | Load 0x0,0x9 03c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03c4 e00a | | Load 0x0,0xa 03c5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03c6 e006 | | Load 0x0,0x6 03c7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 03c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03c9 e40c | | Load 0x2,0xc 03ca e002 | | Load 0x0,0x2 03cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03cc 1820 | | Execute Package,Field_Execute,Field_Number 0x20 03cd e40d | | Load 0x2,0xd 03ce 01cc | | Execute Vector,Catenate 03cf e006 | | Load 0x0,0x6 03d0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 03d1 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 03d2 c406 | | Store 0x2,0x6 03d3 c409 | | Store 0x2,0x9 03d4 e408 | | Load 0x2,0x8 03d5 0092 094a | J| Action Push_String_Extended,0x94a ; "Unable to obtain referencer set for " 03d7 00db | | Load_Top At_Offset_3 03d8 e002 | | Load 0x0,0x2 03d9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03da 1820 | | Execute Package,Field_Execute,Field_Number 0x20 03db 01cc | | Execute Vector,Catenate 03dc e409 | | Load 0x2,0x9 03dd 822f | / | Call 0x1,0x2f 03de c408 | | Store 0x2,0x8 03df e006 | | Load 0x0,0x6 03e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03e1 e407 | | Load 0x2,0x7 03e2 0120 | | Execute Any,Is_Value 03e3 6803 |h | Jump_Zero 0x3e7 03e4 e007 | | Load 0x0,0x7 03e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03e6 7801 |x | Jump 0x3e8 03e7 e407 | | Load 0x2,0x7 03e8 4800 |H | Short_Literal 0x0 03e9 4800 |H | Short_Literal 0x0 03ea e009 | | Load 0x0,0x9 03eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03ec e406 | | Load 0x2,0x6 03ed e007 | | Load 0x0,0x7 03ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ef c407 | | Store 0x2,0x7 03f0 c40a | | Store 0x2,0xa 03f1 e408 | | Load 0x2,0x8 03f2 0092 094b | K| Action Push_String_Extended,0x94b ; "Unable to open the referencer set for " 03f4 00db | | Load_Top At_Offset_3 03f5 e002 | | Load 0x0,0x2 03f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03f7 1820 | | Execute Package,Field_Execute,Field_Number 0x20 03f8 01cc | | Execute Vector,Catenate 03f9 e40a | | Load 0x2,0xa 03fa 8230 | 0 | Call 0x1,0x30 03fb c408 | | Store 0x2,0x8 03fc e405 | | Load 0x2,0x5 03fd 0120 | | Execute Any,Is_Value 03fe 6803 |h | Jump_Zero 0x402 03ff e007 | | Load 0x0,0x7 0400 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0401 7801 |x | Jump 0x403 0402 e405 | | Load 0x2,0x5 0403 e407 | | Load 0x2,0x7 0404 e007 | | Load 0x0,0x7 0405 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0406 c405 | | Store 0x2,0x5 0407 00cf | | Action Mark_Auxiliary 0408 7836 |x6 | Jump 0x43f 0409 e405 | | Load 0x2,0x5 040a e007 | | Load 0x0,0x7 040b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 040c c403 | | Store 0x2,0x3 040d e403 | | Load 0x2,0x3 040e 822b | + | Call 0x1,0x2b 040f 682a |h* | Jump_Zero 0x43a 0410 e403 | | Load 0x2,0x3 0411 8238 | 8 | Call 0x1,0x38 0412 6827 |h' | Jump_Zero 0x43a 0413 e403 | | Load 0x2,0x3 0414 e008 | | Load 0x0,0x8 0415 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0416 c402 | | Store 0x2,0x2 0417 00db | | Load_Top At_Offset_3 0418 e402 | | Load 0x2,0x2 0419 e008 | | Load 0x0,0x8 041a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 041b 6813 |h | Jump_Zero 0x42f 041c e403 | | Load 0x2,0x3 041d e40b | | Load 0x2,0xb 041e e402 | | Load 0x2,0x2 041f e008 | | Load 0x0,0x8 0420 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0421 012f | / | Execute Any,Equal 0422 6817 |h | Jump_Zero 0x43a 0423 00e1 | | Load_Encached Boolean_Cache 0424 e002 | | Load 0x0,0x2 0425 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0426 180e | | Execute Package,Field_Execute,Field_Number 0xe 0427 e403 | | Load 0x2,0x3 0428 8239 | 9 | Call 0x1,0x39 0429 e408 | | Load 0x2,0x8 042a e002 | | Load 0x0,0x2 042b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 042c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 042d c404 | | Store 0x2,0x4 042e 780b |x | Jump 0x43a 042f e408 | | Load 0x2,0x8 0430 4808 |H | Short_Literal 0x8 0431 0092 094c | L| Action Push_String_Extended,0x94c ; "The current activity has no entry for " 0433 e402 | | Load 0x2,0x2 0434 e006 | | Load 0x0,0x6 0435 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0436 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0437 01cc | | Execute Vector,Catenate 0438 8232 | 2 | Call 0x1,0x32 0439 c408 | | Store 0x2,0x8 043a e405 | | Load 0x2,0x5 043b e007 | | Load 0x0,0x7 043c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 043d c405 | | Store 0x2,0x5 043e 00c9 | | Action Pop_Auxiliary_Loop 043f e405 | | Load 0x2,0x5 0440 e007 | | Load 0x0,0x7 0441 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0442 6fc6 |o | Jump_Zero 0x409 0443 00ce | | Action Pop_Auxiliary 0444 e006 | | Load 0x0,0x6 0445 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0446 00db | | Load_Top At_Offset_3 0447 e008 | | Load 0x0,0x8 0448 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0449 c40b | | Store 0x2,0xb 044a c40a | | Store 0x2,0xa 044b e006 | | Load 0x0,0x6 044c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 044d e407 | | Load 0x2,0x7 044e e007 | | Load 0x0,0x7 044f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0450 c40a | | Store 0x2,0xa 0451 e408 | | Load 0x2,0x8 0452 e002 | | Load 0x0,0x2 0453 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0454 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0455 e408 | | Load 0x2,0x8 0456 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0457 TRAP_0328: 0457 e00b | | Load 0x0,0xb 0458 010f | | Execute Exception,Equal 0459 680f |h | Jump_Zero 0x469 045a e006 | | Load 0x0,0x6 045b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 045c e40b | | Load 0x2,0xb 045d e008 | | Load 0x0,0x8 045e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 045f c40b | | Store 0x2,0xb 0460 c40a | | Store 0x2,0xa 0461 e006 | | Load 0x0,0x6 0462 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0463 e407 | | Load 0x2,0x7 0464 e007 | | Load 0x0,0x7 0465 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0466 c40a | | Store 0x2,0xa 0467 e408 | | Load 0x2,0x8 0468 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0469 e408 | | Load 0x2,0x8 046a 0092 094d | M| Action Push_String_Extended,0x94d ; "Referencing_Views" 046c 8234 | 4 | Call 0x1,0x34 046d c408 | | Store 0x2,0x8 046e e006 | | Load 0x0,0x6 046f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0470 e40b | | Load 0x2,0xb 0471 e008 | | Load 0x0,0x8 0472 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0473 c40b | | Store 0x2,0xb 0474 c40a | | Store 0x2,0xa 0475 e006 | | Load 0x0,0x6 0476 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0477 e407 | | Load 0x2,0x7 0478 e007 | | Load 0x0,0x7 0479 1811 | | Execute Package,Field_Execute,Field_Number 0x11 047a c40a | | Store 0x2,0xa 047b e408 | | Load 0x2,0x8 047c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 047d 0000 0000 | | .XXX[0x3] 047f 0000 | | 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 048b | | .CONST 0x048b ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0003 | | .CONST 0x0003 ; Number of locals 0483 INIT_0480: 0483 e006 | | Load 0x0,0x6 0484 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0485 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0486 02c7 | | Declare_Variable Any 0487 00d8 | | Load_Top At_Offset_0 0488 1c00 | | Execute_Immediate Run_Utility,0x0 0489 e006 | | Load 0x0,0x6 048a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 048b BODY_0480: 048b e006 | | Load 0x0,0x6 048c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 048d 00da | | Load_Top At_Offset_2 048e 0120 | | Execute Any,Is_Value 048f 6804 |h | Jump_Zero 0x494 0490 e006 | | Load 0x0,0x6 0491 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0492 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0493 7801 |x | Jump 0x495 0494 00da | | Load_Top At_Offset_2 0495 e5ff | | Load 0x2,-0x1 0496 e006 | | Load 0x0,0x6 0497 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0498 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0499 c402 | | Store 0x2,0x2 049a 0059 | Y | Store_Top Discrete,At_Offset_1 049b 00d8 | | Load_Top At_Offset_0 049c 0f00 | | Execute_Immediate Equal,0x0 049d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 049e 0000 0000 | | .XXX[0x2] 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 e002 | | Load 0x0,0x2 04a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04a5 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 04a6 e002 | | Load 0x0,0x2 04a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04a8 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 04a9 e002 | | Load 0x0,0x2 04aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04ab 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 04ac e5fe | | Load 0x2,-0x2 04ad e5ff | | Load 0x2,-0x1 04ae e002 | | Load 0x0,0x2 04af 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04b0 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 04b1 e5fd | | Load 0x2,-0x3 04b2 e002 | | Load 0x0,0x2 04b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04b4 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 04b5 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04b6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04b7 0000 | | .XXX[0x1] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04c3 | | .CONST 0x04c3 ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0002 | | .CONST 0x0002 ; Number of locals 04bb INIT_04b8: 04bb e002 | | Load 0x0,0x2 04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04bd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04be 02c7 | | Declare_Variable Any 04bf e002 | | Load 0x0,0x2 04c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04c1 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 04c2 a402 | | Store_Unchecked 0x2,0x2 04c3 BODY_04b8: 04c3 e002 | | Load 0x0,0x2 04c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04c5 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 04c6 e002 | | Load 0x0,0x2 04c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04c8 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 04c9 e002 | | Load 0x0,0x2 04ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04cb 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 04cc e5fe | | Load 0x2,-0x2 04cd e5ff | | Load 0x2,-0x1 04ce e002 | | Load 0x0,0x2 04cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04d0 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 04d1 e5fd | | Load 0x2,-0x3 04d2 e002 | | Load 0x0,0x2 04d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04d4 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 04d5 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 04d6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04d7 0000 | | .XXX[0x1] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db 00da | | Load_Top At_Offset_2 04dc 680b |h | Jump_Zero 0x4e8 04dd e5fd | | Load 0x2,-0x3 04de e5fe | | Load 0x2,-0x2 04df e5ff | | Load 0x2,-0x1 04e0 e002 | | Load 0x0,0x2 04e1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04e2 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 04e3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 04e4 822c | , | Call 0x1,0x2c 04e5 c5fd | | Store 0x2,-0x3 04e6 e00b | | Load 0x0,0xb 04e7 0257 | W | Execute Discrete,Raise 04e8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04e9 0000 0000 | | .BLANK 0000[0x7] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 04f3 | | .CONST 0x04f3 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0001 | | .CONST 0x0001 ; Number of locals 04f3 BODY_04f0: 04f3 INIT_04f0: 04f3 00da | | Load_Top At_Offset_2 04f4 680b |h | Jump_Zero 0x500 04f5 e5fd | | Load 0x2,-0x3 04f6 e5fe | | Load 0x2,-0x2 04f7 e5ff | | Load 0x2,-0x1 04f8 e002 | | Load 0x0,0x2 04f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04fa 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 04fb 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 04fc 822d | - | Call 0x1,0x2d 04fd c5fd | | Store 0x2,-0x3 04fe e00b | | Load 0x0,0xb 04ff 0257 | W | Execute Discrete,Raise 0500 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0501 0000 0000 | | .BLANK 0000[0x7] 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 050b | | .CONST 0x050b ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0001 | | .CONST 0x0001 ; Number of locals 050b BODY_0508: 050b INIT_0508: 050b 00da | | Load_Top At_Offset_2 050c 680b |h | Jump_Zero 0x518 050d e5fd | | Load 0x2,-0x3 050e e5fe | | Load 0x2,-0x2 050f e5ff | | Load 0x2,-0x1 0510 e002 | | Load 0x0,0x2 0511 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0512 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0513 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0514 822d | - | Call 0x1,0x2d 0515 c5fd | | Store 0x2,-0x3 0516 e00b | | Load 0x0,0xb 0517 0257 | W | Execute Discrete,Raise 0518 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0519 0000 0000 | | .BLANK 0000[0x7] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0523 | # | .CONST 0x0523 ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0001 | | .CONST 0x0001 ; Number of locals 0523 BODY_0520: 0523 INIT_0520: 0523 e5fd | | Load 0x2,-0x3 0524 00db | | Load_Top At_Offset_3 0525 e5fe | | Load 0x2,-0x2 0526 822c | , | Call 0x1,0x2c 0527 c5fd | | Store 0x2,-0x3 0528 e00b | | Load 0x0,0xb 0529 0257 | W | Execute Discrete,Raise 052a 0000 0000 | | .BLANK 0000[0x6] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0533 | 3 | .CONST 0x0533 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0001 | | .CONST 0x0001 ; Number of locals 0533 BODY_0530: 0533 INIT_0530: 0533 e5fd | | Load 0x2,-0x3 0534 00db | | Load_Top At_Offset_3 0535 e5fe | | Load 0x2,-0x2 0536 822d | - | Call 0x1,0x2d 0537 c5fd | | Store 0x2,-0x3 0538 e00b | | Load 0x0,0xb 0539 0257 | W | Execute Discrete,Raise 053a 0000 0000 | | .BLANK 0000[0x6] 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 0540 ; -------------------------------------------------------------------------------------- 0540 0543 | C | .CONST 0x0543 ; Address of begin 0541 0004 | | .CONST 0x0004 ; Address of exception handler 0542 0001 | | .CONST 0x0001 ; Number of locals 0543 BODY_0540: 0543 INIT_0540: 0543 00db | | Load_Top At_Offset_3 0544 4829 |H) | Short_Literal 0x29 0545 0092 094e | N| Action Push_String_Extended,0x94e ; "Unhandled exception in Hierarchy_Operations." 0547 e5ff | | Load 0x2,-0x1 0548 01cc | | Execute Vector,Catenate 0549 0092 094f | O| Action Push_String_Extended,0x94f ; " (" 054b 01cc | | Execute Vector,Catenate 054c e005 | | Load 0x0,0x5 054d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 054e 01cc | | Execute Vector,Catenate 054f 01cb | | Execute Vector,Append 0550 4801 |H | Short_Literal 0x1 0551 822c | , | Call 0x1,0x2c 0552 c5fe | | Store 0x2,-0x2 0553 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0554 0000 0000 | | .BLANK 0000[0x4] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 055b | [ | .CONST 0x055b ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0001 | | .CONST 0x0001 ; Number of locals 055b BODY_0558: 055b INIT_0558: 055b 00db | | Load_Top At_Offset_3 055c 4829 |H) | Short_Literal 0x29 055d 0092 094e | N| Action Push_String_Extended,0x94e ; "Unhandled exception in Hierarchy_Operations." 055f e5ff | | Load 0x2,-0x1 0560 01cc | | Execute Vector,Catenate 0561 0092 094f | O| Action Push_String_Extended,0x94f ; " (" 0563 01cc | | Execute Vector,Catenate 0564 e005 | | Load 0x0,0x5 0565 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0566 01cc | | Execute Vector,Catenate 0567 01cb | | Execute Vector,Append 0568 4801 |H | Short_Literal 0x1 0569 822d | - | Call 0x1,0x2d 056a c5fe | | Store 0x2,-0x2 056b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 056c 0000 0000 | | .BLANK 0000[0x4] 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 0578 | x | .CONST 0x0578 ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0002 | | .CONST 0x0002 ; Number of locals 0573 INIT_0570: 0573 00da | | Load_Top At_Offset_2 0574 e002 | | Load 0x0,0x2 0575 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0576 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0577 8224 | $ | Call 0x1,0x24 0578 BODY_0570: 0578 00d8 | | Load_Top At_Offset_0 0579 e227 | ' | Load 0x1,0x27 057a 027f | | Execute Discrete,Equal 057b 7004 |p | Jump_Nonzero 0x580 057c 00d8 | | Load_Top At_Offset_0 057d e225 | % | Load 0x1,0x25 057e 027f | | Execute Discrete,Equal 057f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0580 4801 |H | Short_Literal 0x1 0581 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0582 0000 0000 | | .BLANK 0000[0x6] 0588 ; -------------------------------------------------------------------------------------- 0588 ; SUBPROGRAM 0588 ; -------------------------------------------------------------------------------------- 0588 058b | | .CONST 0x058b ; Address of begin 0589 0004 | | .CONST 0x0004 ; Address of exception handler 058a 0001 | | .CONST 0x0001 ; Number of locals 058b BODY_0588: 058b INIT_0588: 058b 00da | | Load_Top At_Offset_2 058c e228 | ( | Load 0x1,0x28 058d 027f | | Execute Discrete,Equal 058e 7010 |p | Jump_Nonzero 0x59f 058f 00da | | Load_Top At_Offset_2 0590 e229 | ) | Load 0x1,0x29 0591 027f | | Execute Discrete,Equal 0592 700a |p | Jump_Nonzero 0x59d 0593 00da | | Load_Top At_Offset_2 0594 e22a | * | Load 0x1,0x2a 0595 027f | | Execute Discrete,Equal 0596 7004 |p | Jump_Nonzero 0x59b 0597 00da | | Load_Top At_Offset_2 0598 e226 | & | Load 0x1,0x26 0599 027f | | Execute Discrete,Equal 059a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 059b 4801 |H | Short_Literal 0x1 059c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 059d 4801 |H | Short_Literal 0x1 059e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 059f 4801 |H | Short_Literal 0x1 05a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a1 0000 0000 | | .BLANK 0000[0x7] 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05b0 | | .CONST 0x05b0 ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0002 | | .CONST 0x0002 ; Number of locals 05ab INIT_05a8: 05ab 00da | | Load_Top At_Offset_2 05ac e002 | | Load 0x0,0x2 05ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05ae 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05af 8224 | $ | Call 0x1,0x24 05b0 BODY_05a8: 05b0 00d8 | | Load_Top At_Offset_0 05b1 8236 | 6 | Call 0x1,0x36 05b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05b3 0000 0000 | | .BLANK 0000[0x5] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05be | | .CONST 0x05be ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0002 | | .CONST 0x0002 ; Number of locals 05bb INIT_05b8: 05bb 00da | | Load_Top At_Offset_2 05bc e006 | | Load 0x0,0x6 05bd 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 05be BODY_05b8: 05be 00d8 | | Load_Top At_Offset_0 05bf 8236 | 6 | Call 0x1,0x36 05c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05c1 0000 0000 | | .BLANK 0000[0x7] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cb | | .CONST 0x05cb ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0001 | | .CONST 0x0001 ; Number of locals 05cb BODY_05c8: 05cb INIT_05c8: 05cb e002 | | Load 0x0,0x2 05cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05cd 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 05ce 180e | | Execute Package,Field_Execute,Field_Number 0xe 05cf 00eb | | Load_Encached Diana_Cache 05d0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05d1 00eb | | Load_Encached Diana_Cache 05d2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05d3 e006 | | Load 0x0,0x6 05d4 181e | | Execute Package,Field_Execute,Field_Number 0x1e 05d5 e006 | | Load 0x0,0x6 05d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05d7 e5ff | | Load 0x2,-0x1 05d8 00ea | | Load_Encached Null_String_Cache 05d9 e002 | | Load 0x0,0x2 05da 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05db 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 05dc e002 | | Load 0x0,0x2 05dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05de 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 05df 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 05e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05e1 0000 0000 | | .BLANK 0000[0x7] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05f1 | | .CONST 0x05f1 ; Address of begin 05e9 0616 | | .CONST 0x0616 ; Address of exception handler 05ea 0003 | | .CONST 0x0003 ; Number of locals 05eb INIT_05e8: 05eb e210 | | Load 0x1,0x10 05ec 02c7 | | Declare_Variable Any 05ed e222 | " | Load 0x1,0x22 05ee a402 | | Store_Unchecked 0x2,0x2 05ef 029f 0803 | | Declare_Subprogram INIT_0800,For_Call 05f1 BODY_05e8: 05f1 e5ff | | Load 0x2,-0x1 05f2 e002 | | Load 0x0,0x2 05f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05f4 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 05f5 7003 |p | Jump_Nonzero 0x5f9 05f6 e5ff | | Load 0x2,-0x1 05f7 8237 | 7 | Call 0x1,0x37 05f8 6802 |h | Jump_Zero 0x5fb 05f9 e5ff | | Load 0x2,-0x1 05fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05fb e5ff | | Load 0x2,-0x1 05fc 8235 | 5 | Call 0x1,0x35 05fd 6803 |h | Jump_Zero 0x601 05fe 8403 | | Call 0x2,0x3 05ff 00d9 | | Load_Top At_Offset_1 0600 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0601 e5ff | | Load 0x2,-0x1 0602 e002 | | Load 0x0,0x2 0603 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0604 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0605 c402 | | Store 0x2,0x2 0606 00d9 | | Load_Top At_Offset_1 0607 8237 | 7 | Call 0x1,0x37 0608 700b |p | Jump_Nonzero 0x614 0609 00d9 | | Load_Top At_Offset_1 060a e5ff | | Load 0x2,-0x1 060b e002 | | Load 0x0,0x2 060c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 060d 1820 | | Execute Package,Field_Execute,Field_Number 0x20 060e 0092 0950 | P| Action Push_String_Extended,0x950 ; " is not enclosed within a view." 0610 01cc | | Execute Vector,Catenate 0611 4811 |H | Short_Literal 0x11 0612 822c | , | Call 0x1,0x2c 0613 c402 | | Store 0x2,0x2 0614 00d9 | | Load_Top At_Offset_1 0615 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0616 TRAP_05e8: 0616 e00b | | Load 0x0,0xb 0617 010f | | Execute Exception,Equal 0618 6802 |h | Jump_Zero 0x61b 0619 00da | | Load_Top At_Offset_2 061a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 061b 00da | | Load_Top At_Offset_2 061c 0092 0951 | Q| Action Push_String_Extended,0x951 ; "Find_View" 061e 8233 | 3 | Call 0x1,0x33 061f c402 | | Store 0x2,0x2 0620 00da | | Load_Top At_Offset_2 0621 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0622 0000 0000 | | .BLANK 0000[0x6] 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 062f | / | .CONST 0x062f ; Address of begin 0629 0655 | U | .CONST 0x0655 ; Address of exception handler 062a 0002 | | .CONST 0x0002 ; Number of locals 062b INIT_0628: 062b e20f | | Load 0x1,0xf 062c 02c7 | | Declare_Variable Any 062d 00d8 | | Load_Top At_Offset_0 062e 1c00 | | Execute_Immediate Run_Utility,0x0 062f BODY_0628: 062f 00db | | Load_Top At_Offset_3 0630 e002 | | Load 0x0,0x2 0631 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0632 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0633 7003 |p | Jump_Nonzero 0x637 0634 00db | | Load_Top At_Offset_3 0635 8235 | 5 | Call 0x1,0x35 0636 6802 |h | Jump_Zero 0x639 0637 00db | | Load_Top At_Offset_3 0638 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0639 00db | | Load_Top At_Offset_3 063a 8237 | 7 | Call 0x1,0x37 063b 6815 |h | Jump_Zero 0x651 063c 00db | | Load_Top At_Offset_3 063d e002 | | Load 0x0,0x2 063e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 063f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0640 c402 | | Store 0x2,0x2 0641 00d8 | | Load_Top At_Offset_0 0642 8235 | 5 | Call 0x1,0x35 0643 700b |p | Jump_Nonzero 0x64f 0644 00d8 | | Load_Top At_Offset_0 0645 e5ff | | Load 0x2,-0x1 0646 e002 | | Load 0x0,0x2 0647 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0648 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0649 0092 0952 | R| Action Push_String_Extended,0x952 ; " is not enclosed within a subsystem." 064b 01cc | | Execute Vector,Catenate 064c 4811 |H | Short_Literal 0x11 064d 822c | , | Call 0x1,0x2c 064e c402 | | Store 0x2,0x2 064f 00d8 | | Load_Top At_Offset_0 0650 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0651 00db | | Load_Top At_Offset_3 0652 823a | : | Call 0x1,0x3a 0653 823b | ; | Call 0x1,0x3b 0654 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0655 TRAP_0628: 0655 0007 | | Action Break_Optional 0656 00d9 | | Load_Top At_Offset_1 0657 0092 0953 | S| Action Push_String_Extended,0x953 ; "Find_Subsystem" 0659 8233 | 3 | Call 0x1,0x33 065a c402 | | Store 0x2,0x2 065b 00d9 | | Load_Top At_Offset_1 065c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 065d 0000 0000 | | .XXX[0x3] 065f 0000 | | 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 066e | n | .CONST 0x066e ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0004 | | .CONST 0x0004 ; Number of locals 0663 INIT_0660: 0663 00da | | Load_Top At_Offset_2 0664 e002 | | Load 0x0,0x2 0665 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0666 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0667 8224 | $ | Call 0x1,0x24 0668 e223 | # | Load 0x1,0x23 0669 03f1 | | Declare_Variable Discrete,With_Value 066a 029f 089b | | Declare_Subprogram INIT_0898,For_Call 066c 029f 0923 | #| Declare_Subprogram INIT_0920,For_Call 066e BODY_0660: 066e e5ff | | Load 0x2,-0x1 066f e002 | | Load 0x0,0x2 0670 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0671 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0672 7004 |p | Jump_Nonzero 0x677 0673 00da | | Load_Top At_Offset_2 0674 e228 | ( | Load 0x1,0x28 0675 027f | | Execute Discrete,Equal 0676 6802 |h | Jump_Zero 0x679 0677 e5ff | | Load 0x2,-0x1 0678 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0679 00da | | Load_Top At_Offset_2 067a e229 | ) | Load 0x1,0x29 067b 027f | | Execute Discrete,Equal 067c 6802 |h | Jump_Zero 0x67f 067d 8403 | | Call 0x2,0x3 067e 780a |x | Jump 0x689 067f 00da | | Load_Top At_Offset_2 0680 e226 | & | Load 0x1,0x26 0681 027f | | Execute Discrete,Equal 0682 6802 |h | Jump_Zero 0x685 0683 8404 | | Call 0x2,0x4 0684 7804 |x | Jump 0x689 0685 e5ff | | Load 0x2,-0x1 0686 8217 | | Call 0x1,0x17 0687 823c | < | Call 0x1,0x3c 0688 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0689 0831 | 1 | Execute_Immediate Raise,0x31 068a 0000 0000 | | .BLANK 0000[0x6] 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 0699 | | .CONST 0x0699 ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0002 | | .CONST 0x0002 ; Number of locals 0693 INIT_0690: 0693 e002 | | Load 0x0,0x2 0694 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0695 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0696 02c7 | | Declare_Variable Any 0697 e222 | " | Load 0x1,0x22 0698 a602 | | Store_Unchecked 0x3,0x2 0699 BODY_0690: 0699 00d8 | | Load_Top At_Offset_0 069a 0092 0954 | T| Action Push_String_Extended,0x954 ; "Nil Elements have no enclosing subsystem" 069c 4808 |H | Short_Literal 0x8 069d 822c | , | Call 0x1,0x2c 069e c602 | | Store 0x3,0x2 069f 00d8 | | Load_Top At_Offset_0 06a0 00cb | | Action Pop_Block_With_Result 06a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06a2 0000 0000 | | .BLANK 0000[0x6] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06b1 | | .CONST 0x06b1 ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0002 | | .CONST 0x0002 ; Number of locals 06ab INIT_06a8: 06ab e002 | | Load 0x0,0x2 06ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06ae 02c7 | | Declare_Variable Any 06af e222 | " | Load 0x1,0x22 06b0 a602 | | Store_Unchecked 0x3,0x2 06b1 BODY_06a8: 06b1 00d8 | | Load_Top At_Offset_0 06b2 0092 0955 | U| Action Push_String_Extended,0x955 ; "Enclosing_Subsystem" 06b4 8233 | 3 | Call 0x1,0x33 06b5 c602 | | Store 0x3,0x2 06b6 00d8 | | Load_Top At_Offset_0 06b7 00cb | | Action Pop_Block_With_Result 06b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06b9 0000 0000 | | .BLANK 0000[0x7] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c9 | | .CONST 0x06c9 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0002 | | .CONST 0x0002 ; Number of locals 06c3 INIT_06c0: 06c3 e002 | | Load 0x0,0x2 06c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06c6 02c7 | | Declare_Variable Any 06c7 e222 | " | Load 0x1,0x22 06c8 a602 | | Store_Unchecked 0x3,0x2 06c9 BODY_06c0: 06c9 00d8 | | Load_Top At_Offset_0 06ca 0092 0955 | U| Action Push_String_Extended,0x955 ; "Enclosing_Subsystem" 06cc 8233 | 3 | Call 0x1,0x33 06cd c602 | | Store 0x3,0x2 06ce 00d8 | | Load_Top At_Offset_0 06cf 00cb | | Action Pop_Block_With_Result 06d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06d1 0000 0000 | | .BLANK 0000[0x7] 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; SUBPROGRAM 06d8 ; -------------------------------------------------------------------------------------- 06d8 06e1 | | .CONST 0x06e1 ; Address of begin 06d9 0004 | | .CONST 0x0004 ; Address of exception handler 06da 0002 | | .CONST 0x0002 ; Number of locals 06db INIT_06d8: 06db e002 | | Load 0x0,0x2 06dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06de 02c7 | | Declare_Variable Any 06df e222 | " | Load 0x1,0x22 06e0 a602 | | Store_Unchecked 0x3,0x2 06e1 BODY_06d8: 06e1 00d8 | | Load_Top At_Offset_0 06e2 0092 0955 | U| Action Push_String_Extended,0x955 ; "Enclosing_Subsystem" 06e4 8233 | 3 | Call 0x1,0x33 06e5 c602 | | Store 0x3,0x2 06e6 00d8 | | Load_Top At_Offset_0 06e7 00cb | | Action Pop_Block_With_Result 06e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06e9 0000 0000 | | .BLANK 0000[0x7] 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f9 | | .CONST 0x06f9 ; Address of begin 06f1 0004 | | .CONST 0x0004 ; Address of exception handler 06f2 0002 | | .CONST 0x0002 ; Number of locals 06f3 INIT_06f0: 06f3 e002 | | Load 0x0,0x2 06f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06f6 02c7 | | Declare_Variable Any 06f7 e222 | " | Load 0x1,0x22 06f8 a602 | | Store_Unchecked 0x3,0x2 06f9 BODY_06f0: 06f9 00d8 | | Load_Top At_Offset_0 06fa 0092 0956 | V| Action Push_String_Extended,0x956 ; "Nil Elements have no enclosing view" 06fc 4808 |H | Short_Literal 0x8 06fd 822c | , | Call 0x1,0x2c 06fe c602 | | Store 0x3,0x2 06ff 00d8 | | Load_Top At_Offset_0 0700 00cb | | Action Pop_Block_With_Result 0701 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0702 0000 0000 | | .BLANK 0000[0x6] 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 0711 | | .CONST 0x0711 ; Address of begin 0709 0004 | | .CONST 0x0004 ; Address of exception handler 070a 0002 | | .CONST 0x0002 ; Number of locals 070b INIT_0708: 070b e002 | | Load 0x0,0x2 070c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 070d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 070e 02c7 | | Declare_Variable Any 070f e222 | " | Load 0x1,0x22 0710 a602 | | Store_Unchecked 0x3,0x2 0711 BODY_0708: 0711 00d8 | | Load_Top At_Offset_0 0712 0092 0957 | W| Action Push_String_Extended,0x957 ; "Enclosing_View" 0714 8233 | 3 | Call 0x1,0x33 0715 c602 | | Store 0x3,0x2 0716 00d8 | | Load_Top At_Offset_0 0717 00cb | | Action Pop_Block_With_Result 0718 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0719 0000 0000 | | .BLANK 0000[0x7] 0720 ; -------------------------------------------------------------------------------------- 0720 ; SUBPROGRAM 0720 ; -------------------------------------------------------------------------------------- 0720 0729 | ) | .CONST 0x0729 ; Address of begin 0721 0004 | | .CONST 0x0004 ; Address of exception handler 0722 0002 | | .CONST 0x0002 ; Number of locals 0723 INIT_0720: 0723 e002 | | Load 0x0,0x2 0724 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0725 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0726 02c7 | | Declare_Variable Any 0727 e222 | " | Load 0x1,0x22 0728 a602 | | Store_Unchecked 0x3,0x2 0729 BODY_0720: 0729 00d8 | | Load_Top At_Offset_0 072a 0092 0957 | W| Action Push_String_Extended,0x957 ; "Enclosing_View" 072c 8233 | 3 | Call 0x1,0x33 072d c602 | | Store 0x3,0x2 072e 00d8 | | Load_Top At_Offset_0 072f 00cb | | Action Pop_Block_With_Result 0730 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0731 0000 0000 | | .BLANK 0000[0x7] 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 0741 | A | .CONST 0x0741 ; Address of begin 0739 0004 | | .CONST 0x0004 ; Address of exception handler 073a 0002 | | .CONST 0x0002 ; Number of locals 073b INIT_0738: 073b e002 | | Load 0x0,0x2 073c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 073d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 073e 02c7 | | Declare_Variable Any 073f e222 | " | Load 0x1,0x22 0740 a602 | | Store_Unchecked 0x3,0x2 0741 BODY_0738: 0741 00d8 | | Load_Top At_Offset_0 0742 0092 0957 | W| Action Push_String_Extended,0x957 ; "Enclosing_View" 0744 8233 | 3 | Call 0x1,0x33 0745 c602 | | Store 0x3,0x2 0746 00d8 | | Load_Top At_Offset_0 0747 00cb | | Action Pop_Block_With_Result 0748 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0749 0000 0000 | | .BLANK 0000[0x7] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 075b | [ | .CONST 0x075b ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0002 | | .CONST 0x0002 ; Number of locals 0753 INIT_0750: 0753 e002 | | Load 0x0,0x2 0754 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0755 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0756 02c7 | | Declare_Variable Any 0757 e002 | | Load 0x0,0x2 0758 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0759 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 075a a602 | | Store_Unchecked 0x3,0x2 075b BODY_0750: 075b 00d8 | | Load_Top At_Offset_0 075c 4829 |H) | Short_Literal 0x29 075d 0092 0958 | X| Action Push_String_Extended,0x958 ; "Cannot determine children (" 075f e5ff | | Load 0x2,-0x1 0760 e002 | | Load 0x0,0x2 0761 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0762 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0763 01cc | | Execute Vector,Catenate 0764 01cb | | Execute Vector,Append 0765 4808 |H | Short_Literal 0x8 0766 822d | - | Call 0x1,0x2d 0767 c602 | | Store 0x3,0x2 0768 00d8 | | Load_Top At_Offset_0 0769 00cb | | Action Pop_Block_With_Result 076a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 076b 0000 0000 | | .BLANK 0000[0x5] 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 077c | | | .CONST 0x077c ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0002 | | .CONST 0x0002 ; Number of locals 0773 INIT_0770: 0773 0092 0959 | Y| Action Push_String_Extended,0x959 ; "<WARN>" 0775 e5fe | | Load 0x2,-0x2 0776 e5ff | | Load 0x2,-0x1 0777 e002 | | Load 0x0,0x2 0778 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0779 1820 | | Execute Package,Field_Execute,Field_Number 0x20 077a e00c | | Load 0x0,0xc 077b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 077c BODY_0770: 077c 00d8 | | Load_Top At_Offset_0 077d e221 | ! | Load 0x1,0x21 077e 01df | | Execute Vector,Equal 077f 6805 |h | Jump_Zero 0x785 0780 e002 | | Load 0x0,0x2 0781 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0782 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0783 00cb | | Action Pop_Block_With_Result 0784 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0785 4801 |H | Short_Literal 0x1 0786 e002 | | Load 0x0,0x2 0787 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0788 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0789 00da | | Load_Top At_Offset_2 078a e002 | | Load 0x0,0x2 078b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 078c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 078d 00cb | | Action Pop_Block_With_Result 078e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 078f 0000 | | .XXX[0x1] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 079b | | .CONST 0x079b ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0002 | | .CONST 0x0002 ; Number of locals 0793 INIT_0790: 0793 e002 | | Load 0x0,0x2 0794 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0795 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0796 02c7 | | Declare_Variable Any 0797 e002 | | Load 0x0,0x2 0798 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0799 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 079a a602 | | Store_Unchecked 0x3,0x2 079b BODY_0790: 079b 00d8 | | Load_Top At_Offset_0 079c 0092 095a | Z| Action Push_String_Extended,0x95a ; "Children" 079e 8234 | 4 | Call 0x1,0x34 079f c602 | | Store 0x3,0x2 07a0 00d8 | | Load_Top At_Offset_0 07a1 00cb | | Action Pop_Block_With_Result 07a2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07a3 0000 0000 | | .BLANK 0000[0x5] 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07ba | | .CONST 0x07ba ; Address of begin 07a9 0004 | | .CONST 0x0004 ; Address of exception handler 07aa 0003 | | .CONST 0x0003 ; Number of locals 07ab INIT_07a8: 07ab 0092 0959 | Y| Action Push_String_Extended,0x959 ; "<WARN>" 07ad 4800 |H | Short_Literal 0x0 07ae e5ff | | Load 0x2,-0x1 07af e002 | | Load 0x0,0x2 07b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07b1 1820 | | Execute Package,Field_Execute,Field_Number 0x20 07b2 e00c | | Load 0x0,0xc 07b3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07b4 e002 | | Load 0x0,0x2 07b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07b6 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 07b7 02c7 | | Declare_Variable Any 07b8 00d8 | | Load_Top At_Offset_0 07b9 1c00 | | Execute_Immediate Run_Utility,0x0 07ba BODY_07a8: 07ba 00d9 | | Load_Top At_Offset_1 07bb e221 | ! | Load 0x1,0x21 07bc 01df | | Execute Vector,Equal 07bd 6805 |h | Jump_Zero 0x7c3 07be e002 | | Load 0x0,0x2 07bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07c0 180e | | Execute Package,Field_Execute,Field_Number 0xe 07c1 00cb | | Action Pop_Block_With_Result 07c2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07c3 4801 |H | Short_Literal 0x1 07c4 e002 | | Load 0x0,0x2 07c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07c7 00db | | Load_Top At_Offset_3 07c8 e002 | | Load 0x0,0x2 07c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07ca 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 07cb c603 | | Store 0x3,0x3 07cc 00d8 | | Load_Top At_Offset_0 07cd e002 | | Load 0x0,0x2 07ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07cf 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 07d0 c402 | | Store 0x2,0x2 07d1 00d8 | | Load_Top At_Offset_0 07d2 e002 | | Load 0x0,0x2 07d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07d4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 07d5 c603 | | Store 0x3,0x3 07d6 00d8 | | Load_Top At_Offset_0 07d7 e002 | | Load 0x0,0x2 07d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07d9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 07da 7006 |p | Jump_Nonzero 0x7e1 07db e402 | | Load 0x2,0x2 07dc 0092 095b | [| Action Push_String_Extended,0x95b ; "High Level Components may have at most one parent" 07de 4808 |H | Short_Literal 0x8 07df 822c | , | Call 0x1,0x2c 07e0 c402 | | Store 0x2,0x2 07e1 e402 | | Load 0x2,0x2 07e2 00cb | | Action Pop_Block_With_Result 07e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e4 0000 0000 | | .BLANK 0000[0x4] 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07eb | | .CONST 0x07eb ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0001 | | .CONST 0x0001 ; Number of locals 07eb BODY_07e8: 07eb INIT_07e8: 07eb e404 | | Load 0x2,0x4 07ec 7005 |p | Jump_Nonzero 0x7f2 07ed 00da | | Load_Top At_Offset_2 07ee e004 | | Load 0x0,0x4 07ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07f0 a404 | | Store_Unchecked 0x2,0x4 07f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07f2 e404 | | Load 0x2,0x4 07f3 0092 095c | \| Action Push_String_Extended,0x95c ; ", " 07f5 e7ff | | Load 0x3,-0x1 07f6 01cc | | Execute Vector,Catenate 07f7 e004 | | Load 0x0,0x4 07f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07f9 c404 | | Store 0x2,0x4 07fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07fb 0000 0000 | | .BLANK 0000[0x5] 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0814 | | .CONST 0x0814 ; Address of begin 0801 0891 | | .CONST 0x0891 ; Address of exception handler 0802 0005 | | .CONST 0x0005 ; Number of locals 0803 INIT_0800: 0803 e006 | | Load 0x0,0x6 0804 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0805 02c7 | | Declare_Variable Any 0806 00d8 | | Load_Top At_Offset_0 0807 1c00 | | Execute_Immediate Run_Utility,0x0 0808 e006 | | Load 0x0,0x6 0809 1b0d | | Execute Package,Field_Read,Field_Number 0xd 080a e008 | | Load 0x0,0x8 080b 1b15 | | Execute Package,Field_Read,Field_Number 0x15 080c 02c7 | | Declare_Variable Any 080d 00d8 | | Load_Top At_Offset_0 080e 1c00 | | Execute_Immediate Run_Utility,0x0 080f e006 | | Load 0x0,0x6 0810 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0811 02c7 | | Declare_Variable Any 0812 00d8 | | Load_Top At_Offset_0 0813 1c00 | | Execute_Immediate Run_Utility,0x0 0814 BODY_0800: 0814 00be | | Action Activate_Tasks 0815 e006 | | Load 0x0,0x6 0816 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0817 00da | | Load_Top At_Offset_2 0818 4800 |H | Short_Literal 0x0 0819 4800 |H | Short_Literal 0x0 081a e009 | | Load 0x0,0x9 081b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 081c e008 | | Load 0x0,0x8 081d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 081e e008 | | Load 0x0,0x8 081f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0820 c604 | | Store 0x3,0x4 0821 005b | [ | Store_Top Discrete,At_Offset_3 0822 e402 | | Load 0x2,0x2 0823 0092 095d | ]| Action Push_String_Extended,0x95d ; "Unable to open activity file" 0825 e603 | | Load 0x3,0x3 0826 822e | . | Call 0x1,0x2e 0827 c402 | | Store 0x2,0x2 0828 e006 | | Load 0x0,0x6 0829 1b0d | | Execute Package,Field_Read,Field_Number 0xd 082a e602 | | Load 0x3,0x2 082b 0120 | | Execute Any,Is_Value 082c 6803 |h | Jump_Zero 0x830 082d e006 | | Load 0x0,0x6 082e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 082f 7801 |x | Jump 0x831 0830 e602 | | Load 0x3,0x2 0831 e5ff | | Load 0x2,-0x1 0832 e002 | | Load 0x0,0x2 0833 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0834 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0835 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0836 c602 | | Store 0x3,0x2 0837 005b | [ | Store_Top Discrete,At_Offset_3 0838 e402 | | Load 0x2,0x2 0839 0092 095e | ^| Action Push_String_Extended,0x95e ; "Unable to obtain Subsystem Id for " 083b e5ff | | Load 0x2,-0x1 083c e002 | | Load 0x0,0x2 083d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 083e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 083f 01cc | | Execute Vector,Catenate 0840 e603 | | Load 0x3,0x3 0841 822e | . | Call 0x1,0x2e 0842 c402 | | Store 0x2,0x2 0843 00d9 | | Load_Top At_Offset_1 0844 e602 | | Load 0x3,0x2 0845 e008 | | Load 0x0,0x8 0846 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0847 6834 |h4 | Jump_Zero 0x87c 0848 00d9 | | Load_Top At_Offset_1 0849 e602 | | Load 0x3,0x2 084a e008 | | Load 0x0,0x8 084b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 084c c605 | | Store 0x3,0x5 084d 00d8 | | Load_Top At_Offset_0 084e e006 | | Load 0x0,0x6 084f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0850 6827 |h' | Jump_Zero 0x878 0851 00d9 | | Load_Top At_Offset_1 0852 e602 | | Load 0x3,0x2 0853 e008 | | Load 0x0,0x8 0854 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0855 c605 | | Store 0x3,0x5 0856 00d8 | | Load_Top At_Offset_0 0857 e006 | | Load 0x0,0x6 0858 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0859 680e |h | Jump_Zero 0x868 085a 4800 |H | Short_Literal 0x0 085b 4800 |H | Short_Literal 0x0 085c 4807 |H | Short_Literal 0x7 085d 0092 095f | _| Action Push_String_Extended,0x95f ; "Activity has no spec or load view for " 085f e5ff | | Load 0x2,-0x1 0860 e002 | | Load 0x0,0x2 0861 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0862 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0863 01cc | | Execute Vector,Catenate 0864 00ea | | Load_Encached Null_String_Cache 0865 e005 | | Load 0x0,0x5 0866 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0867 7810 |x | Jump 0x878 0868 4800 |H | Short_Literal 0x0 0869 4800 |H | Short_Literal 0x0 086a 4806 |H | Short_Literal 0x6 086b 0092 0960 | `| Action Push_String_Extended,0x960 ; "Activity has no load view for " 086d e5ff | | Load 0x2,-0x1 086e e002 | | Load 0x0,0x2 086f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0870 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0871 01cc | | Execute Vector,Catenate 0872 0092 0961 | a| Action Push_String_Extended,0x961 ; ", using spec view instead" 0874 01cc | | Execute Vector,Catenate 0875 00ea | | Load_Encached Null_String_Cache 0876 e005 | | Load 0x0,0x5 0877 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0878 00d8 | | Load_Top At_Offset_0 0879 8239 | 9 | Call 0x1,0x39 087a c402 | | Store 0x2,0x2 087b 780b |x | Jump 0x887 087c e402 | | Load 0x2,0x2 087d 0092 0962 | b| Action Push_String_Extended,0x962 ; "The current activity contains no entry for " 087f e5ff | | Load 0x2,-0x1 0880 e002 | | Load 0x0,0x2 0881 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0882 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0883 01cc | | Execute Vector,Catenate 0884 4808 |H | Short_Literal 0x8 0885 822c | , | Call 0x1,0x2c 0886 c402 | | Store 0x2,0x2 0887 e006 | | Load 0x0,0x6 0888 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0889 00da | | Load_Top At_Offset_2 088a e008 | | Load 0x0,0x8 088b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 088c c604 | | Store 0x3,0x4 088d 005b | [ | Store_Top Discrete,At_Offset_3 088e e402 | | Load 0x2,0x2 088f 00cb | | Action Pop_Block_With_Result 0890 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0891 TRAP_0800: 0891 e00b | | Load 0x0,0xb 0892 010f | | Execute Exception,Equal 0893 6801 |h | Jump_Zero 0x895 0894 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0895 0100 | | Execute Exception,Raise 0896 0000 0000 | | .XXX[0x2] 0898 ; -------------------------------------------------------------------------------------- 0898 ; SUBPROGRAM 0898 ; -------------------------------------------------------------------------------------- 0898 08b9 | | .CONST 0x08b9 ; Address of begin 0899 091b | | .CONST 0x091b ; Address of exception handler 089a 0007 | | .CONST 0x0007 ; Number of locals 089b INIT_0898: 089b e006 | | Load 0x0,0x6 089c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 089d 02c7 | | Declare_Variable Any 089e 00d8 | | Load_Top At_Offset_0 089f 1c00 | | Execute_Immediate Run_Utility,0x0 08a0 e006 | | Load 0x0,0x6 08a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08a2 e008 | | Load 0x0,0x8 08a3 1b15 | | Execute Package,Field_Read,Field_Number 0x15 08a4 02c7 | | Declare_Variable Any 08a5 00d8 | | Load_Top At_Offset_0 08a6 1c00 | | Execute_Immediate Run_Utility,0x0 08a7 e002 | | Load 0x0,0x2 08a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08aa 02c7 | | Declare_Variable Any 08ab 00d8 | | Load_Top At_Offset_0 08ac 1c00 | | Execute_Immediate Run_Utility,0x0 08ad e006 | | Load 0x0,0x6 08ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08af 02c7 | | Declare_Variable Any 08b0 00d8 | | Load_Top At_Offset_0 08b1 1c00 | | Execute_Immediate Run_Utility,0x0 08b2 e002 | | Load 0x0,0x2 08b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08b5 02c7 | | Declare_Variable Any 08b6 e5ff | | Load 0x2,-0x1 08b7 8214 | | Call 0x1,0x14 08b8 a607 | | Store_Unchecked 0x3,0x7 08b9 BODY_0898: 08b9 00be | | Action Activate_Tasks 08ba e006 | | Load 0x0,0x6 08bb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08bc e604 | | Load 0x3,0x4 08bd 4800 |H | Short_Literal 0x0 08be 4800 |H | Short_Literal 0x0 08bf e009 | | Load 0x0,0x9 08c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08c1 e008 | | Load 0x0,0x8 08c2 1816 | | Execute Package,Field_Execute,Field_Number 0x16 08c3 e008 | | Load 0x0,0x8 08c4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 08c5 c604 | | Store 0x3,0x4 08c6 c603 | | Store 0x3,0x3 08c7 00da | | Load_Top At_Offset_2 08c8 0092 095d | ]| Action Push_String_Extended,0x95d ; "Unable to open activity file" 08ca e603 | | Load 0x3,0x3 08cb 822e | . | Call 0x1,0x2e 08cc c605 | | Store 0x3,0x5 08cd e006 | | Load 0x0,0x6 08ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08cf e602 | | Load 0x3,0x2 08d0 0120 | | Execute Any,Is_Value 08d1 6803 |h | Jump_Zero 0x8d5 08d2 e006 | | Load 0x0,0x6 08d3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08d4 7801 |x | Jump 0x8d6 08d5 e602 | | Load 0x3,0x2 08d6 00da | | Load_Top At_Offset_2 08d7 e002 | | Load 0x0,0x2 08d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08d9 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 08da 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08db c602 | | Store 0x3,0x2 08dc c603 | | Store 0x3,0x3 08dd 00da | | Load_Top At_Offset_2 08de 0092 095e | ^| Action Push_String_Extended,0x95e ; "Unable to obtain Subsystem Id for " 08e0 00da | | Load_Top At_Offset_2 08e1 e002 | | Load 0x0,0x2 08e2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08e3 1820 | | Execute Package,Field_Execute,Field_Number 0x20 08e4 01cc | | Execute Vector,Catenate 08e5 e603 | | Load 0x3,0x3 08e6 822e | . | Call 0x1,0x2e 08e7 c605 | | Store 0x3,0x5 08e8 00db | | Load_Top At_Offset_3 08e9 e602 | | Load 0x3,0x2 08ea e008 | | Load 0x0,0x8 08eb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 08ec 6819 |h | Jump_Zero 0x906 08ed 00db | | Load_Top At_Offset_3 08ee e602 | | Load 0x3,0x2 08ef e008 | | Load 0x0,0x8 08f0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 08f1 c606 | | Store 0x3,0x6 08f2 00d9 | | Load_Top At_Offset_1 08f3 e006 | | Load 0x0,0x6 08f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08f5 680c |h | Jump_Zero 0x902 08f6 00da | | Load_Top At_Offset_2 08f7 0092 0963 | c| Action Push_String_Extended,0x963 ; "Activity has no spec view for " 08f9 00da | | Load_Top At_Offset_2 08fa e002 | | Load 0x0,0x2 08fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08fc 1820 | | Execute Package,Field_Execute,Field_Number 0x20 08fd 01cc | | Execute Vector,Catenate 08fe 4808 |H | Short_Literal 0x8 08ff 822c | , | Call 0x1,0x2c 0900 c605 | | Store 0x3,0x5 0901 780f |x | Jump 0x911 0902 00d9 | | Load_Top At_Offset_1 0903 8239 | 9 | Call 0x1,0x39 0904 c605 | | Store 0x3,0x5 0905 780b |x | Jump 0x911 0906 00da | | Load_Top At_Offset_2 0907 0092 0962 | b| Action Push_String_Extended,0x962 ; "The current activity contains no entry for " 0909 00da | | Load_Top At_Offset_2 090a e002 | | Load 0x0,0x2 090b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 090c 1820 | | Execute Package,Field_Execute,Field_Number 0x20 090d 01cc | | Execute Vector,Catenate 090e 4808 |H | Short_Literal 0x8 090f 822c | , | Call 0x1,0x2c 0910 c605 | | Store 0x3,0x5 0911 e006 | | Load 0x0,0x6 0912 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0913 e604 | | Load 0x3,0x4 0914 e008 | | Load 0x0,0x8 0915 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0916 c604 | | Store 0x3,0x4 0917 c603 | | Store 0x3,0x3 0918 00da | | Load_Top At_Offset_2 0919 00cb | | Action Pop_Block_With_Result 091a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 091b TRAP_0898: 091b e00b | | Load 0x0,0xb 091c 010f | | Execute Exception,Equal 091d 6801 |h | Jump_Zero 0x91f 091e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 091f 0100 | | Execute Exception,Raise 0920 ; -------------------------------------------------------------------------------------- 0920 ; SUBPROGRAM 0920 ; -------------------------------------------------------------------------------------- 0920 0929 | ) | .CONST 0x0929 ; Address of begin 0921 0004 | | .CONST 0x0004 ; Address of exception handler 0922 0002 | | .CONST 0x0002 ; Number of locals 0923 INIT_0920: 0923 e002 | | Load 0x0,0x2 0924 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0925 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0926 02c7 | | Declare_Variable Any 0927 e222 | " | Load 0x1,0x22 0928 a602 | | Store_Unchecked 0x3,0x2 0929 BODY_0920: 0929 00d8 | | Load_Top At_Offset_0 092a 0092 0964 | d| Action Push_String_Extended,0x964 ; "System views do not have corresponding spec views" 092c 4808 |H | Short_Literal 0x8 092d 822c | , | Call 0x1,0x2c 092e c602 | | Store 0x3,0x2 092f 00d8 | | Load_Top At_Offset_0 0930 00cb | | Action Pop_Block_With_Result 0931 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0932 ; -------------------------------------------------------------------------------------- 0932 ; STRING TABLE 0932 ; -------------------------------------------------------------------------------------- 0932 0068 | h | .STRTAB 0x0068->0x0966 ; "[]" 0933 0068 | h | .STRTAB 0x0068->0x0967 ; "SYSTEM_SUBSYSTEM" 0934 0076 | v | .STRTAB 0x0076->0x096f ; "SYS_VIEW" 0935 007c | | | .STRTAB 0x007c->0x0973 ; "SUBSYSTEM" 0936 0083 | | .STRTAB 0x0083->0x0977 ; "SPEC_VIEW" 0937 008a | | .STRTAB 0x008a->0x097c ; "LOAD_VIEW" 0938 0091 | | .STRTAB 0x0091->0x0980 ; "COMB_VIEW" 0939 0098 | | .STRTAB 0x0098->0x0985 ; "Cannot determine parent (" 093a 00af | | .STRTAB 0x00af->0x0991 ; "Parent" 093b 00b3 | | .STRTAB 0x00b3->0x0994 ; "Unable to determine applicable views (Subsystem iterator is invalid (" 093c 00f6 | | .STRTAB 0x00f6->0x09b7 ; "))" 093d 00f6 | | .STRTAB 0x00f6->0x09b8 ; "Some views could not be determined from the current activity (" 093e 0132 | 2 | .STRTAB 0x0132->0x09d7 ; ".STATE.IMPORTS" 093f 013e | > | .STRTAB 0x013e->0x09de ; "Cannot determine imported views (" 0940 015d | ] | .STRTAB 0x015d->0x09ee ; "Unable to obtain import set for " 0941 017b | { | .STRTAB 0x017b->0x09fe ; "Unable to open the import set for " 0942 019b | | .STRTAB 0x019b->0x0a0f ; "Unable to open the current activity" 0943 01bc | | .STRTAB 0x01bc->0x0a21 ; "Imported_Views" 0944 01c8 | | .STRTAB 0x01c8->0x0a28 ; ".STATE.REFERENCERS" 0945 01d8 | | .STRTAB 0x01d8->0x0a31 ; "Cannot determine referencing views (" 0946 01fa | | .STRTAB 0x01fa->0x0a43 ; "No spec view defined for \x22" 0947 0212 | | .STRTAB 0x0212->0x0a50 ; "\x22, referencer information may be lost." 0948 0236 | 6 | .STRTAB 0x0236->0x0a63 ; "Unable to obtain spec view for \x22" 0949 0254 | T | .STRTAB 0x0254->0x0a73 ; "\x22 (" 094a 0255 | U | .STRTAB 0x0255->0x0a74 ; "Unable to obtain referencer set for " 094b 0277 | w | .STRTAB 0x0277->0x0a86 ; "Unable to open the referencer set for " 094c 029b | | .STRTAB 0x029b->0x0a99 ; "The current activity has no entry for " 094d 02bf | | .STRTAB 0x02bf->0x0aac ; "Referencing_Views" 094e 02ce | | .STRTAB 0x02ce->0x0ab5 ; "Unhandled exception in Hierarchy_Operations." 094f 02f8 | | .STRTAB 0x02f8->0x0acb ; " (" 0950 02f8 | | .STRTAB 0x02f8->0x0acc ; " is not enclosed within a view." 0951 0315 | | .STRTAB 0x0315->0x0adb ; "Find_View" 0952 031c | | .STRTAB 0x031c->0x0ae0 ; " is not enclosed within a subsystem." 0953 033e | > | .STRTAB 0x033e->0x0af2 ; "Find_Subsystem" 0954 034a | J | .STRTAB 0x034a->0x0af9 ; "Nil Elements have no enclosing subsystem" 0955 0370 | p | .STRTAB 0x0370->0x0b0d ; "Enclosing_Subsystem" 0956 0381 | | .STRTAB 0x0381->0x0b16 ; "Nil Elements have no enclosing view" 0957 03a2 | | .STRTAB 0x03a2->0x0b28 ; "Enclosing_View" 0958 03ae | | .STRTAB 0x03ae->0x0b2f ; "Cannot determine children (" 0959 03c7 | | .STRTAB 0x03c7->0x0b3c ; "<WARN>" 095a 03cb | | .STRTAB 0x03cb->0x0b3f ; "Children" 095b 03d1 | | .STRTAB 0x03d1->0x0b43 ; "High Level Components may have at most one parent" 095c 0400 | | .STRTAB 0x0400->0x0b5c ; ", " 095d 0400 | | .STRTAB 0x0400->0x0b5d ; "Unable to open activity file" 095e 041a | | .STRTAB 0x041a->0x0b6b ; "Unable to obtain Subsystem Id for " 095f 043a | : | .STRTAB 0x043a->0x0b7c ; "Activity has no spec or load view for " 0960 045e | ^ | .STRTAB 0x045e->0x0b8f ; "Activity has no load view for " 0961 047a | z | .STRTAB 0x047a->0x0b9e ; ", using spec view instead" 0962 0491 | | .STRTAB 0x0491->0x0baa ; "The current activity contains no entry for " 0963 04ba | | .STRTAB 0x04ba->0x0bc0 ; "Activity has no spec view for " 0964 04d6 | | .STRTAB 0x04d6->0x0bcf ; "System views do not have corresponding spec views" 0965 0505 | | .STREND 0x0505->0x0be7 0966 5b5d 5359 |[]SY| .STRTAB_STRINGS 0be8 ; -------------------------------------------------------------------------------------- 0be8 ; Debug Table 0be8 ; -------------------------------------------------------------------------------------- 0be8 0004 0012 | | .DEBUG4 0x0004,0x0012,0xc593,0x0000,0x0001,0x0000 0bee bff7 a177 | w| .XXX[0x12] 0bf0 3ed6 c3f7 |> | 0bf2 a7e9 fbe4 | | 0bf4 2fe8 4ff1 |/ O | 0bf6 ffdf a3b9 | | 0bf8 4c09 b003 |L | 0bfa 9012 8bf6 | | 0bfc f7f3 73a2 | s | 0bfe d3d9 fbed | |