|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 6144 (0x1800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 07b0 | | .CONST 0x07b0 ; 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 0067 | g | .CONST 0x0067 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x0872,0x8000,0x0000,0x005a,0x84f5,0x0000,0x0003
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 029a 0073 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0070 ; Debug Table 0x0.0x1 = 0xc,0xfffe
000e 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080 ; Debug Table 0x0.0x2 = 0xe,0xfffd
0010 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090 ; Debug Table 0x0.0x3 = 0x10,0xfffc
0012 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0 ; Debug Table 0x0.0x4 = 0x12,0xfffb
0014 029a 015b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0158 ; Debug Table 0x0.0x5 = 0x14,0xfffa
0016 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188 ; Debug Table 0x0.0x6 = 0x16,0xfff9
0018 029a 01bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b8 ; Debug Table 0x0.0x7 = 0x18,0xfff8
001a 029a 0203 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0200 ; Debug Table 0x0.0x8 = 0x1a,0xfff7
001c 029a 0243 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0240 ; Debug Table 0x0.0x9 = 0x1c,0xfff6
001e 029a 0363 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0360 ; Debug Table 0x0.0xa = 0x1e,0xfff5
0020 029a 0373 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0370 ; Debug Table 0x0.0xb = 0x20,0xfff4
0022 029a 0393 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0390 ; Debug Table 0x0.0xc = 0x22,0xfff3
0024 029a 03ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03a8 ; Debug Table 0x0.0xd = 0x24,0xfff2
0026 029a 03c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03c0 ; Debug Table 0x0.0xe = 0x26,0xfff1
0028 029a 042b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0428 ; Debug Table 0x0.0xf = 0x28,0xfff0
002a 029a 045b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0458 ; Debug Table 0x0.0x10 = 0x2a,0xffef
002c 029a 0463 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0460 ; Debug Table 0x0.0x11 = 0x2c,0xffee
002e 029a 046b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0468 ; Debug Table 0x0.0x12 = 0x2e,0xffed
0030 0007 | | Action Break_Optional ; Debug Table 0x0.0x13 = 0x30,0xffec
0031 0007 | | Action Break_Optional ; Debug Table 0x0.0x14 = 0x31,0xffeb
0032 00bf | | Action Accept_Activation ; Debug Table 0x0.0x15 = 0x32,0xffea
0033 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0033,0x08a0,0x8000,0x0000,0x005a,0x8aa5,0x0000,0x003b
; Debug Table 0x1.0x0 = 0x33,0xffff
0034 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x34,0xfffe
0035 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x35,0xfffd
0036 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x36,0xfffc
0037 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x37,0xfffb
0038 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x38,0xfffa
0039 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x39,0xfff9
003a 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x3a,0xfff8
003b 029d 047b | {| Declare_Subprogram For_Outer_Call,INIT_0478 ; Debug Table 0x1.0x8 = 0x3b,0xfff7
003d 029d 048b | | Declare_Subprogram For_Outer_Call,INIT_0488 ; Debug Table 0x1.0x9 = 0x3d,0xfff6
003f 029d 04eb | | Declare_Subprogram For_Outer_Call,INIT_04e8 ; Debug Table 0x1.0xa = 0x3f,0xfff5
0041 029d 0583 | | Declare_Subprogram For_Outer_Call,INIT_0580 ; Debug Table 0x1.0xb = 0x41,0xfff4
0043 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0xc = 0x43,0xfff3
0044 00c7 | | Action Elaborate_Subprogram
0045 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0xd = 0x45,0xfff2
0046 00c7 | | Action Elaborate_Subprogram
0047 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xe = 0x47,0xfff1
0048 00c7 | | Action Elaborate_Subprogram
0049 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xf = 0x49,0xfff0
004a 00c7 | | Action Elaborate_Subprogram
004b 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x10 = 0x4b,0xffef
004c 00c7 | | Action Elaborate_Subprogram
004d 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x11 = 0x4d,0xffee
004e 00c7 | | Action Elaborate_Subprogram
004f 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x12 = 0x4f,0xffed
0050 00c7 | | Action Elaborate_Subprogram
0051 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x13 = 0x51,0xffec
0052 00c7 | | Action Elaborate_Subprogram
0053 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x14 = 0x53,0xffeb
0054 00c7 | | Action Elaborate_Subprogram
0055 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x15 = 0x55,0xffea
0056 00c7 | | Action Elaborate_Subprogram
0057 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x16 = 0x57,0xffe9
0058 00c7 | | Action Elaborate_Subprogram
0059 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x17 = 0x59,0xffe8
005a 00c7 | | Action Elaborate_Subprogram
005b 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x18 = 0x5b,0xffe7
005c 00c7 | | Action Elaborate_Subprogram
005d 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x19 = 0x5d,0xffe6
005e 00c7 | | Action Elaborate_Subprogram
005f 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x1a = 0x5f,0xffe5
0060 00c7 | | Action Elaborate_Subprogram
0061 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x1b = 0x61,0xffe4
0062 00c7 | | Action Elaborate_Subprogram
0063 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x1c = 0x63,0xffe3
0064 00c7 | | Action Elaborate_Subprogram
0065 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x1d = 0x65,0xffe2
0066 00c7 | | Action Elaborate_Subprogram
0067 BODY_0008:
0067 00bc | | Action Signal_Activated
0068 00bb | | Action Signal_Completion
0069 0000 0000 | | .BLANK 0000[0x7]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 0092 059c | | Action Push_String_Extended,0x59c ; "Ada.Code_Unit"
; Debug Table 0x2 = .DEBUG 0x0073,0x08de,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0008
; Debug Table 0x2.0x0 = 0x73,0x1
0075 e001 | | Load 0x0,0x1
0076 180d | | Execute Package,Field_Execute,Field_Number 0xd
0077 4804 |H | Short_Literal 0x4 ; Debug Table 0x2.0x1 = 0x77,0x2
0078 8221 | ! | Call 0x1,0x21
0079 4501 |E | Exit_Subprogram 0x1
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 0092 059d | | Action Push_String_Extended,0x59d ; "Ada.Install_Unit"
; Debug Table 0x3 = .DEBUG 0x0083,0x08e4,0x0001,0x0000,0x005a,0x84f5,0x0000,0x000c
; Debug Table 0x3.0x0 = 0x83,0x1
0085 e001 | | Load 0x0,0x1
0086 180d | | Execute Package,Field_Execute,Field_Number 0xd
0087 4803 |H | Short_Literal 0x3 ; Debug Table 0x3.0x1 = 0x87,0x2
0088 8221 | ! | Call 0x1,0x21
0089 4501 |E | Exit_Subprogram 0x1
008a 0000 0000 | | .BLANK 0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 0092 059e | | Action Push_String_Extended,0x59e ; "Ada.Source_Unit"
; Debug Table 0x4 = .DEBUG 0x0093,0x08ea,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0010
; Debug Table 0x4.0x0 = 0x93,0x1
0095 e001 | | Load 0x0,0x1
0096 180d | | Execute Package,Field_Execute,Field_Number 0xd
0097 4802 |H | Short_Literal 0x2 ; Debug Table 0x4.0x1 = 0x97,0x2
0098 8221 | ! | Call 0x1,0x21
0099 4501 |E | Exit_Subprogram 0x1
009a 0000 0000 | | .BLANK 0000[0x6]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00b3 | | .CONST 0x00b3 ; Address of begin
00a1 0142 | B | .CONST 0x0142 ; Address of exception handler
00a2 0006 | | .CONST 0x0006 ; Number of locals
00a3 INIT_00a0:
00a3 e002 | | Load 0x0,0x2 ; Debug Table 0x5 = .DEBUG 0x00a3,0x08f0,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0014
; Debug Table 0x5.0x0 = 0xa3,0xffff
00a4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00a6 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x1 = 0xa6,0xfffe
00a7 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x2 = 0xa7,0xfffd
00a8 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x3 = 0xa8,0xfffc
00a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00aa 0322 | " | Declare_Variable Record
00ab 00d8 | | Load_Top At_Offset_0
00ac 1c00 | | Execute_Immediate Run_Utility,0x0
00ad e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x4 = 0xad,0xfffb
00ae e004 | | Load 0x0,0x4
00af 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b0 e004 | | Load 0x0,0x4
00b1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00b2 03f1 | | Declare_Variable Discrete,With_Value
00b3 BODY_00a0:
00b3 0092 059f | | Action Push_String_Extended,0x59f ; "Ada.Withdraw"
; Debug Table 0x5.0x5 = 0xb3,0x1
00b5 e001 | | Load 0x0,0x1
00b6 180d | | Execute Package,Field_Execute,Field_Number 0xd
00b7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x6 = 0xb7,0x2
00b8 4604 |F | Jump_Case 0x4
00b9 7863 |xc | Jump 0x11d ; case 0x0
00ba 7862 |xb | Jump 0x11d ; case 0x1
00bb 7861 |xa | Jump 0x11d ; case 0x2
00bc 7801 |x | Jump 0xbe ; case 0x3
00bd 785f |x_ | Jump 0x11d ; case 0x4
00be 821f | | Call 0x1,0x1f ; Debug Table 0x5.0x7 = 0xbe,0x3
00bf 680e |h | Jump_Zero 0xce
00c0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x8 = 0xc0,0x4
00c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00c2 00ec | | Load_Encached Diana_Tree_Cache
00c3 e005 | | Load 0x0,0x5
00c4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00c5 4801 |H | Short_Literal 0x1
00c6 e006 | | Load 0x0,0x6
00c7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00c8 e006 | | Load 0x0,0x6
00c9 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00ca 00db | | Load_Top At_Offset_3
00cb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00cc 00d1 | | Pop_Control Pop_Count_1
00cd 7861 |xa | Jump 0x12f
00ce e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x9 = 0xce,0x5
00cf 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
00d0 00da | | Load_Top At_Offset_2
00d1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00d2 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0xa = 0xd2,0x6
00d3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d5 e002 | | Load 0x0,0x2
00d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d7 e007 | | Load 0x0,0x7
00d8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d9 4800 |H | Short_Literal 0x0
00da e008 | | Load 0x0,0x8
00db 180e | | Execute Package,Field_Execute,Field_Number 0xe
00dc c403 | | Store 0x2,0x3
00dd c402 | | Store 0x2,0x2
00de 0007 | | Action Break_Optional ; Debug Table 0x5.0xb = 0xde,0x7
00df e403 | | Load 0x2,0x3 ; Debug Table 0x5.0xc = 0xdf,0x401
00e0 0007 | | Action Break_Optional
00e1 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0xd = 0xe1,0x402
00e2 0007 | | Action Break_Optional ; Debug Table 0x5.0xe = 0xe2,0x403
00e3 0007 | | Action Break_Optional ; Debug Table 0x5.0xf = 0xe3,0x404
00e4 0b00 | | Execute_Immediate Case_Compare,0x0 ; Debug Table 0x5.0x10 = 0xe4,0x7
00e5 7024 |p$ | Jump_Nonzero 0x10a
00e6 0b39 | 9 | Execute_Immediate Case_Compare,0x39
00e7 7027 |p' | Jump_Nonzero 0x10f
00e8 0b30 | 0 | Execute_Immediate Case_Compare,0x30
00e9 7025 |p% | Jump_Nonzero 0x10f
00ea e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x11 = 0xea,0xd
00eb e009 | | Load 0x0,0x9
00ec 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
00ed 7004 |p | Jump_Nonzero 0xf2
00ee e403 | | Load 0x2,0x3
00ef e009 | | Load 0x0,0x9
00f0 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
00f1 6826 |h& | Jump_Zero 0x118
00f2 e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x12 = 0xf2,0xe
00f3 00eb | | Load_Encached Diana_Cache
00f4 18ec | | Execute Package,Field_Execute,Field_Number 0xec
00f5 a404 | | Store_Unchecked 0x2,0x4
00f6 0007 | | Action Break_Optional ; Debug Table 0x5.0x13 = 0xf6,0xf
00f7 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x14 = 0xf7,0x801
00f8 0007 | | Action Break_Optional
00f9 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0x15 = 0xf9,0x802
00fa 0007 | | Action Break_Optional ; Debug Table 0x5.0x16 = 0xfa,0x803
00fb 0007 | | Action Break_Optional ; Debug Table 0x5.0x17 = 0xfb,0x804
00fc 0ba8 | | Execute_Immediate Case_Compare,0xa8 ; Debug Table 0x5.0x18 = 0xfc,0xf
00fd 7003 |p | Jump_Nonzero 0x101
00fe 0b49 | I | Execute_Immediate Case_Compare,0x49
00ff 7004 |p | Jump_Nonzero 0x104
0100 7807 |x | Jump 0x108 ; Debug Table 0x5.0x19 = 0x100,0x12
0101 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x1a = 0x101,0x10
0102 a403 | | Store_Unchecked 0x2,0x3
0103 7804 |x | Jump 0x108
0104 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x1b = 0x104,0x11
0105 00eb | | Load_Encached Diana_Cache
0106 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0107 a403 | | Store_Unchecked 0x2,0x3
0108 00d1 | | Pop_Control Pop_Count_1
0109 780e |x | Jump 0x118
010a 0092 05a0 | | Action Push_String_Extended,0x5a0 ; "Command failed - no selection"
; Debug Table 0x5.0x1c = 0x10a,0x8
010c e00a | | Load 0x0,0xa
010d 180d | | Execute Package,Field_Execute,Field_Number 0xd
010e 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x5.0x1d = 0x10e,0x9
010f e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x1e = 0x10f,0xa
0110 e00b | | Load 0x0,0xb
0111 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0112 6805 |h | Jump_Zero 0x118
0113 0092 05a1 | | Action Push_String_Extended,0x5a1 ; "Command failed - not an ada object"
; Debug Table 0x5.0x1f = 0x113,0xb
0115 e00a | | Load 0x0,0xa
0116 180d | | Execute Package,Field_Execute,Field_Number 0xd
0117 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x5.0x20 = 0x117,0xc
0118 00d1 | | Pop_Control Pop_Count_1
0119 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x21 = 0x119,0x13
011a 00da | | Load_Top At_Offset_2
011b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
011c 7812 |x | Jump 0x12f
011d e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x22 = 0x11d,0x14
011e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
011f 00da | | Load_Top At_Offset_2
0120 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0121 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x23 = 0x121,0x15
0122 4801 |H | Short_Literal 0x1
0123 e007 | | Load 0x0,0x7
0124 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0125 e002 | | Load 0x0,0x2
0126 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0127 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0128 0092 05a2 | | Action Push_String_Extended,0x5a2 ; "Withdraw"
012a e5ff | | Load 0x2,-0x1
012b e00c | | Load 0x0,0xc
012c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
012d 00da | | Load_Top At_Offset_2
012e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x24 = 0x12f,0x16
0130 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0131 0007 | | Action Break_Optional
0132 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x25 = 0x132,0xc01
0133 021d | | Execute Heap_Access,Is_Null
0134 00d0 | | Action Swap_Control
0135 00d1 | | Pop_Control Pop_Count_1
0136 7006 |p | Jump_Nonzero 0x13d ; Debug Table 0x5.0x26 = 0x136,0x16
0137 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x27 = 0x137,0x17
0138 4801 |H | Short_Literal 0x1
0139 4801 |H | Short_Literal 0x1
013a e405 | | Load 0x2,0x5
013b e003 | | Load 0x0,0x3
013c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
013d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x28 = 0x13d,0x18
013e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
013f e006 | | Load 0x0,0x6
0140 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0141 4502 |E | Exit_Subprogram 0x2
0142 TRAP_00a0:
0142 0007 | | Action Break_Optional
0143 e00d | | Load 0x0,0xd ; Debug Table 0x5.0x29 = 0x143,0x19
0144 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0145 0092 05a3 | | Action Push_String_Extended,0x5a3 ; "*** Exception in Ada.Withdraw: "
; Debug Table 0x5.0x2a = 0x145,0x1a
0147 e00e | | Load 0x0,0xe
0148 180d | | Execute Package,Field_Execute,Field_Number 0xd
0149 01cc | | Execute Vector,Catenate
014a e00d | | Load 0x0,0xd
014b 180f | | Execute Package,Field_Execute,Field_Number 0xf
014c 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x2b = 0x14c,0x1b
014d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014e e006 | | Load 0x0,0x6
014f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0150 4502 |E | Exit_Subprogram 0x2
0151 0000 0000 | | .BLANK 0000[0x7]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015c | \ | .CONST 0x015c ; Address of begin
0159 0176 | v | .CONST 0x0176 ; Address of exception handler
015a 0002 | | .CONST 0x0002 ; Number of locals
015b INIT_0158:
015b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6 = .DEBUG 0x015b,0x094a,0x0001,0x0000,0x005a,0x84f5,0x0000,0x001d
; Debug Table 0x6.0x0 = 0x15b,0xffff
015c BODY_0158:
015c 0092 05a4 | | Action Push_String_Extended,0x5a4 ; "Ada.Diana_Edit"
; Debug Table 0x6.0x1 = 0x15c,0x1
015e e001 | | Load 0x0,0x1
015f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0160 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x2 = 0x160,0x2
0161 4801 |H | Short_Literal 0x1
0162 e007 | | Load 0x0,0x7
0163 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0164 e002 | | Load 0x0,0x2
0165 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0166 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0167 0092 05a4 | | Action Push_String_Extended,0x5a4 ; "Ada.Diana_Edit"
0169 e5ff | | Load 0x2,-0x1
016a e00c | | Load 0x0,0xc
016b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016c 0031 | 1 | Store_Top Heap_Access,At_Offset_1
016d 0007 | | Action Break_Optional ; Debug Table 0x6.0x3 = 0x16d,0x3
016e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x4 = 0x16e,0x401
016f 021d | | Execute Heap_Access,Is_Null
0170 6801 |h | Jump_Zero 0x172 ; Debug Table 0x6.0x5 = 0x170,0x3
0171 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x6.0x6 = 0x171,0x4
0172 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x7 = 0x172,0x5
0173 e00f | | Load 0x0,0xf
0174 180d | | Execute Package,Field_Execute,Field_Number 0xd
0175 4502 |E | Exit_Subprogram 0x2
0176 TRAP_0158:
0176 62a9 |b | Indirect_Literal Discrete,0x420,{0x00000000, 0x5a851501}
0177 010f | | Execute Exception,Equal
0178 6801 |h | Jump_Zero 0x17a
0179 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x6.0x8 = 0x179,0x6
017a e00d | | Load 0x0,0xd ; Debug Table 0x6.0x9 = 0x17a,0x7
017b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
017c 0092 05a5 | | Action Push_String_Extended,0x5a5 ; "*** Exception in Ada.Diana_Edit: "
; Debug Table 0x6.0xa = 0x17c,0x8
017e e00e | | Load 0x0,0xe
017f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0180 01cc | | Execute Vector,Catenate
0181 e00d | | Load 0x0,0xd
0182 180f | | Execute Package,Field_Execute,Field_Number 0xf
0183 4502 |E | Exit_Subprogram 0x2
0184 0000 0000 | | .BLANK 0000[0x4]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018c | | .CONST 0x018c ; Address of begin
0189 01a5 | | .CONST 0x01a5 ; Address of exception handler
018a 0002 | | .CONST 0x0002 ; Number of locals
018b INIT_0188:
018b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x018b,0x0962,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0026
; Debug Table 0x7.0x0 = 0x18b,0xffff
018c BODY_0188:
018c 0092 05a6 | | Action Push_String_Extended,0x5a6 ; "Ada.Install_Stub"
; Debug Table 0x7.0x1 = 0x18c,0x1
018e e001 | | Load 0x0,0x1
018f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0190 e005 | | Load 0x0,0x5 ; Debug Table 0x7.0x2 = 0x190,0x2
0191 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0192 4801 |H | Short_Literal 0x1
0193 e006 | | Load 0x0,0x6
0194 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0195 e006 | | Load 0x0,0x6
0196 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0197 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0198 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x3 = 0x198,0x3
0199 e003 | | Load 0x0,0x3
019a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019b 4604 |F | Jump_Case 0x4
019c 4501 |E | Exit_Subprogram 0x1 ; case 0x0
019d 4501 |E | Exit_Subprogram 0x1 ; case 0x1
019e 7802 |x | Jump 0x1a1 ; case 0x2
019f 4501 |E | Exit_Subprogram 0x1 ; case 0x3
01a0 4501 |E | Exit_Subprogram 0x1 ; case 0x4
01a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x4 = 0x1a1,0x4
01a2 e003 | | Load 0x0,0x3
01a3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a4 4501 |E | Exit_Subprogram 0x1
01a5 TRAP_0188:
01a5 627a |bz | Indirect_Literal Discrete,0x420,{0x00000000, 0x5a851501}
01a6 010f | | Execute Exception,Equal
01a7 6801 |h | Jump_Zero 0x1a9
01a8 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x7.0x5 = 0x1a8,0x6
01a9 e00d | | Load 0x0,0xd ; Debug Table 0x7.0x6 = 0x1a9,0x7
01aa 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ab 0092 05a7 | | Action Push_String_Extended,0x5a7 ; "*** Exception in Ada.Install_Stub: "
; Debug Table 0x7.0x7 = 0x1ab,0x8
01ad e00e | | Load 0x0,0xe
01ae 180d | | Execute Package,Field_Execute,Field_Number 0xd
01af 01cc | | Execute Vector,Catenate
01b0 e00d | | Load 0x0,0xd
01b1 180f | | Execute Package,Field_Execute,Field_Number 0xf
01b2 4501 |E | Exit_Subprogram 0x1
01b3 0000 0000 | | .BLANK 0000[0x5]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01be | | .CONST 0x01be ; Address of begin
01b9 01f2 | | .CONST 0x01f2 ; Address of exception handler
01ba 0004 | | .CONST 0x0004 ; Number of locals
01bb INIT_01b8:
01bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8 = .DEBUG 0x01bb,0x0974,0x0001,0x0000,0x005a,0x84f5,0x0000,0x002a
; Debug Table 0x8.0x0 = 0x1bb,0xffff
01bc 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x1 = 0x1bc,0xfffe
01bd 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x2 = 0x1bd,0xfffd
01be BODY_01b8:
01be 0092 05a8 | | Action Push_String_Extended,0x5a8 ; "Ada.Make_Inline"
; Debug Table 0x8.0x3 = 0x1be,0x1
01c0 e001 | | Load 0x0,0x1
01c1 180d | | Execute Package,Field_Execute,Field_Number 0xd
01c2 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x4 = 0x1c2,0x2
01c3 4801 |H | Short_Literal 0x1
01c4 e007 | | Load 0x0,0x7
01c5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01c6 e002 | | Load 0x0,0x2
01c7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01c9 00ea | | Load_Encached Null_String_Cache
01ca 0092 05a9 | | Action Push_String_Extended,0x5a9 ; "<IMAGE>"
01cc e00c | | Load 0x0,0xc
01cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ce 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01cf 0007 | | Action Break_Optional ; Debug Table 0x8.0x5 = 0x1cf,0x3
01d0 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x6 = 0x1d0,0x401
01d1 021d | | Execute Heap_Access,Is_Null
01d2 6805 |h | Jump_Zero 0x1d8 ; Debug Table 0x8.0x7 = 0x1d2,0x3
01d3 0092 05aa | | Action Push_String_Extended,0x5aa ; "Make_Inline failed - unit is not an Ada object"
; Debug Table 0x8.0x8 = 0x1d3,0x4
01d5 e00a | | Load 0x0,0xa
01d6 180d | | Execute Package,Field_Execute,Field_Number 0xd
01d7 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x8.0x9 = 0x1d7,0x5
01d8 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0xa = 0x1d8,0x6
01d9 00eb | | Load_Encached Diana_Cache
01da 18ec | | Execute Package,Field_Execute,Field_Number 0xec
01db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xb = 0x1db,0x801
01dc 021d | | Execute Heap_Access,Is_Null
01dd 00d0 | | Action Swap_Control
01de 00d1 | | Pop_Control Pop_Count_1
01df 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 ; Debug Table 0x8.0xc = 0x1df,0x6
01e0 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0xd = 0x1e0,0x7
01e1 00db | | Load_Top At_Offset_3
01e2 8010 | | Call 0x0,0x10
01e3 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01e4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0xe = 0x1e4,0x8
01e5 680b |h | Jump_Zero 0x1f1
01e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xf = 0x1e6,0xc01
01e7 021d | | Execute Heap_Access,Is_Null
01e8 7008 |p | Jump_Nonzero 0x1f1 ; Debug Table 0x8.0x10 = 0x1e8,0x8
01e9 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x11 = 0x1e9,0x9
01ea 4801 |H | Short_Literal 0x1
01eb 4800 |H | Short_Literal 0x0
01ec e006 | | Load 0x0,0x6
01ed 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01ee e404 | | Load 0x2,0x4
01ef e006 | | Load 0x0,0x6
01f0 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01f1 4501 |E | Exit_Subprogram 0x1
01f2 TRAP_01b8:
01f2 622d |b- | Indirect_Literal Discrete,0x420,{0x00000000, 0x5a851501}
01f3 010f | | Execute Exception,Equal
01f4 6801 |h | Jump_Zero 0x1f6
01f5 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x8.0x12 = 0x1f5,0xa
01f6 e00d | | Load 0x0,0xd ; Debug Table 0x8.0x13 = 0x1f6,0xb
01f7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01f8 0092 05ab | | Action Push_String_Extended,0x5ab ; "*** Exception in Ada.Make_Inline: "
; Debug Table 0x8.0x14 = 0x1f8,0xc
01fa e00e | | Load 0x0,0xe
01fb 180d | | Execute Package,Field_Execute,Field_Number 0xd
01fc 01cc | | Execute Vector,Catenate
01fd e00d | | Load 0x0,0xd
01fe 180f | | Execute Package,Field_Execute,Field_Number 0xf
01ff 4501 |E | Exit_Subprogram 0x1
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020e | | .CONST 0x020e ; Address of begin
0201 022e | . | .CONST 0x022e ; Address of exception handler
0202 0004 | | .CONST 0x0004 ; Number of locals
0203 INIT_0200:
0203 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x0203,0x09a0,0x0001,0x0000,0x005a,0x84f5,0x0000,0x002e
; Debug Table 0x9.0x0 = 0x203,0xffff
0204 e006 | | Load 0x0,0x6 ; Debug Table 0x9.0x1 = 0x204,0xfffe
0205 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0206 0322 | " | Declare_Variable Record
0207 00d8 | | Load_Top At_Offset_0
0208 1c00 | | Execute_Immediate Run_Utility,0x0
0209 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x2 = 0x209,0xfffd
020a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
020b 02ff | | Declare_Variable Variant_Record
020c 00d8 | | Load_Top At_Offset_0
020d 1c00 | | Execute_Immediate Run_Utility,0x0
020e BODY_0200:
020e 0092 05ac | | Action Push_String_Extended,0x5ac ; "Ada.Make_Separate"
; Debug Table 0x9.0x3 = 0x20e,0x1
0210 e001 | | Load 0x0,0x1
0211 180d | | Execute Package,Field_Execute,Field_Number 0xd
0212 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x4 = 0x212,0x2
0213 00ec | | Load_Encached Diana_Tree_Cache
0214 e005 | | Load 0x0,0x5
0215 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0216 4801 |H | Short_Literal 0x1
0217 e006 | | Load 0x0,0x6
0218 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0219 e006 | | Load 0x0,0x6
021a 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
021b c402 | | Store 0x2,0x2
021c 00d1 | | Pop_Control Pop_Count_1
021d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x5 = 0x21d,0x3
021e 00db | | Load_Top At_Offset_3
021f 8011 | | Call 0x0,0x11
0220 00d1 | | Pop_Control Pop_Count_1
0221 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x221,0x4
0222 e002 | | Load 0x0,0x2
0223 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0224 7008 |p | Jump_Nonzero 0x22d
0225 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x7 = 0x225,0x5
0226 e007 | | Load 0x0,0x7
0227 180e | | Execute Package,Field_Execute,Field_Number 0xe
0228 4800 |H | Short_Literal 0x0
0229 4800 |H | Short_Literal 0x0
022a e004 | | Load 0x0,0x4
022b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
022c 00d1 | | Pop_Control Pop_Count_1
022d 4501 |E | Exit_Subprogram 0x1
022e TRAP_0200:
022e 61f1 |a | Indirect_Literal Discrete,0x420,{0x00000000, 0x5a851501}
022f 010f | | Execute Exception,Equal
0230 6801 |h | Jump_Zero 0x232
0231 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x9.0x8 = 0x231,0x6
0232 e00d | | Load 0x0,0xd ; Debug Table 0x9.0x9 = 0x232,0x7
0233 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0234 0092 05ad | | Action Push_String_Extended,0x5ad ; "*** Exception in Ada.Make_Separate: "
; Debug Table 0x9.0xa = 0x234,0x8
0236 e00e | | Load 0x0,0xe
0237 180d | | Execute Package,Field_Execute,Field_Number 0xd
0238 01cc | | Execute Vector,Catenate
0239 e00d | | Load 0x0,0xd
023a 180f | | Execute Package,Field_Execute,Field_Number 0xf
023b 4501 |E | Exit_Subprogram 0x1
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0275 | u | .CONST 0x0275 ; Address of begin
0241 0351 | Q | .CONST 0x0351 ; Address of exception handler
0242 000e | | .CONST 0x000e ; Number of locals
0243 INIT_0240:
0243 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa = .DEBUG 0x0243,0x09b8,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0032
; Debug Table 0xa.0x0 = 0x243,0xffff
0244 e006 | | Load 0x0,0x6 ; Debug Table 0xa.0x1 = 0x244,0xfffe
0245 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0246 0322 | " | Declare_Variable Record
0247 00d8 | | Load_Top At_Offset_0
0248 1c00 | | Execute_Immediate Run_Utility,0x0
0249 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x2 = 0x249,0xfffd
024a e006 | | Load 0x0,0x6 ; Debug Table 0xa.0x3 = 0x24a,0xfffc
024b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
024c 0322 | " | Declare_Variable Record
024d 00d8 | | Load_Top At_Offset_0
024e 1c00 | | Execute_Immediate Run_Utility,0x0
024f e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x4 = 0x24f,0xfffb
0250 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0251 e006 | | Load 0x0,0x6 ; Debug Table 0xa.0x5 = 0x251,0xfffa
0252 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0253 0322 | " | Declare_Variable Record
0254 e006 | | Load 0x0,0x6 ; Debug Table 0xa.0x6 = 0x254,0xfff9
0255 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0256 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0x7 = 0x256,0xfff8
0257 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0258 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x8 = 0x258,0xfff7
0259 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
025a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
025b 02c7 | | Declare_Variable Any
025c 00d8 | | Load_Top At_Offset_0
025d 1c00 | | Execute_Immediate Run_Utility,0x0
025e e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x9 = 0x25e,0xfff6
025f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0260 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0261 02c7 | | Declare_Variable Any
0262 00d8 | | Load_Top At_Offset_0
0263 1c00 | | Execute_Immediate Run_Utility,0x0
0264 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0xa = 0x264,0xfff5
0265 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0266 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0267 02c7 | | Declare_Variable Any
0268 00d8 | | Load_Top At_Offset_0
0269 1c00 | | Execute_Immediate Run_Utility,0x0
026a e005 | | Load 0x0,0x5 ; Debug Table 0xa.0xb = 0x26a,0xfff4
026b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
026c 0322 | " | Declare_Variable Record
026d 00d8 | | Load_Top At_Offset_0
026e 1c00 | | Execute_Immediate Run_Utility,0x0
026f e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0xc = 0x26f,0xfff3
0270 e004 | | Load 0x0,0x4
0271 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0272 e004 | | Load 0x0,0x4
0273 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0274 03f1 | | Declare_Variable Discrete,With_Value
0275 BODY_0240:
0275 0092 05ae | | Action Push_String_Extended,0x5ae ; "Ada.Other_Part"
; Debug Table 0xa.0xd = 0x275,0x1
0277 e001 | | Load 0x0,0x1
0278 180d | | Execute Package,Field_Execute,Field_Number 0xd
0279 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0xe = 0x279,0x2
027a a409 | | Store_Unchecked 0x2,0x9
027b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xf = 0x27b,0x3
027c 4604 |F | Jump_Case 0x4
027d 7854 |xT | Jump 0x2d2 ; case 0x0
027e 7853 |xS | Jump 0x2d2 ; case 0x1
027f 7852 |xR | Jump 0x2d2 ; case 0x2
0280 7801 |x | Jump 0x282 ; case 0x3
0281 7850 |xP | Jump 0x2d2 ; case 0x4
0282 e007 | | Load 0x0,0x7 ; Debug Table 0xa.0x10 = 0x282,0x4
0283 180e | | Execute Package,Field_Execute,Field_Number 0xe
0284 e005 | | Load 0x0,0x5
0285 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0286 00da | | Load_Top At_Offset_2
0287 017d | } | Execute Record,Structure_Write
0288 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x11 = 0x288,0x5
0289 8222 | " | Call 0x1,0x22
028a 6831 |h1 | Jump_Zero 0x2bc
028b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x12 = 0x28b,0x6
028c e006 | | Load 0x0,0x6
028d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
028e e006 | | Load 0x0,0x6
028f 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0290 e403 | | Load 0x2,0x3
0291 017d | } | Execute Record,Structure_Write
0292 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x13 = 0x292,0x7
0293 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0294 e002 | | Load 0x0,0x2
0295 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0296 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0297 c40a | | Store 0x2,0xa
0298 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x14 = 0x298,0x8
0299 1b0d | | Execute Package,Field_Read,Field_Number 0xd
029a 00db | | Load_Top At_Offset_3
029b 0120 | | Execute Any,Is_Value
029c 6804 |h | Jump_Zero 0x2a1
029d e002 | | Load 0x0,0x2
029e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
029f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
02a0 7801 |x | Jump 0x2a2
02a1 00db | | Load_Top At_Offset_3
02a2 e002 | | Load 0x0,0x2
02a3 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02a5 6176 |av | Indirect_Literal Discrete,0x41c,{0x00000000, 0x00004000}
02a6 4801 |H | Short_Literal 0x1
02a7 4800 |H | Short_Literal 0x0
02a8 e403 | | Load 0x2,0x3
02a9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02aa e012 | | Load 0x0,0x12
02ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ac 4800 |H | Short_Literal 0x0
02ad e40a | | Load 0x2,0xa
02ae e002 | | Load 0x0,0x2
02af 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02b0 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02b1 c402 | | Store 0x2,0x2
02b2 c40c | | Store 0x2,0xc
02b3 c406 | | Store 0x2,0x6
02b4 e406 | | Load 0x2,0x6 ; Debug Table 0xa.0x15 = 0x2b4,0x9
02b5 0092 05af | | Action Push_String_Extended,0x5af ; "Ada.Open"
02b7 e003 | | Load 0x0,0x3
02b8 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b9 4802 |H | Short_Literal 0x2 ; Debug Table 0xa.0x16 = 0x2b9,0xa
02ba a409 | | Store_Unchecked 0x2,0x9
02bb 7828 |x( | Jump 0x2e4
02bc e405 | | Load 0x2,0x5 ; Debug Table 0xa.0x17 = 0x2bc,0xb
02bd e407 | | Load 0x2,0x7
02be e006 | | Load 0x0,0x6
02bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c0 e005 | | Load 0x0,0x5
02c1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02c2 4801 |H | Short_Literal 0x1
02c3 e006 | | Load 0x0,0x6
02c4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02c5 e006 | | Load 0x0,0x6
02c6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02c7 c408 | | Store 0x2,0x8
02c8 00d2 | | Pop_Control Pop_Count_2
02c9 e407 | | Load 0x2,0x7 ; Debug Table 0xa.0x18 = 0x2c9,0xc
02ca 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02cb a402 | | Store_Unchecked 0x2,0x2
02cc e408 | | Load 0x2,0x8 ; Debug Table 0xa.0x19 = 0x2cc,0xd
02cd 0f01 | | Execute_Immediate Equal,0x1
02ce 6815 |h | Jump_Zero 0x2e4
02cf 4802 |H | Short_Literal 0x2 ; Debug Table 0xa.0x1a = 0x2cf,0xe
02d0 a409 | | Store_Unchecked 0x2,0x9
02d1 7812 |x | Jump 0x2e4
02d2 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x1b = 0x2d2,0xf
02d3 4801 |H | Short_Literal 0x1
02d4 e007 | | Load 0x0,0x7
02d5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02d6 e002 | | Load 0x0,0x2
02d7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02d8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02d9 0092 05b0 | | Action Push_String_Extended,0x5b0 ; "Other_Part"
02db e5ff | | Load 0x2,-0x1
02dc e00c | | Load 0x0,0xc
02dd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02de a402 | | Store_Unchecked 0x2,0x2
02df 0007 | | Action Break_Optional ; Debug Table 0xa.0x1c = 0x2df,0x10
02e0 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x1d = 0x2e0,0x401
02e1 021d | | Execute Heap_Access,Is_Null
02e2 6801 |h | Jump_Zero 0x2e4 ; Debug Table 0xa.0x1e = 0x2e2,0x10
02e3 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0xa.0x1f = 0x2e3,0x11
02e4 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x20 = 0x2e4,0x12
02e5 e00c | | Load 0x0,0xc
02e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e7 a404 | | Store_Unchecked 0x2,0x4
02e8 0007 | | Action Break_Optional ; Debug Table 0xa.0x21 = 0x2e8,0x13
02e9 e404 | | Load 0x2,0x4 ; Debug Table 0xa.0x22 = 0x2e9,0x801
02ea 021d | | Execute Heap_Access,Is_Null
02eb 685e |h^ | Jump_Zero 0x34a ; Debug Table 0xa.0x23 = 0x2eb,0x13
02ec e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x24 = 0x2ec,0x14
02ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ee e002 | | Load 0x0,0x2
02ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f0 612b |a+ | Indirect_Literal Discrete,0x41c,{0x00000000, 0x00004000}
02f1 e012 | | Load 0x0,0x12
02f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f3 e402 | | Load 0x2,0x2
02f4 e002 | | Load 0x0,0x2
02f5 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
02f6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02f7 c404 | | Store 0x2,0x4
02f8 c406 | | Store 0x2,0x6
02f9 e406 | | Load 0x2,0x6 ; Debug Table 0xa.0x25 = 0x2f9,0x15
02fa 684f |hO | Jump_Zero 0x34a
02fb e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x26 = 0x2fb,0x16
02fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02fd e40a | | Load 0x2,0xa
02fe 0120 | | Execute Any,Is_Value
02ff 6804 |h | Jump_Zero 0x304
0300 e002 | | Load 0x0,0x2
0301 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0302 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0303 7801 |x | Jump 0x305
0304 e40a | | Load 0x2,0xa
0305 e402 | | Load 0x2,0x2
0306 e002 | | Load 0x0,0x2
0307 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0308 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0309 c40a | | Store 0x2,0xa
030a c406 | | Store 0x2,0x6
030b e406 | | Load 0x2,0x6 ; Debug Table 0xa.0x27 = 0x30b,0x17
030c 0092 05b1 | | Action Push_String_Extended,0x5b1 ; "Ada.Get_Unit"
030e e003 | | Load 0x0,0x3
030f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0310 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x28 = 0x310,0x18
0311 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0312 e40b | | Load 0x2,0xb
0313 0120 | | Execute Any,Is_Value
0314 6804 |h | Jump_Zero 0x319
0315 e002 | | Load 0x0,0x2
0316 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0317 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0318 7801 |x | Jump 0x31a
0319 e40b | | Load 0x2,0xb
031a 6101 |a | Indirect_Literal Discrete,0x41c,{0x00000000, 0x00004000}
031b e012 | | Load 0x0,0x12
031c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
031d e40a | | Load 0x2,0xa
031e e002 | | Load 0x0,0x2
031f 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0320 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0321 c40b | | Store 0x2,0xb
0322 c406 | | Store 0x2,0x6
0323 e406 | | Load 0x2,0x6 ; Debug Table 0xa.0x29 = 0x323,0x19
0324 6805 |h | Jump_Zero 0x32a
0325 0092 05b2 | | Action Push_String_Extended,0x5b2 ; "Other part failed - not found"
; Debug Table 0xa.0x2a = 0x325,0x1a
0327 e00a | | Load 0x0,0xa
0328 180d | | Execute Package,Field_Execute,Field_Number 0xd
0329 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0xa.0x2b = 0x329,0x1b
032a e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x2c = 0x32a,0x1c
032b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032c 00db | | Load_Top At_Offset_3
032d 0120 | | Execute Any,Is_Value
032e 6804 |h | Jump_Zero 0x333
032f e002 | | Load 0x0,0x2
0330 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0331 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0332 7801 |x | Jump 0x334
0333 00db | | Load_Top At_Offset_3
0334 e002 | | Load 0x0,0x2
0335 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0336 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0337 60e4 |` | Indirect_Literal Discrete,0x41c,{0x00000000, 0x00004000}
0338 4801 |H | Short_Literal 0x1
0339 4800 |H | Short_Literal 0x0
033a 4800 |H | Short_Literal 0x0
033b e012 | | Load 0x0,0x12
033c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033d 4800 |H | Short_Literal 0x0
033e e40b | | Load 0x2,0xb
033f e002 | | Load 0x0,0x2
0340 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0341 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0342 c404 | | Store 0x2,0x4
0343 c40c | | Store 0x2,0xc
0344 c406 | | Store 0x2,0x6
0345 e406 | | Load 0x2,0x6 ; Debug Table 0xa.0x2d = 0x345,0x1d
0346 0092 05af | | Action Push_String_Extended,0x5af ; "Ada.Open"
0348 e003 | | Load 0x0,0x3
0349 180f | | Execute Package,Field_Execute,Field_Number 0xf
034a e409 | | Load 0x2,0x9 ; Debug Table 0xa.0x2e = 0x34a,0x1e
034b 4800 |H | Short_Literal 0x0
034c e5fe | | Load 0x2,-0x2
034d e404 | | Load 0x2,0x4
034e e003 | | Load 0x0,0x3
034f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0350 4503 |E | Exit_Subprogram 0x3
0351 TRAP_0240:
0351 0007 | | Action Break_Optional
0352 e00d | | Load 0x0,0xd ; Debug Table 0xa.0x2f = 0x352,0x1f
0353 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0354 0092 05b3 | | Action Push_String_Extended,0x5b3 ; "*** Exception in Ada.Other_Part: "
; Debug Table 0xa.0x30 = 0x354,0x20
0356 e00e | | Load 0x0,0xe
0357 180d | | Execute Package,Field_Execute,Field_Number 0xd
0358 01cc | | Execute Vector,Catenate
0359 e00d | | Load 0x0,0xd
035a 180f | | Execute Package,Field_Execute,Field_Number 0xf
035b 4503 |E | Exit_Subprogram 0x3
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363 | c | .CONST 0x0363 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0001 | | .CONST 0x0001 ; Number of locals
0363 BODY_0360:
0363 INIT_0360:
0363 0092 05b4 | | Action Push_String_Extended,0x5b4 ; "Ada.Replace_Id"
; Debug Table 0xb = .DEBUG 0x0363,0x0a1c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0040
; Debug Table 0xb.0x0 = 0x363,0x1
0365 e001 | | Load 0x0,0x1
0366 180d | | Execute Package,Field_Execute,Field_Number 0xd
0367 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x1 = 0x367,0x2
0368 00db | | Load_Top At_Offset_3
0369 8013 | | Call 0x0,0x13
036a 4503 |E | Exit_Subprogram 0x3
036b 0000 0000 | | .BLANK 0000[0x5]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373 | s | .CONST 0x0373 ; Address of begin
0371 037e | ~ | .CONST 0x037e ; Address of exception handler
0372 0001 | | .CONST 0x0001 ; Number of locals
0373 BODY_0370:
0373 INIT_0370:
0373 0092 05b5 | | Action Push_String_Extended,0x5b5 ; "Ada.Show_Usage"
; Debug Table 0xc = .DEBUG 0x0373,0x0a22,0x0001,0x0000,0x005a,0x84f5,0x0000,0x004e
; Debug Table 0xc.0x0 = 0x373,0x1
0375 e001 | | Load 0x0,0x1
0376 180d | | Execute Package,Field_Execute,Field_Number 0xd
0377 e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x1 = 0x377,0x2
0378 e5fd | | Load 0x2,-0x3
0379 e5fe | | Load 0x2,-0x2
037a e5ff | | Load 0x2,-0x1
037b e014 | | Load 0x0,0x14
037c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
037d 4505 |E | Exit_Subprogram 0x5
037e TRAP_0370:
037e 0007 | | Action Break_Optional
037f e00d | | Load 0x0,0xd ; Debug Table 0xc.0x2 = 0x37f,0x3
0380 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0381 0092 05b6 | | Action Push_String_Extended,0x5b6 ; "*** Exception in Ada.Show_Usage: "
; Debug Table 0xc.0x3 = 0x381,0x4
0383 e00e | | Load 0x0,0xe
0384 180d | | Execute Package,Field_Execute,Field_Number 0xd
0385 01cc | | Execute Vector,Catenate
0386 e00d | | Load 0x0,0xd
0387 180f | | Execute Package,Field_Execute,Field_Number 0xf
0388 4505 |E | Exit_Subprogram 0x5
0389 0000 0000 | | .BLANK 0000[0x7]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 039d | | .CONST 0x039d ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 0092 05b7 | | Action Push_String_Extended,0x5b7 ; "Ada.Show_Unused"
; Debug Table 0xd = .DEBUG 0x0393,0x0a2c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0066
; Debug Table 0xd.0x0 = 0x393,0x1
0395 e001 | | Load 0x0,0x1
0396 180d | | Execute Package,Field_Execute,Field_Number 0xd
0397 e014 | | Load 0x0,0x14 ; Debug Table 0xd.0x1 = 0x397,0x2
0398 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0399 e5fe | | Load 0x2,-0x2
039a e5ff | | Load 0x2,-0x1
039b 8015 | | Call 0x0,0x15
039c 4503 |E | Exit_Subprogram 0x3
039d TRAP_0390:
039d 0007 | | Action Break_Optional
039e e00d | | Load 0x0,0xd ; Debug Table 0xd.0x2 = 0x39e,0x3
039f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03a0 0092 05b8 | | Action Push_String_Extended,0x5b8 ; "*** Exception in Ada.Show_Unused: "
; Debug Table 0xd.0x3 = 0x3a0,0x4
03a2 e00e | | Load 0x0,0xe
03a3 180d | | Execute Package,Field_Execute,Field_Number 0xd
03a4 01cc | | Execute Vector,Catenate
03a5 e00d | | Load 0x0,0xd
03a6 180f | | Execute Package,Field_Execute,Field_Number 0xf
03a7 4503 |E | Exit_Subprogram 0x3
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 03b2 | | .CONST 0x03b2 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 0092 05b9 | | Action Push_String_Extended,0x5b9 ; "Ada.Create_Body"
; Debug Table 0xe = .DEBUG 0x03ab,0x0a36,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0074
; Debug Table 0xe.0x0 = 0x3ab,0x1
03ad e001 | | Load 0x0,0x1
03ae 180d | | Execute Package,Field_Execute,Field_Number 0xd
03af 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x1 = 0x3af,0x2
03b0 8016 | | Call 0x0,0x16
03b1 4502 |E | Exit_Subprogram 0x2
03b2 TRAP_03a8:
03b2 0007 | | Action Break_Optional
03b3 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x2 = 0x3b3,0x3
03b4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03b5 0092 05ba | | Action Push_String_Extended,0x5ba ; "*** Exception in Ada.Create_Body: "
; Debug Table 0xe.0x3 = 0x3b5,0x4
03b7 e00e | | Load 0x0,0xe
03b8 180d | | Execute Package,Field_Execute,Field_Number 0xd
03b9 01cc | | Execute Vector,Catenate
03ba e00d | | Load 0x0,0xd
03bb 180f | | Execute Package,Field_Execute,Field_Number 0xf
03bc 4502 |E | Exit_Subprogram 0x2
03bd 0000 0000 | | .XXX[0x3]
03bf 0000 | |
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03ca | | .CONST 0x03ca ; Address of begin
03c1 040e | | .CONST 0x040e ; Address of exception handler
03c2 0003 | | .CONST 0x0003 ; Number of locals
03c3 INIT_03c0:
03c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf = .DEBUG 0x03c3,0x0a40,0x0001,0x0000,0x005a,0x84f5,0x0000,0x007d
; Debug Table 0xf.0x0 = 0x3c3,0xffff
03c4 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x1 = 0x3c4,0xfffe
03c5 e004 | | Load 0x0,0x4
03c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03c7 e004 | | Load 0x0,0x4
03c8 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03c9 03f1 | | Declare_Variable Discrete,With_Value
03ca BODY_03c0:
03ca 0092 05bb | | Action Push_String_Extended,0x5bb ; "Ada.Create_Private"
; Debug Table 0xf.0x2 = 0x3ca,0x1
03cc e001 | | Load 0x0,0x1
03cd 180d | | Execute Package,Field_Execute,Field_Number 0xd
03ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x3 = 0x3ce,0x2
03cf 4604 |F | Jump_Case 0x4
03d0 780d |x | Jump 0x3de ; case 0x0
03d1 780c |x | Jump 0x3de ; case 0x1
03d2 780b |x | Jump 0x3de ; case 0x2
03d3 7801 |x | Jump 0x3d5 ; case 0x3
03d4 7809 |x | Jump 0x3de ; case 0x4
03d5 e005 | | Load 0x0,0x5 ; Debug Table 0xf.0x4 = 0x3d5,0x3
03d6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03d7 4801 |H | Short_Literal 0x1
03d8 e006 | | Load 0x0,0x6
03d9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03da e006 | | Load 0x0,0x6
03db 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
03dc 0032 | 2 | Store_Top Heap_Access,At_Offset_2
03dd 7812 |x | Jump 0x3f0
03de 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x5 = 0x3de,0x4
03df 4801 |H | Short_Literal 0x1
03e0 e007 | | Load 0x0,0x7
03e1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03e2 e002 | | Load 0x0,0x2
03e3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03e4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03e5 0092 05bc | | Action Push_String_Extended,0x5bc ; "Ada.Create_Private_Part"
03e7 e5ff | | Load 0x2,-0x1
03e8 e00c | | Load 0x0,0xc
03e9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03ea 0032 | 2 | Store_Top Heap_Access,At_Offset_2
03eb 0007 | | Action Break_Optional ; Debug Table 0xf.0x6 = 0x3eb,0x5
03ec 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x7 = 0x3ec,0x401
03ed 021d | | Execute Heap_Access,Is_Null
03ee 6801 |h | Jump_Zero 0x3f0 ; Debug Table 0xf.0x8 = 0x3ee,0x5
03ef 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0xf.0x9 = 0x3ef,0x6
03f0 0007 | | Action Break_Optional ; Debug Table 0xf.0xa = 0x3f0,0x7
03f1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0xb = 0x3f1,0x801
03f2 021d | | Execute Heap_Access,Is_Null
03f3 6805 |h | Jump_Zero 0x3f9 ; Debug Table 0xf.0xc = 0x3f3,0x7
03f4 0092 05bd | | Action Push_String_Extended,0x5bd ; "Private_Part failed - no visible part selected"
; Debug Table 0xf.0xd = 0x3f4,0x8
03f6 e00a | | Load 0x0,0xa
03f7 180d | | Execute Package,Field_Execute,Field_Number 0xd
03f8 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0xf.0xe = 0x3f8,0x9
03f9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0xf = 0x3f9,0xa
03fa e002 | | Load 0x0,0x2
03fb 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
03fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03fd 700c |p | Jump_Nonzero 0x40a
03fe 0092 05be | | Action Push_String_Extended,0x5be ; "Private_Part failed - "
; Debug Table 0xf.0x10 = 0x3fe,0xb
0400 00da | | Load_Top At_Offset_2
0401 e017 | | Load 0x0,0x17
0402 180f | | Execute Package,Field_Execute,Field_Number 0xf
0403 01cc | | Execute Vector,Catenate
0404 0092 05bf | | Action Push_String_Extended,0x5bf ; " must be source"
0406 01cc | | Execute Vector,Catenate
0407 e00a | | Load 0x0,0xa
0408 180d | | Execute Package,Field_Execute,Field_Number 0xd
0409 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0xf.0x11 = 0x409,0xc
040a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x12 = 0x40a,0xd
040b 8018 | | Call 0x0,0x18
040c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
040d 4502 |E | Exit_Subprogram 0x2
040e TRAP_03c0:
040e 0007 | | Action Break_Optional
040f e00d | | Load 0x0,0xd ; Debug Table 0xf.0x13 = 0x40f,0xe
0410 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0411 0092 05c0 | | Action Push_String_Extended,0x5c0 ; "*** Exception in Ada.Create_Private: "
; Debug Table 0xf.0x14 = 0x411,0xf
0413 e00e | | Load 0x0,0xe
0414 180d | | Execute Package,Field_Execute,Field_Number 0xd
0415 01cc | | Execute Vector,Catenate
0416 e00d | | Load 0x0,0xd
0417 180f | | Execute Package,Field_Execute,Field_Number 0xf
0418 4502 |E | Exit_Subprogram 0x2
0419 0000 0000 | | .XXX[0x3]
041b 0000 | |
041c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0420 0000 0000 | | .LITERAL {0x00000000, 0x5a851501}
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0430 | 0 | .CONST 0x0430 ; Address of begin
0429 0449 | I | .CONST 0x0449 ; Address of exception handler
042a 0002 | | .CONST 0x0002 ; Number of locals
042b INIT_0428:
042b e006 | | Load 0x0,0x6 ; Debug Table 0x10 = .DEBUG 0x042b,0x0a6c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0086
; Debug Table 0x10.0x0 = 0x42b,0xffff
042c 1b18 | | Execute Package,Field_Read,Field_Number 0x18
042d 0322 | " | Declare_Variable Record
042e 00d8 | | Load_Top At_Offset_0
042f 1c00 | | Execute_Immediate Run_Utility,0x0
0430 BODY_0428:
0430 0092 05c1 | | Action Push_String_Extended,0x5c1 ; "Ada.Get_Errors"
; Debug Table 0x10.0x1 = 0x430,0x1
0432 e001 | | Load 0x0,0x1
0433 180d | | Execute Package,Field_Execute,Field_Number 0xd
0434 e005 | | Load 0x0,0x5 ; Debug Table 0x10.0x2 = 0x434,0x2
0435 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0436 e006 | | Load 0x0,0x6
0437 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0438 e006 | | Load 0x0,0x6
0439 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
043a 00d9 | | Load_Top At_Offset_1
043b 017d | } | Execute Record,Structure_Write
043c e007 | | Load 0x0,0x7 ; Debug Table 0x10.0x3 = 0x43c,0x3
043d 180e | | Execute Package,Field_Execute,Field_Number 0xe
043e 00d9 | | Load_Top At_Offset_1
043f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0440 e004 | | Load 0x0,0x4
0441 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0442 e007 | | Load 0x0,0x7 ; Debug Table 0x10.0x4 = 0x442,0x4
0443 180e | | Execute Package,Field_Execute,Field_Number 0xe
0444 00d9 | | Load_Top At_Offset_1
0445 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0446 e004 | | Load 0x0,0x4
0447 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0448 4501 |E | Exit_Subprogram 0x1
0449 TRAP_0428:
0449 0007 | | Action Break_Optional
044a e00d | | Load 0x0,0xd ; Debug Table 0x10.0x5 = 0x44a,0x5
044b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
044c 0092 05c0 | | Action Push_String_Extended,0x5c0 ; "*** Exception in Ada.Create_Private: "
; Debug Table 0x10.0x6 = 0x44c,0x6
044e e00e | | Load 0x0,0xe
044f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0450 01cc | | Execute Vector,Catenate
0451 e00d | | Load 0x0,0xd
0452 180f | | Execute Package,Field_Execute,Field_Number 0xf
0453 4501 |E | Exit_Subprogram 0x1
0454 0000 0000 | | .BLANK 0000[0x4]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b | [ | .CONST 0x045b ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0001 | | .CONST 0x0001 ; Number of locals
045b BODY_0458:
045b INIT_0458:
045b 0092 05c2 | | Action Push_String_Extended,0x5c2 ; "Insert_Blank_Line is not yet implemented"
; Debug Table 0x11 = .DEBUG 0x045b,0x0a7c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x008a
; Debug Table 0x11.0x0 = 0x45b,0x1
045d e00a | | Load 0x0,0xa
045e 180d | | Execute Package,Field_Execute,Field_Number 0xd
045f 4502 |E | Exit_Subprogram 0x2
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463 | c | .CONST 0x0463 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0001 | | .CONST 0x0001 ; Number of locals
0463 BODY_0460:
0463 INIT_0460:
0463 0092 05c3 | | Action Push_String_Extended,0x5c3 ; "Delete_Blank_Line is not yet implemented"
; Debug Table 0x12 = .DEBUG 0x0463,0x0a80,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0093
; Debug Table 0x12.0x0 = 0x463,0x1
0465 e00a | | Load 0x0,0xa
0466 180d | | Execute Package,Field_Execute,Field_Number 0xd
0467 4502 |E | Exit_Subprogram 0x2
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b | k | .CONST 0x046b ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0001 | | .CONST 0x0001 ; Number of locals
046b BODY_0468:
046b INIT_0468:
046b e5fc | | Load 0x2,-0x4 ; Debug Table 0x13 = .DEBUG 0x046b,0x0a84,0x0001,0x0000,0x005a,0x84f5,0x0000,0x009c
; Debug Table 0x13.0x0 = 0x46b,0x1
046c e5fd | | Load 0x2,-0x3
046d e5fe | | Load 0x2,-0x2
046e e5ff | | Load 0x2,-0x1
046f 8019 | | Call 0x0,0x19
0470 4505 |E | Exit_Subprogram 0x5
0471 0000 0000 | | .BLANK 0000[0x7]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b | { | .CONST 0x047b ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0001 | | .CONST 0x0001 ; Number of locals
047b BODY_0478:
047b INIT_0478:
047b 4801 |H | Short_Literal 0x1 ; Debug Table 0x14 = .DEBUG 0x047b,0x0a88,0x0002,0x0000,0x005a,0x8aa5,0x0000,0x0078
; Debug Table 0x14.0x0 = 0x47b,0x1
047c 0092 05c4 | | Action Push_String_Extended,0x5c4 ; "ADA"
047e e008 | | Load 0x0,0x8
047f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0480 e01a | | Load 0x0,0x1a
0481 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0482 00ca | | Action Exit_Nullary_Function
0483 0000 0000 | | .BLANK 0000[0x5]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 0496 | | .CONST 0x0496 ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0005 | | .CONST 0x0005 ; Number of locals
048b INIT_0488:
048b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15 = .DEBUG 0x048b,0x0a8c,0x0002,0x0000,0x005a,0x8aa5,0x0000,0x0092
; Debug Table 0x15.0x0 = 0x48b,0xffff
048c e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x1 = 0x48c,0xfffe
048d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
048e 02c7 | | Declare_Variable Any
048f 00d8 | | Load_Top At_Offset_0
0490 1c00 | | Execute_Immediate Run_Utility,0x0
0491 e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x2 = 0x491,0xfffd
0492 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0493 e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x3 = 0x493,0xfffc
0494 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0495 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0496 BODY_0488:
0496 0007 | | Action Break_Optional ; Debug Table 0x15.0x4 = 0x496,0x1
0497 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x5 = 0x497,0x401
0498 a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x15.0x6 = 0x498,0x1
0499 e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x7 = 0x499,0x2
049a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
049b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
049c e002 | | Load 0x0,0x2
049d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
049e e007 | | Load 0x0,0x7
049f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04a0 4800 |H | Short_Literal 0x0
04a1 e008 | | Load 0x0,0x8
04a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
04a3 c402 | | Store 0x2,0x2
04a4 0059 | Y | Store_Top Discrete,At_Offset_1
04a5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x8 = 0x4a5,0x3
04a6 460e |F | Jump_Case 0xe
04a7 780e |x | Jump 0x4b6 ; case 0x0
04a8 780f |x | Jump 0x4b8 ; case 0x1
04a9 780e |x | Jump 0x4b8 ; case 0x2
04aa 780d |x | Jump 0x4b8 ; case 0x3
04ab 780c |x | Jump 0x4b8 ; case 0x4
04ac 780b |x | Jump 0x4b8 ; case 0x5
04ad 780a |x | Jump 0x4b8 ; case 0x6
04ae 7809 |x | Jump 0x4b8 ; case 0x7
04af 7808 |x | Jump 0x4b8 ; case 0x8
04b0 780a |x | Jump 0x4bb ; case 0x9
04b1 7806 |x | Jump 0x4b8 ; case 0xa
04b2 7808 |x | Jump 0x4bb ; case 0xb
04b3 7804 |x | Jump 0x4b8 ; case 0xc
04b4 7803 |x | Jump 0x4b8 ; case 0xd
04b5 7802 |x | Jump 0x4b8 ; case 0xe
04b6 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0x9 = 0x4b6,0x4
04b7 00ca | | Action Exit_Nullary_Function
04b8 0007 | | Action Break_Optional ; Debug Table 0x15.0xa = 0x4b8,0x6
04b9 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0xb = 0x4b9,0x801
04ba 00ca | | Action Exit_Nullary_Function ; Debug Table 0x15.0xc = 0x4ba,0x6
04bb e002 | | Load 0x0,0x2 ; Debug Table 0x15.0xd = 0x4bb,0x7
04bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04be 00db | | Load_Top At_Offset_3
04bf 0120 | | Execute Any,Is_Value
04c0 6803 |h | Jump_Zero 0x4c4
04c1 e002 | | Load 0x0,0x2
04c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04c3 7801 |x | Jump 0x4c5
04c4 00db | | Load_Top At_Offset_3
04c5 e007 | | Load 0x0,0x7
04c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c7 4800 |H | Short_Literal 0x0
04c8 e002 | | Load 0x0,0x2
04c9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04ca 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04cb e008 | | Load 0x0,0x8
04cc 180f | | Execute Package,Field_Execute,Field_Number 0xf
04cd c403 | | Store 0x2,0x3
04ce 0059 | Y | Store_Top Discrete,At_Offset_1
04cf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xe = 0x4cf,0x8
04d0 0b00 | | Execute_Immediate Case_Compare,0x0
04d1 7003 |p | Jump_Nonzero 0x4d5
04d2 0007 | | Action Break_Optional ; Debug Table 0x15.0xf = 0x4d2,0xb
04d3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x10 = 0x4d3,0xc01
04d4 00ca | | Action Exit_Nullary_Function ; Debug Table 0x15.0x11 = 0x4d4,0xb
04d5 e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x12 = 0x4d5,0x9
04d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d7 e002 | | Load 0x0,0x2
04d8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04d9 6742 |gB | Indirect_Literal Discrete,0x41c,{0x00000000, 0x00004000}
04da e012 | | Load 0x0,0x12
04db 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04dc 4800 |H | Short_Literal 0x0
04dd e403 | | Load 0x2,0x3
04de e002 | | Load 0x0,0x2
04df 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
04e0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04e1 c402 | | Store 0x2,0x2
04e2 005b | [ | Store_Top Discrete,At_Offset_3
04e3 e402 | | Load 0x2,0x2 ; Debug Table 0x15.0x13 = 0x4e3,0xa
04e4 00ca | | Action Exit_Nullary_Function
04e5 0000 0000 | | .XXX[0x3]
04e7 0000 | |
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04f3 | | .CONST 0x04f3 ; Address of begin
04e9 0570 | p | .CONST 0x0570 ; Address of exception handler
04ea 0005 | | .CONST 0x0005 ; Number of locals
04eb INIT_04e8:
04eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16 = .DEBUG 0x04eb,0x0ab6,0x0001,0x0000,0x005a,0x8aa5,0x0000,0x0119
; Debug Table 0x16.0x0 = 0x4eb,0xffff
04ec 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16.0x1 = 0x4ec,0xfffe
04ed 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x16.0x2 = 0x4ed,0xfffd
04ee e003 | | Load 0x0,0x3 ; Debug Table 0x16.0x3 = 0x4ee,0xfffc
04ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f0 0322 | " | Declare_Variable Record
04f1 00d8 | | Load_Top At_Offset_0
04f2 1c00 | | Execute_Immediate Run_Utility,0x0
04f3 BODY_04e8:
04f3 821f | | Call 0x1,0x1f ; Debug Table 0x16.0x4 = 0x4f3,0x1
04f4 6823 |h# | Jump_Zero 0x518
04f5 0007 | | Action Break_Optional ; Debug Table 0x16.0x5 = 0x4f5,0x2
04f6 e006 | | Load 0x0,0x6 ; Debug Table 0x16.0x6 = 0x4f6,0xfbff
04f7 1b20 | | Execute Package,Field_Read,Field_Number 0x20
04f8 0322 | " | Declare_Variable Record
04f9 e006 | | Load 0x0,0x6 ; Debug Table 0x16.0x7 = 0x4f9,0xfbfe
04fa 1b18 | | Execute Package,Field_Read,Field_Number 0x18
04fb 0322 | " | Declare_Variable Record
04fc 00d8 | | Load_Top At_Offset_0
04fd 1c00 | | Execute_Immediate Run_Utility,0x0
04fe e006 | | Load 0x0,0x6 ; Debug Table 0x16.0x8 = 0x4fe,0xfbfd
04ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0500 00db | | Load_Top At_Offset_3 ; Debug Table 0x16.0x9 = 0x500,0x401
0501 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0502 00da | | Load_Top At_Offset_2
0503 e406 | | Load 0x2,0x6
0504 e006 | | Load 0x0,0x6
0505 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0506 e005 | | Load 0x0,0x5
0507 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0508 4801 |H | Short_Literal 0x1
0509 e006 | | Load 0x0,0x6
050a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
050b e006 | | Load 0x0,0x6
050c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
050d c408 | | Store 0x2,0x8
050e 00d3 | | Pop_Control Pop_Count_3
050f 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0xa = 0x50f,0x402
0510 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0511 e405 | | Load 0x2,0x5
0512 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0513 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0xb = 0x513,0x403
0514 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0515 c404 | | Store 0x2,0x4
0516 00d3 | | Pop_Control Pop_Count_3
0517 784a |xJ | Jump 0x562
0518 0007 | | Action Break_Optional ; Debug Table 0x16.0xc = 0x518,0x3
0519 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16.0xd = 0x519,0xf7ff
051a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16.0xe = 0x51a,0xf7fe
051b e006 | | Load 0x0,0x6 ; Debug Table 0x16.0xf = 0x51b,0x801
051c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
051d 00db | | Load_Top At_Offset_3
051e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
051f 8220 | | Call 0x1,0x20 ; Debug Table 0x16.0x10 = 0x51f,0x802
0520 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0521 0007 | | Action Break_Optional ; Debug Table 0x16.0x11 = 0x521,0x803
0522 e406 | | Load 0x2,0x6 ; Debug Table 0x16.0x12 = 0x522,0xc01
0523 0007 | | Action Break_Optional
0524 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x16.0x13 = 0x524,0xc02
0525 0007 | | Action Break_Optional ; Debug Table 0x16.0x14 = 0x525,0xc03
0526 0007 | | Action Break_Optional ; Debug Table 0x16.0x15 = 0x526,0xc04
0527 0b00 | | Execute_Immediate Case_Compare,0x0 ; Debug Table 0x16.0x16 = 0x527,0x803
0528 7024 |p$ | Jump_Nonzero 0x54d
0529 0b39 | 9 | Execute_Immediate Case_Compare,0x39
052a 7027 |p' | Jump_Nonzero 0x552
052b 0b30 | 0 | Execute_Immediate Case_Compare,0x30
052c 7025 |p% | Jump_Nonzero 0x552
052d 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x17 = 0x52d,0x809
052e e009 | | Load 0x0,0x9
052f 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
0530 7004 |p | Jump_Nonzero 0x535
0531 00da | | Load_Top At_Offset_2
0532 e009 | | Load 0x0,0x9
0533 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0534 6826 |h& | Jump_Zero 0x55b
0535 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x18 = 0x535,0x80a
0536 00eb | | Load_Encached Diana_Cache
0537 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0538 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0539 0007 | | Action Break_Optional ; Debug Table 0x16.0x19 = 0x539,0x80b
053a e407 | | Load 0x2,0x7 ; Debug Table 0x16.0x1a = 0x53a,0x1001
053b 0007 | | Action Break_Optional
053c 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x16.0x1b = 0x53c,0x1002
053d 0007 | | Action Break_Optional ; Debug Table 0x16.0x1c = 0x53d,0x1003
053e 0007 | | Action Break_Optional ; Debug Table 0x16.0x1d = 0x53e,0x1004
053f 0ba8 | | Execute_Immediate Case_Compare,0xa8 ; Debug Table 0x16.0x1e = 0x53f,0x80b
0540 7003 |p | Jump_Nonzero 0x544
0541 0b49 | I | Execute_Immediate Case_Compare,0x49
0542 7004 |p | Jump_Nonzero 0x547
0543 7807 |x | Jump 0x54b ; Debug Table 0x16.0x1f = 0x543,0x80e
0544 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x20 = 0x544,0x80c
0545 a406 | | Store_Unchecked 0x2,0x6
0546 7804 |x | Jump 0x54b
0547 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x21 = 0x547,0x80d
0548 00eb | | Load_Encached Diana_Cache
0549 18ec | | Execute Package,Field_Execute,Field_Number 0xec
054a a406 | | Store_Unchecked 0x2,0x6
054b 00d1 | | Pop_Control Pop_Count_1
054c 780e |x | Jump 0x55b
054d 0092 05a0 | | Action Push_String_Extended,0x5a0 ; "Command failed - no selection"
; Debug Table 0x16.0x22 = 0x54d,0x804
054f e00a | | Load 0x0,0xa
0550 180d | | Execute Package,Field_Execute,Field_Number 0xd
0551 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x16.0x23 = 0x551,0x805
0552 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x24 = 0x552,0x806
0553 e00b | | Load 0x0,0xb
0554 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0555 6805 |h | Jump_Zero 0x55b
0556 0092 05a1 | | Action Push_String_Extended,0x5a1 ; "Command failed - not an ada object"
; Debug Table 0x16.0x25 = 0x556,0x807
0558 e00a | | Load 0x0,0xa
0559 180d | | Execute Package,Field_Execute,Field_Number 0xd
055a 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x16.0x26 = 0x55a,0x808
055b 00d1 | | Pop_Control Pop_Count_1
055c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x27 = 0x55c,0x80f
055d 00db | | Load_Top At_Offset_3
055e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
055f 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x28 = 0x55f,0x810
0560 a404 | | Store_Unchecked 0x2,0x4
0561 00d2 | | Pop_Control Pop_Count_2
0562 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16.0x29 = 0x562,0x4
0563 00ec | | Load_Encached Diana_Tree_Cache
0564 00db | | Load_Top At_Offset_3
0565 e5ff | | Load 0x2,-0x1
0566 e405 | | Load 0x2,0x5
0567 e003 | | Load 0x0,0x3
0568 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0569 c403 | | Store 0x2,0x3
056a c402 | | Store 0x2,0x2
056b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x2a = 0x56b,0x5
056c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
056d e006 | | Load 0x0,0x6
056e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
056f 4502 |E | Exit_Subprogram 0x2
0570 TRAP_04e8:
0570 0007 | | Action Break_Optional
0571 e00d | | Load 0x0,0xd ; Debug Table 0x16.0x2b = 0x571,0x6
0572 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0573 0092 05c5 | | Action Push_String_Extended,0x5c5 ; "*** Exception in Ada.Change_State: "
; Debug Table 0x16.0x2c = 0x573,0x7
0575 e00e | | Load 0x0,0xe
0576 180d | | Execute Package,Field_Execute,Field_Number 0xd
0577 01cc | | Execute Vector,Catenate
0578 e00d | | Load 0x0,0xd
0579 180f | | Execute Package,Field_Execute,Field_Number 0xf
057a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x2d = 0x57a,0x8
057b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
057c e006 | | Load 0x0,0x6
057d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
057e 4502 |E | Exit_Subprogram 0x2
057f 0000 | | .XXX[0x1]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583 | | .CONST 0x0583 ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0001 | | .CONST 0x0001 ; Number of locals
0583 BODY_0580:
0583 INIT_0580:
0583 00da | | Load_Top At_Offset_2 ; Debug Table 0x17 = .DEBUG 0x0583,0x0b14,0x0002,0x0000,0x005a,0x8aa5,0x0000,0x0244
; Debug Table 0x17.0x0 = 0x583,0x1
0584 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0585 7002 |p | Jump_Nonzero 0x588
0586 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x1 = 0x586,0x2
0587 4401 |D | Exit_Subprogram With_Result,0x1
0588 00da | | Load_Top At_Offset_2 ; Debug Table 0x17.0x2 = 0x588,0x3
0589 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
058a 00db | | Load_Top At_Offset_3
058b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
058c 027e | ~ | Execute Discrete,Not_Equal
058d 7006 |p | Jump_Nonzero 0x594
058e 00da | | Load_Top At_Offset_2
058f 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0590 00db | | Load_Top At_Offset_3
0591 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0592 027e | ~ | Execute Discrete,Not_Equal
0593 6802 |h | Jump_Zero 0x596
0594 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x3 = 0x594,0x4
0595 4401 |D | Exit_Subprogram With_Result,0x1
0596 00da | | Load_Top At_Offset_2 ; Debug Table 0x17.0x4 = 0x596,0x5
0597 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0598 e005 | | Load 0x0,0x5
0599 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
059a 0f01 | | Execute_Immediate Equal,0x1
059b 4401 |D | Exit_Subprogram With_Result,0x1
059c ; --------------------------------------------------------------------------------------
059c ; STRING TABLE
059c ; --------------------------------------------------------------------------------------
059c 0056 | V | .STRTAB 0x0056->0x05c7 ; "Ada.Code_Unit"
059d 0061 | a | .STRTAB 0x0061->0x05cd ; "Ada.Install_Unit"
059e 006f | o | .STRTAB 0x006f->0x05d5 ; "Ada.Source_Unit"
059f 007c | | | .STRTAB 0x007c->0x05dd ; "Ada.Withdraw"
05a0 0086 | | .STRTAB 0x0086->0x05e3 ; "Command failed - no selection"
; "Command failed - no selection"
05a1 00a1 | | .STRTAB 0x00a1->0x05f1 ; "Command failed - not an ada object"
; "Command failed - not an ada object"
05a2 00c1 | | .STRTAB 0x00c1->0x0602 ; "Withdraw"
05a3 00c7 | | .STRTAB 0x00c7->0x0606 ; "*** Exception in Ada.Withdraw: "
05a4 00e4 | | .STRTAB 0x00e4->0x0616 ; "Ada.Diana_Edit"
; "Ada.Diana_Edit"
05a5 00f0 | | .STRTAB 0x00f0->0x061d ; "*** Exception in Ada.Diana_Edit: "
05a6 010f | | .STRTAB 0x010f->0x062d ; "Ada.Install_Stub"
05a7 011d | | .STRTAB 0x011d->0x0635 ; "*** Exception in Ada.Install_Stub: "
05a8 013e | > | .STRTAB 0x013e->0x0647 ; "Ada.Make_Inline"
05a9 014b | K | .STRTAB 0x014b->0x064e ; "<IMAGE>"
05aa 0150 | P | .STRTAB 0x0150->0x0652 ; "Make_Inline failed - unit is not an Ada object"
05ab 017c | | | .STRTAB 0x017c->0x0669 ; "*** Exception in Ada.Make_Inline: "
05ac 019c | | .STRTAB 0x019c->0x067a ; "Ada.Make_Separate"
05ad 01ab | | .STRTAB 0x01ab->0x0682 ; "*** Exception in Ada.Make_Separate: "
05ae 01cd | | .STRTAB 0x01cd->0x0694 ; "Ada.Other_Part"
05af 01d9 | | .STRTAB 0x01d9->0x069b ; "Ada.Open"
; "Ada.Open"
05b0 01df | | .STRTAB 0x01df->0x069f ; "Other_Part"
05b1 01e7 | | .STRTAB 0x01e7->0x06a4 ; "Ada.Get_Unit"
05b2 01f1 | | .STRTAB 0x01f1->0x06aa ; "Other part failed - not found"
05b3 020c | | .STRTAB 0x020c->0x06b9 ; "*** Exception in Ada.Other_Part: "
05b4 022b | + | .STRTAB 0x022b->0x06c9 ; "Ada.Replace_Id"
05b5 0237 | 7 | .STRTAB 0x0237->0x06d0 ; "Ada.Show_Usage"
05b6 0243 | C | .STRTAB 0x0243->0x06d7 ; "*** Exception in Ada.Show_Usage: "
05b7 0262 | b | .STRTAB 0x0262->0x06e8 ; "Ada.Show_Unused"
05b8 026f | o | .STRTAB 0x026f->0x06ef ; "*** Exception in Ada.Show_Unused: "
05b9 028f | | .STRTAB 0x028f->0x0700 ; "Ada.Create_Body"
05ba 029c | | .STRTAB 0x029c->0x0708 ; "*** Exception in Ada.Create_Body: "
05bb 02bc | | .STRTAB 0x02bc->0x0719 ; "Ada.Create_Private"
05bc 02cc | | .STRTAB 0x02cc->0x0722 ; "Ada.Create_Private_Part"
05bd 02e1 | | .STRTAB 0x02e1->0x072d ; "Private_Part failed - no visible part selected"
05be 030d | | .STRTAB 0x030d->0x0744 ; "Private_Part failed - "
05bf 0321 | ! | .STRTAB 0x0321->0x074f ; " must be source"
05c0 032e | . | .STRTAB 0x032e->0x0757 ; "*** Exception in Ada.Create_Private: "
; "*** Exception in Ada.Create_Private: "
05c1 0351 | Q | .STRTAB 0x0351->0x0769 ; "Ada.Get_Errors"
05c2 035d | ] | .STRTAB 0x035d->0x0770 ; "Insert_Blank_Line is not yet implemented"
05c3 0383 | | .STRTAB 0x0383->0x0784 ; "Delete_Blank_Line is not yet implemented"
05c4 03a9 | | .STRTAB 0x03a9->0x0798 ; "ADA"
05c5 03aa | | .STRTAB 0x03aa->0x079a ; "*** Exception in Ada.Change_State: "
05c6 03cb | | .STREND 0x03cb->0x07ab
05c7 4164 612e |Ada.| .STRTAB_STRINGS
07ac 0000 0000 | | .BLANK 0000[0x4]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; Debug Table
07b0 ; --------------------------------------------------------------------------------------
07b0 0003 0018 | | .CONST 0x0003,0x0018
07b2 000b 0872 | r| .DEBUG 0x000b,0x0872,0x8000,0x0000,0x005a,0x84f5,0x0000,0x0003
07ba 0033 08a0 | 3 | .DEBUG 0x0033,0x08a0,0x8000,0x0000,0x005a,0x8aa5,0x0000,0x003b
07c2 0073 08de | s | .DEBUG 0x0073,0x08de,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0008
07ca 0083 08e4 | | .DEBUG 0x0083,0x08e4,0x0001,0x0000,0x005a,0x84f5,0x0000,0x000c
07d2 0093 08ea | | .DEBUG 0x0093,0x08ea,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0010
07da 00a3 08f0 | | .DEBUG 0x00a3,0x08f0,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0014
07e2 015b 094a | [ J| .DEBUG 0x015b,0x094a,0x0001,0x0000,0x005a,0x84f5,0x0000,0x001d
07ea 018b 0962 | b| .DEBUG 0x018b,0x0962,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0026
07f2 01bb 0974 | t| .DEBUG 0x01bb,0x0974,0x0001,0x0000,0x005a,0x84f5,0x0000,0x002a
07fa 0203 09a0 | | .DEBUG 0x0203,0x09a0,0x0001,0x0000,0x005a,0x84f5,0x0000,0x002e
0802 0243 09b8 | C | .DEBUG 0x0243,0x09b8,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0032
080a 0363 0a1c | c | .DEBUG 0x0363,0x0a1c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0040
0812 0373 0a22 | s "| .DEBUG 0x0373,0x0a22,0x0001,0x0000,0x005a,0x84f5,0x0000,0x004e
081a 0393 0a2c | ,| .DEBUG 0x0393,0x0a2c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0066
0822 03ab 0a36 | 6| .DEBUG 0x03ab,0x0a36,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0074
082a 03c3 0a40 | @| .DEBUG 0x03c3,0x0a40,0x0001,0x0000,0x005a,0x84f5,0x0000,0x007d
0832 042b 0a6c | + l| .DEBUG 0x042b,0x0a6c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0086
083a 045b 0a7c | [ || .DEBUG 0x045b,0x0a7c,0x0001,0x0000,0x005a,0x84f5,0x0000,0x008a
0842 0463 0a80 | c | .DEBUG 0x0463,0x0a80,0x0001,0x0000,0x005a,0x84f5,0x0000,0x0093
084a 046b 0a84 | k | .DEBUG 0x046b,0x0a84,0x0001,0x0000,0x005a,0x84f5,0x0000,0x009c
0852 047b 0a88 | { | .DEBUG 0x047b,0x0a88,0x0002,0x0000,0x005a,0x8aa5,0x0000,0x0078
085a 048b 0a8c | | .DEBUG 0x048b,0x0a8c,0x0002,0x0000,0x005a,0x8aa5,0x0000,0x0092
0862 04eb 0ab6 | | .DEBUG 0x04eb,0x0ab6,0x0001,0x0000,0x005a,0x8aa5,0x0000,0x0119
086a 0583 0b14 | | .DEBUG 0x0583,0x0b14,0x0002,0x0000,0x005a,0x8aa5,0x0000,0x0244
0872 ; --------------------------------------------------------------------------------------
0872 ; Debug3 Subtable 0x0
0872 ; --------------------------------------------------------------------------------------
0872 0016 0000 | | .DBG3TAB 0x0016,0x0000
0874 000b ffff | | .CONST 0x000b,0xffff
0876 000c fffe | | .CONST 0x000c,0xfffe
0878 000e fffd | | .CONST 0x000e,0xfffd
087a 0010 fffc | | .CONST 0x0010,0xfffc
087c 0012 fffb | | .CONST 0x0012,0xfffb
087e 0014 fffa | | .CONST 0x0014,0xfffa
0880 0016 fff9 | | .CONST 0x0016,0xfff9
0882 0018 fff8 | | .CONST 0x0018,0xfff8
0884 001a fff7 | | .CONST 0x001a,0xfff7
0886 001c fff6 | | .CONST 0x001c,0xfff6
0888 001e fff5 | | .CONST 0x001e,0xfff5
088a 0020 fff4 | | .CONST 0x0020,0xfff4
088c 0022 fff3 | " | .CONST 0x0022,0xfff3
088e 0024 fff2 | $ | .CONST 0x0024,0xfff2
0890 0026 fff1 | & | .CONST 0x0026,0xfff1
0892 0028 fff0 | ( | .CONST 0x0028,0xfff0
0894 002a ffef | * | .CONST 0x002a,0xffef
0896 002c ffee | , | .CONST 0x002c,0xffee
0898 002e ffed | . | .CONST 0x002e,0xffed
089a 0030 ffec | 0 | .CONST 0x0030,0xffec
089c 0031 ffeb | 1 | .CONST 0x0031,0xffeb
089e 0032 ffea | 2 | .CONST 0x0032,0xffea
08a0 ; --------------------------------------------------------------------------------------
08a0 ; Debug3 Subtable 0x1
08a0 ; --------------------------------------------------------------------------------------
08a0 001e 0000 | | .DBG3TAB 0x001e,0x0000
08a2 0033 ffff | 3 | .CONST 0x0033,0xffff
08a4 0034 fffe | 4 | .CONST 0x0034,0xfffe
08a6 0035 fffd | 5 | .CONST 0x0035,0xfffd
08a8 0036 fffc | 6 | .CONST 0x0036,0xfffc
08aa 0037 fffb | 7 | .CONST 0x0037,0xfffb
08ac 0038 fffa | 8 | .CONST 0x0038,0xfffa
08ae 0039 fff9 | 9 | .CONST 0x0039,0xfff9
08b0 003a fff8 | : | .CONST 0x003a,0xfff8
08b2 003b fff7 | ; | .CONST 0x003b,0xfff7
08b4 003d fff6 | = | .CONST 0x003d,0xfff6
08b6 003f fff5 | ? | .CONST 0x003f,0xfff5
08b8 0041 fff4 | A | .CONST 0x0041,0xfff4
08ba 0043 fff3 | C | .CONST 0x0043,0xfff3
08bc 0045 fff2 | E | .CONST 0x0045,0xfff2
08be 0047 fff1 | G | .CONST 0x0047,0xfff1
08c0 0049 fff0 | I | .CONST 0x0049,0xfff0
08c2 004b ffef | K | .CONST 0x004b,0xffef
08c4 004d ffee | M | .CONST 0x004d,0xffee
08c6 004f ffed | O | .CONST 0x004f,0xffed
08c8 0051 ffec | Q | .CONST 0x0051,0xffec
08ca 0053 ffeb | S | .CONST 0x0053,0xffeb
08cc 0055 ffea | U | .CONST 0x0055,0xffea
08ce 0057 ffe9 | W | .CONST 0x0057,0xffe9
08d0 0059 ffe8 | Y | .CONST 0x0059,0xffe8
08d2 005b ffe7 | [ | .CONST 0x005b,0xffe7
08d4 005d ffe6 | ] | .CONST 0x005d,0xffe6
08d6 005f ffe5 | _ | .CONST 0x005f,0xffe5
08d8 0061 ffe4 | a | .CONST 0x0061,0xffe4
08da 0063 ffe3 | c | .CONST 0x0063,0xffe3
08dc 0065 ffe2 | e | .CONST 0x0065,0xffe2
08de ; --------------------------------------------------------------------------------------
08de ; Debug3 Subtable 0x2
08de ; --------------------------------------------------------------------------------------
08de 0000 0002 | | .DBG3TAB 0x0000,0x0002
08e0 0073 0001 | s | .CONST 0x0073,0x0001
08e2 0077 0002 | w | .CONST 0x0077,0x0002
08e4 ; --------------------------------------------------------------------------------------
08e4 ; Debug3 Subtable 0x3
08e4 ; --------------------------------------------------------------------------------------
08e4 0000 0002 | | .DBG3TAB 0x0000,0x0002
08e6 0083 0001 | | .CONST 0x0083,0x0001
08e8 0087 0002 | | .CONST 0x0087,0x0002
08ea ; --------------------------------------------------------------------------------------
08ea ; Debug3 Subtable 0x4
08ea ; --------------------------------------------------------------------------------------
08ea 0000 0002 | | .DBG3TAB 0x0000,0x0002
08ec 0093 0001 | | .CONST 0x0093,0x0001
08ee 0097 0002 | | .CONST 0x0097,0x0002
08f0 ; --------------------------------------------------------------------------------------
08f0 ; Debug3 Subtable 0x5
08f0 ; --------------------------------------------------------------------------------------
08f0 0005 0027 | '| .DBG3TAB 0x0005,0x0027
08f2 00a3 ffff | | .CONST 0x00a3,0xffff
08f4 00a6 fffe | | .CONST 0x00a6,0xfffe
08f6 00a7 fffd | | .CONST 0x00a7,0xfffd
08f8 00a8 fffc | | .CONST 0x00a8,0xfffc
08fa 00ad fffb | | .CONST 0x00ad,0xfffb
08fc 00b3 0001 | | .CONST 0x00b3,0x0001
08fe 00b7 0002 | | .CONST 0x00b7,0x0002
0900 00be 0003 | | .CONST 0x00be,0x0003
0902 00c0 0004 | | .CONST 0x00c0,0x0004
0904 00ce 0005 | | .CONST 0x00ce,0x0005
0906 00d2 0006 | | .CONST 0x00d2,0x0006
0908 00de 0007 | | .CONST 0x00de,0x0007
090a 00df 0401 | | .CONST 0x00df,0x0401
090c 00e1 0402 | | .CONST 0x00e1,0x0402
090e 00e2 0403 | | .CONST 0x00e2,0x0403
0910 00e3 0404 | | .CONST 0x00e3,0x0404
0912 00e4 0007 | | .CONST 0x00e4,0x0007
0914 00ea 000d | | .CONST 0x00ea,0x000d
0916 00f2 000e | | .CONST 0x00f2,0x000e
0918 00f6 000f | | .CONST 0x00f6,0x000f
091a 00f7 0801 | | .CONST 0x00f7,0x0801
091c 00f9 0802 | | .CONST 0x00f9,0x0802
091e 00fa 0803 | | .CONST 0x00fa,0x0803
0920 00fb 0804 | | .CONST 0x00fb,0x0804
0922 00fc 000f | | .CONST 0x00fc,0x000f
0924 0100 0012 | | .CONST 0x0100,0x0012
0926 0101 0010 | | .CONST 0x0101,0x0010
0928 0104 0011 | | .CONST 0x0104,0x0011
092a 010a 0008 | | .CONST 0x010a,0x0008
092c 010e 0009 | | .CONST 0x010e,0x0009
092e 010f 000a | | .CONST 0x010f,0x000a
0930 0113 000b | | .CONST 0x0113,0x000b
0932 0117 000c | | .CONST 0x0117,0x000c
0934 0119 0013 | | .CONST 0x0119,0x0013
0936 011d 0014 | | .CONST 0x011d,0x0014
0938 0121 0015 | ! | .CONST 0x0121,0x0015
093a 012f 0016 | / | .CONST 0x012f,0x0016
093c 0132 0c01 | 2 | .CONST 0x0132,0x0c01
093e 0136 0016 | 6 | .CONST 0x0136,0x0016
0940 0137 0017 | 7 | .CONST 0x0137,0x0017
0942 013d 0018 | = | .CONST 0x013d,0x0018
0944 0143 0019 | C | .CONST 0x0143,0x0019
0946 0145 001a | E | .CONST 0x0145,0x001a
0948 014c 001b | L | .CONST 0x014c,0x001b
094a ; --------------------------------------------------------------------------------------
094a ; Debug3 Subtable 0x6
094a ; --------------------------------------------------------------------------------------
094a 0001 000a | | .DBG3TAB 0x0001,0x000a
094c 015b ffff | [ | .CONST 0x015b,0xffff
094e 015c 0001 | \ | .CONST 0x015c,0x0001
0950 0160 0002 | ` | .CONST 0x0160,0x0002
0952 016d 0003 | m | .CONST 0x016d,0x0003
0954 016e 0401 | n | .CONST 0x016e,0x0401
0956 0170 0003 | p | .CONST 0x0170,0x0003
0958 0171 0004 | q | .CONST 0x0171,0x0004
095a 0172 0005 | r | .CONST 0x0172,0x0005
095c 0179 0006 | y | .CONST 0x0179,0x0006
095e 017a 0007 | z | .CONST 0x017a,0x0007
0960 017c 0008 | | | .CONST 0x017c,0x0008
0962 ; --------------------------------------------------------------------------------------
0962 ; Debug3 Subtable 0x7
0962 ; --------------------------------------------------------------------------------------
0962 0001 0007 | | .DBG3TAB 0x0001,0x0007
0964 018b ffff | | .CONST 0x018b,0xffff
0966 018c 0001 | | .CONST 0x018c,0x0001
0968 0190 0002 | | .CONST 0x0190,0x0002
096a 0198 0003 | | .CONST 0x0198,0x0003
096c 01a1 0004 | | .CONST 0x01a1,0x0004
096e 01a8 0006 | | .CONST 0x01a8,0x0006
0970 01a9 0007 | | .CONST 0x01a9,0x0007
0972 01ab 0008 | | .CONST 0x01ab,0x0008
0974 ; --------------------------------------------------------------------------------------
0974 ; Debug3 Subtable 0x8
0974 ; --------------------------------------------------------------------------------------
0974 0003 0012 | | .DBG3TAB 0x0003,0x0012
0976 01bb ffff | | .CONST 0x01bb,0xffff
0978 01bc fffe | | .CONST 0x01bc,0xfffe
097a 01bd fffd | | .CONST 0x01bd,0xfffd
097c 01be 0001 | | .CONST 0x01be,0x0001
097e 01c2 0002 | | .CONST 0x01c2,0x0002
0980 01cf 0003 | | .CONST 0x01cf,0x0003
0982 01d0 0401 | | .CONST 0x01d0,0x0401
0984 01d2 0003 | | .CONST 0x01d2,0x0003
0986 01d3 0004 | | .CONST 0x01d3,0x0004
0988 01d7 0005 | | .CONST 0x01d7,0x0005
098a 01d8 0006 | | .CONST 0x01d8,0x0006
098c 01db 0801 | | .CONST 0x01db,0x0801
098e 01df 0006 | | .CONST 0x01df,0x0006
0990 01e0 0007 | | .CONST 0x01e0,0x0007
0992 01e4 0008 | | .CONST 0x01e4,0x0008
0994 01e6 0c01 | | .CONST 0x01e6,0x0c01
0996 01e8 0008 | | .CONST 0x01e8,0x0008
0998 01e9 0009 | | .CONST 0x01e9,0x0009
099a 01f5 000a | | .CONST 0x01f5,0x000a
099c 01f6 000b | | .CONST 0x01f6,0x000b
099e 01f8 000c | | .CONST 0x01f8,0x000c
09a0 ; --------------------------------------------------------------------------------------
09a0 ; Debug3 Subtable 0x9
09a0 ; --------------------------------------------------------------------------------------
09a0 0003 0008 | | .DBG3TAB 0x0003,0x0008
09a2 0203 ffff | | .CONST 0x0203,0xffff
09a4 0204 fffe | | .CONST 0x0204,0xfffe
09a6 0209 fffd | | .CONST 0x0209,0xfffd
09a8 020e 0001 | | .CONST 0x020e,0x0001
09aa 0212 0002 | | .CONST 0x0212,0x0002
09ac 021d 0003 | | .CONST 0x021d,0x0003
09ae 0221 0004 | ! | .CONST 0x0221,0x0004
09b0 0225 0005 | % | .CONST 0x0225,0x0005
09b2 0231 0006 | 1 | .CONST 0x0231,0x0006
09b4 0232 0007 | 2 | .CONST 0x0232,0x0007
09b6 0234 0008 | 4 | .CONST 0x0234,0x0008
09b8 ; --------------------------------------------------------------------------------------
09b8 ; Debug3 Subtable 0xa
09b8 ; --------------------------------------------------------------------------------------
09b8 000d 0024 | $| .DBG3TAB 0x000d,0x0024
09ba 0243 ffff | C | .CONST 0x0243,0xffff
09bc 0244 fffe | D | .CONST 0x0244,0xfffe
09be 0249 fffd | I | .CONST 0x0249,0xfffd
09c0 024a fffc | J | .CONST 0x024a,0xfffc
09c2 024f fffb | O | .CONST 0x024f,0xfffb
09c4 0251 fffa | Q | .CONST 0x0251,0xfffa
09c6 0254 fff9 | T | .CONST 0x0254,0xfff9
09c8 0256 fff8 | V | .CONST 0x0256,0xfff8
09ca 0258 fff7 | X | .CONST 0x0258,0xfff7
09cc 025e fff6 | ^ | .CONST 0x025e,0xfff6
09ce 0264 fff5 | d | .CONST 0x0264,0xfff5
09d0 026a fff4 | j | .CONST 0x026a,0xfff4
09d2 026f fff3 | o | .CONST 0x026f,0xfff3
09d4 0275 0001 | u | .CONST 0x0275,0x0001
09d6 0279 0002 | y | .CONST 0x0279,0x0002
09d8 027b 0003 | { | .CONST 0x027b,0x0003
09da 0282 0004 | | .CONST 0x0282,0x0004
09dc 0288 0005 | | .CONST 0x0288,0x0005
09de 028b 0006 | | .CONST 0x028b,0x0006
09e0 0292 0007 | | .CONST 0x0292,0x0007
09e2 0298 0008 | | .CONST 0x0298,0x0008
09e4 02b4 0009 | | .CONST 0x02b4,0x0009
09e6 02b9 000a | | .CONST 0x02b9,0x000a
09e8 02bc 000b | | .CONST 0x02bc,0x000b
09ea 02c9 000c | | .CONST 0x02c9,0x000c
09ec 02cc 000d | | .CONST 0x02cc,0x000d
09ee 02cf 000e | | .CONST 0x02cf,0x000e
09f0 02d2 000f | | .CONST 0x02d2,0x000f
09f2 02df 0010 | | .CONST 0x02df,0x0010
09f4 02e0 0401 | | .CONST 0x02e0,0x0401
09f6 02e2 0010 | | .CONST 0x02e2,0x0010
09f8 02e3 0011 | | .CONST 0x02e3,0x0011
09fa 02e4 0012 | | .CONST 0x02e4,0x0012
09fc 02e8 0013 | | .CONST 0x02e8,0x0013
09fe 02e9 0801 | | .CONST 0x02e9,0x0801
0a00 02eb 0013 | | .CONST 0x02eb,0x0013
0a02 02ec 0014 | | .CONST 0x02ec,0x0014
0a04 02f9 0015 | | .CONST 0x02f9,0x0015
0a06 02fb 0016 | | .CONST 0x02fb,0x0016
0a08 030b 0017 | | .CONST 0x030b,0x0017
0a0a 0310 0018 | | .CONST 0x0310,0x0018
0a0c 0323 0019 | # | .CONST 0x0323,0x0019
0a0e 0325 001a | % | .CONST 0x0325,0x001a
0a10 0329 001b | ) | .CONST 0x0329,0x001b
0a12 032a 001c | * | .CONST 0x032a,0x001c
0a14 0345 001d | E | .CONST 0x0345,0x001d
0a16 034a 001e | J | .CONST 0x034a,0x001e
0a18 0352 001f | R | .CONST 0x0352,0x001f
0a1a 0354 0020 | T | .CONST 0x0354,0x0020
0a1c ; --------------------------------------------------------------------------------------
0a1c ; Debug3 Subtable 0xb
0a1c ; --------------------------------------------------------------------------------------
0a1c 0000 0002 | | .DBG3TAB 0x0000,0x0002
0a1e 0363 0001 | c | .CONST 0x0363,0x0001
0a20 0367 0002 | g | .CONST 0x0367,0x0002
0a22 ; --------------------------------------------------------------------------------------
0a22 ; Debug3 Subtable 0xc
0a22 ; --------------------------------------------------------------------------------------
0a22 0000 0004 | | .DBG3TAB 0x0000,0x0004
0a24 0373 0001 | s | .CONST 0x0373,0x0001
0a26 0377 0002 | w | .CONST 0x0377,0x0002
0a28 037f 0003 | | .CONST 0x037f,0x0003
0a2a 0381 0004 | | .CONST 0x0381,0x0004
0a2c ; --------------------------------------------------------------------------------------
0a2c ; Debug3 Subtable 0xd
0a2c ; --------------------------------------------------------------------------------------
0a2c 0000 0004 | | .DBG3TAB 0x0000,0x0004
0a2e 0393 0001 | | .CONST 0x0393,0x0001
0a30 0397 0002 | | .CONST 0x0397,0x0002
0a32 039e 0003 | | .CONST 0x039e,0x0003
0a34 03a0 0004 | | .CONST 0x03a0,0x0004
0a36 ; --------------------------------------------------------------------------------------
0a36 ; Debug3 Subtable 0xe
0a36 ; --------------------------------------------------------------------------------------
0a36 0000 0004 | | .DBG3TAB 0x0000,0x0004
0a38 03ab 0001 | | .CONST 0x03ab,0x0001
0a3a 03af 0002 | | .CONST 0x03af,0x0002
0a3c 03b3 0003 | | .CONST 0x03b3,0x0003
0a3e 03b5 0004 | | .CONST 0x03b5,0x0004
0a40 ; --------------------------------------------------------------------------------------
0a40 ; Debug3 Subtable 0xf
0a40 ; --------------------------------------------------------------------------------------
0a40 0002 0013 | | .DBG3TAB 0x0002,0x0013
0a42 03c3 ffff | | .CONST 0x03c3,0xffff
0a44 03c4 fffe | | .CONST 0x03c4,0xfffe
0a46 03ca 0001 | | .CONST 0x03ca,0x0001
0a48 03ce 0002 | | .CONST 0x03ce,0x0002
0a4a 03d5 0003 | | .CONST 0x03d5,0x0003
0a4c 03de 0004 | | .CONST 0x03de,0x0004
0a4e 03eb 0005 | | .CONST 0x03eb,0x0005
0a50 03ec 0401 | | .CONST 0x03ec,0x0401
0a52 03ee 0005 | | .CONST 0x03ee,0x0005
0a54 03ef 0006 | | .CONST 0x03ef,0x0006
0a56 03f0 0007 | | .CONST 0x03f0,0x0007
0a58 03f1 0801 | | .CONST 0x03f1,0x0801
0a5a 03f3 0007 | | .CONST 0x03f3,0x0007
0a5c 03f4 0008 | | .CONST 0x03f4,0x0008
0a5e 03f8 0009 | | .CONST 0x03f8,0x0009
0a60 03f9 000a | | .CONST 0x03f9,0x000a
0a62 03fe 000b | | .CONST 0x03fe,0x000b
0a64 0409 000c | | .CONST 0x0409,0x000c
0a66 040a 000d | | .CONST 0x040a,0x000d
0a68 040f 000e | | .CONST 0x040f,0x000e
0a6a 0411 000f | | .CONST 0x0411,0x000f
0a6c ; --------------------------------------------------------------------------------------
0a6c ; Debug3 Subtable 0x10
0a6c ; --------------------------------------------------------------------------------------
0a6c 0001 0006 | | .DBG3TAB 0x0001,0x0006
0a6e 042b ffff | + | .CONST 0x042b,0xffff
0a70 0430 0001 | 0 | .CONST 0x0430,0x0001
0a72 0434 0002 | 4 | .CONST 0x0434,0x0002
0a74 043c 0003 | < | .CONST 0x043c,0x0003
0a76 0442 0004 | B | .CONST 0x0442,0x0004
0a78 044a 0005 | J | .CONST 0x044a,0x0005
0a7a 044c 0006 | L | .CONST 0x044c,0x0006
0a7c ; --------------------------------------------------------------------------------------
0a7c ; Debug3 Subtable 0x11
0a7c ; --------------------------------------------------------------------------------------
0a7c 0000 0001 | | .DBG3TAB 0x0000,0x0001
0a7e 045b 0001 | [ | .CONST 0x045b,0x0001
0a80 ; --------------------------------------------------------------------------------------
0a80 ; Debug3 Subtable 0x12
0a80 ; --------------------------------------------------------------------------------------
0a80 0000 0001 | | .DBG3TAB 0x0000,0x0001
0a82 0463 0001 | c | .CONST 0x0463,0x0001
0a84 ; --------------------------------------------------------------------------------------
0a84 ; Debug3 Subtable 0x13
0a84 ; --------------------------------------------------------------------------------------
0a84 0000 0001 | | .DBG3TAB 0x0000,0x0001
0a86 046b 0001 | k | .CONST 0x046b,0x0001
0a88 ; --------------------------------------------------------------------------------------
0a88 ; Debug3 Subtable 0x14
0a88 ; --------------------------------------------------------------------------------------
0a88 0000 0001 | | .DBG3TAB 0x0000,0x0001
0a8a 047b 0001 | { | .CONST 0x047b,0x0001
0a8c ; --------------------------------------------------------------------------------------
0a8c ; Debug3 Subtable 0x15
0a8c ; --------------------------------------------------------------------------------------
0a8c 0004 0010 | | .DBG3TAB 0x0004,0x0010
0a8e 048b ffff | | .CONST 0x048b,0xffff
0a90 048c fffe | | .CONST 0x048c,0xfffe
0a92 0491 fffd | | .CONST 0x0491,0xfffd
0a94 0493 fffc | | .CONST 0x0493,0xfffc
0a96 0496 0001 | | .CONST 0x0496,0x0001
0a98 0497 0401 | | .CONST 0x0497,0x0401
0a9a 0498 0001 | | .CONST 0x0498,0x0001
0a9c 0499 0002 | | .CONST 0x0499,0x0002
0a9e 04a5 0003 | | .CONST 0x04a5,0x0003
0aa0 04b6 0004 | | .CONST 0x04b6,0x0004
0aa2 04b8 0006 | | .CONST 0x04b8,0x0006
0aa4 04b9 0801 | | .CONST 0x04b9,0x0801
0aa6 04ba 0006 | | .CONST 0x04ba,0x0006
0aa8 04bb 0007 | | .CONST 0x04bb,0x0007
0aaa 04cf 0008 | | .CONST 0x04cf,0x0008
0aac 04d2 000b | | .CONST 0x04d2,0x000b
0aae 04d3 0c01 | | .CONST 0x04d3,0x0c01
0ab0 04d4 000b | | .CONST 0x04d4,0x000b
0ab2 04d5 0009 | | .CONST 0x04d5,0x0009
0ab4 04e3 000a | | .CONST 0x04e3,0x000a
0ab6 ; --------------------------------------------------------------------------------------
0ab6 ; Debug3 Subtable 0x16
0ab6 ; --------------------------------------------------------------------------------------
0ab6 0009 0025 | %| .DBG3TAB 0x0009,0x0025
0ab8 04eb ffff | | .CONST 0x04eb,0xffff
0aba 04ec fffe | | .CONST 0x04ec,0xfffe
0abc 04ed fffd | | .CONST 0x04ed,0xfffd
0abe 04ee fffc | | .CONST 0x04ee,0xfffc
0ac0 04f3 0001 | | .CONST 0x04f3,0x0001
0ac2 04f5 0002 | | .CONST 0x04f5,0x0002
0ac4 04f6 fbff | | .CONST 0x04f6,0xfbff
0ac6 04f9 fbfe | | .CONST 0x04f9,0xfbfe
0ac8 04fe fbfd | | .CONST 0x04fe,0xfbfd
0aca 0500 0401 | | .CONST 0x0500,0x0401
0acc 050f 0402 | | .CONST 0x050f,0x0402
0ace 0513 0403 | | .CONST 0x0513,0x0403
0ad0 0518 0003 | | .CONST 0x0518,0x0003
0ad2 0519 f7ff | | .CONST 0x0519,0xf7ff
0ad4 051a f7fe | | .CONST 0x051a,0xf7fe
0ad6 051b 0801 | | .CONST 0x051b,0x0801
0ad8 051f 0802 | | .CONST 0x051f,0x0802
0ada 0521 0803 | ! | .CONST 0x0521,0x0803
0adc 0522 0c01 | " | .CONST 0x0522,0x0c01
0ade 0524 0c02 | $ | .CONST 0x0524,0x0c02
0ae0 0525 0c03 | % | .CONST 0x0525,0x0c03
0ae2 0526 0c04 | & | .CONST 0x0526,0x0c04
0ae4 0527 0803 | ' | .CONST 0x0527,0x0803
0ae6 052d 0809 | - | .CONST 0x052d,0x0809
0ae8 0535 080a | 5 | .CONST 0x0535,0x080a
0aea 0539 080b | 9 | .CONST 0x0539,0x080b
0aec 053a 1001 | : | .CONST 0x053a,0x1001
0aee 053c 1002 | < | .CONST 0x053c,0x1002
0af0 053d 1003 | = | .CONST 0x053d,0x1003
0af2 053e 1004 | > | .CONST 0x053e,0x1004
0af4 053f 080b | ? | .CONST 0x053f,0x080b
0af6 0543 080e | C | .CONST 0x0543,0x080e
0af8 0544 080c | D | .CONST 0x0544,0x080c
0afa 0547 080d | G | .CONST 0x0547,0x080d
0afc 054d 0804 | M | .CONST 0x054d,0x0804
0afe 0551 0805 | Q | .CONST 0x0551,0x0805
0b00 0552 0806 | R | .CONST 0x0552,0x0806
0b02 0556 0807 | V | .CONST 0x0556,0x0807
0b04 055a 0808 | Z | .CONST 0x055a,0x0808
0b06 055c 080f | \ | .CONST 0x055c,0x080f
0b08 055f 0810 | _ | .CONST 0x055f,0x0810
0b0a 0562 0004 | b | .CONST 0x0562,0x0004
0b0c 056b 0005 | k | .CONST 0x056b,0x0005
0b0e 0571 0006 | q | .CONST 0x0571,0x0006
0b10 0573 0007 | s | .CONST 0x0573,0x0007
0b12 057a 0008 | z | .CONST 0x057a,0x0008
0b14 ; --------------------------------------------------------------------------------------
0b14 ; Debug3 Subtable 0x17
0b14 ; --------------------------------------------------------------------------------------
0b14 0000 0005 | | .DBG3TAB 0x0000,0x0005
0b16 0583 0001 | | .CONST 0x0583,0x0001
0b18 0586 0002 | | .CONST 0x0586,0x0002
0b1a 0588 0003 | | .CONST 0x0588,0x0003
0b1c 0594 0004 | | .CONST 0x0594,0x0004
0b1e 0596 0005 | | .CONST 0x0596,0x0005
0b20 0000 0000 | | .BLANK 0000[0xe0]