|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_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 05f0 | | .CONST 0x05f0 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0054 | T | .CONST 0x0054 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0024 | $ | .CONST 0x0024 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
000e 0129 | ) | Execute Any,Make_Visible
000f 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
0011 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
0013 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
0015 4800 |H | Short_Literal 0x0
0016 4805 |H | Short_Literal 0x5
0017 029f 00e3 | | Declare_Subprogram INIT_00e0,For_Call
0019 03fe | | Declare_Type Discrete,Defined,Visible
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
001e c213 | | Store 0x1,0x13
001f 00bf | | Action Accept_Activation
0020 e002 | | Load 0x0,0x2
0021 190e | | Execute Package,Field_Reference,Field_Number 0xe
0022 0007 | | Action Break_Optional
0023 e002 | | Load 0x0,0x2
0024 190f | | Execute Package,Field_Reference,Field_Number 0xf
0025 0007 | | Action Break_Optional
0026 e003 | | Load 0x0,0x3
0027 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0028 e20d | | Load 0x1,0xd
0029 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call
002b 4802 |H | Short_Literal 0x2
002c 032d | - | Declare_Type Record,Defined
002d 029b 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Unelaborated
002f 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0030 00c7 | | Action Elaborate_Subprogram
0031 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0032 00c7 | | Action Elaborate_Subprogram
0033 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call
0035 e004 | | Load 0x0,0x4
0036 190d | | Execute Package,Field_Reference,Field_Number 0xd
0037 00c6 | | Action Check_Subprogram_Elaborated
0038 00da | | Load_Top At_Offset_2
0039 1d18 | | Execute_Immediate Reference_Lex_1,0x18
003a e005 | | Load 0x0,0x5
003b e006 | | Load 0x0,0x6
003c 4800 |H | Short_Literal 0x0
003d 0007 | | Action Break_Optional
003e 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003f 00c7 | | Action Elaborate_Subprogram
0040 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0041 00c7 | | Action Elaborate_Subprogram
0042 029d 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call
0044 029d 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call
0046 029d 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call
0048 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call
004a 029b 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Unelaborated
004c 029d 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call
004e 029d 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call
0050 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0051 00c7 | | Action Elaborate_Subprogram
0052 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0053 00c7 | | Action Elaborate_Subprogram
0054 BODY_0008:
0054 00bc | | Action Signal_Activated
0055 00bb | | Action Signal_Completion
0056 0000 0000 | | .XXX[0x2]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0067 | g | .CONST 0x0067 ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0005 | | .CONST 0x0005 ; Number of locals
005b INIT_0058:
005b 00ef | | Load_Encached Diana_Sequence_Cache
005c 02c7 | | Declare_Variable Any
005d 00d8 | | Load_Top At_Offset_0
005e 1c00 | | Execute_Immediate Run_Utility,0x0
005f 00ec | | Load_Encached Diana_Tree_Cache
0060 02c7 | | Declare_Variable Any
0061 00d8 | | Load_Top At_Offset_0
0062 1c00 | | Execute_Immediate Run_Utility,0x0
0063 e20d | | Load 0x1,0xd
0064 0007 | | Action Break_Optional
0065 029f 039b | | Declare_Subprogram INIT_0398,For_Call
0067 BODY_0058:
0067 e5ff | | Load 0x2,-0x1
0068 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0069 0fa8 | | Execute_Immediate Equal,-0x58
006a 7001 |p | Jump_Nonzero 0x6c
006b 0887 | | Execute_Immediate Raise,0x87
006c e001 | | Load 0x0,0x1
006d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
006f e007 | | Load 0x0,0x7
0070 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0071 e008 | | Load 0x0,0x8
0072 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0073 e001 | | Load 0x0,0x1
0074 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0075 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0076 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0077 e5ff | | Load 0x2,-0x1
0078 e009 | | Load 0x0,0x9
0079 18ad | | Execute Package,Field_Execute,Field_Number 0xad
007a c402 | | Store 0x2,0x2
007b 00cf | | Action Mark_Auxiliary
007c 7812 |x | Jump 0x8f
007d e402 | | Load 0x2,0x2
007e 00eb | | Load_Encached Diana_Cache
007f 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0080 c403 | | Store 0x2,0x3
0081 00db | | Load_Top At_Offset_3
0082 8405 | | Call 0x2,0x5
0083 6806 |h | Jump_Zero 0x8a
0084 00da | | Load_Top At_Offset_2
0085 e403 | | Load 0x2,0x3
0086 e001 | | Load 0x0,0x1
0087 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0088 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0089 0033 | 3 | Store_Top Heap_Access,At_Offset_3
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 77ec |w | Jump_Nonzero 0x7d
0091 00ce | | Action Pop_Auxiliary
0092 00d9 | | Load_Top At_Offset_1
0093 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0094 0000 0000 | | .BLANK 0000[0x4]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00db | | Load_Top At_Offset_3
009c 00db | | Load_Top At_Offset_3
009d 820e | | Call 0x1,0xe
009e 8210 | | Call 0x1,0x10
009f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00aa | | .CONST 0x00aa ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0003 | | .CONST 0x0003 ; Number of locals
00a3 INIT_00a0:
00a3 e216 | | Load 0x1,0x16
00a4 0322 | " | Declare_Variable Record
00a5 00d8 | | Load_Top At_Offset_0
00a6 1c00 | | Execute_Immediate Run_Utility,0x0
00a7 e001 | | Load 0x0,0x1
00a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a9 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00aa BODY_00a0:
00aa e001 | | Load 0x0,0x1
00ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ac 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00ad e007 | | Load 0x0,0x7
00ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00af e008 | | Load 0x0,0x8
00b0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00b1 e001 | | Load 0x0,0x1
00b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00b4 00da | | Load_Top At_Offset_2
00b5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00b6 e5fe | | Load 0x2,-0x2
00b7 00da | | Load_Top At_Offset_2
00b8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00b9 e001 | | Load 0x0,0x1
00ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bb 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00bc e5ff | | Load 0x2,-0x1
00bd e001 | | Load 0x0,0x1
00be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bf 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00c0 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00c1 00cf | | Action Mark_Auxiliary
00c2 780d |x | Jump 0xd0
00c3 00da | | Load_Top At_Offset_2
00c4 00da | | Load_Top At_Offset_2
00c5 e001 | | Load 0x0,0x1
00c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00c8 8217 | | Call 0x1,0x17
00c9 00d1 | | Pop_Control Pop_Count_1
00ca 00d9 | | Load_Top At_Offset_1
00cb e001 | | Load 0x0,0x1
00cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00cd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00ce 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00cf 00c9 | | Action Pop_Auxiliary_Loop
00d0 00d9 | | Load_Top At_Offset_1
00d1 e001 | | Load 0x0,0x1
00d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00d4 6fee |o | Jump_Zero 0xc3
00d5 00ce | | Action Pop_Auxiliary
00d6 00d9 | | Load_Top At_Offset_1
00d7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00d8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00d9 0000 0000 | | .BLANK 0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 4607 |F | Jump_Case 0x8
00e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00e5 7806 |x | Jump 0xec ; case 0x1
00e6 7809 |x | Jump 0xf0 ; case 0x2
00e7 780d |x | Jump 0xf5 ; case 0x3
00e8 7810 |x | Jump 0xf9 ; case 0x4
00e9 7811 |x | Jump 0xfb ; case 0x5
00ea 7812 |x | Jump 0xfd ; case 0x6
00eb 7815 |x | Jump 0x101 ; case 0x7
00ec 00da | | Load_Top At_Offset_2
00ed 0091 04ec | | Action Push_String_Extended_Indexed,0x4ec ; "CONTAINS_GENERIC_SPEC"
00ef 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00f0 00db | | Load_Top At_Offset_3
00f1 00db | | Load_Top At_Offset_3
00f2 00e0 | | Load_Encached Standard_Cache
00f3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00f4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00f5 00da | | Load_Top At_Offset_2
00f6 00e0 | | Load_Encached Standard_Cache
00f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00f8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00f9 00db | | Load_Top At_Offset_3
00fa 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00fb 00db | | Load_Top At_Offset_3
00fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00fd e211 | | Load 0x1,0x11
00fe 00dc | | Load_Top At_Offset_4
00ff 0267 | g | Execute Discrete,Predecessor
0100 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0101 e211 | | Load 0x1,0x11
0102 00dc | | Load_Top At_Offset_4
0103 0268 | h | Execute Discrete,Successor
0104 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0105 0000 0000 | | .XXX[0x3]
0107 0000 | |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0137 | 7 | .CONST 0x0137 ; Address of begin
0109 01b5 | | .CONST 0x01b5 ; Address of exception handler
010a 000c | | .CONST 0x000c ; Number of locals
010b INIT_0108:
010b e5fc | | Load 0x2,-0x4
010c 00eb | | Load_Encached Diana_Cache
010d 18f8 | | Execute Package,Field_Execute,Field_Number 0xf8
010e 00ec | | Load_Encached Diana_Tree_Cache
010f 011e | | Execute Any,Convert
0110 00d8 | | Load_Top At_Offset_0
0111 00eb | | Load_Encached Diana_Cache
0112 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
0113 4976 |Iv | Short_Literal 0x176
0114 00eb | | Load_Encached Diana_Cache
0115 0098 | | Execute Package,Field_Read_Dynamic
0116 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0117 00ec | | Load_Encached Diana_Tree_Cache
0118 011e | | Execute Any,Convert
0119 00ec | | Load_Encached Diana_Tree_Cache
011a 02c7 | | Declare_Variable Any
011b 00d8 | | Load_Top At_Offset_0
011c 1c00 | | Execute_Immediate Run_Utility,0x0
011d 00ec | | Load_Encached Diana_Tree_Cache
011e 02c7 | | Declare_Variable Any
011f 00d8 | | Load_Top At_Offset_0
0120 1c00 | | Execute_Immediate Run_Utility,0x0
0121 00ec | | Load_Encached Diana_Tree_Cache
0122 02c7 | | Declare_Variable Any
0123 00d8 | | Load_Top At_Offset_0
0124 1c00 | | Execute_Immediate Run_Utility,0x0
0125 00ec | | Load_Encached Diana_Tree_Cache
0126 02c7 | | Declare_Variable Any
0127 00d8 | | Load_Top At_Offset_0
0128 1c00 | | Execute_Immediate Run_Utility,0x0
0129 e00a | | Load 0x0,0xa
012a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
012b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012c 02c7 | | Declare_Variable Any
012d 00d8 | | Load_Top At_Offset_0
012e 1c00 | | Execute_Immediate Run_Utility,0x0
012f e00a | | Load 0x0,0xa
0130 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0131 029f 03bb | | Declare_Subprogram INIT_03b8,For_Call
0133 029f 03d3 | | Declare_Subprogram INIT_03d0,For_Call
0135 029f 0473 | s| Declare_Subprogram INIT_0470,For_Call
0137 BODY_0108:
0137 00ea | | Load_Encached Null_String_Cache
0138 e403 | | Load 0x2,0x3
0139 0092 04f2 | | Action Push_String_Extended,0x4f2 ; "Process_Generics_Units of "
013b 821e | | Call 0x1,0x1e
013c e403 | | Load 0x2,0x3
013d 4904 |I | Short_Literal 0x104
013e 00eb | | Load_Encached Diana_Cache
013f 0096 | | Execute Package,Entry
0140 c404 | | Store 0x2,0x4
0141 e5f9 | | Load 0x2,-0x7
0142 609d |` | Indirect_Literal Discrete,0x1e0,{0x00007fff, 0xffffffff}
0143 e403 | | Load 0x2,0x3
0144 e002 | | Load 0x0,0x2
0145 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0146 8214 | | Call 0x1,0x14
0147 c405 | | Store 0x2,0x5
0148 e404 | | Load 0x2,0x4
0149 7001 |p | Jump_Nonzero 0x14b
014a 0887 | | Execute_Immediate Raise,0x87
014b e404 | | Load 0x2,0x4
014c e00b | | Load 0x0,0xb
014d 180d | | Execute Package,Field_Execute,Field_Number 0xd
014e c407 | | Store 0x2,0x7
014f e5fa | | Load 0x2,-0x6
0150 6807 |h | Jump_Zero 0x158
0151 e407 | | Load 0x2,0x7
0152 e5fc | | Load 0x2,-0x4
0153 e00b | | Load 0x0,0xb
0154 180d | | Execute Package,Field_Execute,Field_Number 0xd
0155 012f | / | Execute Any,Equal
0156 6801 |h | Jump_Zero 0x158
0157 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0158 e5f8 | | Load 0x2,-0x8
0159 00d8 | | Load_Top At_Offset_0
015a 0120 | | Execute Any,Is_Value
015b 6803 |h | Jump_Zero 0x15f
015c e5fd | | Load 0x2,-0x3
015d 011e | | Execute Any,Convert
015e 7802 |x | Jump 0x161
015f e5fd | | Load 0x2,-0x3
0160 0119 | | Execute Any,Check_In_Formal_Type
0161 e407 | | Load 0x2,0x7
0162 4800 |H | Short_Literal 0x0
0163 85fe | | Call 0x2,-0x2
0164 c5f8 | | Store 0x2,-0x8
0165 e405 | | Load 0x2,0x5
0166 7006 |p | Jump_Nonzero 0x16d
0167 4801 |H | Short_Literal 0x1
0168 e404 | | Load 0x2,0x4
0169 8223 | # | Call 0x1,0x23
016a 6801 |h | Jump_Zero 0x16c
016b 840c | | Call 0x2,0xc
016c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
016d e5f8 | | Load 0x2,-0x8
016e 00d8 | | Load_Top At_Offset_0
016f 0120 | | Execute Any,Is_Value
0170 6803 |h | Jump_Zero 0x174
0171 e5fd | | Load 0x2,-0x3
0172 011e | | Execute Any,Convert
0173 7802 |x | Jump 0x176
0174 e5fd | | Load 0x2,-0x3
0175 0119 | | Execute Any,Check_In_Formal_Type
0176 e405 | | Load 0x2,0x5
0177 e00b | | Load 0x0,0xb
0178 180d | | Execute Package,Field_Execute,Field_Number 0xd
0179 4801 |H | Short_Literal 0x1
017a 85fe | | Call 0x2,-0x2
017b c5f8 | | Store 0x2,-0x8
017c e00a | | Load 0x0,0xa
017d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017e e406 | | Load 0x2,0x6
017f 0120 | | Execute Any,Is_Value
0180 6804 |h | Jump_Zero 0x185
0181 e00a | | Load 0x0,0xa
0182 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0183 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0184 7801 |x | Jump 0x186
0185 e406 | | Load 0x2,0x6
0186 e405 | | Load 0x2,0x5
0187 e00a | | Load 0x0,0xa
0188 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0189 181a | | Execute Package,Field_Execute,Field_Number 0x1a
018a c406 | | Store 0x2,0x6
018b c409 | | Store 0x2,0x9
018c 00db | | Load_Top At_Offset_3
018d 840a | | Call 0x2,0xa
018e e406 | | Load 0x2,0x6
018f 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0190 0fa8 | | Execute_Immediate Equal,-0x58
0191 6822 |h" | Jump_Zero 0x1b4
0192 e406 | | Load 0x2,0x6
0193 4976 |Iv | Short_Literal 0x176
0194 00eb | | Load_Encached Diana_Cache
0195 0098 | | Execute Package,Field_Read_Dynamic
0196 180f | | Execute Package,Field_Execute,Field_Number 0xf
0197 e405 | | Load 0x2,0x5
0198 00eb | | Load_Encached Diana_Cache
0199 18ec | | Execute Package,Field_Execute,Field_Number 0xec
019a 4976 |Iv | Short_Literal 0x176
019b 00eb | | Load_Encached Diana_Cache
019c 0098 | | Execute Package,Field_Read_Dynamic
019d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019e 012f | / | Execute Any,Equal
019f 6814 |h | Jump_Zero 0x1b4
01a0 e00a | | Load 0x0,0xa
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 e408 | | Load 0x2,0x8
01a3 0120 | | Execute Any,Is_Value
01a4 6804 |h | Jump_Zero 0x1a9
01a5 e00a | | Load 0x0,0xa
01a6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
01a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a8 7801 |x | Jump 0x1aa
01a9 e408 | | Load 0x2,0x8
01aa e406 | | Load 0x2,0x6
01ab e00a | | Load 0x0,0xa
01ac 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
01ad 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01ae c408 | | Store 0x2,0x8
01af c409 | | Store 0x2,0x9
01b0 00db | | Load_Top At_Offset_3
01b1 840a | | Call 0x2,0xa
01b2 e406 | | Load 0x2,0x6
01b3 840b | | Call 0x2,0xb
01b4 4508 |E | Exit_Suprogram New_Top_Offset 0x8
01b5 TRAP_0108:
01b5 e00c | | Load 0x0,0xc
01b6 010f | | Execute Exception,Equal
01b7 680e |h | Jump_Zero 0x1c6
01b8 e5f8 | | Load 0x2,-0x8
01b9 00d8 | | Load_Top At_Offset_0
01ba 0120 | | Execute Any,Is_Value
01bb 6803 |h | Jump_Zero 0x1bf
01bc e5fd | | Load 0x2,-0x3
01bd 011e | | Execute Any,Convert
01be 7802 |x | Jump 0x1c1
01bf e5fd | | Load 0x2,-0x3
01c0 0119 | | Execute Any,Check_In_Formal_Type
01c1 00ec | | Load_Encached Diana_Tree_Cache
01c2 4805 |H | Short_Literal 0x5
01c3 85fe | | Call 0x2,-0x2
01c4 c5f8 | | Store 0x2,-0x8
01c5 4508 |E | Exit_Suprogram New_Top_Offset 0x8
01c6 e00d | | Load 0x0,0xd
01c7 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c8 4801 |H | Short_Literal 0x1
01c9 0092 04f3 | | Action Push_String_Extended,0x4f3 ; "Generic_Utils.Process_Generics_Units caught "
01cb 4800 |H | Short_Literal 0x0
01cc 4801 |H | Short_Literal 0x1
01cd e00e | | Load 0x0,0xe
01ce 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01cf 01cc | | Execute Vector,Catenate
01d0 0092 04f4 | | Action Push_String_Extended,0x4f4 ; " at "
01d2 01cc | | Execute Vector,Catenate
01d3 4800 |H | Short_Literal 0x0
01d4 4801 |H | Short_Literal 0x1
01d5 e00e | | Load 0x0,0xe
01d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01d7 01cc | | Execute Vector,Catenate
01d8 0092 04f5 | | Action Push_String_Extended,0x4f5 ; "; continuing."
01da 01cc | | Execute Vector,Catenate
01db e00f | | Load 0x0,0xf
01dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01dd 4508 |E | Exit_Suprogram New_Top_Offset 0x8
01de 0000 0000 | | .XXX[0x2]
01e0 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
01e4 0000 0000 | | .BLANK 0000[0x4]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4608 |F | Jump_Case 0x9
01ec 7808 |x | Jump 0x1f5 ; case 0x0
01ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
01ee 780d |x | Jump 0x1fc ; case 0x2
01ef 780c |x | Jump 0x1fc ; case 0x3
01f0 780b |x | Jump 0x1fc ; case 0x4
01f1 780a |x | Jump 0x1fc ; case 0x5
01f2 7809 |x | Jump 0x1fc ; case 0x6
01f3 7808 |x | Jump 0x1fc ; case 0x7
01f4 7807 |x | Jump 0x1fc ; case 0x8
01f5 00da | | Load_Top At_Offset_2
01f6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01f7 0125 | % | Execute Any,Set_Constraint
01f8 00da | | Load_Top At_Offset_2
01f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01fa 1c00 | | Execute_Immediate Run_Utility,0x0
01fb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
01fc 0869 | i | Execute_Immediate Raise,0x69
01fd 0000 0000 | | .XXX[0x3]
01ff 0000 | |
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 00db | | Load_Top At_Offset_3
0204 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0205 00db | | Load_Top At_Offset_3
0206 e001 | | Load 0x0,0x1
0207 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0208 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0209 e5fe | | Load 0x2,-0x2
020a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
020b 00db | | Load_Top At_Offset_3
020c e5fe | | Load 0x2,-0x2
020d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
020e 6009 |` | Indirect_Literal Discrete,0x218,{0x00007fff, 0xffffffff}
020f e5ff | | Load 0x2,-0x1
0210 e002 | | Load 0x0,0x2
0211 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0212 e219 | | Load 0x1,0x19
0213 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0214 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0215 e004 | | Load 0x0,0x4
0216 180d | | Execute Package,Field_Execute,Field_Number 0xd
0217 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0218 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
021c 0000 0000 | | .BLANK 0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022b | + | .CONST 0x022b ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0003 | | .CONST 0x0003 ; Number of locals
0223 INIT_0220:
0223 00ec | | Load_Encached Diana_Tree_Cache
0224 02c7 | | Declare_Variable Any
0225 00d8 | | Load_Top At_Offset_0
0226 1c00 | | Execute_Immediate Run_Utility,0x0
0227 00ec | | Load_Encached Diana_Tree_Cache
0228 02c7 | | Declare_Variable Any
0229 00d8 | | Load_Top At_Offset_0
022a 1c00 | | Execute_Immediate Run_Utility,0x0
022b BODY_0220:
022b e5ff | | Load 0x2,-0x1
022c 0145 | E | Execute Heap_Access,Diana_Tree_Kind
022d 0f36 | 6 | Execute_Immediate Equal,0x36
022e 6815 |h | Jump_Zero 0x244
022f e5ff | | Load 0x2,-0x1
0230 00eb | | Load_Encached Diana_Cache
0231 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0232 c402 | | Store 0x2,0x2
0233 00d9 | | Load_Top At_Offset_1
0234 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0235 0f3e | > | Execute_Immediate Equal,0x3e
0236 6805 |h | Jump_Zero 0x23c
0237 00d9 | | Load_Top At_Offset_1
0238 00eb | | Load_Encached Diana_Cache
0239 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
023a c403 | | Store 0x2,0x3
023b 7804 |x | Jump 0x240
023c 00d9 | | Load_Top At_Offset_1
023d 00eb | | Load_Encached Diana_Cache
023e 18bf | | Execute Package,Field_Execute,Field_Number 0xbf
023f c403 | | Store 0x2,0x3
0240 e5fe | | Load 0x2,-0x2
0241 00d9 | | Load_Top At_Offset_1
0242 8217 | | Call 0x1,0x17
0243 00d1 | | Pop_Control Pop_Count_1
0244 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0245 0000 0000 | | .XXX[0x3]
0247 0000 | |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024d | M | .CONST 0x024d ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0002 | | .CONST 0x0002 ; Number of locals
024b INIT_0248:
024b 0092 04f6 | | Action Push_String_Extended,0x4f6 ; "Process_Generic_Units => "
024d BODY_0248:
024d e5fd | | Load 0x2,-0x3
024e 01db | | Execute Vector,Length
024f 700d |p | Jump_Nonzero 0x25d
0250 e00d | | Load 0x0,0xd
0251 180e | | Execute Package,Field_Execute,Field_Number 0xe
0252 4801 |H | Short_Literal 0x1
0253 00da | | Load_Top At_Offset_2
0254 e5ff | | Load 0x2,-0x1
0255 01cc | | Execute Vector,Catenate
0256 e5fe | | Load 0x2,-0x2
0257 e00b | | Load 0x0,0xb
0258 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0259 01cc | | Execute Vector,Catenate
025a e00f | | Load 0x0,0xf
025b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
025c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
025d e00d | | Load 0x0,0xd
025e 180e | | Execute Package,Field_Execute,Field_Number 0xe
025f 4801 |H | Short_Literal 0x1
0260 00da | | Load_Top At_Offset_2
0261 e5ff | | Load 0x2,-0x1
0262 01cc | | Execute Vector,Catenate
0263 e5fe | | Load 0x2,-0x2
0264 e00b | | Load 0x0,0xb
0265 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0266 01cc | | Execute Vector,Catenate
0267 0092 04f7 | | Action Push_String_Extended,0x4f7 ; ": "
0269 01cc | | Execute Vector,Catenate
026a e5fd | | Load 0x2,-0x3
026b 01cc | | Execute Vector,Catenate
026c e00f | | Load 0x0,0xf
026d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
026e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026f 0000 | | .XXX[0x1]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0279 | y | .CONST 0x0279 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0003 | | .CONST 0x0003 ; Number of locals
0273 INIT_0270:
0273 00ec | | Load_Encached Diana_Tree_Cache
0274 02c7 | | Declare_Variable Any
0275 00d8 | | Load_Top At_Offset_0
0276 1c00 | | Execute_Immediate Run_Utility,0x0
0277 029f 04ab | | Declare_Subprogram INIT_04a8,For_Call
0279 BODY_0270:
0279 8403 | | Call 0x2,0x3
027a 00d9 | | Load_Top At_Offset_1
027b 021d | | Execute Heap_Access,Is_Null
027c 0f00 | | Execute_Immediate Equal,0x0
027d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
027e 0000 0000 | | .XXX[0x2]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 00db | | Load_Top At_Offset_3
0284 6803 |h | Jump_Zero 0x288
0285 00da | | Load_Top At_Offset_2
0286 821f | | Call 0x1,0x1f
0287 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0288 4800 |H | Short_Literal 0x0
0289 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
028a 0000 0000 | | .BLANK 0000[0x6]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0297 | | .CONST 0x0297 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0002 | | .CONST 0x0002 ; Number of locals
0293 INIT_0290:
0293 00ec | | Load_Encached Diana_Tree_Cache
0294 02c7 | | Declare_Variable Any
0295 00db | | Load_Top At_Offset_3
0296 a402 | | Store_Unchecked 0x2,0x2
0297 BODY_0290:
0297 00d8 | | Load_Top At_Offset_0
0298 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0299 0f7c | | | Execute_Immediate Equal,0x7c
029a 680d |h | Jump_Zero 0x2a8
029b 00d8 | | Load_Top At_Offset_0
029c 00eb | | Load_Encached Diana_Cache
029d 18ec | | Execute Package,Field_Execute,Field_Number 0xec
029e 6805 |h | Jump_Zero 0x2a4
029f 00d8 | | Load_Top At_Offset_0
02a0 00eb | | Load_Encached Diana_Cache
02a1 18ec | | Execute Package,Field_Execute,Field_Number 0xec
02a2 c402 | | Store 0x2,0x2
02a3 7804 |x | Jump 0x2a8
02a4 00d8 | | Load_Top At_Offset_0
02a5 e009 | | Load 0x0,0x9
02a6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02a7 c402 | | Store 0x2,0x2
02a8 00d8 | | Load_Top At_Offset_0
02a9 4976 |Iv | Short_Literal 0x176
02aa 00eb | | Load_Encached Diana_Cache
02ab 0098 | | Execute Package,Field_Read_Dynamic
02ac 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ae 0000 0000 | | .XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 00db | | Load_Top At_Offset_3
02b4 00db | | Load_Top At_Offset_3
02b5 00eb | | Load_Encached Diana_Cache
02b6 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
02b7 8224 | $ | Call 0x1,0x24
02b8 7006 |p | Jump_Nonzero 0x2bf
02b9 00db | | Load_Top At_Offset_3
02ba 00db | | Load_Top At_Offset_3
02bb 00eb | | Load_Encached Diana_Cache
02bc 18be | | Execute Package,Field_Execute,Field_Number 0xbe
02bd 8224 | $ | Call 0x1,0x24
02be 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02bf 4801 |H | Short_Literal 0x1
02c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02c1 0000 0000 | | .BLANK 0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cf | | .CONST 0x02cf ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0002 | | .CONST 0x0002 ; Number of locals
02cb INIT_02c8:
02cb 00ec | | Load_Encached Diana_Tree_Cache
02cc 02c7 | | Declare_Variable Any
02cd 00d8 | | Load_Top At_Offset_0
02ce 1c00 | | Execute_Immediate Run_Utility,0x0
02cf BODY_02c8:
02cf 00db | | Load_Top At_Offset_3
02d0 0145 | E | Execute Heap_Access,Diana_Tree_Kind
02d1 00d8 | | Load_Top At_Offset_0
02d2 0d3e | > | Execute_Immediate Less,0x3e
02d3 7010 |p | Jump_Nonzero 0x2e4
02d4 00d8 | | Load_Top At_Offset_0
02d5 0c42 | B | Execute_Immediate Greater_Equal,0x42
02d6 7005 |p | Jump_Nonzero 0x2dc
02d7 0b3e | > | Execute_Immediate Case_Compare,0x3e
02d8 700e |p | Jump_Nonzero 0x2e7
02d9 0f41 | A | Execute_Immediate Equal,0x41
02da 7030 |p0 | Jump_Nonzero 0x30b
02db 7809 |x | Jump 0x2e5
02dc 00d8 | | Load_Top At_Offset_0
02dd 487a |Hz | Short_Literal 0x7a
02de 487b |H{ | Short_Literal 0x7b
02df 0262 | b | Execute Discrete,In_Range
02e0 7045 |pE | Jump_Nonzero 0x326
02e1 0f7c | | | Execute_Immediate Equal,0x7c
02e2 7046 |pF | Jump_Nonzero 0x329
02e3 7801 |x | Jump 0x2e5
02e4 00d1 | | Pop_Control Pop_Count_1
02e5 4800 |H | Short_Literal 0x0
02e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02e7 00d1 | | Pop_Control Pop_Count_1
02e8 00db | | Load_Top At_Offset_3
02e9 00eb | | Load_Encached Diana_Cache
02ea 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8
02eb 0145 | E | Execute Heap_Access,Diana_Tree_Kind
02ec 0b77 | w | Execute_Immediate Case_Compare,0x77
02ed 7004 |p | Jump_Nonzero 0x2f2
02ee 0f7c | | | Execute_Immediate Equal,0x7c
02ef 7003 |p | Jump_Nonzero 0x2f3
02f0 4800 |H | Short_Literal 0x0
02f1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02f2 00d1 | | Pop_Control Pop_Count_1
02f3 e003 | | Load 0x0,0x3
02f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f5 603e |`> | Indirect_Literal Discrete,0x334,{0x00000000, 0x00004000}
02f6 e5ff | | Load 0x2,-0x1
02f7 00eb | | Load_Encached Diana_Cache
02f8 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
02f9 e002 | | Load 0x0,0x2
02fa 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02fb c402 | | Store 0x2,0x2
02fc 00d8 | | Load_Top At_Offset_0
02fd 0145 | E | Execute Heap_Access,Diana_Tree_Kind
02fe 0f7c | | | Execute_Immediate Equal,0x7c
02ff 6809 |h | Jump_Zero 0x309
0300 e5fe | | Load 0x2,-0x2
0301 00d9 | | Load_Top At_Offset_1
0302 8222 | " | Call 0x1,0x22
0303 e5fe | | Load 0x2,-0x2
0304 e5ff | | Load 0x2,-0x1
0305 8221 | ! | Call 0x1,0x21
0306 8220 | | Call 0x1,0x20
0307 0278 | x | Execute Discrete,Or
0308 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0309 4800 |H | Short_Literal 0x0
030a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
030b 00db | | Load_Top At_Offset_3
030c 00eb | | Load_Encached Diana_Cache
030d 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
030e 4904 |I | Short_Literal 0x104
030f 00eb | | Load_Encached Diana_Cache
0310 0096 | | Execute Package,Entry
0311 c402 | | Store 0x2,0x2
0312 00d8 | | Load_Top At_Offset_0
0313 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0314 0f7c | | | Execute_Immediate Equal,0x7c
0315 6809 |h | Jump_Zero 0x31f
0316 e5fe | | Load 0x2,-0x2
0317 00d9 | | Load_Top At_Offset_1
0318 8222 | " | Call 0x1,0x22
0319 e5fe | | Load 0x2,-0x2
031a e5ff | | Load 0x2,-0x1
031b 8221 | ! | Call 0x1,0x21
031c 8220 | | Call 0x1,0x20
031d 0278 | x | Execute Discrete,Or
031e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
031f 00db | | Load_Top At_Offset_3
0320 00eb | | Load_Encached Diana_Cache
0321 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0322 00eb | | Load_Encached Diana_Cache
0323 18f8 | | Execute Package,Field_Execute,Field_Number 0xf8
0324 021d | | Execute Heap_Access,Is_Null
0325 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0326 00d1 | | Pop_Control Pop_Count_1
0327 4801 |H | Short_Literal 0x1
0328 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0329 e5fe | | Load 0x2,-0x2
032a e5ff | | Load 0x2,-0x1
032b 8222 | " | Call 0x1,0x22
032c e5fe | | Load 0x2,-0x2
032d e5ff | | Load 0x2,-0x1
032e 8221 | ! | Call 0x1,0x21
032f 8220 | | Call 0x1,0x20
0330 0278 | x | Execute Discrete,Or
0331 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0332 0000 0000 | | .XXX[0x2]
0334 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0345 | E | .CONST 0x0345 ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0003 | | .CONST 0x0003 ; Number of locals
033b INIT_0338:
033b 00ee | | Load_Encached Diana_Seq_Type_Cache
033c 02c7 | | Declare_Variable Any
033d 00db | | Load_Top At_Offset_3
033e 00eb | | Load_Encached Diana_Cache
033f 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0340 a402 | | Store_Unchecked 0x2,0x2
0341 00ec | | Load_Encached Diana_Tree_Cache
0342 02c7 | | Declare_Variable Any
0343 00d8 | | Load_Top At_Offset_0
0344 1c00 | | Execute_Immediate Run_Utility,0x0
0345 BODY_0338:
0345 00cf | | Action Mark_Auxiliary
0346 7846 |xF | Jump 0x38d
0347 00da | | Load_Top At_Offset_2
0348 008b | | Action Heap_Access,Diana_Seq_Type_Get_Head
0349 c403 | | Store 0x2,0x3
034a 00d9 | | Load_Top At_Offset_1
034b 0145 | E | Execute Heap_Access,Diana_Tree_Kind
034c 00d8 | | Load_Top At_Offset_0
034d 483b |H; | Short_Literal 0x3b
034e 4841 |HA | Short_Literal 0x41
034f 0262 | b | Execute Discrete,In_Range
0350 680f |h | Jump_Zero 0x360
0351 0ac5 | | Execute_Immediate Plus,-0x3b
0352 4606 |F | Jump_Case 0x7
0353 780e |x | Jump 0x362 ; case 0x0
0354 7833 |x3 | Jump 0x388 ; case 0x1
0355 782a |x* | Jump 0x380 ; case 0x2
0356 7803 |x | Jump 0x35a ; case 0x3
0357 7826 |x& | Jump 0x37e ; case 0x4
0358 782f |x/ | Jump 0x388 ; case 0x5
0359 7800 |x | Jump 0x35a ; case 0x6
035a e5fe | | Load 0x2,-0x2
035b 00da | | Load_Top At_Offset_2
035c 8223 | # | Call 0x1,0x23
035d 682a |h* | Jump_Zero 0x388
035e 4801 |H | Short_Literal 0x1
035f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0360 00d1 | | Pop_Control Pop_Count_1
0361 7826 |x& | Jump 0x388
0362 00d9 | | Load_Top At_Offset_1
0363 00eb | | Load_Encached Diana_Cache
0364 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8
0365 0145 | E | Execute Heap_Access,Diana_Tree_Kind
0366 0b73 | s | Execute_Immediate Case_Compare,0x73
0367 7013 |p | Jump_Nonzero 0x37b
0368 6801 |h | Jump_Zero 0x36a
0369 781e |x | Jump 0x388
036a e5ff | | Load 0x2,-0x1
036b 00eb | | Load_Encached Diana_Cache
036c 18ec | | Execute Package,Field_Execute,Field_Number 0xec
036d 00eb | | Load_Encached Diana_Cache
036e 18be | | Execute Package,Field_Execute,Field_Number 0xbe
036f e5ff | | Load 0x2,-0x1
0370 012f | / | Execute Any,Equal
0371 6816 |h | Jump_Zero 0x388
0372 00d9 | | Load_Top At_Offset_1
0373 00eb | | Load_Encached Diana_Cache
0374 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0375 4907 |I | Short_Literal 0x107
0376 00eb | | Load_Encached Diana_Cache
0377 0096 | | Execute Package,Entry
0378 700f |p | Jump_Nonzero 0x388
0379 4801 |H | Short_Literal 0x1
037a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
037b 00d1 | | Pop_Control Pop_Count_1
037c 4801 |H | Short_Literal 0x1
037d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
037e 4801 |H | Short_Literal 0x1
037f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0380 00d9 | | Load_Top At_Offset_1
0381 00eb | | Load_Encached Diana_Cache
0382 18bf | | Execute Package,Field_Execute,Field_Number 0xbf
0383 00eb | | Load_Encached Diana_Cache
0384 18f8 | | Execute Package,Field_Execute,Field_Number 0xf8
0385 7002 |p | Jump_Nonzero 0x388
0386 4801 |H | Short_Literal 0x1
0387 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0388 00da | | Load_Top At_Offset_2
0389 0217 | | Execute Heap_Access,All_Reference
038a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
038b c402 | | Store 0x2,0x2
038c 00c9 | | Action Pop_Auxiliary_Loop
038d 00da | | Load_Top At_Offset_2
038e 77b8 |w | Jump_Nonzero 0x347
038f 00ce | | Action Pop_Auxiliary
0390 4800 |H | Short_Literal 0x0
0391 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0392 0000 0000 | | .BLANK 0000[0x6]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039f | | .CONST 0x039f ; Address of begin
0399 03b1 | | .CONST 0x03b1 ; Address of exception handler
039a 0002 | | .CONST 0x0002 ; Number of locals
039b INIT_0398:
039b 00ec | | Load_Encached Diana_Tree_Cache
039c 02c7 | | Declare_Variable Any
039d 00db | | Load_Top At_Offset_3
039e a602 | | Store_Unchecked 0x3,0x2
039f BODY_0398:
039f 00cf | | Action Mark_Auxiliary
03a0 780b |x | Jump 0x3ac
03a1 00d9 | | Load_Top At_Offset_1
03a2 e5ff | | Load 0x2,-0x1
03a3 012f | / | Execute Any,Equal
03a4 6802 |h | Jump_Zero 0x3a7
03a5 4801 |H | Short_Literal 0x1
03a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03a7 00d9 | | Load_Top At_Offset_1
03a8 00eb | | Load_Encached Diana_Cache
03a9 18ec | | Execute Package,Field_Execute,Field_Number 0xec
03aa c602 | | Store 0x3,0x2
03ab 00c9 | | Action Pop_Auxiliary_Loop
03ac 00d9 | | Load_Top At_Offset_1
03ad 77f3 |w | Jump_Nonzero 0x3a1
03ae 00ce | | Action Pop_Auxiliary
03af 4800 |H | Short_Literal 0x0
03b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b1 TRAP_0398:
03b1 0007 | | Action Break_Optional
03b2 4800 |H | Short_Literal 0x0
03b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b4 0000 0000 | | .BLANK 0000[0x4]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb 00da | | Load_Top At_Offset_2
03bc 680b |h | Jump_Zero 0x3c8
03bd 00da | | Load_Top At_Offset_2
03be e00a | | Load 0x0,0xa
03bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c0 011c | | Execute Any,Convert_Unchecked
03c1 1c01 | | Execute_Immediate Run_Utility,0x1
03c2 e5fc | | Load 0x2,-0x4
03c3 0092 04f8 | | Action Push_String_Extended,0x4f8 ; "Unsuccessful Directory Operation "
03c5 821e | | Call 0x1,0x1e
03c6 e00c | | Load 0x0,0xc
03c7 0257 | W | Execute Discrete,Raise
03c8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03c9 0000 0000 | | .BLANK 0000[0x7]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03ed | | .CONST 0x03ed ; Address of begin
03d1 044e | N | .CONST 0x044e ; Address of exception handler
03d2 0008 | | .CONST 0x0008 ; Number of locals
03d3 INIT_03d0:
03d3 00ef | | Load_Encached Diana_Sequence_Cache
03d4 02c7 | | Declare_Variable Any
03d5 00d8 | | Load_Top At_Offset_0
03d6 1c00 | | Execute_Immediate Run_Utility,0x0
03d7 00ec | | Load_Encached Diana_Tree_Cache
03d8 02c7 | | Declare_Variable Any
03d9 00d8 | | Load_Top At_Offset_0
03da 1c00 | | Execute_Immediate Run_Utility,0x0
03db 00ec | | Load_Encached Diana_Tree_Cache
03dc 02c7 | | Declare_Variable Any
03dd 00d8 | | Load_Top At_Offset_0
03de 1c00 | | Execute_Immediate Run_Utility,0x0
03df e00a | | Load 0x0,0xa
03e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03e1 e00a | | Load 0x0,0xa
03e2 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e4 02c7 | | Declare_Variable Any
03e5 00d8 | | Load_Top At_Offset_0
03e6 1c00 | | Execute_Immediate Run_Utility,0x0
03e7 00ec | | Load_Encached Diana_Tree_Cache
03e8 02c7 | | Declare_Variable Any
03e9 00d8 | | Load_Top At_Offset_0
03ea 1c00 | | Execute_Immediate Run_Utility,0x0
03eb 029f 04c3 | | Declare_Subprogram INIT_04c0,For_Call
03ed BODY_03d0:
03ed 00ea | | Load_Encached Null_String_Cache
03ee e7ff | | Load 0x3,-0x1
03ef 4976 |Iv | Short_Literal 0x176
03f0 00eb | | Load_Encached Diana_Cache
03f1 0098 | | Execute Package,Field_Read_Dynamic
03f2 180f | | Execute Package,Field_Execute,Field_Number 0xf
03f3 0092 04f9 | | Action Push_String_Extended,0x4f9 ; "Process_Subunits of "
03f5 821e | | Call 0x1,0x1e
03f6 e7ff | | Load 0x3,-0x1
03f7 e009 | | Load 0x0,0x9
03f8 18b0 | | Execute Package,Field_Execute,Field_Number 0xb0
03f9 c602 | | Store 0x3,0x2
03fa 00cf | | Action Mark_Auxiliary
03fb 784f |xO | Jump 0x44b
03fc e602 | | Load 0x3,0x2
03fd 00eb | | Load_Encached Diana_Cache
03fe 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
03ff c603 | | Store 0x3,0x3
0400 00ea | | Load_Encached Null_String_Cache
0401 e603 | | Load 0x3,0x3
0402 0092 04fa | | Action Push_String_Extended,0x4fa ; "Processing subunit "
0404 821e | | Call 0x1,0x1e
0405 e5f9 | | Load 0x2,-0x7
0406 6061 |`a | Indirect_Literal Discrete,0x468,{0x00007fff, 0xffffffff}
0407 e603 | | Load 0x3,0x3
0408 8214 | | Call 0x1,0x14
0409 c604 | | Store 0x3,0x4
040a e604 | | Load 0x3,0x4
040b 700a |p | Jump_Nonzero 0x416
040c 00ea | | Load_Encached Null_String_Cache
040d e603 | | Load 0x3,0x3
040e 0092 04fb | | Action Push_String_Extended,0x4fb ; "Empty body of "
0410 821e | | Call 0x1,0x1e
0411 e603 | | Load 0x3,0x3
0412 00eb | | Load_Encached Diana_Cache
0413 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0414 8608 | | Call 0x3,0x8
0415 7830 |x0 | Jump 0x446
0416 e00a | | Load 0x0,0xa
0417 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0418 e606 | | Load 0x3,0x6
0419 0120 | | Execute Any,Is_Value
041a 6804 |h | Jump_Zero 0x41f
041b e00a | | Load 0x0,0xa
041c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
041d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
041e 7801 |x | Jump 0x420
041f e606 | | Load 0x3,0x6
0420 e604 | | Load 0x3,0x4
0421 e00a | | Load 0x0,0xa
0422 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0423 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0424 c606 | | Store 0x3,0x6
0425 c605 | | Store 0x3,0x5
0426 e605 | | Load 0x3,0x5
0427 680a |h | Jump_Zero 0x432
0428 00ea | | Load_Encached Null_String_Cache
0429 e603 | | Load 0x3,0x3
042a 0092 04fc | | Action Push_String_Extended,0x4fc ; "Unsuccessful directory status of "
042c 821e | | Call 0x1,0x1e
042d e603 | | Load 0x3,0x3
042e 00eb | | Load_Encached Diana_Cache
042f 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0430 8608 | | Call 0x3,0x8
0431 7814 |x | Jump 0x446
0432 e5f9 | | Load 0x2,-0x7
0433 e606 | | Load 0x3,0x6
0434 e00b | | Load 0x0,0xb
0435 180f | | Execute Package,Field_Execute,Field_Number 0xf
0436 c607 | | Store 0x3,0x7
0437 e5f8 | | Load 0x2,-0x8
0438 00d8 | | Load_Top At_Offset_0
0439 0120 | | Execute Any,Is_Value
043a 6803 |h | Jump_Zero 0x43e
043b e5fd | | Load 0x2,-0x3
043c 011e | | Execute Any,Convert
043d 7802 |x | Jump 0x440
043e e5fd | | Load 0x2,-0x3
043f 0119 | | Execute Any,Check_In_Formal_Type
0440 00db | | Load_Top At_Offset_3
0441 4802 |H | Short_Literal 0x2
0442 85fe | | Call 0x2,-0x2
0443 c5f8 | | Store 0x2,-0x8
0444 00da | | Load_Top At_Offset_2
0445 840b | | Call 0x2,0xb
0446 e602 | | Load 0x3,0x2
0447 0217 | | Execute Heap_Access,All_Reference
0448 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0449 c602 | | Store 0x3,0x2
044a 00c9 | | Action Pop_Auxiliary_Loop
044b e602 | | Load 0x3,0x2
044c 77af |w | Jump_Nonzero 0x3fc
044d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
044e TRAP_03d0:
044e 0007 | | Action Break_Optional
044f e00d | | Load 0x0,0xd
0450 180e | | Execute Package,Field_Execute,Field_Number 0xe
0451 4802 |H | Short_Literal 0x2
0452 0092 04fd | | Action Push_String_Extended,0x4fd ; "Generic_Utils.Process_Generics_Units.Process_Subunits caught "
0454 4800 |H | Short_Literal 0x0
0455 4801 |H | Short_Literal 0x1
0456 e00e | | Load 0x0,0xe
0457 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0458 01cc | | Execute Vector,Catenate
0459 0092 04f4 | | Action Push_String_Extended,0x4f4 ; " at "
045b 01cc | | Execute Vector,Catenate
045c 4800 |H | Short_Literal 0x0
045d 4801 |H | Short_Literal 0x1
045e e00e | | Load 0x0,0xe
045f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0460 01cc | | Execute Vector,Catenate
0461 0092 04f5 | | Action Push_String_Extended,0x4f5 ; "; continuing."
0463 01cc | | Execute Vector,Catenate
0464 e00f | | Load 0x0,0xf
0465 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0466 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0467 0000 | | .XXX[0x1]
0468 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
046c 0000 0000 | | .BLANK 0000[0x4]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0479 | y | .CONST 0x0479 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0003 | | .CONST 0x0003 ; Number of locals
0473 INIT_0470:
0473 00ec | | Load_Encached Diana_Tree_Cache
0474 02c7 | | Declare_Variable Any
0475 00d8 | | Load_Top At_Offset_0
0476 1c00 | | Execute_Immediate Run_Utility,0x0
0477 029f 04db | | Declare_Subprogram INIT_04d8,For_Call
0479 BODY_0470:
0479 8603 | | Call 0x3,0x3
047a 00d9 | | Load_Top At_Offset_1
047b 7013 |p | Jump_Nonzero 0x48f
047c 00ea | | Load_Encached Null_String_Cache
047d e403 | | Load 0x2,0x3
047e 0092 04fe | | Action Push_String_Extended,0x4fe ; "Missing body, no stub of "
0480 821e | | Call 0x1,0x1e
0481 e5f8 | | Load 0x2,-0x8
0482 00d8 | | Load_Top At_Offset_0
0483 0120 | | Execute Any,Is_Value
0484 6803 |h | Jump_Zero 0x488
0485 e5fd | | Load 0x2,-0x3
0486 011e | | Execute Any,Convert
0487 7802 |x | Jump 0x48a
0488 e5fd | | Load 0x2,-0x3
0489 0119 | | Execute Any,Check_In_Formal_Type
048a e407 | | Load 0x2,0x7
048b 4803 |H | Short_Literal 0x3
048c 85fe | | Call 0x2,-0x2
048d c5f8 | | Store 0x2,-0x8
048e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
048f 00ea | | Load_Encached Null_String_Cache
0490 e403 | | Load 0x2,0x3
0491 0092 04ff | | Action Push_String_Extended,0x4ff ; "Missing body, has stub of "
0493 821e | | Call 0x1,0x1e
0494 00d9 | | Load_Top At_Offset_1
0495 00eb | | Load_Encached Diana_Cache
0496 18f8 | | Execute Package,Field_Execute,Field_Number 0xf8
0497 c602 | | Store 0x3,0x2
0498 e5f8 | | Load 0x2,-0x8
0499 00d8 | | Load_Top At_Offset_0
049a 0120 | | Execute Any,Is_Value
049b 6803 |h | Jump_Zero 0x49f
049c e5fd | | Load 0x2,-0x3
049d 011e | | Execute Any,Convert
049e 7802 |x | Jump 0x4a1
049f e5fd | | Load 0x2,-0x3
04a0 0119 | | Execute Any,Check_In_Formal_Type
04a1 00da | | Load_Top At_Offset_2
04a2 4803 |H | Short_Literal 0x3
04a3 85fe | | Call 0x2,-0x2
04a4 c5f8 | | Store 0x2,-0x8
04a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04a6 0000 0000 | | .XXX[0x2]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab | | .CONST 0x04ab ; Address of begin
04a9 04b2 | | .CONST 0x04b2 ; Address of exception handler
04aa 0001 | | .CONST 0x0001 ; Number of locals
04ab BODY_04a8:
04ab INIT_04a8:
04ab e003 | | Load 0x0,0x3
04ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04ad 600a |` | Indirect_Literal Discrete,0x4b8,{0x00007fff, 0xffffffff}
04ae e5ff | | Load 0x2,-0x1
04af 8215 | | Call 0x1,0x15
04b0 c402 | | Store 0x2,0x2
04b1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04b2 TRAP_04a8:
04b2 0007 | | Action Break_Optional
04b3 00ec | | Load_Encached Diana_Tree_Cache
04b4 c402 | | Store 0x2,0x2
04b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04b6 0000 0000 | | .XXX[0x2]
04b8 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
04bc 0000 0000 | | .BLANK 0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3 | | .CONST 0x04c3 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0001 | | .CONST 0x0001 ; Number of locals
04c3 BODY_04c0:
04c3 INIT_04c0:
04c3 e5f8 | | Load 0x2,-0x8
04c4 00d8 | | Load_Top At_Offset_0
04c5 0120 | | Execute Any,Is_Value
04c6 6803 |h | Jump_Zero 0x4ca
04c7 e5fd | | Load 0x2,-0x3
04c8 011e | | Execute Any,Convert
04c9 7802 |x | Jump 0x4cc
04ca e5fd | | Load 0x2,-0x3
04cb 0119 | | Execute Any,Check_In_Formal_Type
04cc 00db | | Load_Top At_Offset_3
04cd 4804 |H | Short_Literal 0x4
04ce 85fe | | Call 0x2,-0x2
04cf c5f8 | | Store 0x2,-0x8
04d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04d1 0000 0000 | | .BLANK 0000[0x7]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db | | .CONST 0x04db ; Address of begin
04d9 04e1 | | .CONST 0x04e1 ; Address of exception handler
04da 0001 | | .CONST 0x0001 ; Number of locals
04db BODY_04d8:
04db INIT_04d8:
04db e5f9 | | Load 0x2,-0x7
04dc 600b |` | Indirect_Literal Discrete,0x4e8,{0x00007fff, 0xffffffff}
04dd e403 | | Load 0x2,0x3
04de 8215 | | Call 0x1,0x15
04df c602 | | Store 0x3,0x2
04e0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04e1 TRAP_04d8:
04e1 0007 | | Action Break_Optional
04e2 00ec | | Load_Encached Diana_Tree_Cache
04e3 c602 | | Store 0x3,0x2
04e4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04e5 0000 0000 | | .XXX[0x3]
04e7 0000 | |
04e8 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
04ec ; --------------------------------------------------------------------------------------
04ec ; STRING TABLE
04ec ; --------------------------------------------------------------------------------------
04ec 002a | * | .STRTAB 0x002a->0x0501 ; "CONTAINS_GENERIC_SPEC"
04ed 003d | = | .STRTAB 0x003d->0x050b ; "CONTAINS_GENERIC_BODY"
04ee 0050 | P | .STRTAB 0x0050->0x0516 ; "SUBUNIT_OF_GENERIC"
04ef 0060 | ` | .STRTAB 0x0060->0x051f ; "MISSING_GENERIC_BODY"
04f0 0072 | r | .STRTAB 0x0072->0x0529 ; "MISSING_SUBUNIT_OF_GENERIC"
04f1 008a | | .STRTAB 0x008a->0x0536 ; "DIRECTORY_UNSUCCESSFUL"
04f2 009e | | .STRTAB 0x009e->0x0541 ; "Process_Generics_Units of "
04f3 00b6 | | .STRTAB 0x00b6->0x054e ; "Generic_Utils.Process_Generics_Units caught "
04f4 00e0 | | .STRTAB 0x00e0->0x0564 ; " at "
04f5 00e2 | | .STRTAB 0x00e2->0x0566 ; "; continuing."
04f6 00ed | | .STRTAB 0x00ed->0x056c ; "Process_Generic_Units => "
04f7 0104 | | .STRTAB 0x0104->0x0579 ; ": "
04f8 0105 | | .STRTAB 0x0105->0x057a ; "Unsuccessful Directory Operation "
04f9 0124 | $ | .STRTAB 0x0124->0x058b ; "Process_Subunits of "
04fa 0136 | 6 | .STRTAB 0x0136->0x0595 ; "Processing subunit "
04fb 0147 | G | .STRTAB 0x0147->0x059e ; "Empty body of "
04fc 0153 | S | .STRTAB 0x0153->0x05a5 ; "Unsuccessful directory status of "
04fd 0172 | r | .STRTAB 0x0172->0x05b6 ; "Generic_Utils.Process_Generics_Units.Process_Subunits caught "
04fe 01ad | | .STRTAB 0x01ad->0x05d4 ; "Missing body, no stub of "
04ff 01c4 | | .STRTAB 0x01c4->0x05e1 ; "Missing body, has stub of "
0500 01dc | | .STREND 0x01dc->0x05ee
0501 434f 4e54 |CONT| .STRTAB_STRINGS
05ee 0000 0000 | | .XXX[0x2]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; Debug Table
05f0 ; --------------------------------------------------------------------------------------
05f0 0004 000e | | .DEBUG4 0x0004,0x000e,0xe8e7,0x0000,0x0001,0x0000
05f6 0017 c724 | $| .XXX[0x5]
05f8 0000 0001 | |
05fa 4000 |@ |
05fb 0000 0000 | | .BLANK 0000[0x5]