|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 6144 (0x1800)
Notes: 00_class, 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 0830 | 0 | .CONST 0x0830 ; 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 INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x08b2,0x8000,0x0000,0x005a,0x7dd5,0x0000,0x0005
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 0058 | X | .CONST 0x0058 ; Address of begin
0019 005d | ] | .CONST 0x005d ; Address of exception handler
001a 0013 | | .CONST 0x0013 ; Number of locals
001b INIT_0018:
001b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1 = .DEBUG 0x001b,0x08b4,0x8001,0x0000,0x005a,0x7dd5,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x1b,0xffff
001c e001 | | Load 0x0,0x1
001d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
001e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
001f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1f,0xfffe
0020 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x20,0xfffd
0021 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x21,0xfffc
0022 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x22,0xfffb
0023 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x23,0xfffa
0024 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x24,0xfff9
0025 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x25,0xfff8
0026 0007 | | Action Break_Optional ; Debug Table 0x1.0x8 = 0x26,0xfff7
0027 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x9 = 0x27,0xfff6
0028 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0xa = 0x28,0x401
0029 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x1.0xb = 0x29,0xfff6
002a 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0xc = 0x2a,0xfff5
002b 4800 |H | Short_Literal 0x0
002c 49a0 |I | Short_Literal 0x1a0
002d 00eb | | Load_Encached Diana_Cache
002e 0098 | | Execute Package,Field_Read_Dynamic
002f 0334 | 4 | Declare_Variable Array,With_Constraint
0030 4801 |H | Short_Literal 0x1
0031 4800 |H | Short_Literal 0x0
0032 49a0 |I | Short_Literal 0x1a0
0033 00eb | | Load_Encached Diana_Cache
0034 0098 | | Execute Package,Field_Read_Dynamic
0035 0334 | 4 | Declare_Variable Array,With_Constraint
0036 00d9 | | Load_Top At_Offset_1
0037 01d4 | | Execute Vector,Structure_Write
0038 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xd = 0x38,0xfff4
0039 1b0f | | Execute Package,Field_Read,Field_Number 0xf
003a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
003b 0007 | | Action Break_Optional ; Debug Table 0x1.0xe = 0x3b,0xfff3
003c 029f 006b | k| Declare_Subprogram INIT_0068,For_Call ; Debug Table 0x1.0xf = 0x3c,0xfff2
003e 029f 0083 | | Declare_Subprogram INIT_0080,For_Call ; Debug Table 0x1.0x10 = 0x3e,0xfff1
0040 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call ; Debug Table 0x1.0x11 = 0x40,0xfff0
0042 029f 0183 | | Declare_Subprogram INIT_0180,For_Call ; Debug Table 0x1.0x12 = 0x42,0xffef
0044 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call ; Debug Table 0x1.0x13 = 0x44,0xffee
0046 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call ; Debug Table 0x1.0x14 = 0x46,0xffed
0048 029f 022b | +| Declare_Subprogram INIT_0228,For_Call ; Debug Table 0x1.0x15 = 0x48,0xffec
004a 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call ; Debug Table 0x1.0x16 = 0x4a,0xffeb
004c 029f 036b | k| Declare_Subprogram INIT_0368,For_Call ; Debug Table 0x1.0x17 = 0x4c,0xffea
004e 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call ; Debug Table 0x1.0x18 = 0x4e,0xffe9
0050 029f 0453 | S| Declare_Subprogram INIT_0450,For_Call ; Debug Table 0x1.0x19 = 0x50,0xffe8
0052 029f 0503 | | Declare_Subprogram INIT_0500,For_Call ; Debug Table 0x1.0x1a = 0x52,0xffe7
0054 029f 05d3 | | Declare_Subprogram INIT_05d0,For_Call ; Debug Table 0x1.0x1b = 0x54,0xffe6
0056 029f 06a3 | | Declare_Subprogram INIT_06a0,For_Call ; Debug Table 0x1.0x1c = 0x56,0xffe5
0058 BODY_0018:
0058 0007 | | Action Break_Optional ; Debug Table 0x1.0x1d = 0x58,0x1
0059 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x1e = 0x59,0x801
005a a5fe | | Store_Unchecked 0x2,-0x2 ; Debug Table 0x1.0x1f = 0x5a,0x1
005b 8413 | | Call 0x2,0x13 ; Debug Table 0x1.0x20 = 0x5b,0x2
005c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
005d TRAP_0018:
005d 62ba |b | Indirect_Literal Discrete,0x318,{0x00000000, 0x5a89f501}
005e 010f | | Execute Exception,Equal
005f 6801 |h | Jump_Zero 0x61
0060 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x1.0x21 = 0x60,0x3
0061 0100 | | Execute Exception,Raise
0062 0000 0000 | | .BLANK 0000[0x6]
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 e003 | | Load 0x0,0x3 ; Debug Table 0x2 = .DEBUG 0x006b,0x08fa,0x0001,0x0000,0x005a,0x89f5,0x0000,0x00ac
; Debug Table 0x2.0x0 = 0x6b,0x1
006c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
006d 0092 0708 | | Action Push_String_Extended,0x708 ; "Make_Inline."
; Debug Table 0x2.0x1 = 0x6d,0x2
006f 00db | | Load_Top At_Offset_3
0070 01cc | | Execute Vector,Catenate
0071 0092 0709 | | Action Push_String_Extended,0x709 ; " failed - "
0073 01cc | | Execute Vector,Catenate
0074 e7fe | | Load 0x3,-0x2
0075 01cc | | Execute Vector,Catenate
0076 e003 | | Load 0x0,0x3
0077 180f | | Execute Package,Field_Execute,Field_Number 0xf
0078 629f |b | Indirect_Literal Discrete,0x318,{0x00000000, 0x5a89f501} ; Debug Table 0x2.0x2 = 0x78,0x3
0079 0257 | W | Execute Discrete,Raise
007a 0000 0000 | | .BLANK 0000[0x6]
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 00db | | Load_Top At_Offset_3 ; Debug Table 0x3 = .DEBUG 0x0083,0x0902,0x0001,0x0000,0x005a,0x89f5,0x0000,0x00d5
; Debug Table 0x3.0x0 = 0x83,0x1
0084 0b00 | | Execute_Immediate Case_Compare,0x0
0085 7019 |p | Jump_Nonzero 0x9f
0086 e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x1 = 0x86,0x3
0087 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0088 0092 070a | | Action Push_String_Extended,0x70a ; "Bad status from Directory."
; Debug Table 0x3.0x2 = 0x88,0x4
008a e7ff | | Load 0x3,-0x1
008b 01cc | | Execute Vector,Catenate
008c 0092 070b | | Action Push_String_Extended,0x70b ; ": "
008e 01cc | | Execute Vector,Catenate
008f e7fe | | Load 0x3,-0x2
0090 e001 | | Load 0x0,0x1
0091 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0092 025e | ^ | Execute Discrete,Convert
0093 1c01 | | Execute_Immediate Run_Utility,0x1
0094 01cc | | Execute Vector,Catenate
0095 e003 | | Load 0x0,0x3
0096 180f | | Execute Package,Field_Execute,Field_Number 0xf
0097 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x3 = 0x97,0x5
0098 e7fe | | Load 0x3,-0x2
0099 0092 070c | | Action Push_String_Extended,0x70c ; "Make_Inline"
009b e004 | | Load 0x0,0x4
009c 180e | | Execute Package,Field_Execute,Field_Number 0xe
009d 627a |bz | Indirect_Literal Discrete,0x318,{0x00000000, 0x5a89f501} ; Debug Table 0x3.0x4 = 0x9d,0x6
009e 0257 | W | Execute Discrete,Raise
009f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x3.0x5 = 0x9f,0x2
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00b7 | | .CONST 0x00b7 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0006 | | .CONST 0x0006 ; Number of locals
00a3 INIT_00a0:
00a3 e001 | | Load 0x0,0x1 ; Debug Table 0x4 = .DEBUG 0x00a3,0x0910,0x0001,0x0000,0x005a,0x89f5,0x0000,0x011f
; Debug Table 0x4.0x0 = 0xa3,0xffff
00a4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a6 02c7 | | Declare_Variable Any
00a7 00d8 | | Load_Top At_Offset_0
00a8 1c00 | | Execute_Immediate Run_Utility,0x0
00a9 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x1 = 0xa9,0xfffe
00aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ab e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x2 = 0xab,0xfffd
00ac 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00ad 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
00ae 02c7 | | Declare_Variable Any
00af 00d8 | | Load_Top At_Offset_0
00b0 1c00 | | Execute_Immediate Run_Utility,0x0
00b1 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x3 = 0xb1,0xfffc
00b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00b3 02c7 | | Declare_Variable Any
00b4 00d8 | | Load_Top At_Offset_0
00b5 1c00 | | Execute_Immediate Run_Utility,0x0
00b6 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x4 = 0xb6,0xfffb
00b7 BODY_00a0:
00b7 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x5 = 0xb7,0x1
00b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b9 00da | | Load_Top At_Offset_2
00ba 0120 | | Execute Any,Is_Value
00bb 6803 |h | Jump_Zero 0xbf
00bc e001 | | Load 0x0,0x1
00bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00be 7801 |x | Jump 0xc0
00bf 00da | | Load_Top At_Offset_2
00c0 6253 |bS | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
00c1 e005 | | Load 0x0,0x5
00c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c3 4800 |H | Short_Literal 0x0
00c4 e001 | | Load 0x0,0x1
00c5 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00c6 e7ff | | Load 0x3,-0x1
00c7 e001 | | Load 0x0,0x1
00c8 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
00c9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ca c605 | | Store 0x3,0x5
00cb c603 | | Store 0x3,0x3
00cc 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x6 = 0xcc,0x2
00cd 0b00 | | Execute_Immediate Case_Compare,0x0
00ce 7007 |p | Jump_Nonzero 0xd6
00cf 0b05 | | Execute_Immediate Case_Compare,0x5
00d0 7047 |pG | Jump_Nonzero 0x118
00d1 e603 | | Load 0x3,0x3 ; Debug Table 0x4.0x7 = 0xd1,0x17
00d2 0092 070d | | Action Push_String_Extended,0x70d ; "Traversal.Get_Object"
00d4 8407 | | Call 0x2,0x7
00d5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00d6 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x8 = 0xd6,0x3
00d7 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00d8 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x9 = 0xd8,0x4
00d9 c7fc | | Store 0x3,-0x4
00da 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xa = 0xda,0x5
00db e001 | | Load 0x0,0x1
00dc 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00dd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00de c602 | | Store 0x3,0x2
00df e001 | | Load 0x0,0x1 ; Debug Table 0x4.0xb = 0xdf,0x6
00e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e1 e604 | | Load 0x3,0x4
00e2 0120 | | Execute Any,Is_Value
00e3 6804 |h | Jump_Zero 0xe8
00e4 e001 | | Load 0x0,0x1
00e5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00e6 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
00e7 7801 |x | Jump 0xe9
00e8 e604 | | Load 0x3,0x4
00e9 e001 | | Load 0x0,0x1
00ea 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00eb 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00ec 6227 |b' | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
00ed 4800 |H | Short_Literal 0x0
00ee 4800 |H | Short_Literal 0x0
00ef 4800 |H | Short_Literal 0x0
00f0 e005 | | Load 0x0,0x5
00f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f2 4800 |H | Short_Literal 0x0
00f3 e602 | | Load 0x3,0x2
00f4 e001 | | Load 0x0,0x1
00f5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00f6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
00f7 c7fd | | Store 0x3,-0x3
00f8 c604 | | Store 0x3,0x4
00f9 c603 | | Store 0x3,0x3
00fa e603 | | Load 0x3,0x3 ; Debug Table 0x4.0xc = 0xfa,0x7
00fb 0092 070e | | Action Push_String_Extended,0x70e ; "Ada.Open"
00fd 8407 | | Call 0x2,0x7
00fe 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xd = 0xfe,0x8
00ff 0007 | | Action Break_Optional
0100 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xe = 0x100,0x401
0101 0007 | | Action Break_Optional
0102 e609 | | Load 0x3,0x9 ; Debug Table 0x4.0xf = 0x102,0x801
0103 0007 | | Action Break_Optional
0104 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x10 = 0x104,0x802
0105 0007 | | Action Break_Optional ; Debug Table 0x4.0x11 = 0x105,0x803
0106 00d0 | | Action Swap_Control ; Debug Table 0x4.0x12 = 0x106,0x804
0107 00d1 | | Pop_Control Pop_Count_1
0108 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x4.0x13 = 0x108,0x401
0109 00eb | | Load_Encached Diana_Cache
010a 0098 | | Execute Package,Field_Read_Dynamic
010b 180d | | Execute Package,Field_Execute,Field_Number 0xd
010c 7800 |x | Jump 0x10d
010d 00d0 | | Action Swap_Control
010e 00d1 | | Pop_Control Pop_Count_1
010f 6805 |h | Jump_Zero 0x115 ; Debug Table 0x4.0x14 = 0x10f,0x8
0110 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x15 = 0x110,0x9
0111 00eb | | Load_Encached Diana_Cache
0112 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0113 a7fe | | Store_Unchecked 0x3,-0x2
0114 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0115 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x16 = 0x115,0xa
0116 a7fe | | Store_Unchecked 0x3,-0x2
0117 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0118 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x17 = 0x118,0xb
0119 4974 |It | Short_Literal 0x174
011a 00eb | | Load_Encached Diana_Cache
011b 0098 | | Execute Package,Field_Read_Dynamic
011c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
011d a7fd | | Store_Unchecked 0x3,-0x3
011e e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x18 = 0x11e,0xc
011f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0120 e602 | | Load 0x3,0x2
0121 0120 | | Execute Any,Is_Value
0122 6804 |h | Jump_Zero 0x127
0123 e001 | | Load 0x0,0x1
0124 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0125 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0126 7801 |x | Jump 0x128
0127 e602 | | Load 0x3,0x2
0128 e7ff | | Load 0x3,-0x1
0129 e001 | | Load 0x0,0x1
012a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
012b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
012c c602 | | Store 0x3,0x2
012d c603 | | Store 0x3,0x3
012e e603 | | Load 0x3,0x3 ; Debug Table 0x4.0x19 = 0x12e,0xd
012f 0092 070f | | Action Push_String_Extended,0x70f ; "Ada.Get_Unit"
0131 8407 | | Call 0x2,0x7
0132 e602 | | Load 0x3,0x2 ; Debug Table 0x4.0x1a = 0x132,0xe
0133 e001 | | Load 0x0,0x1
0134 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0135 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0136 c605 | | Store 0x3,0x5
0137 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x1b = 0x137,0xf
0138 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0139 e001 | | Load 0x0,0x1
013a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
013b 61d8 |a | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
013c e005 | | Load 0x0,0x5
013d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
013e 4800 |H | Short_Literal 0x0
013f e605 | | Load 0x3,0x5
0140 e001 | | Load 0x0,0x1
0141 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0142 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0143 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0144 c603 | | Store 0x3,0x3
0145 e603 | | Load 0x3,0x3 ; Debug Table 0x4.0x1c = 0x145,0x10
0146 0092 0710 | | Action Push_String_Extended,0x710 ; "Traversal.Get_Declaration"
0148 8407 | | Call 0x2,0x7
0149 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x1d = 0x149,0x11
014a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014b e602 | | Load 0x3,0x2
014c 0120 | | Execute Any,Is_Value
014d 6804 |h | Jump_Zero 0x152
014e e001 | | Load 0x0,0x1
014f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0150 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0151 7801 |x | Jump 0x153
0152 e602 | | Load 0x3,0x2
0153 e7ff | | Load 0x3,-0x1
0154 e001 | | Load 0x0,0x1
0155 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0156 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0157 c602 | | Store 0x3,0x2
0158 c603 | | Store 0x3,0x3
0159 e603 | | Load 0x3,0x3 ; Debug Table 0x4.0x1e = 0x159,0x12
015a 0092 070f | | Action Push_String_Extended,0x70f ; "Ada.Get_Unit"
015c 8407 | | Call 0x2,0x7
015d 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x1f = 0x15d,0x13
015e c7fc | | Store 0x3,-0x4
015f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x20 = 0x15f,0x14
0160 0007 | | Action Break_Optional
0161 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x21 = 0x161,0xc01
0162 0007 | | Action Break_Optional
0163 e609 | | Load 0x3,0x9 ; Debug Table 0x4.0x22 = 0x163,0x1001
0164 0007 | | Action Break_Optional
0165 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x23 = 0x165,0x1002
0166 0007 | | Action Break_Optional ; Debug Table 0x4.0x24 = 0x166,0x1003
0167 00d0 | | Action Swap_Control ; Debug Table 0x4.0x25 = 0x167,0x1004
0168 00d1 | | Pop_Control Pop_Count_1
0169 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x4.0x26 = 0x169,0xc01
016a 00eb | | Load_Encached Diana_Cache
016b 0098 | | Execute Package,Field_Read_Dynamic
016c 180d | | Execute Package,Field_Execute,Field_Number 0xd
016d 7800 |x | Jump 0x16e
016e 00d0 | | Action Swap_Control
016f 00d1 | | Pop_Control Pop_Count_1
0170 6805 |h | Jump_Zero 0x176 ; Debug Table 0x4.0x27 = 0x170,0x14
0171 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x28 = 0x171,0x15
0172 00eb | | Load_Encached Diana_Cache
0173 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0174 a7fe | | Store_Unchecked 0x3,-0x2
0175 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0176 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x29 = 0x176,0x16
0177 a7fe | | Store_Unchecked 0x3,-0x2
0178 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0179 0000 0000 | | .BLANK 0000[0x7]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 018c | | .CONST 0x018c ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0003 | | .CONST 0x0003 ; Number of locals
0183 INIT_0180:
0183 e001 | | Load 0x0,0x1 ; Debug Table 0x5 = .DEBUG 0x0183,0x0966,0x0002,0x0000,0x005a,0x89f5,0x0000,0x0235
; Debug Table 0x5.0x0 = 0x183,0xffff
0184 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0185 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0186 02c7 | | Declare_Variable Any
0187 00d8 | | Load_Top At_Offset_0
0188 1c00 | | Execute_Immediate Run_Utility,0x0
0189 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x1 = 0x189,0xfffe
018a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
018b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018c BODY_0180:
018c e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x2 = 0x18c,0x1
018d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
018e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018f 00da | | Load_Top At_Offset_2
0190 4800 |H | Short_Literal 0x0
0191 e005 | | Load 0x0,0x5
0192 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0193 e006 | | Load 0x0,0x6
0194 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0195 e007 | | Load 0x0,0x7
0196 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0197 4801 |H | Short_Literal 0x1
0198 4800 |H | Short_Literal 0x0
0199 e7ff | | Load 0x3,-0x1
019a 0092 0711 | | Action Push_String_Extended,0x711 ; "[].@"
019c e001 | | Load 0x0,0x1
019d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
019e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
019f c602 | | Store 0x3,0x2
01a0 0059 | Y | Store_Top Discrete,At_Offset_1
01a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0x1a1,0x2
01a2 0b03 | | Execute_Immediate Case_Compare,0x3
01a3 7004 |p | Jump_Nonzero 0x1a8
01a4 0b00 | | Execute_Immediate Case_Compare,0x0
01a5 7004 |p | Jump_Nonzero 0x1aa
01a6 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x4 = 0x1a6,0x5
01a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01a8 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x5 = 0x1a8,0x3
01a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01aa 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x6 = 0x1aa,0x4
01ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01ac 0000 0000 | | .BLANK 0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b7 | | .CONST 0x01b7 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0002 | | .CONST 0x0002 ; Number of locals
01b3 INIT_01b0:
01b3 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x01b3,0x0976,0x0002,0x0000,0x005a,0x89f5,0x0000,0x028f
; Debug Table 0x6.0x0 = 0x1b3,0xffff
01b4 00db | | Load_Top At_Offset_3
01b5 e008 | | Load 0x0,0x8
01b6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01b7 BODY_01b0:
01b7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x1b7,0x1
01b8 01dc | | Execute Vector,Last
01b9 00d9 | | Load_Top At_Offset_1
01ba 01d7 | | Execute Vector,Field_Read
01bb e008 | | Load 0x0,0x8
01bc 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
01bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01be 0000 0000 | | .XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01ca | | .CONST 0x01ca ; Address of begin
01c1 021a | | .CONST 0x021a ; Address of exception handler
01c2 0005 | | .CONST 0x0005 ; Number of locals
01c3 INIT_01c0:
01c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x01c3,0x097c,0x0001,0x0000,0x005a,0x89f5,0x0000,0x02be
; Debug Table 0x7.0x0 = 0x1c3,0xffff
01c4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x1 = 0x1c4,0xfffe
01c5 00eb | | Load_Encached Diana_Cache ; Debug Table 0x7.0x2 = 0x1c5,0xfffd
01c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c7 0007 | | Action Break_Optional ; Debug Table 0x7.0x3 = 0x1c7,0xfffc
01c8 e009 | | Load 0x0,0x9 ; Debug Table 0x7.0x4 = 0x1c8,0xfffb
01c9 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
01ca BODY_01c0:
01ca 0007 | | Action Break_Optional ; Debug Table 0x7.0x5 = 0x1ca,0x1
01cb e7fd | | Load 0x3,-0x3 ; Debug Table 0x7.0x6 = 0x1cb,0x401
01cc 0007 | | Action Break_Optional
01cd 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x7.0x7 = 0x1cd,0x402
01ce 0007 | | Action Break_Optional ; Debug Table 0x7.0x8 = 0x1ce,0x403
01cf 0007 | | Action Break_Optional ; Debug Table 0x7.0x9 = 0x1cf,0x404
01d0 0ba8 | | Execute_Immediate Case_Compare,0xa8 ; Debug Table 0x7.0xa = 0x1d0,0x1
01d1 7002 |p | Jump_Nonzero 0x1d4
01d2 613d |a= | Indirect_Literal Discrete,0x310,{0x00000000, 0x5a89f502} ; Debug Table 0x7.0xb = 0x1d2,0x6
01d3 0257 | W | Execute Discrete,Raise
01d4 e7fd | | Load 0x3,-0x3 ; Debug Table 0x7.0xc = 0x1d4,0x2
01d5 00eb | | Load_Encached Diana_Cache
01d6 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
01d7 a602 | | Store_Unchecked 0x3,0x2
01d8 0007 | | Action Break_Optional ; Debug Table 0x7.0xd = 0x1d8,0x3
01d9 e602 | | Load 0x3,0x2 ; Debug Table 0x7.0xe = 0x1d9,0x801
01da 0007 | | Action Break_Optional
01db 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x7.0xf = 0x1db,0x802
01dc 0007 | | Action Break_Optional ; Debug Table 0x7.0x10 = 0x1dc,0x803
01dd 0007 | | Action Break_Optional ; Debug Table 0x7.0x11 = 0x1dd,0x804
01de 0b49 | I | Execute_Immediate Case_Compare,0x49 ; Debug Table 0x7.0x12 = 0x1de,0x3
01df 7001 |p | Jump_Nonzero 0x1e1
01e0 7804 |x | Jump 0x1e5 ; Debug Table 0x7.0x13 = 0x1e0,0x5
01e1 e602 | | Load 0x3,0x2 ; Debug Table 0x7.0x14 = 0x1e1,0x4
01e2 00eb | | Load_Encached Diana_Cache
01e3 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
01e4 a602 | | Store_Unchecked 0x3,0x2
01e5 00d1 | | Pop_Control Pop_Count_1
01e6 00d1 | | Pop_Control Pop_Count_1
01e7 e7fd | | Load 0x3,-0x3 ; Debug Table 0x7.0x15 = 0x1e7,0x7
01e8 e7fc | | Load 0x3,-0x4
01e9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01ea e00a | | Load 0x0,0xa
01eb 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ec e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x16 = 0x1ec,0x8
01ed 00eb | | Load_Encached Diana_Cache
01ee 18ec | | Execute Package,Field_Execute,Field_Number 0xec
01ef e606 | | Load 0x3,0x6 ; Debug Table 0x7.0x17 = 0x1ef,0xc01
01f0 0007 | | Action Break_Optional
01f1 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x7.0x18 = 0x1f1,0xc02
01f2 0007 | | Action Break_Optional ; Debug Table 0x7.0x19 = 0x1f2,0xc03
01f3 00d0 | | Action Swap_Control ; Debug Table 0x7.0x1a = 0x1f3,0xc04
01f4 00d1 | | Pop_Control Pop_Count_1
01f5 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 ; Debug Table 0x7.0x1b = 0x1f5,0x8
01f6 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x1c = 0x1f6,0x9
01f7 e602 | | Load 0x3,0x2
01f8 4974 |It | Short_Literal 0x174
01f9 00eb | | Load_Encached Diana_Cache
01fa 0098 | | Execute Package,Field_Read_Dynamic
01fb 180f | | Execute Package,Field_Execute,Field_Number 0xf
01fc e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x1d = 0x1fc,0xa
01fd e602 | | Load 0x3,0x2
01fe 00eb | | Load_Encached Diana_Cache
01ff 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0200 00da | | Load_Top At_Offset_2
0201 00eb | | Load_Encached Diana_Cache
0202 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0203 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0204 e7fc | | Load 0x3,-0x4 ; Debug Table 0x7.0x1e = 0x204,0xb
0205 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0206 e009 | | Load 0x0,0x9
0207 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0208 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0209 e7fe | | Load 0x3,-0x2 ; Debug Table 0x7.0x1f = 0x209,0xc
020a e7ff | | Load 0x3,-0x1
020b 840a | | Call 0x2,0xa
020c 00d9 | | Load_Top At_Offset_1
020d 0217 | | Execute Heap_Access,All_Reference
020e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
020f 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x20 = 0x20f,0xd
0210 e7fc | | Load 0x3,-0x4
0211 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0212 e00a | | Load 0x0,0xa
0213 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0214 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x21 = 0x214,0xe
0215 a7fd | | Store_Unchecked 0x3,-0x3
0216 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x22 = 0x216,0xf
0217 e7fc | | Load 0x3,-0x4
0218 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0219 4503 |E | Exit_Suprogram New_Top_Offset 0x3
021a TRAP_01c0:
021a 60f5 |` | Indirect_Literal Discrete,0x310,{0x00000000, 0x5a89f502}
021b 010f | | Execute Exception,Equal
021c 6806 |h | Jump_Zero 0x223
021d 0092 0712 | | Action Push_String_Extended,0x712 ; "Bad Call"
; Debug Table 0x7.0x23 = 0x21d,0x10
021f 0092 0713 | | Action Push_String_Extended,0x713 ; "Make_Mumble_S"
0221 8406 | | Call 0x2,0x6
0222 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0223 0100 | | Execute Exception,Raise
0224 0000 0000 | | .BLANK 0000[0x4]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 024e | N | .CONST 0x024e ; Address of begin
0229 0302 | | .CONST 0x0302 ; Address of exception handler
022a 000e | | .CONST 0x000e ; Number of locals
022b INIT_0228:
022b e001 | | Load 0x0,0x1 ; Debug Table 0x8 = .DEBUG 0x022b,0x09c6,0x0001,0x0000,0x005a,0x89f5,0x0000,0x038f
; Debug Table 0x8.0x0 = 0x22b,0xffff
022c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
022d 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
022e 02c7 | | Declare_Variable Any
022f 00d8 | | Load_Top At_Offset_0
0230 1c00 | | Execute_Immediate Run_Utility,0x0
0231 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x1 = 0x231,0xfffe
0232 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0233 02c7 | | Declare_Variable Any
0234 00d8 | | Load_Top At_Offset_0
0235 1c00 | | Execute_Immediate Run_Utility,0x0
0236 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x8.0x2 = 0x236,0xfffd
0237 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x8.0x3 = 0x237,0xfffc
0238 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x8.0x4 = 0x238,0xfffb
0239 e00b | | Load 0x0,0xb ; Debug Table 0x8.0x5 = 0x239,0xfffa
023a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023b 02c7 | | Declare_Variable Any
023c 00d8 | | Load_Top At_Offset_0
023d 1c00 | | Execute_Immediate Run_Utility,0x0
023e e00c | | Load 0x0,0xc ; Debug Table 0x8.0x6 = 0x23e,0xfff9
023f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0240 0322 | " | Declare_Variable Record
0241 00d8 | | Load_Top At_Offset_0
0242 1c00 | | Execute_Immediate Run_Utility,0x0
0243 e00c | | Load 0x0,0xc ; Debug Table 0x8.0x7 = 0x243,0xfff8
0244 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0245 0322 | " | Declare_Variable Record
0246 00d8 | | Load_Top At_Offset_0
0247 1c00 | | Execute_Immediate Run_Utility,0x0
0248 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x8 = 0x248,0xfff7
0249 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x9 = 0x24a,0xfff6
024b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0xa = 0x24b,0xfff5
024c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0xb = 0x24c,0xfff4
024d 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x8.0xc = 0x24d,0xfff3
024e BODY_0228:
024e e001 | | Load 0x0,0x1 ; Debug Table 0x8.0xd = 0x24e,0x1
024f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0250 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0251 c602 | | Store 0x3,0x2
0252 e00d | | Load 0x0,0xd ; Debug Table 0x8.0xe = 0x252,0x2
0253 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0254 e005 | | Load 0x0,0x5
0255 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0256 c603 | | Store 0x3,0x3
0257 e608 | | Load 0x3,0x8 ; Debug Table 0x8.0xf = 0x257,0x3
0258 e7fe | | Load 0x3,-0x2
0259 e603 | | Load 0x3,0x3
025a e00c | | Load 0x0,0xc
025b 180e | | Execute Package,Field_Execute,Field_Number 0xe
025c c7fe | | Store 0x3,-0x2
025d 00d1 | | Pop_Control Pop_Count_1
025e e7fe | | Load 0x3,-0x2 ; Debug Table 0x8.0x10 = 0x25e,0x4
025f 4974 |It | Short_Literal 0x174
0260 00eb | | Load_Encached Diana_Cache
0261 0098 | | Execute Package,Field_Read_Dynamic
0262 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0263 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0264 e609 | | Load 0x3,0x9 ; Debug Table 0x8.0x11 = 0x264,0x5
0265 e7fd | | Load 0x3,-0x3
0266 e603 | | Load 0x3,0x3
0267 e00c | | Load 0x0,0xc
0268 180e | | Execute Package,Field_Execute,Field_Number 0xe
0269 c7fd | | Store 0x3,-0x3
026a 00d1 | | Pop_Control Pop_Count_1
026b e7fd | | Load 0x3,-0x3 ; Debug Table 0x8.0x12 = 0x26b,0x6
026c 00eb | | Load_Encached Diana_Cache
026d 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
026e a60b | | Store_Unchecked 0x3,0xb
026f 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x13 = 0x26f,0x7
0270 00eb | | Load_Encached Diana_Cache
0271 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0272 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x14 = 0x272,0x401
0273 021d | | Execute Heap_Access,Is_Null
0274 00d0 | | Action Swap_Control
0275 00d1 | | Pop_Control Pop_Count_1
0276 7023 |p# | Jump_Nonzero 0x29a ; Debug Table 0x8.0x15 = 0x276,0x7
0277 e00d | | Load 0x0,0xd ; Debug Table 0x8.0x16 = 0x277,0x8
0278 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0279 4800 |H | Short_Literal 0x0
027a e7fe | | Load 0x3,-0x2
027b e00e | | Load 0x0,0xe
027c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
027d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
027e e00e | | Load 0x0,0xe
027f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0280 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0281 48ab |H | Short_Literal 0xab ; Debug Table 0x8.0x17 = 0x281,0x9
0282 00eb | | Load_Encached Diana_Cache
0283 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
0284 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0285 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x18 = 0x285,0xa
0286 00da | | Load_Top At_Offset_2
0287 00eb | | Load_Encached Diana_Cache
0288 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
0289 e608 | | Load 0x3,0x8
028a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
028b e00a | | Load 0x0,0xa
028c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
028d 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x8.0x19 = 0x28d,0xb
028e e002 | | Load 0x0,0x2
028f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0290 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0291 e60b | | Load 0x3,0xb
0292 e609 | | Load 0x3,0x9
0293 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0294 e60c | | Load 0x3,0xc
0295 e608 | | Load 0x3,0x8
0296 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0297 e00a | | Load 0x0,0xa
0298 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0299 0031 | 1 | Store_Top Heap_Access,At_Offset_1
029a e00d | | Load 0x0,0xd ; Debug Table 0x8.0x1a = 0x29a,0xc
029b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
029c 4800 |H | Short_Literal 0x0
029d e7fd | | Load 0x3,-0x3
029e e00e | | Load 0x0,0xe
029f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02a0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02a1 e00e | | Load 0x0,0xe
02a2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02a3 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02a4 e609 | | Load 0x3,0x9 ; Debug Table 0x8.0x1b = 0x2a4,0xd
02a5 e7fd | | Load 0x3,-0x3
02a6 e608 | | Load 0x3,0x8
02a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02a8 e7fe | | Load 0x3,-0x2
02a9 840b | | Call 0x2,0xb
02aa c7fd | | Store 0x3,-0x3
02ab 00d1 | | Pop_Control Pop_Count_1
02ac e00d | | Load 0x0,0xd ; Debug Table 0x8.0x1c = 0x2ac,0xe
02ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02ae 4800 |H | Short_Literal 0x0
02af e7fe | | Load 0x3,-0x2
02b0 e00e | | Load 0x0,0xe
02b1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02b3 e00e | | Load 0x0,0xe
02b4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02b5 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02b6 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x8.0x1d = 0x2b6,0xf
02b7 e002 | | Load 0x0,0x2
02b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02b9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02ba e7fd | | Load 0x3,-0x3
02bb e609 | | Load 0x3,0x9
02bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02bd e7fe | | Load 0x3,-0x2
02be e608 | | Load 0x3,0x8
02bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02c0 e00a | | Load 0x0,0xa
02c1 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
02c2 c606 | | Store 0x3,0x6
02c3 e609 | | Load 0x3,0x9 ; Debug Table 0x8.0x1e = 0x2c3,0x10
02c4 4801 |H | Short_Literal 0x1
02c5 e00c | | Load 0x0,0xc
02c6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02c7 00d1 | | Pop_Control Pop_Count_1
02c8 e608 | | Load 0x3,0x8 ; Debug Table 0x8.0x1f = 0x2c8,0x11
02c9 4801 |H | Short_Literal 0x1
02ca e00c | | Load 0x0,0xc
02cb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02cc 00d1 | | Pop_Control Pop_Count_1
02cd e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x20 = 0x2cd,0x12
02ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02cf 00f1 | | Load_Encached Diana_Temp_Seq
02d0 e001 | | Load 0x0,0x1
02d1 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02d2 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02d3 e607 | | Load 0x3,0x7
02d4 0120 | | Execute Any,Is_Value
02d5 6803 |h | Jump_Zero 0x2d9
02d6 e00b | | Load 0x0,0xb
02d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d8 7801 |x | Jump 0x2da
02d9 e607 | | Load 0x3,0x7
02da 6039 |`9 | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
02db e603 | | Load 0x3,0x3
02dc 4800 |H | Short_Literal 0x0
02dd e001 | | Load 0x0,0x1
02de 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
02df 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e0 e001 | | Load 0x0,0x1
02e1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02e2 4ffb |O | Short_Literal -0x5
02e3 e7ff | | Load 0x3,-0x1
02e4 e001 | | Load 0x0,0x1
02e5 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
02e6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02e7 c607 | | Store 0x3,0x7
02e8 c604 | | Store 0x3,0x4
02e9 c605 | | Store 0x3,0x5
02ea c60a | | Store 0x3,0xa
02eb e60a | | Load 0x3,0xa ; Debug Table 0x8.0x21 = 0x2eb,0x13
02ec 0092 0714 | | Action Push_String_Extended,0x714 ; "Object_Ops.Destroy"
02ee 8407 | | Call 0x2,0x7
02ef 0007 | | Action Break_Optional ; Debug Table 0x8.0x22 = 0x2ef,0x14
02f0 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x23 = 0x2f0,0x801
02f1 a7fe | | Store_Unchecked 0x3,-0x2 ; Debug Table 0x8.0x24 = 0x2f1,0x14
02f2 0007 | | Action Break_Optional ; Debug Table 0x8.0x25 = 0x2f2,0x15
02f3 e606 | | Load 0x3,0x6 ; Debug Table 0x8.0x26 = 0x2f3,0xc01
02f4 0217 | | Execute Heap_Access,All_Reference
02f5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02f6 a7fd | | Store_Unchecked 0x3,-0x3 ; Debug Table 0x8.0x27 = 0x2f6,0x15
02f7 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x28 = 0x2f7,0x16
02f8 4801 |H | Short_Literal 0x1
02f9 4801 |H | Short_Literal 0x1
02fa e005 | | Load 0x0,0x5
02fb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02fc c603 | | Store 0x3,0x3
02fd e602 | | Load 0x3,0x2 ; Debug Table 0x8.0x29 = 0x2fd,0x17
02fe e001 | | Load 0x0,0x1
02ff 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0300 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0301 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0302 TRAP_0228:
0302 0007 | | Action Break_Optional
0303 e603 | | Load 0x3,0x3 ; Debug Table 0x8.0x2a = 0x303,0x18
0304 4801 |H | Short_Literal 0x1
0305 4800 |H | Short_Literal 0x0
0306 e005 | | Load 0x0,0x5
0307 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0308 c603 | | Store 0x3,0x3
0309 e00f | | Load 0x0,0xf ; Debug Table 0x8.0x2b = 0x309,0x19
030a 180d | | Execute Package,Field_Execute,Field_Number 0xd
030b 0092 0715 | | Action Push_String_Extended,0x715 ; "Make_Source_Inline"
030d 8406 | | Call 0x2,0x6
030e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
030f 0000 | | .XXX[0x1]
0310 0000 0000 | | .LITERAL {0x00000000, 0x5a89f502}
0314 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0318 0000 0000 | | .LITERAL {0x00000000, 0x5a89f501}
031c 0000 0000 | | .BLANK 0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0336 | 6 | .CONST 0x0336 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0005 | | .CONST 0x0005 ; Number of locals
0323 INIT_0320:
0323 e001 | | Load 0x0,0x1 ; Debug Table 0x9 = .DEBUG 0x0323,0x0a20,0x0002,0x0000,0x005a,0x89f5,0x0000,0x052d
; Debug Table 0x9.0x0 = 0x323,0xffff
0324 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0325 02c7 | | Declare_Variable Any
0326 00d8 | | Load_Top At_Offset_0
0327 1c00 | | Execute_Immediate Run_Utility,0x0
0328 e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x1 = 0x328,0xfffe
0329 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032a e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x2 = 0x32a,0xfffd
032b 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
032c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032d 02c7 | | Declare_Variable Any
032e 00d8 | | Load_Top At_Offset_0
032f 1c00 | | Execute_Immediate Run_Utility,0x0
0330 e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x3 = 0x330,0xfffc
0331 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0332 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0333 02c7 | | Declare_Variable Any
0334 00d8 | | Load_Top At_Offset_0
0335 1c00 | | Execute_Immediate Run_Utility,0x0
0336 BODY_0320:
0336 e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x4 = 0x336,0x1
0337 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0338 00d9 | | Load_Top At_Offset_1
0339 0120 | | Execute Any,Is_Value
033a 6804 |h | Jump_Zero 0x33f
033b e001 | | Load 0x0,0x1
033c 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
033d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033e 7801 |x | Jump 0x340
033f 00d9 | | Load_Top At_Offset_1
0340 e7ff | | Load 0x3,-0x1
0341 e001 | | Load 0x0,0x1
0342 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0343 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0344 c605 | | Store 0x3,0x5
0345 005b | [ | Store_Top Discrete,At_Offset_3
0346 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x5 = 0x346,0x2
0347 0092 0716 | | Action Push_String_Extended,0x716 ; "Control_Point.Enclosing_World"
0349 8407 | | Call 0x2,0x7
034a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x34a,0x3
034b e001 | | Load 0x0,0x1
034c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
034d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
034e c602 | | Store 0x3,0x2
034f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x7 = 0x34f,0x4
0350 0120 | | Execute Any,Is_Value
0351 6804 |h | Jump_Zero 0x356
0352 e001 | | Load 0x0,0x1
0353 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0354 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0355 7801 |x | Jump 0x357
0356 00d9 | | Load_Top At_Offset_1
0357 e006 | | Load 0x0,0x6
0358 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0359 e007 | | Load 0x0,0x7
035a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
035b e001 | | Load 0x0,0x1
035c 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
035d 180f | | Execute Package,Field_Execute,Field_Number 0xf
035e c604 | | Store 0x3,0x4
035f 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x8 = 0x35f,0x5
0360 00da | | Load_Top At_Offset_2
0361 e001 | | Load 0x0,0x1
0362 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0363 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0364 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x9 = 0x364,0x6
0365 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0366 0000 0000 | | .XXX[0x2]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 037a | z | .CONST 0x037a ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0007 | | .CONST 0x0007 ; Number of locals
036b INIT_0368:
036b e005 | | Load 0x0,0x5 ; Debug Table 0xa = .DEBUG 0x036b,0x0a36,0x0001,0x0000,0x005a,0x89f5,0x0000,0x058c
; Debug Table 0xa.0x0 = 0x36b,0xffff
036c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036d 02c7 | | Declare_Variable Any
036e 00d8 | | Load_Top At_Offset_0
036f 1c00 | | Execute_Immediate Run_Utility,0x0
0370 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x1 = 0x370,0xfffe
0371 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xa.0x2 = 0x371,0xfffd
0372 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xa.0x3 = 0x372,0xfffc
0373 e00b | | Load 0x0,0xb ; Debug Table 0xa.0x4 = 0x373,0xfffb
0374 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0375 02c7 | | Declare_Variable Any
0376 00d8 | | Load_Top At_Offset_0
0377 1c00 | | Execute_Immediate Run_Utility,0x0
0378 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x5 = 0x378,0xfffa
0379 1b0d | | Execute Package,Field_Read,Field_Number 0xd
037a BODY_0368:
037a e7ff | | Load 0x3,-0x1 ; Debug Table 0xa.0x6 = 0x37a,0x1
037b e001 | | Load 0x0,0x1
037c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
037d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
037e 682f |h/ | Jump_Zero 0x3ae
037f e00d | | Load 0x0,0xd ; Debug Table 0xa.0x7 = 0x37f,0x2
0380 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0381 e005 | | Load 0x0,0x5
0382 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0383 c602 | | Store 0x3,0x2
0384 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x8 = 0x384,0x3
0385 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0386 00f1 | | Load_Encached Diana_Temp_Seq
0387 e001 | | Load 0x0,0x1
0388 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0389 1b17 | | Execute Package,Field_Read,Field_Number 0x17
038a 00ec | | Load_Encached Diana_Tree_Cache
038b e606 | | Load 0x3,0x6
038c 0120 | | Execute Any,Is_Value
038d 6803 |h | Jump_Zero 0x391
038e e00b | | Load 0x0,0xb
038f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0390 7801 |x | Jump 0x392
0391 e606 | | Load 0x3,0x6
0392 6781 |g | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
0393 e602 | | Load 0x3,0x2
0394 4803 |H | Short_Literal 0x3
0395 e7fe | | Load 0x3,-0x2
0396 e001 | | Load 0x0,0x1
0397 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0398 4802 |H | Short_Literal 0x2
0399 4801 |H | Short_Literal 0x1
039a e7ff | | Load 0x3,-0x1
039b e001 | | Load 0x0,0x1
039c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
039d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
039e c606 | | Store 0x3,0x6
039f c603 | | Store 0x3,0x3
03a0 c604 | | Store 0x3,0x4
03a1 c605 | | Store 0x3,0x5
03a2 0059 | Y | Store_Top Discrete,At_Offset_1
03a3 e602 | | Load 0x3,0x2 ; Debug Table 0xa.0x9 = 0x3a3,0x4
03a4 4801 |H | Short_Literal 0x1
03a5 00da | | Load_Top At_Offset_2
03a6 0f00 | | Execute_Immediate Equal,0x0
03a7 e005 | | Load 0x0,0x5
03a8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03a9 c602 | | Store 0x3,0x2
03aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xa = 0x3aa,0x5
03ab 0092 0717 | | Action Push_String_Extended,0x717 ; "Decl_Ops.Demote"
03ad 8407 | | Call 0x2,0x7
03ae e001 | | Load 0x0,0x1 ; Debug Table 0xa.0xb = 0x3ae,0x6
03af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b0 00f1 | | Load_Encached Diana_Temp_Seq
03b1 e001 | | Load 0x0,0x1
03b2 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03b3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03b4 00ec | | Load_Encached Diana_Tree_Cache
03b5 e606 | | Load 0x3,0x6
03b6 0120 | | Execute Any,Is_Value
03b7 6803 |h | Jump_Zero 0x3bb
03b8 e00b | | Load 0x0,0xb
03b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ba 7801 |x | Jump 0x3bc
03bb e606 | | Load 0x3,0x6
03bc 6757 |gW | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
03bd e7fd | | Load 0x3,-0x3
03be 4803 |H | Short_Literal 0x3
03bf e7fe | | Load 0x3,-0x2
03c0 e001 | | Load 0x0,0x1
03c1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03c2 4802 |H | Short_Literal 0x2
03c3 4801 |H | Short_Literal 0x1
03c4 e7fc | | Load 0x3,-0x4
03c5 e001 | | Load 0x0,0x1
03c6 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
03c7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03c8 c606 | | Store 0x3,0x6
03c9 c603 | | Store 0x3,0x3
03ca c604 | | Store 0x3,0x4
03cb c605 | | Store 0x3,0x5
03cc 0059 | Y | Store_Top Discrete,At_Offset_1
03cd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xc = 0x3cd,0x7
03ce 6817 |h | Jump_Zero 0x3e6
03cf 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0xd = 0x3cf,0x8
03d0 e00b | | Load 0x0,0xb
03d1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03d2 7006 |p | Jump_Nonzero 0x3d9
03d3 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0xe = 0x3d3,0x9
03d4 00da | | Load_Top At_Offset_2
03d5 e004 | | Load 0x0,0x4
03d6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03d7 6740 |g@ | Indirect_Literal Discrete,0x318,{0x00000000, 0x5a89f501} ; Debug Table 0xa.0xf = 0x3d7,0xa
03d8 0257 | W | Execute Discrete,Raise
03d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x10 = 0x3d9,0xb
03da 0f04 | | Execute_Immediate Equal,0x4
03db 6806 |h | Jump_Zero 0x3e2
03dc 0092 0718 | | Action Push_String_Extended,0x718 ; "Make_Inline failed - parent unit will get obsolesced"
; Debug Table 0xa.0x11 = 0x3dc,0xc
03de e010 | | Load 0x0,0x10
03df 180d | | Execute Package,Field_Execute,Field_Number 0xd
03e0 6737 |g7 | Indirect_Literal Discrete,0x318,{0x00000000, 0x5a89f501} ; Debug Table 0xa.0x12 = 0x3e0,0xd
03e1 0257 | W | Execute Discrete,Raise
03e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x13 = 0x3e2,0xe
03e3 0092 0717 | | Action Push_String_Extended,0x717 ; "Decl_Ops.Demote"
03e5 8407 | | Call 0x2,0x7
03e6 e603 | | Load 0x3,0x3 ; Debug Table 0xa.0x14 = 0x3e6,0xf
03e7 a7fc | | Store_Unchecked 0x3,-0x4
03e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03e9 0000 0000 | | .BLANK 0000[0x7]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 0403 | | .CONST 0x0403 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0008 | | .CONST 0x0008 ; Number of locals
03f3 INIT_03f0:
03f3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb = .DEBUG 0x03f3,0x0a62,0x0001,0x0000,0x005a,0x89f5,0x0000,0x068d
; Debug Table 0xb.0x0 = 0x3f3,0xffff
03f4 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb.0x1 = 0x3f4,0xfffe
03f5 e005 | | Load 0x0,0x5 ; Debug Table 0xb.0x2 = 0x3f5,0xfffd
03f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03f7 02c7 | | Declare_Variable Any
03f8 00d8 | | Load_Top At_Offset_0
03f9 1c00 | | Execute_Immediate Run_Utility,0x0
03fa e00b | | Load 0x0,0xb ; Debug Table 0xb.0x3 = 0x3fa,0xfffc
03fb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03fc 02c7 | | Declare_Variable Any
03fd 00d8 | | Load_Top At_Offset_0
03fe 1c00 | | Execute_Immediate Run_Utility,0x0
03ff 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xb.0x4 = 0x3ff,0xfffb
0400 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xb.0x5 = 0x400,0xfffa
0401 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x6 = 0x401,0xfff9
0402 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0403 BODY_03f0:
0403 e7fe | | Load 0x3,-0x2 ; Debug Table 0xb.0x7 = 0x403,0x1
0404 e005 | | Load 0x0,0x5
0405 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0406 012f | / | Execute Any,Equal
0407 6808 |h | Jump_Zero 0x410
0408 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x8 = 0x408,0x2
0409 a602 | | Store_Unchecked 0x3,0x2
040a e00d | | Load 0x0,0xd ; Debug Table 0xb.0x9 = 0x40a,0x3
040b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
040c e005 | | Load 0x0,0x5
040d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
040e c604 | | Store 0x3,0x4
040f 7804 |x | Jump 0x414
0410 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0xa = 0x410,0x4
0411 a602 | | Store_Unchecked 0x3,0x2
0412 e7fe | | Load 0x3,-0x2 ; Debug Table 0xb.0xb = 0x412,0x5
0413 c604 | | Store 0x3,0x4
0414 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0xc = 0x414,0x6
0415 a603 | | Store_Unchecked 0x3,0x3
0416 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0xd = 0x416,0x7
0417 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0418 00f1 | | Load_Encached Diana_Temp_Seq
0419 e001 | | Load 0x0,0x1
041a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
041b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
041c e605 | | Load 0x3,0x5
041d 0120 | | Execute Any,Is_Value
041e 6803 |h | Jump_Zero 0x422
041f e00b | | Load 0x0,0xb
0420 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0421 7801 |x | Jump 0x423
0422 e605 | | Load 0x3,0x5
0423 e603 | | Load 0x3,0x3
0424 e7fd | | Load 0x3,-0x3
0425 66ee |f | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
0426 e604 | | Load 0x3,0x4
0427 4803 |H | Short_Literal 0x3
0428 e7ff | | Load 0x3,-0x1
0429 e001 | | Load 0x0,0x1
042a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
042b 4803 |H | Short_Literal 0x3
042c e001 | | Load 0x0,0x1
042d 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
042e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
042f c7fd | | Store 0x3,-0x3
0430 c603 | | Store 0x3,0x3
0431 c605 | | Store 0x3,0x5
0432 c606 | | Store 0x3,0x6
0433 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0434 0059 | Y | Store_Top Discrete,At_Offset_1
0435 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xe = 0x435,0x8
0436 0b00 | | Execute_Immediate Case_Compare,0x0
0437 7009 |p | Jump_Nonzero 0x441
0438 e602 | | Load 0x3,0x2 ; Debug Table 0xb.0xf = 0x438,0xb
0439 6806 |h | Jump_Zero 0x440
043a e604 | | Load 0x3,0x4 ; Debug Table 0xb.0x10 = 0x43a,0xc
043b 4801 |H | Short_Literal 0x1
043c 4800 |H | Short_Literal 0x0
043d e005 | | Load 0x0,0x5
043e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
043f c604 | | Store 0x3,0x4
0440 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0441 e602 | | Load 0x3,0x2 ; Debug Table 0xb.0x11 = 0x441,0x9
0442 6806 |h | Jump_Zero 0x449
0443 e604 | | Load 0x3,0x4 ; Debug Table 0xb.0x12 = 0x443,0xa
0444 4801 |H | Short_Literal 0x1
0445 4801 |H | Short_Literal 0x1
0446 e005 | | Load 0x0,0x5
0447 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0448 c604 | | Store 0x3,0x4
0449 4503 |E | Exit_Suprogram New_Top_Offset 0x3
044a 0000 0000 | | .BLANK 0000[0x6]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 046d | m | .CONST 0x046d ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0009 | | .CONST 0x0009 ; Number of locals
0453 INIT_0450:
0453 e00b | | Load 0x0,0xb ; Debug Table 0xc = .DEBUG 0x0453,0x0a8a,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0746
; Debug Table 0xc.0x0 = 0x453,0xffff
0454 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0455 02c7 | | Declare_Variable Any
0456 00d8 | | Load_Top At_Offset_0
0457 1c00 | | Execute_Immediate Run_Utility,0x0
0458 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xc.0x1 = 0x458,0xfffe
0459 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xc.0x2 = 0x459,0xfffd
045a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x3 = 0x45a,0xfffc
045b e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x4 = 0x45b,0xfffb
045c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
045d e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x5 = 0x45d,0xfffa
045e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
045f 02c7 | | Declare_Variable Any
0460 00d8 | | Load_Top At_Offset_0
0461 1c00 | | Execute_Immediate Run_Utility,0x0
0462 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x6 = 0x462,0xfff9
0463 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0464 02ff | | Declare_Variable Variant_Record
0465 00d8 | | Load_Top At_Offset_0
0466 1c00 | | Execute_Immediate Run_Utility,0x0
0467 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x7 = 0x467,0xfff8
0468 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0469 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
046a 02c7 | | Declare_Variable Any
046b 00d8 | | Load_Top At_Offset_0
046c 1c00 | | Execute_Immediate Run_Utility,0x0
046d BODY_0450:
046d 0007 | | Action Break_Optional ; Debug Table 0xc.0x8 = 0x46d,0x1
046e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x9 = 0x46e,0x401
046f a7fc | | Store_Unchecked 0x3,-0x4 ; Debug Table 0xc.0xa = 0x46f,0x1
0470 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0xb = 0x470,0x2
0471 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0472 c7fb | | Store 0x3,-0x5
0473 0007 | | Action Break_Optional ; Debug Table 0xc.0xc = 0x473,0x3
0474 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0xd = 0x474,0x801
0475 a7fa | | Store_Unchecked 0x3,-0x6 ; Debug Table 0xc.0xe = 0x475,0x3
0476 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0xf = 0x476,0x4
0477 e001 | | Load 0x0,0x1
0478 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0479 00f1 | | Load_Encached Diana_Temp_Seq
047a e001 | | Load 0x0,0x1
047b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
047c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
047d e602 | | Load 0x3,0x2
047e 0120 | | Execute Any,Is_Value
047f 6803 |h | Jump_Zero 0x483
0480 e00b | | Load 0x0,0xb
0481 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0482 7801 |x | Jump 0x484
0483 e602 | | Load 0x3,0x2
0484 668f |f | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
0485 e7fd | | Load 0x3,-0x3
0486 4800 |H | Short_Literal 0x0
0487 e001 | | Load 0x0,0x1
0488 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0489 1b0e | | Execute Package,Field_Read,Field_Number 0xe
048a e001 | | Load 0x0,0x1
048b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
048c 4800 |H | Short_Literal 0x0
048d e7ff | | Load 0x3,-0x1
048e e001 | | Load 0x0,0x1
048f 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0490 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0491 c602 | | Store 0x3,0x2
0492 c603 | | Store 0x3,0x3
0493 c604 | | Store 0x3,0x4
0494 c606 | | Store 0x3,0x6
0495 c605 | | Store 0x3,0x5
0496 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x10 = 0x496,0x5
0497 0092 0719 | | Action Push_String_Extended,0x719 ; "Decl_Ops.Open_Insertion_Point"
0499 8407 | | Call 0x2,0x7
049a e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x11 = 0x49a,0x6
049b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049c 00db | | Load_Top At_Offset_3
049d 0120 | | Execute Any,Is_Value
049e 6803 |h | Jump_Zero 0x4a2
049f e001 | | Load 0x0,0x1
04a0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a1 7801 |x | Jump 0x4a3
04a2 00db | | Load_Top At_Offset_3
04a3 6670 |fp | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
04a4 e7fd | | Load 0x3,-0x3
04a5 4800 |H | Short_Literal 0x0
04a6 e001 | | Load 0x0,0x1
04a7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04a8 e605 | | Load 0x3,0x5
04a9 e001 | | Load 0x0,0x1
04aa 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
04ab 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04ac c607 | | Store 0x3,0x7
04ad c606 | | Store 0x3,0x6
04ae 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x12 = 0x4ae,0x7
04af 0092 070d | | Action Push_String_Extended,0x70d ; "Traversal.Get_Object"
04b1 8407 | | Call 0x2,0x7
04b2 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x13 = 0x4b2,0x8
04b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b4 00f1 | | Load_Encached Diana_Temp_Seq
04b5 e001 | | Load 0x0,0x1
04b6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04b7 1b17 | | Execute Package,Field_Read,Field_Number 0x17
04b8 e602 | | Load 0x3,0x2
04b9 0120 | | Execute Any,Is_Value
04ba 6803 |h | Jump_Zero 0x4be
04bb e00b | | Load 0x0,0xb
04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bd 7801 |x | Jump 0x4bf
04be e602 | | Load 0x3,0x2
04bf e608 | | Load 0x3,0x8
04c0 6653 |fS | Indirect_Literal Discrete,0x314,{0x00000000, 0x00004000}
04c1 e7fd | | Load 0x3,-0x3
04c2 4800 |H | Short_Literal 0x0
04c3 e001 | | Load 0x0,0x1
04c4 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
04c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04c6 e001 | | Load 0x0,0x1
04c7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04c8 4ffc |O | Short_Literal -0x4
04c9 4ffd |O | Short_Literal -0x3
04ca e607 | | Load 0x3,0x7
04cb e001 | | Load 0x0,0x1
04cc 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
04cd 180d | | Execute Package,Field_Execute,Field_Number 0xd
04ce 00d1 | | Pop_Control Pop_Count_1
04cf c602 | | Store 0x3,0x2
04d0 c603 | | Store 0x3,0x3
04d1 c604 | | Store 0x3,0x4
04d2 c606 | | Store 0x3,0x6
04d3 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x14 = 0x4d3,0x9
04d4 0092 071a | | Action Push_String_Extended,0x71a ; "Object_Ops.Create"
04d6 8407 | | Call 0x2,0x7
04d7 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x15 = 0x4d7,0xa
04d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d9 00d9 | | Load_Top At_Offset_1
04da 0120 | | Execute Any,Is_Value
04db 6804 |h | Jump_Zero 0x4e0
04dc e001 | | Load 0x0,0x1
04dd 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04de 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
04df 7801 |x | Jump 0x4e1
04e0 00d9 | | Load_Top At_Offset_1
04e1 e001 | | Load 0x0,0x1
04e2 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04e3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
04e4 e608 | | Load 0x3,0x8
04e5 4800 |H | Short_Literal 0x0
04e6 4800 |H | Short_Literal 0x0
04e7 4800 |H | Short_Literal 0x0
04e8 e7fd | | Load 0x3,-0x3
04e9 4802 |H | Short_Literal 0x2
04ea e001 | | Load 0x0,0x1
04eb 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04ec 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04ed 00d1 | | Pop_Control Pop_Count_1
04ee c7fc | | Store 0x3,-0x4
04ef c609 | | Store 0x3,0x9
04f0 c606 | | Store 0x3,0x6
04f1 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x16 = 0x4f1,0xb
04f2 0092 070e | | Action Push_String_Extended,0x70e ; "Ada.Open"
04f4 8407 | | Call 0x2,0x7
04f5 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x17 = 0x4f5,0xc
04f6 c7fb | | Store 0x3,-0x5
04f7 e605 | | Load 0x3,0x5 ; Debug Table 0xc.0x18 = 0x4f7,0xd
04f8 a7fa | | Store_Unchecked 0x3,-0x6
04f9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04fa 0000 0000 | | .BLANK 0000[0x6]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0519 | | .CONST 0x0519 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 000a | | .CONST 0x000a ; Number of locals
0503 INIT_0500:
0503 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd = .DEBUG 0x0503,0x0abe,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0841
; Debug Table 0xd.0x0 = 0x503,0xffff
0504 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x1 = 0x504,0xfffe
0505 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x2 = 0x505,0xfffd
0506 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x3 = 0x506,0xfffc
0507 e00a | | Load 0x0,0xa ; Debug Table 0xd.0x4 = 0x507,0xfffb
0508 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0509 02c7 | | Declare_Variable Any
050a 00d8 | | Load_Top At_Offset_0
050b 1c00 | | Execute_Immediate Run_Utility,0x0
050c 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xd.0x5 = 0x50c,0xfffa
050d e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x6 = 0x50d,0xfff9
050e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
050f 02c7 | | Declare_Variable Any
0510 00d8 | | Load_Top At_Offset_0
0511 1c00 | | Execute_Immediate Run_Utility,0x0
0512 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x7 = 0x512,0xfff8
0513 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0514 e009 | | Load 0x0,0x9 ; Debug Table 0xd.0x8 = 0x514,0xfff7
0515 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0516 02c7 | | Declare_Variable Any
0517 00d8 | | Load_Top At_Offset_0
0518 1c00 | | Execute_Immediate Run_Utility,0x0
0519 BODY_0500:
0519 e7fe | | Load 0x3,-0x2 ; Debug Table 0xd.0x9 = 0x519,0x1
051a 00eb | | Load_Encached Diana_Cache
051b 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
051c a602 | | Store_Unchecked 0x3,0x2
051d e602 | | Load 0x3,0x2 ; Debug Table 0xd.0xa = 0x51d,0x2
051e 00eb | | Load_Encached Diana_Cache
051f 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0520 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xb = 0x520,0x401
0521 021d | | Execute Heap_Access,Is_Null
0522 00d0 | | Action Swap_Control
0523 00d1 | | Pop_Control Pop_Count_1
0524 6801 |h | Jump_Zero 0x526 ; Debug Table 0xd.0xc = 0x524,0x2
0525 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0xd.0xd = 0x525,0x3
0526 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0xe = 0x526,0x4
0527 00db | | Load_Top At_Offset_3
0528 0120 | | Execute Any,Is_Value
0529 6803 |h | Jump_Zero 0x52d
052a e001 | | Load 0x0,0x1
052b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
052c 7801 |x | Jump 0x52e
052d 00db | | Load_Top At_Offset_3
052e 00ec | | Load_Encached Diana_Tree_Cache
052f e7fc | | Load 0x3,-0x4
0530 4801 |H | Short_Literal 0x1
0531 e7ff | | Load 0x3,-0x1
0532 4974 |It | Short_Literal 0x174
0533 00eb | | Load_Encached Diana_Cache
0534 0098 | | Execute Package,Field_Read_Dynamic
0535 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0536 00eb | | Load_Encached Diana_Cache
0537 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
0538 8410 | | Call 0x2,0x10
0539 c603 | | Store 0x3,0x3
053a c608 | | Store 0x3,0x8
053b c604 | | Store 0x3,0x4
053c e001 | | Load 0x0,0x1 ; Debug Table 0xd.0xf = 0x53c,0x5
053d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
053e 00d9 | | Load_Top At_Offset_1
053f 0120 | | Execute Any,Is_Value
0540 6803 |h | Jump_Zero 0x544
0541 e009 | | Load 0x0,0x9
0542 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0543 7801 |x | Jump 0x545
0544 00d9 | | Load_Top At_Offset_1
0545 4800 |H | Short_Literal 0x0
0546 e7fc | | Load 0x3,-0x4
0547 4802 |H | Short_Literal 0x2
0548 e608 | | Load 0x3,0x8
0549 e001 | | Load 0x0,0x1
054a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
054b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
054c e011 | | Load 0x0,0x11
054d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
054e c60a | | Store 0x3,0xa
054f 005a | Z | Store_Top Discrete,At_Offset_2
0550 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x10 = 0x550,0x6
0551 0092 071b | | Action Push_String_Extended,0x71b ; "Ada_Utilities.Open_Image"
0553 8407 | | Call 0x2,0x7
0554 e606 | | Load 0x3,0x6 ; Debug Table 0xd.0x11 = 0x554,0x7
0555 0120 | | Execute Any,Is_Value
0556 6803 |h | Jump_Zero 0x55a
0557 e00a | | Load 0x0,0xa
0558 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0559 7801 |x | Jump 0x55b
055a e606 | | Load 0x3,0x6
055b 00d9 | | Load_Top At_Offset_1
055c e006 | | Load 0x0,0x6
055d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
055e e007 | | Load 0x0,0x7
055f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0560 e012 | | Load 0x0,0x12
0561 180f | | Execute Package,Field_Execute,Field_Number 0xf
0562 e00a | | Load 0x0,0xa
0563 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0564 c606 | | Store 0x3,0x6
0565 e00d | | Load 0x0,0xd ; Debug Table 0xd.0x12 = 0x565,0x8
0566 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0567 4800 |H | Short_Literal 0x0
0568 e603 | | Load 0x3,0x3
0569 e00e | | Load 0x0,0xe
056a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
056b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
056c e00e | | Load 0x0,0xe
056d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
056e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
056f 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xd.0x13 = 0x56f,0x9
0570 e002 | | Load 0x0,0x2
0571 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0572 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0573 e602 | | Load 0x3,0x2
0574 e7fd | | Load 0x3,-0x3
0575 e603 | | Load 0x3,0x3
0576 00eb | | Load_Encached Diana_Cache
0577 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0578 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x14 = 0x578,0x801
0579 7002 |p | Jump_Nonzero 0x57c
057a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x15 = 0x57a,0x802
057b 782c |x, | Jump 0x5a8
057c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x16 = 0x57c,0x803
057d 0217 | | Execute Heap_Access,All_Reference
057e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
057f 6804 |h | Jump_Zero 0x584
0580 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x17 = 0x580,0x804
0581 0217 | | Execute Heap_Access,All_Reference
0582 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0583 7824 |x$ | Jump 0x5a8
0584 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x18 = 0x584,0x805
0585 0007 | | Action Break_Optional
0586 e610 | | Load 0x3,0x10 ; Debug Table 0xd.0x19 = 0x586,0xc01
0587 0007 | | Action Break_Optional
0588 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xd.0x1a = 0x588,0xc02
0589 0007 | | Action Break_Optional ; Debug Table 0xd.0x1b = 0x589,0xc03
058a 00d0 | | Action Swap_Control ; Debug Table 0xd.0x1c = 0x58a,0xc04
058b 00d1 | | Pop_Control Pop_Count_1
058c 49bb |I | Short_Literal 0x1bb ; Debug Table 0xd.0x1d = 0x58c,0x805
058d 00eb | | Load_Encached Diana_Cache
058e 0098 | | Execute Package,Field_Read_Dynamic
058f 012c | , | Execute Any,Size
0590 e013 | | Load 0x0,0x13
0591 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0592 025b | [ | Execute Discrete,Check_In_Type
0593 0273 | s | Execute Discrete,Plus
0594 00d9 | | Load_Top At_Offset_1
0595 0007 | | Action Break_Optional
0596 e611 | | Load 0x3,0x11 ; Debug Table 0xd.0x1e = 0x596,0x1001
0597 0007 | | Action Break_Optional
0598 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xd.0x1f = 0x598,0x1002
0599 0007 | | Action Break_Optional ; Debug Table 0xd.0x20 = 0x599,0x1003
059a 00d0 | | Action Swap_Control ; Debug Table 0xd.0x21 = 0x59a,0x1004
059b 00d1 | | Pop_Control Pop_Count_1
059c 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xd.0x22 = 0x59c,0xc04
059d 00eb | | Load_Encached Diana_Cache
059e 0098 | | Execute Package,Field_Read_Dynamic
059f 49c9 |I | Short_Literal 0x1c9
05a0 00eb | | Load_Encached Diana_Cache
05a1 0098 | | Execute Package,Field_Read_Dynamic
05a2 49ca |I | Short_Literal 0x1ca
05a3 00eb | | Load_Encached Diana_Cache
05a4 0095 | | Execute Package,Field_Reference_Dynamic
05a5 e014 | | Load 0x0,0x14
05a6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05a7 7800 |x | Jump 0x5a8
05a8 00d0 | | Action Swap_Control
05a9 00d1 | | Pop_Control Pop_Count_1
05aa e606 | | Load 0x3,0x6 ; Debug Table 0xd.0x23 = 0x5aa,0x9
05ab e00a | | Load 0x0,0xa
05ac 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
05ad c607 | | Store 0x3,0x7
05ae e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x24 = 0x5ae,0xa
05af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05b0 00d9 | | Load_Top At_Offset_1
05b1 4801 |H | Short_Literal 0x1
05b2 e7fc | | Load 0x3,-0x4
05b3 e011 | | Load 0x0,0x11
05b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05b5 c60a | | Store 0x3,0xa
05b6 005a | Z | Store_Top Discrete,At_Offset_2
05b7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x25 = 0x5b7,0xb
05b8 0092 071c | | Action Push_String_Extended,0x71c ; "Ada_Utilities.Close_Image"
05ba 8407 | | Call 0x2,0x7
05bb e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x26 = 0x5bb,0xc
05bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05bd 4800 |H | Short_Literal 0x0
05be 4801 |H | Short_Literal 0x1
05bf e7fc | | Load 0x3,-0x4
05c0 e603 | | Load 0x3,0x3
05c1 e001 | | Load 0x0,0x1
05c2 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
05c3 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05c4 005a | Z | Store_Top Discrete,At_Offset_2
05c5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x27 = 0x5c5,0xd
05c6 0092 071d | | Action Push_String_Extended,0x71d ; "Ada.Close"
05c8 8407 | | Call 0x2,0x7
05c9 e604 | | Load 0x3,0x4 ; Debug Table 0xd.0x28 = 0x5c9,0xe
05ca e7fc | | Load 0x3,-0x4
05cb e7fb | | Load 0x3,-0x5
05cc 840f | | Call 0x2,0xf
05cd c604 | | Store 0x3,0x4
05ce 4506 |E | Exit_Suprogram New_Top_Offset 0x6
05cf 0000 | | .XXX[0x1]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05fc | | .CONST 0x05fc ; Address of begin
05d1 0691 | | .CONST 0x0691 ; Address of exception handler
05d2 0009 | | .CONST 0x0009 ; Number of locals
05d3 INIT_05d0:
05d3 e005 | | Load 0x0,0x5 ; Debug Table 0xe = .DEBUG 0x05d3,0x0b12,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0973
; Debug Table 0xe.0x0 = 0x5d3,0xffff
05d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d5 02c7 | | Declare_Variable Any
05d6 00d8 | | Load_Top At_Offset_0
05d7 1c00 | | Execute_Immediate Run_Utility,0x0
05d8 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x1 = 0x5d8,0xfffe
05d9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
05da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05db 02c7 | | Declare_Variable Any
05dc 00d8 | | Load_Top At_Offset_0
05dd 1c00 | | Execute_Immediate Run_Utility,0x0
05de e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x2 = 0x5de,0xfffd
05df 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
05e0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05e1 02c7 | | Declare_Variable Any
05e2 00d8 | | Load_Top At_Offset_0
05e3 1c00 | | Execute_Immediate Run_Utility,0x0
05e4 e009 | | Load 0x0,0x9 ; Debug Table 0xe.0x3 = 0x5e4,0xfffc
05e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05e6 02c7 | | Declare_Variable Any
05e7 00d8 | | Load_Top At_Offset_0
05e8 1c00 | | Execute_Immediate Run_Utility,0x0
05e9 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x4 = 0x5e9,0xfffb
05ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05eb e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x5 = 0x5eb,0xfffa
05ec 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
05ed 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
05ee 02c7 | | Declare_Variable Any
05ef 00d8 | | Load_Top At_Offset_0
05f0 1c00 | | Execute_Immediate Run_Utility,0x0
05f1 e00c | | Load 0x0,0xc ; Debug Table 0xe.0x6 = 0x5f1,0xfff9
05f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f3 0322 | " | Declare_Variable Record
05f4 00d8 | | Load_Top At_Offset_0
05f5 1c00 | | Execute_Immediate Run_Utility,0x0
05f6 e7ff | | Load 0x3,-0x1 ; Debug Table 0xe.0x7 = 0x5f6,0xfff8
05f7 840d | | Call 0x2,0xd
05f8 e001 | | Load 0x0,0x1
05f9 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
05fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05fb 011e | | Execute Any,Convert
05fc BODY_05d0:
05fc e00d | | Load 0x0,0xd ; Debug Table 0xe.0x8 = 0x5fc,0x1
05fd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05fe e005 | | Load 0x0,0x5
05ff 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0600 c602 | | Store 0x3,0x2
0601 e7fe | | Load 0x3,-0x2 ; Debug Table 0xe.0x9 = 0x601,0x2
0602 e602 | | Load 0x3,0x2
0603 00da | | Load_Top At_Offset_2
0604 e7fd | | Load 0x3,-0x3
0605 840e | | Call 0x2,0xe
0606 c7fe | | Store 0x3,-0x2
0607 e7ff | | Load 0x3,-0x1 ; Debug Table 0xe.0xa = 0x607,0x3
0608 e001 | | Load 0x0,0x1
0609 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
060a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
060b c603 | | Store 0x3,0x3
060c e001 | | Load 0x0,0x1 ; Debug Table 0xe.0xb = 0x60c,0x4
060d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060e 00db | | Load_Top At_Offset_3
060f 0120 | | Execute Any,Is_Value
0610 6804 |h | Jump_Zero 0x615
0611 e001 | | Load 0x0,0x1
0612 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0613 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0614 7801 |x | Jump 0x616
0615 00db | | Load_Top At_Offset_3
0616 e001 | | Load 0x0,0x1
0617 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0618 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0619 60ea |` | Indirect_Literal Discrete,0x704,{0x00000000, 0x00004000}
061a 4801 |H | Short_Literal 0x1
061b 4800 |H | Short_Literal 0x0
061c 4800 |H | Short_Literal 0x0
061d e602 | | Load 0x3,0x2
061e 4802 |H | Short_Literal 0x2
061f e603 | | Load 0x3,0x3
0620 e001 | | Load 0x0,0x1
0621 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0622 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0623 c7fd | | Store 0x3,-0x3
0624 c607 | | Store 0x3,0x7
0625 c606 | | Store 0x3,0x6
0626 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0xc = 0x626,0x5
0627 0092 070e | | Action Push_String_Extended,0x70e ; "Ada.Open"
0629 8407 | | Call 0x2,0x7
062a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0xd = 0x62a,0x6
062b e7fd | | Load 0x3,-0x3
062c e602 | | Load 0x3,0x2
062d e00c | | Load 0x0,0xc
062e 180e | | Execute Package,Field_Execute,Field_Number 0xe
062f c7fd | | Store 0x3,-0x3
0630 00d1 | | Pop_Control Pop_Count_1
0631 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xe = 0x631,0x7
0632 e602 | | Load 0x3,0x2
0633 00db | | Load_Top At_Offset_3
0634 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0635 e7fd | | Load 0x3,-0x3
0636 e7fe | | Load 0x3,-0x2
0637 8411 | | Call 0x2,0x11
0638 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0xf = 0x638,0x8
0639 1b0d | | Execute Package,Field_Read,Field_Number 0xd
063a e604 | | Load 0x3,0x4
063b 0120 | | Execute Any,Is_Value
063c 6804 |h | Jump_Zero 0x641
063d e001 | | Load 0x0,0x1
063e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
063f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0640 7801 |x | Jump 0x642
0641 e604 | | Load 0x3,0x4
0642 e7fe | | Load 0x3,-0x2
0643 e001 | | Load 0x0,0x1
0644 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0645 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0646 c604 | | Store 0x3,0x4
0647 c606 | | Store 0x3,0x6
0648 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x10 = 0x648,0x9
0649 0092 070f | | Action Push_String_Extended,0x70f ; "Ada.Get_Unit"
064b 8407 | | Call 0x2,0x7
064c e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x11 = 0x64c,0xa
064d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064e e605 | | Load 0x3,0x5
064f 0120 | | Execute Any,Is_Value
0650 6803 |h | Jump_Zero 0x654
0651 e009 | | Load 0x0,0x9
0652 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0653 7801 |x | Jump 0x655
0654 e605 | | Load 0x3,0x5
0655 4800 |H | Short_Literal 0x0
0656 e602 | | Load 0x3,0x2
0657 4801 |H | Short_Literal 0x1
0658 e604 | | Load 0x3,0x4
0659 e011 | | Load 0x0,0x11
065a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
065b c605 | | Store 0x3,0x5
065c c606 | | Store 0x3,0x6
065d 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x12 = 0x65d,0xb
065e 0092 071b | | Action Push_String_Extended,0x71b ; "Ada_Utilities.Open_Image"
0660 8407 | | Call 0x2,0x7
0661 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x13 = 0x661,0xc
0662 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0663 4800 |H | Short_Literal 0x0
0664 e7fd | | Load 0x3,-0x3
0665 e00e | | Load 0x0,0xe
0666 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0667 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0668 e00e | | Load 0x0,0xe
0669 1b13 | | Execute Package,Field_Read,Field_Number 0x13
066a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
066b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x14 = 0x66b,0xd
066c e7fd | | Load 0x3,-0x3
066d e605 | | Load 0x3,0x5
066e e7fe | | Load 0x3,-0x2
066f 840b | | Call 0x2,0xb
0670 c7fd | | Store 0x3,-0x3
0671 00d1 | | Pop_Control Pop_Count_1
0672 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x15 = 0x672,0xe
0673 4801 |H | Short_Literal 0x1
0674 e00c | | Load 0x0,0xc
0675 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0676 00d1 | | Pop_Control Pop_Count_1
0677 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x16 = 0x677,0xf
0678 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0679 e605 | | Load 0x3,0x5
067a 4801 |H | Short_Literal 0x1
067b e602 | | Load 0x3,0x2
067c e011 | | Load 0x0,0x11
067d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
067e c605 | | Store 0x3,0x5
067f c606 | | Store 0x3,0x6
0680 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x17 = 0x680,0x10
0681 0092 071c | | Action Push_String_Extended,0x71c ; "Ada_Utilities.Close_Image"
0683 8407 | | Call 0x2,0x7
0684 e602 | | Load 0x3,0x2 ; Debug Table 0xe.0x18 = 0x684,0x11
0685 4801 |H | Short_Literal 0x1
0686 4801 |H | Short_Literal 0x1
0687 e005 | | Load 0x0,0x5
0688 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0689 c602 | | Store 0x3,0x2
068a e7fe | | Load 0x3,-0x2 ; Debug Table 0xe.0x19 = 0x68a,0x12
068b e005 | | Load 0x0,0x5
068c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
068d 00da | | Load_Top At_Offset_2
068e 840f | | Call 0x2,0xf
068f c7fe | | Store 0x3,-0x2
0690 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0691 TRAP_05d0:
0691 0007 | | Action Break_Optional
0692 e602 | | Load 0x3,0x2 ; Debug Table 0xe.0x1a = 0x692,0x13
0693 4801 |H | Short_Literal 0x1
0694 4800 |H | Short_Literal 0x0
0695 e005 | | Load 0x0,0x5
0696 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0697 c602 | | Store 0x3,0x2
0698 e00f | | Load 0x0,0xf ; Debug Table 0xe.0x1b = 0x698,0x14
0699 180d | | Execute Package,Field_Execute,Field_Number 0xd
069a 0092 071e | | Action Push_String_Extended,0x71e ; "Make_Nonsource_Inline"
069c 8406 | | Call 0x2,0x6
069d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
069e 0000 0000 | | .XXX[0x2]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06af | | .CONST 0x06af ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0005 | | .CONST 0x0005 ; Number of locals
06a3 INIT_06a0:
06a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf = .DEBUG 0x06a3,0x0b4c,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0a96
; Debug Table 0xf.0x0 = 0x6a3,0xffff
06a4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x1 = 0x6a4,0xfffe
06a5 e001 | | Load 0x0,0x1 ; Debug Table 0xf.0x2 = 0x6a5,0xfffd
06a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06a7 02c7 | | Declare_Variable Any
06a8 00d8 | | Load_Top At_Offset_0
06a9 1c00 | | Execute_Immediate Run_Utility,0x0
06aa e001 | | Load 0x0,0x1 ; Debug Table 0xf.0x3 = 0x6aa,0xfffc
06ab 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06ac 02ff | | Declare_Variable Variant_Record
06ad 00d8 | | Load_Top At_Offset_0
06ae 1c00 | | Execute_Immediate Run_Utility,0x0
06af BODY_06a0:
06af 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x4 = 0x6af,0x1
06b0 0120 | | Execute Any,Is_Value
06b1 6803 |h | Jump_Zero 0x6b5
06b2 e001 | | Load 0x0,0x1
06b3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06b4 7801 |x | Jump 0x6b6
06b5 00d9 | | Load_Top At_Offset_1
06b6 00ec | | Load_Encached Diana_Tree_Cache
06b7 00ec | | Load_Encached Diana_Tree_Cache
06b8 e5ff | | Load 0x2,-0x1
06b9 8408 | | Call 0x2,0x8
06ba c602 | | Store 0x3,0x2
06bb c603 | | Store 0x3,0x3
06bc c604 | | Store 0x3,0x4
06bd 0007 | | Action Break_Optional ; Debug Table 0xf.0x5 = 0x6bd,0x2
06be e603 | | Load 0x3,0x3 ; Debug Table 0xf.0x6 = 0x6be,0x401
06bf 0007 | | Action Break_Optional
06c0 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0x7 = 0x6c0,0x402
06c1 0007 | | Action Break_Optional ; Debug Table 0xf.0x8 = 0x6c1,0x403
06c2 0007 | | Action Break_Optional ; Debug Table 0xf.0x9 = 0x6c2,0x404
06c3 e011 | | Load 0x0,0x11 ; Debug Table 0xf.0xa = 0x6c3,0x2
06c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06c5 6805 |h | Jump_Zero 0x6cb
06c6 0092 071f | | Action Push_String_Extended,0x71f ; "Object will be inlined during promotion"
; Debug Table 0xf.0xb = 0x6c6,0x3
06c8 e010 | | Load 0x0,0x10
06c9 180d | | Execute Package,Field_Execute,Field_Number 0xd
06ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0xc = 0x6ca,0x4
06cb 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0xd = 0x6cb,0x5
06cc 00eb | | Load_Encached Diana_Cache
06cd 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
06ce e606 | | Load 0x3,0x6 ; Debug Table 0xf.0xe = 0x6ce,0x801
06cf 0007 | | Action Break_Optional
06d0 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0xf = 0x6d0,0x802
06d1 0007 | | Action Break_Optional ; Debug Table 0xf.0x10 = 0x6d1,0x803
06d2 00d0 | | Action Swap_Control ; Debug Table 0xf.0x11 = 0x6d2,0x804
06d3 00d1 | | Pop_Control Pop_Count_1
06d4 0e49 | I | Execute_Immediate Not_Equal,0x49 ; Debug Table 0xf.0x12 = 0x6d4,0x5
06d5 6805 |h | Jump_Zero 0x6db
06d6 0092 0720 | | Action Push_String_Extended,0x720 ; "Cannot inline a main library unit"
; Debug Table 0xf.0x13 = 0x6d6,0x6
06d8 e010 | | Load 0x0,0x10
06d9 180d | | Execute Package,Field_Execute,Field_Number 0xd
06da 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0x14 = 0x6da,0x7
06db 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x15 = 0x6db,0x8
06dc 8409 | | Call 0x2,0x9
06dd 6805 |h | Jump_Zero 0x6e3
06de 0092 0721 | !| Action Push_String_Extended,0x721 ; "Make_Inline failed - unit has separate subunits"
; Debug Table 0xf.0x16 = 0x6de,0x9
06e0 e010 | | Load 0x0,0x10
06e1 180d | | Execute Package,Field_Execute,Field_Number 0xd
06e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0x17 = 0x6e2,0xa
06e3 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x18 = 0x6e3,0xb
06e4 e001 | | Load 0x0,0x1
06e5 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
06e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06e7 6807 |h | Jump_Zero 0x6ef
06e8 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x19 = 0x6e8,0xc
06e9 e602 | | Load 0x3,0x2
06ea 00db | | Load_Top At_Offset_3
06eb 840c | | Call 0x2,0xc
06ec c602 | | Store 0x3,0x2
06ed 0033 | 3 | Store_Top Heap_Access,At_Offset_3
06ee 7806 |x | Jump 0x6f5
06ef 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x1a = 0x6ef,0xd
06f0 e602 | | Load 0x3,0x2
06f1 00db | | Load_Top At_Offset_3
06f2 8412 | | Call 0x2,0x12
06f3 c602 | | Store 0x3,0x2
06f4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
06f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x1b = 0x6f5,0xe
06f6 00ec | | Load_Encached Diana_Tree_Cache
06f7 4801 |H | Short_Literal 0x1
06f8 4801 |H | Short_Literal 0x1
06f9 0007 | | Action Break_Optional
06fa 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x1c = 0x6fa,0xc01
06fb 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xf.0x1d = 0x6fb,0xe
06fc e402 | | Load 0x2,0x2
06fd e015 | | Load 0x0,0x15
06fe 180f | | Execute Package,Field_Execute,Field_Number 0xf
06ff c5fe | | Store 0x2,-0x2
0700 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0701 0000 0000 | | .XXX[0x3]
0703 0000 | |
0704 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0708 ; --------------------------------------------------------------------------------------
0708 ; STRING TABLE
0708 ; --------------------------------------------------------------------------------------
0708 0036 | 6 | .STRTAB 0x0036->0x0723 ; "Make_Inline."
0709 0040 | @ | .STRTAB 0x0040->0x0729 ; " failed - "
070a 0048 | H | .STRTAB 0x0048->0x072e ; "Bad status from Directory."
070b 0060 | ` | .STRTAB 0x0060->0x073b ; ": "
070c 0060 | ` | .STRTAB 0x0060->0x073c ; "Make_Inline"
070d 0069 | i | .STRTAB 0x0069->0x0741 ; "Traversal.Get_Object"
070e 007b | { | .STRTAB 0x007b->0x074b ; "Ada.Open"
070f 0081 | | .STRTAB 0x0081->0x074f ; "Ada.Get_Unit"
0710 008b | | .STRTAB 0x008b->0x0755 ; "Traversal.Get_Declaration"
0711 00a2 | | .STRTAB 0x00a2->0x0762 ; "[].@"
0712 00a4 | | .STRTAB 0x00a4->0x0764 ; "Bad Call"
0713 00aa | | .STRTAB 0x00aa->0x0768 ; "Make_Mumble_S"
0714 00b5 | | .STRTAB 0x00b5->0x076e ; "Object_Ops.Destroy"
0715 00c5 | | .STRTAB 0x00c5->0x0777 ; "Make_Source_Inline"
0716 00d5 | | .STRTAB 0x00d5->0x0780 ; "Control_Point.Enclosing_World"
0717 00f0 | | .STRTAB 0x00f0->0x078f ; "Decl_Ops.Demote"
0718 00fd | | .STRTAB 0x00fd->0x0796 ; "Make_Inline failed - parent unit will get obsolesced"
0719 012f | / | .STRTAB 0x012f->0x07b0 ; "Decl_Ops.Open_Insertion_Point"
071a 014a | J | .STRTAB 0x014a->0x07bf ; "Object_Ops.Create"
071b 0159 | Y | .STRTAB 0x0159->0x07c7 ; "Ada_Utilities.Open_Image"
071c 016f | o | .STRTAB 0x016f->0x07d3 ; "Ada_Utilities.Close_Image"
071d 0186 | | .STRTAB 0x0186->0x07e0 ; "Ada.Close"
071e 018d | | .STRTAB 0x018d->0x07e4 ; "Make_Nonsource_Inline"
071f 01a0 | | .STRTAB 0x01a0->0x07ef ; "Object will be inlined during promotion"
0720 01c5 | | .STRTAB 0x01c5->0x0802 ; "Cannot inline a main library unit"
0721 01e4 | | .STRTAB 0x01e4->0x0813 ; "Make_Inline failed - unit has separate subunits"
0722 0211 | | .STREND 0x0211->0x082a
0723 4d61 6b65 |Make| .STRTAB_STRINGS
082b 0000 0000 | | .BLANK 0000[0x5]
0830 ; --------------------------------------------------------------------------------------
0830 ; Debug Table
0830 ; --------------------------------------------------------------------------------------
0830 0003 0010 | | .CONST 0x0003,0x0010
0832 000b 08b2 | | .DEBUG 0x000b,0x08b2,0x8000,0x0000,0x005a,0x7dd5,0x0000,0x0005
083a 001b 08b4 | | .DEBUG 0x001b,0x08b4,0x8001,0x0000,0x005a,0x7dd5,0x0000,0x0005
0842 006b 08fa | k | .DEBUG 0x006b,0x08fa,0x0001,0x0000,0x005a,0x89f5,0x0000,0x00ac
084a 0083 0902 | | .DEBUG 0x0083,0x0902,0x0001,0x0000,0x005a,0x89f5,0x0000,0x00d5
0852 00a3 0910 | | .DEBUG 0x00a3,0x0910,0x0001,0x0000,0x005a,0x89f5,0x0000,0x011f
085a 0183 0966 | f| .DEBUG 0x0183,0x0966,0x0002,0x0000,0x005a,0x89f5,0x0000,0x0235
0862 01b3 0976 | v| .DEBUG 0x01b3,0x0976,0x0002,0x0000,0x005a,0x89f5,0x0000,0x028f
086a 01c3 097c | || .DEBUG 0x01c3,0x097c,0x0001,0x0000,0x005a,0x89f5,0x0000,0x02be
0872 022b 09c6 | + | .DEBUG 0x022b,0x09c6,0x0001,0x0000,0x005a,0x89f5,0x0000,0x038f
087a 0323 0a20 | # | .DEBUG 0x0323,0x0a20,0x0002,0x0000,0x005a,0x89f5,0x0000,0x052d
0882 036b 0a36 | k 6| .DEBUG 0x036b,0x0a36,0x0001,0x0000,0x005a,0x89f5,0x0000,0x058c
088a 03f3 0a62 | b| .DEBUG 0x03f3,0x0a62,0x0001,0x0000,0x005a,0x89f5,0x0000,0x068d
0892 0453 0a8a | S | .DEBUG 0x0453,0x0a8a,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0746
089a 0503 0abe | | .DEBUG 0x0503,0x0abe,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0841
08a2 05d3 0b12 | | .DEBUG 0x05d3,0x0b12,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0973
08aa 06a3 0b4c | L| .DEBUG 0x06a3,0x0b4c,0x0001,0x0000,0x005a,0x89f5,0x0000,0x0a96
08b2 ; --------------------------------------------------------------------------------------
08b2 ; Debug3 Subtable 0x0
08b2 ; --------------------------------------------------------------------------------------
08b2 0000 0000 | | .DBG3TAB 0x0000,0x0000
08b4 ; --------------------------------------------------------------------------------------
08b4 ; Debug3 Subtable 0x1
08b4 ; --------------------------------------------------------------------------------------
08b4 001c 0006 | | .DBG3TAB 0x001c,0x0006
08b6 001b ffff | | .CONST 0x001b,0xffff
08b8 001f fffe | | .CONST 0x001f,0xfffe
08ba 0020 fffd | | .CONST 0x0020,0xfffd
08bc 0021 fffc | ! | .CONST 0x0021,0xfffc
08be 0022 fffb | " | .CONST 0x0022,0xfffb
08c0 0023 fffa | # | .CONST 0x0023,0xfffa
08c2 0024 fff9 | $ | .CONST 0x0024,0xfff9
08c4 0025 fff8 | % | .CONST 0x0025,0xfff8
08c6 0026 fff7 | & | .CONST 0x0026,0xfff7
08c8 0027 fff6 | ' | .CONST 0x0027,0xfff6
08ca 0028 0401 | ( | .CONST 0x0028,0x0401
08cc 0029 fff6 | ) | .CONST 0x0029,0xfff6
08ce 002a fff5 | * | .CONST 0x002a,0xfff5
08d0 0038 fff4 | 8 | .CONST 0x0038,0xfff4
08d2 003b fff3 | ; | .CONST 0x003b,0xfff3
08d4 003c fff2 | < | .CONST 0x003c,0xfff2
08d6 003e fff1 | > | .CONST 0x003e,0xfff1
08d8 0040 fff0 | @ | .CONST 0x0040,0xfff0
08da 0042 ffef | B | .CONST 0x0042,0xffef
08dc 0044 ffee | D | .CONST 0x0044,0xffee
08de 0046 ffed | F | .CONST 0x0046,0xffed
08e0 0048 ffec | H | .CONST 0x0048,0xffec
08e2 004a ffeb | J | .CONST 0x004a,0xffeb
08e4 004c ffea | L | .CONST 0x004c,0xffea
08e6 004e ffe9 | N | .CONST 0x004e,0xffe9
08e8 0050 ffe8 | P | .CONST 0x0050,0xffe8
08ea 0052 ffe7 | R | .CONST 0x0052,0xffe7
08ec 0054 ffe6 | T | .CONST 0x0054,0xffe6
08ee 0056 ffe5 | V | .CONST 0x0056,0xffe5
08f0 0058 0001 | X | .CONST 0x0058,0x0001
08f2 0059 0801 | Y | .CONST 0x0059,0x0801
08f4 005a 0001 | Z | .CONST 0x005a,0x0001
08f6 005b 0002 | [ | .CONST 0x005b,0x0002
08f8 0060 0003 | ` | .CONST 0x0060,0x0003
08fa ; --------------------------------------------------------------------------------------
08fa ; Debug3 Subtable 0x2
08fa ; --------------------------------------------------------------------------------------
08fa 0000 0003 | | .DBG3TAB 0x0000,0x0003
08fc 006b 0001 | k | .CONST 0x006b,0x0001
08fe 006d 0002 | m | .CONST 0x006d,0x0002
0900 0078 0003 | x | .CONST 0x0078,0x0003
0902 ; --------------------------------------------------------------------------------------
0902 ; Debug3 Subtable 0x3
0902 ; --------------------------------------------------------------------------------------
0902 0000 0006 | | .DBG3TAB 0x0000,0x0006
0904 0083 0001 | | .CONST 0x0083,0x0001
0906 0086 0003 | | .CONST 0x0086,0x0003
0908 0088 0004 | | .CONST 0x0088,0x0004
090a 0097 0005 | | .CONST 0x0097,0x0005
090c 009d 0006 | | .CONST 0x009d,0x0006
090e 009f 0002 | | .CONST 0x009f,0x0002
0910 ; --------------------------------------------------------------------------------------
0910 ; Debug3 Subtable 0x4
0910 ; --------------------------------------------------------------------------------------
0910 0005 0025 | %| .DBG3TAB 0x0005,0x0025
0912 00a3 ffff | | .CONST 0x00a3,0xffff
0914 00a9 fffe | | .CONST 0x00a9,0xfffe
0916 00ab fffd | | .CONST 0x00ab,0xfffd
0918 00b1 fffc | | .CONST 0x00b1,0xfffc
091a 00b6 fffb | | .CONST 0x00b6,0xfffb
091c 00b7 0001 | | .CONST 0x00b7,0x0001
091e 00cc 0002 | | .CONST 0x00cc,0x0002
0920 00d1 0017 | | .CONST 0x00d1,0x0017
0922 00d6 0003 | | .CONST 0x00d6,0x0003
0924 00d8 0004 | | .CONST 0x00d8,0x0004
0926 00da 0005 | | .CONST 0x00da,0x0005
0928 00df 0006 | | .CONST 0x00df,0x0006
092a 00fa 0007 | | .CONST 0x00fa,0x0007
092c 00fe 0008 | | .CONST 0x00fe,0x0008
092e 0100 0401 | | .CONST 0x0100,0x0401
0930 0102 0801 | | .CONST 0x0102,0x0801
0932 0104 0802 | | .CONST 0x0104,0x0802
0934 0105 0803 | | .CONST 0x0105,0x0803
0936 0106 0804 | | .CONST 0x0106,0x0804
0938 0108 0401 | | .CONST 0x0108,0x0401
093a 010f 0008 | | .CONST 0x010f,0x0008
093c 0110 0009 | | .CONST 0x0110,0x0009
093e 0115 000a | | .CONST 0x0115,0x000a
0940 0118 000b | | .CONST 0x0118,0x000b
0942 011e 000c | | .CONST 0x011e,0x000c
0944 012e 000d | . | .CONST 0x012e,0x000d
0946 0132 000e | 2 | .CONST 0x0132,0x000e
0948 0137 000f | 7 | .CONST 0x0137,0x000f
094a 0145 0010 | E | .CONST 0x0145,0x0010
094c 0149 0011 | I | .CONST 0x0149,0x0011
094e 0159 0012 | Y | .CONST 0x0159,0x0012
0950 015d 0013 | ] | .CONST 0x015d,0x0013
0952 015f 0014 | _ | .CONST 0x015f,0x0014
0954 0161 0c01 | a | .CONST 0x0161,0x0c01
0956 0163 1001 | c | .CONST 0x0163,0x1001
0958 0165 1002 | e | .CONST 0x0165,0x1002
095a 0166 1003 | f | .CONST 0x0166,0x1003
095c 0167 1004 | g | .CONST 0x0167,0x1004
095e 0169 0c01 | i | .CONST 0x0169,0x0c01
0960 0170 0014 | p | .CONST 0x0170,0x0014
0962 0171 0015 | q | .CONST 0x0171,0x0015
0964 0176 0016 | v | .CONST 0x0176,0x0016
0966 ; --------------------------------------------------------------------------------------
0966 ; Debug3 Subtable 0x5
0966 ; --------------------------------------------------------------------------------------
0966 0002 0005 | | .DBG3TAB 0x0002,0x0005
0968 0183 ffff | | .CONST 0x0183,0xffff
096a 0189 fffe | | .CONST 0x0189,0xfffe
096c 018c 0001 | | .CONST 0x018c,0x0001
096e 01a1 0002 | | .CONST 0x01a1,0x0002
0970 01a6 0005 | | .CONST 0x01a6,0x0005
0972 01a8 0003 | | .CONST 0x01a8,0x0003
0974 01aa 0004 | | .CONST 0x01aa,0x0004
0976 ; --------------------------------------------------------------------------------------
0976 ; Debug3 Subtable 0x6
0976 ; --------------------------------------------------------------------------------------
0976 0001 0001 | | .DBG3TAB 0x0001,0x0001
0978 01b3 ffff | | .CONST 0x01b3,0xffff
097a 01b7 0001 | | .CONST 0x01b7,0x0001
097c ; --------------------------------------------------------------------------------------
097c ; Debug3 Subtable 0x7
097c ; --------------------------------------------------------------------------------------
097c 0005 001f | | .DBG3TAB 0x0005,0x001f
097e 01c3 ffff | | .CONST 0x01c3,0xffff
0980 01c4 fffe | | .CONST 0x01c4,0xfffe
0982 01c5 fffd | | .CONST 0x01c5,0xfffd
0984 01c7 fffc | | .CONST 0x01c7,0xfffc
0986 01c8 fffb | | .CONST 0x01c8,0xfffb
0988 01ca 0001 | | .CONST 0x01ca,0x0001
098a 01cb 0401 | | .CONST 0x01cb,0x0401
098c 01cd 0402 | | .CONST 0x01cd,0x0402
098e 01ce 0403 | | .CONST 0x01ce,0x0403
0990 01cf 0404 | | .CONST 0x01cf,0x0404
0992 01d0 0001 | | .CONST 0x01d0,0x0001
0994 01d2 0006 | | .CONST 0x01d2,0x0006
0996 01d4 0002 | | .CONST 0x01d4,0x0002
0998 01d8 0003 | | .CONST 0x01d8,0x0003
099a 01d9 0801 | | .CONST 0x01d9,0x0801
099c 01db 0802 | | .CONST 0x01db,0x0802
099e 01dc 0803 | | .CONST 0x01dc,0x0803
09a0 01dd 0804 | | .CONST 0x01dd,0x0804
09a2 01de 0003 | | .CONST 0x01de,0x0003
09a4 01e0 0005 | | .CONST 0x01e0,0x0005
09a6 01e1 0004 | | .CONST 0x01e1,0x0004
09a8 01e7 0007 | | .CONST 0x01e7,0x0007
09aa 01ec 0008 | | .CONST 0x01ec,0x0008
09ac 01ef 0c01 | | .CONST 0x01ef,0x0c01
09ae 01f1 0c02 | | .CONST 0x01f1,0x0c02
09b0 01f2 0c03 | | .CONST 0x01f2,0x0c03
09b2 01f3 0c04 | | .CONST 0x01f3,0x0c04
09b4 01f5 0008 | | .CONST 0x01f5,0x0008
09b6 01f6 0009 | | .CONST 0x01f6,0x0009
09b8 01fc 000a | | .CONST 0x01fc,0x000a
09ba 0204 000b | | .CONST 0x0204,0x000b
09bc 0209 000c | | .CONST 0x0209,0x000c
09be 020f 000d | | .CONST 0x020f,0x000d
09c0 0214 000e | | .CONST 0x0214,0x000e
09c2 0216 000f | | .CONST 0x0216,0x000f
09c4 021d 0010 | | .CONST 0x021d,0x0010
09c6 ; --------------------------------------------------------------------------------------
09c6 ; Debug3 Subtable 0x8
09c6 ; --------------------------------------------------------------------------------------
09c6 000d 001f | | .DBG3TAB 0x000d,0x001f
09c8 022b ffff | + | .CONST 0x022b,0xffff
09ca 0231 fffe | 1 | .CONST 0x0231,0xfffe
09cc 0236 fffd | 6 | .CONST 0x0236,0xfffd
09ce 0237 fffc | 7 | .CONST 0x0237,0xfffc
09d0 0238 fffb | 8 | .CONST 0x0238,0xfffb
09d2 0239 fffa | 9 | .CONST 0x0239,0xfffa
09d4 023e fff9 | > | .CONST 0x023e,0xfff9
09d6 0243 fff8 | C | .CONST 0x0243,0xfff8
09d8 0248 fff7 | H | .CONST 0x0248,0xfff7
09da 024a fff6 | J | .CONST 0x024a,0xfff6
09dc 024b fff5 | K | .CONST 0x024b,0xfff5
09de 024c fff4 | L | .CONST 0x024c,0xfff4
09e0 024d fff3 | M | .CONST 0x024d,0xfff3
09e2 024e 0001 | N | .CONST 0x024e,0x0001
09e4 0252 0002 | R | .CONST 0x0252,0x0002
09e6 0257 0003 | W | .CONST 0x0257,0x0003
09e8 025e 0004 | ^ | .CONST 0x025e,0x0004
09ea 0264 0005 | d | .CONST 0x0264,0x0005
09ec 026b 0006 | k | .CONST 0x026b,0x0006
09ee 026f 0007 | o | .CONST 0x026f,0x0007
09f0 0272 0401 | r | .CONST 0x0272,0x0401
09f2 0276 0007 | v | .CONST 0x0276,0x0007
09f4 0277 0008 | w | .CONST 0x0277,0x0008
09f6 0281 0009 | | .CONST 0x0281,0x0009
09f8 0285 000a | | .CONST 0x0285,0x000a
09fa 028d 000b | | .CONST 0x028d,0x000b
09fc 029a 000c | | .CONST 0x029a,0x000c
09fe 02a4 000d | | .CONST 0x02a4,0x000d
0a00 02ac 000e | | .CONST 0x02ac,0x000e
0a02 02b6 000f | | .CONST 0x02b6,0x000f
0a04 02c3 0010 | | .CONST 0x02c3,0x0010
0a06 02c8 0011 | | .CONST 0x02c8,0x0011
0a08 02cd 0012 | | .CONST 0x02cd,0x0012
0a0a 02eb 0013 | | .CONST 0x02eb,0x0013
0a0c 02ef 0014 | | .CONST 0x02ef,0x0014
0a0e 02f0 0801 | | .CONST 0x02f0,0x0801
0a10 02f1 0014 | | .CONST 0x02f1,0x0014
0a12 02f2 0015 | | .CONST 0x02f2,0x0015
0a14 02f3 0c01 | | .CONST 0x02f3,0x0c01
0a16 02f6 0015 | | .CONST 0x02f6,0x0015
0a18 02f7 0016 | | .CONST 0x02f7,0x0016
0a1a 02fd 0017 | | .CONST 0x02fd,0x0017
0a1c 0303 0018 | | .CONST 0x0303,0x0018
0a1e 0309 0019 | | .CONST 0x0309,0x0019
0a20 ; --------------------------------------------------------------------------------------
0a20 ; Debug3 Subtable 0x9
0a20 ; --------------------------------------------------------------------------------------
0a20 0004 0006 | | .DBG3TAB 0x0004,0x0006
0a22 0323 ffff | # | .CONST 0x0323,0xffff
0a24 0328 fffe | ( | .CONST 0x0328,0xfffe
0a26 032a fffd | * | .CONST 0x032a,0xfffd
0a28 0330 fffc | 0 | .CONST 0x0330,0xfffc
0a2a 0336 0001 | 6 | .CONST 0x0336,0x0001
0a2c 0346 0002 | F | .CONST 0x0346,0x0002
0a2e 034a 0003 | J | .CONST 0x034a,0x0003
0a30 034f 0004 | O | .CONST 0x034f,0x0004
0a32 035f 0005 | _ | .CONST 0x035f,0x0005
0a34 0364 0006 | d | .CONST 0x0364,0x0006
0a36 ; --------------------------------------------------------------------------------------
0a36 ; Debug3 Subtable 0xa
0a36 ; --------------------------------------------------------------------------------------
0a36 0006 000f | | .DBG3TAB 0x0006,0x000f
0a38 036b ffff | k | .CONST 0x036b,0xffff
0a3a 0370 fffe | p | .CONST 0x0370,0xfffe
0a3c 0371 fffd | q | .CONST 0x0371,0xfffd
0a3e 0372 fffc | r | .CONST 0x0372,0xfffc
0a40 0373 fffb | s | .CONST 0x0373,0xfffb
0a42 0378 fffa | x | .CONST 0x0378,0xfffa
0a44 037a 0001 | z | .CONST 0x037a,0x0001
0a46 037f 0002 | | .CONST 0x037f,0x0002
0a48 0384 0003 | | .CONST 0x0384,0x0003
0a4a 03a3 0004 | | .CONST 0x03a3,0x0004
0a4c 03aa 0005 | | .CONST 0x03aa,0x0005
0a4e 03ae 0006 | | .CONST 0x03ae,0x0006
0a50 03cd 0007 | | .CONST 0x03cd,0x0007
0a52 03cf 0008 | | .CONST 0x03cf,0x0008
0a54 03d3 0009 | | .CONST 0x03d3,0x0009
0a56 03d7 000a | | .CONST 0x03d7,0x000a
0a58 03d9 000b | | .CONST 0x03d9,0x000b
0a5a 03dc 000c | | .CONST 0x03dc,0x000c
0a5c 03e0 000d | | .CONST 0x03e0,0x000d
0a5e 03e2 000e | | .CONST 0x03e2,0x000e
0a60 03e6 000f | | .CONST 0x03e6,0x000f
0a62 ; --------------------------------------------------------------------------------------
0a62 ; Debug3 Subtable 0xb
0a62 ; --------------------------------------------------------------------------------------
0a62 0007 000c | | .DBG3TAB 0x0007,0x000c
0a64 03f3 ffff | | .CONST 0x03f3,0xffff
0a66 03f4 fffe | | .CONST 0x03f4,0xfffe
0a68 03f5 fffd | | .CONST 0x03f5,0xfffd
0a6a 03fa fffc | | .CONST 0x03fa,0xfffc
0a6c 03ff fffb | | .CONST 0x03ff,0xfffb
0a6e 0400 fffa | | .CONST 0x0400,0xfffa
0a70 0401 fff9 | | .CONST 0x0401,0xfff9
0a72 0403 0001 | | .CONST 0x0403,0x0001
0a74 0408 0002 | | .CONST 0x0408,0x0002
0a76 040a 0003 | | .CONST 0x040a,0x0003
0a78 0410 0004 | | .CONST 0x0410,0x0004
0a7a 0412 0005 | | .CONST 0x0412,0x0005
0a7c 0414 0006 | | .CONST 0x0414,0x0006
0a7e 0416 0007 | | .CONST 0x0416,0x0007
0a80 0435 0008 | 5 | .CONST 0x0435,0x0008
0a82 0438 000b | 8 | .CONST 0x0438,0x000b
0a84 043a 000c | : | .CONST 0x043a,0x000c
0a86 0441 0009 | A | .CONST 0x0441,0x0009
0a88 0443 000a | C | .CONST 0x0443,0x000a
0a8a ; --------------------------------------------------------------------------------------
0a8a ; Debug3 Subtable 0xc
0a8a ; --------------------------------------------------------------------------------------
0a8a 0008 0011 | | .DBG3TAB 0x0008,0x0011
0a8c 0453 ffff | S | .CONST 0x0453,0xffff
0a8e 0458 fffe | X | .CONST 0x0458,0xfffe
0a90 0459 fffd | Y | .CONST 0x0459,0xfffd
0a92 045a fffc | Z | .CONST 0x045a,0xfffc
0a94 045b fffb | [ | .CONST 0x045b,0xfffb
0a96 045d fffa | ] | .CONST 0x045d,0xfffa
0a98 0462 fff9 | b | .CONST 0x0462,0xfff9
0a9a 0467 fff8 | g | .CONST 0x0467,0xfff8
0a9c 046d 0001 | m | .CONST 0x046d,0x0001
0a9e 046e 0401 | n | .CONST 0x046e,0x0401
0aa0 046f 0001 | o | .CONST 0x046f,0x0001
0aa2 0470 0002 | p | .CONST 0x0470,0x0002
0aa4 0473 0003 | s | .CONST 0x0473,0x0003
0aa6 0474 0801 | t | .CONST 0x0474,0x0801
0aa8 0475 0003 | u | .CONST 0x0475,0x0003
0aaa 0476 0004 | v | .CONST 0x0476,0x0004
0aac 0496 0005 | | .CONST 0x0496,0x0005
0aae 049a 0006 | | .CONST 0x049a,0x0006
0ab0 04ae 0007 | | .CONST 0x04ae,0x0007
0ab2 04b2 0008 | | .CONST 0x04b2,0x0008
0ab4 04d3 0009 | | .CONST 0x04d3,0x0009
0ab6 04d7 000a | | .CONST 0x04d7,0x000a
0ab8 04f1 000b | | .CONST 0x04f1,0x000b
0aba 04f5 000c | | .CONST 0x04f5,0x000c
0abc 04f7 000d | | .CONST 0x04f7,0x000d
0abe ; --------------------------------------------------------------------------------------
0abe ; Debug3 Subtable 0xd
0abe ; --------------------------------------------------------------------------------------
0abe 0009 0020 | | .DBG3TAB 0x0009,0x0020
0ac0 0503 ffff | | .CONST 0x0503,0xffff
0ac2 0504 fffe | | .CONST 0x0504,0xfffe
0ac4 0505 fffd | | .CONST 0x0505,0xfffd
0ac6 0506 fffc | | .CONST 0x0506,0xfffc
0ac8 0507 fffb | | .CONST 0x0507,0xfffb
0aca 050c fffa | | .CONST 0x050c,0xfffa
0acc 050d fff9 | | .CONST 0x050d,0xfff9
0ace 0512 fff8 | | .CONST 0x0512,0xfff8
0ad0 0514 fff7 | | .CONST 0x0514,0xfff7
0ad2 0519 0001 | | .CONST 0x0519,0x0001
0ad4 051d 0002 | | .CONST 0x051d,0x0002
0ad6 0520 0401 | | .CONST 0x0520,0x0401
0ad8 0524 0002 | $ | .CONST 0x0524,0x0002
0ada 0525 0003 | % | .CONST 0x0525,0x0003
0adc 0526 0004 | & | .CONST 0x0526,0x0004
0ade 053c 0005 | < | .CONST 0x053c,0x0005
0ae0 0550 0006 | P | .CONST 0x0550,0x0006
0ae2 0554 0007 | T | .CONST 0x0554,0x0007
0ae4 0565 0008 | e | .CONST 0x0565,0x0008
0ae6 056f 0009 | o | .CONST 0x056f,0x0009
0ae8 0578 0801 | x | .CONST 0x0578,0x0801
0aea 057a 0802 | z | .CONST 0x057a,0x0802
0aec 057c 0803 | | | .CONST 0x057c,0x0803
0aee 0580 0804 | | .CONST 0x0580,0x0804
0af0 0584 0805 | | .CONST 0x0584,0x0805
0af2 0586 0c01 | | .CONST 0x0586,0x0c01
0af4 0588 0c02 | | .CONST 0x0588,0x0c02
0af6 0589 0c03 | | .CONST 0x0589,0x0c03
0af8 058a 0c04 | | .CONST 0x058a,0x0c04
0afa 058c 0805 | | .CONST 0x058c,0x0805
0afc 0596 1001 | | .CONST 0x0596,0x1001
0afe 0598 1002 | | .CONST 0x0598,0x1002
0b00 0599 1003 | | .CONST 0x0599,0x1003
0b02 059a 1004 | | .CONST 0x059a,0x1004
0b04 059c 0c04 | | .CONST 0x059c,0x0c04
0b06 05aa 0009 | | .CONST 0x05aa,0x0009
0b08 05ae 000a | | .CONST 0x05ae,0x000a
0b0a 05b7 000b | | .CONST 0x05b7,0x000b
0b0c 05bb 000c | | .CONST 0x05bb,0x000c
0b0e 05c5 000d | | .CONST 0x05c5,0x000d
0b10 05c9 000e | | .CONST 0x05c9,0x000e
0b12 ; --------------------------------------------------------------------------------------
0b12 ; Debug3 Subtable 0xe
0b12 ; --------------------------------------------------------------------------------------
0b12 0008 0014 | | .DBG3TAB 0x0008,0x0014
0b14 05d3 ffff | | .CONST 0x05d3,0xffff
0b16 05d8 fffe | | .CONST 0x05d8,0xfffe
0b18 05de fffd | | .CONST 0x05de,0xfffd
0b1a 05e4 fffc | | .CONST 0x05e4,0xfffc
0b1c 05e9 fffb | | .CONST 0x05e9,0xfffb
0b1e 05eb fffa | | .CONST 0x05eb,0xfffa
0b20 05f1 fff9 | | .CONST 0x05f1,0xfff9
0b22 05f6 fff8 | | .CONST 0x05f6,0xfff8
0b24 05fc 0001 | | .CONST 0x05fc,0x0001
0b26 0601 0002 | | .CONST 0x0601,0x0002
0b28 0607 0003 | | .CONST 0x0607,0x0003
0b2a 060c 0004 | | .CONST 0x060c,0x0004
0b2c 0626 0005 | & | .CONST 0x0626,0x0005
0b2e 062a 0006 | * | .CONST 0x062a,0x0006
0b30 0631 0007 | 1 | .CONST 0x0631,0x0007
0b32 0638 0008 | 8 | .CONST 0x0638,0x0008
0b34 0648 0009 | H | .CONST 0x0648,0x0009
0b36 064c 000a | L | .CONST 0x064c,0x000a
0b38 065d 000b | ] | .CONST 0x065d,0x000b
0b3a 0661 000c | a | .CONST 0x0661,0x000c
0b3c 066b 000d | k | .CONST 0x066b,0x000d
0b3e 0672 000e | r | .CONST 0x0672,0x000e
0b40 0677 000f | w | .CONST 0x0677,0x000f
0b42 0680 0010 | | .CONST 0x0680,0x0010
0b44 0684 0011 | | .CONST 0x0684,0x0011
0b46 068a 0012 | | .CONST 0x068a,0x0012
0b48 0692 0013 | | .CONST 0x0692,0x0013
0b4a 0698 0014 | | .CONST 0x0698,0x0014
0b4c ; --------------------------------------------------------------------------------------
0b4c ; Debug3 Subtable 0xf
0b4c ; --------------------------------------------------------------------------------------
0b4c 0004 001a | | .DBG3TAB 0x0004,0x001a
0b4e 06a3 ffff | | .CONST 0x06a3,0xffff
0b50 06a4 fffe | | .CONST 0x06a4,0xfffe
0b52 06a5 fffd | | .CONST 0x06a5,0xfffd
0b54 06aa fffc | | .CONST 0x06aa,0xfffc
0b56 06af 0001 | | .CONST 0x06af,0x0001
0b58 06bd 0002 | | .CONST 0x06bd,0x0002
0b5a 06be 0401 | | .CONST 0x06be,0x0401
0b5c 06c0 0402 | | .CONST 0x06c0,0x0402
0b5e 06c1 0403 | | .CONST 0x06c1,0x0403
0b60 06c2 0404 | | .CONST 0x06c2,0x0404
0b62 06c3 0002 | | .CONST 0x06c3,0x0002
0b64 06c6 0003 | | .CONST 0x06c6,0x0003
0b66 06ca 0004 | | .CONST 0x06ca,0x0004
0b68 06cb 0005 | | .CONST 0x06cb,0x0005
0b6a 06ce 0801 | | .CONST 0x06ce,0x0801
0b6c 06d0 0802 | | .CONST 0x06d0,0x0802
0b6e 06d1 0803 | | .CONST 0x06d1,0x0803
0b70 06d2 0804 | | .CONST 0x06d2,0x0804
0b72 06d4 0005 | | .CONST 0x06d4,0x0005
0b74 06d6 0006 | | .CONST 0x06d6,0x0006
0b76 06da 0007 | | .CONST 0x06da,0x0007
0b78 06db 0008 | | .CONST 0x06db,0x0008
0b7a 06de 0009 | | .CONST 0x06de,0x0009
0b7c 06e2 000a | | .CONST 0x06e2,0x000a
0b7e 06e3 000b | | .CONST 0x06e3,0x000b
0b80 06e8 000c | | .CONST 0x06e8,0x000c
0b82 06ef 000d | | .CONST 0x06ef,0x000d
0b84 06f5 000e | | .CONST 0x06f5,0x000e
0b86 06fa 0c01 | | .CONST 0x06fa,0x0c01
0b88 06fb 000e | | .CONST 0x06fb,0x000e
0b8a 0000 0000 | | .BLANK 0000[0x76]