|
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_779ce4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0a28 | ( | .CONST 0x0a28 ; 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 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0046 | F | .CONST 0x0046 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
000d 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
000f 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
0011 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
0013 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
0015 00ea | | Load_Encached Null_String_Cache
0016 0129 | ) | Execute Any,Make_Visible
0017 00bf | | Action Accept_Activation
0018 0093 0000 | | push_full_address 0x0
001a 60f9 |` | Indirect_Literal Discrete,0x114,{0x80000000, 0x00010000}
001b 0273 | s | Execute Discrete,Plus
001c 0007 | | Action Break_Optional
001d e002 | | Load 0x0,0x2
001e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
001f 02c7 | | Declare_Variable Any
0020 00d8 | | Load_Top At_Offset_0
0021 1c00 | | Execute_Immediate Run_Utility,0x0
0022 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call
0024 029d 029b | | Declare_Subprogram INIT_0298,For_Outer_Call
0026 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call
0028 029d 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call
002a 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call
002c 029d 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call
002e 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call
0030 029d 039b | | Declare_Subprogram INIT_0398,For_Outer_Call
0032 029d 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call
0034 029d 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call
0036 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call
0038 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0039 00c7 | | Action Elaborate_Subprogram
003a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
003b 00c7 | | Action Elaborate_Subprogram
003c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
003d 00c7 | | Action Elaborate_Subprogram
003e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
003f 00c7 | | Action Elaborate_Subprogram
0040 029d 061b | | Declare_Subprogram INIT_0618,For_Outer_Call
0042 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0043 00c7 | | Action Elaborate_Subprogram
0044 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call
0046 BODY_0008:
0046 8221 | ! | Call 0x1,0x21
0047 00bc | | Action Signal_Activated
0048 00bb | | Action Signal_Completion
0049 0000 0000 | | .BLANK 0000[0x7]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0077 | w | .CONST 0x0077 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 000a | | .CONST 0x000a ; Number of locals
0053 INIT_0050:
0053 4820 |H | Short_Literal 0x20
0054 00db | | Load_Top At_Offset_3
0055 e003 | | Load 0x0,0x3
0056 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0057 e5fe | | Load 0x2,-0x2
0058 e003 | | Load 0x0,0x3
0059 1814 | | Execute Package,Field_Execute,Field_Number 0x14
005a 00d9 | | Load_Top At_Offset_1
005b 01dc | | Execute Vector,Last
005c 00e3 | | Load_Encached Natural_Cache
005d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
005e 00da | | Load_Top At_Offset_2
005f 01dd | | Execute Vector,First
0060 00e3 | | Load_Encached Natural_Cache
0061 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0062 00d9 | | Load_Top At_Offset_1
0063 0a01 | | Execute_Immediate Plus,0x1
0064 00e3 | | Load_Encached Natural_Cache
0065 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0066 e002 | | Load 0x0,0x2
0067 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0068 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0069 e002 | | Load 0x0,0x2
006a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006b e002 | | Load 0x0,0x2
006c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
006d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
006e 02c7 | | Declare_Variable Any
006f 00d8 | | Load_Top At_Offset_0
0070 1c00 | | Execute_Immediate Run_Utility,0x0
0071 e002 | | Load 0x0,0x2
0072 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0073 02c7 | | Declare_Variable Any
0074 e002 | | Load 0x0,0x2
0075 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0076 a40a | | Store_Unchecked 0x2,0xa
0077 BODY_0050:
0077 e5ff | | Load 0x2,-0x1
0078 01db | | Execute Vector,Length
0079 7002 |p | Jump_Nonzero 0x7c
007a 00ea | | Load_Encached Null_String_Cache
007b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
007c 00cf | | Action Mark_Auxiliary
007d e405 | | Load 0x2,0x5
007e e404 | | Load 0x2,0x4
007f 0264 | d | Execute Discrete,Below_Bound
0080 703f |p? | Jump_Nonzero 0xc0
0081 00d8 | | Load_Top At_Offset_0
0082 e402 | | Load 0x2,0x2
0083 01d7 | | Execute Vector,Field_Read
0084 0f2e | . | Execute_Immediate Equal,0x2e
0085 6838 |h8 | Jump_Zero 0xbe
0086 e002 | | Load 0x0,0x2
0087 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0088 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0089 e409 | | Load 0x2,0x9
008a 6085 |` | Indirect_Literal Discrete,0x110,{0x00000000, 0x00004000}
008b e004 | | Load 0x0,0x4
008c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008d e005 | | Load 0x0,0x5
008e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008f e006 | | Load 0x0,0x6
0090 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0091 4801 |H | Short_Literal 0x1
0092 4800 |H | Short_Literal 0x0
0093 e005 | | Load 0x0,0x5
0094 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0095 e002 | | Load 0x0,0x2
0096 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0097 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0098 e405 | | Load 0x2,0x5
0099 e40d | | Load 0x2,0xd
009a 0aff | | Execute_Immediate Plus,-0x1
009b e402 | | Load 0x2,0x2
009c 01cf | | Execute Vector,Slice_Read
009d e002 | | Load 0x0,0x2
009e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
009f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00a0 c409 | | Store 0x2,0x9
00a1 c407 | | Store 0x2,0x7
00a2 e407 | | Load 0x2,0x7
00a3 701a |p | Jump_Nonzero 0xbe
00a4 e002 | | Load 0x0,0x2
00a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a6 e40a | | Load 0x2,0xa
00a7 0120 | | Execute Any,Is_Value
00a8 6803 |h | Jump_Zero 0xac
00a9 e002 | | Load 0x0,0x2
00aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ab 7801 |x | Jump 0xad
00ac e40a | | Load 0x2,0xa
00ad e409 | | Load 0x2,0x9
00ae e002 | | Load 0x0,0x2
00af 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00b0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00b1 c40a | | Store 0x2,0xa
00b2 c408 | | Store 0x2,0x8
00b3 e408 | | Load 0x2,0x8
00b4 7009 |p | Jump_Nonzero 0xbe
00b5 00db | | Load_Top At_Offset_3
00b6 e002 | | Load 0x0,0x2
00b7 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
00b8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b9 6804 |h | Jump_Zero 0xbe
00ba 00d8 | | Load_Top At_Offset_0
00bb a406 | | Store_Unchecked 0x2,0x6
00bc 00d2 | | Pop_Control Pop_Count_2
00bd 7802 |x | Jump 0xc0
00be 00c8 | | Action Pop_Auxiliary_Range
00bf 37c1 |7 | Loop_Decreasing 0x81
00c0 00ce | | Action Pop_Auxiliary
00c1 00d9 | | Load_Top At_Offset_1
00c2 e002 | | Load 0x0,0x2
00c3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00c4 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
00c5 c409 | | Store 0x2,0x9
00c6 00d8 | | Load_Top At_Offset_0
00c7 e002 | | Load 0x0,0x2
00c8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00c9 680b |h | Jump_Zero 0xd5
00ca e405 | | Load 0x2,0x5
00cb e402 | | Load 0x2,0x2
00cc 01d7 | | Execute Vector,Field_Read
00cd 0f21 | ! | Execute_Immediate Equal,0x21
00ce 6836 |h6 | Jump_Zero 0x105
00cf 0092 08a2 | | Action Push_String_Extended,0x8a2 ; "<FULL>"
00d1 e402 | | Load 0x2,0x2
00d2 e214 | | Load 0x1,0x14
00d3 821f | | Call 0x1,0x1f
00d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00d5 603a |`: | Indirect_Literal Discrete,0x110,{0x00000000, 0x00004000}
00d6 e004 | | Load 0x0,0x4
00d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d8 00da | | Load_Top At_Offset_2
00d9 e007 | | Load 0x0,0x7
00da 180f | | Execute Package,Field_Execute,Field_Number 0xf
00db 680e |h | Jump_Zero 0xea
00dc 0092 08a2 | | Action Push_String_Extended,0x8a2 ; "<FULL>"
00de 00d9 | | Load_Top At_Offset_1
00df e002 | | Load 0x0,0x2
00e0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00e1 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
00e2 e406 | | Load 0x2,0x6
00e3 e404 | | Load 0x2,0x4
00e4 e402 | | Load 0x2,0x2
00e5 01cf | | Execute Vector,Slice_Read
00e6 01cc | | Execute Vector,Catenate
00e7 00da | | Load_Top At_Offset_2
00e8 821f | | Call 0x1,0x1f
00e9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ea 6025 |`% | Indirect_Literal Discrete,0x110,{0x00000000, 0x00004000}
00eb e004 | | Load 0x0,0x4
00ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00ed 00da | | Load_Top At_Offset_2
00ee e007 | | Load 0x0,0x7
00ef 180d | | Execute Package,Field_Execute,Field_Number 0xd
00f0 7007 |p | Jump_Nonzero 0xf8
00f1 601e |` | Indirect_Literal Discrete,0x110,{0x00000000, 0x00004000}
00f2 e004 | | Load 0x0,0x4
00f3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f4 00da | | Load_Top At_Offset_2
00f5 e007 | | Load 0x0,0x7
00f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f7 680d |h | Jump_Zero 0x105
00f8 e403 | | Load 0x2,0x3
00f9 00d9 | | Load_Top At_Offset_1
00fa e002 | | Load 0x0,0x2
00fb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00fc 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
00fd e406 | | Load 0x2,0x6
00fe e404 | | Load 0x2,0x4
00ff e402 | | Load 0x2,0x2
0100 01cf | | Execute Vector,Slice_Read
0101 01cc | | Execute Vector,Catenate
0102 00da | | Load_Top At_Offset_2
0103 821f | | Call 0x1,0x1f
0104 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0105 0092 08a3 | | Action Push_String_Extended,0x8a3 ; "No part of \x22"
0107 e5ff | | Load 0x2,-0x1
0108 01cc | | Execute Vector,Catenate
0109 0092 08a4 | | Action Push_String_Extended,0x8a4 ; "\x22 can be resolved."
010b 01cc | | Execute Vector,Catenate
010c e008 | | Load 0x0,0x8
010d 8009 | | Call 0x0,0x9
010e 00ea | | Load_Encached Null_String_Cache
010f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0110 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0114 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0128 | ( | .CONST 0x0128 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0004 | | .CONST 0x0004 ; Number of locals
011b INIT_0118:
011b e002 | | Load 0x0,0x2
011c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
011d 02c7 | | Declare_Variable Any
011e 00d8 | | Load_Top At_Offset_0
011f 1c00 | | Execute_Immediate Run_Utility,0x0
0120 e002 | | Load 0x0,0x2
0121 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0122 e002 | | Load 0x0,0x2
0123 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0125 02c7 | | Declare_Variable Any
0126 00d8 | | Load_Top At_Offset_0
0127 1c00 | | Execute_Immediate Run_Utility,0x0
0128 BODY_0118:
0128 e5ff | | Load 0x2,-0x1
0129 e002 | | Load 0x0,0x2
012a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
012b 6802 |h | Jump_Zero 0x12e
012c 00ea | | Load_Encached Null_String_Cache
012d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
012e e002 | | Load 0x0,0x2
012f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0130 00d9 | | Load_Top At_Offset_1
0131 0120 | | Execute Any,Is_Value
0132 6804 |h | Jump_Zero 0x137
0133 e002 | | Load 0x0,0x2
0134 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0135 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0136 7801 |x | Jump 0x138
0137 00d9 | | Load_Top At_Offset_1
0138 e5ff | | Load 0x2,-0x1
0139 e002 | | Load 0x0,0x2
013a 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
013b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
013c c404 | | Store 0x2,0x4
013d 005a | Z | Store_Top Discrete,At_Offset_2
013e 00d9 | | Load_Top At_Offset_1
013f 8215 | | Call 0x1,0x15
0140 00d8 | | Load_Top At_Offset_0
0141 e002 | | Load 0x0,0x2
0142 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0143 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0144 c402 | | Store 0x2,0x2
0145 e5fe | | Load 0x2,-0x2
0146 e003 | | Load 0x0,0x3
0147 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0148 e5ff | | Load 0x2,-0x1
0149 e002 | | Load 0x0,0x2
014a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
014b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
014c e402 | | Load 0x2,0x2
014d 821f | | Call 0x1,0x1f
014e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
014f 0000 | | .XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0169 | i | .CONST 0x0169 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0006 | | .CONST 0x0006 ; Number of locals
0153 INIT_0150:
0153 e002 | | Load 0x0,0x2
0154 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0155 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0156 02c7 | | Declare_Variable Any
0157 00d8 | | Load_Top At_Offset_0
0158 1c00 | | Execute_Immediate Run_Utility,0x0
0159 e002 | | Load 0x0,0x2
015a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015b 02c7 | | Declare_Variable Any
015c 00d8 | | Load_Top At_Offset_0
015d 1c00 | | Execute_Immediate Run_Utility,0x0
015e e002 | | Load 0x0,0x2
015f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0160 e002 | | Load 0x0,0x2
0161 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0162 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0163 02c7 | | Declare_Variable Any
0164 00d8 | | Load_Top At_Offset_0
0165 1c00 | | Execute_Immediate Run_Utility,0x0
0166 e5fe | | Load 0x2,-0x2
0167 e003 | | Load 0x0,0x3
0168 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0169 BODY_0150:
0169 e5fd | | Load 0x2,-0x3
016a e00a | | Load 0x0,0xa
016b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016c c5fd | | Store 0x2,-0x3
016d e5ff | | Load 0x2,-0x1
016e e002 | | Load 0x0,0x2
016f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0170 6808 |h | Jump_Zero 0x179
0171 e5fd | | Load 0x2,-0x3
0172 0092 08a5 | | Action Push_String_Extended,0x8a5 ; "OBJECT is nil."
0174 e008 | | Load 0x0,0x8
0175 e00a | | Load 0x0,0xa
0176 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0177 c5fd | | Store 0x2,-0x3
0178 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0179 e002 | | Load 0x0,0x2
017a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017b 00da | | Load_Top At_Offset_2
017c 0120 | | Execute Any,Is_Value
017d 6804 |h | Jump_Zero 0x182
017e e002 | | Load 0x0,0x2
017f 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0180 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0181 7801 |x | Jump 0x183
0182 00da | | Load_Top At_Offset_2
0183 e5ff | | Load 0x2,-0x1
0184 e002 | | Load 0x0,0x2
0185 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0186 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0187 c405 | | Store 0x2,0x5
0188 005b | [ | Store_Top Discrete,At_Offset_3
0189 e5fd | | Load 0x2,-0x3
018a 00db | | Load_Top At_Offset_3
018b 0092 08a6 | | Action Push_String_Extended,0x8a6 ; "Determination of enclosing View"
018d 8216 | | Call 0x1,0x16
018e c5fd | | Store 0x2,-0x3
018f 4801 |H | Short_Literal 0x1
0190 e5fd | | Load 0x2,-0x3
0191 e00a | | Load 0x0,0xa
0192 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0193 6801 |h | Jump_Zero 0x195
0194 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0195 00d9 | | Load_Top At_Offset_1
0196 e002 | | Load 0x0,0x2
0197 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0198 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0199 c403 | | Store 0x2,0x3
019a e002 | | Load 0x0,0x2
019b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019c e402 | | Load 0x2,0x2
019d 0120 | | Execute Any,Is_Value
019e 6804 |h | Jump_Zero 0x1a3
019f e002 | | Load 0x0,0x2
01a0 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
01a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a2 7801 |x | Jump 0x1a4
01a3 e402 | | Load 0x2,0x2
01a4 e403 | | Load 0x2,0x3
01a5 e002 | | Load 0x0,0x2
01a6 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
01a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a8 c402 | | Store 0x2,0x2
01a9 005b | [ | Store_Top Discrete,At_Offset_3
01aa e5fd | | Load 0x2,-0x3
01ab 00db | | Load_Top At_Offset_3
01ac 0092 08a7 | | Action Push_String_Extended,0x8a7 ; "Determination of enclosing Subsystem"
01ae 8216 | | Call 0x1,0x16
01af c5fd | | Store 0x2,-0x3
01b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01b1 0000 0000 | | .BLANK 0000[0x7]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01cb | | .CONST 0x01cb ; Address of begin
01b9 0261 | a | .CONST 0x0261 ; Address of exception handler
01ba 0007 | | .CONST 0x0007 ; Number of locals
01bb INIT_01b8:
01bb e002 | | Load 0x0,0x2
01bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01bd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01be e002 | | Load 0x0,0x2
01bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c0 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01c1 02c7 | | Declare_Variable Any
01c2 00d8 | | Load_Top At_Offset_0
01c3 1c00 | | Execute_Immediate Run_Utility,0x0
01c4 00e3 | | Load_Encached Natural_Cache
01c5 00e3 | | Load_Encached Natural_Cache
01c6 e002 | | Load 0x0,0x2
01c7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01c9 e002 | | Load 0x0,0x2
01ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cb BODY_01b8:
01cb e5fa | | Load 0x2,-0x6
01cc e00a | | Load 0x0,0xa
01cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ce c5fa | | Store 0x2,-0x6
01cf e002 | | Load 0x0,0x2
01d0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d1 c5fd | | Store 0x2,-0x3
01d2 4800 |H | Short_Literal 0x0
01d3 a5fc | | Store_Unchecked 0x2,-0x4
01d4 4800 |H | Short_Literal 0x0
01d5 a5fb | | Store_Unchecked 0x2,-0x5
01d6 e5ff | | Load 0x2,-0x1
01d7 01db | | Execute Vector,Length
01d8 7001 |p | Jump_Nonzero 0x1da
01d9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01da e5fa | | Load 0x2,-0x6
01db 00e3 | | Load_Encached Natural_Cache
01dc 00e3 | | Load_Encached Natural_Cache
01dd e5fd | | Load 0x2,-0x3
01de 0120 | | Execute Any,Is_Value
01df 6803 |h | Jump_Zero 0x1e3
01e0 e002 | | Load 0x0,0x2
01e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01e2 7801 |x | Jump 0x1e4
01e3 e5fd | | Load 0x2,-0x3
01e4 e002 | | Load 0x0,0x2
01e5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01e6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01e7 e5fe | | Load 0x2,-0x2
01e8 e5ff | | Load 0x2,-0x1
01e9 821e | | Call 0x1,0x1e
01ea c402 | | Store 0x2,0x2
01eb c5fd | | Store 0x2,-0x3
01ec c404 | | Store 0x2,0x4
01ed c405 | | Store 0x2,0x5
01ee c5fa | | Store 0x2,-0x6
01ef 4801 |H | Short_Literal 0x1
01f0 e5fa | | Load 0x2,-0x6
01f1 e00a | | Load 0x0,0xa
01f2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01f3 6801 |h | Jump_Zero 0x1f5
01f4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01f5 00db | | Load_Top At_Offset_3
01f6 a5fc | | Store_Unchecked 0x2,-0x4
01f7 00da | | Load_Top At_Offset_2
01f8 a5fb | | Store_Unchecked 0x2,-0x5
01f9 e002 | | Load 0x0,0x2
01fa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fc e403 | | Load 0x2,0x3
01fd 606e |`n | Indirect_Literal Discrete,0x26c,{0x00000000, 0x00004000}
01fe e004 | | Load 0x0,0x4
01ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0200 e005 | | Load 0x0,0x5
0201 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0202 e006 | | Load 0x0,0x6
0203 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0204 4801 |H | Short_Literal 0x1
0205 4800 |H | Short_Literal 0x0
0206 e402 | | Load 0x2,0x2
0207 e404 | | Load 0x2,0x4
0208 e405 | | Load 0x2,0x5
0209 e5ff | | Load 0x2,-0x1
020a 01cf | | Execute Vector,Slice_Read
020b e002 | | Load 0x0,0x2
020c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
020d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
020e c403 | | Store 0x2,0x3
020f 005a | Z | Store_Top Discrete,At_Offset_2
0210 00d9 | | Load_Top At_Offset_1
0211 6814 |h | Jump_Zero 0x226
0212 e5fa | | Load 0x2,-0x6
0213 4801 |H | Short_Literal 0x1
0214 e404 | | Load 0x2,0x4
0215 e405 | | Load 0x2,0x5
0216 e5ff | | Load 0x2,-0x1
0217 01cf | | Execute Vector,Slice_Read
0218 e406 | | Load 0x2,0x6
0219 4822 |H" | Short_Literal 0x22
021a 0092 08a8 | | Action Push_String_Extended,0x8a8 ; "Resolution \x22"
021c e404 | | Load 0x2,0x4
021d e405 | | Load 0x2,0x5
021e e5ff | | Load 0x2,-0x1
021f 01cf | | Execute Vector,Slice_Read
0220 01cc | | Execute Vector,Catenate
0221 01cb | | Execute Vector,Append
0222 8218 | | Call 0x1,0x18
0223 c5fa | | Store 0x2,-0x6
0224 e213 | | Load 0x1,0x13
0225 0257 | W | Execute Discrete,Raise
0226 e002 | | Load 0x0,0x2
0227 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0228 e5fd | | Load 0x2,-0x3
0229 0120 | | Execute Any,Is_Value
022a 6803 |h | Jump_Zero 0x22e
022b e002 | | Load 0x0,0x2
022c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
022d 7801 |x | Jump 0x22f
022e e5fd | | Load 0x2,-0x3
022f e403 | | Load 0x2,0x3
0230 e002 | | Load 0x0,0x2
0231 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0232 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0233 c5fd | | Store 0x2,-0x3
0234 0059 | Y | Store_Top Discrete,At_Offset_1
0235 00d8 | | Load_Top At_Offset_0
0236 680f |h | Jump_Zero 0x246
0237 e5fa | | Load 0x2,-0x6
0238 00d9 | | Load_Top At_Offset_1
0239 4822 |H" | Short_Literal 0x22
023a 0092 08a9 | | Action Push_String_Extended,0x8a9 ; "Determining the object associated with \x22"
023c e404 | | Load 0x2,0x4
023d e405 | | Load 0x2,0x5
023e e5ff | | Load 0x2,-0x1
023f 01cf | | Execute Vector,Slice_Read
0240 01cc | | Execute Vector,Catenate
0241 01cb | | Execute Vector,Append
0242 8216 | | Call 0x1,0x16
0243 c5fa | | Store 0x2,-0x6
0244 e213 | | Load 0x1,0x13
0245 0257 | W | Execute Discrete,Raise
0246 e403 | | Load 0x2,0x3
0247 e002 | | Load 0x0,0x2
0248 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0249 181d | | Execute Package,Field_Execute,Field_Number 0x1d
024a c403 | | Store 0x2,0x3
024b e403 | | Load 0x2,0x3
024c e002 | | Load 0x0,0x2
024d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
024e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
024f 700b |p | Jump_Nonzero 0x25b
0250 e5fa | | Load 0x2,-0x6
0251 e5ff | | Load 0x2,-0x1
0252 0092 08aa | | Action Push_String_Extended,0x8aa ; " is not uniquely defined"
0254 01cc | | Execute Vector,Catenate
0255 e008 | | Load 0x0,0x8
0256 e00a | | Load 0x0,0xa
0257 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0258 c5fa | | Store 0x2,-0x6
0259 e213 | | Load 0x1,0x13
025a 0257 | W | Execute Discrete,Raise
025b e403 | | Load 0x2,0x3
025c e002 | | Load 0x0,0x2
025d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
025e 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
025f c403 | | Store 0x2,0x3
0260 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0261 TRAP_01b8:
0261 e213 | | Load 0x1,0x13
0262 010f | | Execute Exception,Equal
0263 6806 |h | Jump_Zero 0x26a
0264 e403 | | Load 0x2,0x3
0265 e002 | | Load 0x0,0x2
0266 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0267 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0268 c403 | | Store 0x2,0x3
0269 4503 |E | Exit_Suprogram New_Top_Offset 0x3
026a 0100 | | Execute Exception,Raise
026b 0000 | | .XXX[0x1]
026c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 027d | } | .CONST 0x027d ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0003 | | .CONST 0x0003 ; Number of locals
0273 INIT_0270:
0273 e5fc | | Load 0x2,-0x4
0274 01dd | | Execute Vector,First
0275 0a02 | | Execute_Immediate Plus,0x2
0276 e5fc | | Load 0x2,-0x4
0277 01dc | | Execute Vector,Last
0278 0aff | | Execute_Immediate Plus,-0x1
0279 00e3 | | Load_Encached Natural_Cache
027a 03f8 | | Declare_Type Discrete,Constrained
027b 029f 066b | k| Declare_Subprogram INIT_0668,For_Call
027d BODY_0270:
027d e5fc | | Load 0x2,-0x4
027e 01db | | Execute Vector,Length
027f 6808 |h | Jump_Zero 0x288
0280 e5fc | | Load 0x2,-0x4
0281 01dd | | Execute Vector,First
0282 e5fc | | Load 0x2,-0x4
0283 01d7 | | Execute Vector,Field_Read
0284 0f46 | F | Execute_Immediate Equal,0x46
0285 6802 |h | Jump_Zero 0x288
0286 8403 | | Call 0x2,0x3
0287 7802 |x | Jump 0x28a
0288 e212 | | Load 0x1,0x12
0289 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
028a 0831 | 1 | Execute_Immediate Raise,0x31
028b 0000 0000 | | .BLANK 0000[0x5]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 00da | | Load_Top At_Offset_2
0294 6802 |h | Jump_Zero 0x297
0295 e213 | | Load 0x1,0x13
0296 0257 | W | Execute Discrete,Raise
0297 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b 00db | | Load_Top At_Offset_3
029c 6812 |h | Jump_Zero 0x2af
029d e5fd | | Load 0x2,-0x3
029e 4822 |H" | Short_Literal 0x22
029f e5ff | | Load 0x2,-0x1
02a0 0092 08ab | | Action Push_String_Extended,0x8ab ; " returned a status of \x22"
02a2 01cc | | Execute Vector,Catenate
02a3 e5fe | | Load 0x2,-0x2
02a4 e002 | | Load 0x0,0x2
02a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a6 011c | | Execute Any,Convert_Unchecked
02a7 1c01 | | Execute_Immediate Run_Utility,0x1
02a8 01cc | | Execute Vector,Catenate
02a9 01cb | | Execute Vector,Append
02aa e008 | | Load 0x0,0x8
02ab e00a | | Load 0x0,0xa
02ac 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02ad c5fd | | Store 0x2,-0x3
02ae 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02af e5fd | | Load 0x2,-0x3
02b0 e00a | | Load 0x0,0xa
02b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02b2 c5fd | | Store 0x2,-0x3
02b3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02b4 0000 0000 | | .BLANK 0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc 6802 |h | Jump_Zero 0x2bf
02bd e213 | | Load 0x1,0x13
02be 0257 | W | Execute Discrete,Raise
02bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 00db | | Load_Top At_Offset_3
02c4 7005 |p | Jump_Nonzero 0x2ca
02c5 e5fb | | Load 0x2,-0x5
02c6 e00a | | Load 0x0,0xa
02c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02c8 c5fb | | Store 0x2,-0x5
02c9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02ca e5fc | | Load 0x2,-0x4
02cb 6821 |h! | Jump_Zero 0x2ed
02cc 00db | | Load_Top At_Offset_3
02cd 0f03 | | Execute_Immediate Equal,0x3
02ce 681e |h | Jump_Zero 0x2ed
02cf e5fb | | Load 0x2,-0x5
02d0 00db | | Load_Top At_Offset_3
02d1 0092 08ac | | Action Push_String_Extended,0x8ac ; "\x22 because "
02d3 01cc | | Execute Vector,Catenate
02d4 6037 |`7 | Indirect_Literal Discrete,0x30c,{0x00000000, 0x00004000}
02d5 e004 | | Load 0x0,0x4
02d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d7 e005 | | Load 0x0,0x5
02d8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02d9 e006 | | Load 0x0,0x6
02da 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02db 4801 |H | Short_Literal 0x1
02dc 4800 |H | Short_Literal 0x0
02dd e005 | | Load 0x0,0x5
02de 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02df e002 | | Load 0x0,0x2
02e0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02e1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02e2 e5fd | | Load 0x2,-0x3
02e3 e5fe | | Load 0x2,-0x2
02e4 e002 | | Load 0x0,0x2
02e5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02e6 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
02e7 01cc | | Execute Vector,Catenate
02e8 e00b | | Load 0x0,0xb
02e9 e00a | | Load 0x0,0xa
02ea 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02eb c5fb | | Store 0x2,-0x5
02ec 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02ed e5fb | | Load 0x2,-0x5
02ee 00db | | Load_Top At_Offset_3
02ef 0092 08ac | | Action Push_String_Extended,0x8ac ; "\x22 because "
02f1 01cc | | Execute Vector,Catenate
02f2 6019 |` | Indirect_Literal Discrete,0x30c,{0x00000000, 0x00004000}
02f3 e004 | | Load 0x0,0x4
02f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f5 e005 | | Load 0x0,0x5
02f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02f7 e006 | | Load 0x0,0x6
02f8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02f9 4801 |H | Short_Literal 0x1
02fa 4800 |H | Short_Literal 0x0
02fb e005 | | Load 0x0,0x5
02fc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02fd e002 | | Load 0x0,0x2
02fe 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02ff 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0300 e5fd | | Load 0x2,-0x3
0301 e5fe | | Load 0x2,-0x2
0302 e002 | | Load 0x0,0x2
0303 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0304 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0305 01cc | | Execute Vector,Catenate
0306 e008 | | Load 0x0,0x8
0307 e00a | | Load 0x0,0xa
0308 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0309 c5fb | | Store 0x2,-0x5
030a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
030b 0000 | | .XXX[0x1]
030c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0319 | | .CONST 0x0319 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0004 | | .CONST 0x0004 ; Number of locals
0313 INIT_0310:
0313 00da | | Load_Top At_Offset_2
0314 e002 | | Load 0x0,0x2
0315 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0316 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0317 00e3 | | Load_Encached Natural_Cache
0318 00e3 | | Load_Encached Natural_Cache
0319 BODY_0310:
0319 e5fe | | Load 0x2,-0x2
031a 01dd | | Execute Vector,First
031b 00db | | Load_Top At_Offset_3
031c 01db | | Execute Vector,Length
031d 0273 | s | Execute Discrete,Plus
031e 005a | Z | Store_Top Discrete,At_Offset_2
031f 00d9 | | Load_Top At_Offset_1
0320 e5fe | | Load 0x2,-0x2
0321 01dc | | Execute Vector,Last
0322 027a | z | Execute Discrete,Less_Equal
0323 6808 |h | Jump_Zero 0x32c
0324 00d9 | | Load_Top At_Offset_1
0325 e5fe | | Load 0x2,-0x2
0326 01d7 | | Execute Vector,Field_Read
0327 0f2e | . | Execute_Immediate Equal,0x2e
0328 6803 |h | Jump_Zero 0x32c
0329 00d9 | | Load_Top At_Offset_1
032a 0a01 | | Execute_Immediate Plus,0x1
032b 005a | Z | Store_Top Discrete,At_Offset_2
032c 00d9 | | Load_Top At_Offset_1
032d e5fe | | Load 0x2,-0x2
032e 01dc | | Execute Vector,Last
032f 027d | } | Execute Discrete,Greater
0330 6802 |h | Jump_Zero 0x333
0331 e5fe | | Load 0x2,-0x2
0332 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0333 4801 |H | Short_Literal 0x1
0334 00da | | Load_Top At_Offset_2
0335 e5fe | | Load 0x2,-0x2
0336 01dc | | Execute Vector,Last
0337 e5fe | | Load 0x2,-0x2
0338 01cf | | Execute Vector,Slice_Read
0339 0092 08ad | | Action Push_String_Extended,0x8ad ; "'V"
033b e003 | | Load 0x0,0x3
033c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
033d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
033e 00d8 | | Load_Top At_Offset_0
033f 0c01 | | Execute_Immediate Greater_Equal,0x1
0340 6806 |h | Jump_Zero 0x347
0341 00d9 | | Load_Top At_Offset_1
0342 00d9 | | Load_Top At_Offset_1
0343 0aff | | Execute_Immediate Plus,-0x1
0344 e5fe | | Load 0x2,-0x2
0345 01cf | | Execute Vector,Slice_Read
0346 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0347 00d9 | | Load_Top At_Offset_1
0348 e5fe | | Load 0x2,-0x2
0349 01dc | | Execute Vector,Last
034a e5fe | | Load 0x2,-0x2
034b 01cf | | Execute Vector,Slice_Read
034c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
034d 0000 0000 | | .XXX[0x3]
034f 0000 | |
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 035b | [ | .CONST 0x035b ; Address of begin
0351 0375 | u | .CONST 0x0375 ; Address of exception handler
0352 0003 | | .CONST 0x0003 ; Number of locals
0353 INIT_0350:
0353 e002 | | Load 0x0,0x2
0354 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0355 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0356 02c7 | | Declare_Variable Any
0357 00d8 | | Load_Top At_Offset_0
0358 1c00 | | Execute_Immediate Run_Utility,0x0
0359 e002 | | Load 0x0,0x2
035a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
035b BODY_0350:
035b e002 | | Load 0x0,0x2
035c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
035d 00da | | Load_Top At_Offset_2
035e 0120 | | Execute Any,Is_Value
035f 6804 |h | Jump_Zero 0x364
0360 e002 | | Load 0x0,0x2
0361 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0362 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0363 7801 |x | Jump 0x365
0364 00da | | Load_Top At_Offset_2
0365 e5ff | | Load 0x2,-0x1
0366 e002 | | Load 0x0,0x2
0367 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0368 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0369 c402 | | Store 0x2,0x2
036a 0059 | Y | Store_Top Discrete,At_Offset_1
036b 00d8 | | Load_Top At_Offset_0
036c 8215 | | Call 0x1,0x15
036d 00d9 | | Load_Top At_Offset_1
036e e002 | | Load 0x0,0x2
036f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0370 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0371 e002 | | Load 0x0,0x2
0372 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0373 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0374 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0375 TRAP_0350:
0375 e213 | | Load 0x1,0x13
0376 010f | | Execute Exception,Equal
0377 680b |h | Jump_Zero 0x383
0378 e5ff | | Load 0x2,-0x1
0379 e002 | | Load 0x0,0x2
037a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
037b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
037c 0092 08ae | | Action Push_String_Extended,0x8ae ; " has no parent."
037e 01cc | | Execute Vector,Catenate
037f e008 | | Load 0x0,0x8
0380 8009 | | Call 0x0,0x9
0381 00d8 | | Load_Top At_Offset_0
0382 0101 | | Execute Exception,Reraise
0383 0100 | | Execute Exception,Raise
0384 0000 0000 | | .BLANK 0000[0x4]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00da | | Load_Top At_Offset_2
038c 6803 |h | Jump_Zero 0x390
038d 0092 08af | | Action Push_String_Extended,0x8af ; "SPEC"
038f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0390 0092 08b0 | | Action Push_String_Extended,0x8b0 ; "LOAD"
0392 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0393 0000 0000 | | .BLANK 0000[0x5]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03ab | | .CONST 0x03ab ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0006 | | .CONST 0x0006 ; Number of locals
039b INIT_0398:
039b e002 | | Load 0x0,0x2
039c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
039d 02c7 | | Declare_Variable Any
039e 00d8 | | Load_Top At_Offset_0
039f 1c00 | | Execute_Immediate Run_Utility,0x0
03a0 00ec | | Load_Encached Diana_Tree_Cache
03a1 e002 | | Load 0x0,0x2
03a2 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03a3 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03a4 02c7 | | Declare_Variable Any
03a5 00d8 | | Load_Top At_Offset_0
03a6 1c00 | | Execute_Immediate Run_Utility,0x0
03a7 e002 | | Load 0x0,0x2
03a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03a9 029f 070b | | Declare_Subprogram INIT_0708,For_Call
03ab BODY_0398:
03ab e5fb | | Load 0x2,-0x5
03ac e402 | | Load 0x2,0x2
03ad 0120 | | Execute Any,Is_Value
03ae 6803 |h | Jump_Zero 0x3b2
03af e002 | | Load 0x0,0x2
03b0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03b1 7801 |x | Jump 0x3b3
03b2 e402 | | Load 0x2,0x2
03b3 e5fe | | Load 0x2,-0x2
03b4 e5ff | | Load 0x2,-0x1
03b5 8406 | | Call 0x2,0x6
03b6 c402 | | Store 0x2,0x2
03b7 c5fb | | Store 0x2,-0x5
03b8 4801 |H | Short_Literal 0x1
03b9 e5fb | | Load 0x2,-0x5
03ba e00a | | Load 0x0,0xa
03bb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03bc 6806 |h | Jump_Zero 0x3c3
03bd 00ec | | Load_Encached Diana_Tree_Cache
03be a5fd | | Store_Unchecked 0x2,-0x3
03bf e002 | | Load 0x0,0x2
03c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03c1 c5fc | | Store 0x2,-0x4
03c2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03c3 e402 | | Load 0x2,0x2
03c4 c5fc | | Store 0x2,-0x4
03c5 e002 | | Load 0x0,0x2
03c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c7 00db | | Load_Top At_Offset_3
03c8 0120 | | Execute Any,Is_Value
03c9 6804 |h | Jump_Zero 0x3ce
03ca e002 | | Load 0x0,0x2
03cb 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03cc 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03cd 7801 |x | Jump 0x3cf
03ce 00db | | Load_Top At_Offset_3
03cf e002 | | Load 0x0,0x2
03d0 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03d1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03d2 6025 |`% | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
03d3 4801 |H | Short_Literal 0x1
03d4 4800 |H | Short_Literal 0x0
03d5 4800 |H | Short_Literal 0x0
03d6 e004 | | Load 0x0,0x4
03d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d8 4800 |H | Short_Literal 0x0
03d9 e402 | | Load 0x2,0x2
03da e002 | | Load 0x0,0x2
03db 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03dc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03dd e002 | | Load 0x0,0x2
03de 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03df 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03e0 c5fd | | Store 0x2,-0x3
03e1 c404 | | Store 0x2,0x4
03e2 005a | Z | Store_Top Discrete,At_Offset_2
03e3 00d9 | | Load_Top At_Offset_1
03e4 6811 |h | Jump_Zero 0x3f6
03e5 e5fb | | Load 0x2,-0x5
03e6 00da | | Load_Top At_Offset_2
03e7 0092 08b1 | | Action Push_String_Extended,0x8b1 ; "Open of "
03e9 e5fe | | Load 0x2,-0x2
03ea 821b | | Call 0x1,0x1b
03eb 01cc | | Execute Vector,Catenate
03ec 0092 08b2 | | Action Push_String_Extended,0x8b2 ; " view "
03ee 01cc | | Execute Vector,Catenate
03ef e402 | | Load 0x2,0x2
03f0 e002 | | Load 0x0,0x2
03f1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03f2 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
03f3 01cc | | Execute Vector,Catenate
03f4 8216 | | Call 0x1,0x16
03f5 c5fb | | Store 0x2,-0x5
03f6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03f7 0000 | | .XXX[0x1]
03f8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03fc 0000 0000 | | .BLANK 0000[0x4]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0413 | | .CONST 0x0413 ; Address of begin
0401 046b | k | .CONST 0x046b ; Address of exception handler
0402 0005 | | .CONST 0x0005 ; Number of locals
0403 INIT_0400:
0403 e002 | | Load 0x0,0x2
0404 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0405 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0406 02c7 | | Declare_Variable Any
0407 00d8 | | Load_Top At_Offset_0
0408 1c00 | | Execute_Immediate Run_Utility,0x0
0409 e002 | | Load 0x0,0x2
040a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
040b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
040c e002 | | Load 0x0,0x2
040d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
040e 02c7 | | Declare_Variable Any
040f 00d8 | | Load_Top At_Offset_0
0410 1c00 | | Execute_Immediate Run_Utility,0x0
0411 e002 | | Load 0x0,0x2
0412 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0413 BODY_0400:
0413 e002 | | Load 0x0,0x2
0414 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0415 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0416 e402 | | Load 0x2,0x2
0417 67e0 |g | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
0418 e004 | | Load 0x0,0x4
0419 1b0e | | Execute Package,Field_Read,Field_Number 0xe
041a e005 | | Load 0x0,0x5
041b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
041c e006 | | Load 0x0,0x6
041d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
041e 4801 |H | Short_Literal 0x1
041f 4800 |H | Short_Literal 0x0
0420 e005 | | Load 0x0,0x5
0421 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0422 e002 | | Load 0x0,0x2
0423 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0424 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0425 e5ff | | Load 0x2,-0x1
0426 e002 | | Load 0x0,0x2
0427 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0428 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0429 c402 | | Store 0x2,0x2
042a 005b | [ | Store_Top Discrete,At_Offset_3
042b 00da | | Load_Top At_Offset_2
042c 680c |h | Jump_Zero 0x439
042d e5fb | | Load 0x2,-0x5
042e 4800 |H | Short_Literal 0x0
042f e5ff | | Load 0x2,-0x1
0430 e403 | | Load 0x2,0x3
0431 0092 08b3 | | Action Push_String_Extended,0x8b3 ; "Resolve of subsystem name "
0433 e5ff | | Load 0x2,-0x1
0434 01cc | | Execute Vector,Catenate
0435 8218 | | Call 0x1,0x18
0436 c5fb | | Store 0x2,-0x5
0437 e213 | | Load 0x1,0x13
0438 0257 | W | Execute Discrete,Raise
0439 e002 | | Load 0x0,0x2
043a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
043b 00da | | Load_Top At_Offset_2
043c 0120 | | Execute Any,Is_Value
043d 6803 |h | Jump_Zero 0x441
043e e002 | | Load 0x0,0x2
043f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0440 7801 |x | Jump 0x442
0441 00da | | Load_Top At_Offset_2
0442 e402 | | Load 0x2,0x2
0443 e002 | | Load 0x0,0x2
0444 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0445 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0446 c404 | | Store 0x2,0x4
0447 0059 | Y | Store_Top Discrete,At_Offset_1
0448 00d8 | | Load_Top At_Offset_0
0449 680a |h | Jump_Zero 0x454
044a e5fb | | Load 0x2,-0x5
044b 00d9 | | Load_Top At_Offset_1
044c 0092 08b4 | | Action Push_String_Extended,0x8b4 ; "Determination of the object associated with subsystem "
044e e5ff | | Load 0x2,-0x1
044f 01cc | | Execute Vector,Catenate
0450 8216 | | Call 0x1,0x16
0451 c5fb | | Store 0x2,-0x5
0452 e213 | | Load 0x1,0x13
0453 0257 | W | Execute Discrete,Raise
0454 e5fb | | Load 0x2,-0x5
0455 e5fc | | Load 0x2,-0x4
0456 0120 | | Execute Any,Is_Value
0457 6803 |h | Jump_Zero 0x45b
0458 e002 | | Load 0x0,0x2
0459 1b0f | | Execute Package,Field_Read,Field_Number 0xf
045a 7801 |x | Jump 0x45c
045b e5fc | | Load 0x2,-0x4
045c e002 | | Load 0x0,0x2
045d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
045e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
045f e5fe | | Load 0x2,-0x2
0460 e404 | | Load 0x2,0x4
0461 821c | | Call 0x1,0x1c
0462 c5fd | | Store 0x2,-0x3
0463 c5fc | | Store 0x2,-0x4
0464 c5fb | | Store 0x2,-0x5
0465 00db | | Load_Top At_Offset_3
0466 e002 | | Load 0x0,0x2
0467 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0468 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0469 c402 | | Store 0x2,0x2
046a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
046b TRAP_0400:
046b e213 | | Load 0x1,0x13
046c 010f | | Execute Exception,Equal
046d 680b |h | Jump_Zero 0x479
046e 00ec | | Load_Encached Diana_Tree_Cache
046f a5fd | | Store_Unchecked 0x2,-0x3
0470 e002 | | Load 0x0,0x2
0471 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0472 c5fc | | Store 0x2,-0x4
0473 e402 | | Load 0x2,0x2
0474 e002 | | Load 0x0,0x2
0475 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0476 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0477 c402 | | Store 0x2,0x2
0478 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0479 0100 | | Execute Exception,Raise
047a 0000 0000 | | .BLANK 0000[0x6]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 049f | | .CONST 0x049f ; Address of begin
0481 0595 | | .CONST 0x0595 ; Address of exception handler
0482 000d | | .CONST 0x000d ; Number of locals
0483 INIT_0480:
0483 00e1 | | Load_Encached Boolean_Cache
0484 00e3 | | Load_Encached Natural_Cache
0485 00e3 | | Load_Encached Natural_Cache
0486 00e3 | | Load_Encached Natural_Cache
0487 e002 | | Load 0x0,0x2
0488 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0489 1b18 | | Execute Package,Field_Read,Field_Number 0x18
048a 02c7 | | Declare_Variable Any
048b 00d8 | | Load_Top At_Offset_0
048c 1c00 | | Execute_Immediate Run_Utility,0x0
048d e002 | | Load 0x0,0x2
048e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
048f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0490 e002 | | Load 0x0,0x2
0491 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0492 e002 | | Load 0x0,0x2
0493 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0494 02c7 | | Declare_Variable Any
0495 00d8 | | Load_Top At_Offset_0
0496 1c00 | | Execute_Immediate Run_Utility,0x0
0497 029f 0793 | | Declare_Subprogram INIT_0790,For_Call
0499 029f 07c3 | | Declare_Subprogram INIT_07c0,For_Call
049b 029f 07e3 | | Declare_Subprogram INIT_07e0,For_Call
049d 029f 0823 | #| Declare_Subprogram INIT_0820,For_Call
049f BODY_0480:
049f 00ec | | Load_Encached Diana_Tree_Cache
04a0 a5fd | | Store_Unchecked 0x2,-0x3
04a1 e002 | | Load 0x0,0x2
04a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04a3 c5fc | | Store 0x2,-0x4
04a4 4800 |H | Short_Literal 0x0
04a5 a5fb | | Store_Unchecked 0x2,-0x5
04a6 4800 |H | Short_Literal 0x0
04a7 a5fa | | Store_Unchecked 0x2,-0x6
04a8 e5ff | | Load 0x2,-0x1
04a9 01dd | | Execute Vector,First
04aa e5ff | | Load 0x2,-0x1
04ab 01d7 | | Execute Vector,Field_Read
04ac 00d8 | | Load_Top At_Offset_0
04ad 4846 |HF | Short_Literal 0x46
04ae 4856 |HV | Short_Literal 0x56
04af 0262 | b | Execute Discrete,In_Range
04b0 68db |h | Jump_Zero 0x58c
04b1 0b46 | F | Execute_Immediate Case_Compare,0x46
04b2 7005 |p | Jump_Nonzero 0x4b8
04b3 0b53 | S | Execute_Immediate Case_Compare,0x53
04b4 7043 |pC | Jump_Nonzero 0x4f8
04b5 0f56 | V | Execute_Immediate Equal,0x56
04b6 706a |pj | Jump_Nonzero 0x521
04b7 78d5 |x | Jump 0x58d
04b8 00d1 | | Pop_Control Pop_Count_1
04b9 4800 |H | Short_Literal 0x0
04ba e5ff | | Load 0x2,-0x1
04bb 01dd | | Execute Vector,First
04bc 0a02 | | Execute_Immediate Plus,0x2
04bd 00d8 | | Load_Top At_Offset_0
04be 00e2 | | Load_Encached Integer_Cache
04bf 0260 | ` | Execute Discrete,In_Type
04c0 7001 |p | Jump_Nonzero 0x4c2
04c1 0801 | | Execute_Immediate Raise,0x1
04c2 e5ff | | Load 0x2,-0x1
04c3 01dc | | Execute Vector,Last
04c4 e5ff | | Load 0x2,-0x1
04c5 01cf | | Execute Vector,Slice_Read
04c6 483b |H; | Short_Literal 0x3b
04c7 e003 | | Load 0x0,0x3
04c8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04c9 0aff | | Execute_Immediate Plus,-0x1
04ca c404 | | Store 0x2,0x4
04cb e5ff | | Load 0x2,-0x1
04cc 01dd | | Execute Vector,First
04cd 0a02 | | Execute_Immediate Plus,0x2
04ce 00d8 | | Load_Top At_Offset_0
04cf 00e2 | | Load_Encached Integer_Cache
04d0 0260 | ` | Execute Discrete,In_Type
04d1 7001 |p | Jump_Nonzero 0x4d3
04d2 0801 | | Execute_Immediate Raise,0x1
04d3 e404 | | Load 0x2,0x4
04d4 e5ff | | Load 0x2,-0x1
04d5 01cf | | Execute Vector,Slice_Read
04d6 840a | | Call 0x2,0xa
04d7 e5ff | | Load 0x2,-0x1
04d8 01dd | | Execute Vector,First
04d9 0a02 | | Execute_Immediate Plus,0x2
04da 00d8 | | Load_Top At_Offset_0
04db 00e2 | | Load_Encached Integer_Cache
04dc 0260 | ` | Execute Discrete,In_Type
04dd 7001 |p | Jump_Nonzero 0x4df
04de 0801 | | Execute_Immediate Raise,0x1
04df e404 | | Load 0x2,0x4
04e0 e5ff | | Load 0x2,-0x1
04e1 01cf | | Execute Vector,Slice_Read
04e2 840c | | Call 0x2,0xc
04e3 e404 | | Load 0x2,0x4
04e4 0a02 | | Execute_Immediate Plus,0x2
04e5 c5fb | | Store 0x2,-0x5
04e6 4800 |H | Short_Literal 0x0
04e7 e404 | | Load 0x2,0x4
04e8 0a02 | | Execute_Immediate Plus,0x2
04e9 00d8 | | Load_Top At_Offset_0
04ea 00e2 | | Load_Encached Integer_Cache
04eb 0260 | ` | Execute Discrete,In_Type
04ec 7001 |p | Jump_Nonzero 0x4ee
04ed 0801 | | Execute_Immediate Raise,0x1
04ee e5ff | | Load 0x2,-0x1
04ef 01dc | | Execute Vector,Last
04f0 e5ff | | Load 0x2,-0x1
04f1 01cf | | Execute Vector,Slice_Read
04f2 483b |H; | Short_Literal 0x3b
04f3 e003 | | Load 0x0,0x3
04f4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04f5 0aff | | Execute_Immediate Plus,-0x1
04f6 c5fa | | Store 0x2,-0x6
04f7 7897 |x | Jump 0x58f
04f8 00d1 | | Pop_Control Pop_Count_1
04f9 4800 |H | Short_Literal 0x0
04fa e5ff | | Load 0x2,-0x1
04fb 01dd | | Execute Vector,First
04fc 0a02 | | Execute_Immediate Plus,0x2
04fd 00d8 | | Load_Top At_Offset_0
04fe 00e2 | | Load_Encached Integer_Cache
04ff 0260 | ` | Execute Discrete,In_Type
0500 7001 |p | Jump_Nonzero 0x502
0501 0801 | | Execute_Immediate Raise,0x1
0502 e5ff | | Load 0x2,-0x1
0503 01dc | | Execute Vector,Last
0504 e5ff | | Load 0x2,-0x1
0505 01cf | | Execute Vector,Slice_Read
0506 483b |H; | Short_Literal 0x3b
0507 e003 | | Load 0x0,0x3
0508 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0509 0aff | | Execute_Immediate Plus,-0x1
050a c405 | | Store 0x2,0x5
050b 840d | | Call 0x2,0xd
050c e405 | | Load 0x2,0x5
050d 0a04 | | Execute_Immediate Plus,0x4
050e c5fb | | Store 0x2,-0x5
050f 4800 |H | Short_Literal 0x0
0510 e405 | | Load 0x2,0x5
0511 0a04 | | Execute_Immediate Plus,0x4
0512 00d8 | | Load_Top At_Offset_0
0513 00e2 | | Load_Encached Integer_Cache
0514 0260 | ` | Execute Discrete,In_Type
0515 7001 |p | Jump_Nonzero 0x517
0516 0801 | | Execute_Immediate Raise,0x1
0517 e5ff | | Load 0x2,-0x1
0518 01dc | | Execute Vector,Last
0519 e5ff | | Load 0x2,-0x1
051a 01cf | | Execute Vector,Slice_Read
051b 483b |H; | Short_Literal 0x3b
051c e003 | | Load 0x0,0x3
051d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
051e 0aff | | Execute_Immediate Plus,-0x1
051f c5fa | | Store 0x2,-0x6
0520 786e |xn | Jump 0x58f
0521 4801 |H | Short_Literal 0x1
0522 0092 08b5 | | Action Push_String_Extended,0x8b5 ; "<DEFAULT>"
0524 e5fe | | Load 0x2,-0x2
0525 e003 | | Load 0x0,0x3
0526 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0527 6807 |h | Jump_Zero 0x52f
0528 0092 08b6 | | Action Push_String_Extended,0x8b6 ; "$$"
052a 840a | | Call 0x2,0xa
052b 0092 08b6 | | Action Push_String_Extended,0x8b6 ; "$$"
052d 840c | | Call 0x2,0xc
052e 7846 |xF | Jump 0x575
052f 4800 |H | Short_Literal 0x0
0530 e5fe | | Load 0x2,-0x2
0531 4827 |H' | Short_Literal 0x27
0532 e003 | | Load 0x0,0x3
0533 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0534 a403 | | Store_Unchecked 0x2,0x3
0535 e403 | | Load 0x2,0x3
0536 0c01 | | Execute_Immediate Greater_Equal,0x1
0537 680f |h | Jump_Zero 0x547
0538 e5fe | | Load 0x2,-0x2
0539 01dd | | Execute Vector,First
053a e403 | | Load 0x2,0x3
053b 0aff | | Execute_Immediate Plus,-0x1
053c e5fe | | Load 0x2,-0x2
053d 01cf | | Execute Vector,Slice_Read
053e 840a | | Call 0x2,0xa
053f e5fe | | Load 0x2,-0x2
0540 01dd | | Execute Vector,First
0541 e403 | | Load 0x2,0x3
0542 0aff | | Execute_Immediate Plus,-0x1
0543 e5fe | | Load 0x2,-0x2
0544 01cf | | Execute Vector,Slice_Read
0545 840b | | Call 0x2,0xb
0546 7804 |x | Jump 0x54b
0547 e5fe | | Load 0x2,-0x2
0548 840a | | Call 0x2,0xa
0549 e5fe | | Load 0x2,-0x2
054a 840b | | Call 0x2,0xb
054b 6054 |`T | Indirect_Literal Discrete,0x5a0,{0x00000000, 0x00004000}
054c e004 | | Load 0x0,0x4
054d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
054e e409 | | Load 0x2,0x9
054f e007 | | Load 0x0,0x7
0550 180f | | Execute Package,Field_Execute,Field_Number 0xf
0551 6821 |h! | Jump_Zero 0x573
0552 e403 | | Load 0x2,0x3
0553 680b |h | Jump_Zero 0x55f
0554 4801 |H | Short_Literal 0x1
0555 0092 08b7 | | Action Push_String_Extended,0x8b7 ; "'SPEC"
0557 e403 | | Load 0x2,0x3
0558 e5fe | | Load 0x2,-0x2
0559 01dc | | Execute Vector,Last
055a e5fe | | Load 0x2,-0x2
055b 01cf | | Execute Vector,Slice_Read
055c e003 | | Load 0x0,0x3
055d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
055e 7801 |x | Jump 0x560
055f 4801 |H | Short_Literal 0x1
0560 a402 | | Store_Unchecked 0x2,0x2
0561 e5f9 | | Load 0x2,-0x7
0562 e5fc | | Load 0x2,-0x4
0563 0120 | | Execute Any,Is_Value
0564 6803 |h | Jump_Zero 0x568
0565 e002 | | Load 0x0,0x2
0566 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0567 7801 |x | Jump 0x569
0568 e5fc | | Load 0x2,-0x4
0569 e002 | | Load 0x0,0x2
056a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
056b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
056c e402 | | Load 0x2,0x2
056d e409 | | Load 0x2,0x9
056e 821c | | Call 0x1,0x1c
056f c5fd | | Store 0x2,-0x3
0570 c5fc | | Store 0x2,-0x4
0571 c5f9 | | Store 0x2,-0x7
0572 7802 |x | Jump 0x575
0573 e5fe | | Load 0x2,-0x2
0574 840c | | Call 0x2,0xc
0575 e5ff | | Load 0x2,-0x1
0576 01dd | | Execute Vector,First
0577 0a02 | | Execute_Immediate Plus,0x2
0578 c5fb | | Store 0x2,-0x5
0579 4800 |H | Short_Literal 0x0
057a e5ff | | Load 0x2,-0x1
057b 01dd | | Execute Vector,First
057c 0a02 | | Execute_Immediate Plus,0x2
057d 00d8 | | Load_Top At_Offset_0
057e 00e2 | | Load_Encached Integer_Cache
057f 0260 | ` | Execute Discrete,In_Type
0580 7001 |p | Jump_Nonzero 0x582
0581 0801 | | Execute_Immediate Raise,0x1
0582 e5ff | | Load 0x2,-0x1
0583 01dc | | Execute Vector,Last
0584 e5ff | | Load 0x2,-0x1
0585 01cf | | Execute Vector,Slice_Read
0586 483b |H; | Short_Literal 0x3b
0587 e003 | | Load 0x0,0x3
0588 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0589 0aff | | Execute_Immediate Plus,-0x1
058a c5fa | | Store 0x2,-0x6
058b 7803 |x | Jump 0x58f
058c 00d1 | | Pop_Control Pop_Count_1
058d e213 | | Load 0x1,0x13
058e 0257 | W | Execute Discrete,Raise
058f e406 | | Load 0x2,0x6
0590 e002 | | Load 0x0,0x2
0591 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0592 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0593 c406 | | Store 0x2,0x6
0594 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0595 TRAP_0480:
0595 e213 | | Load 0x1,0x13
0596 010f | | Execute Exception,Equal
0597 6806 |h | Jump_Zero 0x59e
0598 e406 | | Load 0x2,0x6
0599 e002 | | Load 0x0,0x2
059a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
059b 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
059c c406 | | Store 0x2,0x6
059d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
059e 0100 | | Execute Exception,Raise
059f 0000 | | .XXX[0x1]
05a0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
05a4 0000 0000 | | .BLANK 0000[0x4]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05bb | | .CONST 0x05bb ; Address of begin
05a9 060f | | .CONST 0x060f ; Address of exception handler
05aa 0003 | | .CONST 0x0003 ; Number of locals
05ab INIT_05a8:
05ab 67f4 |g | Indirect_Literal Discrete,0x5a0,{0x00000000, 0x00004000}
05ac e004 | | Load 0x0,0x4
05ad 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05ae e5ff | | Load 0x2,-0x1
05af e007 | | Load 0x0,0x7
05b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
05b1 00e1 | | Load_Encached Boolean_Cache
05b2 03f1 | | Declare_Variable Discrete,With_Value
05b3 67ec |g | Indirect_Literal Discrete,0x5a0,{0x00000000, 0x00004000}
05b4 e004 | | Load 0x0,0x4
05b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b6 e5ff | | Load 0x2,-0x1
05b7 e007 | | Load 0x0,0x7
05b8 180d | | Execute Package,Field_Execute,Field_Number 0xd
05b9 00e1 | | Load_Encached Boolean_Cache
05ba 03f1 | | Declare_Variable Discrete,With_Value
05bb BODY_05a8:
05bb e5fd | | Load 0x2,-0x3
05bc 0092 08a2 | | Action Push_String_Extended,0x8a2 ; "<FULL>"
05be 01df | | Execute Vector,Equal
05bf 7004 |p | Jump_Nonzero 0x5c4
05c0 00d9 | | Load_Top At_Offset_1
05c1 7012 |p | Jump_Nonzero 0x5d4
05c2 00d8 | | Load_Top At_Offset_0
05c3 7010 |p | Jump_Nonzero 0x5d4
05c4 483b |H; | Short_Literal 0x3b
05c5 483b |H; | Short_Literal 0x3b
05c6 0092 08b8 | | Action Push_String_Extended,0x8b8 ; "F;"
05c8 e5ff | | Load 0x2,-0x1
05c9 e002 | | Load 0x0,0x2
05ca 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05cb 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
05cc 01cc | | Execute Vector,Catenate
05cd 01cb | | Execute Vector,Append
05ce e5fe | | Load 0x2,-0x2
05cf e5ff | | Load 0x2,-0x1
05d0 8219 | | Call 0x1,0x19
05d1 01cc | | Execute Vector,Catenate
05d2 01cb | | Execute Vector,Append
05d3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
05d4 e5fd | | Load 0x2,-0x3
05d5 0092 08b9 | | Action Push_String_Extended,0x8b9 ; "<SUBSYSTEM>"
05d7 01df | | Execute Vector,Equal
05d8 6820 |h | Jump_Zero 0x5f9
05d9 00d9 | | Load_Top At_Offset_1
05da 680f |h | Jump_Zero 0x5ea
05db 483b |H; | Short_Literal 0x3b
05dc 0092 08ba | | Action Push_String_Extended,0x8ba ; "S;"
05de e5ff | | Load 0x2,-0x1
05df 821a | | Call 0x1,0x1a
05e0 01cc | | Execute Vector,Catenate
05e1 0092 08bb | | Action Push_String_Extended,0x8bb ; ";S;"
05e3 01cc | | Execute Vector,Catenate
05e4 e5fe | | Load 0x2,-0x2
05e5 e5ff | | Load 0x2,-0x1
05e6 8219 | | Call 0x1,0x19
05e7 01cc | | Execute Vector,Catenate
05e8 01cb | | Execute Vector,Append
05e9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
05ea 483b |H; | Short_Literal 0x3b
05eb 0092 08ba | | Action Push_String_Extended,0x8ba ; "S;"
05ed e5ff | | Load 0x2,-0x1
05ee 821a | | Call 0x1,0x1a
05ef 01cc | | Execute Vector,Catenate
05f0 0092 08bc | | Action Push_String_Extended,0x8bc ; ";L;"
05f2 01cc | | Execute Vector,Catenate
05f3 e5fe | | Load 0x2,-0x2
05f4 e5ff | | Load 0x2,-0x1
05f5 8219 | | Call 0x1,0x19
05f6 01cc | | Execute Vector,Catenate
05f7 01cb | | Execute Vector,Append
05f8 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
05f9 e5fd | | Load 0x2,-0x3
05fa 0092 08bd | | Action Push_String_Extended,0x8bd ; "<VIEW>"
05fc 01df | | Execute Vector,Equal
05fd 6809 |h | Jump_Zero 0x607
05fe 483b |H; | Short_Literal 0x3b
05ff 0092 08be | | Action Push_String_Extended,0x8be ; "V;"
0601 e5fe | | Load 0x2,-0x2
0602 e5ff | | Load 0x2,-0x1
0603 8219 | | Call 0x1,0x19
0604 01cc | | Execute Vector,Catenate
0605 01cb | | Execute Vector,Append
0606 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0607 e5fd | | Load 0x2,-0x3
0608 0092 08bf | | Action Push_String_Extended,0x8bf ; " is not acceptable"
060a 01cc | | Execute Vector,Catenate
060b e008 | | Load 0x0,0x8
060c 8009 | | Call 0x0,0x9
060d e213 | | Load 0x1,0x13
060e 0257 | W | Execute Discrete,Raise
060f TRAP_05a8:
060f e213 | | Load 0x1,0x13
0610 010f | | Execute Exception,Equal
0611 6802 |h | Jump_Zero 0x614
0612 00ea | | Load_Encached Null_String_Cache
0613 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0614 0100 | | Execute Exception,Raise
0615 0000 0000 | | .XXX[0x3]
0617 0000 | |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0622 | " | .CONST 0x0622 ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0002 | | .CONST 0x0002 ; Number of locals
061b INIT_0618:
061b 00da | | Load_Top At_Offset_2
061c 01da | | Execute Vector,Bounds
061d e002 | | Load 0x0,0x2
061e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
061f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0620 035b | [ | Declare_Type Array,Constrained
0621 0337 | 7 | Declare_Variable Array
0622 BODY_0618:
0622 00cf | | Action Mark_Auxiliary
0623 e5ff | | Load 0x2,-0x1
0624 01d9 | | Execute Vector,Reverse_Bounds
0625 0263 | c | Execute Discrete,Above_Bound
0626 7012 |p | Jump_Nonzero 0x639
0627 00d8 | | Load_Top At_Offset_0
0628 e5ff | | Load 0x2,-0x1
0629 01d7 | | Execute Vector,Field_Read
062a 0f3b | ; | Execute_Immediate Equal,0x3b
062b 7007 |p | Jump_Nonzero 0x633
062c 00d8 | | Load_Top At_Offset_0
062d e5ff | | Load 0x2,-0x1
062e 01d7 | | Execute Vector,Field_Read
062f 00d9 | | Load_Top At_Offset_1
0630 e402 | | Load 0x2,0x2
0631 01d6 | | Execute Vector,Field_Write
0632 7804 |x | Jump 0x637
0633 482e |H. | Short_Literal 0x2e
0634 00d9 | | Load_Top At_Offset_1
0635 e402 | | Load 0x2,0x2
0636 01d6 | | Execute Vector,Field_Write
0637 00c8 | | Action Pop_Auxiliary_Range
0638 3fee |? | Loop_Increasing 0x627
0639 00ce | | Action Pop_Auxiliary
063a 00d8 | | Load_Top At_Offset_0
063b 00e9 | | Load_Encached String_Cache
063c 01c6 | | Execute Vector,Convert_To_Formal
063d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
063e 0000 0000 | | .XXX[0x2]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 064b | K | .CONST 0x064b ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0003 | | .CONST 0x0003 ; Number of locals
0643 INIT_0640:
0643 e002 | | Load 0x0,0x2
0644 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0645 e002 | | Load 0x0,0x2
0646 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0647 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0648 02c7 | | Declare_Variable Any
0649 00d8 | | Load_Top At_Offset_0
064a 1c00 | | Execute_Immediate Run_Utility,0x0
064b BODY_0640:
064b e002 | | Load 0x0,0x2
064c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064d 00d9 | | Load_Top At_Offset_1
064e 0120 | | Execute Any,Is_Value
064f 6804 |h | Jump_Zero 0x654
0650 e002 | | Load 0x0,0x2
0651 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0652 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0653 7801 |x | Jump 0x655
0654 00d9 | | Load_Top At_Offset_1
0655 e002 | | Load 0x0,0x2
0656 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0657 180d | | Execute Package,Field_Execute,Field_Number 0xd
0658 c403 | | Store 0x2,0x3
0659 005a | Z | Store_Top Discrete,At_Offset_2
065a 00d9 | | Load_Top At_Offset_1
065b 7006 |p | Jump_Nonzero 0x662
065c 00d8 | | Load_Top At_Offset_0
065d e002 | | Load 0x0,0x2
065e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
065f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0660 c214 | | Store 0x1,0x14
0661 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0662 08e2 | | Execute_Immediate Raise,0xe2
0663 0000 0000 | | .BLANK 0000[0x5]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0678 | x | .CONST 0x0678 ; Address of begin
0669 06bd | | .CONST 0x06bd ; Address of exception handler
066a 0004 | | .CONST 0x0004 ; Number of locals
066b INIT_0668:
066b e002 | | Load 0x0,0x2
066c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
066d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
066e e402 | | Load 0x2,0x2
066f 0266 | f | Execute Discrete,Bounds
0670 e5fc | | Load 0x2,-0x4
0671 01cf | | Execute Vector,Slice_Read
0672 8220 | | Call 0x1,0x20
0673 e002 | | Load 0x0,0x2
0674 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0675 02c7 | | Declare_Variable Any
0676 00d8 | | Load_Top At_Offset_0
0677 1c00 | | Execute_Immediate Run_Utility,0x0
0678 BODY_0668:
0678 e002 | | Load 0x0,0x2
0679 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
067a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
067b 00d9 | | Load_Top At_Offset_1
067c 0120 | | Execute Any,Is_Value
067d 6803 |h | Jump_Zero 0x681
067e e002 | | Load 0x0,0x2
067f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0680 7801 |x | Jump 0x682
0681 00d9 | | Load_Top At_Offset_1
0682 607d |`} | Indirect_Literal Discrete,0x700,{0x00000000, 0x00004000}
0683 e004 | | Load 0x0,0x4
0684 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0685 e005 | | Load 0x0,0x5
0686 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0687 e002 | | Load 0x0,0x2
0688 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0689 1816 | | Execute Package,Field_Execute,Field_Number 0x16
068a e603 | | Load 0x3,0x3
068b 85fd | | Call 0x2,-0x3
068c e002 | | Load 0x0,0x2
068d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
068e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
068f c604 | | Store 0x3,0x4
0690 005b | [ | Store_Top Discrete,At_Offset_3
0691 00da | | Load_Top At_Offset_2
0692 6824 |h$ | Jump_Zero 0x6b7
0693 e00c | | Load 0x0,0xc
0694 180e | | Execute Package,Field_Execute,Field_Number 0xe
0695 4806 |H | Short_Literal 0x6
0696 0092 08c0 | | Action Push_String_Extended,0x8c0 ; "Unable to recreate "
0698 e603 | | Load 0x3,0x3
0699 85fd | | Call 0x2,-0x3
069a 01cc | | Execute Vector,Catenate
069b 0092 08c1 | | Action Push_String_Extended,0x8c1 ; " because "
069d 01cc | | Execute Vector,Catenate
069e 6061 |`a | Indirect_Literal Discrete,0x700,{0x00000000, 0x00004000}
069f e004 | | Load 0x0,0x4
06a0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06a1 e005 | | Load 0x0,0x5
06a2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06a3 e006 | | Load 0x0,0x6
06a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06a5 4801 |H | Short_Literal 0x1
06a6 4800 |H | Short_Literal 0x0
06a7 e005 | | Load 0x0,0x5
06a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06a9 e002 | | Load 0x0,0x2
06aa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06ab 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06ac e603 | | Load 0x3,0x3
06ad 85fd | | Call 0x2,-0x3
06ae e602 | | Load 0x3,0x2
06af e002 | | Load 0x0,0x2
06b0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06b1 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
06b2 01cc | | Execute Vector,Catenate
06b3 85fe | | Call 0x2,-0x2
06b4 e212 | | Load 0x1,0x12
06b5 00cb | | Action Pop_Block_With_Result
06b6 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
06b7 0092 08a2 | | Action Push_String_Extended,0x8a2 ; "<FULL>"
06b9 00d9 | | Load_Top At_Offset_1
06ba 820e | | Call 0x1,0xe
06bb 00cb | | Action Pop_Block_With_Result
06bc 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
06bd TRAP_0668:
06bd 0007 | | Action Break_Optional
06be e002 | | Load 0x0,0x2
06bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06c0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06c1 00da | | Load_Top At_Offset_2
06c2 0120 | | Execute Any,Is_Value
06c3 6803 |h | Jump_Zero 0x6c7
06c4 e002 | | Load 0x0,0x2
06c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06c6 7801 |x | Jump 0x6c8
06c7 00da | | Load_Top At_Offset_2
06c8 6037 |`7 | Indirect_Literal Discrete,0x700,{0x00000000, 0x00004000}
06c9 e004 | | Load 0x0,0x4
06ca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06cb e005 | | Load 0x0,0x5
06cc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06cd e002 | | Load 0x0,0x2
06ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06cf 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06d0 e603 | | Load 0x3,0x3
06d1 e002 | | Load 0x0,0x2
06d2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06d3 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
06d4 c604 | | Store 0x3,0x4
06d5 c602 | | Store 0x3,0x2
06d6 00db | | Load_Top At_Offset_3
06d7 6822 |h" | Jump_Zero 0x6fa
06d8 e00c | | Load 0x0,0xc
06d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
06da 4806 |H | Short_Literal 0x6
06db 0092 08c0 | | Action Push_String_Extended,0x8c0 ; "Unable to recreate "
06dd e603 | | Load 0x3,0x3
06de 01cc | | Execute Vector,Catenate
06df 0092 08c1 | | Action Push_String_Extended,0x8c1 ; " because "
06e1 01cc | | Execute Vector,Catenate
06e2 601d |` | Indirect_Literal Discrete,0x700,{0x00000000, 0x00004000}
06e3 e004 | | Load 0x0,0x4
06e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06e5 e005 | | Load 0x0,0x5
06e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06e7 e006 | | Load 0x0,0x6
06e8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06e9 4801 |H | Short_Literal 0x1
06ea 4800 |H | Short_Literal 0x0
06eb e005 | | Load 0x0,0x5
06ec 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06ed e002 | | Load 0x0,0x2
06ee 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06ef 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06f0 e603 | | Load 0x3,0x3
06f1 e602 | | Load 0x3,0x2
06f2 e002 | | Load 0x0,0x2
06f3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06f4 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
06f5 01cc | | Execute Vector,Catenate
06f6 85fe | | Call 0x2,-0x2
06f7 e212 | | Load 0x1,0x12
06f8 00cb | | Action Pop_Block_With_Result
06f9 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
06fa e5fc | | Load 0x2,-0x4
06fb 0335 | 5 | Declare_Variable Array,Duplicate
06fc 00cd | | Action Spare6_Action
06fd 00cb | | Action Pop_Block_With_Result
06fe 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
06ff 0000 | | .XXX[0x1]
0700 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0704 0000 0000 | | .BLANK 0000[0x4]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 0710 | | .CONST 0x0710 ; Address of begin
0709 075b | [ | .CONST 0x075b ; Address of exception handler
070a 0002 | | .CONST 0x0002 ; Number of locals
070b INIT_0708:
070b e00d | | Load 0x0,0xd
070c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
070d 02c7 | | Declare_Variable Any
070e 00d8 | | Load_Top At_Offset_0
070f 1c00 | | Execute_Immediate Run_Utility,0x0
0710 BODY_0708:
0710 00be | | Action Activate_Tasks
0711 e002 | | Load 0x0,0x2
0712 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0713 c7fd | | Store 0x3,-0x3
0714 e7fc | | Load 0x3,-0x4
0715 e00a | | Load 0x0,0xa
0716 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0717 c7fc | | Store 0x3,-0x4
0718 e002 | | Load 0x0,0x2
0719 1b0d | | Execute Package,Field_Read,Field_Number 0xd
071a 00d9 | | Load_Top At_Offset_1
071b 4800 |H | Short_Literal 0x0
071c 4800 |H | Short_Literal 0x0
071d 800e | | Call 0x0,0xe
071e e00c | | Load 0x0,0xc
071f 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0720 e00d | | Load 0x0,0xd
0721 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0722 c602 | | Store 0x3,0x2
0723 c405 | | Store 0x2,0x5
0724 e405 | | Load 0x2,0x5
0725 6810 |h | Jump_Zero 0x736
0726 e7fc | | Load 0x3,-0x4
0727 4829 |H) | Short_Literal 0x29
0728 0092 08c2 | | Action Push_String_Extended,0x8c2 ; "Unable to open default activity ("
072a e405 | | Load 0x2,0x5
072b e002 | | Load 0x0,0x2
072c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072d 011c | | Execute Any,Convert_Unchecked
072e 1c01 | | Execute_Immediate Run_Utility,0x1
072f 01cc | | Execute Vector,Catenate
0730 01cb | | Execute Vector,Append
0731 e00f | | Load 0x0,0xf
0732 e00a | | Load 0x0,0xa
0733 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0734 c7fc | | Store 0x3,-0x4
0735 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0736 e7fe | | Load 0x3,-0x2
0737 6806 |h | Jump_Zero 0x73e
0738 00d8 | | Load_Top At_Offset_0
0739 e7ff | | Load 0x3,-0x1
073a e00d | | Load 0x0,0xd
073b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
073c c7fd | | Store 0x3,-0x3
073d 7805 |x | Jump 0x743
073e 00d8 | | Load_Top At_Offset_0
073f e7ff | | Load 0x3,-0x1
0740 e00d | | Load 0x0,0xd
0741 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0742 c7fd | | Store 0x3,-0x3
0743 e002 | | Load 0x0,0x2
0744 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0745 00d9 | | Load_Top At_Offset_1
0746 e00d | | Load 0x0,0xd
0747 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0748 c602 | | Store 0x3,0x2
0749 c405 | | Store 0x2,0x5
074a e405 | | Load 0x2,0x5
074b 680e |h | Jump_Zero 0x75a
074c e7fc | | Load 0x3,-0x4
074d e405 | | Load 0x2,0x5
074e e002 | | Load 0x0,0x2
074f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0750 011c | | Execute Any,Convert_Unchecked
0751 1c01 | | Execute_Immediate Run_Utility,0x1
0752 0092 08c3 | | Action Push_String_Extended,0x8c3 ; " encountered while closing default activity"
0754 01cc | | Execute Vector,Catenate
0755 e008 | | Load 0x0,0x8
0756 e00a | | Load 0x0,0xa
0757 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0758 c7fc | | Store 0x3,-0x4
0759 4503 |E | Exit_Suprogram New_Top_Offset 0x3
075a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
075b TRAP_0708:
075b e00d | | Load 0x0,0xd
075c 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
075d 010f | | Execute Exception,Equal
075e 682c |h, | Jump_Zero 0x78b
075f e002 | | Load 0x0,0x2
0760 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0761 c7fd | | Store 0x3,-0x3
0762 e5fb | | Load 0x2,-0x5
0763 0092 08c4 | | Action Push_String_Extended,0x8c4 ; "Activity contains no "
0765 e5fe | | Load 0x2,-0x2
0766 821b | | Call 0x1,0x1b
0767 01cc | | Execute Vector,Catenate
0768 0092 08c5 | | Action Push_String_Extended,0x8c5 ; " view for subsystem "
076a 01cc | | Execute Vector,Catenate
076b e5ff | | Load 0x2,-0x1
076c e002 | | Load 0x0,0x2
076d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
076e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
076f 01cc | | Execute Vector,Catenate
0770 e008 | | Load 0x0,0x8
0771 e00a | | Load 0x0,0xa
0772 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0773 c5fb | | Store 0x2,-0x5
0774 e002 | | Load 0x0,0x2
0775 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0776 00da | | Load_Top At_Offset_2
0777 e00d | | Load 0x0,0xd
0778 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0779 c602 | | Store 0x3,0x2
077a c405 | | Store 0x2,0x5
077b e405 | | Load 0x2,0x5
077c 680d |h | Jump_Zero 0x78a
077d e7fc | | Load 0x3,-0x4
077e e405 | | Load 0x2,0x5
077f e002 | | Load 0x0,0x2
0780 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0781 011c | | Execute Any,Convert_Unchecked
0782 1c01 | | Execute_Immediate Run_Utility,0x1
0783 0092 08c3 | | Action Push_String_Extended,0x8c3 ; " encountered while closing default activity"
0785 01cc | | Execute Vector,Catenate
0786 e008 | | Load 0x0,0x8
0787 00ea | | Load_Encached Null_String_Cache
0788 8010 | | Call 0x0,0x10
0789 c7fc | | Store 0x3,-0x4
078a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
078b 0100 | | Execute Exception,Raise
078c 0000 0000 | | .BLANK 0000[0x4]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793 | | .CONST 0x0793 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0001 | | .CONST 0x0001 ; Number of locals
0793 BODY_0790:
0793 INIT_0790:
0793 e002 | | Load 0x0,0x2
0794 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0795 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0796 e406 | | Load 0x2,0x6
0797 6024 |`$ | Indirect_Literal Discrete,0x7bc,{0x00000000, 0x00004000}
0798 e004 | | Load 0x0,0x4
0799 1b0e | | Execute Package,Field_Read,Field_Number 0xe
079a e005 | | Load 0x0,0x5
079b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
079c e006 | | Load 0x0,0x6
079d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
079e 4801 |H | Short_Literal 0x1
079f 4800 |H | Short_Literal 0x0
07a0 e005 | | Load 0x0,0x5
07a1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07a2 e002 | | Load 0x0,0x2
07a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07a4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07a5 e7ff | | Load 0x3,-0x1
07a6 e002 | | Load 0x0,0x2
07a7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07a8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
07a9 c406 | | Store 0x2,0x6
07aa c407 | | Store 0x2,0x7
07ab e407 | | Load 0x2,0x7
07ac 680c |h | Jump_Zero 0x7b9
07ad e5f9 | | Load 0x2,-0x7
07ae 4800 |H | Short_Literal 0x0
07af e7ff | | Load 0x3,-0x1
07b0 e407 | | Load 0x2,0x7
07b1 0092 08c6 | | Action Push_String_Extended,0x8c6 ; "Resolving object "
07b3 e7ff | | Load 0x3,-0x1
07b4 01cc | | Execute Vector,Catenate
07b5 8218 | | Call 0x1,0x18
07b6 c5f9 | | Store 0x2,-0x7
07b7 e213 | | Load 0x1,0x13
07b8 0257 | W | Execute Discrete,Raise
07b9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07ba 0000 0000 | | .XXX[0x2]
07bc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07c3 | | .CONST 0x07c3 ; Address of begin
07c1 0004 | | .CONST 0x0004 ; Address of exception handler
07c2 0001 | | .CONST 0x0001 ; Number of locals
07c3 BODY_07c0:
07c3 INIT_07c0:
07c3 e002 | | Load 0x0,0x2
07c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07c5 e409 | | Load 0x2,0x9
07c6 0120 | | Execute Any,Is_Value
07c7 6803 |h | Jump_Zero 0x7cb
07c8 e002 | | Load 0x0,0x2
07c9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ca 7801 |x | Jump 0x7cc
07cb e409 | | Load 0x2,0x9
07cc e406 | | Load 0x2,0x6
07cd e002 | | Load 0x0,0x2
07ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07cf 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07d0 c409 | | Store 0x2,0x9
07d1 c408 | | Store 0x2,0x8
07d2 e408 | | Load 0x2,0x8
07d3 680a |h | Jump_Zero 0x7de
07d4 e5f9 | | Load 0x2,-0x7
07d5 e408 | | Load 0x2,0x8
07d6 0092 08c7 | | Action Push_String_Extended,0x8c7 ; "Determining the object associated with "
07d8 e7ff | | Load 0x3,-0x1
07d9 01cc | | Execute Vector,Catenate
07da 8216 | | Call 0x1,0x16
07db c5f9 | | Store 0x2,-0x7
07dc e213 | | Load 0x1,0x13
07dd 0257 | W | Execute Discrete,Raise
07de 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07df 0000 | | .XXX[0x1]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07e3 | | .CONST 0x07e3 ; Address of begin
07e1 0004 | | .CONST 0x0004 ; Address of exception handler
07e2 0001 | | .CONST 0x0001 ; Number of locals
07e3 BODY_07e0:
07e3 INIT_07e0:
07e3 e002 | | Load 0x0,0x2
07e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e5 00ec | | Load_Encached Diana_Tree_Cache
07e6 6031 |`1 | Indirect_Literal Discrete,0x818,{0x00000000, 0x00004000}
07e7 e004 | | Load 0x0,0x4
07e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07e9 e406 | | Load 0x2,0x6
07ea e002 | | Load 0x0,0x2
07eb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07ec 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
07ed c5fd | | Store 0x2,-0x3
07ee c408 | | Store 0x2,0x8
07ef e408 | | Load 0x2,0x8
07f0 680a |h | Jump_Zero 0x7fb
07f1 e5f9 | | Load 0x2,-0x7
07f2 e408 | | Load 0x2,0x8
07f3 0092 08c8 | | Action Push_String_Extended,0x8c8 ; "Determining the view context of "
07f5 e7ff | | Load 0x3,-0x1
07f6 01cc | | Execute Vector,Catenate
07f7 8216 | | Call 0x1,0x16
07f8 c5f9 | | Store 0x2,-0x7
07f9 e213 | | Load 0x1,0x13
07fa 0257 | W | Execute Discrete,Raise
07fb e002 | | Load 0x0,0x2
07fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07fd e5fc | | Load 0x2,-0x4
07fe 0120 | | Execute Any,Is_Value
07ff 6803 |h | Jump_Zero 0x803
0800 e002 | | Load 0x0,0x2
0801 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0802 7801 |x | Jump 0x804
0803 e5fc | | Load 0x2,-0x4
0804 e406 | | Load 0x2,0x6
0805 e002 | | Load 0x0,0x2
0806 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0807 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0808 c5fc | | Store 0x2,-0x4
0809 c408 | | Store 0x2,0x8
080a e408 | | Load 0x2,0x8
080b 680a |h | Jump_Zero 0x816
080c e5f9 | | Load 0x2,-0x7
080d e408 | | Load 0x2,0x8
080e 0092 08c9 | | Action Push_String_Extended,0x8c9 ; "Determining the view object associated with "
0810 e7ff | | Load 0x3,-0x1
0811 01cc | | Execute Vector,Catenate
0812 8216 | | Call 0x1,0x16
0813 c5f9 | | Store 0x2,-0x7
0814 e213 | | Load 0x1,0x13
0815 0257 | W | Execute Discrete,Raise
0816 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0817 0000 | | .XXX[0x1]
0818 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
081c 0000 0000 | | .BLANK 0000[0x4]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0830 | 0 | .CONST 0x0830 ; Address of begin
0821 0004 | | .CONST 0x0004 ; Address of exception handler
0822 0002 | | .CONST 0x0002 ; Number of locals
0823 INIT_0820:
0823 e5ff | | Load 0x2,-0x1
0824 01dd | | Execute Vector,First
0825 0a02 | | Execute_Immediate Plus,0x2
0826 00d8 | | Load_Top At_Offset_0
0827 00e2 | | Load_Encached Integer_Cache
0828 0260 | ` | Execute Discrete,In_Type
0829 7001 |p | Jump_Nonzero 0x82b
082a 0801 | | Execute_Immediate Raise,0x1
082b e405 | | Load 0x2,0x5
082c 00e9 | | Load_Encached String_Cache
082d 035b | [ | Declare_Type Array,Constrained
082e e5ff | | Load 0x2,-0x1
082f 01cd | | Execute Vector,Slice_Reference
0830 BODY_0820:
0830 e405 | | Load 0x2,0x5
0831 0a02 | | Execute_Immediate Plus,0x2
0832 e5ff | | Load 0x2,-0x1
0833 01d7 | | Execute Vector,Field_Read
0834 0f53 | S | Execute_Immediate Equal,0x53
0835 a402 | | Store_Unchecked 0x2,0x2
0836 4801 |H | Short_Literal 0x1
0837 0092 08b5 | | Action Push_String_Extended,0x8b5 ; "<DEFAULT>"
0839 e5fe | | Load 0x2,-0x2
083a e003 | | Load 0x0,0x3
083b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
083c 6812 |h | Jump_Zero 0x84f
083d e5f9 | | Load 0x2,-0x7
083e e5fc | | Load 0x2,-0x4
083f 0120 | | Execute Any,Is_Value
0840 6803 |h | Jump_Zero 0x844
0841 e002 | | Load 0x0,0x2
0842 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0843 7801 |x | Jump 0x845
0844 e5fc | | Load 0x2,-0x4
0845 e002 | | Load 0x0,0x2
0846 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0847 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0848 e402 | | Load 0x2,0x2
0849 e602 | | Load 0x3,0x2
084a 821d | | Call 0x1,0x1d
084b c5fd | | Store 0x2,-0x3
084c c5fc | | Store 0x2,-0x4
084d c5f9 | | Store 0x2,-0x7
084e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
084f 4800 |H | Short_Literal 0x0
0850 e5fe | | Load 0x2,-0x2
0851 4827 |H' | Short_Literal 0x27
0852 e003 | | Load 0x0,0x3
0853 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0854 a403 | | Store_Unchecked 0x2,0x3
0855 e403 | | Load 0x2,0x3
0856 0c01 | | Execute_Immediate Greater_Equal,0x1
0857 680f |h | Jump_Zero 0x867
0858 e5fe | | Load 0x2,-0x2
0859 01dd | | Execute Vector,First
085a e403 | | Load 0x2,0x3
085b 0aff | | Execute_Immediate Plus,-0x1
085c e5fe | | Load 0x2,-0x2
085d 01cf | | Execute Vector,Slice_Read
085e 840a | | Call 0x2,0xa
085f e5fe | | Load 0x2,-0x2
0860 01dd | | Execute Vector,First
0861 e403 | | Load 0x2,0x3
0862 0aff | | Execute_Immediate Plus,-0x1
0863 e5fe | | Load 0x2,-0x2
0864 01cf | | Execute Vector,Slice_Read
0865 840b | | Call 0x2,0xb
0866 7804 |x | Jump 0x86b
0867 e5fe | | Load 0x2,-0x2
0868 840a | | Call 0x2,0xa
0869 e5fe | | Load 0x2,-0x2
086a 840b | | Call 0x2,0xb
086b 67ac |g | Indirect_Literal Discrete,0x818,{0x00000000, 0x00004000}
086c e004 | | Load 0x0,0x4
086d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
086e e409 | | Load 0x2,0x9
086f e007 | | Load 0x0,0x7
0870 180f | | Execute Package,Field_Execute,Field_Number 0xf
0871 6812 |h | Jump_Zero 0x884
0872 e5f9 | | Load 0x2,-0x7
0873 e5fc | | Load 0x2,-0x4
0874 0120 | | Execute Any,Is_Value
0875 6803 |h | Jump_Zero 0x879
0876 e002 | | Load 0x0,0x2
0877 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0878 7801 |x | Jump 0x87a
0879 e5fc | | Load 0x2,-0x4
087a e002 | | Load 0x0,0x2
087b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
087c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
087d e402 | | Load 0x2,0x2
087e e602 | | Load 0x3,0x2
087f 821d | | Call 0x1,0x1d
0880 c5fd | | Store 0x2,-0x3
0881 c5fc | | Store 0x2,-0x4
0882 c5f9 | | Store 0x2,-0x7
0883 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0884 4801 |H | Short_Literal 0x1
0885 e5fe | | Load 0x2,-0x2
0886 482e |H. | Short_Literal 0x2e
0887 00db | | Load_Top At_Offset_3
0888 01cb | | Execute Vector,Append
0889 e003 | | Load 0x0,0x3
088a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
088b 0c01 | | Execute_Immediate Greater_Equal,0x1
088c 6803 |h | Jump_Zero 0x890
088d e5fe | | Load 0x2,-0x2
088e 840c | | Call 0x2,0xc
088f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0890 e5f9 | | Load 0x2,-0x7
0891 e5fc | | Load 0x2,-0x4
0892 0120 | | Execute Any,Is_Value
0893 6803 |h | Jump_Zero 0x897
0894 e002 | | Load 0x0,0x2
0895 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0896 7801 |x | Jump 0x898
0897 e5fc | | Load 0x2,-0x4
0898 e002 | | Load 0x0,0x2
0899 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
089a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
089b e402 | | Load 0x2,0x2
089c e602 | | Load 0x3,0x2
089d 821d | | Call 0x1,0x1d
089e c5fd | | Store 0x2,-0x3
089f c5fc | | Store 0x2,-0x4
08a0 c5f9 | | Store 0x2,-0x7
08a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
08a2 ; --------------------------------------------------------------------------------------
08a2 ; STRING TABLE
08a2 ; --------------------------------------------------------------------------------------
08a2 0052 | R | .STRTAB 0x0052->0x08cb ; "<FULL>"
08a3 0056 | V | .STRTAB 0x0056->0x08ce ; "No part of \x22"
08a4 0060 | ` | .STRTAB 0x0060->0x08d4 ; "\x22 can be resolved."
08a5 0070 | p | .STRTAB 0x0070->0x08dd ; "OBJECT is nil."
08a6 007c | | | .STRTAB 0x007c->0x08e4 ; "Determination of enclosing View"
08a7 0099 | | .STRTAB 0x0099->0x08f3 ; "Determination of enclosing Subsystem"
08a8 00bb | | .STRTAB 0x00bb->0x0905 ; "Resolution \x22"
08a9 00c5 | | .STRTAB 0x00c5->0x090b ; "Determining the object associated with \x22"
08aa 00eb | | .STRTAB 0x00eb->0x091f ; " is not uniquely defined"
08ab 0101 | | .STRTAB 0x0101->0x092b ; " returned a status of \x22"
08ac 0116 | | .STRTAB 0x0116->0x0937 ; "\x22 because "
08ad 011e | | .STRTAB 0x011e->0x093c ; "'V"
08ae 011e | | .STRTAB 0x011e->0x093d ; " has no parent."
08af 012b | + | .STRTAB 0x012b->0x0944 ; "SPEC"
08b0 012d | - | .STRTAB 0x012d->0x0946 ; "LOAD"
08b1 012f | / | .STRTAB 0x012f->0x0948 ; "Open of "
08b2 0135 | 5 | .STRTAB 0x0135->0x094c ; " view "
08b3 0139 | 9 | .STRTAB 0x0139->0x094f ; "Resolve of subsystem name "
08b4 0151 | Q | .STRTAB 0x0151->0x095c ; "Determination of the object associated with subsystem "
08b5 0185 | | .STRTAB 0x0185->0x0977 ; "<DEFAULT>"
08b6 018c | | .STRTAB 0x018c->0x097c ; "$$"
08b7 018c | | .STRTAB 0x018c->0x097d ; "'SPEC"
08b8 018f | | .STRTAB 0x018f->0x097f ; "F;"
08b9 018f | | .STRTAB 0x018f->0x0980 ; "<SUBSYSTEM>"
08ba 0198 | | .STRTAB 0x0198->0x0986 ; "S;"
08bb 0198 | | .STRTAB 0x0198->0x0987 ; ";S;"
08bc 0199 | | .STRTAB 0x0199->0x0988 ; ";L;"
08bd 019a | | .STRTAB 0x019a->0x098a ; "<VIEW>"
08be 019e | | .STRTAB 0x019e->0x098d ; "V;"
08bf 019e | | .STRTAB 0x019e->0x098e ; " is not acceptable"
08c0 01ae | | .STRTAB 0x01ae->0x0997 ; "Unable to recreate "
08c1 01bf | | .STRTAB 0x01bf->0x09a0 ; " because "
08c2 01c6 | | .STRTAB 0x01c6->0x09a5 ; "Unable to open default activity ("
08c3 01e5 | | .STRTAB 0x01e5->0x09b5 ; " encountered while closing default activity"
08c4 020e | | .STRTAB 0x020e->0x09cb ; "Activity contains no "
08c5 0221 | ! | .STRTAB 0x0221->0x09d5 ; " view for subsystem "
08c6 0233 | 3 | .STRTAB 0x0233->0x09df ; "Resolving object "
08c7 0242 | B | .STRTAB 0x0242->0x09e8 ; "Determining the object associated with "
08c8 0267 | g | .STRTAB 0x0267->0x09fb ; "Determining the view context of "
08c9 0285 | | .STRTAB 0x0285->0x0a0b ; "Determining the view object associated with "
08ca 02af | | .STREND 0x02af->0x0a21
08cb 3c46 554c |<FUL| .STRTAB_STRINGS
0a22 0000 0000 | | .BLANK 0000[0x6]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; Debug Table
0a28 ; --------------------------------------------------------------------------------------
0a28 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5d8e,0x0000,0x0001,0x0000
0a2e 0000 0000 | | .BLANK 0000[0x1d2]