|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 6144 (0x1800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0728 | ( | .CONST 0x0728 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0018 ; Debug Table 0x0 = .DEBUG 0x000b,0x079a,0x8000,0x0000,0x0057,0x9455,0x0000,0x0006
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0038 | 8 | .CONST 0x0038 ; Address of begin
0019 0063 | c | .CONST 0x0063 ; Address of exception handler
001a 000b | | .CONST 0x000b ; Number of locals
001b INIT_0018:
001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x079c,0x8001,0x0000,0x0057,0x9455,0x0000,0x0006
; Debug Table 0x1.0x0 = 0x1b,0xffff
001c 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1c,0xfffe
001d 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x1d,0xfffd
001e 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x1e,0xfffc
001f 0092 05f5 | | Action Push_String_Extended,0x5f5 ; "Make_Separate failed - "
; Debug Table 0x1.0x4 = 0x1f,0xfffb
0021 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x5 = 0x21,0xfffa
0022 4802 |H | Short_Literal 0x2
0023 029f 006b | k| Declare_Subprogram For_Call,INIT_0068
0025 03fd | | Declare_Type Discrete,Defined
0026 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x6 = 0x26,0xfff9
0027 0007 | | Action Break_Optional
0028 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x7 = 0x28,0xfff8
0029 e5ff | | Load 0x2,-0x1
002a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
002b 0007 | | Action Break_Optional ; Debug Table 0x1.0x8 = 0x2b,0xfff7
002c 029f 0083 | | Declare_Subprogram For_Call,INIT_0080 ; Debug Table 0x1.0x9 = 0x2c,0xfff6
002e 029f 009b | | Declare_Subprogram For_Call,INIT_0098 ; Debug Table 0x1.0xa = 0x2e,0xfff5
0030 029f 0173 | s| Declare_Subprogram For_Call,INIT_0170 ; Debug Table 0x1.0xb = 0x30,0xfff4
0032 029f 0183 | | Declare_Subprogram For_Call,INIT_0180 ; Debug Table 0x1.0xc = 0x32,0xfff3
0034 029f 0223 | #| Declare_Subprogram For_Call,INIT_0220 ; Debug Table 0x1.0xd = 0x34,0xfff2
0036 029f 03ab | | Declare_Subprogram For_Call,INIT_03a8 ; Debug Table 0x1.0xe = 0x36,0xfff1
0038 BODY_0018:
0038 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xf = 0x38,0x1
0039 1815 | | Execute Package,Field_Execute,Field_Number 0x15
003a e5fe | | Load 0x2,-0x2
003b 016d | m | Execute Variant_Record,Structure_Write
003c 0007 | | Action Break_Optional ; Debug Table 0x1.0x10 = 0x3c,0x2
003d e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x11 = 0x3d,0x401
003e 0007 | | Action Break_Optional
003f 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x1.0x12 = 0x3f,0x402
0040 0007 | | Action Break_Optional ; Debug Table 0x1.0x13 = 0x40,0x403
0041 0007 | | Action Break_Optional ; Debug Table 0x1.0x14 = 0x41,0x404
0042 0b21 | ! | Execute_Immediate Case_Compare,0x21 ; Debug Table 0x1.0x15 = 0x42,0x2
0043 7007 |p | Jump_Nonzero 0x4b
0044 0b29 | ) | Execute_Immediate Case_Compare,0x29
0045 7005 |p | Jump_Nonzero 0x4b
0046 0b2e | . | Execute_Immediate Case_Compare,0x2e
0047 7003 |p | Jump_Nonzero 0x4b
0048 0b2c | , | Execute_Immediate Case_Compare,0x2c
0049 7001 |p | Jump_Nonzero 0x4b
004a 7804 |x | Jump 0x4f ; Debug Table 0x1.0x16 = 0x4a,0x4
004b e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x17 = 0x4b,0x3
004c 00eb | | Load_Encached Diana_Cache
004d 18ec | | Execute Package,Field_Execute,Field_Number 0xec
004e a405 | | Store_Unchecked 0x2,0x5
004f 00d1 | | Pop_Control Pop_Count_1
0050 e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x18 = 0x50,0x5
0051 8407 | | Call 0x2,0x7
0052 a404 | | Store_Unchecked 0x2,0x4
0053 e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x19 = 0x53,0x6
0054 7001 |p | Jump_Nonzero 0x56
0055 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x1.0x1a = 0x55,0x7
0056 e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x1b = 0x56,0x8
0057 e001 | | Load 0x0,0x1
0058 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0059 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005a 6804 |h | Jump_Zero 0x5f
005b e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x1c = 0x5b,0x9
005c 840a | | Call 0x2,0xa
005d c405 | | Store 0x2,0x5
005e 4502 |E | Exit_Subprogram 0x2
005f e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x1d = 0x5f,0xa
0060 840b | | Call 0x2,0xb
0061 c405 | | Store 0x2,0x5
0062 4502 |E | Exit_Subprogram 0x2
0063 TRAP_0018:
0063 633c |c< | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x57946501}
0064 010f | | Execute Exception,Equal
0065 6801 |h | Jump_Zero 0x67
0066 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x1.0x1e = 0x66,0xb
0067 0100 | | Execute Exception,Raise
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 4603 |F | Jump_Case 0x3 ; Debug Table 0x2 = .DEBUG 0x006b,0x07dc,0x0005,0x0000,0x0057,0x9465,0x0000,0x004c
006c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
006d 7802 |x | Jump 0x70 ; case 0x1
006e 7805 |x | Jump 0x74 ; case 0x2
006f 7809 |x | Jump 0x79 ; case 0x3
0070 00da | | Load_Top At_Offset_2
0071 0091 05f2 | | Action Push_String_Extended_Indexed,0x5f2 ; "NOT_SEPARABLE"
0073 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0074 00db | | Load_Top At_Offset_3
0075 00db | | Load_Top At_Offset_3
0076 00e0 | | Load_Encached Standard_Cache
0077 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0078 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0079 00da | | Load_Top At_Offset_2
007a 00e0 | | Load_Encached Standard_Cache
007b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
007c 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
007d 0000 0000 | | .XXX[0x3]
007f 0000 | |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x0083,0x07de,0x0001,0x0000,0x0057,0x9465,0x0000,0x0063
; Debug Table 0x3.0x0 = 0x83,0x1
0084 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0085 0092 05f6 | | Action Push_String_Extended,0x5f6 ; "Make_Separate."
; Debug Table 0x3.0x1 = 0x85,0x2
0087 00db | | Load_Top At_Offset_3
0088 01cc | | Execute Vector,Catenate
0089 0092 05f7 | | Action Push_String_Extended,0x5f7 ; " failed - "
008b 01cc | | Execute Vector,Catenate
008c e7fe | | Load 0x3,-0x2
008d 01cc | | Execute Vector,Catenate
008e e002 | | Load 0x0,0x2
008f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0090 630f |c | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x57946501} ; Debug Table 0x3.0x2 = 0x90,0x3
0091 0257 | W | Execute Discrete,Raise
0092 0000 0000 | | .BLANK 0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a4 | | .CONST 0x00a4 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0008 | | .CONST 0x0008 ; Number of locals
009b INIT_0098:
009b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x009b,0x07e6,0x0002,0x0000,0x0057,0x9465,0x0000,0x008c
; Debug Table 0x4.0x0 = 0x9b,0xffff
009c 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x4.0x1 = 0x9c,0xfffe
009d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x2 = 0x9d,0xfffd
009e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x3 = 0x9e,0xfffc
009f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x4 = 0x9f,0xfffb
00a0 029f 0423 | #| Declare_Subprogram For_Call,INIT_0420 ; Debug Table 0x4.0x5 = 0xa0,0xfffa
00a2 029f 04d3 | | Declare_Subprogram For_Call,INIT_04d0 ; Debug Table 0x4.0x6 = 0xa2,0xfff9
00a4 BODY_0098:
00a4 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x7 = 0xa4,0x1
00a5 4974 |It | Short_Literal 0x174
00a6 00eb | | Load_Encached Diana_Cache
00a7 0098 | | Execute Package,Field_Read_Dynamic
00a8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00a9 a602 | | Store_Unchecked 0x3,0x2
00aa e602 | | Load 0x3,0x2 ; Debug Table 0x4.0x8 = 0xaa,0x2
00ab e7ff | | Load 0x3,-0x1
00ac 021f | | Execute Heap_Access,Equal
00ad 685f |h_ | Jump_Zero 0x10d
00ae e7ff | | Load 0x3,-0x1
00af 0007 | | Action Break_Optional
00b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x9 = 0xb0,0x401
00b1 0007 | | Action Break_Optional
00b2 e60a | | Load 0x3,0xa ; Debug Table 0x4.0xa = 0xb2,0x801
00b3 0007 | | Action Break_Optional
00b4 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0xb = 0xb4,0x802
00b5 0007 | | Action Break_Optional ; Debug Table 0x4.0xc = 0xb5,0x803
00b6 00d0 | | Action Swap_Control ; Debug Table 0x4.0xd = 0xb6,0x804
00b7 00d1 | | Pop_Control Pop_Count_1
00b8 49e2 |I | Short_Literal 0x1e2 ; Debug Table 0x4.0xe = 0xb8,0x401
00b9 00eb | | Load_Encached Diana_Cache
00ba 0098 | | Execute Package,Field_Read_Dynamic
00bb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00bc 7800 |x | Jump 0xbd
00bd 00d0 | | Action Swap_Control
00be 00d1 | | Pop_Control Pop_Count_1
00bf 0f04 | | Execute_Immediate Equal,0x4 ; Debug Table 0x4.0xf = 0xbf,0x2
00c0 684c |hL | Jump_Zero 0x10d
00c1 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x10 = 0xc1,0x3
00c2 00eb | | Load_Encached Diana_Cache
00c3 1889 | | Execute Package,Field_Execute,Field_Number 0x89
00c4 a603 | | Store_Unchecked 0x3,0x3
00c5 e603 | | Load 0x3,0x3 ; Debug Table 0x4.0x11 = 0xc5,0x4
00c6 4975 |Iu | Short_Literal 0x175
00c7 00eb | | Load_Encached Diana_Cache
00c8 0098 | | Execute Package,Field_Read_Dynamic
00c9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00ca 683a |h: | Jump_Zero 0x105
00cb e603 | | Load 0x3,0x3 ; Debug Table 0x4.0x12 = 0xcb,0x5
00cc 0007 | | Action Break_Optional
00cd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x13 = 0xcd,0xc01
00ce 7002 |p | Jump_Nonzero 0xd1
00cf 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x14 = 0xcf,0xc02
00d0 782c |x, | Jump 0xfd
00d1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x15 = 0xd1,0xc03
00d2 0217 | | Execute Heap_Access,All_Reference
00d3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d4 6804 |h | Jump_Zero 0xd9
00d5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x16 = 0xd5,0xc04
00d6 0217 | | Execute Heap_Access,All_Reference
00d7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00d8 7824 |x$ | Jump 0xfd
00d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x17 = 0xd9,0xc05
00da 0007 | | Action Break_Optional
00db e60a | | Load 0x3,0xa ; Debug Table 0x4.0x18 = 0xdb,0x1001
00dc 0007 | | Action Break_Optional
00dd 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x4.0x19 = 0xdd,0x1002
00de 0007 | | Action Break_Optional ; Debug Table 0x4.0x1a = 0xde,0x1003
00df 00d0 | | Action Swap_Control ; Debug Table 0x4.0x1b = 0xdf,0x1004
00e0 00d1 | | Pop_Control Pop_Count_1
00e1 49bb |I | Short_Literal 0x1bb ; Debug Table 0x4.0x1c = 0xe1,0xc05
00e2 00eb | | Load_Encached Diana_Cache
00e3 0098 | | Execute Package,Field_Read_Dynamic
00e4 012c | , | Execute Any,Size
00e5 e003 | | Load 0x0,0x3
00e6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00e7 025b | [ | Execute Discrete,Check_In_Type
00e8 0273 | s | Execute Discrete,Plus
00e9 00d9 | | Load_Top At_Offset_1
00ea 0007 | | Action Break_Optional
00eb e60b | | Load 0x3,0xb ; Debug Table 0x4.0x1d = 0xeb,0x1401
00ec 0007 | | Action Break_Optional
00ed 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x4.0x1e = 0xed,0x1402
00ee 0007 | | Action Break_Optional ; Debug Table 0x4.0x1f = 0xee,0x1403
00ef 00d0 | | Action Swap_Control ; Debug Table 0x4.0x20 = 0xef,0x1404
00f0 00d1 | | Pop_Control Pop_Count_1
00f1 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x4.0x21 = 0xf1,0x1004
00f2 00eb | | Load_Encached Diana_Cache
00f3 0098 | | Execute Package,Field_Read_Dynamic
00f4 49c9 |I | Short_Literal 0x1c9
00f5 00eb | | Load_Encached Diana_Cache
00f6 0098 | | Execute Package,Field_Read_Dynamic
00f7 49ca |I | Short_Literal 0x1ca
00f8 00eb | | Load_Encached Diana_Cache
00f9 0095 | | Execute Package,Field_Reference_Dynamic
00fa e004 | | Load 0x0,0x4
00fb 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00fc 7800 |x | Jump 0xfd
00fd 00d0 | | Action Swap_Control
00fe 00d1 | | Pop_Control Pop_Count_1
00ff 8608 | | Call 0x3,0x8 ; Debug Table 0x4.0x22 = 0xff,0x5
0100 6802 |h | Jump_Zero 0x103
0101 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x23 = 0x101,0x6
0102 4401 |D | Exit_Subprogram With_Result,0x1
0103 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x24 = 0x103,0x7
0104 4401 |D | Exit_Subprogram With_Result,0x1
0105 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x25 = 0x105,0x8
0106 0092 05f8 | | Action Push_String_Extended,0x5f8 ; "Object is a list with many elements"
0108 01cc | | Execute Vector,Catenate
0109 e005 | | Load 0x0,0x5
010a 180d | | Execute Package,Field_Execute,Field_Number 0xd
010b 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x26 = 0x10b,0x9
010c 4401 |D | Exit_Subprogram With_Result,0x1
010d 0007 | | Action Break_Optional ; Debug Table 0x4.0x27 = 0x10d,0xa
010e e602 | | Load 0x3,0x2 ; Debug Table 0x4.0x28 = 0x10e,0x1801
010f 0007 | | Action Break_Optional
0110 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x29 = 0x110,0x1802
0111 0007 | | Action Break_Optional ; Debug Table 0x4.0x2a = 0x111,0x1803
0112 0007 | | Action Break_Optional ; Debug Table 0x4.0x2b = 0x112,0x1804
0113 0fa8 | | Execute_Immediate Equal,0xa8 ; Debug Table 0x4.0x2c = 0x113,0xa
0114 6805 |h | Jump_Zero 0x11a
0115 e602 | | Load 0x3,0x2 ; Debug Table 0x4.0x2d = 0x115,0xb
0116 00eb | | Load_Encached Diana_Cache
0117 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0118 a604 | | Store_Unchecked 0x3,0x4
0119 7805 |x | Jump 0x11f
011a 0092 05f9 | | Action Push_String_Extended,0x5f9 ; "Root is not Comp_Unit or Mumble_S"
; Debug Table 0x4.0x2e = 0x11a,0xc
011c 0092 05fa | | Action Push_String_Extended,0x5fa ; "Get_Decl_Kind"
011e 8406 | | Call 0x2,0x6
011f 0007 | | Action Break_Optional ; Debug Table 0x4.0x2f = 0x11f,0xd
0120 e604 | | Load 0x3,0x4 ; Debug Table 0x4.0x30 = 0x120,0x1c01
0121 0007 | | Action Break_Optional
0122 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x31 = 0x122,0x1c02
0123 0007 | | Action Break_Optional ; Debug Table 0x4.0x32 = 0x123,0x1c03
0124 0007 | | Action Break_Optional ; Debug Table 0x4.0x33 = 0x124,0x1c04
0125 0b49 | I | Execute_Immediate Case_Compare,0x49 ; Debug Table 0x4.0x34 = 0x125,0xd
0126 700e |p | Jump_Nonzero 0x135
0127 0b48 | H | Execute_Immediate Case_Compare,0x48
0128 7013 |p | Jump_Nonzero 0x13c
0129 0b47 | G | Execute_Immediate Case_Compare,0x47
012a 7011 |p | Jump_Nonzero 0x13c
012b 0b46 | F | Execute_Immediate Case_Compare,0x46
012c 700f |p | Jump_Nonzero 0x13c
012d e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x35 = 0x12d,0x10
012e 0092 05fb | | Action Push_String_Extended,0x5fb ; "Enclosing is not a body"
0130 01cc | | Execute Vector,Catenate
0131 e005 | | Load 0x0,0x5
0132 180d | | Execute Package,Field_Execute,Field_Number 0xd
0133 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x36 = 0x133,0x11
0134 4401 |D | Exit_Subprogram With_Result,0x1
0135 e604 | | Load 0x3,0x4 ; Debug Table 0x4.0x37 = 0x135,0xe
0136 00eb | | Load_Encached Diana_Cache
0137 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
0138 00eb | | Load_Encached Diana_Cache
0139 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
013a a605 | | Store_Unchecked 0x3,0x5
013b 7804 |x | Jump 0x140
013c e604 | | Load 0x3,0x4 ; Debug Table 0x4.0x38 = 0x13c,0xf
013d 00eb | | Load_Encached Diana_Cache
013e 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
013f a605 | | Store_Unchecked 0x3,0x5
0140 00d1 | | Pop_Control Pop_Count_1
0141 0007 | | Action Break_Optional ; Debug Table 0x4.0x39 = 0x141,0x12
0142 e605 | | Load 0x3,0x5 ; Debug Table 0x4.0x3a = 0x142,0x2001
0143 0007 | | Action Break_Optional
0144 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x3b = 0x144,0x2002
0145 0007 | | Action Break_Optional ; Debug Table 0x4.0x3c = 0x145,0x2003
0146 0007 | | Action Break_Optional ; Debug Table 0x4.0x3d = 0x146,0x2004
0147 0b4e | N | Execute_Immediate Case_Compare,0x4e ; Debug Table 0x4.0x3e = 0x147,0x12
0148 7008 |p | Jump_Nonzero 0x151
0149 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x3f = 0x149,0x14
014a 0092 05fb | | Action Push_String_Extended,0x5fb ; "Enclosing is not a body"
014c 01cc | | Execute Vector,Catenate
014d e005 | | Load 0x0,0x5
014e 180d | | Execute Package,Field_Execute,Field_Number 0xd
014f 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x40 = 0x14f,0x15
0150 4401 |D | Exit_Subprogram With_Result,0x1
0151 e605 | | Load 0x3,0x5 ; Debug Table 0x4.0x41 = 0x151,0x13
0152 00eb | | Load_Encached Diana_Cache
0153 18d1 | | Execute Package,Field_Execute,Field_Number 0xd1
0154 a606 | | Store_Unchecked 0x3,0x6
0155 00d1 | | Pop_Control Pop_Count_1
0156 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x42 = 0x156,0x16
0157 e7ff | | Load 0x3,-0x1
0158 00eb | | Load_Encached Diana_Cache
0159 18ec | | Execute Package,Field_Execute,Field_Number 0xec
015a 021f | | Execute Heap_Access,Equal
015b 7008 |p | Jump_Nonzero 0x164
015c e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x43 = 0x15c,0x17
015d 0092 05fc | | Action Push_String_Extended,0x5fc ; "Object is too deeply nested"
015f 01cc | | Execute Vector,Catenate
0160 e005 | | Load 0x0,0x5
0161 180d | | Execute Package,Field_Execute,Field_Number 0xd
0162 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x44 = 0x162,0x18
0163 4401 |D | Exit_Subprogram With_Result,0x1
0164 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x45 = 0x164,0x19
0165 8608 | | Call 0x3,0x8
0166 6802 |h | Jump_Zero 0x169
0167 4802 |H | Short_Literal 0x2 ; Debug Table 0x4.0x46 = 0x167,0x1a
0168 4401 |D | Exit_Subprogram With_Result,0x1
0169 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x47 = 0x169,0x1b
016a 4401 |D | Exit_Subprogram With_Result,0x1
016b 0000 0000 | | .BLANK 0000[0x5]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0174 | t | .CONST 0x0174 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0002 | | .CONST 0x0002 ; Number of locals
0173 INIT_0170:
0173 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x0173,0x0878,0x0002,0x0000,0x0057,0x9465,0x0000,0x02f9
; Debug Table 0x5.0x0 = 0x173,0xffff
0174 BODY_0170:
0174 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1 = 0x174,0x1
0175 e006 | | Load 0x0,0x6
0176 180e | | Execute Package,Field_Execute,Field_Number 0xe
0177 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0178 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x178,0x2
0179 e007 | | Load 0x0,0x7
017a 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
017b 0031 | 1 | Store_Top Heap_Access,At_Offset_1
017c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0x17c,0x3
017d 4401 |D | Exit_Subprogram With_Result,0x1
017e 0000 0000 | | .XXX[0x2]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0192 | | .CONST 0x0192 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0008 | | .CONST 0x0008 ; Number of locals
0183 INIT_0180:
0183 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6 = .DEBUG 0x0183,0x0882,0x0002,0x0000,0x0057,0x9465,0x0000,0x0321
; Debug Table 0x6.0x0 = 0x183,0xffff
0184 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x1 = 0x184,0xfffe
0185 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x2 = 0x185,0xfffd
0186 e008 | | Load 0x0,0x8 ; Debug Table 0x6.0x3 = 0x186,0xfffc
0187 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0188 02c7 | | Declare_Variable Any
0189 00d8 | | Load_Top At_Offset_0
018a 1c00 | | Execute_Immediate Run_Utility,0x0
018b e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x4 = 0x18b,0xfffb
018c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
018e e009 | | Load 0x0,0x9 ; Debug Table 0x6.0x5 = 0x18e,0xfffa
018f 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0190 029f 050b | | Declare_Subprogram For_Call,INIT_0508 ; Debug Table 0x6.0x6 = 0x190,0xfff9
0192 BODY_0180:
0192 e7fb | | Load 0x3,-0x5 ; Debug Table 0x6.0x7 = 0x192,0x1
0193 681b |h | Jump_Zero 0x1af
0194 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x8 = 0x194,0x2
0195 0120 | | Execute Any,Is_Value
0196 6803 |h | Jump_Zero 0x19a
0197 e008 | | Load 0x0,0x8
0198 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0199 7801 |x | Jump 0x19b
019a 00db | | Load_Top At_Offset_3
019b e7fc | | Load 0x3,-0x4
019c e00a | | Load 0x0,0xa
019d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019e e00b | | Load 0x0,0xb
019f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a0 e007 | | Load 0x0,0x7
01a1 180f | | Execute Package,Field_Execute,Field_Number 0xf
01a2 e008 | | Load 0x0,0x8
01a3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a4 c605 | | Store 0x3,0x5
01a5 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x9 = 0x1a5,0x3
01a6 00db | | Load_Top At_Offset_3
01a7 e605 | | Load 0x3,0x5
01a8 4801 |H | Short_Literal 0x1
01a9 e7fd | | Load 0x3,-0x3
01aa e7fe | | Load 0x3,-0x2
01ab e008 | | Load 0x0,0x8
01ac 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
01ad c602 | | Store 0x3,0x2
01ae 7804 |x | Jump 0x1b3
01af e7fd | | Load 0x3,-0x3 ; Debug Table 0x6.0xa = 0x1af,0x4
01b0 a602 | | Store_Unchecked 0x3,0x2
01b1 e7fe | | Load 0x3,-0x2 ; Debug Table 0x6.0xb = 0x1b1,0x5
01b2 c605 | | Store 0x3,0x5
01b3 e602 | | Load 0x3,0x2 ; Debug Table 0x6.0xc = 0x1b3,0x6
01b4 e605 | | Load 0x3,0x5
01b5 e008 | | Load 0x0,0x8
01b6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01b7 e602 | | Load 0x3,0x2 ; Debug Table 0x6.0xd = 0x1b7,0x7
01b8 00eb | | Load_Encached Diana_Cache
01b9 1889 | | Execute Package,Field_Execute,Field_Number 0x89
01ba 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0xe = 0x1ba,0x401
01bb 7002 |p | Jump_Nonzero 0x1be
01bc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0xf = 0x1bc,0x402
01bd 782c |x, | Jump 0x1ea
01be 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x10 = 0x1be,0x403
01bf 0217 | | Execute Heap_Access,All_Reference
01c0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c1 6804 |h | Jump_Zero 0x1c6
01c2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x11 = 0x1c2,0x404
01c3 0217 | | Execute Heap_Access,All_Reference
01c4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01c5 7824 |x$ | Jump 0x1ea
01c6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x12 = 0x1c6,0x405
01c7 0007 | | Action Break_Optional
01c8 e60a | | Load 0x3,0xa ; Debug Table 0x6.0x13 = 0x1c8,0x801
01c9 0007 | | Action Break_Optional
01ca 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x6.0x14 = 0x1ca,0x802
01cb 0007 | | Action Break_Optional ; Debug Table 0x6.0x15 = 0x1cb,0x803
01cc 00d0 | | Action Swap_Control ; Debug Table 0x6.0x16 = 0x1cc,0x804
01cd 00d1 | | Pop_Control Pop_Count_1
01ce 49bb |I | Short_Literal 0x1bb ; Debug Table 0x6.0x17 = 0x1ce,0x405
01cf 00eb | | Load_Encached Diana_Cache
01d0 0098 | | Execute Package,Field_Read_Dynamic
01d1 012c | , | Execute Any,Size
01d2 e003 | | Load 0x0,0x3
01d3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01d4 025b | [ | Execute Discrete,Check_In_Type
01d5 0273 | s | Execute Discrete,Plus
01d6 00d9 | | Load_Top At_Offset_1
01d7 0007 | | Action Break_Optional
01d8 e60b | | Load 0x3,0xb ; Debug Table 0x6.0x18 = 0x1d8,0xc01
01d9 0007 | | Action Break_Optional
01da 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x6.0x19 = 0x1da,0xc02
01db 0007 | | Action Break_Optional ; Debug Table 0x6.0x1a = 0x1db,0xc03
01dc 00d0 | | Action Swap_Control ; Debug Table 0x6.0x1b = 0x1dc,0xc04
01dd 00d1 | | Pop_Control Pop_Count_1
01de 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x6.0x1c = 0x1de,0x804
01df 00eb | | Load_Encached Diana_Cache
01e0 0098 | | Execute Package,Field_Read_Dynamic
01e1 49c9 |I | Short_Literal 0x1c9
01e2 00eb | | Load_Encached Diana_Cache
01e3 0098 | | Execute Package,Field_Read_Dynamic
01e4 49ca |I | Short_Literal 0x1ca
01e5 00eb | | Load_Encached Diana_Cache
01e6 0095 | | Execute Package,Field_Reference_Dynamic
01e7 e004 | | Load 0x0,0x4
01e8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01e9 7800 |x | Jump 0x1ea
01ea 00d0 | | Action Swap_Control
01eb 00d1 | | Pop_Control Pop_Count_1
01ec a604 | | Store_Unchecked 0x3,0x4 ; Debug Table 0x6.0x1d = 0x1ec,0x7
01ed 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x1e = 0x1ed,0x8
01ee e604 | | Load 0x3,0x4
01ef 4974 |It | Short_Literal 0x174
01f0 00eb | | Load_Encached Diana_Cache
01f1 0098 | | Execute Package,Field_Read_Dynamic
01f2 180f | | Execute Package,Field_Execute,Field_Number 0xf
01f3 0007 | | Action Break_Optional ; Debug Table 0x6.0x1f = 0x1f3,0x9
01f4 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x6.0x20 = 0x1f4,0x1001
01f5 4895 |H | Short_Literal 0x95 ; Debug Table 0x6.0x21 = 0x1f5,0x9
01f6 00eb | | Load_Encached Diana_Cache
01f7 187f | | Execute Package,Field_Execute,Field_Number 0x7f
01f8 e604 | | Load 0x3,0x4
01f9 e7ff | | Load 0x3,-0x1
01fa 8608 | | Call 0x3,0x8
01fb 4849 |HI | Short_Literal 0x49
01fc 00eb | | Load_Encached Diana_Cache
01fd 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
01fe 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x6.0x22 = 0x1fe,0x1401
01ff 4884 |H | Short_Literal 0x84 ; Debug Table 0x6.0x23 = 0x1ff,0x1001
0200 00eb | | Load_Encached Diana_Cache
0201 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0202 48a8 |H | Short_Literal 0xa8
0203 00eb | | Load_Encached Diana_Cache
0204 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
0205 a603 | | Store_Unchecked 0x3,0x3
0206 e7fc | | Load 0x3,-0x4 ; Debug Table 0x6.0x24 = 0x206,0xa
0207 e009 | | Load 0x0,0x9
0208 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0209 0032 | 2 | Store_Top Heap_Access,At_Offset_2
020a 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x25 = 0x20a,0xb
020b 00da | | Load_Top At_Offset_2
020c 0217 | | Execute Heap_Access,All_Reference
020d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
020e e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x26 = 0x20e,0xc
020f e605 | | Load 0x3,0x5
0210 e008 | | Load 0x0,0x8
0211 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0212 e7fb | | Load 0x3,-0x5 ; Debug Table 0x6.0x27 = 0x212,0xd
0213 6804 |h | Jump_Zero 0x218
0214 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x28 = 0x214,0xe
0215 e008 | | Load 0x0,0x8
0216 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0217 c605 | | Store 0x3,0x5
0218 e603 | | Load 0x3,0x3 ; Debug Table 0x6.0x29 = 0x218,0xf
0219 4405 |D | Exit_Subprogram With_Result,0x5
021a 0000 0000 | | .BLANK 0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0256 | V | .CONST 0x0256 ; Address of begin
0221 038a | | .CONST 0x038a ; Address of exception handler
0222 0013 | | .CONST 0x0013 ; Number of locals
0223 INIT_0220:
0223 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x0223,0x08d8,0x0001,0x0000,0x0057,0x9465,0x0000,0x04a7
; Debug Table 0x7.0x0 = 0x223,0xffff
0224 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x1 = 0x224,0xfffe
0225 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x2 = 0x225,0xfffd
0226 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x3 = 0x226,0xfffc
0227 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x4 = 0x227,0xfffb
0228 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x7.0x5 = 0x228,0xfffa
0229 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x7.0x6 = 0x229,0xfff9
022a 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x7.0x7 = 0x22a,0xfff8
022b e00c | | Load 0x0,0xc ; Debug Table 0x7.0x8 = 0x22b,0xfff7
022c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022d 02c7 | | Declare_Variable Any
022e 00d8 | | Load_Top At_Offset_0
022f 1c00 | | Execute_Immediate Run_Utility,0x0
0230 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x9 = 0x230,0xfff6
0231 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0232 02c7 | | Declare_Variable Any
0233 00d8 | | Load_Top At_Offset_0
0234 1c00 | | Execute_Immediate Run_Utility,0x0
0235 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0xa = 0x235,0xfff5
0236 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0237 02ff | | Declare_Variable Variant_Record
0238 00d8 | | Load_Top At_Offset_0
0239 1c00 | | Execute_Immediate Run_Utility,0x0
023a e001 | | Load 0x0,0x1 ; Debug Table 0x7.0xb = 0x23a,0xfff4
023b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
023c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
023d 02c7 | | Declare_Variable Any
023e 00d8 | | Load_Top At_Offset_0
023f 1c00 | | Execute_Immediate Run_Utility,0x0
0240 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0xc = 0x240,0xfff3
0241 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0242 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
0243 02c7 | | Declare_Variable Any
0244 00d8 | | Load_Top At_Offset_0
0245 1c00 | | Execute_Immediate Run_Utility,0x0
0246 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0xd = 0x246,0xfff2
0247 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0248 e00d | | Load 0x0,0xd ; Debug Table 0x7.0xe = 0x248,0xfff1
0249 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024a 0322 | " | Declare_Variable Record
024b 00d8 | | Load_Top At_Offset_0
024c 1c00 | | Execute_Immediate Run_Utility,0x0
024d e009 | | Load 0x0,0x9 ; Debug Table 0x7.0xf = 0x24d,0xfff0
024e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
024f 02c7 | | Declare_Variable Any
0250 00d8 | | Load_Top At_Offset_0
0251 1c00 | | Execute_Immediate Run_Utility,0x0
0252 029f 0543 | C| Declare_Subprogram For_Call,INIT_0540 ; Debug Table 0x7.0x10 = 0x252,0xffef
0254 029f 05ab | | Declare_Subprogram For_Call,INIT_05a8 ; Debug Table 0x7.0x11 = 0x254,0xffee
0256 BODY_0220:
0256 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x12 = 0x256,0x1
0257 e7ff | | Load 0x3,-0x1
0258 e00e | | Load 0x0,0xe
0259 1b0e | | Execute Package,Field_Read,Field_Number 0xe
025a e00d | | Load 0x0,0xd
025b 180e | | Execute Package,Field_Execute,Field_Number 0xe
025c c7ff | | Store 0x3,-0x1
025d 00d1 | | Pop_Control Pop_Count_1
025e e404 | | Load 0x2,0x4 ; Debug Table 0x7.0x13 = 0x25e,0x2
025f 0f01 | | Execute_Immediate Equal,0x1
0260 6839 |h9 | Jump_Zero 0x29a
0261 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x14 = 0x261,0x3
0262 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0263 e001 | | Load 0x0,0x1
0264 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0265 6136 |a6 | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
0266 e00e | | Load 0x0,0xe
0267 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0268 4800 |H | Short_Literal 0x0
0269 e610 | | Load 0x3,0x10
026a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
026b e001 | | Load 0x0,0x1
026c 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
026d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
026e c605 | | Store 0x3,0x5
026f c60f | | Store 0x3,0xf
0270 e60f | | Load 0x3,0xf ; Debug Table 0x7.0x15 = 0x270,0x4
0271 0092 05fd | | Action Push_String_Extended,0x5fd ; "Traversal.Get_Declaration"
0273 e00f | | Load 0x0,0xf
0274 180f | | Execute Package,Field_Execute,Field_Number 0xf
0275 e605 | | Load 0x3,0x5 ; Debug Table 0x7.0x16 = 0x275,0x5
0276 4974 |It | Short_Literal 0x174
0277 00eb | | Load_Encached Diana_Cache
0278 0098 | | Execute Package,Field_Read_Dynamic
0279 181a | | Execute Package,Field_Execute,Field_Number 0x1a
027a a603 | | Store_Unchecked 0x3,0x3
027b 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x17 = 0x27b,0x6
027c e610 | | Load 0x3,0x10
027d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
027e e7ff | | Load 0x3,-0x1
027f e610 | | Load 0x3,0x10
0280 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0281 e603 | | Load 0x3,0x3
0282 8409 | | Call 0x2,0x9
0283 a604 | | Store_Unchecked 0x3,0x4
0284 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x18 = 0x284,0x7
0285 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0286 e60c | | Load 0x3,0xc
0287 e604 | | Load 0x3,0x4
0288 e001 | | Load 0x0,0x1
0289 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
028a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
028b 00d1 | | Pop_Control Pop_Count_1
028c c60f | | Store 0x3,0xf
028d e60f | | Load 0x3,0xf ; Debug Table 0x7.0x19 = 0x28d,0x8
028e 0092 05fe | | Action Push_String_Extended,0x5fe ; "Ada.Get_Version"
0290 e00f | | Load 0x0,0xf
0291 180f | | Execute Package,Field_Execute,Field_Number 0xf
0292 e605 | | Load 0x3,0x5 ; Debug Table 0x7.0x1a = 0x292,0x9
0293 e604 | | Load 0x3,0x4
0294 8612 | | Call 0x3,0x12
0295 c605 | | Store 0x3,0x5
0296 e604 | | Load 0x3,0x4 ; Debug Table 0x7.0x1b = 0x296,0xa
0297 e610 | | Load 0x3,0x10
0298 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0299 78e8 |x | Jump 0x382
029a e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x1c = 0x29a,0xb
029b 4974 |It | Short_Literal 0x174
029c 00eb | | Load_Encached Diana_Cache
029d 0098 | | Execute Package,Field_Read_Dynamic
029e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
029f a603 | | Store_Unchecked 0x3,0x3
02a0 e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x1d = 0x2a0,0xc
02a1 00eb | | Load_Encached Diana_Cache
02a2 18ec | | Execute Package,Field_Execute,Field_Number 0xec
02a3 a606 | | Store_Unchecked 0x3,0x6
02a4 e606 | | Load 0x3,0x6 ; Debug Table 0x7.0x1e = 0x2a4,0xd
02a5 00eb | | Load_Encached Diana_Cache
02a6 1889 | | Execute Package,Field_Execute,Field_Number 0x89
02a7 e7ff | | Load 0x3,-0x1
02a8 4975 |Iu | Short_Literal 0x175
02a9 00eb | | Load_Encached Diana_Cache
02aa 0098 | | Execute Package,Field_Read_Dynamic
02ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02ac 0a01 | | Execute_Immediate Plus,0x1
02ad c607 | | Store 0x3,0x7
02ae e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x1f = 0x2ae,0xe
02af 8613 | | Call 0x3,0x13
02b0 a605 | | Store_Unchecked 0x3,0x5
02b1 e607 | | Load 0x3,0x7 ; Debug Table 0x7.0x20 = 0x2b1,0xf
02b2 e605 | | Load 0x3,0x5
02b3 e606 | | Load 0x3,0x6
02b4 e610 | | Load 0x3,0x10
02b5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b6 e008 | | Load 0x0,0x8
02b7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02b8 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x21 = 0x2b8,0x10
02b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ba e60b | | Load 0x3,0xb
02bb 0120 | | Execute Any,Is_Value
02bc 6803 |h | Jump_Zero 0x2c0
02bd e001 | | Load 0x0,0x1
02be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02bf 7801 |x | Jump 0x2c1
02c0 e60b | | Load 0x3,0xb
02c1 60da |` | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
02c2 e610 | | Load 0x3,0x10
02c3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02c4 4800 |H | Short_Literal 0x0
02c5 e001 | | Load 0x0,0x1
02c6 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02c7 e605 | | Load 0x3,0x5
02c8 e001 | | Load 0x0,0x1
02c9 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
02ca 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02cb c60b | | Store 0x3,0xb
02cc c60f | | Store 0x3,0xf
02cd e60f | | Load 0x3,0xf ; Debug Table 0x7.0x22 = 0x2cd,0x11
02ce 0092 05ff | | Action Push_String_Extended,0x5ff ; "Traversal.Get_Object"
02d0 e00f | | Load 0x0,0xf
02d1 180f | | Execute Package,Field_Execute,Field_Number 0xf
02d2 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x23 = 0x2d2,0x12
02d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d4 00f1 | | Load_Encached Diana_Temp_Seq
02d5 e001 | | Load 0x0,0x1
02d6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02d7 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02d8 e60a | | Load 0x3,0xa
02d9 0120 | | Execute Any,Is_Value
02da 6803 |h | Jump_Zero 0x2de
02db e00c | | Load 0x0,0xc
02dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02dd 7801 |x | Jump 0x2df
02de e60a | | Load 0x3,0xa
02df e60c | | Load 0x3,0xc
02e0 60bb |` | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
02e1 e610 | | Load 0x3,0x10
02e2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02e3 4800 |H | Short_Literal 0x0
02e4 e001 | | Load 0x0,0x1
02e5 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
02e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e7 e001 | | Load 0x0,0x1
02e8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02e9 4ffc |O | Short_Literal 0x7fc
02ea 4ffd |O | Short_Literal 0x7fd
02eb e60b | | Load 0x3,0xb
02ec e001 | | Load 0x0,0x1
02ed 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
02ee 180d | | Execute Package,Field_Execute,Field_Number 0xd
02ef 00d1 | | Pop_Control Pop_Count_1
02f0 c60a | | Store 0x3,0xa
02f1 c608 | | Store 0x3,0x8
02f2 c609 | | Store 0x3,0x9
02f3 c60f | | Store 0x3,0xf
02f4 e60f | | Load 0x3,0xf ; Debug Table 0x7.0x24 = 0x2f4,0x13
02f5 0092 0600 | | Action Push_String_Extended,0x600 ; "Object_Operations.Create"
02f7 e00f | | Load 0x0,0xf
02f8 180f | | Execute Package,Field_Execute,Field_Number 0xf
02f9 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x25 = 0x2f9,0x14
02fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02fb e60d | | Load 0x3,0xd
02fc 0120 | | Execute Any,Is_Value
02fd 6804 |h | Jump_Zero 0x302
02fe e001 | | Load 0x0,0x1
02ff 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0300 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0301 7801 |x | Jump 0x303
0302 e60d | | Load 0x3,0xd
0303 e001 | | Load 0x0,0x1
0304 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0305 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0306 e60c | | Load 0x3,0xc
0307 6094 |` | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
0308 4801 |H | Short_Literal 0x1
0309 4800 |H | Short_Literal 0x0
030a e610 | | Load 0x3,0x10
030b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
030c 4802 |H | Short_Literal 0x2
030d e001 | | Load 0x0,0x1
030e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
030f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0310 00d1 | | Pop_Control Pop_Count_1
0311 c602 | | Store 0x3,0x2
0312 c60d | | Store 0x3,0xd
0313 c60f | | Store 0x3,0xf
0314 e60f | | Load 0x3,0xf ; Debug Table 0x7.0x26 = 0x314,0x15
0315 0092 0601 | | Action Push_String_Extended,0x601 ; "Ada.Open"
0317 e00f | | Load 0x0,0xf
0318 180f | | Execute Package,Field_Execute,Field_Number 0xf
0319 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x27 = 0x319,0x16
031a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031b 00db | | Load_Top At_Offset_3
031c 0120 | | Execute Any,Is_Value
031d 6803 |h | Jump_Zero 0x321
031e e009 | | Load 0x0,0x9
031f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0320 7801 |x | Jump 0x322
0321 00db | | Load_Top At_Offset_3
0322 e60c | | Load 0x3,0xc
0323 e001 | | Load 0x0,0x1
0324 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0325 e610 | | Load 0x3,0x10
0326 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0327 4802 |H | Short_Literal 0x2
0328 e60b | | Load 0x3,0xb
0329 e001 | | Load 0x0,0x1
032a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
032b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
032c e010 | | Load 0x0,0x10
032d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
032e c611 | | Store 0x3,0x11
032f c60f | | Store 0x3,0xf
0330 e60f | | Load 0x3,0xf ; Debug Table 0x7.0x28 = 0x330,0x17
0331 0092 0602 | | Action Push_String_Extended,0x602 ; "Ada_Utilities.Open_Image"
0333 e00f | | Load 0x0,0xf
0334 180f | | Execute Package,Field_Execute,Field_Number 0xf
0335 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x29 = 0x335,0x18
0336 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0337 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0338 c60e | | Store 0x3,0xe
0339 e011 | | Load 0x0,0x11 ; Debug Table 0x7.0x2a = 0x339,0x19
033a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
033b 4800 |H | Short_Literal 0x0
033c e602 | | Load 0x3,0x2
033d e012 | | Load 0x0,0x12
033e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
033f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0340 e012 | | Load 0x0,0x12
0341 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0342 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0343 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x2b = 0x343,0x1a
0344 00db | | Load_Top At_Offset_3
0345 e7ff | | Load 0x3,-0x1
0346 e610 | | Load 0x3,0x10
0347 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0348 e603 | | Load 0x3,0x3
0349 8409 | | Call 0x2,0x9
034a a604 | | Store_Unchecked 0x3,0x4
034b e607 | | Load 0x3,0x7 ; Debug Table 0x7.0x2c = 0x34b,0x1b
034c e606 | | Load 0x3,0x6
034d e610 | | Load 0x3,0x10
034e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
034f e008 | | Load 0x0,0x8
0350 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0351 e60e | | Load 0x3,0xe ; Debug Table 0x7.0x2d = 0x351,0x1c
0352 e001 | | Load 0x0,0x1
0353 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0354 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0355 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x2e = 0x355,0x1d
0356 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0357 e610 | | Load 0x3,0x10
0358 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0359 e604 | | Load 0x3,0x4
035a e001 | | Load 0x0,0x1
035b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
035c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
035d c60f | | Store 0x3,0xf
035e e60f | | Load 0x3,0xf ; Debug Table 0x7.0x2f = 0x35e,0x1e
035f 0092 0603 | | Action Push_String_Extended,0x603 ; "Ada.Set_Root"
0361 e00f | | Load 0x0,0xf
0362 180f | | Execute Package,Field_Execute,Field_Number 0xf
0363 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x30 = 0x363,0x1f
0364 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0365 4800 |H | Short_Literal 0x0
0366 4801 |H | Short_Literal 0x1
0367 e610 | | Load 0x3,0x10
0368 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0369 e604 | | Load 0x3,0x4
036a e001 | | Load 0x0,0x1
036b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
036c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
036d c60f | | Store 0x3,0xf
036e e60f | | Load 0x3,0xf ; Debug Table 0x7.0x31 = 0x36e,0x20
036f 0092 0604 | | Action Push_String_Extended,0x604 ; "Ada.Close"
0371 e00f | | Load 0x0,0xf
0372 180f | | Execute Package,Field_Execute,Field_Number 0xf
0373 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x32 = 0x373,0x21
0374 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0375 00db | | Load_Top At_Offset_3
0376 4801 |H | Short_Literal 0x1
0377 e610 | | Load 0x3,0x10
0378 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0379 e010 | | Load 0x0,0x10
037a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
037b c611 | | Store 0x3,0x11
037c c60f | | Store 0x3,0xf
037d e60f | | Load 0x3,0xf ; Debug Table 0x7.0x33 = 0x37d,0x22
037e 0092 0605 | | Action Push_String_Extended,0x605 ; "Ada_Utilities.Close_Image"
0380 e00f | | Load 0x0,0xf
0381 180f | | Execute Package,Field_Execute,Field_Number 0xf
0382 e60c | | Load 0x3,0xc ; Debug Table 0x7.0x34 = 0x382,0x23
0383 e5fe | | Load 0x2,-0x2
0384 016d | m | Execute Variant_Record,Structure_Write
0385 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x35 = 0x385,0x24
0386 4800 |H | Short_Literal 0x0
0387 e00d | | Load 0x0,0xd
0388 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0389 4501 |E | Exit_Subprogram 0x1
038a TRAP_0220:
038a 6015 |` | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x57946501}
038b 010f | | Execute Exception,Equal
038c 6807 |h | Jump_Zero 0x394
038d e610 | | Load 0x3,0x10 ; Debug Table 0x7.0x36 = 0x38d,0x25
038e 4800 |H | Short_Literal 0x0
038f e00d | | Load 0x0,0xd
0390 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0391 00d1 | | Pop_Control Pop_Count_1
0392 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x37 = 0x392,0x26
0393 0101 | | Execute Exception,Reraise
0394 e610 | | Load 0x3,0x10 ; Debug Table 0x7.0x38 = 0x394,0x27
0395 4802 |H | Short_Literal 0x2
0396 e00d | | Load 0x0,0xd
0397 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0398 00d1 | | Pop_Control Pop_Count_1
0399 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x39 = 0x399,0x28
039a 0101 | | Execute Exception,Reraise
039b 0000 | | .XXX[0x1]
039c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03a0 0000 0000 | | .LITERAL {0x00000000, 0x57946501}
03a4 0000 0000 | | .BLANK 0000[0x4]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03bb | | .CONST 0x03bb ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0007 | | .CONST 0x0007 ; Number of locals
03ab INIT_03a8:
03ab 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8 = .DEBUG 0x03ab,0x094e,0x0001,0x0000,0x0057,0x9465,0x0000,0x0848
; Debug Table 0x8.0x0 = 0x3ab,0xffff
03ac 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x1 = 0x3ac,0xfffe
03ad 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x2 = 0x3ad,0xfffd
03ae e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x3 = 0x3ae,0xfffc
03af 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03b0 02c7 | | Declare_Variable Any
03b1 00d8 | | Load_Top At_Offset_0
03b2 1c00 | | Execute_Immediate Run_Utility,0x0
03b3 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x4 = 0x3b3,0xfffb
03b4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03b5 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03b6 02c7 | | Declare_Variable Any
03b7 00d8 | | Load_Top At_Offset_0
03b8 1c00 | | Execute_Immediate Run_Utility,0x0
03b9 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x5 = 0x3b9,0xfffa
03ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03bb BODY_03a8:
03bb e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x6 = 0x3bb,0x1
03bc 0e02 | | Execute_Immediate Not_Equal,0x2
03bd 680a |h | Jump_Zero 0x3c8
03be 0092 0606 | | Action Push_String_Extended,0x606 ; "Decl_Attr="
; Debug Table 0x8.0x7 = 0x3be,0x2
03c0 e404 | | Load 0x2,0x4
03c1 e403 | | Load 0x2,0x3
03c2 025e | ^ | Execute Discrete,Convert
03c3 1c01 | | Execute_Immediate Run_Utility,0x1
03c4 01cc | | Execute Vector,Catenate
03c5 0092 0607 | | Action Push_String_Extended,0x607 ; "Make_Nonsource_Separate"
03c7 8406 | | Call 0x2,0x6
03c8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x8 = 0x3c8,0x3
03c9 00ec | | Load_Encached Diana_Tree_Cache
03ca 4801 |H | Short_Literal 0x1
03cb 4802 |H | Short_Literal 0x2
03cc e013 | | Load 0x0,0x13
03cd 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
03ce e7ff | | Load 0x3,-0x1
03cf e00f | | Load 0x0,0xf
03d0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03d1 e00f | | Load 0x0,0xf
03d2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03d3 c604 | | Store 0x3,0x4
03d4 c602 | | Store 0x3,0x2
03d5 e602 | | Load 0x3,0x2 ; Debug Table 0x8.0x9 = 0x3d5,0x4
03d6 6842 |hB | Jump_Zero 0x419
03d7 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0xa = 0x3d7,0x5
03d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d9 00db | | Load_Top At_Offset_3
03da 0120 | | Execute Any,Is_Value
03db 6803 |h | Jump_Zero 0x3df
03dc e001 | | Load 0x0,0x1
03dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03de 7801 |x | Jump 0x3e0
03df 00db | | Load_Top At_Offset_3
03e0 67bb |g | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
03e1 e00e | | Load 0x0,0xe
03e2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e3 4800 |H | Short_Literal 0x0
03e4 e001 | | Load 0x0,0x1
03e5 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03e6 e604 | | Load 0x3,0x4
03e7 e001 | | Load 0x0,0x1
03e8 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
03e9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03ea c605 | | Store 0x3,0x5
03eb 0059 | Y | Store_Top Discrete,At_Offset_1
03ec 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xb = 0x3ec,0x6
03ed 0092 05ff | | Action Push_String_Extended,0x5ff ; "Traversal.Get_Object"
03ef e00f | | Load 0x0,0xf
03f0 180f | | Execute Package,Field_Execute,Field_Number 0xf
03f1 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0xc = 0x3f1,0x7
03f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03f3 00da | | Load_Top At_Offset_2
03f4 0120 | | Execute Any,Is_Value
03f5 6804 |h | Jump_Zero 0x3fa
03f6 e001 | | Load 0x0,0x1
03f7 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03f8 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03f9 7801 |x | Jump 0x3fb
03fa 00da | | Load_Top At_Offset_2
03fb e001 | | Load 0x0,0x1
03fc 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03fe 679d |g | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
03ff 4801 |H | Short_Literal 0x1
0400 4800 |H | Short_Literal 0x0
0401 4800 |H | Short_Literal 0x0
0402 e00e | | Load 0x0,0xe
0403 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0404 4800 |H | Short_Literal 0x0
0405 e605 | | Load 0x3,0x5
0406 e001 | | Load 0x0,0x1
0407 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0408 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0409 e001 | | Load 0x0,0x1
040a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
040b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
040c c603 | | Store 0x3,0x3
040d c606 | | Store 0x3,0x6
040e 0059 | Y | Store_Top Discrete,At_Offset_1
040f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xd = 0x40f,0x8
0410 0092 0601 | | Action Push_String_Extended,0x601 ; "Ada.Open"
0412 e00f | | Load 0x0,0xf
0413 180f | | Execute Package,Field_Execute,Field_Number 0xf
0414 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xe = 0x414,0x9
0415 a404 | | Store_Unchecked 0x2,0x4
0416 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0xf = 0x416,0xa
0417 840a | | Call 0x2,0xa
0418 c603 | | Store 0x3,0x3
0419 4501 |E | Exit_Subprogram 0x1
041a 0000 0000 | | .BLANK 0000[0x6]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 042a | * | .CONST 0x042a ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0005 | | .CONST 0x0005 ; Number of locals
0423 INIT_0420:
0423 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x0423,0x0970,0x0002,0x0000,0x0057,0x9465,0x0000,0x00b9
; Debug Table 0x9.0x0 = 0x423,0xffff
0424 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x1 = 0x424,0xfffe
0425 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9.0x2 = 0x425,0xfffd
0426 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x9.0x3 = 0x426,0xfffc
0427 02c7 | | Declare_Variable Any
0428 00d8 | | Load_Top At_Offset_0
0429 1c00 | | Execute_Immediate Run_Utility,0x0
042a BODY_0420:
042a e9ff | | Load 0x4,-0x1 ; Debug Table 0x9.0x4 = 0x42a,0x1
042b 4976 |Iv | Short_Literal 0x176
042c 00eb | | Load_Encached Diana_Cache
042d 0098 | | Execute Package,Field_Read_Dynamic
042e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
042f a802 | | Store_Unchecked 0x4,0x2
0430 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x5 = 0x430,0x2
0431 0007 | | Action Break_Optional
0432 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x432,0x401
0433 0007 | | Action Break_Optional
0434 e807 | | Load 0x4,0x7 ; Debug Table 0x9.0x7 = 0x434,0x801
0435 0007 | | Action Break_Optional
0436 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x8 = 0x436,0x802
0437 0007 | | Action Break_Optional ; Debug Table 0x9.0x9 = 0x437,0x803
0438 00d0 | | Action Swap_Control ; Debug Table 0x9.0xa = 0x438,0x804
0439 00d1 | | Pop_Control Pop_Count_1
043a 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x9.0xb = 0x43a,0x401
043b 00eb | | Load_Encached Diana_Cache
043c 0098 | | Execute Package,Field_Read_Dynamic
043d 180d | | Execute Package,Field_Execute,Field_Number 0xd
043e 7800 |x | Jump 0x43f
043f 00d0 | | Action Swap_Control
0440 00d1 | | Pop_Control Pop_Count_1
0441 7002 |p | Jump_Nonzero 0x444 ; Debug Table 0x9.0xc = 0x441,0x2
0442 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xd = 0x442,0x3
0443 4401 |D | Exit_Subprogram With_Result,0x1
0444 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0xe = 0x444,0x4
0445 00eb | | Load_Encached Diana_Cache
0446 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0447 c805 | | Store 0x4,0x5
0448 e9ff | | Load 0x4,-0x1 ; Debug Table 0x9.0xf = 0x448,0x5
0449 00eb | | Load_Encached Diana_Cache
044a 18ec | | Execute Package,Field_Execute,Field_Number 0xec
044b 00eb | | Load_Encached Diana_Cache
044c 1888 | | Execute Package,Field_Execute,Field_Number 0x88
044d 0032 | 2 | Store_Top Heap_Access,At_Offset_2
044e 7878 |xx | Jump 0x4c7
044f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x10 = 0x44f,0x7
0450 0007 | | Action Break_Optional
0451 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x11 = 0x451,0xc01
0452 7002 |p | Jump_Nonzero 0x455
0453 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x12 = 0x453,0xc02
0454 782c |x, | Jump 0x481
0455 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x13 = 0x455,0xc03
0456 0217 | | Execute Heap_Access,All_Reference
0457 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0458 6804 |h | Jump_Zero 0x45d
0459 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x14 = 0x459,0xc04
045a 0217 | | Execute Heap_Access,All_Reference
045b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
045c 7824 |x$ | Jump 0x481
045d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x15 = 0x45d,0xc05
045e 0007 | | Action Break_Optional
045f e807 | | Load 0x4,0x7 ; Debug Table 0x9.0x16 = 0x45f,0x1001
0460 0007 | | Action Break_Optional
0461 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x9.0x17 = 0x461,0x1002
0462 0007 | | Action Break_Optional ; Debug Table 0x9.0x18 = 0x462,0x1003
0463 00d0 | | Action Swap_Control ; Debug Table 0x9.0x19 = 0x463,0x1004
0464 00d1 | | Pop_Control Pop_Count_1
0465 49bb |I | Short_Literal 0x1bb ; Debug Table 0x9.0x1a = 0x465,0xc05
0466 00eb | | Load_Encached Diana_Cache
0467 0098 | | Execute Package,Field_Read_Dynamic
0468 012c | , | Execute Any,Size
0469 e003 | | Load 0x0,0x3
046a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
046b 025b | [ | Execute Discrete,Check_In_Type
046c 0273 | s | Execute Discrete,Plus
046d 00d9 | | Load_Top At_Offset_1
046e 0007 | | Action Break_Optional
046f e808 | | Load 0x4,0x8 ; Debug Table 0x9.0x1b = 0x46f,0x1401
0470 0007 | | Action Break_Optional
0471 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x9.0x1c = 0x471,0x1402
0472 0007 | | Action Break_Optional ; Debug Table 0x9.0x1d = 0x472,0x1403
0473 00d0 | | Action Swap_Control ; Debug Table 0x9.0x1e = 0x473,0x1404
0474 00d1 | | Pop_Control Pop_Count_1
0475 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x9.0x1f = 0x475,0x1004
0476 00eb | | Load_Encached Diana_Cache
0477 0098 | | Execute Package,Field_Read_Dynamic
0478 49c9 |I | Short_Literal 0x1c9
0479 00eb | | Load_Encached Diana_Cache
047a 0098 | | Execute Package,Field_Read_Dynamic
047b 49ca |I | Short_Literal 0x1ca
047c 00eb | | Load_Encached Diana_Cache
047d 0095 | | Execute Package,Field_Reference_Dynamic
047e e004 | | Load 0x0,0x4
047f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0480 7800 |x | Jump 0x481
0481 00d0 | | Action Swap_Control
0482 00d1 | | Pop_Control Pop_Count_1
0483 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0x9.0x20 = 0x483,0x7
0484 0007 | | Action Break_Optional ; Debug Table 0x9.0x21 = 0x484,0x8
0485 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x22 = 0x485,0x1801
0486 7002 |p | Jump_Nonzero 0x489
0487 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9.0x23 = 0x487,0x1802
0488 7803 |x | Jump 0x48c
0489 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x24 = 0x489,0x1803
048a 0217 | | Execute Heap_Access,All_Reference
048b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
048c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x9.0x25 = 0x48c,0x8
048d 0007 | | Action Break_Optional ; Debug Table 0x9.0x26 = 0x48d,0x9
048e e803 | | Load 0x4,0x3 ; Debug Table 0x9.0x27 = 0x48e,0x1c01
048f 0007 | | Action Break_Optional
0490 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x28 = 0x490,0x1c02
0491 0007 | | Action Break_Optional ; Debug Table 0x9.0x29 = 0x491,0x1c03
0492 0007 | | Action Break_Optional ; Debug Table 0x9.0x2a = 0x492,0x1c04
0493 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0x9.0x2b = 0x493,0x9
0494 7005 |p | Jump_Nonzero 0x49a
0495 0b46 | F | Execute_Immediate Case_Compare,0x46
0496 7003 |p | Jump_Nonzero 0x49a
0497 0b47 | G | Execute_Immediate Case_Compare,0x47
0498 7001 |p | Jump_Nonzero 0x49a
0499 782c |x, | Jump 0x4c6 ; Debug Table 0x9.0x2c = 0x499,0xe
049a 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x2d = 0x49a,0xa
049b 00eb | | Load_Encached Diana_Cache
049c 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
049d e807 | | Load 0x4,0x7 ; Debug Table 0x9.0x2e = 0x49d,0x2001
049e 0007 | | Action Break_Optional
049f 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x2f = 0x49f,0x2002
04a0 0007 | | Action Break_Optional ; Debug Table 0x9.0x30 = 0x4a0,0x2003
04a1 00d0 | | Action Swap_Control ; Debug Table 0x9.0x31 = 0x4a1,0x2004
04a2 00d1 | | Pop_Control Pop_Count_1
04a3 0f77 | w | Execute_Immediate Equal,0x77 ; Debug Table 0x9.0x32 = 0x4a3,0xa
04a4 6821 |h! | Jump_Zero 0x4c6
04a5 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x33 = 0x4a5,0xb
04a6 4976 |Iv | Short_Literal 0x176
04a7 00eb | | Load_Encached Diana_Cache
04a8 0098 | | Execute Package,Field_Read_Dynamic
04a9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04aa a802 | | Store_Unchecked 0x4,0x2
04ab e802 | | Load 0x4,0x2 ; Debug Table 0x9.0x34 = 0x4ab,0xc
04ac 0007 | | Action Break_Optional
04ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x35 = 0x4ad,0x2401
04ae 0007 | | Action Break_Optional
04af e808 | | Load 0x4,0x8 ; Debug Table 0x9.0x36 = 0x4af,0x2801
04b0 0007 | | Action Break_Optional
04b1 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x37 = 0x4b1,0x2802
04b2 0007 | | Action Break_Optional ; Debug Table 0x9.0x38 = 0x4b2,0x2803
04b3 00d0 | | Action Swap_Control ; Debug Table 0x9.0x39 = 0x4b3,0x2804
04b4 00d1 | | Pop_Control Pop_Count_1
04b5 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x9.0x3a = 0x4b5,0x2401
04b6 00eb | | Load_Encached Diana_Cache
04b7 0098 | | Execute Package,Field_Read_Dynamic
04b8 180d | | Execute Package,Field_Execute,Field_Number 0xd
04b9 7800 |x | Jump 0x4ba
04ba 00d0 | | Action Swap_Control
04bb 00d1 | | Pop_Control Pop_Count_1
04bc 6809 |h | Jump_Zero 0x4c6 ; Debug Table 0x9.0x3b = 0x4bc,0xc
04bd e802 | | Load 0x4,0x2
04be 00eb | | Load_Encached Diana_Cache
04bf 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04c0 00da | | Load_Top At_Offset_2
04c1 00eb | | Load_Encached Diana_Cache
04c2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04c3 6802 |h | Jump_Zero 0x4c6
04c4 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x3c = 0x4c4,0xd
04c5 4401 |D | Exit_Subprogram With_Result,0x1
04c6 00d1 | | Pop_Control Pop_Count_1
04c7 0007 | | Action Break_Optional ; Debug Table 0x9.0x3d = 0x4c7,0x6
04c8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x3e = 0x4c8,0x2c01
04c9 021d | | Execute Heap_Access,Is_Null
04ca 6f84 |o | Jump_Zero 0x44f ; Debug Table 0x9.0x3f = 0x4ca,0x6
04cb 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x40 = 0x4cb,0xf
04cc 4401 |D | Exit_Subprogram With_Result,0x1
04cd 0000 0000 | | .XXX[0x3]
04cf 0000 | |
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d3 | | .CONST 0x04d3 ; Address of begin
04d1 0004 | | .CONST 0x0004 ; Address of exception handler
04d2 0001 | | .CONST 0x0001 ; Number of locals
04d3 BODY_04d0:
04d3 INIT_04d0:
04d3 0007 | | Action Break_Optional ; Debug Table 0xa = .DEBUG 0x04d3,0x09f4,0x0002,0x0000,0x0057,0x9465,0x0000,0x0181
; Debug Table 0xa.0x0 = 0x4d3,0x1
04d4 e9ff | | Load 0x4,-0x1 ; Debug Table 0xa.0x1 = 0x4d4,0x401
04d5 0007 | | Action Break_Optional
04d6 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xa.0x2 = 0x4d6,0x402
04d7 0007 | | Action Break_Optional ; Debug Table 0xa.0x3 = 0x4d7,0x403
04d8 0007 | | Action Break_Optional ; Debug Table 0xa.0x4 = 0x4d8,0x404
04d9 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0xa.0x5 = 0x4d9,0x1
04da 700c |p | Jump_Nonzero 0x4e7
04db 0b47 | G | Execute_Immediate Case_Compare,0x47
04dc 700a |p | Jump_Nonzero 0x4e7
04dd 0b46 | F | Execute_Immediate Case_Compare,0x46
04de 7008 |p | Jump_Nonzero 0x4e7
04df e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x6 = 0x4df,0x9
04e0 0092 0608 | | Action Push_String_Extended,0x608 ; "Object is not separable"
04e2 01cc | | Execute Vector,Catenate
04e3 e005 | | Load 0x0,0x5
04e4 180d | | Execute Package,Field_Execute,Field_Number 0xd
04e5 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x7 = 0x4e5,0xa
04e6 4401 |D | Exit_Subprogram With_Result,0x1
04e7 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x8 = 0x4e7,0x2
04e8 8607 | | Call 0x3,0x7
04e9 6808 |h | Jump_Zero 0x4f2
04ea e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x9 = 0x4ea,0x3
04eb 0092 0609 | | Action Push_String_Extended,0x609 ; "Object has a separated overload"
04ed 01cc | | Execute Vector,Catenate
04ee e005 | | Load 0x0,0x5
04ef 180d | | Execute Package,Field_Execute,Field_Number 0xd
04f0 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0xa = 0x4f0,0x4
04f1 4401 |D | Exit_Subprogram With_Result,0x1
04f2 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0xb = 0x4f2,0x5
04f3 00eb | | Load_Encached Diana_Cache
04f4 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
04f5 e803 | | Load 0x4,0x3 ; Debug Table 0xa.0xc = 0x4f5,0x801
04f6 0007 | | Action Break_Optional
04f7 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xa.0xd = 0x4f7,0x802
04f8 0007 | | Action Break_Optional ; Debug Table 0xa.0xe = 0x4f8,0x803
04f9 00d0 | | Action Swap_Control ; Debug Table 0xa.0xf = 0x4f9,0x804
04fa 00d1 | | Pop_Control Pop_Count_1
04fb 0b4e | N | Execute_Immediate Case_Compare,0x4e ; Debug Table 0xa.0x10 = 0x4fb,0x5
04fc 7008 |p | Jump_Nonzero 0x505
04fd e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x11 = 0x4fd,0x7
04fe 0092 060a | | Action Push_String_Extended,0x60a ; "Object is separate"
0500 01cc | | Execute Vector,Catenate
0501 e005 | | Load 0x0,0x5
0502 180d | | Execute Package,Field_Execute,Field_Number 0xd
0503 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x12 = 0x503,0x8
0504 4401 |D | Exit_Subprogram With_Result,0x1
0505 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x13 = 0x505,0x6
0506 4401 |D | Exit_Subprogram With_Result,0x1
0507 0000 | | .XXX[0x1]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050e | | .CONST 0x050e ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0004 | | .CONST 0x0004 ; Number of locals
050b INIT_0508:
050b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb = .DEBUG 0x050b,0x0a1e,0x0002,0x0000,0x0057,0x9465,0x0000,0x036f
; Debug Table 0xb.0x0 = 0x50b,0xffff
050c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x1 = 0x50c,0xfffe
050d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x2 = 0x50d,0xfffd
050e BODY_0508:
050e e9ff | | Load 0x4,-0x1 ; Debug Table 0xb.0x3 = 0x50e,0x1
050f 00eb | | Load_Encached Diana_Cache
0510 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0511 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0512 0007 | | Action Break_Optional ; Debug Table 0xb.0x4 = 0x512,0x2
0513 e803 | | Load 0x4,0x3 ; Debug Table 0xb.0x5 = 0x513,0x401
0514 0007 | | Action Break_Optional
0515 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xb.0x6 = 0x515,0x402
0516 0007 | | Action Break_Optional ; Debug Table 0xb.0x7 = 0x516,0x403
0517 0007 | | Action Break_Optional ; Debug Table 0xb.0x8 = 0x517,0x404
0518 0b49 | I | Execute_Immediate Case_Compare,0x49 ; Debug Table 0xb.0x9 = 0x518,0x2
0519 700c |p | Jump_Nonzero 0x526
051a 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xa = 0x51a,0x5
051b 4976 |Iv | Short_Literal 0x176
051c 00eb | | Load_Encached Diana_Cache
051d 0098 | | Execute Package,Field_Read_Dynamic
051e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
051f 00eb | | Load_Encached Diana_Cache
0520 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0521 4817 |H | Short_Literal 0x17
0522 00eb | | Load_Encached Diana_Cache
0523 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
0524 a802 | | Store_Unchecked 0x4,0x2
0525 7816 |x | Jump 0x53c
0526 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xb = 0x526,0x3
0527 00eb | | Load_Encached Diana_Cache
0528 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
0529 0032 | 2 | Store_Top Heap_Access,At_Offset_2
052a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0xc = 0x52a,0x4
052b 4976 |Iv | Short_Literal 0x176
052c 00eb | | Load_Encached Diana_Cache
052d 0098 | | Execute Package,Field_Read_Dynamic
052e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
052f 00eb | | Load_Encached Diana_Cache
0530 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0531 4817 |H | Short_Literal 0x17
0532 00eb | | Load_Encached Diana_Cache
0533 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
0534 00db | | Load_Top At_Offset_3
0535 00eb | | Load_Encached Diana_Cache
0536 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
0537 8408 | | Call 0x2,0x8
0538 4812 |H | Short_Literal 0x12
0539 00eb | | Load_Encached Diana_Cache
053a 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
053b a802 | | Store_Unchecked 0x4,0x2
053c 00d1 | | Pop_Control Pop_Count_1
053d 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xd = 0x53d,0x6
053e 4401 |D | Exit_Subprogram With_Result,0x1
053f 0000 | | .XXX[0x1]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0551 | Q | .CONST 0x0551 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0006 | | .CONST 0x0006 ; Number of locals
0543 INIT_0540:
0543 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc = .DEBUG 0x0543,0x0a3c,0x0001,0x0000,0x0057,0x9465,0x0000,0x0522
; Debug Table 0xc.0x0 = 0x543,0xffff
0544 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x1 = 0x544,0xfffe
0545 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0546 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0547 02c7 | | Declare_Variable Any
0548 00d8 | | Load_Top At_Offset_0
0549 1c00 | | Execute_Immediate Run_Utility,0x0
054a e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x2 = 0x54a,0xfffd
054b 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
054c e014 | | Load 0x0,0x14 ; Debug Table 0xc.0x3 = 0x54c,0xfffc
054d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
054e e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x4 = 0x54e,0xfffb
054f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0550 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0551 BODY_0540:
0551 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x5 = 0x551,0x1
0552 a802 | | Store_Unchecked 0x4,0x2
0553 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x6 = 0x553,0x2
0554 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0555 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0556 e014 | | Load 0x0,0x14
0557 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0558 e803 | | Load 0x4,0x3
0559 0120 | | Execute Any,Is_Value
055a 6804 |h | Jump_Zero 0x55f
055b e001 | | Load 0x0,0x1
055c 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
055d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
055e 7801 |x | Jump 0x560
055f e803 | | Load 0x4,0x3
0560 e001 | | Load 0x0,0x1
0561 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
0562 e00a | | Load 0x0,0xa
0563 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0564 e00b | | Load 0x0,0xb
0565 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0566 e610 | | Load 0x3,0x10
0567 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0568 0092 060b | | Action Push_String_Extended,0x60b ; "<WORLDS>"
056a e014 | | Load 0x0,0x14
056b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
056c c804 | | Store 0x4,0x4
056d c803 | | Store 0x4,0x3
056e 005b | [ | Store_Top Discrete,At_Offset_3
056f 0059 | Y | Store_Top Discrete,At_Offset_1
0570 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x7 = 0x570,0x3
0571 6802 |h | Jump_Zero 0x574
0572 662d |f- | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x57946501} ; Debug Table 0xc.0x8 = 0x572,0x4
0573 0257 | W | Execute Discrete,Raise
0574 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x9 = 0x574,0x5
0575 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0576 e610 | | Load 0x3,0x10
0577 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0578 e9ff | | Load 0x4,-0x1
0579 e001 | | Load 0x0,0x1
057a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
057b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
057c c60f | | Store 0x3,0xf
057d e60f | | Load 0x3,0xf ; Debug Table 0xc.0xa = 0x57d,0x6
057e 0092 0603 | | Action Push_String_Extended,0x603 ; "Ada.Set_Root"
0580 e00f | | Load 0x0,0xf
0581 180f | | Execute Package,Field_Execute,Field_Number 0xf
0582 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0xb = 0x582,0x7
0583 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0584 00f1 | | Load_Encached Diana_Temp_Seq
0585 e001 | | Load 0x0,0x1
0586 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0587 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0588 e60a | | Load 0x3,0xa
0589 0120 | | Execute Any,Is_Value
058a 6803 |h | Jump_Zero 0x58e
058b e00c | | Load 0x0,0xc
058c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058d 7801 |x | Jump 0x58f
058e e60a | | Load 0x3,0xa
058f e802 | | Load 0x4,0x2
0590 e9fe | | Load 0x4,-0x2
0591 660a |f | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00004000}
0592 e610 | | Load 0x3,0x10
0593 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0594 e804 | | Load 0x4,0x4
0595 e803 | | Load 0x4,0x3
0596 e001 | | Load 0x0,0x1
0597 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0598 4802 |H | Short_Literal 0x2
0599 e001 | | Load 0x0,0x1
059a 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
059b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
059c c9fe | | Store 0x4,-0x2
059d c802 | | Store 0x4,0x2
059e c60a | | Store 0x3,0xa
059f c608 | | Store 0x3,0x8
05a0 c609 | | Store 0x3,0x9
05a1 c60f | | Store 0x3,0xf
05a2 e60f | | Load 0x3,0xf ; Debug Table 0xc.0xc = 0x5a2,0x8
05a3 0092 060c | | Action Push_String_Extended,0x60c ; "Decl_Ops.Promote"
05a5 e00f | | Load 0x0,0xf
05a6 180f | | Execute Package,Field_Execute,Field_Number 0xf
05a7 4502 |E | Exit_Subprogram 0x2
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ac | | .CONST 0x05ac ; Address of begin
05a9 0004 | | .CONST 0x0004 ; Address of exception handler
05aa 0002 | | .CONST 0x0002 ; Number of locals
05ab INIT_05a8:
05ab 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd = .DEBUG 0x05ab,0x0a58,0x0002,0x0000,0x0057,0x9465,0x0000,0x05cb
; Debug Table 0xd.0x0 = 0x5ab,0xffff
05ac BODY_05a8:
05ac 0007 | | Action Break_Optional ; Debug Table 0xd.0x1 = 0x5ac,0x1
05ad e9ff | | Load 0x4,-0x1 ; Debug Table 0xd.0x2 = 0x5ad,0x401
05ae 0007 | | Action Break_Optional
05af 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xd.0x3 = 0x5af,0x402
05b0 0007 | | Action Break_Optional ; Debug Table 0xd.0x4 = 0x5b0,0x403
05b1 0007 | | Action Break_Optional ; Debug Table 0xd.0x5 = 0x5b1,0x404
05b2 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0xd.0x6 = 0x5b2,0x1
05b3 7014 |p | Jump_Nonzero 0x5c8
05b4 0b47 | G | Execute_Immediate Case_Compare,0x47
05b5 7022 |p" | Jump_Nonzero 0x5d8
05b6 0b46 | F | Execute_Immediate Case_Compare,0x46
05b7 702c |p, | Jump_Nonzero 0x5e4
05b8 0092 060d | | Action Push_String_Extended,0x60d ; "Tree kind is "
; Debug Table 0xd.0x7 = 0x5b8,0x5
05ba e9ff | | Load 0x4,-0x1 ; Debug Table 0xd.0x8 = 0x5ba,0x801
05bb 0007 | | Action Break_Optional
05bc 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xd.0x9 = 0x5bc,0x802
05bd 0007 | | Action Break_Optional ; Debug Table 0xd.0xa = 0x5bd,0x803
05be 0007 | | Action Break_Optional ; Debug Table 0xd.0xb = 0x5be,0x804
05bf 00eb | | Load_Encached Diana_Cache ; Debug Table 0xd.0xc = 0x5bf,0x5
05c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05c1 025e | ^ | Execute Discrete,Convert
05c2 1c01 | | Execute_Immediate Run_Utility,0x1
05c3 01cc | | Execute Vector,Catenate
05c4 0092 060e | | Action Push_String_Extended,0x60e ; "Make_Source_Separate.Make_Stub"
05c6 8406 | | Call 0x2,0x6
05c7 7827 |x' | Jump 0x5ef
05c8 4877 |Hw | Short_Literal 0x77 ; Debug Table 0xd.0xd = 0x5c8,0x2
05c9 00eb | | Load_Encached Diana_Cache
05ca 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
05cb e9ff | | Load 0x4,-0x1
05cc 00eb | | Load_Encached Diana_Cache
05cd 18ce | | Execute Package,Field_Execute,Field_Number 0xce
05ce 8408 | | Call 0x2,0x8
05cf e9ff | | Load 0x4,-0x1
05d0 00eb | | Load_Encached Diana_Cache
05d1 18bf | | Execute Package,Field_Execute,Field_Number 0xbf
05d2 8408 | | Call 0x2,0x8
05d3 4848 |HH | Short_Literal 0x48
05d4 00eb | | Load_Encached Diana_Cache
05d5 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
05d6 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05d7 7817 |x | Jump 0x5ef
05d8 4877 |Hw | Short_Literal 0x77 ; Debug Table 0xd.0xe = 0x5d8,0x3
05d9 00eb | | Load_Encached Diana_Cache
05da 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
05db e9ff | | Load 0x4,-0x1
05dc 00eb | | Load_Encached Diana_Cache
05dd 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
05de 8408 | | Call 0x2,0x8
05df 4847 |HG | Short_Literal 0x47
05e0 00eb | | Load_Encached Diana_Cache
05e1 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
05e2 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05e3 780b |x | Jump 0x5ef
05e4 4877 |Hw | Short_Literal 0x77 ; Debug Table 0xd.0xf = 0x5e4,0x4
05e5 00eb | | Load_Encached Diana_Cache
05e6 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
05e7 e9ff | | Load 0x4,-0x1
05e8 00eb | | Load_Encached Diana_Cache
05e9 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
05ea 8408 | | Call 0x2,0x8
05eb 4846 |HF | Short_Literal 0x46
05ec 00eb | | Load_Encached Diana_Cache
05ed 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
05ee 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05ef 00d1 | | Pop_Control Pop_Count_1
05f0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x10 = 0x5f0,0x6
05f1 4401 |D | Exit_Subprogram With_Result,0x1
05f2 ; --------------------------------------------------------------------------------------
05f2 ; STRING TABLE
05f2 ; --------------------------------------------------------------------------------------
05f2 003c | < | .STRTAB 0x003c->0x0610 ; "NOT_SEPARABLE"
05f3 0047 | G | .STRTAB 0x0047->0x0616 ; "SEPARABLE_LIST"
05f4 0053 | S | .STRTAB 0x0053->0x061d ; "SEPARABLE_DECL"
05f5 005f | _ | .STRTAB 0x005f->0x0624 ; "Make_Separate failed - "
05f6 0074 | t | .STRTAB 0x0074->0x0630 ; "Make_Separate."
05f7 0080 | | .STRTAB 0x0080->0x0637 ; " failed - "
05f8 0088 | | .STRTAB 0x0088->0x063c ; "Object is a list with many elements"
05f9 00a9 | | .STRTAB 0x00a9->0x064d ; "Root is not Comp_Unit or Mumble_S"
05fa 00c8 | | .STRTAB 0x00c8->0x065e ; "Get_Decl_Kind"
05fb 00d3 | | .STRTAB 0x00d3->0x0664 ; "Enclosing is not a body"
; "Enclosing is not a body"
05fc 00e8 | | .STRTAB 0x00e8->0x0670 ; "Object is too deeply nested"
05fd 0101 | | .STRTAB 0x0101->0x067d ; "Traversal.Get_Declaration"
05fe 0118 | | .STRTAB 0x0118->0x068a ; "Ada.Get_Version"
05ff 0125 | % | .STRTAB 0x0125->0x0691 ; "Traversal.Get_Object"
; "Traversal.Get_Object"
0600 0137 | 7 | .STRTAB 0x0137->0x069b ; "Object_Operations.Create"
0601 014d | M | .STRTAB 0x014d->0x06a7 ; "Ada.Open"
; "Ada.Open"
0602 0153 | S | .STRTAB 0x0153->0x06ab ; "Ada_Utilities.Open_Image"
0603 0169 | i | .STRTAB 0x0169->0x06b7 ; "Ada.Set_Root"
; "Ada.Set_Root"
0604 0173 | s | .STRTAB 0x0173->0x06bd ; "Ada.Close"
0605 017a | z | .STRTAB 0x017a->0x06c2 ; "Ada_Utilities.Close_Image"
0606 0191 | | .STRTAB 0x0191->0x06ce ; "Decl_Attr="
0607 0199 | | .STRTAB 0x0199->0x06d3 ; "Make_Nonsource_Separate"
0608 01ae | | .STRTAB 0x01ae->0x06df ; "Object is not separable"
0609 01c3 | | .STRTAB 0x01c3->0x06ea ; "Object has a separated overload"
060a 01e0 | | .STRTAB 0x01e0->0x06fa ; "Object is separate"
060b 01f0 | | .STRTAB 0x01f0->0x0703 ; "<WORLDS>"
060c 01f6 | | .STRTAB 0x01f6->0x0707 ; "Decl_Ops.Promote"
060d 0204 | | .STRTAB 0x0204->0x070f ; "Tree kind is "
060e 020f | | .STRTAB 0x020f->0x0715 ; "Make_Source_Separate.Make_Stub"
060f 022b | + | .STREND 0x022b->0x0724
0610 4e4f 545f |NOT_| .STRTAB_STRINGS
0725 0000 0000 | | .XXX[0x3]
0727 0000 | |
0728 ; --------------------------------------------------------------------------------------
0728 ; Debug Table
0728 ; --------------------------------------------------------------------------------------
0728 0003 000e | | .CONST 0x0003,0x000e
072a 000b 079a | | .DEBUG 0x000b,0x079a,0x8000,0x0000,0x0057,0x9455,0x0000,0x0006
0732 001b 079c | | .DEBUG 0x001b,0x079c,0x8001,0x0000,0x0057,0x9455,0x0000,0x0006
073a 006b 07dc | k | .DEBUG 0x006b,0x07dc,0x0005,0x0000,0x0057,0x9465,0x0000,0x004c
0742 0083 07de | | .DEBUG 0x0083,0x07de,0x0001,0x0000,0x0057,0x9465,0x0000,0x0063
074a 009b 07e6 | | .DEBUG 0x009b,0x07e6,0x0002,0x0000,0x0057,0x9465,0x0000,0x008c
0752 0173 0878 | s x| .DEBUG 0x0173,0x0878,0x0002,0x0000,0x0057,0x9465,0x0000,0x02f9
075a 0183 0882 | | .DEBUG 0x0183,0x0882,0x0002,0x0000,0x0057,0x9465,0x0000,0x0321
0762 0223 08d8 | # | .DEBUG 0x0223,0x08d8,0x0001,0x0000,0x0057,0x9465,0x0000,0x04a7
076a 03ab 094e | N| .DEBUG 0x03ab,0x094e,0x0001,0x0000,0x0057,0x9465,0x0000,0x0848
0772 0423 0970 | # p| .DEBUG 0x0423,0x0970,0x0002,0x0000,0x0057,0x9465,0x0000,0x00b9
077a 04d3 09f4 | | .DEBUG 0x04d3,0x09f4,0x0002,0x0000,0x0057,0x9465,0x0000,0x0181
0782 050b 0a1e | | .DEBUG 0x050b,0x0a1e,0x0002,0x0000,0x0057,0x9465,0x0000,0x036f
078a 0543 0a3c | C <| .DEBUG 0x0543,0x0a3c,0x0001,0x0000,0x0057,0x9465,0x0000,0x0522
0792 05ab 0a58 | X| .DEBUG 0x05ab,0x0a58,0x0002,0x0000,0x0057,0x9465,0x0000,0x05cb
079a ; --------------------------------------------------------------------------------------
079a ; Debug3 Subtable 0x0
079a ; --------------------------------------------------------------------------------------
079a 0000 0000 | | .DBG3TAB 0x0000,0x0000
079c ; --------------------------------------------------------------------------------------
079c ; Debug3 Subtable 0x1
079c ; --------------------------------------------------------------------------------------
079c 000f 0010 | | .DBG3TAB 0x000f,0x0010
079e 001b ffff | | .CONST 0x001b,0xffff
07a0 001c fffe | | .CONST 0x001c,0xfffe
07a2 001d fffd | | .CONST 0x001d,0xfffd
07a4 001e fffc | | .CONST 0x001e,0xfffc
07a6 001f fffb | | .CONST 0x001f,0xfffb
07a8 0021 fffa | ! | .CONST 0x0021,0xfffa
07aa 0026 fff9 | & | .CONST 0x0026,0xfff9
07ac 0028 fff8 | ( | .CONST 0x0028,0xfff8
07ae 002b fff7 | + | .CONST 0x002b,0xfff7
07b0 002c fff6 | , | .CONST 0x002c,0xfff6
07b2 002e fff5 | . | .CONST 0x002e,0xfff5
07b4 0030 fff4 | 0 | .CONST 0x0030,0xfff4
07b6 0032 fff3 | 2 | .CONST 0x0032,0xfff3
07b8 0034 fff2 | 4 | .CONST 0x0034,0xfff2
07ba 0036 fff1 | 6 | .CONST 0x0036,0xfff1
07bc 0038 0001 | 8 | .CONST 0x0038,0x0001
07be 003c 0002 | < | .CONST 0x003c,0x0002
07c0 003d 0401 | = | .CONST 0x003d,0x0401
07c2 003f 0402 | ? | .CONST 0x003f,0x0402
07c4 0040 0403 | @ | .CONST 0x0040,0x0403
07c6 0041 0404 | A | .CONST 0x0041,0x0404
07c8 0042 0002 | B | .CONST 0x0042,0x0002
07ca 004a 0004 | J | .CONST 0x004a,0x0004
07cc 004b 0003 | K | .CONST 0x004b,0x0003
07ce 0050 0005 | P | .CONST 0x0050,0x0005
07d0 0053 0006 | S | .CONST 0x0053,0x0006
07d2 0055 0007 | U | .CONST 0x0055,0x0007
07d4 0056 0008 | V | .CONST 0x0056,0x0008
07d6 005b 0009 | [ | .CONST 0x005b,0x0009
07d8 005f 000a | _ | .CONST 0x005f,0x000a
07da 0066 000b | f | .CONST 0x0066,0x000b
07dc ; --------------------------------------------------------------------------------------
07dc ; Debug3 Subtable 0x2
07dc ; --------------------------------------------------------------------------------------
07dc 0000 0000 | | .DBG3TAB 0x0000,0x0000
07de ; --------------------------------------------------------------------------------------
07de ; Debug3 Subtable 0x3
07de ; --------------------------------------------------------------------------------------
07de 0000 0003 | | .DBG3TAB 0x0000,0x0003
07e0 0083 0001 | | .CONST 0x0083,0x0001
07e2 0085 0002 | | .CONST 0x0085,0x0002
07e4 0090 0003 | | .CONST 0x0090,0x0003
07e6 ; --------------------------------------------------------------------------------------
07e6 ; Debug3 Subtable 0x4
07e6 ; --------------------------------------------------------------------------------------
07e6 0007 0041 | A| .DBG3TAB 0x0007,0x0041
07e8 009b ffff | | .CONST 0x009b,0xffff
07ea 009c fffe | | .CONST 0x009c,0xfffe
07ec 009d fffd | | .CONST 0x009d,0xfffd
07ee 009e fffc | | .CONST 0x009e,0xfffc
07f0 009f fffb | | .CONST 0x009f,0xfffb
07f2 00a0 fffa | | .CONST 0x00a0,0xfffa
07f4 00a2 fff9 | | .CONST 0x00a2,0xfff9
07f6 00a4 0001 | | .CONST 0x00a4,0x0001
07f8 00aa 0002 | | .CONST 0x00aa,0x0002
07fa 00b0 0401 | | .CONST 0x00b0,0x0401
07fc 00b2 0801 | | .CONST 0x00b2,0x0801
07fe 00b4 0802 | | .CONST 0x00b4,0x0802
0800 00b5 0803 | | .CONST 0x00b5,0x0803
0802 00b6 0804 | | .CONST 0x00b6,0x0804
0804 00b8 0401 | | .CONST 0x00b8,0x0401
0806 00bf 0002 | | .CONST 0x00bf,0x0002
0808 00c1 0003 | | .CONST 0x00c1,0x0003
080a 00c5 0004 | | .CONST 0x00c5,0x0004
080c 00cb 0005 | | .CONST 0x00cb,0x0005
080e 00cd 0c01 | | .CONST 0x00cd,0x0c01
0810 00cf 0c02 | | .CONST 0x00cf,0x0c02
0812 00d1 0c03 | | .CONST 0x00d1,0x0c03
0814 00d5 0c04 | | .CONST 0x00d5,0x0c04
0816 00d9 0c05 | | .CONST 0x00d9,0x0c05
0818 00db 1001 | | .CONST 0x00db,0x1001
081a 00dd 1002 | | .CONST 0x00dd,0x1002
081c 00de 1003 | | .CONST 0x00de,0x1003
081e 00df 1004 | | .CONST 0x00df,0x1004
0820 00e1 0c05 | | .CONST 0x00e1,0x0c05
0822 00eb 1401 | | .CONST 0x00eb,0x1401
0824 00ed 1402 | | .CONST 0x00ed,0x1402
0826 00ee 1403 | | .CONST 0x00ee,0x1403
0828 00ef 1404 | | .CONST 0x00ef,0x1404
082a 00f1 1004 | | .CONST 0x00f1,0x1004
082c 00ff 0005 | | .CONST 0x00ff,0x0005
082e 0101 0006 | | .CONST 0x0101,0x0006
0830 0103 0007 | | .CONST 0x0103,0x0007
0832 0105 0008 | | .CONST 0x0105,0x0008
0834 010b 0009 | | .CONST 0x010b,0x0009
0836 010d 000a | | .CONST 0x010d,0x000a
0838 010e 1801 | | .CONST 0x010e,0x1801
083a 0110 1802 | | .CONST 0x0110,0x1802
083c 0111 1803 | | .CONST 0x0111,0x1803
083e 0112 1804 | | .CONST 0x0112,0x1804
0840 0113 000a | | .CONST 0x0113,0x000a
0842 0115 000b | | .CONST 0x0115,0x000b
0844 011a 000c | | .CONST 0x011a,0x000c
0846 011f 000d | | .CONST 0x011f,0x000d
0848 0120 1c01 | | .CONST 0x0120,0x1c01
084a 0122 1c02 | " | .CONST 0x0122,0x1c02
084c 0123 1c03 | # | .CONST 0x0123,0x1c03
084e 0124 1c04 | $ | .CONST 0x0124,0x1c04
0850 0125 000d | % | .CONST 0x0125,0x000d
0852 012d 0010 | - | .CONST 0x012d,0x0010
0854 0133 0011 | 3 | .CONST 0x0133,0x0011
0856 0135 000e | 5 | .CONST 0x0135,0x000e
0858 013c 000f | < | .CONST 0x013c,0x000f
085a 0141 0012 | A | .CONST 0x0141,0x0012
085c 0142 2001 | B | .CONST 0x0142,0x2001
085e 0144 2002 | D | .CONST 0x0144,0x2002
0860 0145 2003 | E | .CONST 0x0145,0x2003
0862 0146 2004 | F | .CONST 0x0146,0x2004
0864 0147 0012 | G | .CONST 0x0147,0x0012
0866 0149 0014 | I | .CONST 0x0149,0x0014
0868 014f 0015 | O | .CONST 0x014f,0x0015
086a 0151 0013 | Q | .CONST 0x0151,0x0013
086c 0156 0016 | V | .CONST 0x0156,0x0016
086e 015c 0017 | \ | .CONST 0x015c,0x0017
0870 0162 0018 | b | .CONST 0x0162,0x0018
0872 0164 0019 | d | .CONST 0x0164,0x0019
0874 0167 001a | g | .CONST 0x0167,0x001a
0876 0169 001b | i | .CONST 0x0169,0x001b
0878 ; --------------------------------------------------------------------------------------
0878 ; Debug3 Subtable 0x5
0878 ; --------------------------------------------------------------------------------------
0878 0001 0003 | | .DBG3TAB 0x0001,0x0003
087a 0173 ffff | s | .CONST 0x0173,0xffff
087c 0174 0001 | t | .CONST 0x0174,0x0001
087e 0178 0002 | x | .CONST 0x0178,0x0002
0880 017c 0003 | | | .CONST 0x017c,0x0003
0882 ; --------------------------------------------------------------------------------------
0882 ; Debug3 Subtable 0x6
0882 ; --------------------------------------------------------------------------------------
0882 0007 0023 | #| .DBG3TAB 0x0007,0x0023
0884 0183 ffff | | .CONST 0x0183,0xffff
0886 0184 fffe | | .CONST 0x0184,0xfffe
0888 0185 fffd | | .CONST 0x0185,0xfffd
088a 0186 fffc | | .CONST 0x0186,0xfffc
088c 018b fffb | | .CONST 0x018b,0xfffb
088e 018e fffa | | .CONST 0x018e,0xfffa
0890 0190 fff9 | | .CONST 0x0190,0xfff9
0892 0192 0001 | | .CONST 0x0192,0x0001
0894 0194 0002 | | .CONST 0x0194,0x0002
0896 01a5 0003 | | .CONST 0x01a5,0x0003
0898 01af 0004 | | .CONST 0x01af,0x0004
089a 01b1 0005 | | .CONST 0x01b1,0x0005
089c 01b3 0006 | | .CONST 0x01b3,0x0006
089e 01b7 0007 | | .CONST 0x01b7,0x0007
08a0 01ba 0401 | | .CONST 0x01ba,0x0401
08a2 01bc 0402 | | .CONST 0x01bc,0x0402
08a4 01be 0403 | | .CONST 0x01be,0x0403
08a6 01c2 0404 | | .CONST 0x01c2,0x0404
08a8 01c6 0405 | | .CONST 0x01c6,0x0405
08aa 01c8 0801 | | .CONST 0x01c8,0x0801
08ac 01ca 0802 | | .CONST 0x01ca,0x0802
08ae 01cb 0803 | | .CONST 0x01cb,0x0803
08b0 01cc 0804 | | .CONST 0x01cc,0x0804
08b2 01ce 0405 | | .CONST 0x01ce,0x0405
08b4 01d8 0c01 | | .CONST 0x01d8,0x0c01
08b6 01da 0c02 | | .CONST 0x01da,0x0c02
08b8 01db 0c03 | | .CONST 0x01db,0x0c03
08ba 01dc 0c04 | | .CONST 0x01dc,0x0c04
08bc 01de 0804 | | .CONST 0x01de,0x0804
08be 01ec 0007 | | .CONST 0x01ec,0x0007
08c0 01ed 0008 | | .CONST 0x01ed,0x0008
08c2 01f3 0009 | | .CONST 0x01f3,0x0009
08c4 01f4 1001 | | .CONST 0x01f4,0x1001
08c6 01f5 0009 | | .CONST 0x01f5,0x0009
08c8 01fe 1401 | | .CONST 0x01fe,0x1401
08ca 01ff 1001 | | .CONST 0x01ff,0x1001
08cc 0206 000a | | .CONST 0x0206,0x000a
08ce 020a 000b | | .CONST 0x020a,0x000b
08d0 020e 000c | | .CONST 0x020e,0x000c
08d2 0212 000d | | .CONST 0x0212,0x000d
08d4 0214 000e | | .CONST 0x0214,0x000e
08d6 0218 000f | | .CONST 0x0218,0x000f
08d8 ; --------------------------------------------------------------------------------------
08d8 ; Debug3 Subtable 0x7
08d8 ; --------------------------------------------------------------------------------------
08d8 0012 0028 | (| .DBG3TAB 0x0012,0x0028
08da 0223 ffff | # | .CONST 0x0223,0xffff
08dc 0224 fffe | $ | .CONST 0x0224,0xfffe
08de 0225 fffd | % | .CONST 0x0225,0xfffd
08e0 0226 fffc | & | .CONST 0x0226,0xfffc
08e2 0227 fffb | ' | .CONST 0x0227,0xfffb
08e4 0228 fffa | ( | .CONST 0x0228,0xfffa
08e6 0229 fff9 | ) | .CONST 0x0229,0xfff9
08e8 022a fff8 | * | .CONST 0x022a,0xfff8
08ea 022b fff7 | + | .CONST 0x022b,0xfff7
08ec 0230 fff6 | 0 | .CONST 0x0230,0xfff6
08ee 0235 fff5 | 5 | .CONST 0x0235,0xfff5
08f0 023a fff4 | : | .CONST 0x023a,0xfff4
08f2 0240 fff3 | @ | .CONST 0x0240,0xfff3
08f4 0246 fff2 | F | .CONST 0x0246,0xfff2
08f6 0248 fff1 | H | .CONST 0x0248,0xfff1
08f8 024d fff0 | M | .CONST 0x024d,0xfff0
08fa 0252 ffef | R | .CONST 0x0252,0xffef
08fc 0254 ffee | T | .CONST 0x0254,0xffee
08fe 0256 0001 | V | .CONST 0x0256,0x0001
0900 025e 0002 | ^ | .CONST 0x025e,0x0002
0902 0261 0003 | a | .CONST 0x0261,0x0003
0904 0270 0004 | p | .CONST 0x0270,0x0004
0906 0275 0005 | u | .CONST 0x0275,0x0005
0908 027b 0006 | { | .CONST 0x027b,0x0006
090a 0284 0007 | | .CONST 0x0284,0x0007
090c 028d 0008 | | .CONST 0x028d,0x0008
090e 0292 0009 | | .CONST 0x0292,0x0009
0910 0296 000a | | .CONST 0x0296,0x000a
0912 029a 000b | | .CONST 0x029a,0x000b
0914 02a0 000c | | .CONST 0x02a0,0x000c
0916 02a4 000d | | .CONST 0x02a4,0x000d
0918 02ae 000e | | .CONST 0x02ae,0x000e
091a 02b1 000f | | .CONST 0x02b1,0x000f
091c 02b8 0010 | | .CONST 0x02b8,0x0010
091e 02cd 0011 | | .CONST 0x02cd,0x0011
0920 02d2 0012 | | .CONST 0x02d2,0x0012
0922 02f4 0013 | | .CONST 0x02f4,0x0013
0924 02f9 0014 | | .CONST 0x02f9,0x0014
0926 0314 0015 | | .CONST 0x0314,0x0015
0928 0319 0016 | | .CONST 0x0319,0x0016
092a 0330 0017 | 0 | .CONST 0x0330,0x0017
092c 0335 0018 | 5 | .CONST 0x0335,0x0018
092e 0339 0019 | 9 | .CONST 0x0339,0x0019
0930 0343 001a | C | .CONST 0x0343,0x001a
0932 034b 001b | K | .CONST 0x034b,0x001b
0934 0351 001c | Q | .CONST 0x0351,0x001c
0936 0355 001d | U | .CONST 0x0355,0x001d
0938 035e 001e | ^ | .CONST 0x035e,0x001e
093a 0363 001f | c | .CONST 0x0363,0x001f
093c 036e 0020 | n | .CONST 0x036e,0x0020
093e 0373 0021 | s !| .CONST 0x0373,0x0021
0940 037d 0022 | } "| .CONST 0x037d,0x0022
0942 0382 0023 | #| .CONST 0x0382,0x0023
0944 0385 0024 | $| .CONST 0x0385,0x0024
0946 038d 0025 | %| .CONST 0x038d,0x0025
0948 0392 0026 | &| .CONST 0x0392,0x0026
094a 0394 0027 | '| .CONST 0x0394,0x0027
094c 0399 0028 | (| .CONST 0x0399,0x0028
094e ; --------------------------------------------------------------------------------------
094e ; Debug3 Subtable 0x8
094e ; --------------------------------------------------------------------------------------
094e 0006 000a | | .DBG3TAB 0x0006,0x000a
0950 03ab ffff | | .CONST 0x03ab,0xffff
0952 03ac fffe | | .CONST 0x03ac,0xfffe
0954 03ad fffd | | .CONST 0x03ad,0xfffd
0956 03ae fffc | | .CONST 0x03ae,0xfffc
0958 03b3 fffb | | .CONST 0x03b3,0xfffb
095a 03b9 fffa | | .CONST 0x03b9,0xfffa
095c 03bb 0001 | | .CONST 0x03bb,0x0001
095e 03be 0002 | | .CONST 0x03be,0x0002
0960 03c8 0003 | | .CONST 0x03c8,0x0003
0962 03d5 0004 | | .CONST 0x03d5,0x0004
0964 03d7 0005 | | .CONST 0x03d7,0x0005
0966 03ec 0006 | | .CONST 0x03ec,0x0006
0968 03f1 0007 | | .CONST 0x03f1,0x0007
096a 040f 0008 | | .CONST 0x040f,0x0008
096c 0414 0009 | | .CONST 0x0414,0x0009
096e 0416 000a | | .CONST 0x0416,0x000a
0970 ; --------------------------------------------------------------------------------------
0970 ; Debug3 Subtable 0x9
0970 ; --------------------------------------------------------------------------------------
0970 0004 003d | =| .DBG3TAB 0x0004,0x003d
0972 0423 ffff | # | .CONST 0x0423,0xffff
0974 0424 fffe | $ | .CONST 0x0424,0xfffe
0976 0425 fffd | % | .CONST 0x0425,0xfffd
0978 0426 fffc | & | .CONST 0x0426,0xfffc
097a 042a 0001 | * | .CONST 0x042a,0x0001
097c 0430 0002 | 0 | .CONST 0x0430,0x0002
097e 0432 0401 | 2 | .CONST 0x0432,0x0401
0980 0434 0801 | 4 | .CONST 0x0434,0x0801
0982 0436 0802 | 6 | .CONST 0x0436,0x0802
0984 0437 0803 | 7 | .CONST 0x0437,0x0803
0986 0438 0804 | 8 | .CONST 0x0438,0x0804
0988 043a 0401 | : | .CONST 0x043a,0x0401
098a 0441 0002 | A | .CONST 0x0441,0x0002
098c 0442 0003 | B | .CONST 0x0442,0x0003
098e 0444 0004 | D | .CONST 0x0444,0x0004
0990 0448 0005 | H | .CONST 0x0448,0x0005
0992 044f 0007 | O | .CONST 0x044f,0x0007
0994 0451 0c01 | Q | .CONST 0x0451,0x0c01
0996 0453 0c02 | S | .CONST 0x0453,0x0c02
0998 0455 0c03 | U | .CONST 0x0455,0x0c03
099a 0459 0c04 | Y | .CONST 0x0459,0x0c04
099c 045d 0c05 | ] | .CONST 0x045d,0x0c05
099e 045f 1001 | _ | .CONST 0x045f,0x1001
09a0 0461 1002 | a | .CONST 0x0461,0x1002
09a2 0462 1003 | b | .CONST 0x0462,0x1003
09a4 0463 1004 | c | .CONST 0x0463,0x1004
09a6 0465 0c05 | e | .CONST 0x0465,0x0c05
09a8 046f 1401 | o | .CONST 0x046f,0x1401
09aa 0471 1402 | q | .CONST 0x0471,0x1402
09ac 0472 1403 | r | .CONST 0x0472,0x1403
09ae 0473 1404 | s | .CONST 0x0473,0x1404
09b0 0475 1004 | u | .CONST 0x0475,0x1004
09b2 0483 0007 | | .CONST 0x0483,0x0007
09b4 0484 0008 | | .CONST 0x0484,0x0008
09b6 0485 1801 | | .CONST 0x0485,0x1801
09b8 0487 1802 | | .CONST 0x0487,0x1802
09ba 0489 1803 | | .CONST 0x0489,0x1803
09bc 048c 0008 | | .CONST 0x048c,0x0008
09be 048d 0009 | | .CONST 0x048d,0x0009
09c0 048e 1c01 | | .CONST 0x048e,0x1c01
09c2 0490 1c02 | | .CONST 0x0490,0x1c02
09c4 0491 1c03 | | .CONST 0x0491,0x1c03
09c6 0492 1c04 | | .CONST 0x0492,0x1c04
09c8 0493 0009 | | .CONST 0x0493,0x0009
09ca 0499 000e | | .CONST 0x0499,0x000e
09cc 049a 000a | | .CONST 0x049a,0x000a
09ce 049d 2001 | | .CONST 0x049d,0x2001
09d0 049f 2002 | | .CONST 0x049f,0x2002
09d2 04a0 2003 | | .CONST 0x04a0,0x2003
09d4 04a1 2004 | | .CONST 0x04a1,0x2004
09d6 04a3 000a | | .CONST 0x04a3,0x000a
09d8 04a5 000b | | .CONST 0x04a5,0x000b
09da 04ab 000c | | .CONST 0x04ab,0x000c
09dc 04ad 2401 | $ | .CONST 0x04ad,0x2401
09de 04af 2801 | ( | .CONST 0x04af,0x2801
09e0 04b1 2802 | ( | .CONST 0x04b1,0x2802
09e2 04b2 2803 | ( | .CONST 0x04b2,0x2803
09e4 04b3 2804 | ( | .CONST 0x04b3,0x2804
09e6 04b5 2401 | $ | .CONST 0x04b5,0x2401
09e8 04bc 000c | | .CONST 0x04bc,0x000c
09ea 04c4 000d | | .CONST 0x04c4,0x000d
09ec 04c7 0006 | | .CONST 0x04c7,0x0006
09ee 04c8 2c01 | , | .CONST 0x04c8,0x2c01
09f0 04ca 0006 | | .CONST 0x04ca,0x0006
09f2 04cb 000f | | .CONST 0x04cb,0x000f
09f4 ; --------------------------------------------------------------------------------------
09f4 ; Debug3 Subtable 0xa
09f4 ; --------------------------------------------------------------------------------------
09f4 0000 0014 | | .DBG3TAB 0x0000,0x0014
09f6 04d3 0001 | | .CONST 0x04d3,0x0001
09f8 04d4 0401 | | .CONST 0x04d4,0x0401
09fa 04d6 0402 | | .CONST 0x04d6,0x0402
09fc 04d7 0403 | | .CONST 0x04d7,0x0403
09fe 04d8 0404 | | .CONST 0x04d8,0x0404
0a00 04d9 0001 | | .CONST 0x04d9,0x0001
0a02 04df 0009 | | .CONST 0x04df,0x0009
0a04 04e5 000a | | .CONST 0x04e5,0x000a
0a06 04e7 0002 | | .CONST 0x04e7,0x0002
0a08 04ea 0003 | | .CONST 0x04ea,0x0003
0a0a 04f0 0004 | | .CONST 0x04f0,0x0004
0a0c 04f2 0005 | | .CONST 0x04f2,0x0005
0a0e 04f5 0801 | | .CONST 0x04f5,0x0801
0a10 04f7 0802 | | .CONST 0x04f7,0x0802
0a12 04f8 0803 | | .CONST 0x04f8,0x0803
0a14 04f9 0804 | | .CONST 0x04f9,0x0804
0a16 04fb 0005 | | .CONST 0x04fb,0x0005
0a18 04fd 0007 | | .CONST 0x04fd,0x0007
0a1a 0503 0008 | | .CONST 0x0503,0x0008
0a1c 0505 0006 | | .CONST 0x0505,0x0006
0a1e ; --------------------------------------------------------------------------------------
0a1e ; Debug3 Subtable 0xb
0a1e ; --------------------------------------------------------------------------------------
0a1e 0003 000b | | .DBG3TAB 0x0003,0x000b
0a20 050b ffff | | .CONST 0x050b,0xffff
0a22 050c fffe | | .CONST 0x050c,0xfffe
0a24 050d fffd | | .CONST 0x050d,0xfffd
0a26 050e 0001 | | .CONST 0x050e,0x0001
0a28 0512 0002 | | .CONST 0x0512,0x0002
0a2a 0513 0401 | | .CONST 0x0513,0x0401
0a2c 0515 0402 | | .CONST 0x0515,0x0402
0a2e 0516 0403 | | .CONST 0x0516,0x0403
0a30 0517 0404 | | .CONST 0x0517,0x0404
0a32 0518 0002 | | .CONST 0x0518,0x0002
0a34 051a 0005 | | .CONST 0x051a,0x0005
0a36 0526 0003 | & | .CONST 0x0526,0x0003
0a38 052a 0004 | * | .CONST 0x052a,0x0004
0a3a 053d 0006 | = | .CONST 0x053d,0x0006
0a3c ; --------------------------------------------------------------------------------------
0a3c ; Debug3 Subtable 0xc
0a3c ; --------------------------------------------------------------------------------------
0a3c 0005 0008 | | .DBG3TAB 0x0005,0x0008
0a3e 0543 ffff | C | .CONST 0x0543,0xffff
0a40 0544 fffe | D | .CONST 0x0544,0xfffe
0a42 054a fffd | J | .CONST 0x054a,0xfffd
0a44 054c fffc | L | .CONST 0x054c,0xfffc
0a46 054e fffb | N | .CONST 0x054e,0xfffb
0a48 0551 0001 | Q | .CONST 0x0551,0x0001
0a4a 0553 0002 | S | .CONST 0x0553,0x0002
0a4c 0570 0003 | p | .CONST 0x0570,0x0003
0a4e 0572 0004 | r | .CONST 0x0572,0x0004
0a50 0574 0005 | t | .CONST 0x0574,0x0005
0a52 057d 0006 | } | .CONST 0x057d,0x0006
0a54 0582 0007 | | .CONST 0x0582,0x0007
0a56 05a2 0008 | | .CONST 0x05a2,0x0008
0a58 ; --------------------------------------------------------------------------------------
0a58 ; Debug3 Subtable 0xd
0a58 ; --------------------------------------------------------------------------------------
0a58 0001 0010 | | .DBG3TAB 0x0001,0x0010
0a5a 05ab ffff | | .CONST 0x05ab,0xffff
0a5c 05ac 0001 | | .CONST 0x05ac,0x0001
0a5e 05ad 0401 | | .CONST 0x05ad,0x0401
0a60 05af 0402 | | .CONST 0x05af,0x0402
0a62 05b0 0403 | | .CONST 0x05b0,0x0403
0a64 05b1 0404 | | .CONST 0x05b1,0x0404
0a66 05b2 0001 | | .CONST 0x05b2,0x0001
0a68 05b8 0005 | | .CONST 0x05b8,0x0005
0a6a 05ba 0801 | | .CONST 0x05ba,0x0801
0a6c 05bc 0802 | | .CONST 0x05bc,0x0802
0a6e 05bd 0803 | | .CONST 0x05bd,0x0803
0a70 05be 0804 | | .CONST 0x05be,0x0804
0a72 05bf 0005 | | .CONST 0x05bf,0x0005
0a74 05c8 0002 | | .CONST 0x05c8,0x0002
0a76 05d8 0003 | | .CONST 0x05d8,0x0003
0a78 05e4 0004 | | .CONST 0x05e4,0x0004
0a7a 05f0 0006 | | .CONST 0x05f0,0x0006
0a7c 0000 0000 | | .BLANK 0000[0x184]