|
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: 7168 (0x1c00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦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 0cf8 | | .CONST 0x0cf8 ; 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 8008 | | .CONST 0x8008 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 003e | > | .CONST 0x003e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
000f 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0011 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
0013 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
0015 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0017 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated
0019 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
001b 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
001d 00bf | | Action Accept_Activation
001e 00e1 | | Load_Encached Boolean_Cache
001f 00e1 | | Load_Encached Boolean_Cache
0020 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call
0022 4802 |H | Short_Literal 0x2
0023 032d | - | Declare_Type Record,Defined
0024 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call
0026 029d 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call
0028 029d 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call
002a 029d 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call
002c 1d0d | | Execute_Immediate Reference_Lex_1,0xd
002d 00c7 | | Action Elaborate_Subprogram
002e 1d0e | | Execute_Immediate Reference_Lex_1,0xe
002f 00c7 | | Action Elaborate_Subprogram
0030 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0031 00c7 | | Action Elaborate_Subprogram
0032 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0033 00c7 | | Action Elaborate_Subprogram
0034 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0035 00c7 | | Action Elaborate_Subprogram
0036 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0037 00c7 | | Action Elaborate_Subprogram
0038 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0039 00c7 | | Action Elaborate_Subprogram
003a 1d13 | | Execute_Immediate Reference_Lex_1,0x13
003b 00c7 | | Action Elaborate_Subprogram
003c 1d15 | | Execute_Immediate Reference_Lex_1,0x15
003d 00c7 | | Action Elaborate_Subprogram
003e BODY_0008:
003e 00bc | | Action Signal_Activated
003f 00bb | | Action Signal_Completion
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 005b | [ | .CONST 0x005b ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0006 | | .CONST 0x0006 ; Number of locals
0043 INIT_0040:
0043 00ee | | Load_Encached Diana_Seq_Type_Cache
0044 02c7 | | Declare_Variable Any
0045 00db | | Load_Top At_Offset_3
0046 00eb | | Load_Encached Diana_Cache
0047 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
0048 00eb | | Load_Encached Diana_Cache
0049 1888 | | Execute Package,Field_Execute,Field_Number 0x88
004a a402 | | Store_Unchecked 0x2,0x2
004b 00ec | | Load_Encached Diana_Tree_Cache
004c 02c7 | | Declare_Variable Any
004d 00d8 | | Load_Top At_Offset_0
004e 1c00 | | Execute_Immediate Run_Utility,0x0
004f 00ee | | Load_Encached Diana_Seq_Type_Cache
0050 02c7 | | Declare_Variable Any
0051 00d8 | | Load_Top At_Offset_0
0052 1c00 | | Execute_Immediate Run_Utility,0x0
0053 00ec | | Load_Encached Diana_Tree_Cache
0054 02c7 | | Declare_Variable Any
0055 00d8 | | Load_Top At_Offset_0
0056 1c00 | | Execute_Immediate Run_Utility,0x0
0057 00ec | | Load_Encached Diana_Tree_Cache
0058 02c7 | | Declare_Variable Any
0059 00d8 | | Load_Top At_Offset_0
005a 1c00 | | Execute_Immediate Run_Utility,0x0
005b BODY_0040:
005b 00cf | | Action Mark_Auxiliary
005c 7832 |x2 | Jump 0x8f
005d e402 | | Load 0x2,0x2
005e 008b | | Action Heap_Access,Diana_Seq_Type_Get_Head
005f c403 | | Store 0x2,0x3
0060 e403 | | Load 0x2,0x3
0061 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0062 0f85 | | Execute_Immediate Equal,-0x7b
0063 6826 |h& | Jump_Zero 0x8a
0064 e403 | | Load 0x2,0x3
0065 00eb | | Load_Encached Diana_Cache
0066 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0067 c404 | | Store 0x2,0x4
0068 00cf | | Action Mark_Auxiliary
0069 e404 | | Load 0x2,0x4
006a 008b | | Action Heap_Access,Diana_Seq_Type_Get_Head
006b 00eb | | Load_Encached Diana_Cache
006c 18fa | | Execute Package,Field_Execute,Field_Number 0xfa
006d c405 | | Store 0x2,0x5
006e 00db | | Load_Top At_Offset_3
006f 490b |I | Short_Literal 0x10b
0070 00eb | | Load_Encached Diana_Cache
0071 0096 | | Execute Package,Entry
0072 e001 | | Load 0x0,0x1
0073 180d | | Execute Package,Field_Execute,Field_Number 0xd
0074 c406 | | Store 0x2,0x6
0075 00ea | | Load_Encached Null_String_Cache
0076 00db | | Load_Top At_Offset_3
0077 0092 0b44 | D| Action Push_String_Extended,0xb44 ; "WITH"
0079 8217 | | Call 0x1,0x17
007a 4800 |H | Short_Literal 0x0
007b e5fc | | Load 0x2,-0x4
007c e5fd | | Load 0x2,-0x3
007d e5fe | | Load 0x2,-0x2
007e e406 | | Load 0x2,0x6
007f 8218 | | Call 0x1,0x18
0080 c5fc | | Store 0x2,-0x4
0081 e404 | | Load 0x2,0x4
0082 0217 | | Execute Heap_Access,All_Reference
0083 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0084 c404 | | Store 0x2,0x4
0085 e404 | | Load 0x2,0x4
0086 6802 |h | Jump_Zero 0x89
0087 00c9 | | Action Pop_Auxiliary_Loop
0088 7fe0 | | Jump 0x69
0089 00ce | | Action Pop_Auxiliary
008a e402 | | Load 0x2,0x2
008b 0217 | | Execute Heap_Access,All_Reference
008c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
008d c402 | | Store 0x2,0x2
008e 00c9 | | Action Pop_Auxiliary_Loop
008f e402 | | Load 0x2,0x2
0090 77cc |w | Jump_Nonzero 0x5d
0091 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0092 0000 0000 | | .BLANK 0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00aa | | .CONST 0x00aa ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0003 | | .CONST 0x0003 ; Number of locals
009b INIT_0098:
009b 00ec | | Load_Encached Diana_Tree_Cache
009c 02c7 | | Declare_Variable Any
009d 00db | | Load_Top At_Offset_3
009e 4976 |Iv | Short_Literal 0x176
009f 00eb | | Load_Encached Diana_Cache
00a0 0098 | | Execute Package,Field_Read_Dynamic
00a1 180f | | Execute Package,Field_Execute,Field_Number 0xf
00a2 a402 | | Store_Unchecked 0x2,0x2
00a3 00ec | | Load_Encached Diana_Tree_Cache
00a4 02c7 | | Declare_Variable Any
00a5 00d9 | | Load_Top At_Offset_1
00a6 490b |I | Short_Literal 0x10b
00a7 00eb | | Load_Encached Diana_Cache
00a8 0096 | | Execute Package,Entry
00a9 a403 | | Store_Unchecked 0x2,0x3
00aa BODY_0098:
00aa 00d8 | | Load_Top At_Offset_0
00ab 00da | | Load_Top At_Offset_2
00ac 012f | / | Execute Any,Equal
00ad 700e |p | Jump_Nonzero 0xbc
00ae 00ea | | Load_Encached Null_String_Cache
00af e5ff | | Load 0x2,-0x1
00b0 0092 0b45 | E| Action Push_String_Extended,0xb45 ; "SPEC"
00b2 8217 | | Call 0x1,0x17
00b3 4800 |H | Short_Literal 0x0
00b4 e5fc | | Load 0x2,-0x4
00b5 e5fd | | Load 0x2,-0x3
00b6 e5fe | | Load 0x2,-0x2
00b7 e403 | | Load 0x2,0x3
00b8 e001 | | Load 0x0,0x1
00b9 180d | | Execute Package,Field_Execute,Field_Number 0xd
00ba 8218 | | Call 0x1,0x18
00bb c5fc | | Store 0x2,-0x4
00bc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00bd 0000 0000 | | .XXX[0x3]
00bf 0000 | |
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cf | | .CONST 0x00cf ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0002 | | .CONST 0x0002 ; Number of locals
00c3 INIT_00c0:
00c3 00da | | Load_Top At_Offset_2
00c4 4976 |Iv | Short_Literal 0x176
00c5 00eb | | Load_Encached Diana_Cache
00c6 0098 | | Execute Package,Field_Read_Dynamic
00c7 180f | | Execute Package,Field_Execute,Field_Number 0xf
00c8 490d |I | Short_Literal 0x10d
00c9 00eb | | Load_Encached Diana_Cache
00ca 0096 | | Execute Package,Entry
00cb e001 | | Load 0x0,0x1
00cc 180d | | Execute Package,Field_Execute,Field_Number 0xd
00cd 00ec | | Load_Encached Diana_Tree_Cache
00ce 011e | | Execute Any,Convert
00cf BODY_00c0:
00cf 00ea | | Load_Encached Null_String_Cache
00d0 00d9 | | Load_Top At_Offset_1
00d1 0092 0b46 | F| Action Push_String_Extended,0xb46 ; "PARENT"
00d3 8217 | | Call 0x1,0x17
00d4 4800 |H | Short_Literal 0x0
00d5 e5fc | | Load 0x2,-0x4
00d6 e5fd | | Load 0x2,-0x3
00d7 e5fe | | Load 0x2,-0x2
00d8 e402 | | Load 0x2,0x2
00d9 8218 | | Call 0x1,0x18
00da c5fc | | Store 0x2,-0x4
00db 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00dc 0000 0000 | | .BLANK 0000[0x4]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00f0 | | .CONST 0x00f0 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0003 | | .CONST 0x0003 ; Number of locals
00e3 INIT_00e0:
00e3 e002 | | Load 0x0,0x2
00e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e5 02c7 | | Declare_Variable Any
00e6 e5fc | | Load 0x2,-0x4
00e7 e5fd | | Load 0x2,-0x3
00e8 e5ff | | Load 0x2,-0x1
00e9 e002 | | Load 0x0,0x2
00ea 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00eb a402 | | Store_Unchecked 0x2,0x2
00ec 00ec | | Load_Encached Diana_Tree_Cache
00ed 02c7 | | Declare_Variable Any
00ee 00d8 | | Load_Top At_Offset_0
00ef 1c00 | | Execute_Immediate Run_Utility,0x0
00f0 BODY_00e0:
00f0 00cf | | Action Mark_Auxiliary
00f1 7814 |x | Jump 0x106
00f2 00da | | Load_Top At_Offset_2
00f3 e002 | | Load 0x0,0x2
00f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00f5 c403 | | Store 0x2,0x3
00f6 4800 |H | Short_Literal 0x0
00f7 e5fb | | Load 0x2,-0x5
00f8 e5fd | | Load 0x2,-0x3
00f9 e5fe | | Load 0x2,-0x2
00fa e403 | | Load 0x2,0x3
00fb 4974 |It | Short_Literal 0x174
00fc 00eb | | Load_Encached Diana_Cache
00fd 0098 | | Execute Package,Field_Read_Dynamic
00fe 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00ff 8218 | | Call 0x1,0x18
0100 c5fb | | Store 0x2,-0x5
0101 00da | | Load_Top At_Offset_2
0102 e002 | | Load 0x0,0x2
0103 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0104 c402 | | Store 0x2,0x2
0105 00c9 | | Action Pop_Auxiliary_Loop
0106 00da | | Load_Top At_Offset_2
0107 e002 | | Load 0x0,0x2
0108 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0109 6fe8 |o | Jump_Zero 0xf2
010a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
010b 0000 0000 | | .BLANK 0000[0x5]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0121 | ! | .CONST 0x0121 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0003 | | .CONST 0x0003 ; Number of locals
0113 INIT_0110:
0113 00ec | | Load_Encached Diana_Tree_Cache
0114 02c7 | | Declare_Variable Any
0115 e5fc | | Load 0x2,-0x4
0116 6011 |` | Indirect_Literal Discrete,0x128,{0x00007fff, 0xffffffff}
0117 e5ff | | Load 0x2,-0x1
0118 4976 |Iv | Short_Literal 0x176
0119 00eb | | Load_Encached Diana_Cache
011a 0098 | | Execute Package,Field_Read_Dynamic
011b 180f | | Execute Package,Field_Execute,Field_Number 0xf
011c e003 | | Load 0x0,0x3
011d 180e | | Execute Package,Field_Execute,Field_Number 0xe
011e a402 | | Store_Unchecked 0x2,0x2
011f 029f 036b | k| Declare_Subprogram INIT_0368,For_Call
0121 BODY_0110:
0121 00d9 | | Load_Top At_Offset_1
0122 6801 |h | Jump_Zero 0x124
0123 8403 | | Call 0x2,0x3
0124 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0125 0000 0000 | | .XXX[0x3]
0127 0000 | |
0128 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
012c 0000 0000 | | .BLANK 0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0145 | E | .CONST 0x0145 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0005 | | .CONST 0x0005 ; Number of locals
0133 INIT_0130:
0133 00ef | | Load_Encached Diana_Sequence_Cache
0134 02c7 | | Declare_Variable Any
0135 00db | | Load_Top At_Offset_3
0136 e004 | | Load 0x0,0x4
0137 18b0 | | Execute Package,Field_Execute,Field_Number 0xb0
0138 a402 | | Store_Unchecked 0x2,0x2
0139 00ec | | Load_Encached Diana_Tree_Cache
013a 02c7 | | Declare_Variable Any
013b 00d8 | | Load_Top At_Offset_0
013c 1c00 | | Execute_Immediate Run_Utility,0x0
013d 00ec | | Load_Encached Diana_Tree_Cache
013e 02c7 | | Declare_Variable Any
013f 00d8 | | Load_Top At_Offset_0
0140 1c00 | | Execute_Immediate Run_Utility,0x0
0141 00ec | | Load_Encached Diana_Tree_Cache
0142 02c7 | | Declare_Variable Any
0143 00d8 | | Load_Top At_Offset_0
0144 1c00 | | Execute_Immediate Run_Utility,0x0
0145 BODY_0130:
0145 00cf | | Action Mark_Auxiliary
0146 7835 |x5 | Jump 0x17c
0147 e402 | | Load 0x2,0x2
0148 00eb | | Load_Encached Diana_Cache
0149 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
014a c403 | | Store 0x2,0x3
014b e5fc | | Load 0x2,-0x4
014c 67db |g | Indirect_Literal Discrete,0x128,{0x00007fff, 0xffffffff}
014d e403 | | Load 0x2,0x3
014e e003 | | Load 0x0,0x3
014f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0150 c404 | | Store 0x2,0x4
0151 00da | | Load_Top At_Offset_2
0152 7012 |p | Jump_Nonzero 0x165
0153 00db | | Load_Top At_Offset_3
0154 00eb | | Load_Encached Diana_Cache
0155 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0156 c405 | | Store 0x2,0x5
0157 0092 0b47 | G| Action Push_String_Extended,0xb47 ; "as body surrogate"
0159 00da | | Load_Top At_Offset_2
015a 0092 0b48 | H| Action Push_String_Extended,0xb48 ; "SUBUNIT"
015c 8217 | | Call 0x1,0x17
015d 4801 |H | Short_Literal 0x1
015e e5fb | | Load 0x2,-0x5
015f e5fd | | Load 0x2,-0x3
0160 e5fe | | Load 0x2,-0x2
0161 e405 | | Load 0x2,0x5
0162 8218 | | Call 0x1,0x18
0163 c5fb | | Store 0x2,-0x5
0164 7812 |x | Jump 0x177
0165 00da | | Load_Top At_Offset_2
0166 4974 |It | Short_Literal 0x174
0167 00eb | | Load_Encached Diana_Cache
0168 0098 | | Execute Package,Field_Read_Dynamic
0169 181a | | Execute Package,Field_Execute,Field_Number 0x1a
016a c405 | | Store 0x2,0x5
016b 00ea | | Load_Encached Null_String_Cache
016c 00da | | Load_Top At_Offset_2
016d 0092 0b48 | H| Action Push_String_Extended,0xb48 ; "SUBUNIT"
016f 8217 | | Call 0x1,0x17
0170 4800 |H | Short_Literal 0x0
0171 e5fb | | Load 0x2,-0x5
0172 e5fd | | Load 0x2,-0x3
0173 e5fe | | Load 0x2,-0x2
0174 e405 | | Load 0x2,0x5
0175 8218 | | Call 0x1,0x18
0176 c5fb | | Store 0x2,-0x5
0177 e402 | | Load 0x2,0x2
0178 0217 | | Execute Heap_Access,All_Reference
0179 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
017a c402 | | Store 0x2,0x2
017b 00c9 | | Action Pop_Auxiliary_Loop
017c e402 | | Load 0x2,0x2
017d 77c9 |w | Jump_Nonzero 0x147
017e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
017f 0000 | | .XXX[0x1]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 01f2 | | .CONST 0x01f2 ; Address of begin
0181 024e | N | .CONST 0x024e ; Address of exception handler
0182 0024 | $ | .CONST 0x0024 ; Number of locals
0183 INIT_0180:
0183 e005 | | Load 0x0,0x5
0184 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0185 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0186 4fff |O | Short_Literal -0x1
0187 4802 |H | Short_Literal 0x2
0188 0099 | | Action Reference_Dynamic
0189 e5ff | | Load 0x2,-0x1
018a 4976 |Iv | Short_Literal 0x176
018b 00eb | | Load_Encached Diana_Cache
018c 0098 | | Execute Package,Field_Read_Dynamic
018d 180f | | Execute Package,Field_Execute,Field_Number 0xf
018e 00ec | | Load_Encached Diana_Tree_Cache
018f 011e | | Execute Any,Convert
0190 e006 | | Load 0x0,0x6
0191 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0192 e007 | | Load 0x0,0x7
0193 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0194 e00f | | Load 0x0,0xf
0195 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0196 e009 | | Load 0x0,0x9
0197 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0198 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0199 00e2 | | Load_Encached Integer_Cache
019a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
019b e5ff | | Load 0x2,-0x1
019c 800a | | Call 0x0,0xa
019d 0f04 | | Execute_Immediate Equal,0x4
019e 6803 |h | Jump_Zero 0x1a2
019f e5ff | | Load 0x2,-0x1
01a0 800b | | Call 0x0,0xb
01a1 7802 |x | Jump 0x1a4
01a2 4800 |H | Short_Literal 0x0
01a3 0007 | | Action Break_Optional
01a4 00ec | | Load_Encached Diana_Tree_Cache
01a5 02c7 | | Declare_Variable Any
01a6 00d8 | | Load_Top At_Offset_0
01a7 1c00 | | Execute_Immediate Run_Utility,0x0
01a8 e00c | | Load 0x0,0xc
01a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01aa 02c7 | | Declare_Variable Any
01ab e00d | | Load 0x0,0xd
01ac a40b | | Store_Unchecked 0x2,0xb
01ad e00e | | Load 0x0,0xe
01ae 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01af 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01b0 02c7 | | Declare_Variable Any
01b1 00d8 | | Load_Top At_Offset_0
01b2 1c00 | | Execute_Immediate Run_Utility,0x0
01b3 e00e | | Load 0x0,0xe
01b4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01b5 02c7 | | Declare_Variable Any
01b6 00d8 | | Load_Top At_Offset_0
01b7 1c00 | | Execute_Immediate Run_Utility,0x0
01b8 e00e | | Load 0x0,0xe
01b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ba 02c7 | | Declare_Variable Any
01bb e00e | | Load 0x0,0xe
01bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01bd a40e | | Store_Unchecked 0x2,0xe
01be e009 | | Load 0x0,0x9
01bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c1 e009 | | Load 0x0,0x9
01c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c3 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c4 e009 | | Load 0x0,0x9
01c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c6 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c7 e009 | | Load 0x0,0x9
01c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01ca e009 | | Load 0x0,0x9
01cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01cd e009 | | Load 0x0,0x9
01ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cf 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01d0 e009 | | Load 0x0,0x9
01d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d2 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01d3 029f 0383 | | Declare_Subprogram INIT_0380,For_Call
01d5 e00f | | Load 0x0,0xf
01d6 1913 | | Execute Package,Field_Reference,Field_Number 0x13
01d7 00c6 | | Action Check_Subprogram_Elaborated
01d8 00e2 | | Load_Encached Integer_Cache
01d9 4816 |H | Short_Literal 0x16
01da 4802 |H | Short_Literal 0x2
01db 0099 | | Action Reference_Dynamic
01dc e010 | | Load 0x0,0x10
01dd e01a | | Load 0x0,0x1a
01de 481b |H | Short_Literal 0x1b
01df 0007 | | Action Break_Optional
01e0 029f 0463 | c| Declare_Subprogram INIT_0460,For_Call
01e2 029f 0493 | | Declare_Subprogram INIT_0490,For_Call
01e4 029f 04bb | | Declare_Subprogram INIT_04b8,For_Call
01e6 029f 052b | +| Declare_Subprogram INIT_0528,For_Call
01e8 029f 053b | ;| Declare_Subprogram INIT_0538,For_Call
01ea 029f 0553 | S| Declare_Subprogram INIT_0550,For_Call
01ec 029f 05e3 | | Declare_Subprogram INIT_05e0,For_Call
01ee 029f 0613 | | Declare_Subprogram INIT_0610,For_Call
01f0 029f 073b | ;| Declare_Subprogram INIT_0738,For_Call
01f2 BODY_0180:
01f2 e5fa | | Load 0x2,-0x6
01f3 0e02 | | Execute_Immediate Not_Equal,0x2
01f4 6815 |h | Jump_Zero 0x20a
01f5 4800 |H | Short_Literal 0x0
01f6 4800 |H | Short_Literal 0x0
01f7 4801 |H | Short_Literal 0x1
01f8 e40b | | Load 0x2,0xb
01f9 e5fc | | Load 0x2,-0x4
01fa e5fd | | Load 0x2,-0x3
01fb e00e | | Load 0x0,0xe
01fc 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01fd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01fe c40c | | Store 0x2,0xc
01ff e40b | | Load 0x2,0xb
0200 e00c | | Load 0x0,0xc
0201 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0202 7009 |p | Jump_Nonzero 0x20c
0203 e40b | | Load 0x2,0xb
0204 e00c | | Load 0x0,0xc
0205 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0206 0c02 | | Execute_Immediate Greater_Equal,0x2
0207 6804 |h | Jump_Zero 0x20c
0208 e011 | | Load 0x0,0x11
0209 0257 | W | Execute Discrete,Raise
020a e5fb | | Load 0x2,-0x5
020b c40c | | Store 0x2,0xc
020c e009 | | Load 0x0,0x9
020d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
020f e405 | | Load 0x2,0x5
0210 e009 | | Load 0x0,0x9
0211 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0212 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0213 c40f | | Store 0x2,0xf
0214 e009 | | Load 0x0,0x9
0215 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0216 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0217 e405 | | Load 0x2,0x5
0218 e009 | | Load 0x0,0x9
0219 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
021b c411 | | Store 0x2,0x11
021c e009 | | Load 0x0,0x9
021d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
021f e405 | | Load 0x2,0x5
0220 e009 | | Load 0x0,0x9
0221 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0222 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0223 c410 | | Store 0x2,0x10
0224 e009 | | Load 0x0,0x9
0225 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0226 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0227 e405 | | Load 0x2,0x5
0228 e009 | | Load 0x0,0x9
0229 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
022b c412 | | Store 0x2,0x12
022c e009 | | Load 0x0,0x9
022d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
022f e405 | | Load 0x2,0x5
0230 e009 | | Load 0x0,0x9
0231 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0232 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0233 c413 | | Store 0x2,0x13
0234 e009 | | Load 0x0,0x9
0235 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0236 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0237 e405 | | Load 0x2,0x5
0238 e009 | | Load 0x0,0x9
0239 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
023b c414 | | Store 0x2,0x14
023c e009 | | Load 0x0,0x9
023d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
023f e405 | | Load 0x2,0x5
0240 e009 | | Load 0x0,0x9
0241 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0242 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0243 c415 | | Store 0x2,0x15
0244 8422 | " | Call 0x2,0x22
0245 8423 | # | Call 0x2,0x23
0246 e5fa | | Load 0x2,-0x6
0247 0e02 | | Execute_Immediate Not_Equal,0x2
0248 6804 |h | Jump_Zero 0x24d
0249 e40c | | Load 0x2,0xc
024a e00e | | Load 0x0,0xe
024b 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
024c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
024d 4507 |E | Exit_Suprogram New_Top_Offset 0x7
024e TRAP_0180:
024e e011 | | Load 0x0,0x11
024f 010f | | Execute Exception,Equal
0250 6802 |h | Jump_Zero 0x253
0251 8424 | $ | Call 0x2,0x24
0252 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0253 e40c | | Load 0x2,0xc
0254 e00e | | Load 0x0,0xe
0255 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
0256 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0257 e012 | | Load 0x0,0x12
0258 180e | | Execute Package,Field_Execute,Field_Number 0xe
0259 0092 0b49 | I| Action Push_String_Extended,0xb49 ; "Cc_Instance.Cg_Coupler.Need_Ops"
025b e013 | | Load 0x0,0x13
025c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
025d e014 | | Load 0x0,0x14
025e 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
025f 00d8 | | Load_Top At_Offset_0
0260 0101 | | Execute Exception,Reraise
0261 0000 0000 | | .BLANK 0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0276 | v | .CONST 0x0276 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0004 | | .CONST 0x0004 ; Number of locals
026b INIT_0268:
026b e015 | | Load 0x0,0x15
026c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
026d 02c7 | | Declare_Variable Any
026e 00d8 | | Load_Top At_Offset_0
026f 1c00 | | Execute_Immediate Run_Utility,0x0
0270 00ec | | Load_Encached Diana_Tree_Cache
0271 02c7 | | Declare_Variable Any
0272 00d8 | | Load_Top At_Offset_0
0273 1c00 | | Execute_Immediate Run_Utility,0x0
0274 029f 077b | {| Declare_Subprogram INIT_0778,For_Call
0276 BODY_0268:
0276 e5fd | | Load 0x2,-0x3
0277 e5fc | | Load 0x2,-0x4
0278 e5ff | | Load 0x2,-0x1
0279 4976 |Iv | Short_Literal 0x176
027a 00eb | | Load_Encached Diana_Cache
027b 0098 | | Execute Package,Field_Read_Dynamic
027c 180f | | Execute Package,Field_Execute,Field_Number 0xf
027d 4806 |H | Short_Literal 0x6
027e e015 | | Load 0x0,0x15
027f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0280 c402 | | Store 0x2,0x2
0281 00cf | | Action Mark_Auxiliary
0282 7817 |x | Jump 0x29a
0283 8404 | | Call 0x2,0x4
0284 00da | | Load_Top At_Offset_2
0285 7008 |p | Jump_Nonzero 0x28e
0286 e012 | | Load 0x0,0x12
0287 180e | | Execute Package,Field_Execute,Field_Number 0xe
0288 4801 |H | Short_Literal 0x1
0289 0092 0b4a | J| Action Push_String_Extended,0xb4a ; "Referencing expander is non-existent"
028b e016 | | Load 0x0,0x16
028c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
028d 7807 |x | Jump 0x295
028e 4800 |H | Short_Literal 0x0
028f e5fb | | Load 0x2,-0x5
0290 e5fd | | Load 0x2,-0x3
0291 e5fe | | Load 0x2,-0x2
0292 e403 | | Load 0x2,0x3
0293 8218 | | Call 0x1,0x18
0294 c5fb | | Store 0x2,-0x5
0295 00db | | Load_Top At_Offset_3
0296 e015 | | Load 0x0,0x15
0297 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0298 c402 | | Store 0x2,0x2
0299 00c9 | | Action Pop_Auxiliary_Loop
029a 00db | | Load_Top At_Offset_3
029b e015 | | Load 0x0,0x15
029c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
029d 6fe5 |o | Jump_Zero 0x283
029e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
029f 0000 | | .XXX[0x1]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02bc | | .CONST 0x02bc ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0006 | | .CONST 0x0006 ; Number of locals
02a3 INIT_02a0:
02a3 e015 | | Load 0x0,0x15
02a4 1b19 | | Execute Package,Field_Read,Field_Number 0x19
02a5 02c7 | | Declare_Variable Any
02a6 00d8 | | Load_Top At_Offset_0
02a7 1c00 | | Execute_Immediate Run_Utility,0x0
02a8 00ec | | Load_Encached Diana_Tree_Cache
02a9 02c7 | | Declare_Variable Any
02aa 00d8 | | Load_Top At_Offset_0
02ab 1c00 | | Execute_Immediate Run_Utility,0x0
02ac 00ec | | Load_Encached Diana_Tree_Cache
02ad 02c7 | | Declare_Variable Any
02ae e5ff | | Load 0x2,-0x1
02af e001 | | Load 0x0,0x1
02b0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02b1 a404 | | Store_Unchecked 0x2,0x4
02b2 00ec | | Load_Encached Diana_Tree_Cache
02b3 02c7 | | Declare_Variable Any
02b4 00d9 | | Load_Top At_Offset_1
02b5 4976 |Iv | Short_Literal 0x176
02b6 00eb | | Load_Encached Diana_Cache
02b7 0098 | | Execute Package,Field_Read_Dynamic
02b8 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b9 a405 | | Store_Unchecked 0x2,0x5
02ba 029f 078b | | Declare_Subprogram INIT_0788,For_Call
02bc BODY_02a0:
02bc e5fd | | Load 0x2,-0x3
02bd e5fc | | Load 0x2,-0x4
02be 00db | | Load_Top At_Offset_3
02bf 4806 |H | Short_Literal 0x6
02c0 e015 | | Load 0x0,0x15
02c1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02c2 c402 | | Store 0x2,0x2
02c3 00cf | | Action Mark_Auxiliary
02c4 7817 |x | Jump 0x2dc
02c5 8406 | | Call 0x2,0x6
02c6 e403 | | Load 0x2,0x3
02c7 7008 |p | Jump_Nonzero 0x2d0
02c8 e012 | | Load 0x0,0x12
02c9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02ca 4802 |H | Short_Literal 0x2
02cb 0092 0b4b | K| Action Push_String_Extended,0xb4b ; "Referencing main program is non-existent"
02cd e016 | | Load 0x0,0x16
02ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02cf 7807 |x | Jump 0x2d7
02d0 4800 |H | Short_Literal 0x0
02d1 e5fb | | Load 0x2,-0x5
02d2 e5fd | | Load 0x2,-0x3
02d3 e5fe | | Load 0x2,-0x2
02d4 e403 | | Load 0x2,0x3
02d5 8218 | | Call 0x1,0x18
02d6 c5fb | | Store 0x2,-0x5
02d7 e402 | | Load 0x2,0x2
02d8 e015 | | Load 0x0,0x15
02d9 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02da c402 | | Store 0x2,0x2
02db 00c9 | | Action Pop_Auxiliary_Loop
02dc e402 | | Load 0x2,0x2
02dd e015 | | Load 0x0,0x15
02de 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02df 6fe5 |o | Jump_Zero 0x2c5
02e0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02e1 0000 0000 | | .BLANK 0000[0x7]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 4608 |F | Jump_Case 0x9
02ec 7808 |x | Jump 0x2f5 ; case 0x0
02ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
02ee 780d |x | Jump 0x2fc ; case 0x2
02ef 780c |x | Jump 0x2fc ; case 0x3
02f0 780b |x | Jump 0x2fc ; case 0x4
02f1 780a |x | Jump 0x2fc ; case 0x5
02f2 7809 |x | Jump 0x2fc ; case 0x6
02f3 7808 |x | Jump 0x2fc ; case 0x7
02f4 7807 |x | Jump 0x2fc ; case 0x8
02f5 4800 |H | Short_Literal 0x0
02f6 00db | | Load_Top At_Offset_3
02f7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02f8 4800 |H | Short_Literal 0x0
02f9 00db | | Load_Top At_Offset_3
02fa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02fb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02fc 0869 | i | Execute_Immediate Raise,0x69
02fd 0000 0000 | | .XXX[0x3]
02ff 0000 | |
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303 | | .CONST 0x0303 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0001 | | .CONST 0x0001 ; Number of locals
0303 BODY_0300:
0303 INIT_0300:
0303 e012 | | Load 0x0,0x12
0304 180e | | Execute Package,Field_Execute,Field_Number 0xe
0305 4801 |H | Short_Literal 0x1
0306 0092 0b4c | L| Action Push_String_Extended,0xb4c ; "Specifying "
0308 e5ff | | Load 0x2,-0x1
0309 01cc | | Execute Vector,Catenate
030a 0092 0b4d | M| Action Push_String_Extended,0xb4d ; " need: "
030c 01cc | | Execute Vector,Catenate
030d e5fe | | Load 0x2,-0x2
030e e001 | | Load 0x0,0x1
030f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0310 01cc | | Execute Vector,Catenate
0311 0092 0b4e | N| Action Push_String_Extended,0xb4e ; " "
0313 01cc | | Execute Vector,Catenate
0314 e5fd | | Load 0x2,-0x3
0315 01cc | | Execute Vector,Catenate
0316 e016 | | Load 0x0,0x16
0317 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0318 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0319 0000 0000 | | .BLANK 0000[0x7]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323 | # | .CONST 0x0323 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0001 | | .CONST 0x0001 ; Number of locals
0323 BODY_0320:
0323 INIT_0320:
0323 e5fd | | Load 0x2,-0x3
0324 e5fc | | Load 0x2,-0x4
0325 e5fb | | Load 0x2,-0x5
0326 e5fe | | Load 0x2,-0x2
0327 e5ff | | Load 0x2,-0x1
0328 e017 | | Load 0x0,0x17
0329 1b14 | | Execute Package,Field_Read,Field_Number 0x14
032a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
032b 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
032c 0000 0000 | | .BLANK 0000[0x4]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0339 | 9 | .CONST 0x0339 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 00da | | Load_Top At_Offset_2
0334 00eb | | Load_Encached Diana_Cache
0335 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0336 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0337 0f49 | I | Execute_Immediate Equal,0x49
0338 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0339 TRAP_0330:
0339 0007 | | Action Break_Optional
033a 4800 |H | Short_Literal 0x0
033b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033c 0000 0000 | | .BLANK 0000[0x4]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 034f | O | .CONST 0x034f ; Address of begin
0341 0360 | ` | .CONST 0x0360 ; Address of exception handler
0342 0004 | | .CONST 0x0004 ; Number of locals
0343 INIT_0340:
0343 00ec | | Load_Encached Diana_Tree_Cache
0344 02c7 | | Declare_Variable Any
0345 00d8 | | Load_Top At_Offset_0
0346 1c00 | | Execute_Immediate Run_Utility,0x0
0347 00ec | | Load_Encached Diana_Tree_Cache
0348 02c7 | | Declare_Variable Any
0349 00d8 | | Load_Top At_Offset_0
034a 1c00 | | Execute_Immediate Run_Utility,0x0
034b 00ec | | Load_Encached Diana_Tree_Cache
034c 02c7 | | Declare_Variable Any
034d 00d8 | | Load_Top At_Offset_0
034e 1c00 | | Execute_Immediate Run_Utility,0x0
034f BODY_0340:
034f e5ff | | Load 0x2,-0x1
0350 4976 |Iv | Short_Literal 0x176
0351 00eb | | Load_Encached Diana_Cache
0352 0098 | | Execute Package,Field_Read_Dynamic
0353 180f | | Execute Package,Field_Execute,Field_Number 0xf
0354 c402 | | Store 0x2,0x2
0355 00da | | Load_Top At_Offset_2
0356 490d |I | Short_Literal 0x10d
0357 00eb | | Load_Encached Diana_Cache
0358 0096 | | Execute Package,Entry
0359 c403 | | Store 0x2,0x3
035a 00d9 | | Load_Top At_Offset_1
035b e001 | | Load 0x0,0x1
035c 180d | | Execute Package,Field_Execute,Field_Number 0xd
035d c404 | | Store 0x2,0x4
035e 00d8 | | Load_Top At_Offset_0
035f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0360 TRAP_0340:
0360 0007 | | Action Break_Optional
0361 00ec | | Load_Encached Diana_Tree_Cache
0362 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0363 0000 0000 | | .BLANK 0000[0x5]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 0370 | p | .CONST 0x0370 ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0002 | | .CONST 0x0002 ; Number of locals
036b INIT_0368:
036b e402 | | Load 0x2,0x2
036c e001 | | Load 0x0,0x1
036d 180d | | Execute Package,Field_Execute,Field_Number 0xd
036e 00ec | | Load_Encached Diana_Tree_Cache
036f 011e | | Execute Any,Convert
0370 BODY_0368:
0370 00ea | | Load_Encached Null_String_Cache
0371 00d9 | | Load_Top At_Offset_1
0372 0092 0b4f | O| Action Push_String_Extended,0xb4f ; "BODY"
0374 8217 | | Call 0x1,0x17
0375 4800 |H | Short_Literal 0x0
0376 e5fb | | Load 0x2,-0x5
0377 e5fd | | Load 0x2,-0x3
0378 e5fe | | Load 0x2,-0x2
0379 e602 | | Load 0x3,0x2
037a 8218 | | Call 0x1,0x18
037b c5fb | | Store 0x2,-0x5
037c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
037d 0000 0000 | | .XXX[0x3]
037f 0000 | |
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0389 | | .CONST 0x0389 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0004 | | .CONST 0x0004 ; Number of locals
0383 INIT_0380:
0383 e402 | | Load 0x2,0x2
0384 0007 | | Action Break_Optional
0385 029f 079b | | Declare_Subprogram INIT_0798,For_Call
0387 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call
0389 BODY_0380:
0389 e012 | | Load 0x0,0x12
038a 180e | | Execute Package,Field_Execute,Field_Number 0xe
038b 4801 |H | Short_Literal 0x1
038c 0092 0b50 | P| Action Push_String_Extended,0xb50 ; "Process_Unit of "
038e e7fe | | Load 0x3,-0x2
038f e001 | | Load 0x0,0x1
0390 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0391 01cc | | Execute Vector,Catenate
0392 0092 0b51 | Q| Action Push_String_Extended,0xb51 ; ";Kind = "
0394 01cc | | Execute Vector,Catenate
0395 e7ff | | Load 0x3,-0x1
0396 e00f | | Load 0x0,0xf
0397 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0398 011c | | Execute Any,Convert_Unchecked
0399 1c01 | | Execute_Immediate Run_Utility,0x1
039a 01cc | | Execute Vector,Catenate
039b 0092 0b52 | R| Action Push_String_Extended,0xb52 ; ", Unit_State = "
039d 01cc | | Execute Vector,Catenate
039e e7fe | | Load 0x3,-0x2
039f 8603 | | Call 0x3,0x3
03a0 01cc | | Execute Vector,Catenate
03a1 e016 | | Load 0x0,0x16
03a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a3 e7ff | | Load 0x3,-0x1
03a4 4605 |F | Jump_Case 0x6
03a5 7811 |x | Jump 0x3b7 ; case 0x0
03a6 7810 |x | Jump 0x3b7 ; case 0x1
03a7 780f |x | Jump 0x3b7 ; case 0x2
03a8 7877 |xw | Jump 0x420 ; case 0x3
03a9 789b |x | Jump 0x445 ; case 0x4
03aa 7800 |x | Jump 0x3ab ; case 0x5
03ab e012 | | Load 0x0,0x12
03ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ad 4802 |H | Short_Literal 0x2
03ae 0092 0b53 | S| Action Push_String_Extended,0xb53 ; "Bad directory status "
03b0 e7fe | | Load 0x3,-0x2
03b1 e001 | | Load 0x0,0x1
03b2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03b3 01cc | | Execute Vector,Catenate
03b4 e016 | | Load 0x0,0x16
03b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03b6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03b7 e5fc | | Load 0x2,-0x4
03b8 e7fe | | Load 0x3,-0x2
03b9 e001 | | Load 0x0,0x1
03ba 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03bb 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
03bc 00da | | Load_Top At_Offset_2
03bd 0f04 | | Execute_Immediate Equal,0x4
03be 681d |h | Jump_Zero 0x3dc
03bf e7fe | | Load 0x3,-0x2
03c0 4976 |Iv | Short_Literal 0x176
03c1 00eb | | Load_Encached Diana_Cache
03c2 0098 | | Execute Package,Field_Read_Dynamic
03c3 180f | | Execute Package,Field_Execute,Field_Number 0xf
03c4 e404 | | Load 0x2,0x4
03c5 012f | / | Execute Any,Equal
03c6 7051 |pQ | Jump_Nonzero 0x418
03c7 e012 | | Load 0x0,0x12
03c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
03c9 4801 |H | Short_Literal 0x1
03ca 0092 0b54 | T| Action Push_String_Extended,0xb54 ; "Coded unit "
03cc e7fe | | Load 0x3,-0x2
03cd e001 | | Load 0x0,0x1
03ce 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03cf 01cc | | Execute Vector,Catenate
03d0 0092 0b55 | U| Action Push_String_Extended,0xb55 ; "Added to set of already coded unit"
03d2 01cc | | Execute Vector,Catenate
03d3 e016 | | Load 0x0,0x16
03d4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03d5 e415 | | Load 0x2,0x15
03d6 e7fe | | Load 0x3,-0x2
03d7 e009 | | Load 0x0,0x9
03d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03da c415 | | Store 0x2,0x15
03db 783c |x< | Jump 0x418
03dc 00da | | Load_Top At_Offset_2
03dd 0f03 | | Execute_Immediate Equal,0x3
03de 681d |h | Jump_Zero 0x3fc
03df e7fe | | Load 0x3,-0x2
03e0 4976 |Iv | Short_Literal 0x176
03e1 00eb | | Load_Encached Diana_Cache
03e2 0098 | | Execute Package,Field_Read_Dynamic
03e3 180f | | Execute Package,Field_Execute,Field_Number 0xf
03e4 e404 | | Load 0x2,0x4
03e5 012f | / | Execute Any,Equal
03e6 7031 |p1 | Jump_Nonzero 0x418
03e7 e012 | | Load 0x0,0x12
03e8 180e | | Execute Package,Field_Execute,Field_Number 0xe
03e9 4801 |H | Short_Literal 0x1
03ea 0092 0b56 | V| Action Push_String_Extended,0xb56 ; "Installed unit "
03ec e7fe | | Load 0x3,-0x2
03ed e001 | | Load 0x0,0x1
03ee 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03ef 01cc | | Execute Vector,Catenate
03f0 0092 0b57 | W| Action Push_String_Extended,0xb57 ; "Added to set of uncoded units"
03f2 01cc | | Execute Vector,Catenate
03f3 e016 | | Load 0x0,0x16
03f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03f5 e414 | | Load 0x2,0x14
03f6 e7fe | | Load 0x3,-0x2
03f7 e009 | | Load 0x0,0x9
03f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03f9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03fa c414 | | Store 0x2,0x14
03fb 781c |x | Jump 0x418
03fc e7fe | | Load 0x3,-0x2
03fd 4976 |Iv | Short_Literal 0x176
03fe 00eb | | Load_Encached Diana_Cache
03ff 0098 | | Execute Package,Field_Read_Dynamic
0400 180f | | Execute Package,Field_Execute,Field_Number 0xf
0401 e404 | | Load 0x2,0x4
0402 012f | / | Execute Any,Equal
0403 7014 |p | Jump_Nonzero 0x418
0404 e012 | | Load 0x0,0x12
0405 180e | | Execute Package,Field_Execute,Field_Number 0xe
0406 4801 |H | Short_Literal 0x1
0407 0092 0b58 | X| Action Push_String_Extended,0xb58 ; "Source unit "
0409 e7fe | | Load 0x3,-0x2
040a e001 | | Load 0x0,0x1
040b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
040c 01cc | | Execute Vector,Catenate
040d 0092 0b59 | Y| Action Push_String_Extended,0xb59 ; " Added to set of missing units"
040f 01cc | | Execute Vector,Catenate
0410 e016 | | Load 0x0,0x16
0411 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0412 e413 | | Load 0x2,0x13
0413 e7fe | | Load 0x3,-0x2
0414 e009 | | Load 0x0,0x9
0415 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0416 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0417 c413 | | Store 0x2,0x13
0418 e7ff | | Load 0x3,-0x1
0419 0f01 | | Execute_Immediate Equal,0x1
041a 6804 |h | Jump_Zero 0x41f
041b e7fe | | Load 0x3,-0x2
041c 8219 | | Call 0x1,0x19
041d 6801 |h | Jump_Zero 0x41f
041e 8604 | | Call 0x3,0x4
041f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0420 e7fe | | Load 0x3,-0x2
0421 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0422 0fa8 | | Execute_Immediate Equal,-0x58
0423 6808 |h | Jump_Zero 0x42c
0424 e7fe | | Load 0x3,-0x2
0425 4976 |Iv | Short_Literal 0x176
0426 00eb | | Load_Encached Diana_Cache
0427 0098 | | Execute Package,Field_Read_Dynamic
0428 180f | | Execute Package,Field_Execute,Field_Number 0xf
0429 e404 | | Load 0x2,0x4
042a 012f | / | Execute Any,Equal
042b 6804 |h | Jump_Zero 0x430
042c e7fe | | Load 0x3,-0x2
042d e404 | | Load 0x2,0x4
042e 012f | / | Execute Any,Equal
042f 7014 |p | Jump_Nonzero 0x444
0430 e012 | | Load 0x0,0x12
0431 180e | | Execute Package,Field_Execute,Field_Number 0xe
0432 4801 |H | Short_Literal 0x1
0433 0092 0b5a | Z| Action Push_String_Extended,0xb5a ; "Missing unit "
0435 e7fe | | Load 0x3,-0x2
0436 e001 | | Load 0x0,0x1
0437 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0438 01cc | | Execute Vector,Catenate
0439 0092 0b59 | Y| Action Push_String_Extended,0xb59 ; " Added to set of missing units"
043b 01cc | | Execute Vector,Catenate
043c e016 | | Load 0x0,0x16
043d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
043e e413 | | Load 0x2,0x13
043f e7fe | | Load 0x3,-0x2
0440 e009 | | Load 0x0,0x9
0441 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0442 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0443 c413 | | Store 0x2,0x13
0444 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0445 e012 | | Load 0x0,0x12
0446 180e | | Execute Package,Field_Execute,Field_Number 0xe
0447 4801 |H | Short_Literal 0x1
0448 0092 0b5b | [| Action Push_String_Extended,0xb5b ; "Missing subunit "
044a e7fe | | Load 0x3,-0x2
044b e001 | | Load 0x0,0x1
044c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
044d 01cc | | Execute Vector,Catenate
044e 0092 0b5c | \| Action Push_String_Extended,0xb5c ; "Added to set of missing units"
0450 01cc | | Execute Vector,Catenate
0451 e016 | | Load 0x0,0x16
0452 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0453 e413 | | Load 0x2,0x13
0454 e7fe | | Load 0x3,-0x2
0455 e009 | | Load 0x0,0x9
0456 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0457 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0458 c413 | | Store 0x2,0x13
0459 4503 |E | Exit_Suprogram New_Top_Offset 0x3
045a 0000 0000 | | .BLANK 0000[0x6]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 046e | n | .CONST 0x046e ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0006 | | .CONST 0x0006 ; Number of locals
0463 INIT_0460:
0463 e009 | | Load 0x0,0x9
0464 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0465 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0466 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call
0468 029f 080b | | Declare_Subprogram INIT_0808,For_Call
046a 029f 0823 | #| Declare_Subprogram INIT_0820,For_Call
046c 029f 086b | k| Declare_Subprogram INIT_0868,For_Call
046e BODY_0460:
046e e009 | | Load 0x0,0x9
046f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0470 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0471 e006 | | Load 0x0,0x6
0472 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0473 e007 | | Load 0x0,0x7
0474 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0475 e009 | | Load 0x0,0x9
0476 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0477 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0478 c602 | | Store 0x3,0x2
0479 e7ff | | Load 0x3,-0x1
047a 8605 | | Call 0x3,0x5
047b e7ff | | Load 0x3,-0x1
047c 800a | | Call 0x0,0xa
047d 4604 |F | Jump_Case 0x5
047e 780c |x | Jump 0x48b ; case 0x0
047f 7809 |x | Jump 0x489 ; case 0x1
0480 780a |x | Jump 0x48b ; case 0x2
0481 7807 |x | Jump 0x489 ; case 0x3
0482 7800 |x | Jump 0x483 ; case 0x4
0483 e7ff | | Load 0x3,-0x1
0484 800b | | Call 0x0,0xb
0485 7005 |p | Jump_Nonzero 0x48b
0486 e7ff | | Load 0x3,-0x1
0487 8604 | | Call 0x3,0x4
0488 7802 |x | Jump 0x48b
0489 e7ff | | Load 0x3,-0x1
048a 8603 | | Call 0x3,0x3
048b e7ff | | Load 0x3,-0x1
048c 8606 | | Call 0x3,0x6
048d e602 | | Load 0x3,0x2
048e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
048f 0000 | | .XXX[0x1]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 049f | | .CONST 0x049f ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0006 | | .CONST 0x0006 ; Number of locals
0493 INIT_0490:
0493 00ec | | Load_Encached Diana_Tree_Cache
0494 02c7 | | Declare_Variable Any
0495 00d8 | | Load_Top At_Offset_0
0496 1c00 | | Execute_Immediate Run_Utility,0x0
0497 00e1 | | Load_Encached Boolean_Cache
0498 e5ff | | Load 0x2,-0x1
0499 00ec | | Load_Encached Diana_Tree_Cache
049a 011e | | Execute Any,Convert
049b 029f 08b3 | | Declare_Subprogram INIT_08b0,For_Call
049d 029f 0913 | | Declare_Subprogram INIT_0910,For_Call
049f BODY_0490:
049f e012 | | Load 0x0,0x12
04a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
04a1 4801 |H | Short_Literal 0x1
04a2 0092 0b5d | ]| Action Push_String_Extended,0xb5d ; "Removing circular dependencies of "
04a4 e5ff | | Load 0x2,-0x1
04a5 e001 | | Load 0x0,0x1
04a6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04a7 01cc | | Execute Vector,Catenate
04a8 e016 | | Load 0x0,0x16
04a9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04aa 8606 | | Call 0x3,0x6
04ab 00e1 | | Load_Encached Boolean_Cache
04ac 4801 |H | Short_Literal 0x1
04ad e411 | | Load 0x2,0x11
04ae 8605 | | Call 0x3,0x5
04af c603 | | Store 0x3,0x3
04b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04b1 0000 0000 | | .BLANK 0000[0x7]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04da | | .CONST 0x04da ; Address of begin
04b9 0004 | | .CONST 0x0004 ; Address of exception handler
04ba 000b | | .CONST 0x000b ; Number of locals
04bb INIT_04b8:
04bb e009 | | Load 0x0,0x9
04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bd 1b10 | | Execute Package,Field_Read,Field_Number 0x10
04be e018 | | Load 0x0,0x18
04bf 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
04c0 e00e | | Load 0x0,0xe
04c1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
04c2 02c7 | | Declare_Variable Any
04c3 00d8 | | Load_Top At_Offset_0
04c4 1c00 | | Execute_Immediate Run_Utility,0x0
04c5 e00e | | Load 0x0,0xe
04c6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
04c7 02c7 | | Declare_Variable Any
04c8 00d8 | | Load_Top At_Offset_0
04c9 1c00 | | Execute_Immediate Run_Utility,0x0
04ca e00e | | Load 0x0,0xe
04cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04cc 02c7 | | Declare_Variable Any
04cd 00d8 | | Load_Top At_Offset_0
04ce 1c00 | | Execute_Immediate Run_Utility,0x0
04cf 00e1 | | Load_Encached Boolean_Cache
04d0 00e1 | | Load_Encached Boolean_Cache
04d1 e00c | | Load 0x0,0xc
04d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d3 02c7 | | Declare_Variable Any
04d4 00d8 | | Load_Top At_Offset_0
04d5 1c00 | | Execute_Immediate Run_Utility,0x0
04d6 e014 | | Load 0x0,0x14
04d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d8 029f 093b | ;| Declare_Subprogram INIT_0938,For_Call
04da BODY_04b8:
04da e009 | | Load 0x0,0x9
04db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04dc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
04dd e405 | | Load 0x2,0x5
04de e009 | | Load 0x0,0x9
04df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04e0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04e1 c602 | | Store 0x3,0x2
04e2 e606 | | Load 0x3,0x6
04e3 0120 | | Execute Any,Is_Value
04e4 6803 |h | Jump_Zero 0x4e8
04e5 e00e | | Load 0x0,0xe
04e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04e7 7801 |x | Jump 0x4e9
04e8 e606 | | Load 0x3,0x6
04e9 4800 |H | Short_Literal 0x0
04ea 4802 |H | Short_Literal 0x2
04eb e7ff | | Load 0x3,-0x1
04ec e40c | | Load 0x2,0xc
04ed e00e | | Load 0x0,0xe
04ee 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
04ef 180e | | Execute Package,Field_Execute,Field_Number 0xe
04f0 c606 | | Store 0x3,0x6
04f1 e606 | | Load 0x3,0x6
04f2 e00e | | Load 0x0,0xe
04f3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04f4 012f | / | Execute Any,Equal
04f5 6802 |h | Jump_Zero 0x4f8
04f6 e011 | | Load 0x0,0x11
04f7 0257 | W | Execute Discrete,Raise
04f8 e7ff | | Load 0x3,-0x1
04f9 e40c | | Load 0x2,0xc
04fa e00e | | Load 0x0,0xe
04fb 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
04fc 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04fd c605 | | Store 0x3,0x5
04fe e605 | | Load 0x3,0x5
04ff e018 | | Load 0x0,0x18
0500 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0501 e018 | | Load 0x0,0x18
0502 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0503 0216 | | Execute Heap_Access,Convert
0504 a603 | | Store_Unchecked 0x3,0x3
0505 00cf | | Action Mark_Auxiliary
0506 781a |x | Jump 0x521
0507 e603 | | Load 0x3,0x3
0508 e018 | | Load 0x0,0x18
0509 1b15 | | Execute Package,Field_Read,Field_Number 0x15
050a 0216 | | Execute Heap_Access,Convert
050b 860b | | Call 0x3,0xb
050c e603 | | Load 0x3,0x3
050d 0217 | | Execute Heap_Access,All_Reference
050e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
050f 680c |h | Jump_Zero 0x51c
0510 e607 | | Load 0x3,0x7
0511 700a |p | Jump_Nonzero 0x51c
0512 e608 | | Load 0x3,0x8
0513 7008 |p | Jump_Nonzero 0x51c
0514 e602 | | Load 0x3,0x2
0515 e603 | | Load 0x3,0x3
0516 0217 | | Execute Heap_Access,All_Reference
0517 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0518 e009 | | Load 0x0,0x9
0519 1b0d | | Execute Package,Field_Read,Field_Number 0xd
051a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
051b c602 | | Store 0x3,0x2
051c e603 | | Load 0x3,0x3
051d 0217 | | Execute Heap_Access,All_Reference
051e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
051f a603 | | Store_Unchecked 0x3,0x3
0520 00c9 | | Action Pop_Auxiliary_Loop
0521 e603 | | Load 0x3,0x3
0522 77e4 |w | Jump_Nonzero 0x507
0523 00ce | | Action Pop_Auxiliary
0524 e602 | | Load 0x3,0x2
0525 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0526 0000 0000 | | .XXX[0x2]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b | + | .CONST 0x052b ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0001 | | .CONST 0x0001 ; Number of locals
052b BODY_0528:
052b INIT_0528:
052b 00da | | Load_Top At_Offset_2
052c 4976 |Iv | Short_Literal 0x176
052d 00eb | | Load_Encached Diana_Cache
052e 0098 | | Execute Package,Field_Read_Dynamic
052f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0530 00eb | | Load_Encached Diana_Cache
0531 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0532 00eb | | Load_Encached Diana_Cache
0533 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0534 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0535 0000 0000 | | .XXX[0x3]
0537 0000 | |
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b | ; | .CONST 0x053b ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0001 | | .CONST 0x0001 ; Number of locals
053b BODY_0538:
053b INIT_0538:
053b 00da | | Load_Top At_Offset_2
053c e7fe | | Load 0x3,-0x2
053d 012f | / | Execute Any,Equal
053e 6802 |h | Jump_Zero 0x541
053f 4800 |H | Short_Literal 0x0
0540 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0541 00da | | Load_Top At_Offset_2
0542 7002 |p | Jump_Nonzero 0x545
0543 4800 |H | Short_Literal 0x0
0544 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0545 00db | | Load_Top At_Offset_3
0546 7002 |p | Jump_Nonzero 0x549
0547 4801 |H | Short_Literal 0x1
0548 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0549 00da | | Load_Top At_Offset_2
054a 0212 | | Execute Heap_Access,Address
054b e7fe | | Load 0x3,-0x2
054c 0212 | | Execute Heap_Access,Address
054d 027c | | | Execute Discrete,Less
054e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
054f 0000 | | .XXX[0x1]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0562 | b | .CONST 0x0562 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0005 | | .CONST 0x0005 ; Number of locals
0553 INIT_0550:
0553 e009 | | Load 0x0,0x9
0554 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0555 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0556 00ec | | Load_Encached Diana_Tree_Cache
0557 02c7 | | Declare_Variable Any
0558 00d8 | | Load_Top At_Offset_0
0559 1c00 | | Execute_Immediate Run_Utility,0x0
055a e216 | | Load 0x1,0x16
055b 0322 | " | Declare_Variable Record
055c 00d8 | | Load_Top At_Offset_0
055d 1c00 | | Execute_Immediate Run_Utility,0x0
055e e216 | | Load 0x1,0x16
055f 0322 | " | Declare_Variable Record
0560 00d8 | | Load_Top At_Offset_0
0561 1c00 | | Execute_Immediate Run_Utility,0x0
0562 BODY_0550:
0562 e009 | | Load 0x0,0x9
0563 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0564 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0565 e7ff | | Load 0x3,-0x1
0566 e009 | | Load 0x0,0x9
0567 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0568 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0569 c602 | | Store 0x3,0x2
056a 00cf | | Action Mark_Auxiliary
056b 7864 |xd | Jump 0x5d0
056c e602 | | Load 0x3,0x2
056d e009 | | Load 0x0,0x9
056e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
056f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0570 c603 | | Store 0x3,0x3
0571 00db | | Load_Top At_Offset_3
0572 e403 | | Load 0x2,0x3
0573 012f | / | Execute Any,Equal
0574 6807 |h | Jump_Zero 0x57c
0575 4801 |H | Short_Literal 0x1
0576 00da | | Load_Top At_Offset_2
0577 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0578 4801 |H | Short_Literal 0x1
0579 00da | | Load_Top At_Offset_2
057a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
057b 7859 |xY | Jump 0x5d5
057c 00db | | Load_Top At_Offset_3
057d e410 | | Load 0x2,0x10
057e e009 | | Load 0x0,0x9
057f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0580 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0581 6804 |h | Jump_Zero 0x586
0582 4801 |H | Short_Literal 0x1
0583 00da | | Load_Top At_Offset_2
0584 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0585 7844 |xD | Jump 0x5ca
0586 00db | | Load_Top At_Offset_3
0587 e40f | | Load 0x2,0xf
0588 e009 | | Load 0x0,0x9
0589 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
058b 6801 |h | Jump_Zero 0x58d
058c 783d |x= | Jump 0x5ca
058d e40c | | Load 0x2,0xc
058e e00e | | Load 0x0,0xe
058f 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0590 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0591 e603 | | Load 0x3,0x3
0592 e001 | | Load 0x0,0x1
0593 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0594 6801 |h | Jump_Zero 0x596
0595 7834 |x4 | Jump 0x5ca
0596 e410 | | Load 0x2,0x10
0597 e603 | | Load 0x3,0x3
0598 e009 | | Load 0x0,0x9
0599 1b0d | | Execute Package,Field_Read,Field_Number 0xd
059a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
059b c410 | | Store 0x2,0x10
059c 00da | | Load_Top At_Offset_2
059d e603 | | Load 0x3,0x3
059e 841c | | Call 0x2,0x1c
059f 8421 | ! | Call 0x2,0x21
05a0 00d1 | | Pop_Control Pop_Count_1
05a1 00da | | Load_Top At_Offset_2
05a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05a3 6804 |h | Jump_Zero 0x5a8
05a4 4801 |H | Short_Literal 0x1
05a5 00da | | Load_Top At_Offset_2
05a6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05a7 781c |x | Jump 0x5c4
05a8 00da | | Load_Top At_Offset_2
05a9 e603 | | Load 0x3,0x3
05aa 841e | | Call 0x2,0x1e
05ab 8421 | ! | Call 0x2,0x21
05ac 00d1 | | Pop_Control Pop_Count_1
05ad 00da | | Load_Top At_Offset_2
05ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05af 680e |h | Jump_Zero 0x5be
05b0 00da | | Load_Top At_Offset_2
05b1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05b2 6811 |h | Jump_Zero 0x5c4
05b3 e403 | | Load 0x2,0x3
05b4 e603 | | Load 0x3,0x3
05b5 8420 | | Call 0x2,0x20
05b6 680d |h | Jump_Zero 0x5c4
05b7 4801 |H | Short_Literal 0x1
05b8 00da | | Load_Top At_Offset_2
05b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05ba 4801 |H | Short_Literal 0x1
05bb 00da | | Load_Top At_Offset_2
05bc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
05bd 7817 |x | Jump 0x5d5
05be e40f | | Load 0x2,0xf
05bf e603 | | Load 0x3,0x3
05c0 e009 | | Load 0x0,0x9
05c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05c3 c40f | | Store 0x2,0xf
05c4 e410 | | Load 0x2,0x10
05c5 e603 | | Load 0x3,0x3
05c6 e009 | | Load 0x0,0x9
05c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05c9 c410 | | Store 0x2,0x10
05ca e602 | | Load 0x3,0x2
05cb e009 | | Load 0x0,0x9
05cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05cd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
05ce c602 | | Store 0x3,0x2
05cf 00c9 | | Action Pop_Auxiliary_Loop
05d0 e602 | | Load 0x3,0x2
05d1 e009 | | Load 0x0,0x9
05d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05d4 6f97 |o | Jump_Zero 0x56c
05d5 00ce | | Action Pop_Auxiliary
05d6 00d8 | | Load_Top At_Offset_0
05d7 e7fe | | Load 0x3,-0x2
05d8 017d | } | Execute Record,Structure_Write
05d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05da 0000 0000 | | .BLANK 0000[0x6]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05ee | | .CONST 0x05ee ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0005 | | .CONST 0x0005 ; Number of locals
05e3 INIT_05e0:
05e3 e5ff | | Load 0x2,-0x1
05e4 841e | | Call 0x2,0x1e
05e5 e009 | | Load 0x0,0x9
05e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e7 1b18 | | Execute Package,Field_Read,Field_Number 0x18
05e8 00ec | | Load_Encached Diana_Tree_Cache
05e9 02c7 | | Declare_Variable Any
05ea 00d8 | | Load_Top At_Offset_0
05eb 1c00 | | Execute_Immediate Run_Utility,0x0
05ec 029f 0983 | | Declare_Subprogram INIT_0980,For_Call
05ee BODY_05e0:
05ee e410 | | Load 0x2,0x10
05ef e5ff | | Load 0x2,-0x1
05f0 e009 | | Load 0x0,0x9
05f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05f3 c410 | | Store 0x2,0x10
05f4 e009 | | Load 0x0,0x9
05f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
05f7 e602 | | Load 0x3,0x2
05f8 e009 | | Load 0x0,0x9
05f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05fb 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05fc 00cf | | Action Mark_Auxiliary
05fd 7807 |x | Jump 0x605
05fe 8605 | | Call 0x3,0x5
05ff 00db | | Load_Top At_Offset_3
0600 e009 | | Load 0x0,0x9
0601 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0602 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0603 c603 | | Store 0x3,0x3
0604 00c9 | | Action Pop_Auxiliary_Loop
0605 00db | | Load_Top At_Offset_3
0606 e009 | | Load 0x0,0x9
0607 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0608 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0609 6ff4 |o | Jump_Zero 0x5fe
060a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
060b 0000 0000 | | .BLANK 0000[0x5]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 061b | | .CONST 0x061b ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0005 | | .CONST 0x0005 ; Number of locals
0613 INIT_0610:
0613 029f 09d3 | | Declare_Subprogram INIT_09d0,For_Call
0615 029f 09fb | | Declare_Subprogram INIT_09f8,For_Call
0617 029f 0a2b | +| Declare_Subprogram INIT_0a28,For_Call
0619 029f 0a4b | K| Declare_Subprogram INIT_0a48,For_Call
061b BODY_0610:
061b e012 | | Load 0x0,0x12
061c 180e | | Execute Package,Field_Execute,Field_Number 0xe
061d 4801 |H | Short_Literal 0x1
061e 0092 0b5e | ^| Action Push_String_Extended,0xb5e ; "Adding generic sources of "
0620 e5ff | | Load 0x2,-0x1
0621 e001 | | Load 0x0,0x1
0622 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0623 01cc | | Execute Vector,Catenate
0624 0092 0b5f | _| Action Push_String_Extended,0xb5f ; "Start, Is_Generic_Subunit = "
0626 01cc | | Execute Vector,Catenate
0627 e409 | | Load 0x2,0x9
0628 00e1 | | Load_Encached Boolean_Cache
0629 011c | | Execute Any,Convert_Unchecked
062a 1c01 | | Execute_Immediate Run_Utility,0x1
062b 01cc | | Execute Vector,Catenate
062c e016 | | Load 0x0,0x16
062d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
062e e409 | | Load 0x2,0x9
062f 680b |h | Jump_Zero 0x63b
0630 e5ff | | Load 0x2,-0x1
0631 4976 |Iv | Short_Literal 0x176
0632 00eb | | Load_Encached Diana_Cache
0633 0098 | | Execute Package,Field_Read_Dynamic
0634 180f | | Execute Package,Field_Execute,Field_Number 0xf
0635 490d |I | Short_Literal 0x10d
0636 00eb | | Load_Encached Diana_Cache
0637 0096 | | Execute Package,Entry
0638 e001 | | Load 0x0,0x1
0639 180d | | Execute Package,Field_Execute,Field_Number 0xd
063a c40a | | Store 0x2,0xa
063b e5ff | | Load 0x2,-0x1
063c e00f | | Load 0x0,0xf
063d 180e | | Execute Package,Field_Execute,Field_Number 0xe
063e a406 | | Store_Unchecked 0x2,0x6
063f e009 | | Load 0x0,0x9
0640 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0641 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0642 e406 | | Load 0x2,0x6
0643 e009 | | Load 0x0,0x9
0644 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0645 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0646 c407 | | Store 0x2,0x7
0647 00cf | | Action Mark_Auxiliary
0648 7820 |x | Jump 0x669
0649 00ea | | Load_Encached Null_String_Cache
064a e407 | | Load 0x2,0x7
064b e009 | | Load 0x0,0x9
064c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
064e 0092 0b60 | `| Action Push_String_Extended,0xb60 ; "Processing instantiation "
0650 8217 | | Call 0x1,0x17
0651 e408 | | Load 0x2,0x8
0652 e5fc | | Load 0x2,-0x4
0653 4801 |H | Short_Literal 0x1
0654 4801 |H | Short_Literal 0x1
0655 e407 | | Load 0x2,0x7
0656 e009 | | Load 0x0,0x9
0657 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0658 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0659 e417 | | Load 0x2,0x17
065a 4818 |H | Short_Literal 0x18
065b 4802 |H | Short_Literal 0x2
065c 0099 | | Action Reference_Dynamic
065d 4819 |H | Short_Literal 0x19
065e 4802 |H | Short_Literal 0x2
065f 0099 | | Action Reference_Dynamic
0660 e00f | | Load 0x0,0xf
0661 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0662 c408 | | Store 0x2,0x8
0663 e407 | | Load 0x2,0x7
0664 e009 | | Load 0x0,0x9
0665 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0666 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0667 c407 | | Store 0x2,0x7
0668 00c9 | | Action Pop_Auxiliary_Loop
0669 e407 | | Load 0x2,0x7
066a e009 | | Load 0x0,0x9
066b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
066c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
066d 6fdb |o | Jump_Zero 0x649
066e 00ce | | Action Pop_Auxiliary
066f e009 | | Load 0x0,0x9
0670 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0671 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0672 e413 | | Load 0x2,0x13
0673 e009 | | Load 0x0,0x9
0674 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0675 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0676 c407 | | Store 0x2,0x7
0677 00cf | | Action Mark_Auxiliary
0678 7802 |x | Jump 0x67b
0679 8603 | | Call 0x3,0x3
067a 00c9 | | Action Pop_Auxiliary_Loop
067b e407 | | Load 0x2,0x7
067c e009 | | Load 0x0,0x9
067d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
067f 6ff9 |o | Jump_Zero 0x679
0680 00ce | | Action Pop_Auxiliary
0681 e5fa | | Load 0x2,-0x6
0682 0e01 | | Execute_Immediate Not_Equal,0x1
0683 6838 |h8 | Jump_Zero 0x6bc
0684 e009 | | Load 0x0,0x9
0685 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0686 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0687 e414 | | Load 0x2,0x14
0688 e009 | | Load 0x0,0x9
0689 1b0d | | Execute Package,Field_Read,Field_Number 0xd
068a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
068b c407 | | Store 0x2,0x7
068c e407 | | Load 0x2,0x7
068d e009 | | Load 0x0,0x9
068e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
068f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0690 702b |p+ | Jump_Nonzero 0x6bc
0691 e40e | | Load 0x2,0xe
0692 0120 | | Execute Any,Is_Value
0693 6803 |h | Jump_Zero 0x697
0694 e00e | | Load 0x0,0xe
0695 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0696 7801 |x | Jump 0x698
0697 e40e | | Load 0x2,0xe
0698 4800 |H | Short_Literal 0x0
0699 4802 |H | Short_Literal 0x2
069a e5ff | | Load 0x2,-0x1
069b e40c | | Load 0x2,0xc
069c e00e | | Load 0x0,0xe
069d 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
069e 180e | | Execute Package,Field_Execute,Field_Number 0xe
069f c40e | | Store 0x2,0xe
06a0 e40e | | Load 0x2,0xe
06a1 e00e | | Load 0x0,0xe
06a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06a3 012f | / | Execute Any,Equal
06a4 6802 |h | Jump_Zero 0x6a7
06a5 e011 | | Load 0x0,0x11
06a6 0257 | W | Execute Discrete,Raise
06a7 e5ff | | Load 0x2,-0x1
06a8 e40c | | Load 0x2,0xc
06a9 e00e | | Load 0x0,0xe
06aa 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
06ab 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06ac c40d | | Store 0x2,0xd
06ad 00cf | | Action Mark_Auxiliary
06ae 7807 |x | Jump 0x6b6
06af 8604 | | Call 0x3,0x4
06b0 e407 | | Load 0x2,0x7
06b1 e009 | | Load 0x0,0x9
06b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06b4 c407 | | Store 0x2,0x7
06b5 00c9 | | Action Pop_Auxiliary_Loop
06b6 e407 | | Load 0x2,0x7
06b7 e009 | | Load 0x0,0x9
06b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b9 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06ba 6ff4 |o | Jump_Zero 0x6af
06bb 00ce | | Action Pop_Auxiliary
06bc e414 | | Load 0x2,0x14
06bd e009 | | Load 0x0,0x9
06be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06bf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06c0 7003 |p | Jump_Nonzero 0x6c4
06c1 e414 | | Load 0x2,0x14
06c2 841d | | Call 0x2,0x1d
06c3 c414 | | Store 0x2,0x14
06c4 e009 | | Load 0x0,0x9
06c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06c6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
06c7 e414 | | Load 0x2,0x14
06c8 e009 | | Load 0x0,0x9
06c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ca 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06cb c407 | | Store 0x2,0x7
06cc e407 | | Load 0x2,0x7
06cd e009 | | Load 0x0,0x9
06ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06cf 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06d0 700f |p | Jump_Nonzero 0x6e0
06d1 00cf | | Action Mark_Auxiliary
06d2 7807 |x | Jump 0x6da
06d3 8605 | | Call 0x3,0x5
06d4 e407 | | Load 0x2,0x7
06d5 e009 | | Load 0x0,0x9
06d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06d7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06d8 c407 | | Store 0x2,0x7
06d9 00c9 | | Action Pop_Auxiliary_Loop
06da e407 | | Load 0x2,0x7
06db e009 | | Load 0x0,0x9
06dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06dd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06de 6ff4 |o | Jump_Zero 0x6d3
06df 00ce | | Action Pop_Auxiliary
06e0 e5fa | | Load 0x2,-0x6
06e1 0e01 | | Execute_Immediate Not_Equal,0x1
06e2 6853 |hS | Jump_Zero 0x736
06e3 e009 | | Load 0x0,0x9
06e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
06e6 e415 | | Load 0x2,0x15
06e7 e009 | | Load 0x0,0x9
06e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e9 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06ea c407 | | Store 0x2,0x7
06eb e407 | | Load 0x2,0x7
06ec e009 | | Load 0x0,0x9
06ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ee 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06ef 7046 |pF | Jump_Nonzero 0x736
06f0 e40e | | Load 0x2,0xe
06f1 e00e | | Load 0x0,0xe
06f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06f3 012f | / | Execute Any,Equal
06f4 681c |h | Jump_Zero 0x711
06f5 e40e | | Load 0x2,0xe
06f6 0120 | | Execute Any,Is_Value
06f7 6803 |h | Jump_Zero 0x6fb
06f8 e00e | | Load 0x0,0xe
06f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06fa 7801 |x | Jump 0x6fc
06fb e40e | | Load 0x2,0xe
06fc 4800 |H | Short_Literal 0x0
06fd 4802 |H | Short_Literal 0x2
06fe e5ff | | Load 0x2,-0x1
06ff e40c | | Load 0x2,0xc
0700 e00e | | Load 0x0,0xe
0701 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
0702 180e | | Execute Package,Field_Execute,Field_Number 0xe
0703 c40e | | Store 0x2,0xe
0704 e40e | | Load 0x2,0xe
0705 e00e | | Load 0x0,0xe
0706 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0707 012f | / | Execute Any,Equal
0708 6802 |h | Jump_Zero 0x70b
0709 e011 | | Load 0x0,0x11
070a 0257 | W | Execute Discrete,Raise
070b e5ff | | Load 0x2,-0x1
070c e40c | | Load 0x2,0xc
070d e00e | | Load 0x0,0xe
070e 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
070f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0710 c40d | | Store 0x2,0xd
0711 00cf | | Action Mark_Auxiliary
0712 781d |x | Jump 0x730
0713 e409 | | Load 0x2,0x9
0714 6807 |h | Jump_Zero 0x71c
0715 e407 | | Load 0x2,0x7
0716 e009 | | Load 0x0,0x9
0717 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0718 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0719 e40a | | Load 0x2,0xa
071a 012f | / | Execute Any,Equal
071b 700e |p | Jump_Nonzero 0x72a
071c e40e | | Load 0x2,0xe
071d e40d | | Load 0x2,0xd
071e e407 | | Load 0x2,0x7
071f e009 | | Load 0x0,0x9
0720 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0721 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0722 e001 | | Load 0x0,0x1
0723 180d | | Execute Package,Field_Execute,Field_Number 0xd
0724 4976 |Iv | Short_Literal 0x176
0725 00eb | | Load_Encached Diana_Cache
0726 0098 | | Execute Package,Field_Read_Dynamic
0727 180f | | Execute Package,Field_Execute,Field_Number 0xf
0728 e018 | | Load 0x0,0x18
0729 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
072a e407 | | Load 0x2,0x7
072b e009 | | Load 0x0,0x9
072c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
072e c407 | | Store 0x2,0x7
072f 00c9 | | Action Pop_Auxiliary_Loop
0730 e407 | | Load 0x2,0x7
0731 e009 | | Load 0x0,0x9
0732 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0733 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0734 6fde |o | Jump_Zero 0x713
0735 00ce | | Action Pop_Auxiliary
0736 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0737 0000 | | .XXX[0x1]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 0745 | E | .CONST 0x0745 ; Address of begin
0739 0004 | | .CONST 0x0004 ; Address of exception handler
073a 0004 | | .CONST 0x0004 ; Number of locals
073b INIT_0738:
073b e005 | | Load 0x0,0x5
073c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
073d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
073e 02ff | | Declare_Variable Variant_Record
073f 00d8 | | Load_Top At_Offset_0
0740 1c00 | | Execute_Immediate Run_Utility,0x0
0741 e005 | | Load 0x0,0x5
0742 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0743 029f 0a6b | k| Declare_Subprogram INIT_0a68,For_Call
0745 BODY_0738:
0745 e005 | | Load 0x0,0x5
0746 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0747 00db | | Load_Top At_Offset_3
0748 e5ff | | Load 0x2,-0x1
0749 e005 | | Load 0x0,0x5
074a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
074b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
074c 00d1 | | Pop_Control Pop_Count_1
074d 005a | Z | Store_Top Discrete,At_Offset_2
074e e012 | | Load 0x0,0x12
074f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0750 4801 |H | Short_Literal 0x1
0751 4802 |H | Short_Literal 0x2
0752 e019 | | Load 0x0,0x19
0753 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0754 035b | [ | Declare_Type Array,Constrained
0755 0337 | 7 | Declare_Variable Array
0756 e602 | | Load 0x3,0x2
0757 e019 | | Load 0x0,0x19
0758 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0759 e019 | | Load 0x0,0x19
075a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
075b 0119 | | Execute Any,Check_In_Formal_Type
075c 4801 |H | Short_Literal 0x1
075d 00da | | Load_Top At_Offset_2
075e 01d6 | | Execute Vector,Field_Write
075f 8604 | | Call 0x3,0x4
0760 e019 | | Load 0x0,0x19
0761 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0762 e019 | | Load 0x0,0x19
0763 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0764 0119 | | Execute Any,Check_In_Formal_Type
0765 4802 |H | Short_Literal 0x2
0766 00da | | Load_Top At_Offset_2
0767 01d6 | | Execute Vector,Field_Write
0768 6007 |` | Indirect_Literal Discrete,0x770,{0x00000000, 0x000081da}
0769 e014 | | Load 0x0,0x14
076a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
076b e014 | | Load 0x0,0x14
076c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
076d e425 | % | Load 0x2,0x25
076e 0101 | | Execute Exception,Reraise
076f 0000 | | .XXX[0x1]
0770 0000 0000 | | .LITERAL {0x00000000, 0x000081da}
0774 0000 0000 | | .BLANK 0000[0x4]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b | { | .CONST 0x077b ; Address of begin
0779 0783 | | .CONST 0x0783 ; Address of exception handler
077a 0001 | | .CONST 0x0001 ; Number of locals
077b BODY_0778:
077b INIT_0778:
077b e5fc | | Load 0x2,-0x4
077c e402 | | Load 0x2,0x2
077d e015 | | Load 0x0,0x15
077e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
077f e001 | | Load 0x0,0x1
0780 180e | | Execute Package,Field_Execute,Field_Number 0xe
0781 c403 | | Store 0x2,0x3
0782 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0783 TRAP_0778:
0783 0007 | | Action Break_Optional
0784 00ec | | Load_Encached Diana_Tree_Cache
0785 c403 | | Store 0x2,0x3
0786 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0787 0000 | | .XXX[0x1]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b | | .CONST 0x078b ; Address of begin
0789 0793 | | .CONST 0x0793 ; Address of exception handler
078a 0001 | | .CONST 0x0001 ; Number of locals
078b BODY_0788:
078b INIT_0788:
078b e5fc | | Load 0x2,-0x4
078c e402 | | Load 0x2,0x2
078d e015 | | Load 0x0,0x15
078e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
078f e001 | | Load 0x0,0x1
0790 180e | | Execute Package,Field_Execute,Field_Number 0xe
0791 c403 | | Store 0x2,0x3
0792 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0793 TRAP_0788:
0793 0007 | | Action Break_Optional
0794 00ec | | Load_Encached Diana_Tree_Cache
0795 c403 | | Store 0x2,0x3
0796 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0797 0000 | | .XXX[0x1]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b | | .CONST 0x079b ; Address of begin
0799 0004 | | .CONST 0x0004 ; Address of exception handler
079a 0001 | | .CONST 0x0001 ; Number of locals
079b BODY_0798:
079b INIT_0798:
079b e5fc | | Load 0x2,-0x4
079c 00db | | Load_Top At_Offset_3
079d e001 | | Load 0x0,0x1
079e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
079f e005 | | Load 0x0,0x5
07a0 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
07a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07a2 011c | | Execute Any,Convert_Unchecked
07a3 1c01 | | Execute_Immediate Run_Utility,0x1
07a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07a5 0000 0000 | | .XXX[0x3]
07a7 0000 | |
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07b3 | | .CONST 0x07b3 ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0003 | | .CONST 0x0003 ; Number of locals
07ab INIT_07a8:
07ab e7fe | | Load 0x3,-0x2
07ac 821a | | Call 0x1,0x1a
07ad 00ec | | Load_Encached Diana_Tree_Cache
07ae 011e | | Execute Any,Convert
07af e5fc | | Load 0x2,-0x4
07b0 00d9 | | Load_Top At_Offset_1
07b1 e001 | | Load 0x0,0x1
07b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07b3 BODY_07a8:
07b3 00d9 | | Load_Top At_Offset_1
07b4 800b | | Call 0x0,0xb
07b5 702c |p, | Jump_Nonzero 0x7e2
07b6 00d8 | | Load_Top At_Offset_0
07b7 0f04 | | Execute_Immediate Equal,0x4
07b8 7015 |p | Jump_Nonzero 0x7ce
07b9 e012 | | Load 0x0,0x12
07ba 180e | | Execute Package,Field_Execute,Field_Number 0xe
07bb 4801 |H | Short_Literal 0x1
07bc 0092 0b61 | a| Action Push_String_Extended,0xb61 ; "Need a parent of a generic subunit "
07be e7fe | | Load 0x3,-0x2
07bf e001 | | Load 0x0,0x1
07c0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07c1 01cc | | Execute Vector,Catenate
07c2 0092 0b62 | b| Action Push_String_Extended,0xb62 ; " added to set of uncoded units"
07c4 01cc | | Execute Vector,Catenate
07c5 e016 | | Load 0x0,0x16
07c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07c7 e414 | | Load 0x2,0x14
07c8 00da | | Load_Top At_Offset_2
07c9 e009 | | Load 0x0,0x9
07ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07cb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07cc c414 | | Store 0x2,0x14
07cd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07ce e012 | | Load 0x0,0x12
07cf 180e | | Execute Package,Field_Execute,Field_Number 0xe
07d0 4801 |H | Short_Literal 0x1
07d1 0092 0b61 | a| Action Push_String_Extended,0xb61 ; "Need a parent of a generic subunit "
07d3 e7fe | | Load 0x3,-0x2
07d4 e001 | | Load 0x0,0x1
07d5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07d6 01cc | | Execute Vector,Catenate
07d7 0092 0b63 | c| Action Push_String_Extended,0xb63 ; " added to set of coded units"
07d9 01cc | | Execute Vector,Catenate
07da e016 | | Load 0x0,0x16
07db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07dc e415 | | Load 0x2,0x15
07dd 00da | | Load_Top At_Offset_2
07de e009 | | Load 0x0,0x9
07df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07e1 c415 | | Store 0x2,0x15
07e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07e3 0000 0000 | | .BLANK 0000[0x5]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07f9 | | .CONST 0x07f9 ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0003 | | .CONST 0x0003 ; Number of locals
07eb INIT_07e8:
07eb 00da | | Load_Top At_Offset_2
07ec 4976 |Iv | Short_Literal 0x176
07ed 00eb | | Load_Encached Diana_Cache
07ee 0098 | | Execute Package,Field_Read_Dynamic
07ef 180f | | Execute Package,Field_Execute,Field_Number 0xf
07f0 00ec | | Load_Encached Diana_Tree_Cache
07f1 011e | | Execute Any,Convert
07f2 00ec | | Load_Encached Diana_Tree_Cache
07f3 02c7 | | Declare_Variable Any
07f4 00d9 | | Load_Top At_Offset_1
07f5 490b |I | Short_Literal 0x10b
07f6 00eb | | Load_Encached Diana_Cache
07f7 0096 | | Execute Package,Entry
07f8 a803 | | Store_Unchecked 0x4,0x3
07f9 BODY_07e8:
07f9 00d8 | | Load_Top At_Offset_0
07fa 00da | | Load_Top At_Offset_2
07fb 012f | / | Execute Any,Equal
07fc 7008 |p | Jump_Nonzero 0x805
07fd e602 | | Load 0x3,0x2
07fe 00d9 | | Load_Top At_Offset_1
07ff e001 | | Load 0x0,0x1
0800 180d | | Execute Package,Field_Execute,Field_Number 0xd
0801 e009 | | Load 0x0,0x9
0802 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0803 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0804 c602 | | Store 0x3,0x2
0805 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0806 0000 0000 | | .XXX[0x2]
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 080b | | .CONST 0x080b ; Address of begin
0809 0004 | | .CONST 0x0004 ; Address of exception handler
080a 0001 | | .CONST 0x0001 ; Number of locals
080b BODY_0808:
080b INIT_0808:
080b e602 | | Load 0x3,0x2
080c 00db | | Load_Top At_Offset_3
080d 4976 |Iv | Short_Literal 0x176
080e 00eb | | Load_Encached Diana_Cache
080f 0098 | | Execute Package,Field_Read_Dynamic
0810 180f | | Execute Package,Field_Execute,Field_Number 0xf
0811 490d |I | Short_Literal 0x10d
0812 00eb | | Load_Encached Diana_Cache
0813 0096 | | Execute Package,Entry
0814 e001 | | Load 0x0,0x1
0815 180d | | Execute Package,Field_Execute,Field_Number 0xd
0816 e009 | | Load 0x0,0x9
0817 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0818 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0819 c602 | | Store 0x3,0x2
081a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
081b 0000 0000 | | .BLANK 0000[0x5]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0837 | 7 | .CONST 0x0837 ; Address of begin
0821 0004 | | .CONST 0x0004 ; Address of exception handler
0822 0005 | | .CONST 0x0005 ; Number of locals
0823 INIT_0820:
0823 00ee | | Load_Encached Diana_Seq_Type_Cache
0824 02c7 | | Declare_Variable Any
0825 00db | | Load_Top At_Offset_3
0826 00eb | | Load_Encached Diana_Cache
0827 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
0828 00eb | | Load_Encached Diana_Cache
0829 1888 | | Execute Package,Field_Execute,Field_Number 0x88
082a a802 | | Store_Unchecked 0x4,0x2
082b 00ec | | Load_Encached Diana_Tree_Cache
082c 02c7 | | Declare_Variable Any
082d 00d8 | | Load_Top At_Offset_0
082e 1c00 | | Execute_Immediate Run_Utility,0x0
082f 00ee | | Load_Encached Diana_Seq_Type_Cache
0830 02c7 | | Declare_Variable Any
0831 00d8 | | Load_Top At_Offset_0
0832 1c00 | | Execute_Immediate Run_Utility,0x0
0833 00ec | | Load_Encached Diana_Tree_Cache
0834 02c7 | | Declare_Variable Any
0835 00d8 | | Load_Top At_Offset_0
0836 1c00 | | Execute_Immediate Run_Utility,0x0
0837 BODY_0820:
0837 00cf | | Action Mark_Auxiliary
0838 782a |x* | Jump 0x863
0839 e802 | | Load 0x4,0x2
083a 008b | | Action Heap_Access,Diana_Seq_Type_Get_Head
083b c803 | | Store 0x4,0x3
083c 00db | | Load_Top At_Offset_3
083d 0145 | E | Execute Heap_Access,Diana_Tree_Kind
083e 0f85 | | Execute_Immediate Equal,-0x7b
083f 681e |h | Jump_Zero 0x85e
0840 00db | | Load_Top At_Offset_3
0841 00eb | | Load_Encached Diana_Cache
0842 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0843 c804 | | Store 0x4,0x4
0844 00cf | | Action Mark_Auxiliary
0845 00db | | Load_Top At_Offset_3
0846 008b | | Action Heap_Access,Diana_Seq_Type_Get_Head
0847 00eb | | Load_Encached Diana_Cache
0848 18fa | | Execute Package,Field_Execute,Field_Number 0xfa
0849 c805 | | Store 0x4,0x5
084a e602 | | Load 0x3,0x2
084b 00db | | Load_Top At_Offset_3
084c 490b |I | Short_Literal 0x10b
084d 00eb | | Load_Encached Diana_Cache
084e 0096 | | Execute Package,Entry
084f e001 | | Load 0x0,0x1
0850 180d | | Execute Package,Field_Execute,Field_Number 0xd
0851 e009 | | Load 0x0,0x9
0852 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0853 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0854 c602 | | Store 0x3,0x2
0855 00db | | Load_Top At_Offset_3
0856 0217 | | Execute Heap_Access,All_Reference
0857 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0858 c804 | | Store 0x4,0x4
0859 00db | | Load_Top At_Offset_3
085a 6802 |h | Jump_Zero 0x85d
085b 00c9 | | Action Pop_Auxiliary_Loop
085c 7fe8 | | Jump 0x845
085d 00ce | | Action Pop_Auxiliary
085e e802 | | Load 0x4,0x2
085f 0217 | | Execute Heap_Access,All_Reference
0860 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0861 c802 | | Store 0x4,0x2
0862 00c9 | | Action Pop_Auxiliary_Loop
0863 e802 | | Load 0x4,0x2
0864 77d4 |w | Jump_Nonzero 0x839
0865 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0866 0000 0000 | | .XXX[0x2]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 087f | | .CONST 0x087f ; Address of begin
0869 0004 | | .CONST 0x0004 ; Address of exception handler
086a 000a | | .CONST 0x000a ; Number of locals
086b INIT_0868:
086b e00f | | Load 0x0,0xf
086c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
086d e009 | | Load 0x0,0x9
086e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
086f 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0870 00e2 | | Load_Encached Integer_Cache
0871 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0872 029f 0a83 | | Declare_Subprogram INIT_0a80,For_Call
0874 e00f | | Load 0x0,0xf
0875 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0876 00c6 | | Action Check_Subprogram_Elaborated
0877 00e2 | | Load_Encached Integer_Cache
0878 4805 |H | Short_Literal 0x5
0879 4804 |H | Short_Literal 0x4
087a 0099 | | Action Reference_Dynamic
087b e01b | | Load 0x0,0x1b
087c e021 | ! | Load 0x0,0x21
087d 480a |H | Short_Literal 0xa
087e 0007 | | Action Break_Optional
087f BODY_0868:
087f e9ff | | Load 0x4,-0x1
0880 e00f | | Load 0x0,0xf
0881 180e | | Execute Package,Field_Execute,Field_Number 0xe
0882 a802 | | Store_Unchecked 0x4,0x2
0883 e009 | | Load 0x0,0x9
0884 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0885 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0886 e802 | | Load 0x4,0x2
0887 e009 | | Load 0x0,0x9
0888 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0889 1819 | | Execute Package,Field_Execute,Field_Number 0x19
088a c803 | | Store 0x4,0x3
088b 00cf | | Action Mark_Auxiliary
088c 7818 |x | Jump 0x8a5
088d e804 | | Load 0x4,0x4
088e e5fc | | Load 0x2,-0x4
088f 4801 |H | Short_Literal 0x1
0890 4801 |H | Short_Literal 0x1
0891 e803 | | Load 0x4,0x3
0892 e009 | | Load 0x0,0x9
0893 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0894 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0895 e806 | | Load 0x4,0x6
0896 4807 |H | Short_Literal 0x7
0897 4804 |H | Short_Literal 0x4
0898 0099 | | Action Reference_Dynamic
0899 4808 |H | Short_Literal 0x8
089a 4804 |H | Short_Literal 0x4
089b 0099 | | Action Reference_Dynamic
089c e00f | | Load 0x0,0xf
089d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
089e c804 | | Store 0x4,0x4
089f e803 | | Load 0x4,0x3
08a0 e009 | | Load 0x0,0x9
08a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08a2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
08a3 c803 | | Store 0x4,0x3
08a4 00c9 | | Action Pop_Auxiliary_Loop
08a5 e803 | | Load 0x4,0x3
08a6 e009 | | Load 0x0,0x9
08a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08a8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
08a9 6fe3 |o | Jump_Zero 0x88d
08aa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
08ab 0000 0000 | | .BLANK 0000[0x5]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08bb | | .CONST 0x08bb ; Address of begin
08b1 0004 | | .CONST 0x0004 ; Address of exception handler
08b2 0004 | | .CONST 0x0004 ; Number of locals
08b3 INIT_08b0:
08b3 e009 | | Load 0x0,0x9
08b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08b5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
08b6 00ec | | Load_Encached Diana_Tree_Cache
08b7 02c7 | | Declare_Variable Any
08b8 00d8 | | Load_Top At_Offset_0
08b9 1c00 | | Execute_Immediate Run_Utility,0x0
08ba 00e1 | | Load_Encached Boolean_Cache
08bb BODY_08b0:
08bb 4800 |H | Short_Literal 0x0
08bc a9fd | | Store_Unchecked 0x4,-0x3
08bd e009 | | Load 0x0,0x9
08be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08bf 1b18 | | Execute Package,Field_Read,Field_Number 0x18
08c0 e9ff | | Load 0x4,-0x1
08c1 e009 | | Load 0x0,0x9
08c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
08c4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
08c5 00cf | | Action Mark_Auxiliary
08c6 783e |x> | Jump 0x905
08c7 00db | | Load_Top At_Offset_3
08c8 e009 | | Load 0x0,0x9
08c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ca 181b | | Execute Package,Field_Execute,Field_Number 0x1b
08cb c803 | | Store 0x4,0x3
08cc e9fe | | Load 0x4,-0x2
08cd 6802 |h | Jump_Zero 0x8d0
08ce 00da | | Load_Top At_Offset_2
08cf c602 | | Store 0x3,0x2
08d0 00da | | Load_Top At_Offset_2
08d1 e604 | | Load 0x3,0x4
08d2 012f | / | Execute Any,Equal
08d3 6809 |h | Jump_Zero 0x8dd
08d4 4801 |H | Short_Literal 0x1
08d5 a9fd | | Store_Unchecked 0x4,-0x3
08d6 e7ff | | Load 0x3,-0x1
08d7 e602 | | Load 0x3,0x2
08d8 e009 | | Load 0x0,0x9
08d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08da 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08db c7ff | | Store 0x3,-0x1
08dc 7822 |x" | Jump 0x8ff
08dd 00da | | Load_Top At_Offset_2
08de e40f | | Load 0x2,0xf
08df e009 | | Load 0x0,0x9
08e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08e1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08e2 6801 |h | Jump_Zero 0x8e4
08e3 781b |x | Jump 0x8ff
08e4 e40f | | Load 0x2,0xf
08e5 00db | | Load_Top At_Offset_3
08e6 e009 | | Load 0x0,0x9
08e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08e9 c40f | | Store 0x2,0xf
08ea 00e1 | | Load_Encached Boolean_Cache
08eb 4800 |H | Short_Literal 0x0
08ec e803 | | Load 0x4,0x3
08ed 841c | | Call 0x2,0x1c
08ee 8605 | | Call 0x3,0x5
08ef 005a | Z | Store_Top Discrete,At_Offset_2
08f0 00d9 | | Load_Top At_Offset_1
08f1 680d |h | Jump_Zero 0x8ff
08f2 e012 | | Load 0x0,0x12
08f3 180e | | Execute Package,Field_Execute,Field_Number 0xe
08f4 4802 |H | Short_Literal 0x2
08f5 0092 0b64 | d| Action Push_String_Extended,0xb64 ; "Promotion prerequisites: The following unit is involved in a circular dependency problem due to generic instantiations: "
08f7 e803 | | Load 0x4,0x3
08f8 e001 | | Load 0x0,0x1
08f9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08fa 01cc | | Execute Vector,Catenate
08fb e016 | | Load 0x0,0x16
08fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08fd 4801 |H | Short_Literal 0x1
08fe a9fd | | Store_Unchecked 0x4,-0x3
08ff 00db | | Load_Top At_Offset_3
0900 e009 | | Load 0x0,0x9
0901 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0902 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0903 c802 | | Store 0x4,0x2
0904 00c9 | | Action Pop_Auxiliary_Loop
0905 00db | | Load_Top At_Offset_3
0906 e009 | | Load 0x0,0x9
0907 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0908 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0909 6fbd |o | Jump_Zero 0x8c7
090a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
090b 0000 0000 | | .BLANK 0000[0x5]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0916 | | .CONST 0x0916 ; Address of begin
0911 0004 | | .CONST 0x0004 ; Address of exception handler
0912 0002 | | .CONST 0x0002 ; Number of locals
0913 INIT_0910:
0913 e009 | | Load 0x0,0x9
0914 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0915 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0916 BODY_0910:
0916 e009 | | Load 0x0,0x9
0917 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0918 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0919 e7ff | | Load 0x3,-0x1
091a e009 | | Load 0x0,0x9
091b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
091c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
091d 0031 | 1 | Store_Top Heap_Access,At_Offset_1
091e 00cf | | Action Mark_Auxiliary
091f 780f |x | Jump 0x92f
0920 e411 | | Load 0x2,0x11
0921 00da | | Load_Top At_Offset_2
0922 e009 | | Load 0x0,0x9
0923 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0924 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0925 e009 | | Load 0x0,0x9
0926 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0927 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0928 c411 | | Store 0x2,0x11
0929 00d9 | | Load_Top At_Offset_1
092a e009 | | Load 0x0,0x9
092b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
092c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
092d 0032 | 2 | Store_Top Heap_Access,At_Offset_2
092e 00c9 | | Action Pop_Auxiliary_Loop
092f 00d9 | | Load_Top At_Offset_1
0930 e009 | | Load 0x0,0x9
0931 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0932 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0933 6fec |o | Jump_Zero 0x920
0934 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0935 0000 0000 | | .XXX[0x3]
0937 0000 | |
0938 ; --------------------------------------------------------------------------------------
0938 ; SUBPROGRAM
0938 ; --------------------------------------------------------------------------------------
0938 0954 | T | .CONST 0x0954 ; Address of begin
0939 0004 | | .CONST 0x0004 ; Address of exception handler
093a 0007 | | .CONST 0x0007 ; Number of locals
093b INIT_0938:
093b e00e | | Load 0x0,0xe
093c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
093d 02c7 | | Declare_Variable Any
093e 00db | | Load_Top At_Offset_3
093f 0217 | | Execute Heap_Access,All_Reference
0940 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0941 e00e | | Load 0x0,0xe
0942 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0943 a802 | | Store_Unchecked 0x4,0x2
0944 e00e | | Load 0x0,0xe
0945 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0946 02c7 | | Declare_Variable Any
0947 00d8 | | Load_Top At_Offset_0
0948 1c00 | | Execute_Immediate Run_Utility,0x0
0949 00e1 | | Load_Encached Boolean_Cache
094a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
094b e00e | | Load 0x0,0xe
094c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
094d 02c7 | | Declare_Variable Any
094e 00d8 | | Load_Top At_Offset_0
094f 1c00 | | Execute_Immediate Run_Utility,0x0
0950 029f 0a9b | | Declare_Subprogram INIT_0a98,For_Call
0952 029f 0abb | | Declare_Subprogram INIT_0ab8,For_Call
0954 BODY_0938:
0954 e802 | | Load 0x4,0x2
0955 e00e | | Load 0x0,0xe
0956 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0957 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0958 a608 | | Store_Unchecked 0x3,0x8
0959 8806 | | Call 0x4,0x6
095a c803 | | Store 0x4,0x3
095b e803 | | Load 0x4,0x3
095c e00e | | Load 0x0,0xe
095d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
095e 012f | / | Execute Any,Equal
095f 701d |p | Jump_Nonzero 0x97d
0960 8807 | | Call 0x4,0x7
0961 c805 | | Store 0x4,0x5
0962 00da | | Load_Top At_Offset_2
0963 e00e | | Load 0x0,0xe
0964 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0965 012f | / | Execute Any,Equal
0966 7016 |p | Jump_Nonzero 0x97d
0967 00da | | Load_Top At_Offset_2
0968 e605 | | Load 0x3,0x5
0969 012e | . | Execute Any,Not_Equal
096a 6812 |h | Jump_Zero 0x97d
096b e5fa | | Load 0x2,-0x6
096c 0e01 | | Execute_Immediate Not_Equal,0x1
096d 6809 |h | Jump_Zero 0x977
096e 00da | | Load_Top At_Offset_2
096f e00e | | Load 0x0,0xe
0970 1b6e | n | Execute Package,Field_Read,Field_Number 0x6e
0971 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0972 e001 | | Load 0x0,0x1
0973 180d | | Execute Package,Field_Execute,Field_Number 0xd
0974 e9ff | | Load 0x4,-0x1
0975 0217 | | Execute Heap_Access,All_Reference
0976 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0977 00da | | Load_Top At_Offset_2
0978 e00e | | Load 0x0,0xe
0979 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
097a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
097b 0f04 | | Execute_Immediate Equal,0x4
097c a607 | | Store_Unchecked 0x3,0x7
097d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
097e 0000 0000 | | .XXX[0x2]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0987 | | .CONST 0x0987 ; Address of begin
0981 0004 | | .CONST 0x0004 ; Address of exception handler
0982 0002 | | .CONST 0x0002 ; Number of locals
0983 INIT_0980:
0983 e216 | | Load 0x1,0x16
0984 0322 | " | Declare_Variable Record
0985 00d8 | | Load_Top At_Offset_0
0986 1c00 | | Execute_Immediate Run_Utility,0x0
0987 BODY_0980:
0987 e603 | | Load 0x3,0x3
0988 e009 | | Load 0x0,0x9
0989 1b0d | | Execute Package,Field_Read,Field_Number 0xd
098a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
098b c604 | | Store 0x3,0x4
098c e604 | | Load 0x3,0x4
098d e410 | | Load 0x2,0x10
098e e009 | | Load 0x0,0x9
098f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0990 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0991 6804 |h | Jump_Zero 0x996
0992 4801 |H | Short_Literal 0x1
0993 00d9 | | Load_Top At_Offset_1
0994 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0995 7828 |x( | Jump 0x9be
0996 e410 | | Load 0x2,0x10
0997 e604 | | Load 0x3,0x4
0998 e009 | | Load 0x0,0x9
0999 1b0d | | Execute Package,Field_Read,Field_Number 0xd
099a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
099b c410 | | Store 0x2,0x10
099c 00d8 | | Load_Top At_Offset_0
099d e604 | | Load 0x3,0x4
099e 841c | | Call 0x2,0x1c
099f 8421 | ! | Call 0x2,0x21
09a0 00d1 | | Pop_Control Pop_Count_1
09a1 00d8 | | Load_Top At_Offset_0
09a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09a3 7014 |p | Jump_Nonzero 0x9b8
09a4 00d8 | | Load_Top At_Offset_0
09a5 e604 | | Load 0x3,0x4
09a6 841e | | Call 0x2,0x1e
09a7 8421 | ! | Call 0x2,0x21
09a8 00d1 | | Pop_Control Pop_Count_1
09a9 00d8 | | Load_Top At_Offset_0
09aa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09ab 680c |h | Jump_Zero 0x9b8
09ac 00d8 | | Load_Top At_Offset_0
09ad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09ae 6806 |h | Jump_Zero 0x9b5
09af e403 | | Load 0x2,0x3
09b0 e604 | | Load 0x3,0x4
09b1 8420 | | Call 0x2,0x20
09b2 00d9 | | Load_Top At_Offset_1
09b3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09b4 7803 |x | Jump 0x9b8
09b5 4800 |H | Short_Literal 0x0
09b6 00d9 | | Load_Top At_Offset_1
09b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09b8 e410 | | Load 0x2,0x10
09b9 e604 | | Load 0x3,0x4
09ba e009 | | Load 0x0,0x9
09bb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09bc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09bd c410 | | Store 0x2,0x10
09be 00d8 | | Load_Top At_Offset_0
09bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09c0 700d |p | Jump_Nonzero 0x9ce
09c1 4800 |H | Short_Literal 0x0
09c2 e5f9 | | Load 0x2,-0x7
09c3 e5fd | | Load 0x2,-0x3
09c4 e5fe | | Load 0x2,-0x2
09c5 e604 | | Load 0x3,0x4
09c6 8218 | | Call 0x1,0x18
09c7 c5f9 | | Store 0x2,-0x7
09c8 e40f | | Load 0x2,0xf
09c9 e604 | | Load 0x3,0x4
09ca e009 | | Load 0x0,0x9
09cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09cc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09cd c40f | | Store 0x2,0xf
09ce 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09cf 0000 | | .XXX[0x1]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09db | | .CONST 0x09db ; Address of begin
09d1 0004 | | .CONST 0x0004 ; Address of exception handler
09d2 0003 | | .CONST 0x0003 ; Number of locals
09d3 INIT_09d0:
09d3 e005 | | Load 0x0,0x5
09d4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
09d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09d6 02c7 | | Declare_Variable Any
09d7 00d8 | | Load_Top At_Offset_0
09d8 1c00 | | Execute_Immediate Run_Utility,0x0
09d9 e005 | | Load 0x0,0x5
09da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09db BODY_09d0:
09db e005 | | Load 0x0,0x5
09dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09dd 00da | | Load_Top At_Offset_2
09de 0120 | | Execute Any,Is_Value
09df 6804 |h | Jump_Zero 0x9e4
09e0 e005 | | Load 0x0,0x5
09e1 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
09e2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09e3 7801 |x | Jump 0x9e5
09e4 00da | | Load_Top At_Offset_2
09e5 e9ff | | Load 0x4,-0x1
09e6 e005 | | Load 0x0,0x5
09e7 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
09e8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
09e9 c802 | | Store 0x4,0x2
09ea 0059 | Y | Store_Top Discrete,At_Offset_1
09eb 00d8 | | Load_Top At_Offset_0
09ec 6801 |h | Jump_Zero 0x9ee
09ed 0887 | | Execute_Immediate Raise,0x87
09ee 00d9 | | Load_Top At_Offset_1
09ef e005 | | Load 0x0,0x5
09f0 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
09f1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09f3 0000 0000 | | .BLANK 0000[0x5]
09f8 ; --------------------------------------------------------------------------------------
09f8 ; SUBPROGRAM
09f8 ; --------------------------------------------------------------------------------------
09f8 0a01 | | .CONST 0x0a01 ; Address of begin
09f9 0004 | | .CONST 0x0004 ; Address of exception handler
09fa 0002 | | .CONST 0x0002 ; Number of locals
09fb INIT_09f8:
09fb e407 | | Load 0x2,0x7
09fc e009 | | Load 0x0,0x9
09fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09fe 181b | | Execute Package,Field_Execute,Field_Number 0x1b
09ff 00ec | | Load_Encached Diana_Tree_Cache
0a00 011e | | Execute Any,Convert
0a01 BODY_09f8:
0a01 00d8 | | Load_Top At_Offset_0
0a02 8602 | | Call 0x3,0x2
0a03 e01c | | Load 0x0,0x1c
0a04 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a05 7017 |p | Jump_Nonzero 0xa1d
0a06 e012 | | Load 0x0,0x12
0a07 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a08 4800 |H | Short_Literal 0x0
0a09 00da | | Load_Top At_Offset_2
0a0a 8602 | | Call 0x3,0x2
0a0b e01c | | Load 0x0,0x1c
0a0c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a0d e01c | | Load 0x0,0x1c
0a0e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a0f 700d |p | Jump_Nonzero 0xa1d
0a10 0092 0b65 | e| Action Push_String_Extended,0xb65 ; " as body surrogate"
0a12 00d9 | | Load_Top At_Offset_1
0a13 0092 0b66 | f| Action Push_String_Extended,0xb66 ; "GENERIC SOURCE "
0a15 8217 | | Call 0x1,0x17
0a16 4801 |H | Short_Literal 0x1
0a17 e5f9 | | Load 0x2,-0x7
0a18 e5fd | | Load 0x2,-0x3
0a19 e5fe | | Load 0x2,-0x2
0a1a e802 | | Load 0x4,0x2
0a1b 8218 | | Call 0x1,0x18
0a1c c5f9 | | Store 0x2,-0x7
0a1d e407 | | Load 0x2,0x7
0a1e e009 | | Load 0x0,0x9
0a1f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a20 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0a21 c407 | | Store 0x2,0x7
0a22 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a23 0000 0000 | | .BLANK 0000[0x5]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a31 | 1 | .CONST 0x0a31 ; Address of begin
0a29 0004 | | .CONST 0x0004 ; Address of exception handler
0a2a 0002 | | .CONST 0x0002 ; Number of locals
0a2b INIT_0a28:
0a2b e407 | | Load 0x2,0x7
0a2c e009 | | Load 0x0,0x9
0a2d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a2e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0a2f 00ec | | Load_Encached Diana_Tree_Cache
0a30 011e | | Execute Any,Convert
0a31 BODY_0a28:
0a31 e409 | | Load 0x2,0x9
0a32 6804 |h | Jump_Zero 0xa37
0a33 00d8 | | Load_Top At_Offset_0
0a34 e40a | | Load 0x2,0xa
0a35 012f | / | Execute Any,Equal
0a36 700b |p | Jump_Nonzero 0xa42
0a37 e40e | | Load 0x2,0xe
0a38 e40d | | Load 0x2,0xd
0a39 00da | | Load_Top At_Offset_2
0a3a e001 | | Load 0x0,0x1
0a3b 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a3c 4976 |Iv | Short_Literal 0x176
0a3d 00eb | | Load_Encached Diana_Cache
0a3e 0098 | | Execute Package,Field_Read_Dynamic
0a3f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a40 e018 | | Load 0x0,0x18
0a41 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0a42 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a43 0000 0000 | | .BLANK 0000[0x5]
0a48 ; --------------------------------------------------------------------------------------
0a48 ; SUBPROGRAM
0a48 ; --------------------------------------------------------------------------------------
0a48 0a51 | Q | .CONST 0x0a51 ; Address of begin
0a49 0004 | | .CONST 0x0004 ; Address of exception handler
0a4a 0002 | | .CONST 0x0002 ; Number of locals
0a4b INIT_0a48:
0a4b e407 | | Load 0x2,0x7
0a4c e009 | | Load 0x0,0x9
0a4d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a4e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0a4f 00ec | | Load_Encached Diana_Tree_Cache
0a50 011e | | Execute Any,Convert
0a51 BODY_0a48:
0a51 e409 | | Load 0x2,0x9
0a52 6804 |h | Jump_Zero 0xa57
0a53 00d8 | | Load_Top At_Offset_0
0a54 e40a | | Load 0x2,0xa
0a55 012f | / | Execute Any,Equal
0a56 700c |p | Jump_Nonzero 0xa63
0a57 00ea | | Load_Encached Null_String_Cache
0a58 00d9 | | Load_Top At_Offset_1
0a59 0092 0b67 | g| Action Push_String_Extended,0xb67 ; "GENERIC SOURCE"
0a5b 8217 | | Call 0x1,0x17
0a5c 4800 |H | Short_Literal 0x0
0a5d e5f9 | | Load 0x2,-0x7
0a5e e5fd | | Load 0x2,-0x3
0a5f e5fe | | Load 0x2,-0x2
0a60 e802 | | Load 0x4,0x2
0a61 8218 | | Call 0x1,0x18
0a62 c5f9 | | Store 0x2,-0x7
0a63 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a64 0000 0000 | | .BLANK 0000[0x4]
0a68 ; --------------------------------------------------------------------------------------
0a68 ; SUBPROGRAM
0a68 ; --------------------------------------------------------------------------------------
0a68 0a6b | k | .CONST 0x0a6b ; Address of begin
0a69 0004 | | .CONST 0x0004 ; Address of exception handler
0a6a 0001 | | .CONST 0x0001 ; Number of locals
0a6b BODY_0a68:
0a6b INIT_0a68:
0a6b e40b | | Load 0x2,0xb
0a6c e00c | | Load 0x0,0xc
0a6d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0a6e 7004 |p | Jump_Nonzero 0xa73
0a6f e40b | | Load 0x2,0xb
0a70 e00c | | Load 0x0,0xc
0a71 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a72 00ca | | Action Exit_Nullary_Function
0a73 e40c | | Load 0x2,0xc
0a74 e00e | | Load 0x0,0xe
0a75 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0a76 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a77 e00c | | Load 0x0,0xc
0a78 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a79 00ca | | Action Exit_Nullary_Function
0a7a 0000 0000 | | .BLANK 0000[0x6]
0a80 ; --------------------------------------------------------------------------------------
0a80 ; SUBPROGRAM
0a80 ; --------------------------------------------------------------------------------------
0a80 0a83 | | .CONST 0x0a83 ; Address of begin
0a81 0004 | | .CONST 0x0004 ; Address of exception handler
0a82 0001 | | .CONST 0x0001 ; Number of locals
0a83 BODY_0a80:
0a83 INIT_0a80:
0a83 00da | | Load_Top At_Offset_2
0a84 4803 |H | Short_Literal 0x3
0a85 4805 |H | Short_Literal 0x5
0a86 0262 | b | Execute Discrete,In_Range
0a87 700c |p | Jump_Nonzero 0xa94
0a88 7800 |x | Jump 0xa89
0a89 e5fc | | Load 0x2,-0x4
0a8a ebfe | | Load 0x5,-0x2
0a8b e001 | | Load 0x0,0x1
0a8c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a8d 7006 |p | Jump_Nonzero 0xa94
0a8e e602 | | Load 0x3,0x2
0a8f ebfe | | Load 0x5,-0x2
0a90 e009 | | Load 0x0,0x9
0a91 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a92 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a93 c602 | | Store 0x3,0x2
0a94 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a95 0000 0000 | | .XXX[0x3]
0a97 0000 | |
0a98 ; --------------------------------------------------------------------------------------
0a98 ; SUBPROGRAM
0a98 ; --------------------------------------------------------------------------------------
0a98 0aa0 | | .CONST 0x0aa0 ; Address of begin
0a99 0004 | | .CONST 0x0004 ; Address of exception handler
0a9a 0002 | | .CONST 0x0002 ; Number of locals
0a9b INIT_0a98:
0a9b e00e | | Load 0x0,0xe
0a9c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a9d 02c7 | | Declare_Variable Any
0a9e 00d8 | | Load_Top At_Offset_0
0a9f 1c00 | | Execute_Immediate Run_Utility,0x0
0aa0 BODY_0a98:
0aa0 e608 | | Load 0x3,0x8
0aa1 6808 |h | Jump_Zero 0xaaa
0aa2 4800 |H | Short_Literal 0x0
0aa3 e802 | | Load 0x4,0x2
0aa4 e40c | | Load 0x2,0xc
0aa5 e00e | | Load 0x0,0xe
0aa6 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
0aa7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0aa8 ca02 | | Store 0x5,0x2
0aa9 7802 |x | Jump 0xaac
0aaa e802 | | Load 0x4,0x2
0aab ca02 | | Store 0x5,0x2
0aac 00d8 | | Load_Top At_Offset_0
0aad e00e | | Load 0x0,0xe
0aae 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0aaf 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ab0 00ca | | Action Exit_Nullary_Function
0ab1 0000 0000 | | .BLANK 0000[0x7]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0abf | | .CONST 0x0abf ; Address of begin
0ab9 0004 | | .CONST 0x0004 ; Address of exception handler
0aba 0003 | | .CONST 0x0003 ; Number of locals
0abb INIT_0ab8:
0abb 029f 0ad3 | | Declare_Subprogram INIT_0ad0,For_Call
0abd 029f 0af3 | | Declare_Subprogram INIT_0af0,For_Call
0abf BODY_0ab8:
0abf e803 | | Load 0x4,0x3
0ac0 8a02 | | Call 0x5,0x2
0ac1 6807 |h | Jump_Zero 0xac9
0ac2 e803 | | Load 0x4,0x3
0ac3 00d8 | | Load_Top At_Offset_0
0ac4 0120 | | Execute Any,Is_Value
0ac5 7002 |p | Jump_Nonzero 0xac8
0ac6 00d8 | | Load_Top At_Offset_0
0ac7 011e | | Execute Any,Convert
0ac8 00ca | | Action Exit_Nullary_Function
0ac9 e803 | | Load 0x4,0x3
0aca 8a03 | | Call 0x5,0x3
0acb 00ca | | Action Exit_Nullary_Function
0acc 0000 0000 | | .BLANK 0000[0x4]
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad9 | | .CONST 0x0ad9 ; Address of begin
0ad1 0004 | | .CONST 0x0004 ; Address of exception handler
0ad2 0002 | | .CONST 0x0002 ; Number of locals
0ad3 INIT_0ad0:
0ad3 00da | | Load_Top At_Offset_2
0ad4 e018 | | Load 0x0,0x18
0ad5 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ad6 e018 | | Load 0x0,0x18
0ad7 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0ad8 0216 | | Execute Heap_Access,Convert
0ad9 BODY_0ad0:
0ad9 00cf | | Action Mark_Auxiliary
0ada 780f |x | Jump 0xaea
0adb 00d9 | | Load_Top At_Offset_1
0adc 0217 | | Execute Heap_Access,All_Reference
0add 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ade e9ff | | Load 0x4,-0x1
0adf 0217 | | Execute Heap_Access,All_Reference
0ae0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0ae1 027f | | Execute Discrete,Equal
0ae2 6802 |h | Jump_Zero 0xae5
0ae3 4801 |H | Short_Literal 0x1
0ae4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ae5 00d9 | | Load_Top At_Offset_1
0ae6 0217 | | Execute Heap_Access,All_Reference
0ae7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ae8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0ae9 00c9 | | Action Pop_Auxiliary_Loop
0aea 00d9 | | Load_Top At_Offset_1
0aeb 77ef |w | Jump_Nonzero 0xadb
0aec 00ce | | Action Pop_Auxiliary
0aed 4800 |H | Short_Literal 0x0
0aee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0aef 0000 | | .XXX[0x1]
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0b09 | | .CONST 0x0b09 ; Address of begin
0af1 0004 | | .CONST 0x0004 ; Address of exception handler
0af2 0005 | | .CONST 0x0005 ; Number of locals
0af3 INIT_0af0:
0af3 00da | | Load_Top At_Offset_2
0af4 e00e | | Load 0x0,0xe
0af5 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0af6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0af7 00e3 | | Load_Encached Natural_Cache
0af8 03f1 | | Declare_Variable Discrete,With_Value
0af9 e00e | | Load 0x0,0xe
0afa 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0afb 02c7 | | Declare_Variable Any
0afc 00d8 | | Load_Top At_Offset_0
0afd 1c00 | | Execute_Immediate Run_Utility,0x0
0afe e00e | | Load 0x0,0xe
0aff 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b00 02c7 | | Declare_Variable Any
0b01 00d8 | | Load_Top At_Offset_0
0b02 1c00 | | Execute_Immediate Run_Utility,0x0
0b03 e00e | | Load 0x0,0xe
0b04 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b05 02c7 | | Declare_Variable Any
0b06 e00e | | Load 0x0,0xe
0b07 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b08 ac05 | | Store_Unchecked 0x6,0x5
0b09 BODY_0af0:
0b09 00db | | Load_Top At_Offset_3
0b0a 0c01 | | Execute_Immediate Greater_Equal,0x1
0b0b 6836 |h6 | Jump_Zero 0xb42
0b0c edff | | Load 0x6,-0x1
0b0d e00e | | Load 0x0,0xe
0b0e 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0b0f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b10 cc03 | | Store 0x6,0x3
0b11 00cf | | Action Mark_Auxiliary
0b12 7829 |x) | Jump 0xb3c
0b13 00db | | Load_Top At_Offset_3
0b14 e00e | | Load 0x0,0xe
0b15 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0b16 cc04 | | Store 0x6,0x4
0b17 00da | | Load_Top At_Offset_2
0b18 e00e | | Load 0x0,0xe
0b19 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0b1a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0b1b 0f03 | | Execute_Immediate Equal,0x3
0b1c 00db | | Load_Top At_Offset_3
0b1d e00e | | Load 0x0,0xe
0b1e 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0b1f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0b20 0f04 | | Execute_Immediate Equal,0x4
0b21 0278 | x | Execute Discrete,Or
0b22 6814 |h | Jump_Zero 0xb37
0b23 00da | | Load_Top At_Offset_2
0b24 8a02 | | Call 0x5,0x2
0b25 6802 |h | Jump_Zero 0xb28
0b26 00da | | Load_Top At_Offset_2
0b27 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b28 00da | | Load_Top At_Offset_2
0b29 8a03 | | Call 0x5,0x3
0b2a cc05 | | Store 0x6,0x5
0b2b 00d9 | | Load_Top At_Offset_1
0b2c e00e | | Load 0x0,0xe
0b2d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b2e 012f | / | Execute Any,Equal
0b2f 7002 |p | Jump_Nonzero 0xb32
0b30 00d9 | | Load_Top At_Offset_1
0b31 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b32 00db | | Load_Top At_Offset_3
0b33 e00e | | Load 0x0,0xe
0b34 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0b35 cc03 | | Store 0x6,0x3
0b36 7804 |x | Jump 0xb3b
0b37 00db | | Load_Top At_Offset_3
0b38 e00e | | Load 0x0,0xe
0b39 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0b3a cc03 | | Store 0x6,0x3
0b3b 00c9 | | Action Pop_Auxiliary_Loop
0b3c 00db | | Load_Top At_Offset_3
0b3d e00e | | Load 0x0,0xe
0b3e 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0b3f 012f | / | Execute Any,Equal
0b40 6fd2 |o | Jump_Zero 0xb13
0b41 00ce | | Action Pop_Auxiliary
0b42 00d8 | | Load_Top At_Offset_0
0b43 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b44 ; --------------------------------------------------------------------------------------
0b44 ; STRING TABLE
0b44 ; --------------------------------------------------------------------------------------
0b44 004a | J | .STRTAB 0x004a->0x0b69 ; "WITH"
0b45 004c | L | .STRTAB 0x004c->0x0b6b ; "SPEC"
0b46 004e | N | .STRTAB 0x004e->0x0b6d ; "PARENT"
0b47 0052 | R | .STRTAB 0x0052->0x0b70 ; "as body surrogate"
0b48 0061 | a | .STRTAB 0x0061->0x0b78 ; "SUBUNIT"
0b49 0066 | f | .STRTAB 0x0066->0x0b7c ; "Cc_Instance.Cg_Coupler.Need_Ops"
0b4a 0083 | | .STRTAB 0x0083->0x0b8b ; "Referencing expander is non-existent"
0b4b 00a5 | | .STRTAB 0x00a5->0x0b9d ; "Referencing main program is non-existent"
0b4c 00cb | | .STRTAB 0x00cb->0x0bb1 ; "Specifying "
0b4d 00d4 | | .STRTAB 0x00d4->0x0bb7 ; " need: "
0b4e 00d9 | | .STRTAB 0x00d9->0x0bba ; " "
0b4f 00d8 | | .STRTAB 0x00d8->0x0bbb ; "BODY"
0b50 00da | | .STRTAB 0x00da->0x0bbd ; "Process_Unit of "
0b51 00e8 | | .STRTAB 0x00e8->0x0bc5 ; ";Kind = "
0b52 00ee | | .STRTAB 0x00ee->0x0bc9 ; ", Unit_State = "
0b53 00fb | | .STRTAB 0x00fb->0x0bd0 ; "Bad directory status "
0b54 010e | | .STRTAB 0x010e->0x0bdb ; "Coded unit "
0b55 0117 | | .STRTAB 0x0117->0x0be0 ; "Added to set of already coded unit"
0b56 0137 | 7 | .STRTAB 0x0137->0x0bf1 ; "Installed unit "
0b57 0144 | D | .STRTAB 0x0144->0x0bf9 ; "Added to set of uncoded units"
0b58 015f | _ | .STRTAB 0x015f->0x0c07 ; "Source unit "
0b59 0169 | i | .STRTAB 0x0169->0x0c0d ; " Added to set of missing units"
0b5a 0185 | | .STRTAB 0x0185->0x0c1c ; "Missing unit "
0b5b 0190 | | .STRTAB 0x0190->0x0c23 ; "Missing subunit "
0b5c 019e | | .STRTAB 0x019e->0x0c2b ; "Added to set of missing units"
0b5d 01b9 | | .STRTAB 0x01b9->0x0c39 ; "Removing circular dependencies of "
0b5e 01d9 | | .STRTAB 0x01d9->0x0c4a ; "Adding generic sources of "
0b5f 01f1 | | .STRTAB 0x01f1->0x0c57 ; "Start, Is_Generic_Subunit = "
0b60 020b | | .STRTAB 0x020b->0x0c65 ; "Processing instantiation "
0b61 0222 | " | .STRTAB 0x0222->0x0c72 ; "Need a parent of a generic subunit "
0b62 0243 | C | .STRTAB 0x0243->0x0c83 ; " added to set of uncoded units"
0b63 025f | _ | .STRTAB 0x025f->0x0c92 ; " added to set of coded units"
0b64 0279 | y | .STRTAB 0x0279->0x0ca0 ; "Promotion prerequisites: The following unit is involved in a circular dependency problem due to generic instantiations: "
0b65 02f1 | | .STRTAB 0x02f1->0x0cdd ; " as body surrogate"
0b66 0301 | | .STRTAB 0x0301->0x0ce6 ; "GENERIC SOURCE "
0b67 030e | | .STRTAB 0x030e->0x0cee ; "GENERIC SOURCE"
0b68 031a | | .STREND 0x031a->0x0cf5
0b69 5749 5448 |WITH| .STRTAB_STRINGS
0cf5 0000 0000 | | .XXX[0x3]
0cf7 0000 | |
0cf8 ; --------------------------------------------------------------------------------------
0cf8 ; Debug Table
0cf8 ; --------------------------------------------------------------------------------------
0cf8 0004 000e | | .DEBUG4 0x0004,0x000e,0xe9bf,0x0000,0x0001,0x0000
0cfe 9c00 583d | X=| .XXX[0x15]
0d00 0000 0000 | |
0d02 056b b801 | k |
0d04 5ecc 0057 |^ W|
0d06 7b00 0020 |{ |
0d08 88e0 058f | |
0d0a 2000 0000 | |
0d0c 0057 0380 | W |
0d0e 15fa c000 | |
0d10 084c a801 | L |
0d12 63c8 |c |
0d13 0000 0000 | | .BLANK 0000[0x4]
0d17 084c 2001 | L | .XXX[0x3]
0d19 63c8 |c |
0d1a 0000 0000 | | .BLANK 0000[0x4]
0d1e 0895 4000 | @ | .XXX[0x15]
0d20 0000 0000 | |
0d22 0000 162e | .|
0d24 8005 83d0 | |
0d26 0162 0800 | b |
0d28 0186 5000 | P |
0d2a 0000 0000 | |
0d2c 0900 00b2 | |
0d2e e800 0000 | |
0d30 0000 0000 | |
0d32 8000 | |
0d33 0000 0000 | | .BLANK 0000[0xc]
0d3f 00fe f100 | | .XXX[0x6]
0d41 0000 0000 | |
0d43 00f3 3600 | 6 |
0d45 0000 0000 | | .BLANK 0000[0x20]
0d65 0106 c300 | | .XXX[0x2]
0d67 0000 0000 | | .BLANK 0000[0x4]
0d6b 00e7 7b00 | { | .XXX[0x2]
0d6d 0000 0000 | | .BLANK 0000[0x8]
0d75 00f7 1f00 | | .XXX[0x2]
0d77 0000 0000 | | .BLANK 0000[0x4a]
0dc1 00eb 6400 | d | .XXX[0x2]
0dc3 0000 0000 | | .BLANK 0000[0xe]
0dd1 0102 da00 | | .XXX[0x2]
0dd3 0000 0000 | | .BLANK 0000[0x24]
0df7 00fb 0800 | | .XXX[0x2]
0df9 0000 0000 | | .BLANK 0000[0x7]