|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 6144 (0x1800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 06d8 | | .CONST 0x06d8 ; 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 0091 | | .CONST 0x0091 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0025 | % | .CONST 0x0025 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x07c2,0x8000,0x0000,0x005a,0x41a5,0x0000,0x000f
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 4803 |H | Short_Literal 0x3
0010 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
0012 03fe | | Declare_Type Discrete,Defined,Visible
0013 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x4 = 0x13,0xfffb
0014 4801 |H | Short_Literal 0x1
0015 e001 | | Load 0x0,0x1
0016 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0017 4801 |H | Short_Literal 0x1
0018 00e5 | | Load_Encached Long_Integer_Cache
0019 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call
001b 4802 |H | Short_Literal 0x2
001c 4800 |H | Short_Literal 0x0
001d 4802 |H | Short_Literal 0x2
001e 4800 |H | Short_Literal 0x0
001f 4801 |H | Short_Literal 0x1
0020 031e | | Declare_Type Variant_Record,Defined,Visible
0021 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x21,0xfffa
0023 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0x6 = 0x23,0xfff9
0024 032b | + | Declare_Type Record,Incomplete,Visible
0025 00c4 | | Action Make_Default ; Debug Table 0x0.0x7 = 0x25,0xfff8
0026 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x26,0xfff7
0028 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x28,0xfff6
002a e002 | | Load 0x0,0x2 ; Debug Table 0x0.0xa = 0x2a,0xfff5
002b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002d e002 | | Load 0x0,0x2
002e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0030 e003 | | Load 0x0,0x3
0031 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0032 e004 | | Load 0x0,0x4
0033 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0034 029f 020b | | Declare_Subprogram INIT_0208,For_Call
0036 e210 | | Load 0x1,0x10
0037 0326 | & | Complete_Type Record,By_Defining
0038 00db | | Load_Top At_Offset_3 ; Debug Table 0x0.0xb = 0x38,0xfff4
0039 0322 | " | Declare_Variable Record
003a e002 | | Load 0x0,0x2
003b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
003c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
003d 00d9 | | Load_Top At_Offset_1
003e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
003f e002 | | Load 0x0,0x2
0040 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0041 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0042 00d9 | | Load_Top At_Offset_1
0043 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0044 e003 | | Load 0x0,0x3
0045 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0046 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0047 00d9 | | Load_Top At_Offset_1
0048 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0049 e004 | | Load 0x0,0x4
004a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
004b e005 | | Load 0x0,0x5
004c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004d 0119 | | Execute Any,Check_In_Formal_Type
004e 00d9 | | Load_Top At_Offset_1
004f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0050 0129 | ) | Execute Any,Make_Visible
0051 c211 | | Store 0x1,0x11
0052 00bf | | Action Accept_Activation
0053 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0053,0x07dc,0x8000,0x0000,0x005a,0x41c5,0x0000,0x001d
; Debug Table 0x1.0x0 = 0x53,0xffff
0054 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x54,0xfffe
0055 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x55,0xfffd
0056 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x56,0xfffc
0057 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x57,0xfffb
0058 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x58,0xfffa
0059 1b12 | | Execute Package,Field_Read,Field_Number 0x12
005a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005b e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x6 = 0x5b,0xfff9
005c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
005d e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x7 = 0x5d,0xfff8
005e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005f e004 | | Load 0x0,0x4
0060 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0061 011e | | Execute Any,Convert
0062 e006 | | Load 0x0,0x6 ; Debug Table 0x1.0x8 = 0x62,0xfff7
0063 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0064 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1.0x9 = 0x64,0xfff6
0065 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0xa = 0x65,0xfff5
0066 628d |b | Indirect_Literal Discrete,0x2f4,{0x0078740e, 0x00005230}
0067 02a0 | | Declare_Subprogram Null_Subprogram
0068 037d | } | Declare_Type Task,Defined
0069 036f | o | Declare_Variable Task
006a 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xb = 0x6a,0xfff4
006b 00c7 | | Action Elaborate_Subprogram
006c 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xc = 0x6c,0xfff3
006d 00c7 | | Action Elaborate_Subprogram
006e 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xd = 0x6e,0xfff2
006f 00c7 | | Action Elaborate_Subprogram
0070 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call ; Debug Table 0x1.0xe = 0x70,0xfff1
0072 029d 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call ; Debug Table 0x1.0xf = 0x72,0xfff0
0074 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call ; Debug Table 0x1.0x10 = 0x74,0xffef
0076 029d 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call ; Debug Table 0x1.0x11 = 0x76,0xffee
0078 029d 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call ; Debug Table 0x1.0x12 = 0x78,0xffed
007a 029d 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call ; Debug Table 0x1.0x13 = 0x7a,0xffec
007c 029d 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call ; Debug Table 0x1.0x14 = 0x7c,0xffeb
007e 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call ; Debug Table 0x1.0x15 = 0x7e,0xffea
0080 029d 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call ; Debug Table 0x1.0x16 = 0x80,0xffe9
0082 029d 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call ; Debug Table 0x1.0x17 = 0x82,0xffe8
0084 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call ; Debug Table 0x1.0x18 = 0x84,0xffe7
0086 029d 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call ; Debug Table 0x1.0x19 = 0x86,0xffe6
0088 00b6 | | Action Make_Scope ; Debug Table 0x1.0x1a = 0x88,0xffe5
0089 e001 | | Load 0x0,0x1
008a e004 | | Load 0x0,0x4
008b 1d20 | | Execute_Immediate Reference_Lex_1,0x20
008c 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
008d 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
008e 4806 |H | Short_Literal 0x6
008f e219 | | Load 0x1,0x19
0090 020e | | Execute Module,Augment_Imports
0091 BODY_0008:
0091 00be | | Action Activate_Tasks
0092 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1.0x1b = 0x92,0x1
0093 48e2 |H | Short_Literal 0xe2
0094 e007 | | Load 0x0,0x7
0095 180d | | Execute Package,Field_Execute,Field_Number 0xd
0096 c218 | | Store 0x1,0x18
0097 00cf | | Action Mark_Auxiliary ; Debug Table 0x1.0x1c = 0x97,0x2
0098 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x1d = 0x98,0xfbff
0099 4800 |H | Short_Literal 0x0
009a e008 | | Load 0x0,0x8
009b 1b15 | | Execute Package,Field_Read,Field_Number 0x15
009c 03f8 | | Declare_Type Discrete,Constrained
009d e008 | | Load 0x0,0x8 ; Debug Table 0x1.0x1e = 0x9d,0x401
009e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
009f e008 | | Load 0x0,0x8
00a0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00a1 4800 |H | Short_Literal 0x0
00a2 e008 | | Load 0x0,0x8
00a3 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
00a4 180f | | Execute Package,Field_Execute,Field_Number 0xf
00a5 c217 | | Store 0x1,0x17
00a6 0059 | Y | Store_Top Discrete,At_Offset_1
00a7 00d1 | | Pop_Control Pop_Count_1
00a8 00ce | | Action Pop_Auxiliary
00a9 00bc | | Action Signal_Activated
00aa 00bb | | Action Signal_Completion
00ab 0000 0000 | | .BLANK 0000[0x5]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x00b3,0x081c,0x0005,0x0000,0x005a,0x41a5,0x0000,0x0023
00b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00b5 7802 |x | Jump 0xb8 ; case 0x1
00b6 7805 |x | Jump 0xbc ; case 0x2
00b7 7809 |x | Jump 0xc1 ; case 0x3
00b8 00da | | Load_Top At_Offset_2
00b9 0091 060d | | Action Push_String_Extended_Indexed,0x60d ; "SUCCESS"
00bb 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00bc 00db | | Load_Top At_Offset_3
00bd 00db | | Load_Top At_Offset_3
00be 00e0 | | Load_Encached Standard_Cache
00bf 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00c0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00c1 00da | | Load_Top At_Offset_2
00c2 00e0 | | Load_Encached Standard_Cache
00c3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00c4 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00c5 0000 0000 | | .XXX[0x3]
00c7 0000 | |
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 4608 |F | Jump_Case 0x9 ; Debug Table 0x3 = .DEBUG 0x00cb,0x081e,0x0005,0x0000,0x005a,0x41a5,0x0000,0x002b
00cc 7808 |x | Jump 0xd5 ; case 0x0
00cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
00ce 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
00cf 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
00d0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
00d1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
00d2 781b |x | Jump 0xee ; case 0x6
00d3 7826 |x& | Jump 0xfa ; case 0x7
00d4 7834 |x4 | Jump 0x109 ; case 0x8
00d5 00da | | Load_Top At_Offset_2
00d6 016c | l | Execute Variant_Record,Is_Constrained
00d7 7009 |p | Jump_Nonzero 0xe1
00d8 00cf | | Action Mark_Auxiliary
00d9 4803 |H | Short_Literal 0x3
00da e5ff | | Load 0x2,-0x1
00db 1c08 | | Execute_Immediate Run_Utility,0x8
00dc 00d8 | | Load_Top At_Offset_0
00dd 1c00 | | Execute_Immediate Run_Utility,0x0
00de c5ff | | Store 0x2,-0x1
00df 00ce | | Action Pop_Auxiliary
00e0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00e1 00da | | Load_Top At_Offset_2
00e2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00e3 4603 |F | Jump_Case 0x4
00e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
00e6 7801 |x | Jump 0xe8 ; case 0x2
00e7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
00e8 00da | | Load_Top At_Offset_2
00e9 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
00ea 00da | | Load_Top At_Offset_2
00eb 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00ec 1c00 | | Execute_Immediate Run_Utility,0x0
00ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00ee 00db | | Load_Top At_Offset_3
00ef 4603 |F | Jump_Case 0x4
00f0 7807 |x | Jump 0xf8 ; case 0x0
00f1 7804 |x | Jump 0xf6 ; case 0x1
00f2 7801 |x | Jump 0xf4 ; case 0x2
00f3 7804 |x | Jump 0xf8 ; case 0x3
00f4 4801 |H | Short_Literal 0x1
00f5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00f6 4802 |H | Short_Literal 0x2
00f7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00f8 48ff |H | Short_Literal 0xff
00f9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00fa 00db | | Load_Top At_Offset_3
00fb e5fe | | Load 0x2,-0x2
00fc 4603 |F | Jump_Case 0x4
00fd 7807 |x | Jump 0x105 ; case 0x0
00fe 7804 |x | Jump 0x103 ; case 0x1
00ff 7801 |x | Jump 0x101 ; case 0x2
0100 7804 |x | Jump 0x105 ; case 0x3
0101 4801 |H | Short_Literal 0x1
0102 7803 |x | Jump 0x106
0103 4802 |H | Short_Literal 0x2
0104 7801 |x | Jump 0x106
0105 48ff |H | Short_Literal 0xff
0106 e5ff | | Load 0x2,-0x1
0107 031b | | Declare_Type Variant_Record,Constrained
0108 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0109 00db | | Load_Top At_Offset_3
010a e5fe | | Load 0x2,-0x2
010b e5ff | | Load 0x2,-0x1
010c 1c06 | | Execute_Immediate Run_Utility,0x6
010d e5ff | | Load 0x2,-0x1
010e 02fc | | Declare_Variable Variant_Record,With_Constraint
010f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011b | | .CONST 0x011b ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0003 | | .CONST 0x0003 ; Number of locals
0113 INIT_0110:
0113 e210 | | Load 0x1,0x10 ; Debug Table 0x4 = .DEBUG 0x0113,0x0820,0x0001,0x0000,0x005a,0x41a5,0x0000,0x0051
; Debug Table 0x4.0x0 = 0x113,0xffff
0114 0322 | " | Declare_Variable Record
0115 00d8 | | Load_Top At_Offset_0
0116 1c00 | | Execute_Immediate Run_Utility,0x0
0117 e20e | | Load 0x1,0xe ; Debug Table 0x4.0x1 = 0x117,0xfffe
0118 02ff | | Declare_Variable Variant_Record
0119 00d8 | | Load_Top At_Offset_0
011a 1c00 | | Execute_Immediate Run_Utility,0x0
011b BODY_0110:
011b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x2 = 0x11b,0x1
011c 00da | | Load_Top At_Offset_2
011d e5fe | | Load 0x2,-0x2
011e e5ff | | Load 0x2,-0x1
011f 8212 | | Call 0x1,0x12
0120 00d2 | | Pop_Control Pop_Count_2
0121 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x3 = 0x121,0x2
0122 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0123 6804 |h | Jump_Zero 0x128
0124 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x4 = 0x124,0x3
0125 e5fd | | Load 0x2,-0x3
0126 016d | m | Execute Variant_Record,Structure_Write
0127 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0128 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x5 = 0x128,0x4
0129 00da | | Load_Top At_Offset_2
012a 8213 | | Call 0x1,0x13
012b 00d2 | | Pop_Control Pop_Count_2
012c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
012d 0000 0000 | | .XXX[0x3]
012f 0000 | |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 013e | > | .CONST 0x013e ; Address of begin
0131 01b9 | | .CONST 0x01b9 ; Address of exception handler
0132 0005 | | .CONST 0x0005 ; Number of locals
0133 INIT_0130:
0133 e001 | | Load 0x0,0x1 ; Debug Table 0x5 = .DEBUG 0x0133,0x082e,0x0001,0x0000,0x005a,0x41a5,0x0000,0x006c
; Debug Table 0x5.0x0 = 0x133,0xffff
0134 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0135 02c7 | | Declare_Variable Any
0136 00d8 | | Load_Top At_Offset_0
0137 1c00 | | Execute_Immediate Run_Utility,0x0
0138 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x1 = 0x138,0xfffe
0139 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x5.0x2 = 0x139,0xfffd
013a e210 | | Load 0x1,0x10 ; Debug Table 0x5.0x3 = 0x13a,0xfffc
013b 0322 | " | Declare_Variable Record
013c 00d8 | | Load_Top At_Offset_0
013d 1c00 | | Execute_Immediate Run_Utility,0x0
013e BODY_0130:
013e e009 | | Load 0x0,0x9 ; Debug Table 0x5.0x4 = 0x13e,0x1
013f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0140 e00a | | Load 0x0,0xa
0141 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0142 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0143 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x5 = 0x143,0x2
0144 e402 | | Load 0x2,0x2
0145 0120 | | Execute Any,Is_Value
0146 6803 |h | Jump_Zero 0x14a
0147 e001 | | Load 0x0,0x1
0148 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0149 7801 |x | Jump 0x14b
014a e402 | | Load 0x2,0x2
014b 00da | | Load_Top At_Offset_2
014c e00b | | Load 0x0,0xb
014d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
014e e004 | | Load 0x0,0x4
014f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0150 e404 | | Load 0x2,0x4
0151 e5ff | | Load 0x2,-0x1
0152 4806 |H | Short_Literal 0x6
0153 e219 | | Load 0x1,0x19
0154 170d | | Execute Task,Entry_Call,Field_Number 0xd
0155 00d1 | | Pop_Control Pop_Count_1
0156 c402 | | Store 0x2,0x2
0157 005b | [ | Store_Top Discrete,At_Offset_3
0158 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x6 = 0x158,0x3
0159 7011 |p | Jump_Nonzero 0x16b
015a 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0x7 = 0x15a,0x4
015b e20e | | Load 0x1,0xe
015c 1c08 | | Execute_Immediate Run_Utility,0x8
015d e402 | | Load 0x2,0x2
015e e001 | | Load 0x0,0x1
015f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0160 0119 | | Execute Any,Check_In_Formal_Type
0161 00d9 | | Load_Top At_Offset_1
0162 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0163 e5fc | | Load 0x2,-0x4
0164 016d | m | Execute Variant_Record,Structure_Write
0165 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x8 = 0x165,0x5
0166 4801 |H | Short_Literal 0x1
0167 e219 | | Load 0x1,0x19
0168 170e | | Execute Task,Entry_Call,Field_Number 0xe
0169 00d1 | | Pop_Control Pop_Count_1
016a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
016b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x9 = 0x16b,0x6
016c e402 | | Load 0x2,0x2
016d 0120 | | Execute Any,Is_Value
016e 6804 |h | Jump_Zero 0x173
016f e002 | | Load 0x0,0x2
0170 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0171 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0172 7804 |x | Jump 0x177
0173 e402 | | Load 0x2,0x2
0174 e001 | | Load 0x0,0x1
0175 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0176 011e | | Execute Any,Convert
0177 e5fe | | Load 0x2,-0x2
0178 e404 | | Load 0x2,0x4
0179 e405 | | Load 0x2,0x5
017a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
017b e405 | | Load 0x2,0x5
017c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
017d e405 | | Load 0x2,0x5
017e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
017f e405 | | Load 0x2,0x5
0180 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0181 e003 | | Load 0x0,0x3
0182 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0183 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0184 00eb | | Load_Encached Diana_Cache
0185 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0186 e00c | | Load 0x0,0xc
0187 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0188 e002 | | Load 0x0,0x2
0189 1b12 | | Execute Package,Field_Read,Field_Number 0x12
018a 180f | | Execute Package,Field_Execute,Field_Number 0xf
018b e001 | | Load 0x0,0x1
018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018d 011e | | Execute Any,Convert
018e c402 | | Store 0x2,0x2
018f 005b | [ | Store_Top Discrete,At_Offset_3
0190 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xa = 0x190,0x7
0191 7008 |p | Jump_Nonzero 0x19a
0192 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xb = 0x192,0x8
0193 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0194 4801 |H | Short_Literal 0x1
0195 4800 |H | Short_Literal 0x0
0196 e004 | | Load 0x0,0x4
0197 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0198 00d9 | | Load_Top At_Offset_1
0199 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
019a 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xc = 0x19a,0x9
019b 7014 |p | Jump_Nonzero 0x1b0
019c 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0xd = 0x19c,0xa
019d e20e | | Load 0x1,0xe
019e 1c08 | | Execute_Immediate Run_Utility,0x8
019f e402 | | Load 0x2,0x2
01a0 e001 | | Load 0x0,0x1
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 0119 | | Execute Any,Check_In_Formal_Type
01a3 00d9 | | Load_Top At_Offset_1
01a4 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
01a5 e5fc | | Load 0x2,-0x4
01a6 016d | m | Execute Variant_Record,Structure_Write
01a7 e211 | | Load 0x1,0x11 ; Debug Table 0x5.0xe = 0x1a7,0xb
01a8 e5fd | | Load 0x2,-0x3
01a9 017d | } | Execute Record,Structure_Write
01aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xf = 0x1aa,0xc
01ab 4801 |H | Short_Literal 0x1
01ac e219 | | Load 0x1,0x19
01ad 170e | | Execute Task,Entry_Call,Field_Number 0xe
01ae 00d1 | | Pop_Control Pop_Count_1
01af 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01b0 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x10 = 0x1b0,0xd
01b1 e20e | | Load 0x1,0xe
01b2 1c08 | | Execute_Immediate Run_Utility,0x8
01b3 e5fc | | Load 0x2,-0x4
01b4 016d | m | Execute Variant_Record,Structure_Write
01b5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x11 = 0x1b5,0xe
01b6 e5fd | | Load 0x2,-0x3
01b7 017d | } | Execute Record,Structure_Write
01b8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01b9 TRAP_0130:
01b9 0007 | | Action Break_Optional
01ba 4803 |H | Short_Literal 0x3 ; Debug Table 0x5.0x12 = 0x1ba,0xf
01bb e20e | | Load 0x1,0xe
01bc 1c08 | | Execute_Immediate Run_Utility,0x8
01bd e5fc | | Load 0x2,-0x4
01be 016d | m | Execute Variant_Record,Structure_Write
01bf e211 | | Load 0x1,0x11 ; Debug Table 0x5.0x13 = 0x1bf,0x10
01c0 e5fd | | Load 0x2,-0x3
01c1 017d | } | Execute Record,Structure_Write
01c2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x14 = 0x1c2,0x11
01c3 4801 |H | Short_Literal 0x1
01c4 e219 | | Load 0x1,0x19
01c5 170e | | Execute Task,Entry_Call,Field_Number 0xe
01c6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01c7 0000 | | .XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d1 | | .CONST 0x01d1 ; Address of begin
01c9 01fd | | .CONST 0x01fd ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb e00d | | Load 0x0,0xd ; Debug Table 0x6 = .DEBUG 0x01cb,0x085a,0x0001,0x0000,0x005a,0x41a5,0x0000,0x0083
; Debug Table 0x6.0x0 = 0x1cb,0xffff
01cc 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01cd 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
01ce 02ff | | Declare_Variable Variant_Record
01cf 00d8 | | Load_Top At_Offset_0
01d0 1c00 | | Execute_Immediate Run_Utility,0x0
01d1 BODY_01c8:
01d1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x1d1,0x1
01d2 e5ff | | Load 0x2,-0x1
01d3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01d4 0219 | | Execute Heap_Access,All_Read
01d5 e006 | | Load 0x0,0x6
01d6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01d7 e006 | | Load 0x0,0x6
01d8 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01d9 e00d | | Load 0x0,0xd
01da 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01db 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01dc 00d1 | | Pop_Control Pop_Count_1
01dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x2 = 0x1dd,0x2
01de 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01df 4602 |F | Jump_Case 0x3
01e0 7802 |x | Jump 0x1e3 ; case 0x0
01e1 7807 |x | Jump 0x1e9 ; case 0x1
01e2 7810 |x | Jump 0x1f3 ; case 0x2
01e3 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x3 = 0x1e3,0x3
01e4 e20e | | Load 0x1,0xe
01e5 1c08 | | Execute_Immediate Run_Utility,0x8
01e6 e5fe | | Load 0x2,-0x2
01e7 016d | m | Execute Variant_Record,Structure_Write
01e8 780f |x | Jump 0x1f8
01e9 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x4 = 0x1e9,0x4
01ea e20e | | Load 0x1,0xe
01eb 1c08 | | Execute_Immediate Run_Utility,0x8
01ec 00d9 | | Load_Top At_Offset_1
01ed 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
01ee 00d9 | | Load_Top At_Offset_1
01ef 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
01f0 e5fe | | Load 0x2,-0x2
01f1 016d | m | Execute Variant_Record,Structure_Write
01f2 7805 |x | Jump 0x1f8
01f3 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x5 = 0x1f3,0x5
01f4 e20e | | Load 0x1,0xe
01f5 1c08 | | Execute_Immediate Run_Utility,0x8
01f6 e5fe | | Load 0x2,-0x2
01f7 016d | m | Execute Variant_Record,Structure_Write
01f8 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x6 = 0x1f8,0x6
01f9 4801 |H | Short_Literal 0x1
01fa e219 | | Load 0x1,0x19
01fb 170e | | Execute Task,Entry_Call,Field_Number 0xe
01fc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01fd TRAP_01c8:
01fd 0007 | | Action Break_Optional
01fe 4803 |H | Short_Literal 0x3 ; Debug Table 0x6.0x7 = 0x1fe,0x7
01ff e20e | | Load 0x1,0xe
0200 1c08 | | Execute_Immediate Run_Utility,0x8
0201 e5fe | | Load 0x2,-0x2
0202 016d | m | Execute Variant_Record,Structure_Write
0203 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x8 = 0x203,0x8
0204 4801 |H | Short_Literal 0x1
0205 e219 | | Load 0x1,0x19
0206 170e | | Execute Task,Entry_Call,Field_Number 0xe
0207 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 4608 |F | Jump_Case 0x9 ; Debug Table 0x7 = .DEBUG 0x020b,0x086e,0x0005,0x0000,0x005a,0x41a5,0x0000,0x0090
020c 7808 |x | Jump 0x215 ; case 0x0
020d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
020e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
020f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0210 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0211 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
0212 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
0213 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
0214 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
0215 00da | | Load_Top At_Offset_2
0216 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0217 0125 | % | Execute Any,Set_Constraint
0218 00da | | Load_Top At_Offset_2
0219 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
021a 1c00 | | Execute_Immediate Run_Utility,0x0
021b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
021c 0000 0000 | | .BLANK 0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 0007 | | Action Break_Optional ; Debug Table 0x8 = .DEBUG 0x0223,0x0870,0x0001,0x0000,0x005a,0x41c5,0x0000,0x021f
; Debug Table 0x8.0x0 = 0x223,0x1
0224 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x1 = 0x224,0x401
0225 0007 | | Action Break_Optional ; Debug Table 0x8.0x2 = 0x225,0x1
0226 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x3 = 0x226,0x801
0227 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x4 = 0x227,0x401
0228 0007 | | Action Break_Optional
0229 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x5 = 0x229,0xc01
022a e5fd | | Load 0x2,-0x3 ; Debug Table 0x8.0x6 = 0x22a,0x801
022b e5ff | | Load 0x2,-0x1
022c 4802 |H | Short_Literal 0x2
022d e5fc | | Load 0x2,-0x4
022e e001 | | Load 0x0,0x1
022f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0230 c5fc | | Store 0x2,-0x4
0231 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0232 0000 0000 | | .BLANK 0000[0x6]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0248 | H | .CONST 0x0248 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0006 | | .CONST 0x0006 ; Number of locals
023b INIT_0238:
023b e00e | | Load 0x0,0xe ; Debug Table 0x9 = .DEBUG 0x023b,0x0880,0x0001,0x0000,0x005a,0x41c5,0x0000,0x025a
; Debug Table 0x9.0x0 = 0x23b,0xffff
023c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023d e00e | | Load 0x0,0xe ; Debug Table 0x9.0x1 = 0x23d,0xfffe
023e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023f e006 | | Load 0x0,0x6 ; Debug Table 0x9.0x2 = 0x23f,0xfffd
0240 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0241 02ff | | Declare_Variable Variant_Record
0242 00d8 | | Load_Top At_Offset_0
0243 1c00 | | Execute_Immediate Run_Utility,0x0
0244 e214 | | Load 0x1,0x14 ; Debug Table 0x9.0x3 = 0x244,0xfffc
0245 0007 | | Action Break_Optional
0246 029f 04d3 | | Declare_Subprogram INIT_04d0,For_Call ; Debug Table 0x9.0x4 = 0x246,0xfffb
0248 BODY_0238:
0248 e00e | | Load 0x0,0xe ; Debug Table 0x9.0x5 = 0x248,0x1
0249 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024a 00db | | Load_Top At_Offset_3
024b e216 | | Load 0x1,0x16
024c 4800 |H | Short_Literal 0x0
024d 4800 |H | Short_Literal 0x0
024e 4800 |H | Short_Literal 0x0
024f e00f | | Load 0x0,0xf
0250 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0251 4801 |H | Short_Literal 0x1
0252 e217 | | Load 0x1,0x17
0253 e006 | | Load 0x0,0x6
0254 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0255 00d1 | | Pop_Control Pop_Count_1
0256 c402 | | Store 0x2,0x2
0257 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x6 = 0x257,0x2
0258 680b |h | Jump_Zero 0x264
0259 0092 0611 | | Action Push_String_Extended,0x611 ; "Create: "
; Debug Table 0x9.0x7 = 0x259,0x3
025b e402 | | Load 0x2,0x2
025c e00e | | Load 0x0,0xe
025d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
025e 0122 | " | Execute Any,Make_Root_Type
025f 025e | ^ | Execute Discrete,Convert
0260 1c01 | | Execute_Immediate Run_Utility,0x1
0261 01cc | | Execute Vector,Catenate
0262 8406 | | Call 0x2,0x6
0263 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x9.0x8 = 0x263,0x4
0264 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x9 = 0x264,0x5
0265 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0266 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0267 e218 | | Load 0x1,0x18
0268 039c | | Declare_Variable Heap_Access,By_Allocation
0269 0032 | 2 | Store_Top Heap_Access,At_Offset_2
026a 0007 | | Action Break_Optional ; Debug Table 0x9.0xa = 0x26a,0x6
026b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xb = 0x26b,0x7
026c e00e | | Load 0x0,0xe
026d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
026e 00d9 | | Load_Top At_Offset_1
026f 0219 | | Execute Heap_Access,All_Read
0270 0120 | | Execute Any,Is_Value
0271 6806 |h | Jump_Zero 0x278
0272 e006 | | Load 0x0,0x6
0273 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0274 00da | | Load_Top At_Offset_2
0275 0219 | | Execute Heap_Access,All_Read
0276 00d1 | | Pop_Control Pop_Count_1
0277 7802 |x | Jump 0x27a
0278 00d9 | | Load_Top At_Offset_1
0279 0219 | | Execute Heap_Access,All_Read
027a e216 | | Load 0x1,0x16
027b 4800 |H | Short_Literal 0x0
027c e006 | | Load 0x0,0x6
027d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
027e e00f | | Load 0x0,0xf
027f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0280 4802 |H | Short_Literal 0x2
0281 e404 | | Load 0x2,0x4
0282 e006 | | Load 0x0,0x6
0283 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0284 00da | | Load_Top At_Offset_2
0285 0218 | | Execute Heap_Access,All_Write
0286 c403 | | Store 0x2,0x3
0287 00d1 | | Pop_Control Pop_Count_1
0288 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0xc = 0x288,0x8
0289 680a |h | Jump_Zero 0x294
028a 0092 0612 | | Action Push_String_Extended,0x612 ; "Open: "
; Debug Table 0x9.0xd = 0x28a,0x9
028c e403 | | Load 0x2,0x3
028d e00e | | Load 0x0,0xe
028e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
028f 025e | ^ | Execute Discrete,Convert
0290 1c01 | | Execute_Immediate Run_Utility,0x1
0291 01cc | | Execute Vector,Catenate
0292 8406 | | Call 0x2,0x6
0293 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x9.0xe = 0x293,0xa
0294 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0xf = 0x294,0xb
0295 a5fb | | Store_Unchecked 0x2,-0x5
0296 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x10 = 0x296,0xc
0297 a5fd | | Store_Unchecked 0x2,-0x3
0298 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0299 0000 0000 | | .BLANK 0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a4 | | .CONST 0x02a4 ; Address of begin
02a1 02b2 | | .CONST 0x02b2 ; Address of exception handler
02a2 0002 | | .CONST 0x0002 ; Number of locals
02a3 INIT_02a0:
02a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa = .DEBUG 0x02a3,0x08a4,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0325
; Debug Table 0xa.0x0 = 0x2a3,0xffff
02a4 BODY_02a0:
02a4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x1 = 0x2a4,0x1
02a5 e216 | | Load 0x1,0x16
02a6 48ea |H | Short_Literal 0xea
02a7 e010 | | Load 0x0,0x10
02a8 180d | | Execute Package,Field_Execute,Field_Number 0xd
02a9 0031 | 1 | Store_Top Heap_Access,At_Offset_1
02aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x2 = 0x2aa,0x2
02ab e003 | | Load 0x0,0x3
02ac 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02ad 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02ae a5fd | | Store_Unchecked 0x2,-0x3
02af 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x3 = 0x2af,0x3
02b0 a5fb | | Store_Unchecked 0x2,-0x5
02b1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02b2 TRAP_02a0:
02b2 4887 |H | Short_Literal 0x87
02b3 010f | | Execute Exception,Equal
02b4 680e |h | Jump_Zero 0x2c3
02b5 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0x4 = 0x2b5,0x4
02b6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02b7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02b8 a5fd | | Store_Unchecked 0x2,-0x3
02b9 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x5 = 0x2b9,0x5
02ba a5fb | | Store_Unchecked 0x2,-0x5
02bb e5fc | | Load 0x2,-0x4 ; Debug Table 0xa.0x6 = 0x2bb,0x6
02bc 0092 0613 | | Action Push_String_Extended,0x613 ; "'s Ada Unit failed on Temp_Ada_Heap.Create"
02be e5fe | | Load 0x2,-0x2
02bf e5ff | | Load 0x2,-0x1
02c0 821a | | Call 0x1,0x1a
02c1 c5fc | | Store 0x2,-0x4
02c2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02c3 0100 | | Execute Exception,Raise
02c4 0000 0000 | | .BLANK 0000[0x4]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cd | | .CONST 0x02cd ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0002 | | .CONST 0x0002 ; Number of locals
02cb INIT_02c8:
02cb e00e | | Load 0x0,0xe ; Debug Table 0xb = .DEBUG 0x02cb,0x08b4,0x0001,0x0000,0x005a,0x41c5,0x0000,0x037c
; Debug Table 0xb.0x0 = 0x2cb,0xffff
02cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02cd BODY_02c8:
02cd e00e | | Load 0x0,0xe ; Debug Table 0xb.0x1 = 0x2cd,0x1
02ce 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02cf e004 | | Load 0x0,0x4
02d0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d1 4800 |H | Short_Literal 0x0
02d2 e5fd | | Load 0x2,-0x3
02d3 0219 | | Execute Heap_Access,All_Read
02d4 e006 | | Load 0x0,0x6
02d5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02d6 e006 | | Load 0x0,0x6
02d7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02d8 0059 | Y | Store_Top Discrete,At_Offset_1
02d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x2 = 0x2d9,0x2
02da 6811 |h | Jump_Zero 0x2ec
02db e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0x3 = 0x2db,0x3
02dc 0092 0614 | | Action Push_String_Extended,0x614 ; "'s Code Segment failed on Destroy: "
02de 00da | | Load_Top At_Offset_2
02df e00e | | Load 0x0,0xe
02e0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02e1 0122 | " | Execute Any,Make_Root_Type
02e2 025e | ^ | Execute Discrete,Convert
02e3 1c01 | | Execute_Immediate Run_Utility,0x1
02e4 01cc | | Execute Vector,Catenate
02e5 e5fe | | Load 0x2,-0x2
02e6 e5ff | | Load 0x2,-0x1
02e7 821a | | Call 0x1,0x1a
02e8 c5fc | | Store 0x2,-0x4
02e9 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x4 = 0x2e9,0x4
02ea a5fb | | Store_Unchecked 0x2,-0x5
02eb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xb.0x5 = 0x2eb,0x5
02ec e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x6 = 0x2ec,0x6
02ed 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ef a5fd | | Store_Unchecked 0x2,-0x3
02f0 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x7 = 0x2f0,0x7
02f1 a5fb | | Store_Unchecked 0x2,-0x5
02f2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02f3 0000 | | .XXX[0x1]
02f4 0078 740e | xt | .LITERAL {0x0078740e, 0x00005230}
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fd | | .CONST 0x02fd ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0002 | | .CONST 0x0002 ; Number of locals
02fb INIT_02f8:
02fb e00e | | Load 0x0,0xe ; Debug Table 0xc = .DEBUG 0x02fb,0x08c6,0x0001,0x0000,0x005a,0x41c5,0x0000,0x03dd
; Debug Table 0xc.0x0 = 0x2fb,0xffff
02fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fd BODY_02f8:
02fd e00e | | Load 0x0,0xe ; Debug Table 0xc.0x1 = 0x2fd,0x1
02fe 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ff e216 | | Load 0x1,0x16
0300 4800 |H | Short_Literal 0x0
0301 e5fd | | Load 0x2,-0x3
0302 e003 | | Load 0x0,0x3
0303 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0304 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0305 e003 | | Load 0x0,0x3
0306 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0307 0059 | Y | Store_Top Discrete,At_Offset_1
0308 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x2 = 0x308,0x2
0309 6811 |h | Jump_Zero 0x31b
030a e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x3 = 0x30a,0x3
030b 0092 0615 | | Action Push_String_Extended,0x615 ; "'s Unit failed on Destroy: "
030d 00da | | Load_Top At_Offset_2
030e e00e | | Load 0x0,0xe
030f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0310 0122 | " | Execute Any,Make_Root_Type
0311 025e | ^ | Execute Discrete,Convert
0312 1c01 | | Execute_Immediate Run_Utility,0x1
0313 01cc | | Execute Vector,Catenate
0314 e5fe | | Load 0x2,-0x2
0315 e5ff | | Load 0x2,-0x1
0316 821a | | Call 0x1,0x1a
0317 c5fc | | Store 0x2,-0x4
0318 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x4 = 0x318,0x4
0319 a5fb | | Store_Unchecked 0x2,-0x5
031a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0x5 = 0x31a,0x5
031b e003 | | Load 0x0,0x3 ; Debug Table 0xc.0x6 = 0x31b,0x6
031c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
031d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031e a5fd | | Store_Unchecked 0x2,-0x3
031f 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x7 = 0x31f,0x7
0320 a5fb | | Store_Unchecked 0x2,-0x5
0321 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0322 0000 0000 | | .BLANK 0000[0x6]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032c | , | .CONST 0x032c ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0002 | | .CONST 0x0002 ; Number of locals
032b INIT_0328:
032b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd = .DEBUG 0x032b,0x08d8,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0442
; Debug Table 0xd.0x0 = 0x32b,0xffff
032c BODY_0328:
032c 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x1 = 0x32c,0x1
032d a5fb | | Store_Unchecked 0x2,-0x5
032e e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x2 = 0x32e,0x2
032f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0330 680f |h | Jump_Zero 0x340
0331 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x3 = 0x331,0x3
0332 e5fc | | Load 0x2,-0x4
0333 e5fd | | Load 0x2,-0x3
0334 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0335 e5fe | | Load 0x2,-0x2
0336 e5ff | | Load 0x2,-0x1
0337 821d | | Call 0x1,0x1d
0338 e5fd | | Load 0x2,-0x3
0339 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
033a c5fc | | Store 0x2,-0x4
033b 0059 | Y | Store_Top Discrete,At_Offset_1
033c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x4 = 0x33c,0x4
033d 7002 |p | Jump_Nonzero 0x340
033e 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x5 = 0x33e,0x5
033f a5fb | | Store_Unchecked 0x2,-0x5
0340 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x6 = 0x340,0x6
0341 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0342 680f |h | Jump_Zero 0x352
0343 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x7 = 0x343,0x7
0344 e5fc | | Load 0x2,-0x4
0345 e5fd | | Load 0x2,-0x3
0346 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0347 e5fe | | Load 0x2,-0x2
0348 e5ff | | Load 0x2,-0x1
0349 821d | | Call 0x1,0x1d
034a e5fd | | Load 0x2,-0x3
034b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
034c c5fc | | Store 0x2,-0x4
034d 0059 | Y | Store_Top Discrete,At_Offset_1
034e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x8 = 0x34e,0x8
034f 7002 |p | Jump_Nonzero 0x352
0350 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x9 = 0x350,0x9
0351 a5fb | | Store_Unchecked 0x2,-0x5
0352 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0xa = 0x352,0xa
0353 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0354 e003 | | Load 0x0,0x3
0355 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0356 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0357 700f |p | Jump_Nonzero 0x367
0358 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0xb = 0x358,0xb
0359 e5fc | | Load 0x2,-0x4
035a e5fd | | Load 0x2,-0x3
035b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
035c e5fe | | Load 0x2,-0x2
035d e5ff | | Load 0x2,-0x1
035e 821e | | Call 0x1,0x1e
035f e5fd | | Load 0x2,-0x3
0360 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0361 c5fc | | Store 0x2,-0x4
0362 0059 | Y | Store_Top Discrete,At_Offset_1
0363 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xc = 0x363,0xc
0364 7002 |p | Jump_Nonzero 0x367
0365 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xd = 0x365,0xd
0366 a5fb | | Store_Unchecked 0x2,-0x5
0367 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 0373 | s | .CONST 0x0373 ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0004 | | .CONST 0x0004 ; Number of locals
036b INIT_0368:
036b e210 | | Load 0x1,0x10 ; Debug Table 0xe = .DEBUG 0x036b,0x08f6,0x0001,0x0000,0x005a,0x41c5,0x0000,0x04ce
; Debug Table 0xe.0x0 = 0x36b,0xffff
036c 0322 | " | Declare_Variable Record
036d e211 | | Load 0x1,0x11
036e 00d9 | | Load_Top At_Offset_1
036f 017d | } | Execute Record,Structure_Write
0370 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x1 = 0x370,0xfffe
0371 029f 04eb | | Declare_Subprogram INIT_04e8,For_Call ; Debug Table 0xe.0x2 = 0x371,0xfffd
0373 BODY_0368:
0373 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x3 = 0x373,0x1
0374 e5fc | | Load 0x2,-0x4
0375 e214 | | Load 0x1,0x14
0376 e5fe | | Load 0x2,-0x2
0377 e5ff | | Load 0x2,-0x1
0378 821b | | Call 0x1,0x1b
0379 e402 | | Load 0x2,0x2
037a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
037b c5fc | | Store 0x2,-0x4
037c 005a | Z | Store_Top Discrete,At_Offset_2
037d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x4 = 0x37d,0x2
037e 7002 |p | Jump_Nonzero 0x381
037f 8404 | | Call 0x2,0x4 ; Debug Table 0xe.0x5 = 0x37f,0x3
0380 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0x6 = 0x380,0x4
0381 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x7 = 0x381,0x5
0382 e5fc | | Load 0x2,-0x4
0383 e214 | | Load 0x1,0x14
0384 e5fe | | Load 0x2,-0x2
0385 e5ff | | Load 0x2,-0x1
0386 821b | | Call 0x1,0x1b
0387 e402 | | Load 0x2,0x2
0388 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0389 c5fc | | Store 0x2,-0x4
038a 005a | Z | Store_Top Discrete,At_Offset_2
038b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x8 = 0x38b,0x6
038c 7002 |p | Jump_Nonzero 0x38f
038d 8404 | | Call 0x2,0x4 ; Debug Table 0xe.0x9 = 0x38d,0x7
038e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0xa = 0x38e,0x8
038f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0xb = 0x38f,0x9
0390 e5fc | | Load 0x2,-0x4
0391 e215 | | Load 0x1,0x15
0392 e5fe | | Load 0x2,-0x2
0393 e5ff | | Load 0x2,-0x1
0394 821c | | Call 0x1,0x1c
0395 e402 | | Load 0x2,0x2
0396 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0397 c5fc | | Store 0x2,-0x4
0398 005a | Z | Store_Top Discrete,At_Offset_2
0399 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0xc = 0x399,0xa
039a 7002 |p | Jump_Nonzero 0x39d
039b 8404 | | Call 0x2,0x4 ; Debug Table 0xe.0xd = 0x39b,0xb
039c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0xe = 0x39c,0xc
039d 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0xf = 0x39d,0xd
039e e5fd | | Load 0x2,-0x3
039f 017d | } | Execute Record,Structure_Write
03a0 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x10 = 0x3a0,0xe
03a1 a5fb | | Store_Unchecked 0x2,-0x5
03a2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03a3 0000 0000 | | .BLANK 0000[0x5]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ad | | .CONST 0x03ad ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0002 | | .CONST 0x0002 ; Number of locals
03ab INIT_03a8:
03ab e00e | | Load 0x0,0xe ; Debug Table 0xf = .DEBUG 0x03ab,0x091a,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0556
; Debug Table 0xf.0x0 = 0x3ab,0xffff
03ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ad BODY_03a8:
03ad e5fd | | Load 0x2,-0x3 ; Debug Table 0xf.0x1 = 0x3ad,0x1
03ae e00e | | Load 0x0,0xe
03af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b0 00d9 | | Load_Top At_Offset_1
03b1 0219 | | Execute Heap_Access,All_Read
03b2 e006 | | Load 0x0,0x6
03b3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03b4 00da | | Load_Top At_Offset_2
03b5 0218 | | Execute Heap_Access,All_Write
03b6 005a | Z | Store_Top Discrete,At_Offset_2
03b7 00d1 | | Pop_Control Pop_Count_1
03b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x3b8,0x2
03b9 7003 |p | Jump_Nonzero 0x3bd
03ba 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x3 = 0x3ba,0x3
03bb a5fb | | Store_Unchecked 0x2,-0x5
03bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03bd 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0x4 = 0x3bd,0x4
03be a5fb | | Store_Unchecked 0x2,-0x5
03bf e5fc | | Load 0x2,-0x4 ; Debug Table 0xf.0x5 = 0x3bf,0x5
03c0 0092 0616 | | Action Push_String_Extended,0x616 ; "'s code segment failed reset_for_modification: "
03c2 00da | | Load_Top At_Offset_2
03c3 e00e | | Load 0x0,0xe
03c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c5 025e | ^ | Execute Discrete,Convert
03c6 1c01 | | Execute_Immediate Run_Utility,0x1
03c7 01cc | | Execute Vector,Catenate
03c8 e5fe | | Load 0x2,-0x2
03c9 e5ff | | Load 0x2,-0x1
03ca 821a | | Call 0x1,0x1a
03cb c5fc | | Store 0x2,-0x4
03cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03cd 0000 0000 | | .XXX[0x3]
03cf 0000 | |
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03db | | .CONST 0x03db ; Address of begin
03d1 03e1 | | .CONST 0x03e1 ; Address of exception handler
03d2 0002 | | .CONST 0x0002 ; Number of locals
03d3 INIT_03d0:
03d3 0007 | | Action Break_Optional ; Debug Table 0x10 = .DEBUG 0x03d3,0x0928,0x0002,0x0000,0x005a,0x41c5,0x0000,0x05ac
; Debug Table 0x10.0x0 = 0x3d3,0xffff
03d4 0007 | | Action Break_Optional ; Debug Table 0x10.0x1 = 0x3d4,0xfffe
03d5 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x10.0x2 = 0x3d5,0xfffd
03d6 00db | | Load_Top At_Offset_3
03d7 e003 | | Load 0x0,0x3
03d8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03da 0031 | 1 | Store_Top Heap_Access,At_Offset_1
03db BODY_03d0:
03db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x3 = 0x3db,0x1
03dc e011 | | Load 0x0,0x11
03dd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03de 613d |a= | Indirect_Literal Discrete,0x51c,{0x00000000, 0x000a0000}
03df 027d | } | Execute Discrete,Greater
03e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e1 TRAP_03d0:
03e1 0007 | | Action Break_Optional
03e2 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x4 = 0x3e2,0x2
03e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e4 0000 0000 | | .BLANK 0000[0x4]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03ec | | .CONST 0x03ec ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0002 | | .CONST 0x0002 ; Number of locals
03eb INIT_03e8:
03eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11 = .DEBUG 0x03eb,0x0934,0x0001,0x0000,0x005a,0x41c5,0x0000,0x05e7
; Debug Table 0x11.0x0 = 0x3eb,0xffff
03ec BODY_03e8:
03ec e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0x1 = 0x3ec,0x1
03ed 8222 | " | Call 0x1,0x22
03ee 681c |h | Jump_Zero 0x40b
03ef 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x2 = 0x3ef,0x2
03f0 e5fc | | Load 0x2,-0x4
03f1 e5fd | | Load 0x2,-0x3
03f2 e5fe | | Load 0x2,-0x2
03f3 e5ff | | Load 0x2,-0x1
03f4 821e | | Call 0x1,0x1e
03f5 c5fd | | Store 0x2,-0x3
03f6 c5fc | | Store 0x2,-0x4
03f7 0059 | Y | Store_Top Discrete,At_Offset_1
03f8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x3f8,0x3
03f9 7003 |p | Jump_Nonzero 0x3fd
03fa 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x4 = 0x3fa,0x4
03fb a5fb | | Store_Unchecked 0x2,-0x5
03fc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x11.0x5 = 0x3fc,0x5
03fd 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x6 = 0x3fd,0x6
03fe e5fc | | Load 0x2,-0x4
03ff e215 | | Load 0x1,0x15
0400 e5fe | | Load 0x2,-0x2
0401 e5ff | | Load 0x2,-0x1
0402 821c | | Call 0x1,0x1c
0403 c5fd | | Store 0x2,-0x3
0404 c5fc | | Store 0x2,-0x4
0405 0059 | Y | Store_Top Discrete,At_Offset_1
0406 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x7 = 0x406,0x7
0407 7009 |p | Jump_Nonzero 0x411
0408 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x8 = 0x408,0x8
0409 a5fb | | Store_Unchecked 0x2,-0x5
040a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x11.0x9 = 0x40a,0x9
040b e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0xa = 0x40b,0xa
040c e003 | | Load 0x0,0x3
040d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
040e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
040f e003 | | Load 0x0,0x3
0410 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0411 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0xb = 0x411,0xb
0412 a5fb | | Store_Unchecked 0x2,-0x5
0413 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0414 0000 0000 | | .BLANK 0000[0x4]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041c | | .CONST 0x041c ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0002 | | .CONST 0x0002 ; Number of locals
041b INIT_0418:
041b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12 = .DEBUG 0x041b,0x094e,0x0001,0x0000,0x005a,0x41c5,0x0000,0x064b
; Debug Table 0x12.0x0 = 0x41b,0xffff
041c BODY_0418:
041c 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x41c,0x1
041d a5fb | | Store_Unchecked 0x2,-0x5
041e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12.0x2 = 0x41e,0x2
041f e5fc | | Load 0x2,-0x4
0420 e5fd | | Load 0x2,-0x3
0421 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0422 e5fe | | Load 0x2,-0x2
0423 e5ff | | Load 0x2,-0x1
0424 8221 | ! | Call 0x1,0x21
0425 e5fd | | Load 0x2,-0x3
0426 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0427 c5fc | | Store 0x2,-0x4
0428 0059 | Y | Store_Top Discrete,At_Offset_1
0429 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x3 = 0x429,0x3
042a 7003 |p | Jump_Nonzero 0x42e
042b 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x4 = 0x42b,0x4
042c a5fb | | Store_Unchecked 0x2,-0x5
042d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x12.0x5 = 0x42d,0x5
042e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12.0x6 = 0x42e,0x6
042f e5fc | | Load 0x2,-0x4
0430 e5fd | | Load 0x2,-0x3
0431 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0432 e5fe | | Load 0x2,-0x2
0433 e5ff | | Load 0x2,-0x1
0434 8221 | ! | Call 0x1,0x21
0435 e5fd | | Load 0x2,-0x3
0436 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0437 c5fc | | Store 0x2,-0x4
0438 0059 | Y | Store_Top Discrete,At_Offset_1
0439 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x7 = 0x439,0x7
043a 7003 |p | Jump_Nonzero 0x43e
043b 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x8 = 0x43b,0x8
043c a5fb | | Store_Unchecked 0x2,-0x5
043d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x12.0x9 = 0x43d,0x9
043e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12.0xa = 0x43e,0xa
043f e5fc | | Load 0x2,-0x4
0440 e5fd | | Load 0x2,-0x3
0441 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0442 e5fe | | Load 0x2,-0x2
0443 e5ff | | Load 0x2,-0x1
0444 8223 | # | Call 0x1,0x23
0445 e5fd | | Load 0x2,-0x3
0446 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0447 c5fc | | Store 0x2,-0x4
0448 0059 | Y | Store_Top Discrete,At_Offset_1
0449 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xb = 0x449,0xb
044a 7003 |p | Jump_Nonzero 0x44e
044b 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0xc = 0x44b,0xc
044c a5fb | | Store_Unchecked 0x2,-0x5
044d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x12.0xd = 0x44d,0xd
044e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
044f 0000 | | .XXX[0x1]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0464 | d | .CONST 0x0464 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0007 | | .CONST 0x0007 ; Number of locals
0453 INIT_0450:
0453 e012 | | Load 0x0,0x12 ; Debug Table 0x13 = .DEBUG 0x0453,0x096c,0x0001,0x0000,0x005a,0x41c5,0x0000,0x06b4
; Debug Table 0x13.0x0 = 0x453,0xffff
0454 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0455 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
0456 02c7 | | Declare_Variable Any
0457 e012 | | Load 0x0,0x12
0458 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0459 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
045a c402 | | Store 0x2,0x2
045b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13.0x1 = 0x45b,0xfffe
045c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13.0x2 = 0x45c,0xfffd
045d e012 | | Load 0x0,0x12 ; Debug Table 0x13.0x3 = 0x45d,0xfffc
045e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
045f 4fff |O | Short_Literal -0x1 ; Debug Table 0x13.0x4 = 0x45f,0xfffb
0460 4802 |H | Short_Literal 0x2
0461 0099 | | Action Reference_Dynamic
0462 029f 0503 | | Declare_Subprogram INIT_0500,For_Call ; Debug Table 0x13.0x5 = 0x462,0xfffa
0464 BODY_0450:
0464 e00b | | Load 0x0,0xb ; Debug Table 0x13.0x6 = 0x464,0x1
0465 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0466 4800 |H | Short_Literal 0x0
0467 e5fe | | Load 0x2,-0x2
0468 e003 | | Load 0x0,0x3
0469 1b13 | | Execute Package,Field_Read,Field_Number 0x13
046a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
046b 8407 | | Call 0x2,0x7 ; Debug Table 0x13.0x7 = 0x46b,0x2
046c 0007 | | Action Break_Optional ; Debug Table 0x13.0x8 = 0x46c,0x3
046d e403 | | Load 0x2,0x3 ; Debug Table 0x13.0x9 = 0x46d,0x401
046e 0007 | | Action Break_Optional
046f 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x13.0xa = 0x46f,0x402
0470 0007 | | Action Break_Optional ; Debug Table 0x13.0xb = 0x470,0x403
0471 0007 | | Action Break_Optional ; Debug Table 0x13.0xc = 0x471,0x404
0472 0b4e | N | Execute_Immediate Case_Compare,0x4e ; Debug Table 0x13.0xd = 0x472,0x3
0473 7001 |p | Jump_Nonzero 0x475
0474 7837 |x7 | Jump 0x4ac ; Debug Table 0x13.0xe = 0x474,0x9
0475 0092 0617 | | Action Push_String_Extended,0x617 ; "command_procedure"
; Debug Table 0x13.0xf = 0x475,0x4
0477 482c |H, | Short_Literal 0x2c
0478 00eb | | Load_Encached Diana_Cache
0479 187a | z | Execute Package,Field_Execute,Field_Number 0x7a
047a a404 | | Store_Unchecked 0x2,0x4
047b 0007 | | Action Break_Optional ; Debug Table 0x13.0x10 = 0x47b,0x5
047c 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13.0x11 = 0x47c,0x801
047d 4895 |H | Short_Literal 0x95 ; Debug Table 0x13.0x12 = 0x47d,0x5
047e 00eb | | Load_Encached Diana_Cache
047f 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0480 e403 | | Load 0x2,0x3
0481 0007 | | Action Break_Optional
0482 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13.0x13 = 0x482,0xc01
0483 4894 |H | Short_Literal 0x94 ; Debug Table 0x13.0x14 = 0x483,0x801
0484 00eb | | Load_Encached Diana_Cache
0485 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0486 487b |H{ | Short_Literal 0x7b
0487 00eb | | Load_Encached Diana_Cache
0488 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
0489 e404 | | Load 0x2,0x4
048a 4848 |HH | Short_Literal 0x48
048b 00eb | | Load_Encached Diana_Cache
048c 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
048d 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13.0x15 = 0x48d,0x1001
048e 4884 |H | Short_Literal 0x84 ; Debug Table 0x13.0x16 = 0x48e,0xc01
048f 00eb | | Load_Encached Diana_Cache
0490 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0491 48a8 |H | Short_Literal 0xa8
0492 00eb | | Load_Encached Diana_Cache
0493 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
0494 a403 | | Store_Unchecked 0x2,0x3
0495 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0x17 = 0x495,0x6
0496 00eb | | Load_Encached Diana_Cache
0497 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0498 00eb | | Load_Encached Diana_Cache
0499 18ce | | Execute Package,Field_Execute,Field_Number 0xce
049a e404 | | Load 0x2,0x4
049b 4963 |Ic | Short_Literal 0x163
049c 00eb | | Load_Encached Diana_Cache
049d 0096 | | Execute Package,Entry
049e e404 | | Load 0x2,0x4 ; Debug Table 0x13.0x18 = 0x49e,0x7
049f 00eb | | Load_Encached Diana_Cache
04a0 18ec | | Execute Package,Field_Execute,Field_Number 0xec
04a1 00eb | | Load_Encached Diana_Cache
04a2 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
04a3 e404 | | Load 0x2,0x4
04a4 4957 |IW | Short_Literal 0x157
04a5 00eb | | Load_Encached Diana_Cache
04a6 0096 | | Execute Package,Entry
04a7 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0x19 = 0x4a7,0x8
04a8 e404 | | Load 0x2,0x4
04a9 496a |Ij | Short_Literal 0x16a
04aa 00eb | | Load_Encached Diana_Cache
04ab 0096 | | Execute Package,Entry
04ac 00d1 | | Pop_Control Pop_Count_1
04ad e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x1a = 0x4ad,0xa
04ae e012 | | Load 0x0,0x12
04af 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04b0 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04b1 e012 | | Load 0x0,0x12 ; Debug Table 0x13.0x1b = 0x4b1,0xb
04b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b3 e004 | | Load 0x0,0x4
04b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b5 e403 | | Load 0x2,0x3
04b6 e012 | | Load 0x0,0x12
04b7 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04b8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04b9 005b | [ | Store_Top Discrete,At_Offset_3
04ba 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x1c = 0x4ba,0xc
04bb 6810 |h | Jump_Zero 0x4cc
04bc e5fc | | Load 0x2,-0x4 ; Debug Table 0x13.0x1d = 0x4bc,0xd
04bd 0092 0618 | | Action Push_String_Extended,0x618 ; "'s copy's Unit failed Set_Root: "
04bf e405 | | Load 0x2,0x5
04c0 e012 | | Load 0x0,0x12
04c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04c2 025e | ^ | Execute Discrete,Convert
04c3 1c01 | | Execute_Immediate Run_Utility,0x1
04c4 01cc | | Execute Vector,Catenate
04c5 e5fd | | Load 0x2,-0x3
04c6 e406 | | Load 0x2,0x6
04c7 821a | | Call 0x1,0x1a
04c8 c5fc | | Store 0x2,-0x4
04c9 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x1e = 0x4c9,0xe
04ca a5fb | | Store_Unchecked 0x2,-0x5
04cb 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x13.0x1f = 0x4cb,0xf
04cc 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x20 = 0x4cc,0x10
04cd a5fb | | Store_Unchecked 0x2,-0x5
04ce 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04cf 0000 | | .XXX[0x1]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d3 | | .CONST 0x04d3 ; Address of begin
04d1 0004 | | .CONST 0x0004 ; Address of exception handler
04d2 0001 | | .CONST 0x0001 ; Number of locals
04d3 BODY_04d0:
04d3 INIT_04d0:
04d3 e002 | | Load 0x0,0x2 ; Debug Table 0x14 = .DEBUG 0x04d3,0x09b0,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0291
; Debug Table 0x14.0x0 = 0x4d3,0x1
04d4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d6 a5fd | | Store_Unchecked 0x2,-0x3
04d7 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x1 = 0x4d7,0x2
04d8 a5fb | | Store_Unchecked 0x2,-0x5
04d9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x2 = 0x4d9,0x3
04da 0092 0619 | | Action Push_String_Extended,0x619 ; "'s code segment failed on "
04dc e7ff | | Load 0x3,-0x1
04dd 01cc | | Execute Vector,Catenate
04de e5fe | | Load 0x2,-0x2
04df e5ff | | Load 0x2,-0x1
04e0 821a | | Call 0x1,0x1a
04e1 c5fc | | Store 0x2,-0x4
04e2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04e3 0000 0000 | | .BLANK 0000[0x5]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb | | .CONST 0x04eb ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0001 | | .CONST 0x0001 ; Number of locals
04eb BODY_04e8:
04eb INIT_04e8:
04eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x15 = .DEBUG 0x04eb,0x09b8,0x0001,0x0000,0x005a,0x41c5,0x0000,0x04f6
; Debug Table 0x15.0x0 = 0x4eb,0x1
04ec e5fc | | Load 0x2,-0x4
04ed e402 | | Load 0x2,0x2
04ee e5fe | | Load 0x2,-0x2
04ef e5ff | | Load 0x2,-0x1
04f0 821f | | Call 0x1,0x1f
04f1 00d1 | | Pop_Control Pop_Count_1
04f2 c5fc | | Store 0x2,-0x4
04f3 c5fb | | Store 0x2,-0x5
04f4 e211 | | Load 0x1,0x11 ; Debug Table 0x15.0x1 = 0x4f4,0x2
04f5 e5fd | | Load 0x2,-0x3
04f6 017d | } | Execute Record,Structure_Write
04f7 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x2 = 0x4f7,0x3
04f8 a5fb | | Store_Unchecked 0x2,-0x5
04f9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04fa 0000 0000 | | .BLANK 0000[0x6]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503 | | .CONST 0x0503 ; Address of begin
0501 0509 | | .CONST 0x0509 ; Address of exception handler
0502 0001 | | .CONST 0x0001 ; Number of locals
0503 BODY_0500:
0503 INIT_0500:
0503 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16 = .DEBUG 0x0503,0x09c0,0x0004,0x0000,0x005a,0x41c5,0x0000,0x072d
; Debug Table 0x16.0x0 = 0x503,0x1
0504 e5ff | | Load 0x2,-0x1
0505 e013 | | Load 0x0,0x13
0506 180d | | Execute Package,Field_Execute,Field_Number 0xd
0507 c403 | | Store 0x2,0x3
0508 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0509 TRAP_0500:
0509 0007 | | Action Break_Optional
050a e5fc | | Load 0x2,-0x4 ; Debug Table 0x16.0x1 = 0x50a,0x2
050b 0092 061a | | Action Push_String_Extended,0x61a ; " failed Tree_Compaction.Compact: unhandled exception"
050d e5fd | | Load 0x2,-0x3
050e e406 | | Load 0x2,0x6
050f 821a | | Call 0x1,0x1a
0510 c5fc | | Store 0x2,-0x4
0511 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x2 = 0x511,0x3
0512 a5fb | | Store_Unchecked 0x2,-0x5
0513 e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x3 = 0x513,0x4
0514 e012 | | Load 0x0,0x12
0515 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0516 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0517 00cc | | Action Pop_Block ; Debug Table 0x16.0x4 = 0x517,0x5
0518 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0519 0000 0000 | | .XXX[0x3]
051b 0000 | |
051c 0000 0000 | | .LITERAL {0x00000000, 0x000a0000}
0520 0548 0004 | H | .XXX[0x3]
0522 0017 | |
0523 4806 |H | Short_Literal 0x6 ; Debug Table 0x17 = .DEBUG 0x0523,0x09cc,0x0000,0x0000,0x005a,0x41c5,0x0000,0x005a
0524 02cb | | Declare_Variable Entry
0525 4801 |H | Short_Literal 0x1
0526 02cb | | Declare_Variable Entry
0527 00bf | | Action Accept_Activation
0528 4802 |H | Short_Literal 0x2 ; Debug Table 0x18 = .DEBUG 0x0528,0x09ce,0x0000,0x0000,0x005a,0x41c5,0x0000,0x07ee
; Debug Table 0x18.0x0 = 0x528,0xffff
0529 032a | * | Declare_Type Record,Incomplete
052a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x1 = 0x52a,0xfffe
052b 02a0 | | Declare_Subprogram Null_Subprogram
052c 4818 |H | Short_Literal 0x18
052d 03d3 | | Declare_Type Access,Defined,Accesses_Protected
052e e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x2 = 0x52e,0xfffd
052f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0530 00d9 | | Load_Top At_Offset_1
0531 029f 0553 | S| Declare_Subprogram INIT_0550,For_Call
0533 e20f | | Load 0x1,0xf
0534 0326 | & | Complete_Type Record,By_Defining
0535 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x3 = 0x535,0xfffc
0536 0007 | | Action Break_Optional
0537 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x4 = 0x537,0xfffb
0538 0007 | | Action Break_Optional
0539 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x5 = 0x539,0xfffa
053a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
053b 0322 | " | Declare_Variable Record
053c 00d8 | | Load_Top At_Offset_0
053d 1c00 | | Execute_Immediate Run_Utility,0x0
053e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x18.0x6 = 0x53e,0xfff9
053f e002 | | Load 0x0,0x2 ; Debug Table 0x18.0x7 = 0x53f,0xfff8
0540 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0541 02c7 | | Declare_Variable Any
0542 00d8 | | Load_Top At_Offset_0
0543 1c00 | | Execute_Immediate Run_Utility,0x0
0544 e210 | | Load 0x1,0x10 ; Debug Table 0x18.0x8 = 0x544,0xfff7
0545 029f 056b | k| Declare_Subprogram INIT_0568,For_Call
0547 00bc | | Action Signal_Activated
0548 00cf | | Action Mark_Auxiliary
0549 0007 | | Action Break_Optional ; Debug Table 0x18.0x9 = 0x549,0x1
054a 8217 | | Call 0x1,0x17 ; Debug Table 0x18.0xa = 0x54a,0x2
054b 00c9 | | Action Pop_Auxiliary_Loop
054c 7ffd | | Jump 0x54a
054d 0000 0000 | | .XXX[0x3]
054f 0000 | |
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553 | S | .CONST 0x0553 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0001 | | .CONST 0x0001 ; Number of locals
0553 BODY_0550:
0553 INIT_0550:
0553 4608 |F | Jump_Case 0x9 ; Debug Table 0x19 = .DEBUG 0x0553,0x09e6,0x0005,0x0000,0x005a,0x41c5,0x0000,0x07f8
0554 7808 |x | Jump 0x55d ; case 0x0
0555 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0556 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0557 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0558 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0559 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
055a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
055b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
055c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
055d e001 | | Load 0x0,0x1
055e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
055f 00db | | Load_Top At_Offset_3
0560 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0561 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0562 0000 0000 | | .BLANK 0000[0x6]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 0574 | t | .CONST 0x0574 ; Address of begin
0569 057b | { | .CONST 0x057b ; Address of exception handler
056a 0002 | | .CONST 0x0002 ; Number of locals
056b INIT_0568:
056b 480e 48b0 |H H | Declare_Variable Select 0x000, 0x002, ; Debug Table 0x1a = .DEBUG 0x056b,0x09e8,0x0004,0x0000,0x005a,0x41c5,0x0000,0x091c
056d 480d 48b7 |H H | [0x000]: 0x000 = 0x0000,
056f 4800 4800 |H H | [0x00d]: 0x0b7 = 0x05b8,
0571 4800 4802 |H H | [0x00e]: 0x0b0 = 0x0580
0573 02cf | |
0574 BODY_0568:
0574 00cf | | Action Mark_Auxiliary
0575 0007 | | Action Break_Optional ; Debug Table 0x1a.0x0 = 0x575,0x1
0576 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1a.0x1 = 0x576,0x2
0577 013f | ? | Execute Select,Rendezvous
0578 00d1 | | Pop_Control Pop_Count_1
0579 00c9 | | Action Pop_Auxiliary_Loop
057a 7ffb | | Jump 0x576
057b TRAP_0568:
057b 0007 | | Action Break_Optional
057c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x1a.0x2 = 0x57c,0x5
057d 0000 0000 | | .XXX[0x3]
057f 0000 | |
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; See instruction 0x02cf at 0x56b, index=0xe
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 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b = .DEBUG 0x0583,0x09f0,0x0003,0x0000,0x005a,0x41c5,0x0000,0x090d
; Debug Table 0x1b.0x0 = 0x583,0x1
0584 e001 | | Load 0x0,0x1
0585 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0586 017e | ~ | Execute Record,Not_Equal
0587 682f |h/ | Jump_Zero 0x5b7
0588 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x1 = 0x588,0x2
0589 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
058a e003 | | Load 0x0,0x3
058b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
058c 6808 |h | Jump_Zero 0x595
058d 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x2 = 0x58d,0x3
058e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
058f 4801 |H | Short_Literal 0x1
0590 4800 |H | Short_Literal 0x0
0591 e003 | | Load 0x0,0x3
0592 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0593 e7fe | | Load 0x3,-0x2
0594 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0595 e212 | | Load 0x1,0x12 ; Debug Table 0x1b.0x3 = 0x595,0x4
0596 700c |p | Jump_Nonzero 0x5a3
0597 e20f | | Load 0x1,0xf ; Debug Table 0x1b.0x4 = 0x597,0x5
0598 0322 | " | Declare_Variable Record
0599 e7fe | | Load 0x3,-0x2
059a 00d9 | | Load_Top At_Offset_1
059b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
059c e211 | | Load 0x1,0x11
059d 00d9 | | Load_Top At_Offset_1
059e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
059f e210 | | Load 0x1,0x10
05a0 03b6 | | Declare_Variable Access,By_Allocation,With_Value
05a1 a216 | | Store_Unchecked 0x1,0x16
05a2 780e |x | Jump 0x5b1
05a3 e212 | | Load 0x1,0x12 ; Debug Table 0x1b.0x5 = 0x5a3,0x6
05a4 a216 | | Store_Unchecked 0x1,0x16
05a5 e212 | | Load 0x1,0x12 ; Debug Table 0x1b.0x6 = 0x5a5,0x7
05a6 0227 | ' | Execute Access,All_Reference
05a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05a8 a212 | | Store_Unchecked 0x1,0x12
05a9 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x7 = 0x5a9,0x8
05aa e216 | | Load 0x1,0x16
05ab 0227 | ' | Execute Access,All_Reference
05ac 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05ad e211 | | Load 0x1,0x11 ; Debug Table 0x1b.0x8 = 0x5ad,0x9
05ae e216 | | Load 0x1,0x16
05af 0227 | ' | Execute Access,All_Reference
05b0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
05b1 e216 | | Load 0x1,0x16 ; Debug Table 0x1b.0x9 = 0x5b1,0xa
05b2 a211 | | Store_Unchecked 0x1,0x11
05b3 e001 | | Load 0x0,0x1 ; Debug Table 0x1b.0xa = 0x5b3,0xb
05b4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05b5 e7fe | | Load 0x3,-0x2
05b6 017d | } | Execute Record,Structure_Write
05b7 4101 |A | End_Rendezvous 0x1
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; See instruction 0x02cf at 0x56b, index=0xd
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb e002 | | Load 0x0,0x2 ; Debug Table 0x1c = .DEBUG 0x05bb,0x0a08,0x0003,0x0000,0x005a,0x41c5,0x0000,0x08bb
; Debug Table 0x1c.0x0 = 0x5bb,0x1
05bc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05bd c215 | | Store 0x1,0x15
05be e211 | | Load 0x1,0x11 ; Debug Table 0x1c.0x1 = 0x5be,0x2
05bf 700a |p | Jump_Nonzero 0x5ca
05c0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1c.0x2 = 0x5c0,0x3
05c1 e215 | | Load 0x1,0x15
05c2 e213 | | Load 0x1,0x13
05c3 e7fd | | Load 0x3,-0x3
05c4 e7fe | | Load 0x3,-0x2
05c5 8004 | | Call 0x0,0x4
05c6 00d1 | | Pop_Control Pop_Count_1
05c7 c215 | | Store 0x1,0x15
05c8 c214 | | Store 0x1,0x14
05c9 781f |x | Jump 0x5e9
05ca e211 | | Load 0x1,0x11 ; Debug Table 0x1c.0x3 = 0x5ca,0x4
05cb 0227 | ' | Execute Access,All_Reference
05cc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
05cd e213 | | Load 0x1,0x13
05ce 017d | } | Execute Record,Structure_Write
05cf e211 | | Load 0x1,0x11 ; Debug Table 0x1c.0x4 = 0x5cf,0x5
05d0 a216 | | Store_Unchecked 0x1,0x16
05d1 e211 | | Load 0x1,0x11 ; Debug Table 0x1c.0x5 = 0x5d1,0x6
05d2 0227 | ' | Execute Access,All_Reference
05d3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05d4 a211 | | Store_Unchecked 0x1,0x11
05d5 e001 | | Load 0x0,0x1 ; Debug Table 0x1c.0x6 = 0x5d5,0x7
05d6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05d7 e216 | | Load 0x1,0x16
05d8 0227 | ' | Execute Access,All_Reference
05d9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05da e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x7 = 0x5da,0x8
05db e216 | | Load 0x1,0x16
05dc 0227 | ' | Execute Access,All_Reference
05dd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
05de e216 | | Load 0x1,0x16 ; Debug Table 0x1c.0x8 = 0x5de,0x9
05df a212 | | Store_Unchecked 0x1,0x12
05e0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1c.0x9 = 0x5e0,0xa
05e1 e215 | | Load 0x1,0x15
05e2 e213 | | Load 0x1,0x13
05e3 e7fd | | Load 0x3,-0x3
05e4 e7fe | | Load 0x3,-0x2
05e5 8005 | | Call 0x0,0x5
05e6 00d1 | | Pop_Control Pop_Count_1
05e7 c215 | | Store 0x1,0x15
05e8 c214 | | Store 0x1,0x14
05e9 e214 | | Load 0x1,0x14 ; Debug Table 0x1c.0xa = 0x5e9,0xb
05ea 6809 |h | Jump_Zero 0x5f4
05eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1c.0xb = 0x5eb,0xc
05ec e215 | | Load 0x1,0x15
05ed e7fd | | Load 0x3,-0x3
05ee e213 | | Load 0x1,0x13
05ef 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05f0 e7fe | | Load 0x3,-0x2
05f1 8006 | | Call 0x0,0x6
05f2 c215 | | Store 0x1,0x15
05f3 c214 | | Store 0x1,0x14
05f4 e7fc | | Load 0x3,-0x4 ; Debug Table 0x1c.0xc = 0x5f4,0xd
05f5 e213 | | Load 0x1,0x13
05f6 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
05f7 e214 | | Load 0x1,0x14 ; Debug Table 0x1c.0xd = 0x5f7,0xe
05f8 6804 |h | Jump_Zero 0x5fd
05f9 e7fc | | Load 0x3,-0x4 ; Debug Table 0x1c.0xe = 0x5f9,0xf
05fa e003 | | Load 0x0,0x3
05fb 181a | | Execute Package,Field_Execute,Field_Number 0x1a
05fc 7808 |x | Jump 0x605
05fd e213 | | Load 0x1,0x13 ; Debug Table 0x1c.0xf = 0x5fd,0x10
05fe 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05ff 4801 |H | Short_Literal 0x1
0600 4800 |H | Short_Literal 0x0
0601 e003 | | Load 0x0,0x3
0602 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0603 e213 | | Load 0x1,0x13
0604 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0605 e213 | | Load 0x1,0x13 ; Debug Table 0x1c.0x10 = 0x605,0x11
0606 e7fb | | Load 0x3,-0x5
0607 017d | } | Execute Record,Structure_Write
0608 e215 | | Load 0x1,0x15 ; Debug Table 0x1c.0x11 = 0x608,0x12
0609 c7fa | | Store 0x3,-0x6
060a e214 | | Load 0x1,0x14 ; Debug Table 0x1c.0x12 = 0x60a,0x13
060b a7f9 | | Store_Unchecked 0x3,-0x7
060c 4103 |A | End_Rendezvous 0x3
060d ; --------------------------------------------------------------------------------------
060d ; STRING TABLE
060d ; --------------------------------------------------------------------------------------
060d 001e | | .STRTAB 0x001e->0x061c ; "SUCCESS"
060e 0023 | # | .STRTAB 0x0023->0x061f ; "UNHANDLED_EXCEPTION_FAILURE"
060f 003c | < | .STRTAB 0x003c->0x062d ; "CODE_GENERATION_FAILURE"
0610 0051 | Q | .STRTAB 0x0051->0x0638 ; "OTHER_FAILURE"
0611 005c | \ | .STRTAB 0x005c->0x063f ; "Create: "
0612 0062 | b | .STRTAB 0x0062->0x0643 ; "Open: "
0613 0066 | f | .STRTAB 0x0066->0x0646 ; "'s Ada Unit failed on Temp_Ada_Heap.Create"
0614 008e | | .STRTAB 0x008e->0x065b ; "'s Code Segment failed on Destroy: "
0615 00af | | .STRTAB 0x00af->0x066c ; "'s Unit failed on Destroy: "
0616 00c8 | | .STRTAB 0x00c8->0x067a ; "'s code segment failed reset_for_modification: "
0617 00f5 | | .STRTAB 0x00f5->0x0691 ; "command_procedure"
0618 0104 | | .STRTAB 0x0104->0x069a ; "'s copy's Unit failed Set_Root: "
0619 0122 | " | .STRTAB 0x0122->0x06aa ; "'s code segment failed on "
061a 013a | : | .STRTAB 0x013a->0x06b7 ; " failed Tree_Compaction.Compact: unhandled exception"
061b 016c | l | .STREND 0x016c->0x06d1
061c 5355 4343 |SUCC| .STRTAB_STRINGS
06d1 0000 0000 | | .BLANK 0000[0x7]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug Table
06d8 ; --------------------------------------------------------------------------------------
06d8 0003 001d | | .CONST 0x0003,0x001d
06da 000b 07c2 | | .DEBUG 0x000b,0x07c2,0x8000,0x0000,0x005a,0x41a5,0x0000,0x000f
06e2 0053 07dc | S | .DEBUG 0x0053,0x07dc,0x8000,0x0000,0x005a,0x41c5,0x0000,0x001d
06ea 00b3 081c | | .DEBUG 0x00b3,0x081c,0x0005,0x0000,0x005a,0x41a5,0x0000,0x0023
06f2 00cb 081e | | .DEBUG 0x00cb,0x081e,0x0005,0x0000,0x005a,0x41a5,0x0000,0x002b
06fa 0113 0820 | | .DEBUG 0x0113,0x0820,0x0001,0x0000,0x005a,0x41a5,0x0000,0x0051
0702 0133 082e | 3 .| .DEBUG 0x0133,0x082e,0x0001,0x0000,0x005a,0x41a5,0x0000,0x006c
070a 01cb 085a | Z| .DEBUG 0x01cb,0x085a,0x0001,0x0000,0x005a,0x41a5,0x0000,0x0083
0712 020b 086e | n| .DEBUG 0x020b,0x086e,0x0005,0x0000,0x005a,0x41a5,0x0000,0x0090
071a 0223 0870 | # p| .DEBUG 0x0223,0x0870,0x0001,0x0000,0x005a,0x41c5,0x0000,0x021f
0722 023b 0880 | ; | .DEBUG 0x023b,0x0880,0x0001,0x0000,0x005a,0x41c5,0x0000,0x025a
072a 02a3 08a4 | | .DEBUG 0x02a3,0x08a4,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0325
0732 02cb 08b4 | | .DEBUG 0x02cb,0x08b4,0x0001,0x0000,0x005a,0x41c5,0x0000,0x037c
073a 02fb 08c6 | | .DEBUG 0x02fb,0x08c6,0x0001,0x0000,0x005a,0x41c5,0x0000,0x03dd
0742 032b 08d8 | + | .DEBUG 0x032b,0x08d8,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0442
074a 036b 08f6 | k | .DEBUG 0x036b,0x08f6,0x0001,0x0000,0x005a,0x41c5,0x0000,0x04ce
0752 03ab 091a | | .DEBUG 0x03ab,0x091a,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0556
075a 03d3 0928 | (| .DEBUG 0x03d3,0x0928,0x0002,0x0000,0x005a,0x41c5,0x0000,0x05ac
0762 03eb 0934 | 4| .DEBUG 0x03eb,0x0934,0x0001,0x0000,0x005a,0x41c5,0x0000,0x05e7
076a 041b 094e | N| .DEBUG 0x041b,0x094e,0x0001,0x0000,0x005a,0x41c5,0x0000,0x064b
0772 0453 096c | S l| .DEBUG 0x0453,0x096c,0x0001,0x0000,0x005a,0x41c5,0x0000,0x06b4
077a 04d3 09b0 | | .DEBUG 0x04d3,0x09b0,0x0001,0x0000,0x005a,0x41c5,0x0000,0x0291
0782 04eb 09b8 | | .DEBUG 0x04eb,0x09b8,0x0001,0x0000,0x005a,0x41c5,0x0000,0x04f6
078a 0503 09c0 | | .DEBUG 0x0503,0x09c0,0x0004,0x0000,0x005a,0x41c5,0x0000,0x072d
0792 0523 09cc | # | .DEBUG 0x0523,0x09cc,0x0000,0x0000,0x005a,0x41c5,0x0000,0x005a
079a 0528 09ce | ( | .DEBUG 0x0528,0x09ce,0x0000,0x0000,0x005a,0x41c5,0x0000,0x07ee
07a2 0553 09e6 | S | .DEBUG 0x0553,0x09e6,0x0005,0x0000,0x005a,0x41c5,0x0000,0x07f8
07aa 056b 09e8 | k | .DEBUG 0x056b,0x09e8,0x0004,0x0000,0x005a,0x41c5,0x0000,0x091c
07b2 0583 09f0 | | .DEBUG 0x0583,0x09f0,0x0003,0x0000,0x005a,0x41c5,0x0000,0x090d
07ba 05bb 0a08 | | .DEBUG 0x05bb,0x0a08,0x0003,0x0000,0x005a,0x41c5,0x0000,0x08bb
07c2 ; --------------------------------------------------------------------------------------
07c2 ; Debug3 Subtable 0x0
07c2 ; --------------------------------------------------------------------------------------
07c2 000c 0000 | | .DBG3TAB 0x000c,0x0000
07c4 000b ffff | | .CONST 0x000b,0xffff
07c6 000c fffe | | .CONST 0x000c,0xfffe
07c8 000d fffd | | .CONST 0x000d,0xfffd
07ca 000e fffc | | .CONST 0x000e,0xfffc
07cc 0013 fffb | | .CONST 0x0013,0xfffb
07ce 0021 fffa | ! | .CONST 0x0021,0xfffa
07d0 0023 fff9 | # | .CONST 0x0023,0xfff9
07d2 0025 fff8 | % | .CONST 0x0025,0xfff8
07d4 0026 fff7 | & | .CONST 0x0026,0xfff7
07d6 0028 fff6 | ( | .CONST 0x0028,0xfff6
07d8 002a fff5 | * | .CONST 0x002a,0xfff5
07da 0038 fff4 | 8 | .CONST 0x0038,0xfff4
07dc ; --------------------------------------------------------------------------------------
07dc ; Debug3 Subtable 0x1
07dc ; --------------------------------------------------------------------------------------
07dc 001c 0003 | | .DBG3TAB 0x001c,0x0003
07de 0053 ffff | S | .CONST 0x0053,0xffff
07e0 0054 fffe | T | .CONST 0x0054,0xfffe
07e2 0055 fffd | U | .CONST 0x0055,0xfffd
07e4 0056 fffc | V | .CONST 0x0056,0xfffc
07e6 0057 fffb | W | .CONST 0x0057,0xfffb
07e8 0058 fffa | X | .CONST 0x0058,0xfffa
07ea 005b fff9 | [ | .CONST 0x005b,0xfff9
07ec 005d fff8 | ] | .CONST 0x005d,0xfff8
07ee 0062 fff7 | b | .CONST 0x0062,0xfff7
07f0 0064 fff6 | d | .CONST 0x0064,0xfff6
07f2 0065 fff5 | e | .CONST 0x0065,0xfff5
07f4 006a fff4 | j | .CONST 0x006a,0xfff4
07f6 006c fff3 | l | .CONST 0x006c,0xfff3
07f8 006e fff2 | n | .CONST 0x006e,0xfff2
07fa 0070 fff1 | p | .CONST 0x0070,0xfff1
07fc 0072 fff0 | r | .CONST 0x0072,0xfff0
07fe 0074 ffef | t | .CONST 0x0074,0xffef
0800 0076 ffee | v | .CONST 0x0076,0xffee
0802 0078 ffed | x | .CONST 0x0078,0xffed
0804 007a ffec | z | .CONST 0x007a,0xffec
0806 007c ffeb | | | .CONST 0x007c,0xffeb
0808 007e ffea | ~ | .CONST 0x007e,0xffea
080a 0080 ffe9 | | .CONST 0x0080,0xffe9
080c 0082 ffe8 | | .CONST 0x0082,0xffe8
080e 0084 ffe7 | | .CONST 0x0084,0xffe7
0810 0086 ffe6 | | .CONST 0x0086,0xffe6
0812 0088 ffe5 | | .CONST 0x0088,0xffe5
0814 0092 0001 | | .CONST 0x0092,0x0001
0816 0097 0002 | | .CONST 0x0097,0x0002
0818 0098 fbff | | .CONST 0x0098,0xfbff
081a 009d 0401 | | .CONST 0x009d,0x0401
081c ; --------------------------------------------------------------------------------------
081c ; Debug3 Subtable 0x2
081c ; --------------------------------------------------------------------------------------
081c 0000 0000 | | .DBG3TAB 0x0000,0x0000
081e ; --------------------------------------------------------------------------------------
081e ; Debug3 Subtable 0x3
081e ; --------------------------------------------------------------------------------------
081e 0000 0000 | | .DBG3TAB 0x0000,0x0000
0820 ; --------------------------------------------------------------------------------------
0820 ; Debug3 Subtable 0x4
0820 ; --------------------------------------------------------------------------------------
0820 0002 0004 | | .DBG3TAB 0x0002,0x0004
0822 0113 ffff | | .CONST 0x0113,0xffff
0824 0117 fffe | | .CONST 0x0117,0xfffe
0826 011b 0001 | | .CONST 0x011b,0x0001
0828 0121 0002 | ! | .CONST 0x0121,0x0002
082a 0124 0003 | $ | .CONST 0x0124,0x0003
082c 0128 0004 | ( | .CONST 0x0128,0x0004
082e ; --------------------------------------------------------------------------------------
082e ; Debug3 Subtable 0x5
082e ; --------------------------------------------------------------------------------------
082e 0004 0011 | | .DBG3TAB 0x0004,0x0011
0830 0133 ffff | 3 | .CONST 0x0133,0xffff
0832 0138 fffe | 8 | .CONST 0x0138,0xfffe
0834 0139 fffd | 9 | .CONST 0x0139,0xfffd
0836 013a fffc | : | .CONST 0x013a,0xfffc
0838 013e 0001 | > | .CONST 0x013e,0x0001
083a 0143 0002 | C | .CONST 0x0143,0x0002
083c 0158 0003 | X | .CONST 0x0158,0x0003
083e 015a 0004 | Z | .CONST 0x015a,0x0004
0840 0165 0005 | e | .CONST 0x0165,0x0005
0842 016b 0006 | k | .CONST 0x016b,0x0006
0844 0190 0007 | | .CONST 0x0190,0x0007
0846 0192 0008 | | .CONST 0x0192,0x0008
0848 019a 0009 | | .CONST 0x019a,0x0009
084a 019c 000a | | .CONST 0x019c,0x000a
084c 01a7 000b | | .CONST 0x01a7,0x000b
084e 01aa 000c | | .CONST 0x01aa,0x000c
0850 01b0 000d | | .CONST 0x01b0,0x000d
0852 01b5 000e | | .CONST 0x01b5,0x000e
0854 01ba 000f | | .CONST 0x01ba,0x000f
0856 01bf 0010 | | .CONST 0x01bf,0x0010
0858 01c2 0011 | | .CONST 0x01c2,0x0011
085a ; --------------------------------------------------------------------------------------
085a ; Debug3 Subtable 0x6
085a ; --------------------------------------------------------------------------------------
085a 0001 0008 | | .DBG3TAB 0x0001,0x0008
085c 01cb ffff | | .CONST 0x01cb,0xffff
085e 01d1 0001 | | .CONST 0x01d1,0x0001
0860 01dd 0002 | | .CONST 0x01dd,0x0002
0862 01e3 0003 | | .CONST 0x01e3,0x0003
0864 01e9 0004 | | .CONST 0x01e9,0x0004
0866 01f3 0005 | | .CONST 0x01f3,0x0005
0868 01f8 0006 | | .CONST 0x01f8,0x0006
086a 01fe 0007 | | .CONST 0x01fe,0x0007
086c 0203 0008 | | .CONST 0x0203,0x0008
086e ; --------------------------------------------------------------------------------------
086e ; Debug3 Subtable 0x7
086e ; --------------------------------------------------------------------------------------
086e 0000 0000 | | .DBG3TAB 0x0000,0x0000
0870 ; --------------------------------------------------------------------------------------
0870 ; Debug3 Subtable 0x8
0870 ; --------------------------------------------------------------------------------------
0870 0000 0007 | | .DBG3TAB 0x0000,0x0007
0872 0223 0001 | # | .CONST 0x0223,0x0001
0874 0224 0401 | $ | .CONST 0x0224,0x0401
0876 0225 0001 | % | .CONST 0x0225,0x0001
0878 0226 0801 | & | .CONST 0x0226,0x0801
087a 0227 0401 | ' | .CONST 0x0227,0x0401
087c 0229 0c01 | ) | .CONST 0x0229,0x0c01
087e 022a 0801 | * | .CONST 0x022a,0x0801
0880 ; --------------------------------------------------------------------------------------
0880 ; Debug3 Subtable 0x9
0880 ; --------------------------------------------------------------------------------------
0880 0005 000c | | .DBG3TAB 0x0005,0x000c
0882 023b ffff | ; | .CONST 0x023b,0xffff
0884 023d fffe | = | .CONST 0x023d,0xfffe
0886 023f fffd | ? | .CONST 0x023f,0xfffd
0888 0244 fffc | D | .CONST 0x0244,0xfffc
088a 0246 fffb | F | .CONST 0x0246,0xfffb
088c 0248 0001 | H | .CONST 0x0248,0x0001
088e 0257 0002 | W | .CONST 0x0257,0x0002
0890 0259 0003 | Y | .CONST 0x0259,0x0003
0892 0263 0004 | c | .CONST 0x0263,0x0004
0894 0264 0005 | d | .CONST 0x0264,0x0005
0896 026a 0006 | j | .CONST 0x026a,0x0006
0898 026b 0007 | k | .CONST 0x026b,0x0007
089a 0288 0008 | | .CONST 0x0288,0x0008
089c 028a 0009 | | .CONST 0x028a,0x0009
089e 0293 000a | | .CONST 0x0293,0x000a
08a0 0294 000b | | .CONST 0x0294,0x000b
08a2 0296 000c | | .CONST 0x0296,0x000c
08a4 ; --------------------------------------------------------------------------------------
08a4 ; Debug3 Subtable 0xa
08a4 ; --------------------------------------------------------------------------------------
08a4 0001 0006 | | .DBG3TAB 0x0001,0x0006
08a6 02a3 ffff | | .CONST 0x02a3,0xffff
08a8 02a4 0001 | | .CONST 0x02a4,0x0001
08aa 02aa 0002 | | .CONST 0x02aa,0x0002
08ac 02af 0003 | | .CONST 0x02af,0x0003
08ae 02b5 0004 | | .CONST 0x02b5,0x0004
08b0 02b9 0005 | | .CONST 0x02b9,0x0005
08b2 02bb 0006 | | .CONST 0x02bb,0x0006
08b4 ; --------------------------------------------------------------------------------------
08b4 ; Debug3 Subtable 0xb
08b4 ; --------------------------------------------------------------------------------------
08b4 0001 0007 | | .DBG3TAB 0x0001,0x0007
08b6 02cb ffff | | .CONST 0x02cb,0xffff
08b8 02cd 0001 | | .CONST 0x02cd,0x0001
08ba 02d9 0002 | | .CONST 0x02d9,0x0002
08bc 02db 0003 | | .CONST 0x02db,0x0003
08be 02e9 0004 | | .CONST 0x02e9,0x0004
08c0 02eb 0005 | | .CONST 0x02eb,0x0005
08c2 02ec 0006 | | .CONST 0x02ec,0x0006
08c4 02f0 0007 | | .CONST 0x02f0,0x0007
08c6 ; --------------------------------------------------------------------------------------
08c6 ; Debug3 Subtable 0xc
08c6 ; --------------------------------------------------------------------------------------
08c6 0001 0007 | | .DBG3TAB 0x0001,0x0007
08c8 02fb ffff | | .CONST 0x02fb,0xffff
08ca 02fd 0001 | | .CONST 0x02fd,0x0001
08cc 0308 0002 | | .CONST 0x0308,0x0002
08ce 030a 0003 | | .CONST 0x030a,0x0003
08d0 0318 0004 | | .CONST 0x0318,0x0004
08d2 031a 0005 | | .CONST 0x031a,0x0005
08d4 031b 0006 | | .CONST 0x031b,0x0006
08d6 031f 0007 | | .CONST 0x031f,0x0007
08d8 ; --------------------------------------------------------------------------------------
08d8 ; Debug3 Subtable 0xd
08d8 ; --------------------------------------------------------------------------------------
08d8 0001 000d | | .DBG3TAB 0x0001,0x000d
08da 032b ffff | + | .CONST 0x032b,0xffff
08dc 032c 0001 | , | .CONST 0x032c,0x0001
08de 032e 0002 | . | .CONST 0x032e,0x0002
08e0 0331 0003 | 1 | .CONST 0x0331,0x0003
08e2 033c 0004 | < | .CONST 0x033c,0x0004
08e4 033e 0005 | > | .CONST 0x033e,0x0005
08e6 0340 0006 | @ | .CONST 0x0340,0x0006
08e8 0343 0007 | C | .CONST 0x0343,0x0007
08ea 034e 0008 | N | .CONST 0x034e,0x0008
08ec 0350 0009 | P | .CONST 0x0350,0x0009
08ee 0352 000a | R | .CONST 0x0352,0x000a
08f0 0358 000b | X | .CONST 0x0358,0x000b
08f2 0363 000c | c | .CONST 0x0363,0x000c
08f4 0365 000d | e | .CONST 0x0365,0x000d
08f6 ; --------------------------------------------------------------------------------------
08f6 ; Debug3 Subtable 0xe
08f6 ; --------------------------------------------------------------------------------------
08f6 0003 000e | | .DBG3TAB 0x0003,0x000e
08f8 036b ffff | k | .CONST 0x036b,0xffff
08fa 0370 fffe | p | .CONST 0x0370,0xfffe
08fc 0371 fffd | q | .CONST 0x0371,0xfffd
08fe 0373 0001 | s | .CONST 0x0373,0x0001
0900 037d 0002 | } | .CONST 0x037d,0x0002
0902 037f 0003 | | .CONST 0x037f,0x0003
0904 0380 0004 | | .CONST 0x0380,0x0004
0906 0381 0005 | | .CONST 0x0381,0x0005
0908 038b 0006 | | .CONST 0x038b,0x0006
090a 038d 0007 | | .CONST 0x038d,0x0007
090c 038e 0008 | | .CONST 0x038e,0x0008
090e 038f 0009 | | .CONST 0x038f,0x0009
0910 0399 000a | | .CONST 0x0399,0x000a
0912 039b 000b | | .CONST 0x039b,0x000b
0914 039c 000c | | .CONST 0x039c,0x000c
0916 039d 000d | | .CONST 0x039d,0x000d
0918 03a0 000e | | .CONST 0x03a0,0x000e
091a ; --------------------------------------------------------------------------------------
091a ; Debug3 Subtable 0xf
091a ; --------------------------------------------------------------------------------------
091a 0001 0005 | | .DBG3TAB 0x0001,0x0005
091c 03ab ffff | | .CONST 0x03ab,0xffff
091e 03ad 0001 | | .CONST 0x03ad,0x0001
0920 03b8 0002 | | .CONST 0x03b8,0x0002
0922 03ba 0003 | | .CONST 0x03ba,0x0003
0924 03bd 0004 | | .CONST 0x03bd,0x0004
0926 03bf 0005 | | .CONST 0x03bf,0x0005
0928 ; --------------------------------------------------------------------------------------
0928 ; Debug3 Subtable 0x10
0928 ; --------------------------------------------------------------------------------------
0928 0003 0002 | | .DBG3TAB 0x0003,0x0002
092a 03d3 ffff | | .CONST 0x03d3,0xffff
092c 03d4 fffe | | .CONST 0x03d4,0xfffe
092e 03d5 fffd | | .CONST 0x03d5,0xfffd
0930 03db 0001 | | .CONST 0x03db,0x0001
0932 03e2 0002 | | .CONST 0x03e2,0x0002
0934 ; --------------------------------------------------------------------------------------
0934 ; Debug3 Subtable 0x11
0934 ; --------------------------------------------------------------------------------------
0934 0001 000b | | .DBG3TAB 0x0001,0x000b
0936 03eb ffff | | .CONST 0x03eb,0xffff
0938 03ec 0001 | | .CONST 0x03ec,0x0001
093a 03ef 0002 | | .CONST 0x03ef,0x0002
093c 03f8 0003 | | .CONST 0x03f8,0x0003
093e 03fa 0004 | | .CONST 0x03fa,0x0004
0940 03fc 0005 | | .CONST 0x03fc,0x0005
0942 03fd 0006 | | .CONST 0x03fd,0x0006
0944 0406 0007 | | .CONST 0x0406,0x0007
0946 0408 0008 | | .CONST 0x0408,0x0008
0948 040a 0009 | | .CONST 0x040a,0x0009
094a 040b 000a | | .CONST 0x040b,0x000a
094c 0411 000b | | .CONST 0x0411,0x000b
094e ; --------------------------------------------------------------------------------------
094e ; Debug3 Subtable 0x12
094e ; --------------------------------------------------------------------------------------
094e 0001 000d | | .DBG3TAB 0x0001,0x000d
0950 041b ffff | | .CONST 0x041b,0xffff
0952 041c 0001 | | .CONST 0x041c,0x0001
0954 041e 0002 | | .CONST 0x041e,0x0002
0956 0429 0003 | ) | .CONST 0x0429,0x0003
0958 042b 0004 | + | .CONST 0x042b,0x0004
095a 042d 0005 | - | .CONST 0x042d,0x0005
095c 042e 0006 | . | .CONST 0x042e,0x0006
095e 0439 0007 | 9 | .CONST 0x0439,0x0007
0960 043b 0008 | ; | .CONST 0x043b,0x0008
0962 043d 0009 | = | .CONST 0x043d,0x0009
0964 043e 000a | > | .CONST 0x043e,0x000a
0966 0449 000b | I | .CONST 0x0449,0x000b
0968 044b 000c | K | .CONST 0x044b,0x000c
096a 044d 000d | M | .CONST 0x044d,0x000d
096c ; --------------------------------------------------------------------------------------
096c ; Debug3 Subtable 0x13
096c ; --------------------------------------------------------------------------------------
096c 0006 001b | | .DBG3TAB 0x0006,0x001b
096e 0453 ffff | S | .CONST 0x0453,0xffff
0970 045b fffe | [ | .CONST 0x045b,0xfffe
0972 045c fffd | \ | .CONST 0x045c,0xfffd
0974 045d fffc | ] | .CONST 0x045d,0xfffc
0976 045f fffb | _ | .CONST 0x045f,0xfffb
0978 0462 fffa | b | .CONST 0x0462,0xfffa
097a 0464 0001 | d | .CONST 0x0464,0x0001
097c 046b 0002 | k | .CONST 0x046b,0x0002
097e 046c 0003 | l | .CONST 0x046c,0x0003
0980 046d 0401 | m | .CONST 0x046d,0x0401
0982 046f 0402 | o | .CONST 0x046f,0x0402
0984 0470 0403 | p | .CONST 0x0470,0x0403
0986 0471 0404 | q | .CONST 0x0471,0x0404
0988 0472 0003 | r | .CONST 0x0472,0x0003
098a 0474 0009 | t | .CONST 0x0474,0x0009
098c 0475 0004 | u | .CONST 0x0475,0x0004
098e 047b 0005 | { | .CONST 0x047b,0x0005
0990 047c 0801 | | | .CONST 0x047c,0x0801
0992 047d 0005 | } | .CONST 0x047d,0x0005
0994 0482 0c01 | | .CONST 0x0482,0x0c01
0996 0483 0801 | | .CONST 0x0483,0x0801
0998 048d 1001 | | .CONST 0x048d,0x1001
099a 048e 0c01 | | .CONST 0x048e,0x0c01
099c 0495 0006 | | .CONST 0x0495,0x0006
099e 049e 0007 | | .CONST 0x049e,0x0007
09a0 04a7 0008 | | .CONST 0x04a7,0x0008
09a2 04ad 000a | | .CONST 0x04ad,0x000a
09a4 04b1 000b | | .CONST 0x04b1,0x000b
09a6 04ba 000c | | .CONST 0x04ba,0x000c
09a8 04bc 000d | | .CONST 0x04bc,0x000d
09aa 04c9 000e | | .CONST 0x04c9,0x000e
09ac 04cb 000f | | .CONST 0x04cb,0x000f
09ae 04cc 0010 | | .CONST 0x04cc,0x0010
09b0 ; --------------------------------------------------------------------------------------
09b0 ; Debug3 Subtable 0x14
09b0 ; --------------------------------------------------------------------------------------
09b0 0000 0003 | | .DBG3TAB 0x0000,0x0003
09b2 04d3 0001 | | .CONST 0x04d3,0x0001
09b4 04d7 0002 | | .CONST 0x04d7,0x0002
09b6 04d9 0003 | | .CONST 0x04d9,0x0003
09b8 ; --------------------------------------------------------------------------------------
09b8 ; Debug3 Subtable 0x15
09b8 ; --------------------------------------------------------------------------------------
09b8 0000 0003 | | .DBG3TAB 0x0000,0x0003
09ba 04eb 0001 | | .CONST 0x04eb,0x0001
09bc 04f4 0002 | | .CONST 0x04f4,0x0002
09be 04f7 0003 | | .CONST 0x04f7,0x0003
09c0 ; --------------------------------------------------------------------------------------
09c0 ; Debug3 Subtable 0x16
09c0 ; --------------------------------------------------------------------------------------
09c0 0000 0005 | | .DBG3TAB 0x0000,0x0005
09c2 0503 0001 | | .CONST 0x0503,0x0001
09c4 050a 0002 | | .CONST 0x050a,0x0002
09c6 0511 0003 | | .CONST 0x0511,0x0003
09c8 0513 0004 | | .CONST 0x0513,0x0004
09ca 0517 0005 | | .CONST 0x0517,0x0005
09cc ; --------------------------------------------------------------------------------------
09cc ; Debug3 Subtable 0x17
09cc ; --------------------------------------------------------------------------------------
09cc 0000 0000 | | .DBG3TAB 0x0000,0x0000
09ce ; --------------------------------------------------------------------------------------
09ce ; Debug3 Subtable 0x18
09ce ; --------------------------------------------------------------------------------------
09ce 0009 0002 | | .DBG3TAB 0x0009,0x0002
09d0 0528 ffff | ( | .CONST 0x0528,0xffff
09d2 052a fffe | * | .CONST 0x052a,0xfffe
09d4 052e fffd | . | .CONST 0x052e,0xfffd
09d6 0535 fffc | 5 | .CONST 0x0535,0xfffc
09d8 0537 fffb | 7 | .CONST 0x0537,0xfffb
09da 0539 fffa | 9 | .CONST 0x0539,0xfffa
09dc 053e fff9 | > | .CONST 0x053e,0xfff9
09de 053f fff8 | ? | .CONST 0x053f,0xfff8
09e0 0544 fff7 | D | .CONST 0x0544,0xfff7
09e2 0549 0001 | I | .CONST 0x0549,0x0001
09e4 054a 0002 | J | .CONST 0x054a,0x0002
09e6 ; --------------------------------------------------------------------------------------
09e6 ; Debug3 Subtable 0x19
09e6 ; --------------------------------------------------------------------------------------
09e6 0000 0000 | | .DBG3TAB 0x0000,0x0000
09e8 ; --------------------------------------------------------------------------------------
09e8 ; Debug3 Subtable 0x1a
09e8 ; --------------------------------------------------------------------------------------
09e8 0000 0003 | | .DBG3TAB 0x0000,0x0003
09ea 0575 0001 | u | .CONST 0x0575,0x0001
09ec 0576 0002 | v | .CONST 0x0576,0x0002
09ee 057c 0005 | | | .CONST 0x057c,0x0005
09f0 ; --------------------------------------------------------------------------------------
09f0 ; Debug3 Subtable 0x1b
09f0 ; --------------------------------------------------------------------------------------
09f0 0000 000b | | .DBG3TAB 0x0000,0x000b
09f2 0583 0001 | | .CONST 0x0583,0x0001
09f4 0588 0002 | | .CONST 0x0588,0x0002
09f6 058d 0003 | | .CONST 0x058d,0x0003
09f8 0595 0004 | | .CONST 0x0595,0x0004
09fa 0597 0005 | | .CONST 0x0597,0x0005
09fc 05a3 0006 | | .CONST 0x05a3,0x0006
09fe 05a5 0007 | | .CONST 0x05a5,0x0007
0a00 05a9 0008 | | .CONST 0x05a9,0x0008
0a02 05ad 0009 | | .CONST 0x05ad,0x0009
0a04 05b1 000a | | .CONST 0x05b1,0x000a
0a06 05b3 000b | | .CONST 0x05b3,0x000b
0a08 ; --------------------------------------------------------------------------------------
0a08 ; Debug3 Subtable 0x1c
0a08 ; --------------------------------------------------------------------------------------
0a08 0000 0013 | | .DBG3TAB 0x0000,0x0013
0a0a 05bb 0001 | | .CONST 0x05bb,0x0001
0a0c 05be 0002 | | .CONST 0x05be,0x0002
0a0e 05c0 0003 | | .CONST 0x05c0,0x0003
0a10 05ca 0004 | | .CONST 0x05ca,0x0004
0a12 05cf 0005 | | .CONST 0x05cf,0x0005
0a14 05d1 0006 | | .CONST 0x05d1,0x0006
0a16 05d5 0007 | | .CONST 0x05d5,0x0007
0a18 05da 0008 | | .CONST 0x05da,0x0008
0a1a 05de 0009 | | .CONST 0x05de,0x0009
0a1c 05e0 000a | | .CONST 0x05e0,0x000a
0a1e 05e9 000b | | .CONST 0x05e9,0x000b
0a20 05eb 000c | | .CONST 0x05eb,0x000c
0a22 05f4 000d | | .CONST 0x05f4,0x000d
0a24 05f7 000e | | .CONST 0x05f7,0x000e
0a26 05f9 000f | | .CONST 0x05f9,0x000f
0a28 05fd 0010 | | .CONST 0x05fd,0x0010
0a2a 0605 0011 | | .CONST 0x0605,0x0011
0a2c 0608 0012 | | .CONST 0x0608,0x0012
0a2e 060a 0013 | | .CONST 0x060a,0x0013
0a30 0000 0000 | | .BLANK 0000[0x1d0]