|
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_0ea8df
└─⟦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 0720 | | .CONST 0x0720 ; 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,0x0792,0x8000,0x0000,0x005a,0x7e75,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,0x0794,0x8001,0x0000,0x005a,0x7e75,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 05ed | | Action Push_String_Extended,0x5ed ; "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 03a3 | | Declare_Subprogram For_Call,INIT_03a0 ; 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 6338 |c8 | Indirect_Literal Discrete,0x39c,{0x00000000, 0x5a8a0501}
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,0x07d4,0x0005,0x0000,0x005a,0x8a05,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 05ea | | Action Push_String_Extended_Indexed,0x5ea ; "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,0x07d6,0x0001,0x0000,0x005a,0x8a05,0x0000,0x0063
; Debug Table 0x3.0x0 = 0x83,0x1
0084 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0085 0092 05ee | | Action Push_String_Extended,0x5ee ; "Make_Separate."
; Debug Table 0x3.0x1 = 0x85,0x2
0087 00db | | Load_Top At_Offset_3
0088 01cc | | Execute Vector,Catenate
0089 0092 05ef | | Action Push_String_Extended,0x5ef ; " 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 630b |c | Indirect_Literal Discrete,0x39c,{0x00000000, 0x5a8a0501} ; 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,0x07de,0x0002,0x0000,0x005a,0x8a05,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 041b | | Declare_Subprogram For_Call,INIT_0418 ; Debug Table 0x4.0x5 = 0xa0,0xfffa
00a2 029f 04cb | | Declare_Subprogram For_Call,INIT_04c8 ; 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 05f0 | | Action Push_String_Extended,0x5f0 ; "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 05f1 | | Action Push_String_Extended,0x5f1 ; "Root is not Comp_Unit or Mumble_S"
; Debug Table 0x4.0x2e = 0x11a,0xc
011c 0092 05f2 | | Action Push_String_Extended,0x5f2 ; "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 05f3 | | Action Push_String_Extended,0x5f3 ; "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 05f3 | | Action Push_String_Extended,0x5f3 ; "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 05f4 | | Action Push_String_Extended,0x5f4 ; "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,0x0870,0x0002,0x0000,0x005a,0x8a05,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,0x087a,0x0002,0x0000,0x005a,0x8a05,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 0503 | | Declare_Subprogram For_Call,INIT_0500 ; 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,0x08d0,0x0001,0x0000,0x005a,0x8a05,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 053b | ;| Declare_Subprogram For_Call,INIT_0538 ; Debug Table 0x7.0x10 = 0x252,0xffef
0254 029f 05a3 | | Declare_Subprogram For_Call,INIT_05a0 ; 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 6132 |a2 | Indirect_Literal Discrete,0x398,{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 05f5 | | Action Push_String_Extended,0x5f5 ; "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 05f6 | | Action Push_String_Extended,0x5f6 ; "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 60d6 |` | Indirect_Literal Discrete,0x398,{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 05f7 | | Action Push_String_Extended,0x5f7 ; "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 60b7 |` | Indirect_Literal Discrete,0x398,{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 05f8 | | Action Push_String_Extended,0x5f8 ; "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 6090 |` | Indirect_Literal Discrete,0x398,{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 05f9 | | Action Push_String_Extended,0x5f9 ; "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 05fa | | Action Push_String_Extended,0x5fa ; "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 05fb | | Action Push_String_Extended,0x5fb ; "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 05fc | | Action Push_String_Extended,0x5fc ; "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 05fd | | Action Push_String_Extended,0x5fd ; "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 6011 |` | Indirect_Literal Discrete,0x39c,{0x00000000, 0x5a8a0501}
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 0100 | | Execute Exception,Raise
0395 0000 0000 | | .XXX[0x3]
0397 0000 | |
0398 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
039c 0000 0000 | | .LITERAL {0x00000000, 0x5a8a0501}
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03b3 | | .CONST 0x03b3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0007 | | .CONST 0x0007 ; Number of locals
03a3 INIT_03a0:
03a3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8 = .DEBUG 0x03a3,0x0942,0x0001,0x0000,0x005a,0x8a05,0x0000,0x083a
; Debug Table 0x8.0x0 = 0x3a3,0xffff
03a4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x1 = 0x3a4,0xfffe
03a5 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x2 = 0x3a5,0xfffd
03a6 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x3 = 0x3a6,0xfffc
03a7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a8 02c7 | | Declare_Variable Any
03a9 00d8 | | Load_Top At_Offset_0
03aa 1c00 | | Execute_Immediate Run_Utility,0x0
03ab e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x4 = 0x3ab,0xfffb
03ac 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03ad 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03ae 02c7 | | Declare_Variable Any
03af 00d8 | | Load_Top At_Offset_0
03b0 1c00 | | Execute_Immediate Run_Utility,0x0
03b1 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x5 = 0x3b1,0xfffa
03b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b3 BODY_03a0:
03b3 e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x6 = 0x3b3,0x1
03b4 0e02 | | Execute_Immediate Not_Equal,0x2
03b5 680a |h | Jump_Zero 0x3c0
03b6 0092 05fe | | Action Push_String_Extended,0x5fe ; "Decl_Attr="
; Debug Table 0x8.0x7 = 0x3b6,0x2
03b8 e404 | | Load 0x2,0x4
03b9 e403 | | Load 0x2,0x3
03ba 025e | ^ | Execute Discrete,Convert
03bb 1c01 | | Execute_Immediate Run_Utility,0x1
03bc 01cc | | Execute Vector,Catenate
03bd 0092 05ff | | Action Push_String_Extended,0x5ff ; "Make_Nonsource_Separate"
03bf 8406 | | Call 0x2,0x6
03c0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x8 = 0x3c0,0x3
03c1 00ec | | Load_Encached Diana_Tree_Cache
03c2 4801 |H | Short_Literal 0x1
03c3 4802 |H | Short_Literal 0x2
03c4 e013 | | Load 0x0,0x13
03c5 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
03c6 e7ff | | Load 0x3,-0x1
03c7 e00f | | Load 0x0,0xf
03c8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03c9 e00f | | Load 0x0,0xf
03ca 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03cb c604 | | Store 0x3,0x4
03cc c602 | | Store 0x3,0x2
03cd e602 | | Load 0x3,0x2 ; Debug Table 0x8.0x9 = 0x3cd,0x4
03ce 6842 |hB | Jump_Zero 0x411
03cf e001 | | Load 0x0,0x1 ; Debug Table 0x8.0xa = 0x3cf,0x5
03d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d1 00db | | Load_Top At_Offset_3
03d2 0120 | | Execute Any,Is_Value
03d3 6803 |h | Jump_Zero 0x3d7
03d4 e001 | | Load 0x0,0x1
03d5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d6 7801 |x | Jump 0x3d8
03d7 00db | | Load_Top At_Offset_3
03d8 67bf |g | Indirect_Literal Discrete,0x398,{0x00000000, 0x00004000}
03d9 e00e | | Load 0x0,0xe
03da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03db 4800 |H | Short_Literal 0x0
03dc e001 | | Load 0x0,0x1
03dd 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03de e604 | | Load 0x3,0x4
03df e001 | | Load 0x0,0x1
03e0 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
03e1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03e2 c605 | | Store 0x3,0x5
03e3 0059 | Y | Store_Top Discrete,At_Offset_1
03e4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xb = 0x3e4,0x6
03e5 0092 05f7 | | Action Push_String_Extended,0x5f7 ; "Traversal.Get_Object"
03e7 e00f | | Load 0x0,0xf
03e8 180f | | Execute Package,Field_Execute,Field_Number 0xf
03e9 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0xc = 0x3e9,0x7
03ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03eb 00da | | Load_Top At_Offset_2
03ec 0120 | | Execute Any,Is_Value
03ed 6804 |h | Jump_Zero 0x3f2
03ee e001 | | Load 0x0,0x1
03ef 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03f0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03f1 7801 |x | Jump 0x3f3
03f2 00da | | Load_Top At_Offset_2
03f3 e001 | | Load 0x0,0x1
03f4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03f5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03f6 67a1 |g | Indirect_Literal Discrete,0x398,{0x00000000, 0x00004000}
03f7 4801 |H | Short_Literal 0x1
03f8 4800 |H | Short_Literal 0x0
03f9 4800 |H | Short_Literal 0x0
03fa e00e | | Load 0x0,0xe
03fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03fc 4800 |H | Short_Literal 0x0
03fd e605 | | Load 0x3,0x5
03fe e001 | | Load 0x0,0x1
03ff 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0400 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0401 e001 | | Load 0x0,0x1
0402 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0403 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0404 c603 | | Store 0x3,0x3
0405 c606 | | Store 0x3,0x6
0406 0059 | Y | Store_Top Discrete,At_Offset_1
0407 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xd = 0x407,0x8
0408 0092 05f9 | | Action Push_String_Extended,0x5f9 ; "Ada.Open"
040a e00f | | Load 0x0,0xf
040b 180f | | Execute Package,Field_Execute,Field_Number 0xf
040c 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xe = 0x40c,0x9
040d a404 | | Store_Unchecked 0x2,0x4
040e e603 | | Load 0x3,0x3 ; Debug Table 0x8.0xf = 0x40e,0xa
040f 840a | | Call 0x2,0xa
0410 c603 | | Store 0x3,0x3
0411 4501 |E | Exit_Subprogram 0x1
0412 0000 0000 | | .BLANK 0000[0x6]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0422 | " | .CONST 0x0422 ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0005 | | .CONST 0x0005 ; Number of locals
041b INIT_0418:
041b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x041b,0x0964,0x0002,0x0000,0x005a,0x8a05,0x0000,0x00b9
; Debug Table 0x9.0x0 = 0x41b,0xffff
041c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x1 = 0x41c,0xfffe
041d 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9.0x2 = 0x41d,0xfffd
041e 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x9.0x3 = 0x41e,0xfffc
041f 02c7 | | Declare_Variable Any
0420 00d8 | | Load_Top At_Offset_0
0421 1c00 | | Execute_Immediate Run_Utility,0x0
0422 BODY_0418:
0422 e9ff | | Load 0x4,-0x1 ; Debug Table 0x9.0x4 = 0x422,0x1
0423 4976 |Iv | Short_Literal 0x176
0424 00eb | | Load_Encached Diana_Cache
0425 0098 | | Execute Package,Field_Read_Dynamic
0426 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0427 a802 | | Store_Unchecked 0x4,0x2
0428 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x5 = 0x428,0x2
0429 0007 | | Action Break_Optional
042a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x42a,0x401
042b 0007 | | Action Break_Optional
042c e807 | | Load 0x4,0x7 ; Debug Table 0x9.0x7 = 0x42c,0x801
042d 0007 | | Action Break_Optional
042e 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x8 = 0x42e,0x802
042f 0007 | | Action Break_Optional ; Debug Table 0x9.0x9 = 0x42f,0x803
0430 00d0 | | Action Swap_Control ; Debug Table 0x9.0xa = 0x430,0x804
0431 00d1 | | Pop_Control Pop_Count_1
0432 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x9.0xb = 0x432,0x401
0433 00eb | | Load_Encached Diana_Cache
0434 0098 | | Execute Package,Field_Read_Dynamic
0435 180d | | Execute Package,Field_Execute,Field_Number 0xd
0436 7800 |x | Jump 0x437
0437 00d0 | | Action Swap_Control
0438 00d1 | | Pop_Control Pop_Count_1
0439 7002 |p | Jump_Nonzero 0x43c ; Debug Table 0x9.0xc = 0x439,0x2
043a 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xd = 0x43a,0x3
043b 4401 |D | Exit_Subprogram With_Result,0x1
043c 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0xe = 0x43c,0x4
043d 00eb | | Load_Encached Diana_Cache
043e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
043f c805 | | Store 0x4,0x5
0440 e9ff | | Load 0x4,-0x1 ; Debug Table 0x9.0xf = 0x440,0x5
0441 00eb | | Load_Encached Diana_Cache
0442 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0443 00eb | | Load_Encached Diana_Cache
0444 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0445 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0446 7878 |xx | Jump 0x4bf
0447 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x10 = 0x447,0x7
0448 0007 | | Action Break_Optional
0449 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x11 = 0x449,0xc01
044a 7002 |p | Jump_Nonzero 0x44d
044b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x12 = 0x44b,0xc02
044c 782c |x, | Jump 0x479
044d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x13 = 0x44d,0xc03
044e 0217 | | Execute Heap_Access,All_Reference
044f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0450 6804 |h | Jump_Zero 0x455
0451 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x14 = 0x451,0xc04
0452 0217 | | Execute Heap_Access,All_Reference
0453 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0454 7824 |x$ | Jump 0x479
0455 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x15 = 0x455,0xc05
0456 0007 | | Action Break_Optional
0457 e807 | | Load 0x4,0x7 ; Debug Table 0x9.0x16 = 0x457,0x1001
0458 0007 | | Action Break_Optional
0459 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x9.0x17 = 0x459,0x1002
045a 0007 | | Action Break_Optional ; Debug Table 0x9.0x18 = 0x45a,0x1003
045b 00d0 | | Action Swap_Control ; Debug Table 0x9.0x19 = 0x45b,0x1004
045c 00d1 | | Pop_Control Pop_Count_1
045d 49bb |I | Short_Literal 0x1bb ; Debug Table 0x9.0x1a = 0x45d,0xc05
045e 00eb | | Load_Encached Diana_Cache
045f 0098 | | Execute Package,Field_Read_Dynamic
0460 012c | , | Execute Any,Size
0461 e003 | | Load 0x0,0x3
0462 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0463 025b | [ | Execute Discrete,Check_In_Type
0464 0273 | s | Execute Discrete,Plus
0465 00d9 | | Load_Top At_Offset_1
0466 0007 | | Action Break_Optional
0467 e808 | | Load 0x4,0x8 ; Debug Table 0x9.0x1b = 0x467,0x1401
0468 0007 | | Action Break_Optional
0469 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x9.0x1c = 0x469,0x1402
046a 0007 | | Action Break_Optional ; Debug Table 0x9.0x1d = 0x46a,0x1403
046b 00d0 | | Action Swap_Control ; Debug Table 0x9.0x1e = 0x46b,0x1404
046c 00d1 | | Pop_Control Pop_Count_1
046d 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x9.0x1f = 0x46d,0x1004
046e 00eb | | Load_Encached Diana_Cache
046f 0098 | | Execute Package,Field_Read_Dynamic
0470 49c9 |I | Short_Literal 0x1c9
0471 00eb | | Load_Encached Diana_Cache
0472 0098 | | Execute Package,Field_Read_Dynamic
0473 49ca |I | Short_Literal 0x1ca
0474 00eb | | Load_Encached Diana_Cache
0475 0095 | | Execute Package,Field_Reference_Dynamic
0476 e004 | | Load 0x0,0x4
0477 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0478 7800 |x | Jump 0x479
0479 00d0 | | Action Swap_Control
047a 00d1 | | Pop_Control Pop_Count_1
047b 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0x9.0x20 = 0x47b,0x7
047c 0007 | | Action Break_Optional ; Debug Table 0x9.0x21 = 0x47c,0x8
047d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x22 = 0x47d,0x1801
047e 7002 |p | Jump_Nonzero 0x481
047f 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9.0x23 = 0x47f,0x1802
0480 7803 |x | Jump 0x484
0481 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x24 = 0x481,0x1803
0482 0217 | | Execute Heap_Access,All_Reference
0483 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0484 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x9.0x25 = 0x484,0x8
0485 0007 | | Action Break_Optional ; Debug Table 0x9.0x26 = 0x485,0x9
0486 e803 | | Load 0x4,0x3 ; Debug Table 0x9.0x27 = 0x486,0x1c01
0487 0007 | | Action Break_Optional
0488 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x28 = 0x488,0x1c02
0489 0007 | | Action Break_Optional ; Debug Table 0x9.0x29 = 0x489,0x1c03
048a 0007 | | Action Break_Optional ; Debug Table 0x9.0x2a = 0x48a,0x1c04
048b 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0x9.0x2b = 0x48b,0x9
048c 7005 |p | Jump_Nonzero 0x492
048d 0b46 | F | Execute_Immediate Case_Compare,0x46
048e 7003 |p | Jump_Nonzero 0x492
048f 0b47 | G | Execute_Immediate Case_Compare,0x47
0490 7001 |p | Jump_Nonzero 0x492
0491 782c |x, | Jump 0x4be ; Debug Table 0x9.0x2c = 0x491,0xe
0492 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x2d = 0x492,0xa
0493 00eb | | Load_Encached Diana_Cache
0494 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
0495 e807 | | Load 0x4,0x7 ; Debug Table 0x9.0x2e = 0x495,0x2001
0496 0007 | | Action Break_Optional
0497 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x2f = 0x497,0x2002
0498 0007 | | Action Break_Optional ; Debug Table 0x9.0x30 = 0x498,0x2003
0499 00d0 | | Action Swap_Control ; Debug Table 0x9.0x31 = 0x499,0x2004
049a 00d1 | | Pop_Control Pop_Count_1
049b 0f77 | w | Execute_Immediate Equal,0x77 ; Debug Table 0x9.0x32 = 0x49b,0xa
049c 6821 |h! | Jump_Zero 0x4be
049d 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x33 = 0x49d,0xb
049e 4976 |Iv | Short_Literal 0x176
049f 00eb | | Load_Encached Diana_Cache
04a0 0098 | | Execute Package,Field_Read_Dynamic
04a1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04a2 a802 | | Store_Unchecked 0x4,0x2
04a3 e802 | | Load 0x4,0x2 ; Debug Table 0x9.0x34 = 0x4a3,0xc
04a4 0007 | | Action Break_Optional
04a5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x35 = 0x4a5,0x2401
04a6 0007 | | Action Break_Optional
04a7 e808 | | Load 0x4,0x8 ; Debug Table 0x9.0x36 = 0x4a7,0x2801
04a8 0007 | | Action Break_Optional
04a9 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x37 = 0x4a9,0x2802
04aa 0007 | | Action Break_Optional ; Debug Table 0x9.0x38 = 0x4aa,0x2803
04ab 00d0 | | Action Swap_Control ; Debug Table 0x9.0x39 = 0x4ab,0x2804
04ac 00d1 | | Pop_Control Pop_Count_1
04ad 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x9.0x3a = 0x4ad,0x2401
04ae 00eb | | Load_Encached Diana_Cache
04af 0098 | | Execute Package,Field_Read_Dynamic
04b0 180d | | Execute Package,Field_Execute,Field_Number 0xd
04b1 7800 |x | Jump 0x4b2
04b2 00d0 | | Action Swap_Control
04b3 00d1 | | Pop_Control Pop_Count_1
04b4 6809 |h | Jump_Zero 0x4be ; Debug Table 0x9.0x3b = 0x4b4,0xc
04b5 e802 | | Load 0x4,0x2
04b6 00eb | | Load_Encached Diana_Cache
04b7 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04b8 00da | | Load_Top At_Offset_2
04b9 00eb | | Load_Encached Diana_Cache
04ba 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04bb 6802 |h | Jump_Zero 0x4be
04bc 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x3c = 0x4bc,0xd
04bd 4401 |D | Exit_Subprogram With_Result,0x1
04be 00d1 | | Pop_Control Pop_Count_1
04bf 0007 | | Action Break_Optional ; Debug Table 0x9.0x3d = 0x4bf,0x6
04c0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x3e = 0x4c0,0x2c01
04c1 021d | | Execute Heap_Access,Is_Null
04c2 6f84 |o | Jump_Zero 0x447 ; Debug Table 0x9.0x3f = 0x4c2,0x6
04c3 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x40 = 0x4c3,0xf
04c4 4401 |D | Exit_Subprogram With_Result,0x1
04c5 0000 0000 | | .XXX[0x3]
04c7 0000 | |
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 0007 | | Action Break_Optional ; Debug Table 0xa = .DEBUG 0x04cb,0x09e8,0x0002,0x0000,0x005a,0x8a05,0x0000,0x0181
; Debug Table 0xa.0x0 = 0x4cb,0x1
04cc e9ff | | Load 0x4,-0x1 ; Debug Table 0xa.0x1 = 0x4cc,0x401
04cd 0007 | | Action Break_Optional
04ce 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xa.0x2 = 0x4ce,0x402
04cf 0007 | | Action Break_Optional ; Debug Table 0xa.0x3 = 0x4cf,0x403
04d0 0007 | | Action Break_Optional ; Debug Table 0xa.0x4 = 0x4d0,0x404
04d1 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0xa.0x5 = 0x4d1,0x1
04d2 700c |p | Jump_Nonzero 0x4df
04d3 0b47 | G | Execute_Immediate Case_Compare,0x47
04d4 700a |p | Jump_Nonzero 0x4df
04d5 0b46 | F | Execute_Immediate Case_Compare,0x46
04d6 7008 |p | Jump_Nonzero 0x4df
04d7 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x6 = 0x4d7,0x9
04d8 0092 0600 | | Action Push_String_Extended,0x600 ; "Object is not separable"
04da 01cc | | Execute Vector,Catenate
04db e005 | | Load 0x0,0x5
04dc 180d | | Execute Package,Field_Execute,Field_Number 0xd
04dd 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x7 = 0x4dd,0xa
04de 4401 |D | Exit_Subprogram With_Result,0x1
04df 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x8 = 0x4df,0x2
04e0 8607 | | Call 0x3,0x7
04e1 6808 |h | Jump_Zero 0x4ea
04e2 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x9 = 0x4e2,0x3
04e3 0092 0601 | | Action Push_String_Extended,0x601 ; "Object has a separated overload"
04e5 01cc | | Execute Vector,Catenate
04e6 e005 | | Load 0x0,0x5
04e7 180d | | Execute Package,Field_Execute,Field_Number 0xd
04e8 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0xa = 0x4e8,0x4
04e9 4401 |D | Exit_Subprogram With_Result,0x1
04ea 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0xb = 0x4ea,0x5
04eb 00eb | | Load_Encached Diana_Cache
04ec 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
04ed e803 | | Load 0x4,0x3 ; Debug Table 0xa.0xc = 0x4ed,0x801
04ee 0007 | | Action Break_Optional
04ef 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xa.0xd = 0x4ef,0x802
04f0 0007 | | Action Break_Optional ; Debug Table 0xa.0xe = 0x4f0,0x803
04f1 00d0 | | Action Swap_Control ; Debug Table 0xa.0xf = 0x4f1,0x804
04f2 00d1 | | Pop_Control Pop_Count_1
04f3 0b4e | N | Execute_Immediate Case_Compare,0x4e ; Debug Table 0xa.0x10 = 0x4f3,0x5
04f4 7008 |p | Jump_Nonzero 0x4fd
04f5 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x11 = 0x4f5,0x7
04f6 0092 0602 | | Action Push_String_Extended,0x602 ; "Object is separate"
04f8 01cc | | Execute Vector,Catenate
04f9 e005 | | Load 0x0,0x5
04fa 180d | | Execute Package,Field_Execute,Field_Number 0xd
04fb 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x12 = 0x4fb,0x8
04fc 4401 |D | Exit_Subprogram With_Result,0x1
04fd 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x13 = 0x4fd,0x6
04fe 4401 |D | Exit_Subprogram With_Result,0x1
04ff 0000 | | .XXX[0x1]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0506 | | .CONST 0x0506 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0004 | | .CONST 0x0004 ; Number of locals
0503 INIT_0500:
0503 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb = .DEBUG 0x0503,0x0a12,0x0002,0x0000,0x005a,0x8a05,0x0000,0x036f
; Debug Table 0xb.0x0 = 0x503,0xffff
0504 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x1 = 0x504,0xfffe
0505 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x2 = 0x505,0xfffd
0506 BODY_0500:
0506 e9ff | | Load 0x4,-0x1 ; Debug Table 0xb.0x3 = 0x506,0x1
0507 00eb | | Load_Encached Diana_Cache
0508 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0509 0032 | 2 | Store_Top Heap_Access,At_Offset_2
050a 0007 | | Action Break_Optional ; Debug Table 0xb.0x4 = 0x50a,0x2
050b e803 | | Load 0x4,0x3 ; Debug Table 0xb.0x5 = 0x50b,0x401
050c 0007 | | Action Break_Optional
050d 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xb.0x6 = 0x50d,0x402
050e 0007 | | Action Break_Optional ; Debug Table 0xb.0x7 = 0x50e,0x403
050f 0007 | | Action Break_Optional ; Debug Table 0xb.0x8 = 0x50f,0x404
0510 0b49 | I | Execute_Immediate Case_Compare,0x49 ; Debug Table 0xb.0x9 = 0x510,0x2
0511 700c |p | Jump_Nonzero 0x51e
0512 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xa = 0x512,0x5
0513 4976 |Iv | Short_Literal 0x176
0514 00eb | | Load_Encached Diana_Cache
0515 0098 | | Execute Package,Field_Read_Dynamic
0516 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0517 00eb | | Load_Encached Diana_Cache
0518 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0519 4817 |H | Short_Literal 0x17
051a 00eb | | Load_Encached Diana_Cache
051b 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
051c a802 | | Store_Unchecked 0x4,0x2
051d 7816 |x | Jump 0x534
051e 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xb = 0x51e,0x3
051f 00eb | | Load_Encached Diana_Cache
0520 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
0521 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0522 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0xc = 0x522,0x4
0523 4976 |Iv | Short_Literal 0x176
0524 00eb | | Load_Encached Diana_Cache
0525 0098 | | Execute Package,Field_Read_Dynamic
0526 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0527 00eb | | Load_Encached Diana_Cache
0528 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0529 4817 |H | Short_Literal 0x17
052a 00eb | | Load_Encached Diana_Cache
052b 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
052c 00db | | Load_Top At_Offset_3
052d 00eb | | Load_Encached Diana_Cache
052e 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
052f 8408 | | Call 0x2,0x8
0530 4812 |H | Short_Literal 0x12
0531 00eb | | Load_Encached Diana_Cache
0532 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
0533 a802 | | Store_Unchecked 0x4,0x2
0534 00d1 | | Pop_Control Pop_Count_1
0535 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xd = 0x535,0x6
0536 4401 |D | Exit_Subprogram With_Result,0x1
0537 0000 | | .XXX[0x1]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 0549 | I | .CONST 0x0549 ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0006 | | .CONST 0x0006 ; Number of locals
053b INIT_0538:
053b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc = .DEBUG 0x053b,0x0a30,0x0001,0x0000,0x005a,0x8a05,0x0000,0x0522
; Debug Table 0xc.0x0 = 0x53b,0xffff
053c e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x1 = 0x53c,0xfffe
053d 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
053e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
053f 02c7 | | Declare_Variable Any
0540 00d8 | | Load_Top At_Offset_0
0541 1c00 | | Execute_Immediate Run_Utility,0x0
0542 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x2 = 0x542,0xfffd
0543 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
0544 e014 | | Load 0x0,0x14 ; Debug Table 0xc.0x3 = 0x544,0xfffc
0545 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0546 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x4 = 0x546,0xfffb
0547 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0548 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0549 BODY_0538:
0549 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x5 = 0x549,0x1
054a a802 | | Store_Unchecked 0x4,0x2
054b e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x6 = 0x54b,0x2
054c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
054d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
054e e014 | | Load 0x0,0x14
054f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0550 e803 | | Load 0x4,0x3
0551 0120 | | Execute Any,Is_Value
0552 6804 |h | Jump_Zero 0x557
0553 e001 | | Load 0x0,0x1
0554 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0555 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0556 7801 |x | Jump 0x558
0557 e803 | | Load 0x4,0x3
0558 e001 | | Load 0x0,0x1
0559 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
055a e00a | | Load 0x0,0xa
055b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
055c e00b | | Load 0x0,0xb
055d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
055e e610 | | Load 0x3,0x10
055f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0560 0092 0603 | | Action Push_String_Extended,0x603 ; "<WORLDS>"
0562 e014 | | Load 0x0,0x14
0563 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0564 c804 | | Store 0x4,0x4
0565 c803 | | Store 0x4,0x3
0566 005b | [ | Store_Top Discrete,At_Offset_3
0567 0059 | Y | Store_Top Discrete,At_Offset_1
0568 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x7 = 0x568,0x3
0569 6802 |h | Jump_Zero 0x56c
056a 6631 |f1 | Indirect_Literal Discrete,0x39c,{0x00000000, 0x5a8a0501} ; Debug Table 0xc.0x8 = 0x56a,0x4
056b 0257 | W | Execute Discrete,Raise
056c e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x9 = 0x56c,0x5
056d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
056e e610 | | Load 0x3,0x10
056f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0570 e9ff | | Load 0x4,-0x1
0571 e001 | | Load 0x0,0x1
0572 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0573 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0574 c60f | | Store 0x3,0xf
0575 e60f | | Load 0x3,0xf ; Debug Table 0xc.0xa = 0x575,0x6
0576 0092 05fb | | Action Push_String_Extended,0x5fb ; "Ada.Set_Root"
0578 e00f | | Load 0x0,0xf
0579 180f | | Execute Package,Field_Execute,Field_Number 0xf
057a e001 | | Load 0x0,0x1 ; Debug Table 0xc.0xb = 0x57a,0x7
057b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057c 00f1 | | Load_Encached Diana_Temp_Seq
057d e001 | | Load 0x0,0x1
057e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
057f 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0580 e60a | | Load 0x3,0xa
0581 0120 | | Execute Any,Is_Value
0582 6803 |h | Jump_Zero 0x586
0583 e00c | | Load 0x0,0xc
0584 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0585 7801 |x | Jump 0x587
0586 e60a | | Load 0x3,0xa
0587 e802 | | Load 0x4,0x2
0588 e9fe | | Load 0x4,-0x2
0589 660e |f | Indirect_Literal Discrete,0x398,{0x00000000, 0x00004000}
058a e610 | | Load 0x3,0x10
058b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
058c e804 | | Load 0x4,0x4
058d e803 | | Load 0x4,0x3
058e e001 | | Load 0x0,0x1
058f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0590 4802 |H | Short_Literal 0x2
0591 e001 | | Load 0x0,0x1
0592 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0593 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0594 c9fe | | Store 0x4,-0x2
0595 c802 | | Store 0x4,0x2
0596 c60a | | Store 0x3,0xa
0597 c608 | | Store 0x3,0x8
0598 c609 | | Store 0x3,0x9
0599 c60f | | Store 0x3,0xf
059a e60f | | Load 0x3,0xf ; Debug Table 0xc.0xc = 0x59a,0x8
059b 0092 0604 | | Action Push_String_Extended,0x604 ; "Decl_Ops.Promote"
059d e00f | | Load 0x0,0xf
059e 180f | | Execute Package,Field_Execute,Field_Number 0xf
059f 4502 |E | Exit_Subprogram 0x2
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a4 | | .CONST 0x05a4 ; Address of begin
05a1 0004 | | .CONST 0x0004 ; Address of exception handler
05a2 0002 | | .CONST 0x0002 ; Number of locals
05a3 INIT_05a0:
05a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd = .DEBUG 0x05a3,0x0a4c,0x0002,0x0000,0x005a,0x8a05,0x0000,0x05cb
; Debug Table 0xd.0x0 = 0x5a3,0xffff
05a4 BODY_05a0:
05a4 0007 | | Action Break_Optional ; Debug Table 0xd.0x1 = 0x5a4,0x1
05a5 e9ff | | Load 0x4,-0x1 ; Debug Table 0xd.0x2 = 0x5a5,0x401
05a6 0007 | | Action Break_Optional
05a7 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xd.0x3 = 0x5a7,0x402
05a8 0007 | | Action Break_Optional ; Debug Table 0xd.0x4 = 0x5a8,0x403
05a9 0007 | | Action Break_Optional ; Debug Table 0xd.0x5 = 0x5a9,0x404
05aa 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0xd.0x6 = 0x5aa,0x1
05ab 7014 |p | Jump_Nonzero 0x5c0
05ac 0b47 | G | Execute_Immediate Case_Compare,0x47
05ad 7022 |p" | Jump_Nonzero 0x5d0
05ae 0b46 | F | Execute_Immediate Case_Compare,0x46
05af 702c |p, | Jump_Nonzero 0x5dc
05b0 0092 0605 | | Action Push_String_Extended,0x605 ; "Tree kind is "
; Debug Table 0xd.0x7 = 0x5b0,0x5
05b2 e9ff | | Load 0x4,-0x1 ; Debug Table 0xd.0x8 = 0x5b2,0x801
05b3 0007 | | Action Break_Optional
05b4 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xd.0x9 = 0x5b4,0x802
05b5 0007 | | Action Break_Optional ; Debug Table 0xd.0xa = 0x5b5,0x803
05b6 0007 | | Action Break_Optional ; Debug Table 0xd.0xb = 0x5b6,0x804
05b7 00eb | | Load_Encached Diana_Cache ; Debug Table 0xd.0xc = 0x5b7,0x5
05b8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b9 025e | ^ | Execute Discrete,Convert
05ba 1c01 | | Execute_Immediate Run_Utility,0x1
05bb 01cc | | Execute Vector,Catenate
05bc 0092 0606 | | Action Push_String_Extended,0x606 ; "Make_Source_Separate.Make_Stub"
05be 8406 | | Call 0x2,0x6
05bf 7827 |x' | Jump 0x5e7
05c0 4877 |Hw | Short_Literal 0x77 ; Debug Table 0xd.0xd = 0x5c0,0x2
05c1 00eb | | Load_Encached Diana_Cache
05c2 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
05c3 e9ff | | Load 0x4,-0x1
05c4 00eb | | Load_Encached Diana_Cache
05c5 18ce | | Execute Package,Field_Execute,Field_Number 0xce
05c6 8408 | | Call 0x2,0x8
05c7 e9ff | | Load 0x4,-0x1
05c8 00eb | | Load_Encached Diana_Cache
05c9 18bf | | Execute Package,Field_Execute,Field_Number 0xbf
05ca 8408 | | Call 0x2,0x8
05cb 4848 |HH | Short_Literal 0x48
05cc 00eb | | Load_Encached Diana_Cache
05cd 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
05ce 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05cf 7817 |x | Jump 0x5e7
05d0 4877 |Hw | Short_Literal 0x77 ; Debug Table 0xd.0xe = 0x5d0,0x3
05d1 00eb | | Load_Encached Diana_Cache
05d2 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
05d3 e9ff | | Load 0x4,-0x1
05d4 00eb | | Load_Encached Diana_Cache
05d5 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
05d6 8408 | | Call 0x2,0x8
05d7 4847 |HG | Short_Literal 0x47
05d8 00eb | | Load_Encached Diana_Cache
05d9 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
05da 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05db 780b |x | Jump 0x5e7
05dc 4877 |Hw | Short_Literal 0x77 ; Debug Table 0xd.0xf = 0x5dc,0x4
05dd 00eb | | Load_Encached Diana_Cache
05de 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
05df e9ff | | Load 0x4,-0x1
05e0 00eb | | Load_Encached Diana_Cache
05e1 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
05e2 8408 | | Call 0x2,0x8
05e3 4846 |HF | Short_Literal 0x46
05e4 00eb | | Load_Encached Diana_Cache
05e5 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
05e6 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05e7 00d1 | | Pop_Control Pop_Count_1
05e8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x10 = 0x5e8,0x6
05e9 4401 |D | Exit_Subprogram With_Result,0x1
05ea ; --------------------------------------------------------------------------------------
05ea ; STRING TABLE
05ea ; --------------------------------------------------------------------------------------
05ea 003c | < | .STRTAB 0x003c->0x0608 ; "NOT_SEPARABLE"
05eb 0047 | G | .STRTAB 0x0047->0x060e ; "SEPARABLE_LIST"
05ec 0053 | S | .STRTAB 0x0053->0x0615 ; "SEPARABLE_DECL"
05ed 005f | _ | .STRTAB 0x005f->0x061c ; "Make_Separate failed - "
05ee 0074 | t | .STRTAB 0x0074->0x0628 ; "Make_Separate."
05ef 0080 | | .STRTAB 0x0080->0x062f ; " failed - "
05f0 0088 | | .STRTAB 0x0088->0x0634 ; "Object is a list with many elements"
05f1 00a9 | | .STRTAB 0x00a9->0x0645 ; "Root is not Comp_Unit or Mumble_S"
05f2 00c8 | | .STRTAB 0x00c8->0x0656 ; "Get_Decl_Kind"
05f3 00d3 | | .STRTAB 0x00d3->0x065c ; "Enclosing is not a body"
; "Enclosing is not a body"
05f4 00e8 | | .STRTAB 0x00e8->0x0668 ; "Object is too deeply nested"
05f5 0101 | | .STRTAB 0x0101->0x0675 ; "Traversal.Get_Declaration"
05f6 0118 | | .STRTAB 0x0118->0x0682 ; "Ada.Get_Version"
05f7 0125 | % | .STRTAB 0x0125->0x0689 ; "Traversal.Get_Object"
; "Traversal.Get_Object"
05f8 0137 | 7 | .STRTAB 0x0137->0x0693 ; "Object_Operations.Create"
05f9 014d | M | .STRTAB 0x014d->0x069f ; "Ada.Open"
; "Ada.Open"
05fa 0153 | S | .STRTAB 0x0153->0x06a3 ; "Ada_Utilities.Open_Image"
05fb 0169 | i | .STRTAB 0x0169->0x06af ; "Ada.Set_Root"
; "Ada.Set_Root"
05fc 0173 | s | .STRTAB 0x0173->0x06b5 ; "Ada.Close"
05fd 017a | z | .STRTAB 0x017a->0x06ba ; "Ada_Utilities.Close_Image"
05fe 0191 | | .STRTAB 0x0191->0x06c6 ; "Decl_Attr="
05ff 0199 | | .STRTAB 0x0199->0x06cb ; "Make_Nonsource_Separate"
0600 01ae | | .STRTAB 0x01ae->0x06d7 ; "Object is not separable"
0601 01c3 | | .STRTAB 0x01c3->0x06e2 ; "Object has a separated overload"
0602 01e0 | | .STRTAB 0x01e0->0x06f2 ; "Object is separate"
0603 01f0 | | .STRTAB 0x01f0->0x06fb ; "<WORLDS>"
0604 01f6 | | .STRTAB 0x01f6->0x06ff ; "Decl_Ops.Promote"
0605 0204 | | .STRTAB 0x0204->0x0707 ; "Tree kind is "
0606 020f | | .STRTAB 0x020f->0x070d ; "Make_Source_Separate.Make_Stub"
0607 022b | + | .STREND 0x022b->0x071c
0608 4e4f 545f |NOT_| .STRTAB_STRINGS
071d 0000 0000 | | .XXX[0x3]
071f 0000 | |
0720 ; --------------------------------------------------------------------------------------
0720 ; Debug Table
0720 ; --------------------------------------------------------------------------------------
0720 0003 000e | | .CONST 0x0003,0x000e
0722 000b 0792 | | .DEBUG 0x000b,0x0792,0x8000,0x0000,0x005a,0x7e75,0x0000,0x0006
072a 001b 0794 | | .DEBUG 0x001b,0x0794,0x8001,0x0000,0x005a,0x7e75,0x0000,0x0006
0732 006b 07d4 | k | .DEBUG 0x006b,0x07d4,0x0005,0x0000,0x005a,0x8a05,0x0000,0x004c
073a 0083 07d6 | | .DEBUG 0x0083,0x07d6,0x0001,0x0000,0x005a,0x8a05,0x0000,0x0063
0742 009b 07de | | .DEBUG 0x009b,0x07de,0x0002,0x0000,0x005a,0x8a05,0x0000,0x008c
074a 0173 0870 | s p| .DEBUG 0x0173,0x0870,0x0002,0x0000,0x005a,0x8a05,0x0000,0x02f9
0752 0183 087a | z| .DEBUG 0x0183,0x087a,0x0002,0x0000,0x005a,0x8a05,0x0000,0x0321
075a 0223 08d0 | # | .DEBUG 0x0223,0x08d0,0x0001,0x0000,0x005a,0x8a05,0x0000,0x04a7
0762 03a3 0942 | B| .DEBUG 0x03a3,0x0942,0x0001,0x0000,0x005a,0x8a05,0x0000,0x083a
076a 041b 0964 | d| .DEBUG 0x041b,0x0964,0x0002,0x0000,0x005a,0x8a05,0x0000,0x00b9
0772 04cb 09e8 | | .DEBUG 0x04cb,0x09e8,0x0002,0x0000,0x005a,0x8a05,0x0000,0x0181
077a 0503 0a12 | | .DEBUG 0x0503,0x0a12,0x0002,0x0000,0x005a,0x8a05,0x0000,0x036f
0782 053b 0a30 | ; 0| .DEBUG 0x053b,0x0a30,0x0001,0x0000,0x005a,0x8a05,0x0000,0x0522
078a 05a3 0a4c | L| .DEBUG 0x05a3,0x0a4c,0x0002,0x0000,0x005a,0x8a05,0x0000,0x05cb
0792 ; --------------------------------------------------------------------------------------
0792 ; Debug3 Subtable 0x0
0792 ; --------------------------------------------------------------------------------------
0792 0000 0000 | | .DBG3TAB 0x0000,0x0000
0794 ; --------------------------------------------------------------------------------------
0794 ; Debug3 Subtable 0x1
0794 ; --------------------------------------------------------------------------------------
0794 000f 0010 | | .DBG3TAB 0x000f,0x0010
0796 001b ffff | | .CONST 0x001b,0xffff
0798 001c fffe | | .CONST 0x001c,0xfffe
079a 001d fffd | | .CONST 0x001d,0xfffd
079c 001e fffc | | .CONST 0x001e,0xfffc
079e 001f fffb | | .CONST 0x001f,0xfffb
07a0 0021 fffa | ! | .CONST 0x0021,0xfffa
07a2 0026 fff9 | & | .CONST 0x0026,0xfff9
07a4 0028 fff8 | ( | .CONST 0x0028,0xfff8
07a6 002b fff7 | + | .CONST 0x002b,0xfff7
07a8 002c fff6 | , | .CONST 0x002c,0xfff6
07aa 002e fff5 | . | .CONST 0x002e,0xfff5
07ac 0030 fff4 | 0 | .CONST 0x0030,0xfff4
07ae 0032 fff3 | 2 | .CONST 0x0032,0xfff3
07b0 0034 fff2 | 4 | .CONST 0x0034,0xfff2
07b2 0036 fff1 | 6 | .CONST 0x0036,0xfff1
07b4 0038 0001 | 8 | .CONST 0x0038,0x0001
07b6 003c 0002 | < | .CONST 0x003c,0x0002
07b8 003d 0401 | = | .CONST 0x003d,0x0401
07ba 003f 0402 | ? | .CONST 0x003f,0x0402
07bc 0040 0403 | @ | .CONST 0x0040,0x0403
07be 0041 0404 | A | .CONST 0x0041,0x0404
07c0 0042 0002 | B | .CONST 0x0042,0x0002
07c2 004a 0004 | J | .CONST 0x004a,0x0004
07c4 004b 0003 | K | .CONST 0x004b,0x0003
07c6 0050 0005 | P | .CONST 0x0050,0x0005
07c8 0053 0006 | S | .CONST 0x0053,0x0006
07ca 0055 0007 | U | .CONST 0x0055,0x0007
07cc 0056 0008 | V | .CONST 0x0056,0x0008
07ce 005b 0009 | [ | .CONST 0x005b,0x0009
07d0 005f 000a | _ | .CONST 0x005f,0x000a
07d2 0066 000b | f | .CONST 0x0066,0x000b
07d4 ; --------------------------------------------------------------------------------------
07d4 ; Debug3 Subtable 0x2
07d4 ; --------------------------------------------------------------------------------------
07d4 0000 0000 | | .DBG3TAB 0x0000,0x0000
07d6 ; --------------------------------------------------------------------------------------
07d6 ; Debug3 Subtable 0x3
07d6 ; --------------------------------------------------------------------------------------
07d6 0000 0003 | | .DBG3TAB 0x0000,0x0003
07d8 0083 0001 | | .CONST 0x0083,0x0001
07da 0085 0002 | | .CONST 0x0085,0x0002
07dc 0090 0003 | | .CONST 0x0090,0x0003
07de ; --------------------------------------------------------------------------------------
07de ; Debug3 Subtable 0x4
07de ; --------------------------------------------------------------------------------------
07de 0007 0041 | A| .DBG3TAB 0x0007,0x0041
07e0 009b ffff | | .CONST 0x009b,0xffff
07e2 009c fffe | | .CONST 0x009c,0xfffe
07e4 009d fffd | | .CONST 0x009d,0xfffd
07e6 009e fffc | | .CONST 0x009e,0xfffc
07e8 009f fffb | | .CONST 0x009f,0xfffb
07ea 00a0 fffa | | .CONST 0x00a0,0xfffa
07ec 00a2 fff9 | | .CONST 0x00a2,0xfff9
07ee 00a4 0001 | | .CONST 0x00a4,0x0001
07f0 00aa 0002 | | .CONST 0x00aa,0x0002
07f2 00b0 0401 | | .CONST 0x00b0,0x0401
07f4 00b2 0801 | | .CONST 0x00b2,0x0801
07f6 00b4 0802 | | .CONST 0x00b4,0x0802
07f8 00b5 0803 | | .CONST 0x00b5,0x0803
07fa 00b6 0804 | | .CONST 0x00b6,0x0804
07fc 00b8 0401 | | .CONST 0x00b8,0x0401
07fe 00bf 0002 | | .CONST 0x00bf,0x0002
0800 00c1 0003 | | .CONST 0x00c1,0x0003
0802 00c5 0004 | | .CONST 0x00c5,0x0004
0804 00cb 0005 | | .CONST 0x00cb,0x0005
0806 00cd 0c01 | | .CONST 0x00cd,0x0c01
0808 00cf 0c02 | | .CONST 0x00cf,0x0c02
080a 00d1 0c03 | | .CONST 0x00d1,0x0c03
080c 00d5 0c04 | | .CONST 0x00d5,0x0c04
080e 00d9 0c05 | | .CONST 0x00d9,0x0c05
0810 00db 1001 | | .CONST 0x00db,0x1001
0812 00dd 1002 | | .CONST 0x00dd,0x1002
0814 00de 1003 | | .CONST 0x00de,0x1003
0816 00df 1004 | | .CONST 0x00df,0x1004
0818 00e1 0c05 | | .CONST 0x00e1,0x0c05
081a 00eb 1401 | | .CONST 0x00eb,0x1401
081c 00ed 1402 | | .CONST 0x00ed,0x1402
081e 00ee 1403 | | .CONST 0x00ee,0x1403
0820 00ef 1404 | | .CONST 0x00ef,0x1404
0822 00f1 1004 | | .CONST 0x00f1,0x1004
0824 00ff 0005 | | .CONST 0x00ff,0x0005
0826 0101 0006 | | .CONST 0x0101,0x0006
0828 0103 0007 | | .CONST 0x0103,0x0007
082a 0105 0008 | | .CONST 0x0105,0x0008
082c 010b 0009 | | .CONST 0x010b,0x0009
082e 010d 000a | | .CONST 0x010d,0x000a
0830 010e 1801 | | .CONST 0x010e,0x1801
0832 0110 1802 | | .CONST 0x0110,0x1802
0834 0111 1803 | | .CONST 0x0111,0x1803
0836 0112 1804 | | .CONST 0x0112,0x1804
0838 0113 000a | | .CONST 0x0113,0x000a
083a 0115 000b | | .CONST 0x0115,0x000b
083c 011a 000c | | .CONST 0x011a,0x000c
083e 011f 000d | | .CONST 0x011f,0x000d
0840 0120 1c01 | | .CONST 0x0120,0x1c01
0842 0122 1c02 | " | .CONST 0x0122,0x1c02
0844 0123 1c03 | # | .CONST 0x0123,0x1c03
0846 0124 1c04 | $ | .CONST 0x0124,0x1c04
0848 0125 000d | % | .CONST 0x0125,0x000d
084a 012d 0010 | - | .CONST 0x012d,0x0010
084c 0133 0011 | 3 | .CONST 0x0133,0x0011
084e 0135 000e | 5 | .CONST 0x0135,0x000e
0850 013c 000f | < | .CONST 0x013c,0x000f
0852 0141 0012 | A | .CONST 0x0141,0x0012
0854 0142 2001 | B | .CONST 0x0142,0x2001
0856 0144 2002 | D | .CONST 0x0144,0x2002
0858 0145 2003 | E | .CONST 0x0145,0x2003
085a 0146 2004 | F | .CONST 0x0146,0x2004
085c 0147 0012 | G | .CONST 0x0147,0x0012
085e 0149 0014 | I | .CONST 0x0149,0x0014
0860 014f 0015 | O | .CONST 0x014f,0x0015
0862 0151 0013 | Q | .CONST 0x0151,0x0013
0864 0156 0016 | V | .CONST 0x0156,0x0016
0866 015c 0017 | \ | .CONST 0x015c,0x0017
0868 0162 0018 | b | .CONST 0x0162,0x0018
086a 0164 0019 | d | .CONST 0x0164,0x0019
086c 0167 001a | g | .CONST 0x0167,0x001a
086e 0169 001b | i | .CONST 0x0169,0x001b
0870 ; --------------------------------------------------------------------------------------
0870 ; Debug3 Subtable 0x5
0870 ; --------------------------------------------------------------------------------------
0870 0001 0003 | | .DBG3TAB 0x0001,0x0003
0872 0173 ffff | s | .CONST 0x0173,0xffff
0874 0174 0001 | t | .CONST 0x0174,0x0001
0876 0178 0002 | x | .CONST 0x0178,0x0002
0878 017c 0003 | | | .CONST 0x017c,0x0003
087a ; --------------------------------------------------------------------------------------
087a ; Debug3 Subtable 0x6
087a ; --------------------------------------------------------------------------------------
087a 0007 0023 | #| .DBG3TAB 0x0007,0x0023
087c 0183 ffff | | .CONST 0x0183,0xffff
087e 0184 fffe | | .CONST 0x0184,0xfffe
0880 0185 fffd | | .CONST 0x0185,0xfffd
0882 0186 fffc | | .CONST 0x0186,0xfffc
0884 018b fffb | | .CONST 0x018b,0xfffb
0886 018e fffa | | .CONST 0x018e,0xfffa
0888 0190 fff9 | | .CONST 0x0190,0xfff9
088a 0192 0001 | | .CONST 0x0192,0x0001
088c 0194 0002 | | .CONST 0x0194,0x0002
088e 01a5 0003 | | .CONST 0x01a5,0x0003
0890 01af 0004 | | .CONST 0x01af,0x0004
0892 01b1 0005 | | .CONST 0x01b1,0x0005
0894 01b3 0006 | | .CONST 0x01b3,0x0006
0896 01b7 0007 | | .CONST 0x01b7,0x0007
0898 01ba 0401 | | .CONST 0x01ba,0x0401
089a 01bc 0402 | | .CONST 0x01bc,0x0402
089c 01be 0403 | | .CONST 0x01be,0x0403
089e 01c2 0404 | | .CONST 0x01c2,0x0404
08a0 01c6 0405 | | .CONST 0x01c6,0x0405
08a2 01c8 0801 | | .CONST 0x01c8,0x0801
08a4 01ca 0802 | | .CONST 0x01ca,0x0802
08a6 01cb 0803 | | .CONST 0x01cb,0x0803
08a8 01cc 0804 | | .CONST 0x01cc,0x0804
08aa 01ce 0405 | | .CONST 0x01ce,0x0405
08ac 01d8 0c01 | | .CONST 0x01d8,0x0c01
08ae 01da 0c02 | | .CONST 0x01da,0x0c02
08b0 01db 0c03 | | .CONST 0x01db,0x0c03
08b2 01dc 0c04 | | .CONST 0x01dc,0x0c04
08b4 01de 0804 | | .CONST 0x01de,0x0804
08b6 01ec 0007 | | .CONST 0x01ec,0x0007
08b8 01ed 0008 | | .CONST 0x01ed,0x0008
08ba 01f3 0009 | | .CONST 0x01f3,0x0009
08bc 01f4 1001 | | .CONST 0x01f4,0x1001
08be 01f5 0009 | | .CONST 0x01f5,0x0009
08c0 01fe 1401 | | .CONST 0x01fe,0x1401
08c2 01ff 1001 | | .CONST 0x01ff,0x1001
08c4 0206 000a | | .CONST 0x0206,0x000a
08c6 020a 000b | | .CONST 0x020a,0x000b
08c8 020e 000c | | .CONST 0x020e,0x000c
08ca 0212 000d | | .CONST 0x0212,0x000d
08cc 0214 000e | | .CONST 0x0214,0x000e
08ce 0218 000f | | .CONST 0x0218,0x000f
08d0 ; --------------------------------------------------------------------------------------
08d0 ; Debug3 Subtable 0x7
08d0 ; --------------------------------------------------------------------------------------
08d0 0012 0026 | &| .DBG3TAB 0x0012,0x0026
08d2 0223 ffff | # | .CONST 0x0223,0xffff
08d4 0224 fffe | $ | .CONST 0x0224,0xfffe
08d6 0225 fffd | % | .CONST 0x0225,0xfffd
08d8 0226 fffc | & | .CONST 0x0226,0xfffc
08da 0227 fffb | ' | .CONST 0x0227,0xfffb
08dc 0228 fffa | ( | .CONST 0x0228,0xfffa
08de 0229 fff9 | ) | .CONST 0x0229,0xfff9
08e0 022a fff8 | * | .CONST 0x022a,0xfff8
08e2 022b fff7 | + | .CONST 0x022b,0xfff7
08e4 0230 fff6 | 0 | .CONST 0x0230,0xfff6
08e6 0235 fff5 | 5 | .CONST 0x0235,0xfff5
08e8 023a fff4 | : | .CONST 0x023a,0xfff4
08ea 0240 fff3 | @ | .CONST 0x0240,0xfff3
08ec 0246 fff2 | F | .CONST 0x0246,0xfff2
08ee 0248 fff1 | H | .CONST 0x0248,0xfff1
08f0 024d fff0 | M | .CONST 0x024d,0xfff0
08f2 0252 ffef | R | .CONST 0x0252,0xffef
08f4 0254 ffee | T | .CONST 0x0254,0xffee
08f6 0256 0001 | V | .CONST 0x0256,0x0001
08f8 025e 0002 | ^ | .CONST 0x025e,0x0002
08fa 0261 0003 | a | .CONST 0x0261,0x0003
08fc 0270 0004 | p | .CONST 0x0270,0x0004
08fe 0275 0005 | u | .CONST 0x0275,0x0005
0900 027b 0006 | { | .CONST 0x027b,0x0006
0902 0284 0007 | | .CONST 0x0284,0x0007
0904 028d 0008 | | .CONST 0x028d,0x0008
0906 0292 0009 | | .CONST 0x0292,0x0009
0908 0296 000a | | .CONST 0x0296,0x000a
090a 029a 000b | | .CONST 0x029a,0x000b
090c 02a0 000c | | .CONST 0x02a0,0x000c
090e 02a4 000d | | .CONST 0x02a4,0x000d
0910 02ae 000e | | .CONST 0x02ae,0x000e
0912 02b1 000f | | .CONST 0x02b1,0x000f
0914 02b8 0010 | | .CONST 0x02b8,0x0010
0916 02cd 0011 | | .CONST 0x02cd,0x0011
0918 02d2 0012 | | .CONST 0x02d2,0x0012
091a 02f4 0013 | | .CONST 0x02f4,0x0013
091c 02f9 0014 | | .CONST 0x02f9,0x0014
091e 0314 0015 | | .CONST 0x0314,0x0015
0920 0319 0016 | | .CONST 0x0319,0x0016
0922 0330 0017 | 0 | .CONST 0x0330,0x0017
0924 0335 0018 | 5 | .CONST 0x0335,0x0018
0926 0339 0019 | 9 | .CONST 0x0339,0x0019
0928 0343 001a | C | .CONST 0x0343,0x001a
092a 034b 001b | K | .CONST 0x034b,0x001b
092c 0351 001c | Q | .CONST 0x0351,0x001c
092e 0355 001d | U | .CONST 0x0355,0x001d
0930 035e 001e | ^ | .CONST 0x035e,0x001e
0932 0363 001f | c | .CONST 0x0363,0x001f
0934 036e 0020 | n | .CONST 0x036e,0x0020
0936 0373 0021 | s !| .CONST 0x0373,0x0021
0938 037d 0022 | } "| .CONST 0x037d,0x0022
093a 0382 0023 | #| .CONST 0x0382,0x0023
093c 0385 0024 | $| .CONST 0x0385,0x0024
093e 038d 0025 | %| .CONST 0x038d,0x0025
0940 0392 0026 | &| .CONST 0x0392,0x0026
0942 ; --------------------------------------------------------------------------------------
0942 ; Debug3 Subtable 0x8
0942 ; --------------------------------------------------------------------------------------
0942 0006 000a | | .DBG3TAB 0x0006,0x000a
0944 03a3 ffff | | .CONST 0x03a3,0xffff
0946 03a4 fffe | | .CONST 0x03a4,0xfffe
0948 03a5 fffd | | .CONST 0x03a5,0xfffd
094a 03a6 fffc | | .CONST 0x03a6,0xfffc
094c 03ab fffb | | .CONST 0x03ab,0xfffb
094e 03b1 fffa | | .CONST 0x03b1,0xfffa
0950 03b3 0001 | | .CONST 0x03b3,0x0001
0952 03b6 0002 | | .CONST 0x03b6,0x0002
0954 03c0 0003 | | .CONST 0x03c0,0x0003
0956 03cd 0004 | | .CONST 0x03cd,0x0004
0958 03cf 0005 | | .CONST 0x03cf,0x0005
095a 03e4 0006 | | .CONST 0x03e4,0x0006
095c 03e9 0007 | | .CONST 0x03e9,0x0007
095e 0407 0008 | | .CONST 0x0407,0x0008
0960 040c 0009 | | .CONST 0x040c,0x0009
0962 040e 000a | | .CONST 0x040e,0x000a
0964 ; --------------------------------------------------------------------------------------
0964 ; Debug3 Subtable 0x9
0964 ; --------------------------------------------------------------------------------------
0964 0004 003d | =| .DBG3TAB 0x0004,0x003d
0966 041b ffff | | .CONST 0x041b,0xffff
0968 041c fffe | | .CONST 0x041c,0xfffe
096a 041d fffd | | .CONST 0x041d,0xfffd
096c 041e fffc | | .CONST 0x041e,0xfffc
096e 0422 0001 | " | .CONST 0x0422,0x0001
0970 0428 0002 | ( | .CONST 0x0428,0x0002
0972 042a 0401 | * | .CONST 0x042a,0x0401
0974 042c 0801 | , | .CONST 0x042c,0x0801
0976 042e 0802 | . | .CONST 0x042e,0x0802
0978 042f 0803 | / | .CONST 0x042f,0x0803
097a 0430 0804 | 0 | .CONST 0x0430,0x0804
097c 0432 0401 | 2 | .CONST 0x0432,0x0401
097e 0439 0002 | 9 | .CONST 0x0439,0x0002
0980 043a 0003 | : | .CONST 0x043a,0x0003
0982 043c 0004 | < | .CONST 0x043c,0x0004
0984 0440 0005 | @ | .CONST 0x0440,0x0005
0986 0447 0007 | G | .CONST 0x0447,0x0007
0988 0449 0c01 | I | .CONST 0x0449,0x0c01
098a 044b 0c02 | K | .CONST 0x044b,0x0c02
098c 044d 0c03 | M | .CONST 0x044d,0x0c03
098e 0451 0c04 | Q | .CONST 0x0451,0x0c04
0990 0455 0c05 | U | .CONST 0x0455,0x0c05
0992 0457 1001 | W | .CONST 0x0457,0x1001
0994 0459 1002 | Y | .CONST 0x0459,0x1002
0996 045a 1003 | Z | .CONST 0x045a,0x1003
0998 045b 1004 | [ | .CONST 0x045b,0x1004
099a 045d 0c05 | ] | .CONST 0x045d,0x0c05
099c 0467 1401 | g | .CONST 0x0467,0x1401
099e 0469 1402 | i | .CONST 0x0469,0x1402
09a0 046a 1403 | j | .CONST 0x046a,0x1403
09a2 046b 1404 | k | .CONST 0x046b,0x1404
09a4 046d 1004 | m | .CONST 0x046d,0x1004
09a6 047b 0007 | { | .CONST 0x047b,0x0007
09a8 047c 0008 | | | .CONST 0x047c,0x0008
09aa 047d 1801 | } | .CONST 0x047d,0x1801
09ac 047f 1802 | | .CONST 0x047f,0x1802
09ae 0481 1803 | | .CONST 0x0481,0x1803
09b0 0484 0008 | | .CONST 0x0484,0x0008
09b2 0485 0009 | | .CONST 0x0485,0x0009
09b4 0486 1c01 | | .CONST 0x0486,0x1c01
09b6 0488 1c02 | | .CONST 0x0488,0x1c02
09b8 0489 1c03 | | .CONST 0x0489,0x1c03
09ba 048a 1c04 | | .CONST 0x048a,0x1c04
09bc 048b 0009 | | .CONST 0x048b,0x0009
09be 0491 000e | | .CONST 0x0491,0x000e
09c0 0492 000a | | .CONST 0x0492,0x000a
09c2 0495 2001 | | .CONST 0x0495,0x2001
09c4 0497 2002 | | .CONST 0x0497,0x2002
09c6 0498 2003 | | .CONST 0x0498,0x2003
09c8 0499 2004 | | .CONST 0x0499,0x2004
09ca 049b 000a | | .CONST 0x049b,0x000a
09cc 049d 000b | | .CONST 0x049d,0x000b
09ce 04a3 000c | | .CONST 0x04a3,0x000c
09d0 04a5 2401 | $ | .CONST 0x04a5,0x2401
09d2 04a7 2801 | ( | .CONST 0x04a7,0x2801
09d4 04a9 2802 | ( | .CONST 0x04a9,0x2802
09d6 04aa 2803 | ( | .CONST 0x04aa,0x2803
09d8 04ab 2804 | ( | .CONST 0x04ab,0x2804
09da 04ad 2401 | $ | .CONST 0x04ad,0x2401
09dc 04b4 000c | | .CONST 0x04b4,0x000c
09de 04bc 000d | | .CONST 0x04bc,0x000d
09e0 04bf 0006 | | .CONST 0x04bf,0x0006
09e2 04c0 2c01 | , | .CONST 0x04c0,0x2c01
09e4 04c2 0006 | | .CONST 0x04c2,0x0006
09e6 04c3 000f | | .CONST 0x04c3,0x000f
09e8 ; --------------------------------------------------------------------------------------
09e8 ; Debug3 Subtable 0xa
09e8 ; --------------------------------------------------------------------------------------
09e8 0000 0014 | | .DBG3TAB 0x0000,0x0014
09ea 04cb 0001 | | .CONST 0x04cb,0x0001
09ec 04cc 0401 | | .CONST 0x04cc,0x0401
09ee 04ce 0402 | | .CONST 0x04ce,0x0402
09f0 04cf 0403 | | .CONST 0x04cf,0x0403
09f2 04d0 0404 | | .CONST 0x04d0,0x0404
09f4 04d1 0001 | | .CONST 0x04d1,0x0001
09f6 04d7 0009 | | .CONST 0x04d7,0x0009
09f8 04dd 000a | | .CONST 0x04dd,0x000a
09fa 04df 0002 | | .CONST 0x04df,0x0002
09fc 04e2 0003 | | .CONST 0x04e2,0x0003
09fe 04e8 0004 | | .CONST 0x04e8,0x0004
0a00 04ea 0005 | | .CONST 0x04ea,0x0005
0a02 04ed 0801 | | .CONST 0x04ed,0x0801
0a04 04ef 0802 | | .CONST 0x04ef,0x0802
0a06 04f0 0803 | | .CONST 0x04f0,0x0803
0a08 04f1 0804 | | .CONST 0x04f1,0x0804
0a0a 04f3 0005 | | .CONST 0x04f3,0x0005
0a0c 04f5 0007 | | .CONST 0x04f5,0x0007
0a0e 04fb 0008 | | .CONST 0x04fb,0x0008
0a10 04fd 0006 | | .CONST 0x04fd,0x0006
0a12 ; --------------------------------------------------------------------------------------
0a12 ; Debug3 Subtable 0xb
0a12 ; --------------------------------------------------------------------------------------
0a12 0003 000b | | .DBG3TAB 0x0003,0x000b
0a14 0503 ffff | | .CONST 0x0503,0xffff
0a16 0504 fffe | | .CONST 0x0504,0xfffe
0a18 0505 fffd | | .CONST 0x0505,0xfffd
0a1a 0506 0001 | | .CONST 0x0506,0x0001
0a1c 050a 0002 | | .CONST 0x050a,0x0002
0a1e 050b 0401 | | .CONST 0x050b,0x0401
0a20 050d 0402 | | .CONST 0x050d,0x0402
0a22 050e 0403 | | .CONST 0x050e,0x0403
0a24 050f 0404 | | .CONST 0x050f,0x0404
0a26 0510 0002 | | .CONST 0x0510,0x0002
0a28 0512 0005 | | .CONST 0x0512,0x0005
0a2a 051e 0003 | | .CONST 0x051e,0x0003
0a2c 0522 0004 | " | .CONST 0x0522,0x0004
0a2e 0535 0006 | 5 | .CONST 0x0535,0x0006
0a30 ; --------------------------------------------------------------------------------------
0a30 ; Debug3 Subtable 0xc
0a30 ; --------------------------------------------------------------------------------------
0a30 0005 0008 | | .DBG3TAB 0x0005,0x0008
0a32 053b ffff | ; | .CONST 0x053b,0xffff
0a34 053c fffe | < | .CONST 0x053c,0xfffe
0a36 0542 fffd | B | .CONST 0x0542,0xfffd
0a38 0544 fffc | D | .CONST 0x0544,0xfffc
0a3a 0546 fffb | F | .CONST 0x0546,0xfffb
0a3c 0549 0001 | I | .CONST 0x0549,0x0001
0a3e 054b 0002 | K | .CONST 0x054b,0x0002
0a40 0568 0003 | h | .CONST 0x0568,0x0003
0a42 056a 0004 | j | .CONST 0x056a,0x0004
0a44 056c 0005 | l | .CONST 0x056c,0x0005
0a46 0575 0006 | u | .CONST 0x0575,0x0006
0a48 057a 0007 | z | .CONST 0x057a,0x0007
0a4a 059a 0008 | | .CONST 0x059a,0x0008
0a4c ; --------------------------------------------------------------------------------------
0a4c ; Debug3 Subtable 0xd
0a4c ; --------------------------------------------------------------------------------------
0a4c 0001 0010 | | .DBG3TAB 0x0001,0x0010
0a4e 05a3 ffff | | .CONST 0x05a3,0xffff
0a50 05a4 0001 | | .CONST 0x05a4,0x0001
0a52 05a5 0401 | | .CONST 0x05a5,0x0401
0a54 05a7 0402 | | .CONST 0x05a7,0x0402
0a56 05a8 0403 | | .CONST 0x05a8,0x0403
0a58 05a9 0404 | | .CONST 0x05a9,0x0404
0a5a 05aa 0001 | | .CONST 0x05aa,0x0001
0a5c 05b0 0005 | | .CONST 0x05b0,0x0005
0a5e 05b2 0801 | | .CONST 0x05b2,0x0801
0a60 05b4 0802 | | .CONST 0x05b4,0x0802
0a62 05b5 0803 | | .CONST 0x05b5,0x0803
0a64 05b6 0804 | | .CONST 0x05b6,0x0804
0a66 05b7 0005 | | .CONST 0x05b7,0x0005
0a68 05c0 0002 | | .CONST 0x05c0,0x0002
0a6a 05d0 0003 | | .CONST 0x05d0,0x0003
0a6c 05dc 0004 | | .CONST 0x05dc,0x0004
0a6e 05e8 0006 | | .CONST 0x05e8,0x0006
0a70 0000 0000 | | .BLANK 0000[0x190]