|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 12288 (0x3000)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1050 | P | .CONST 0x1050 ; 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 000b | | .CONST 0x000b ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00f4 | | .CONST 0x00f4 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003f | ? | .CONST 0x003f ; Number of locals
000b INIT_0008:
000b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x0 = .DEBUG 0x000b,0x1222,0x0000,0x0000,0x0056,0xd7e5,0x0000,0x071c
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0129 | ) | Execute Any,Make_Visible
000d e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
000f 0129 | ) | Execute Any,Make_Visible
0010 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8 ; Debug Table 0x0.0x2 = 0x10,0xfffd
0012 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100 ; Debug Table 0x0.0x3 = 0x12,0xfffc
0014 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108 ; Debug Table 0x0.0x4 = 0x14,0xfffb
0016 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110 ; Debug Table 0x0.0x5 = 0x16,0xfffa
0018 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x6 = 0x18,0xfff9
0019 1b14 | | Execute Package,Field_Read,Field_Number 0x14
001a 0129 | ) | Execute Any,Make_Visible
001b 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118 ; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 0123 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0120 ; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x0.0x9 = 0x1f,0xfff6
0020 0129 | ) | Execute Any,Make_Visible
0021 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x0.0xa = 0x21,0xfff5
0022 0129 | ) | Execute Any,Make_Visible
0023 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x0.0xb = 0x23,0xfff4
0024 0129 | ) | Execute Any,Make_Visible
0025 029a 012b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0128 ; Debug Table 0x0.0xc = 0x25,0xfff3
0027 029a 0193 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0190 ; Debug Table 0x0.0xd = 0x27,0xfff2
0029 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0 ; Debug Table 0x0.0xe = 0x29,0xfff1
002b 029a 01db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d8 ; Debug Table 0x0.0xf = 0x2b,0xfff0
002d 029a 0203 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0200 ; Debug Table 0x0.0x10 = 0x2d,0xffef
002f 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x11 = 0x2f,0xffee
0030 480f |H | Short_Literal 0xf
0031 00e2 | | Load_Encached Integer_Cache
0032 03f9 | | Declare_Type Discrete,Constrained,Visible
0033 029a 0263 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0260 ; Debug Table 0x0.0x12 = 0x33,0xffed
0035 029a 02f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02f0 ; Debug Table 0x0.0x13 = 0x35,0xffec
0037 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x14 = 0x37,0xffeb
0038 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
0039 0129 | ) | Execute Any,Make_Visible
003a 029a 035b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0358 ; Debug Table 0x0.0x15 = 0x3a,0xffea
003c 029a 037b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0378 ; Debug Table 0x0.0x16 = 0x3c,0xffe9
003e 029a 0383 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0380 ; Debug Table 0x0.0x17 = 0x3e,0xffe8
0040 029a 038b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0388 ; Debug Table 0x0.0x18 = 0x40,0xffe7
0042 029a 0393 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0390 ; Debug Table 0x0.0x19 = 0x42,0xffe6
0044 0007 | | Action Break_Optional ; Debug Table 0x0.0x1a = 0x44,0xffe5
0045 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1b = 0x45,0xffe4
0046 4802 |H | Short_Literal 0x2
0047 029f 039b | | Declare_Subprogram For_Call,INIT_0398
0049 03fe | | Declare_Type Discrete,Defined,Visible
004a 029a 03b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03b0 ; Debug Table 0x0.0x1c = 0x4a,0xffe3
004c 029a 0423 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0420 ; Debug Table 0x0.0x1d = 0x4c,0xffe2
004e 029a 0493 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0490 ; Debug Table 0x0.0x1e = 0x4e,0xffe1
0050 029a 04fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04f8 ; Debug Table 0x0.0x1f = 0x50,0xffe0
0052 029a 059b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0598 ; Debug Table 0x0.0x20 = 0x52,0xffdf
0054 029a 061b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0618 ; Debug Table 0x0.0x21 = 0x54,0xffde
0056 029a 073b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0738 ; Debug Table 0x0.0x22 = 0x56,0xffdd
0058 029a 0763 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0760 ; Debug Table 0x0.0x23 = 0x58,0xffdc
005a 029a 079b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0798 ; Debug Table 0x0.0x24 = 0x5a,0xffdb
005c 029a 08e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08e0 ; Debug Table 0x0.0x25 = 0x5c,0xffda
005e 029a 094b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0948 ; Debug Table 0x0.0x26 = 0x5e,0xffd9
0060 4802 |H | Short_Literal 0x2 ; Debug Table 0x0.0x27 = 0x60,0xffd8
0061 032b | + | Declare_Type Record,Incomplete,Visible
0062 029a 099b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0998 ; Debug Table 0x0.0x28 = 0x62,0xffd7
0064 029a 09bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_09b8 ; Debug Table 0x0.0x29 = 0x64,0xffd6
0066 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x2a = 0x66,0xffd5
0067 62e8 |b | Indirect_Literal Discrete,0x350,{0x0049000e, 0x000000b0}
0068 02a0 | | Declare_Subprogram Null_Subprogram
0069 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
006a e002 | | Load 0x0,0x2
006b 4801 |H | Short_Literal 0x1
006c 00da | | Load_Top At_Offset_2
006d 020e | | Execute Module,Augment_Imports
006e 0007 | | Action Break_Optional
006f 029a 09db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_09d8 ; Debug Table 0x0.0x2b = 0x6f,0xffd4
0071 029a 0af3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0af0 ; Debug Table 0x0.0x2c = 0x71,0xffd3
0073 029a 0b5b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0b58 ; Debug Table 0x0.0x2d = 0x73,0xffd2
0075 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x2e = 0x75,0xffd1
0076 e002 | | Load 0x0,0x2
0077 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0078 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0079 029f 0b6b | k| Declare_Subprogram For_Call,INIT_0b68
007b e233 | 3 | Load 0x1,0x33
007c 0326 | & | Complete_Type Record,By_Defining
007d 00bf | | Action Accept_Activation
007e 0092 0ea7 | | Action Push_String_Extended,0xea7 ; "Directory.Ada."
; Debug Table 0x1 = .DEBUG 0x007e,0x1282,0x0000,0x0000,0x0057,0x13f5,0x0000,0x0018
; Debug Table 0x1.0x0 = 0x7e,0xffff
0080 0129 | ) | Execute Any,Make_Visible
0081 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x1 = 0x81,0xfffe
0082 62c9 |b | Indirect_Literal Discrete,0x34c,{0x0049040e, 0x0000c8b0}
0083 02a0 | | Declare_Subprogram Null_Subprogram
0084 038f | | Declare_Type Package,Defined,Visible
0085 e002 | | Load 0x0,0x2
0086 e003 | | Load 0x0,0x3
0087 e004 | | Load 0x0,0x4
0088 e005 | | Load 0x0,0x5
0089 4804 |H | Short_Literal 0x4
008a e23b | ; | Load 0x1,0x3b
008b 020e | | Execute Module,Augment_Imports
008c 0386 | | Declare_Variable Package,Visible
008d 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x2 = 0x8d,0xfffd
008e 00c7 | | Action Elaborate_Subprogram
008f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x3 = 0x8f,0xfffc
0090 00c7 | | Action Elaborate_Subprogram
0091 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x4 = 0x91,0xfffb
0092 00c7 | | Action Elaborate_Subprogram
0093 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x5 = 0x93,0xfffa
0094 00c7 | | Action Elaborate_Subprogram
0095 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x6 = 0x95,0xfff9
0096 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0097 e001 | | Load 0x0,0x1
0098 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0099 03f0 | | Declare_Variable Discrete,Visible,With_Value
009a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x7 = 0x9a,0xfff8
009b 00c7 | | Action Elaborate_Subprogram
009c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x8 = 0x9c,0xfff7
009d 00c7 | | Action Elaborate_Subprogram
009e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x9 = 0x9e,0xfff6
009f 00c7 | | Action Elaborate_Subprogram
00a0 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xa = 0xa0,0xfff5
00a1 00c7 | | Action Elaborate_Subprogram
00a2 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0xb = 0xa2,0xfff4
00a3 00c7 | | Action Elaborate_Subprogram
00a4 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0xc = 0xa4,0xfff3
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0xd = 0xa6,0xfff2
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0xe = 0xa8,0xfff1
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0xf = 0xaa,0xfff0
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x10 = 0xac,0xffef
00ad 00c7 | | Action Elaborate_Subprogram
00ae e006 | | Load 0x0,0x6 ; Debug Table 0x1.0x11 = 0xae,0xffee
00af 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00b0 e221 | ! | Load 0x1,0x21
00b1 011e | | Execute Any,Convert
00b2 0129 | ) | Execute Any,Make_Visible
00b3 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 ; Debug Table 0x1.0x12 = 0xb3,0xffed
00b4 00c7 | | Action Elaborate_Subprogram
00b5 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 ; Debug Table 0x1.0x13 = 0xb5,0xffec
00b6 00c7 | | Action Elaborate_Subprogram
00b7 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 ; Debug Table 0x1.0x14 = 0xb7,0xffeb
00b8 00c7 | | Action Elaborate_Subprogram
00b9 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 ; Debug Table 0x1.0x15 = 0xb9,0xffea
00ba 00c7 | | Action Elaborate_Subprogram
00bb 029c 0b8b | | Declare_Subprogram For_Outer_Call,Visible,INIT_0b88 ; Debug Table 0x1.0x16 = 0xbb,0xffe9
00bd 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 ; Debug Table 0x1.0x17 = 0xbd,0xffe8
00be 00c7 | | Action Elaborate_Subprogram
00bf 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 ; Debug Table 0x1.0x18 = 0xbf,0xffe7
00c0 00c7 | | Action Elaborate_Subprogram
00c1 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a ; Debug Table 0x1.0x19 = 0xc1,0xffe6
00c2 00c7 | | Action Elaborate_Subprogram
00c3 029c 0c33 | 3| Declare_Subprogram For_Outer_Call,Visible,INIT_0c30 ; Debug Table 0x1.0x1a = 0xc3,0xffe5
00c5 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b ; Debug Table 0x1.0x1b = 0xc5,0xffe4
00c6 00c7 | | Action Elaborate_Subprogram
00c7 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c ; Debug Table 0x1.0x1c = 0xc7,0xffe3
00c8 00c7 | | Action Elaborate_Subprogram
00c9 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 ; Debug Table 0x1.0x1d = 0xc9,0xffe2
00ca 00c7 | | Action Elaborate_Subprogram
00cb 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d ; Debug Table 0x1.0x1e = 0xcb,0xffe1
00cc 00c7 | | Action Elaborate_Subprogram
00cd 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 ; Debug Table 0x1.0x1f = 0xcd,0xffe0
00ce 00c7 | | Action Elaborate_Subprogram
00cf 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e ; Debug Table 0x1.0x20 = 0xcf,0xffdf
00d0 00c7 | | Action Elaborate_Subprogram
00d1 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f ; Debug Table 0x1.0x21 = 0xd1,0xffde
00d2 00c7 | | Action Elaborate_Subprogram
00d3 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 ; Debug Table 0x1.0x22 = 0xd3,0xffdd
00d4 00c7 | | Action Elaborate_Subprogram
00d5 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 ; Debug Table 0x1.0x23 = 0xd5,0xffdc
00d6 00c7 | | Action Elaborate_Subprogram
00d7 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 ; Debug Table 0x1.0x24 = 0xd7,0xffdb
00d8 00c7 | | Action Elaborate_Subprogram
00d9 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 ; Debug Table 0x1.0x25 = 0xd9,0xffda
00da 00c7 | | Action Elaborate_Subprogram
00db 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 ; Debug Table 0x1.0x26 = 0xdb,0xffd9
00dc 00c7 | | Action Elaborate_Subprogram
00dd e007 | | Load 0x0,0x7 ; Debug Table 0x1.0x27 = 0xdd,0xffd8
00de e008 | | Load 0x0,0x8
00df e001 | | Load 0x0,0x1
00e0 e009 | | Load 0x0,0x9
00e1 e00a | | Load 0x0,0xa
00e2 e00b | | Load 0x0,0xb
00e3 4806 |H | Short_Literal 0x6
00e4 e23b | ; | Load 0x1,0x3b
00e5 020e | | Execute Module,Augment_Imports
00e6 e23b | ; | Load 0x1,0x3b
00e7 020f | | Execute Module,Activate
00e8 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x28 = 0xe8,0xffd7
00e9 e003 | | Load 0x0,0x3
00ea e00c | | Load 0x0,0xc
00eb e00b | | Load 0x0,0xb
00ec 4804 |H | Short_Literal 0x4
00ed e236 | 6 | Load 0x1,0x36
00ee 020e | | Execute Module,Augment_Imports
00ef e236 | 6 | Load 0x1,0x36
00f0 020d | | Execute Module,Elaborate
00f1 0007 | | Action Break_Optional
00f2 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 ; Debug Table 0x1.0x29 = 0xf2,0xffd6
00f3 00c7 | | Action Elaborate_Subprogram
00f4 BODY_0008:
00f4 00bc | | Action Signal_Activated
00f5 00bb | | Action Signal_Completion
00f6 0000 0000 | | .XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x00fb,0x12d8,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0727
; Debug Table 0x2.0x0 = 0xfb,0x1
00fc 8212 | | Call 0x1,0x12
00fd e001 | | Load 0x0,0x1
00fe 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00ff 4401 |D | Exit_Subprogram With_Result,0x1
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0103,0x12dc,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0732
; Debug Table 0x3.0x0 = 0x103,0x1
0104 e001 | | Load 0x0,0x1
0105 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0106 4401 |D | Exit_Subprogram With_Result,0x1
0107 0000 | | .XXX[0x1]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x010b,0x12e0,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x073d
; Debug Table 0x4.0x0 = 0x10b,0x1
010c 02fd | | Declare_Variable Variant_Record,Duplicate
010d 4401 |D | Exit_Subprogram With_Result,0x1
010e 0000 0000 | | .XXX[0x2]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x0113,0x12e4,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x074a
; Debug Table 0x5.0x0 = 0x113,0x1
0114 02fd | | Declare_Variable Variant_Record,Duplicate
0115 4401 |D | Exit_Subprogram With_Result,0x1
0116 0000 0000 | | .XXX[0x2]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b | | .CONST 0x011b ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0001 | | .CONST 0x0001 ; Number of locals
011b BODY_0118:
011b INIT_0118:
011b e23c | < | Load 0x1,0x3c ; Debug Table 0x6 = .DEBUG 0x011b,0x12e8,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x075d
; Debug Table 0x6.0x0 = 0x11b,0x1
011c 00ca | | Action Exit_Nullary_Function
011d 0000 0000 | | .XXX[0x3]
011f 0000 | |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x0123,0x12ec,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0764
; Debug Table 0x7.0x0 = 0x123,0x1
0124 e00d | | Load 0x0,0xd
0125 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0126 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0127 4401 |D | Exit_Subprogram With_Result,0x1
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0131 | 1 | .CONST 0x0131 ; Address of begin
0129 017d | } | .CONST 0x017d ; Address of exception handler
012a 0002 | | .CONST 0x0002 ; Number of locals
012b INIT_0128:
012b e002 | | Load 0x0,0x2 ; Debug Table 0x8 = .DEBUG 0x012b,0x12f0,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0783
; Debug Table 0x8.0x0 = 0x12b,0xffff
012c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
012d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012e 02c7 | | Declare_Variable Any
012f 00d8 | | Load_Top At_Offset_0
0130 1c00 | | Execute_Immediate Run_Utility,0x0
0131 BODY_0128:
0131 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x131,0x1
0132 e002 | | Load 0x0,0x2
0133 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0134 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0135 c402 | | Store 0x2,0x2
0136 0007 | | Action Break_Optional ; Debug Table 0x8.0x2 = 0x136,0x2
0137 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x3 = 0x137,0x401
0138 021d | | Execute Heap_Access,Is_Null
0139 680e |h | Jump_Zero 0x148 ; Debug Table 0x8.0x4 = 0x139,0x2
013a e23a | : | Load 0x1,0x3a ; Debug Table 0x8.0x5 = 0x13a,0x3
013b 0092 0ea8 | | Action Push_String_Extended,0xea8 ; "Set_Root"
013d 01cc | | Execute Vector,Catenate
013e 0092 0ea9 | | Action Push_String_Extended,0xea9 ; "Null pointers cannot be roots."
0140 4806 |H | Short_Literal 0x6
0141 e001 | | Load 0x0,0x1
0142 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0143 e00e | | Load 0x0,0xe
0144 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0145 e00b | | Load 0x0,0xb ; Debug Table 0x8.0x6 = 0x145,0x4
0146 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0147 0257 | W | Execute Discrete,Raise
0148 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x7 = 0x148,0x5
0149 e002 | | Load 0x0,0x2
014a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
014b 180f | | Execute Package,Field_Execute,Field_Number 0xf
014c 700e |p | Jump_Nonzero 0x15b
014d e23a | : | Load 0x1,0x3a ; Debug Table 0x8.0x8 = 0x14d,0x6
014e 0092 0ea8 | | Action Push_String_Extended,0xea8 ; "Set_Root"
0150 01cc | | Execute Vector,Catenate
0151 0092 0eaa | | Action Push_String_Extended,0xeaa ; "Only source units may have their roots changed."
0153 4806 |H | Short_Literal 0x6
0154 e001 | | Load 0x0,0x1
0155 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0156 e00e | | Load 0x0,0xe
0157 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0158 e00b | | Load 0x0,0xb ; Debug Table 0x8.0x9 = 0x158,0x7
0159 1b12 | | Execute Package,Field_Read,Field_Number 0x12
015a 0257 | W | Execute Discrete,Raise
015b e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0xa = 0x15b,0x8
015c e00f | | Load 0x0,0xf
015d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
015e 7016 |p | Jump_Nonzero 0x175
015f e5fe | | Load 0x2,-0x2
0160 00d9 | | Load_Top At_Offset_1
0161 e002 | | Load 0x0,0x2
0162 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0163 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0164 e002 | | Load 0x0,0x2
0165 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0166 700e |p | Jump_Nonzero 0x175
0167 e23a | : | Load 0x1,0x3a ; Debug Table 0x8.0xb = 0x167,0x9
0168 0092 0ea8 | | Action Push_String_Extended,0xea8 ; "Set_Root"
016a 01cc | | Execute Vector,Catenate
016b 0092 0eab | | Action Push_String_Extended,0xeab ; "The unit must be open for update to set its root."
016d 4806 |H | Short_Literal 0x6
016e e001 | | Load 0x0,0x1
016f 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0170 e00e | | Load 0x0,0xe
0171 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0172 e00b | | Load 0x0,0xb ; Debug Table 0x8.0xc = 0x172,0xa
0173 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0174 0257 | W | Execute Discrete,Raise
0175 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xd = 0x175,0xb
0176 e5ff | | Load 0x2,-0x1
0177 e002 | | Load 0x0,0x2
0178 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0179 1817 | | Execute Package,Field_Execute,Field_Number 0x17
017a 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xe = 0x17a,0xc
017b a5fd | | Store_Unchecked 0x2,-0x3
017c 4503 |E | Exit_Subprogram 0x3
017d TRAP_0128:
017d 0007 | | Action Break_Optional
017e e001 | | Load 0x0,0x1 ; Debug Table 0x8.0xf = 0x17e,0xd
017f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0180 e23a | : | Load 0x1,0x3a
0181 0092 0ea8 | | Action Push_String_Extended,0xea8 ; "Set_Root"
0183 01cc | | Execute Vector,Catenate
0184 e001 | | Load 0x0,0x1
0185 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0186 e00b | | Load 0x0,0xb
0187 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0188 c5fd | | Store 0x2,-0x3
0189 4503 |E | Exit_Subprogram 0x3
018a 0000 0000 | | .BLANK 0000[0x6]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 019e | | .CONST 0x019e ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x0193,0x1312,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0795
; Debug Table 0x9.0x0 = 0x193,0x1
0194 e00f | | Load 0x0,0xf
0195 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0196 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x1 = 0x196,0x2
0197 e002 | | Load 0x0,0x2
0198 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0199 1816 | | Execute Package,Field_Execute,Field_Number 0x16
019a a5fe | | Store_Unchecked 0x2,-0x2
019b 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x2 = 0x19b,0x3
019c a5fd | | Store_Unchecked 0x2,-0x3
019d 4502 |E | Exit_Subprogram 0x2
019e TRAP_0190:
019e 0007 | | Action Break_Optional
019f e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x3 = 0x19f,0x4
01a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a1 e23a | : | Load 0x1,0x3a
01a2 0092 0eac | | Action Push_String_Extended,0xeac ; "Get_Root"
01a4 01cc | | Execute Vector,Catenate
01a5 e001 | | Load 0x0,0x1
01a6 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
01a7 e00b | | Load 0x0,0xb
01a8 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01a9 c5fd | | Store 0x2,-0x3
01aa 4502 |E | Exit_Subprogram 0x2
01ab 0000 0000 | | .BLANK 0000[0x5]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 01c6 | | .CONST 0x01c6 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 e001 | | Load 0x0,0x1 ; Debug Table 0xa = .DEBUG 0x01b3,0x131c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07a5
; Debug Table 0xa.0x0 = 0x1b3,0x1
01b4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01b5 e5fe | | Load 0x2,-0x2
01b6 016d | m | Execute Variant_Record,Structure_Write
01b7 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1 = 0x1b7,0x2
01b8 e00f | | Load 0x0,0xf
01b9 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01ba 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x2 = 0x1ba,0x3
01bb e002 | | Load 0x0,0x2
01bc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01bd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01be e002 | | Load 0x0,0x2
01bf 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01c1 e5fe | | Load 0x2,-0x2
01c2 016d | m | Execute Variant_Record,Structure_Write
01c3 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x3 = 0x1c3,0x4
01c4 a5fd | | Store_Unchecked 0x2,-0x3
01c5 4502 |E | Exit_Subprogram 0x2
01c6 TRAP_01b0:
01c6 0007 | | Action Break_Optional
01c7 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x4 = 0x1c7,0x5
01c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c9 e23a | : | Load 0x1,0x3a
01ca 0092 0ead | | Action Push_String_Extended,0xead ; "Get_Version"
01cc 01cc | | Execute Vector,Catenate
01cd e001 | | Load 0x0,0x1
01ce 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
01cf e00b | | Load 0x0,0xb
01d0 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01d1 c5fd | | Store 0x2,-0x3
01d2 4502 |E | Exit_Subprogram 0x2
01d3 0000 0000 | | .BLANK 0000[0x5]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db | | .CONST 0x01db ; Address of begin
01d9 01ef | | .CONST 0x01ef ; Address of exception handler
01da 0001 | | .CONST 0x0001 ; Number of locals
01db BODY_01d8:
01db INIT_01d8:
01db e001 | | Load 0x0,0x1 ; Debug Table 0xb = .DEBUG 0x01db,0x1328,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07b7
; Debug Table 0xb.0x0 = 0x1db,0x1
01dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01dd e5fe | | Load 0x2,-0x2
01de 016d | m | Execute Variant_Record,Structure_Write
01df 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1 = 0x1df,0x2
01e0 e00f | | Load 0x0,0xf
01e1 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01e2 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x2 = 0x1e2,0x3
01e3 e002 | | Load 0x0,0x2
01e4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01e5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01e6 e001 | | Load 0x0,0x1
01e7 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
01e8 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e9 8211 | | Call 0x1,0x11
01ea e5fe | | Load 0x2,-0x2
01eb 016d | m | Execute Variant_Record,Structure_Write
01ec 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x3 = 0x1ec,0x4
01ed a5fd | | Store_Unchecked 0x2,-0x3
01ee 4502 |E | Exit_Subprogram 0x2
01ef TRAP_01d8:
01ef 0007 | | Action Break_Optional
01f0 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x4 = 0x1f0,0x5
01f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f2 e23a | : | Load 0x1,0x3a
01f3 0092 0eae | | Action Push_String_Extended,0xeae ; "Get_Unit"
01f5 01cc | | Execute Vector,Catenate
01f6 e001 | | Load 0x0,0x1
01f7 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
01f8 e00b | | Load 0x0,0xb
01f9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01fa c5fd | | Store 0x2,-0x3
01fb 4502 |E | Exit_Subprogram 0x2
01fc 0000 0000 | | .BLANK 0000[0x4]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020e | | .CONST 0x020e ; Address of begin
0201 0251 | Q | .CONST 0x0251 ; Address of exception handler
0202 0004 | | .CONST 0x0004 ; Number of locals
0203 INIT_0200:
0203 e001 | | Load 0x0,0x1 ; Debug Table 0xc = .DEBUG 0x0203,0x1334,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07c9
; Debug Table 0xc.0x0 = 0x203,0xffff
0204 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0205 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x1 = 0x205,0xfffe
0206 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0207 02ff | | Declare_Variable Variant_Record
0208 00d8 | | Load_Top At_Offset_0
0209 1c00 | | Execute_Immediate Run_Utility,0x0
020a e20e | | Load 0x1,0xe ; Debug Table 0xc.0x2 = 0x20a,0xfffd
020b 02ff | | Declare_Variable Variant_Record
020c 00d8 | | Load_Top At_Offset_0
020d 1c00 | | Execute_Immediate Run_Utility,0x0
020e BODY_0200:
020e e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x3 = 0x20e,0x1
020f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0210 e5fb | | Load 0x2,-0x5
0211 016d | m | Execute Variant_Record,Structure_Write
0212 e5ff | | Load 0x2,-0x1 ; Debug Table 0xc.0x4 = 0x212,0x2
0213 e00f | | Load 0x0,0xf
0214 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0215 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x5 = 0x215,0x3
0216 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0217 00da | | Load_Top At_Offset_2
0218 e5fc | | Load 0x2,-0x4
0219 e5fd | | Load 0x2,-0x3
021a e5ff | | Load 0x2,-0x1
021b e001 | | Load 0x0,0x1
021c 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
021d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
021e 00d1 | | Pop_Control Pop_Count_1
021f 005b | [ | Store_Top Discrete,At_Offset_3
0220 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x6 = 0x220,0x4
0221 0007 | | Action Break_Optional
0222 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x7 = 0x222,0x401
0223 6803 |h | Jump_Zero 0x227
0224 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x8 = 0x224,0x402
0225 e00b | | Load 0x0,0xb
0226 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0227 00d1 | | Pop_Control Pop_Count_1
0228 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x9 = 0x228,0x5
0229 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022a 00d9 | | Load_Top At_Offset_1
022b 00db | | Load_Top At_Offset_3
022c e001 | | Load 0x0,0x1
022d 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
022e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022f 00d1 | | Pop_Control Pop_Count_1
0230 005b | [ | Store_Top Discrete,At_Offset_3
0231 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0xa = 0x231,0x6
0232 0007 | | Action Break_Optional
0233 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xb = 0x233,0x801
0234 6803 |h | Jump_Zero 0x238
0235 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xc = 0x235,0x802
0236 e00b | | Load 0x0,0xb
0237 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0238 00d1 | | Pop_Control Pop_Count_1
0239 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0xd = 0x239,0x7
023a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023b e5fb | | Load 0x2,-0x5
023c e5fc | | Load 0x2,-0x4
023d e5fd | | Load 0x2,-0x3
023e e5fe | | Load 0x2,-0x2
023f e404 | | Load 0x2,0x4
0240 8212 | | Call 0x1,0x12
0241 e001 | | Load 0x0,0x1
0242 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0243 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0244 00d1 | | Pop_Control Pop_Count_1
0245 005b | [ | Store_Top Discrete,At_Offset_3
0246 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0xe = 0x246,0x8
0247 0007 | | Action Break_Optional
0248 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xf = 0x248,0xc01
0249 6803 |h | Jump_Zero 0x24d
024a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x10 = 0x24a,0xc02
024b e00b | | Load 0x0,0xb
024c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
024d 00d1 | | Pop_Control Pop_Count_1
024e 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x11 = 0x24e,0x9
024f a5fa | | Store_Unchecked 0x2,-0x6
0250 4505 |E | Exit_Subprogram 0x5
0251 TRAP_0200:
0251 0007 | | Action Break_Optional
0252 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x12 = 0x252,0xa
0253 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0254 e23a | : | Load 0x1,0x3a
0255 0092 0eaf | | Action Push_String_Extended,0xeaf ; "Get_Parent"
0257 01cc | | Execute Vector,Catenate
0258 e001 | | Load 0x0,0x1
0259 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
025a e00b | | Load 0x0,0xb
025b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
025c c5fa | | Store 0x2,-0x6
025d 4505 |E | Exit_Subprogram 0x5
025e 0000 0000 | | .XXX[0x2]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 028f | | .CONST 0x028f ; Address of begin
0261 02da | | .CONST 0x02da ; Address of exception handler
0262 000c | | .CONST 0x000c ; Number of locals
0263 INIT_0260:
0263 e001 | | Load 0x0,0x1 ; Debug Table 0xd = .DEBUG 0x0263,0x135c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07f7
; Debug Table 0xd.0x0 = 0x263,0xffff
0264 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0265 02ff | | Declare_Variable Variant_Record
0266 00db | | Load_Top At_Offset_3
0267 8212 | | Call 0x1,0x12
0268 00d9 | | Load_Top At_Offset_1
0269 016d | m | Execute Variant_Record,Structure_Write
026a e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x1 = 0x26a,0xfffe
026b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
026c e213 | | Load 0x1,0x13 ; Debug Table 0xd.0x2 = 0x26c,0xfffd
026d 02ff | | Declare_Variable Variant_Record
026e 00d8 | | Load_Top At_Offset_0
026f 1c00 | | Execute_Immediate Run_Utility,0x0
0270 e008 | | Load 0x0,0x8 ; Debug Table 0xd.0x3 = 0x270,0xfffc
0271 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0272 02c7 | | Declare_Variable Any
0273 00d8 | | Load_Top At_Offset_0
0274 1c00 | | Execute_Immediate Run_Utility,0x0
0275 e010 | | Load 0x0,0x10 ; Debug Table 0xd.0x4 = 0x275,0xfffb
0276 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0277 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0278 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x5 = 0x278,0xfffa
0279 00f0 | | Load_Encached Segment_Cache ; Debug Table 0xd.0x6 = 0x279,0xfff9
027a e011 | | Load 0x0,0x11
027b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
027c e012 | | Load 0x0,0x12
027d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
027e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
027f e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x7 = 0x27f,0xfff8
0280 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0281 0322 | " | Declare_Variable Record
0282 00d8 | | Load_Top At_Offset_0
0283 1c00 | | Execute_Immediate Run_Utility,0x0
0284 e221 | ! | Load 0x1,0x21 ; Debug Table 0xd.0x8 = 0x284,0xfff7
0285 02c7 | | Declare_Variable Any
0286 00d8 | | Load_Top At_Offset_0
0287 1c00 | | Execute_Immediate Run_Utility,0x0
0288 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x9 = 0x288,0xfff6
0289 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
028a 02ff | | Declare_Variable Variant_Record
028b 00d8 | | Load_Top At_Offset_0
028c 1c00 | | Execute_Immediate Run_Utility,0x0
028d 029f 0c63 | c| Declare_Subprogram For_Call,INIT_0c60
028f BODY_0260:
028f 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xa = 0x28f,0x1
0290 a5fb | | Store_Unchecked 0x2,-0x5
0291 e5ff | | Load 0x2,-0x1 ; Debug Table 0xd.0xb = 0x291,0x2
0292 e00f | | Load 0x0,0xf
0293 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0294 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0xc = 0x294,0x3
0295 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0296 00da | | Load_Top At_Offset_2
0297 e409 | | Load 0x2,0x9
0298 e5fc | | Load 0x2,-0x4
0299 e5fd | | Load 0x2,-0x3
029a e402 | | Load 0x2,0x2
029b e00d | | Load 0x0,0xd
029c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
029d 180e | | Execute Package,Field_Execute,Field_Number 0xe
029e 00d2 | | Pop_Control Pop_Count_2
029f c403 | | Store 0x2,0x3
02a0 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0xd = 0x2a0,0x4
02a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a2 e404 | | Load 0x2,0x4
02a3 e5fc | | Load 0x2,-0x4
02a4 e5fd | | Load 0x2,-0x3
02a5 e5fe | | Load 0x2,-0x2
02a6 e402 | | Load 0x2,0x2
02a7 e001 | | Load 0x0,0x1
02a8 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
02a9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02aa 00d1 | | Pop_Control Pop_Count_1
02ab c403 | | Store 0x2,0x3
02ac e403 | | Load 0x2,0x3 ; Debug Table 0xd.0xe = 0x2ac,0x5
02ad 0007 | | Action Break_Optional
02ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xf = 0x2ae,0x401
02af 6803 |h | Jump_Zero 0x2b3
02b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x10 = 0x2b0,0x402
02b1 e00b | | Load 0x0,0xb
02b2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
02b3 00d1 | | Pop_Control Pop_Count_1
02b4 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x11 = 0x2b4,0x6
02b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b6 00db | | Load_Top At_Offset_3
02b7 0120 | | Execute Any,Is_Value
02b8 6802 |h | Jump_Zero 0x2bb
02b9 e221 | ! | Load 0x1,0x21
02ba 7801 |x | Jump 0x2bc
02bb 00db | | Load_Top At_Offset_3
02bc e216 | | Load 0x1,0x16
02bd 4800 |H | Short_Literal 0x0
02be 4801 |H | Short_Literal 0x1
02bf 4800 |H | Short_Literal 0x0
02c0 6087 |` | Indirect_Literal Discrete,0x348,{0x00000000, 0x00004000}
02c1 e00a | | Load 0x0,0xa
02c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02c3 4800 |H | Short_Literal 0x0
02c4 e404 | | Load 0x2,0x4
02c5 e013 | | Load 0x0,0x13
02c6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02c7 c407 | | Store 0x2,0x7
02c8 c40a | | Store 0x2,0xa
02c9 c403 | | Store 0x2,0x3
02ca e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x12 = 0x2ca,0x7
02cb 0007 | | Action Break_Optional
02cc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x13 = 0x2cc,0x801
02cd 6803 |h | Jump_Zero 0x2d1
02ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x14 = 0x2ce,0x802
02cf e00b | | Load 0x0,0xb
02d0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
02d1 00d1 | | Pop_Control Pop_Count_1
02d2 840c | | Call 0x2,0xc ; Debug Table 0xd.0x15 = 0x2d2,0x8
02d3 e406 | | Load 0x2,0x6 ; Debug Table 0xd.0x16 = 0x2d3,0x9
02d4 e21e | | Load 0x1,0x1e
02d5 025b | [ | Execute Discrete,Check_In_Type
02d6 a5fb | | Store_Unchecked 0x2,-0x5
02d7 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x17 = 0x2d7,0xa
02d8 a5fa | | Store_Unchecked 0x2,-0x6
02d9 4505 |E | Exit_Subprogram 0x5
02da TRAP_0260:
02da 0007 | | Action Break_Optional
02db 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x18 = 0x2db,0xb
02dc a5fb | | Store_Unchecked 0x2,-0x5
02dd e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x19 = 0x2dd,0xc
02de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02df e23a | : | Load 0x1,0x3a
02e0 0092 0eb0 | | Action Push_String_Extended,0xeb0 ; "Get_Phase"
02e2 01cc | | Execute Vector,Catenate
02e3 e001 | | Load 0x0,0x1
02e4 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
02e5 e00b | | Load 0x0,0xb
02e6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02e7 c5fa | | Store 0x2,-0x6
02e8 4505 |E | Exit_Subprogram 0x5
02e9 0000 0000 | | .BLANK 0000[0x7]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 0302 | | .CONST 0x0302 ; Address of begin
02f1 0339 | 9 | .CONST 0x0339 ; Address of exception handler
02f2 0005 | | .CONST 0x0005 ; Number of locals
02f3 INIT_02f0:
02f3 e001 | | Load 0x0,0x1 ; Debug Table 0xe = .DEBUG 0x02f3,0x1392,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x081c
; Debug Table 0xe.0x0 = 0x2f3,0xffff
02f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f5 e213 | | Load 0x1,0x13 ; Debug Table 0xe.0x1 = 0x2f5,0xfffe
02f6 02ff | | Declare_Variable Variant_Record
02f7 00d8 | | Load_Top At_Offset_0
02f8 1c00 | | Execute_Immediate Run_Utility,0x0
02f9 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x2 = 0x2f9,0xfffd
02fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fb 02ff | | Declare_Variable Variant_Record
02fc e5ff | | Load 0x2,-0x1
02fd 8212 | | Call 0x1,0x12
02fe 00d9 | | Load_Top At_Offset_1
02ff 016d | m | Execute Variant_Record,Structure_Write
0300 e014 | | Load 0x0,0x14 ; Debug Table 0xe.0x3 = 0x300,0xfffc
0301 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0302 BODY_02f0:
0302 e5ff | | Load 0x2,-0x1 ; Debug Table 0xe.0x4 = 0x302,0x1
0303 e00f | | Load 0x0,0xf
0304 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0305 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x5 = 0x305,0x2
0306 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0307 00db | | Load_Top At_Offset_3
0308 e5fb | | Load 0x2,-0x5
0309 e5fc | | Load 0x2,-0x4
030a e5fd | | Load 0x2,-0x3
030b e404 | | Load 0x2,0x4
030c e001 | | Load 0x0,0x1
030d 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
030e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
030f 00d1 | | Pop_Control Pop_Count_1
0310 c402 | | Store 0x2,0x2
0311 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x6 = 0x311,0x3
0312 0007 | | Action Break_Optional
0313 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x7 = 0x313,0x401
0314 6803 |h | Jump_Zero 0x318
0315 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x8 = 0x315,0x402
0316 e00b | | Load 0x0,0xb
0317 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0318 00d1 | | Pop_Control Pop_Count_1
0319 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x9 = 0x319,0x4
031a e015 | | Load 0x0,0x15
031b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
031c e014 | | Load 0x0,0x14 ; Debug Table 0xe.0xa = 0x31c,0x5
031d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031e e5fb | | Load 0x2,-0x5
031f e5fc | | Load 0x2,-0x4
0320 e5fe | | Load 0x2,-0x2
0321 e403 | | Load 0x2,0x3
0322 e002 | | Load 0x0,0x2
0323 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0324 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0325 0059 | Y | Store_Top Discrete,At_Offset_1
0326 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xb = 0x326,0x6
0327 0007 | | Action Break_Optional
0328 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xc = 0x328,0x801
0329 6803 |h | Jump_Zero 0x32d
032a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xd = 0x32a,0x802
032b e00b | | Load 0x0,0xb
032c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
032d 00d1 | | Pop_Control Pop_Count_1
032e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0xe = 0x32e,0x7
032f e001 | | Load 0x0,0x1
0330 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0331 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0332 00da | | Load_Top At_Offset_2
0333 e00d | | Load 0x0,0xd
0334 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0335 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0336 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0xf = 0x336,0x8
0337 a5fa | | Store_Unchecked 0x2,-0x6
0338 4506 |E | Exit_Subprogram 0x6
0339 TRAP_02f0:
0339 0007 | | Action Break_Optional
033a e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x10 = 0x33a,0x9
033b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033c e23a | : | Load 0x1,0x3a
033d 0092 0eb1 | | Action Push_String_Extended,0xeb1 ; "Set_Phase"
033f 01cc | | Execute Vector,Catenate
0340 e001 | | Load 0x0,0x1
0341 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0342 e00b | | Load 0x0,0xb
0343 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0344 c5fa | | Store 0x2,-0x6
0345 4506 |E | Exit_Subprogram 0x6
0346 0000 0000 | | .XXX[0x2]
0348 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
034c 0049 040e | I | .LITERAL {0x0049040e, 0x0000c8b0}
0350 0049 000e | I | .LITERAL {0x0049000e, 0x000000b0}
0354 0000 0000 | | .BLANK 0000[0x4]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b | [ | .CONST 0x035b ; Address of begin
0359 0363 | c | .CONST 0x0363 ; Address of exception handler
035a 0001 | | .CONST 0x0001 ; Number of locals
035b BODY_0358:
035b INIT_0358:
035b 00da | | Load_Top At_Offset_2 ; Debug Table 0xf = .DEBUG 0x035b,0x13b6,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0845
; Debug Table 0xf.0x0 = 0x35b,0x1
035c e5fe | | Load 0x2,-0x2
035d 00eb | | Load_Encached Diana_Cache
035e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
035f a5fd | | Store_Unchecked 0x2,-0x3
0360 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0x1 = 0x360,0x2
0361 a5fc | | Store_Unchecked 0x2,-0x4
0362 4503 |E | Exit_Subprogram 0x3
0363 TRAP_0358:
0363 0007 | | Action Break_Optional
0364 0007 | | Action Break_Optional ; Debug Table 0xf.0x2 = 0x364,0x3
0365 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x3 = 0x365,0x401
0366 a5fd | | Store_Unchecked 0x2,-0x3 ; Debug Table 0xf.0x4 = 0x366,0x3
0367 e001 | | Load 0x0,0x1 ; Debug Table 0xf.0x5 = 0x367,0x4
0368 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0369 e23a | : | Load 0x1,0x3a
036a 0092 0eb2 | | Action Push_String_Extended,0xeb2 ; "Convert"
036c 01cc | | Execute Vector,Catenate
036d e001 | | Load 0x0,0x1
036e 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
036f e00b | | Load 0x0,0xb
0370 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0371 c5fc | | Store 0x2,-0x4
0372 4503 |E | Exit_Subprogram 0x3
0373 0000 0000 | | .BLANK 0000[0x5]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b e23d | = | Load 0x1,0x3d ; Debug Table 0x10 = .DEBUG 0x037b,0x13c4,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x085d
; Debug Table 0x10.0x0 = 0x37b,0x1
037c 00ca | | Action Exit_Nullary_Function
037d 0000 0000 | | .XXX[0x3]
037f 0000 | |
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 00da | | Load_Top At_Offset_2 ; Debug Table 0x11 = .DEBUG 0x0383,0x13c8,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0862
; Debug Table 0x11.0x0 = 0x383,0x1
0384 e23d | = | Load 0x1,0x3d
0385 012f | / | Execute Any,Equal
0386 4401 |D | Exit_Subprogram With_Result,0x1
0387 0000 | | .XXX[0x1]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00da | | Load_Top At_Offset_2 ; Debug Table 0x12 = .DEBUG 0x038b,0x13cc,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x086b
; Debug Table 0x12.0x0 = 0x38b,0x1
038c e006 | | Load 0x0,0x6
038d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
038e 4401 |D | Exit_Subprogram With_Result,0x1
038f 0000 | | .XXX[0x1]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00da | | Load_Top At_Offset_2 ; Debug Table 0x13 = .DEBUG 0x0393,0x13d0,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0876
; Debug Table 0x13.0x0 = 0x393,0x1
0394 e006 | | Load 0x0,0x6
0395 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0396 4401 |D | Exit_Subprogram With_Result,0x1
0397 0000 | | .XXX[0x1]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 4603 |F | Jump_Case 0x3 ; Debug Table 0x14 = .DEBUG 0x039b,0x13d4,0x0005,0x0000,0x0056,0xd7e5,0x0000,0x0888
039c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
039d 7802 |x | Jump 0x3a0 ; case 0x1
039e 7805 |x | Jump 0x3a4 ; case 0x2
039f 7809 |x | Jump 0x3a9 ; case 0x3
03a0 00da | | Load_Top At_Offset_2
03a1 0091 0ea4 | | Action Push_String_Extended_Indexed,0xea4 ; "NONE"
03a3 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
03a4 00db | | Load_Top At_Offset_3
03a5 00db | | Load_Top At_Offset_3
03a6 00e0 | | Load_Encached Standard_Cache
03a7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03a8 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
03a9 00da | | Load_Top At_Offset_2
03aa 00e0 | | Load_Encached Standard_Cache
03ab 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03ac 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
03ad 0000 0000 | | .XXX[0x3]
03af 0000 | |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03c3 | | .CONST 0x03c3 ; Address of begin
03b1 0405 | | .CONST 0x0405 ; Address of exception handler
03b2 0004 | | .CONST 0x0004 ; Number of locals
03b3 INIT_03b0:
03b3 e001 | | Load 0x0,0x1 ; Debug Table 0x15 = .DEBUG 0x03b3,0x13d6,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x088f
; Debug Table 0x15.0x0 = 0x3b3,0xffff
03b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b5 e001 | | Load 0x0,0x1 ; Debug Table 0x15.0x1 = 0x3b5,0xfffe
03b6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03b7 02ff | | Declare_Variable Variant_Record
03b8 00d8 | | Load_Top At_Offset_0
03b9 1c00 | | Execute_Immediate Run_Utility,0x0
03ba e00a | | Load 0x0,0xa ; Debug Table 0x15.0x2 = 0x3ba,0xfffd
03bb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03bc 02c7 | | Declare_Variable Any
03bd e016 | | Load 0x0,0x16
03be 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03bf e5fe | | Load 0x2,-0x2
03c0 e00a | | Load 0x0,0xa
03c1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03c2 c404 | | Store 0x2,0x4
03c3 BODY_03b0:
03c3 0007 | | Action Break_Optional ; Debug Table 0x15.0x3 = 0x3c3,0x1
03c4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x4 = 0x3c4,0x401
03c5 a5f9 | | Store_Unchecked 0x2,-0x7 ; Debug Table 0x15.0x5 = 0x3c5,0x1
03c6 8223 | # | Call 0x1,0x23 ; Debug Table 0x15.0x6 = 0x3c6,0x2
03c7 c5f8 | | Store 0x2,-0x8
03c8 e5fa | | Load 0x2,-0x6 ; Debug Table 0x15.0x7 = 0x3c8,0x3
03c9 e00f | | Load 0x0,0xf
03ca 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03cb e001 | | Load 0x0,0x1 ; Debug Table 0x15.0x8 = 0x3cb,0x4
03cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03cd 00da | | Load_Top At_Offset_2
03ce e5fb | | Load 0x2,-0x5
03cf 00db | | Load_Top At_Offset_3
03d0 e5fa | | Load 0x2,-0x6
03d1 e001 | | Load 0x0,0x1
03d2 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
03d3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03d4 00d1 | | Pop_Control Pop_Count_1
03d5 005b | [ | Store_Top Discrete,At_Offset_3
03d6 00da | | Load_Top At_Offset_2 ; Debug Table 0x15.0x9 = 0x3d6,0x5
03d7 0007 | | Action Break_Optional
03d8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xa = 0x3d8,0x801
03d9 6803 |h | Jump_Zero 0x3dd
03da 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xb = 0x3da,0x802
03db e00b | | Load 0x0,0xb
03dc 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03dd 00d1 | | Pop_Control Pop_Count_1
03de e001 | | Load 0x0,0x1 ; Debug Table 0x15.0xc = 0x3de,0x6
03df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03e0 e5f8 | | Load 0x2,-0x8
03e1 0120 | | Execute Any,Is_Value
03e2 6802 |h | Jump_Zero 0x3e5
03e3 e221 | ! | Load 0x1,0x21
03e4 7801 |x | Jump 0x3e6
03e5 e5f8 | | Load 0x2,-0x8
03e6 e216 | | Load 0x1,0x16
03e7 e5fa | | Load 0x2,-0x6
03e8 e5fc | | Load 0x2,-0x4
03e9 e5fd | | Load 0x2,-0x3
03ea e5fb | | Load 0x2,-0x5
03eb e404 | | Load 0x2,0x4
03ec e5ff | | Load 0x2,-0x1
03ed e403 | | Load 0x2,0x3
03ee 823e | > | Call 0x1,0x3e
03ef 00d1 | | Pop_Control Pop_Count_1
03f0 c5f9 | | Store 0x2,-0x7
03f1 c5f8 | | Store 0x2,-0x8
03f2 005b | [ | Store_Top Discrete,At_Offset_3
03f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x15.0xd = 0x3f3,0x7
03f4 0007 | | Action Break_Optional
03f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xe = 0x3f5,0xc01
03f6 6803 |h | Jump_Zero 0x3fa
03f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xf = 0x3f7,0xc02
03f8 e00b | | Load 0x0,0xb
03f9 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03fa 00d1 | | Pop_Control Pop_Count_1
03fb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x10 = 0x3fb,0x8
03fc 4801 |H | Short_Literal 0x1
03fd 4801 |H | Short_Literal 0x1
03fe e5fe | | Load 0x2,-0x2
03ff e00a | | Load 0x0,0xa
0400 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0401 c404 | | Store 0x2,0x4
0402 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x11 = 0x402,0x9
0403 a5f7 | | Store_Unchecked 0x2,-0x9
0404 4506 |E | Exit_Subprogram 0x6
0405 TRAP_03b0:
0405 0007 | | Action Break_Optional
0406 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x12 = 0x406,0xa
0407 4801 |H | Short_Literal 0x1
0408 4800 |H | Short_Literal 0x0
0409 e5fe | | Load 0x2,-0x2
040a e00a | | Load 0x0,0xa
040b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
040c c404 | | Store 0x2,0x4
040d e001 | | Load 0x0,0x1 ; Debug Table 0x15.0x13 = 0x40d,0xb
040e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040f e23a | : | Load 0x1,0x3a
0410 0092 0eb3 | | Action Push_String_Extended,0xeb3 ; "Open (1)"
0412 01cc | | Execute Vector,Catenate
0413 e001 | | Load 0x0,0x1
0414 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0415 e00b | | Load 0x0,0xb
0416 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0417 c5f7 | | Store 0x2,-0x9
0418 4506 |E | Exit_Subprogram 0x6
0419 0000 0000 | | .BLANK 0000[0x7]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0434 | 4 | .CONST 0x0434 ; Address of begin
0421 047c | | | .CONST 0x047c ; Address of exception handler
0422 0004 | | .CONST 0x0004 ; Number of locals
0423 INIT_0420:
0423 e213 | | Load 0x1,0x13 ; Debug Table 0x16 = .DEBUG 0x0423,0x1400,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x08be
; Debug Table 0x16.0x0 = 0x423,0xffff
0424 02ff | | Declare_Variable Variant_Record
0425 e001 | | Load 0x0,0x1
0426 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0427 00d9 | | Load_Top At_Offset_1
0428 016d | m | Execute Variant_Record,Structure_Write
0429 e001 | | Load 0x0,0x1 ; Debug Table 0x16.0x1 = 0x429,0xfffe
042a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042b e00a | | Load 0x0,0xa ; Debug Table 0x16.0x2 = 0x42b,0xfffd
042c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042d 02c7 | | Declare_Variable Any
042e e016 | | Load 0x0,0x16
042f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0430 e5fd | | Load 0x2,-0x3
0431 e00a | | Load 0x0,0xa
0432 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0433 c404 | | Store 0x2,0x4
0434 BODY_0420:
0434 0007 | | Action Break_Optional ; Debug Table 0x16.0x3 = 0x434,0x1
0435 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16.0x4 = 0x435,0x401
0436 a5f8 | | Store_Unchecked 0x2,-0x8 ; Debug Table 0x16.0x5 = 0x436,0x1
0437 8223 | # | Call 0x1,0x23 ; Debug Table 0x16.0x6 = 0x437,0x2
0438 c5f7 | | Store 0x2,-0x9
0439 e5ff | | Load 0x2,-0x1 ; Debug Table 0x16.0x7 = 0x439,0x3
043a e00f | | Load 0x0,0xf
043b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
043c e001 | | Load 0x0,0x1 ; Debug Table 0x16.0x8 = 0x43c,0x4
043d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
043e 00db | | Load_Top At_Offset_3
043f e5f9 | | Load 0x2,-0x7
0440 00db | | Load_Top At_Offset_3
0441 e5fc | | Load 0x2,-0x4
0442 e5ff | | Load 0x2,-0x1
0443 e013 | | Load 0x0,0x13
0444 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0445 00d1 | | Pop_Control Pop_Count_1
0446 005a | Z | Store_Top Discrete,At_Offset_2
0447 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x9 = 0x447,0x5
0448 0e00 | | Execute_Immediate Not_Equal,0x0
0449 e5fe | | Load 0x2,-0x2
044a 0e02 | | Execute_Immediate Not_Equal,0x2
044b 0279 | y | Execute Discrete,And
044c 6808 |h | Jump_Zero 0x455
044d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0xa = 0x44d,0x6
044e 0007 | | Action Break_Optional
044f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0xb = 0x44f,0x801
0450 6803 |h | Jump_Zero 0x454
0451 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0xc = 0x451,0x802
0452 e00b | | Load 0x0,0xb
0453 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0454 00d1 | | Pop_Control Pop_Count_1
0455 e001 | | Load 0x0,0x1 ; Debug Table 0x16.0xd = 0x455,0x7
0456 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0457 e5f7 | | Load 0x2,-0x9
0458 0120 | | Execute Any,Is_Value
0459 6802 |h | Jump_Zero 0x45c
045a e221 | ! | Load 0x1,0x21
045b 7801 |x | Jump 0x45d
045c e5f7 | | Load 0x2,-0x9
045d e216 | | Load 0x1,0x16
045e e402 | | Load 0x2,0x2
045f e5fa | | Load 0x2,-0x6
0460 e5fb | | Load 0x2,-0x5
0461 e5f9 | | Load 0x2,-0x7
0462 e404 | | Load 0x2,0x4
0463 e5fe | | Load 0x2,-0x2
0464 e5ff | | Load 0x2,-0x1
0465 823e | > | Call 0x1,0x3e
0466 00d1 | | Pop_Control Pop_Count_1
0467 c5f8 | | Store 0x2,-0x8
0468 c5f7 | | Store 0x2,-0x9
0469 005a | Z | Store_Top Discrete,At_Offset_2
046a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0xe = 0x46a,0x8
046b 0007 | | Action Break_Optional
046c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0xf = 0x46c,0xc01
046d 6803 |h | Jump_Zero 0x471
046e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x10 = 0x46e,0xc02
046f e00b | | Load 0x0,0xb
0470 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0471 00d1 | | Pop_Control Pop_Count_1
0472 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x11 = 0x472,0x9
0473 4801 |H | Short_Literal 0x1
0474 4801 |H | Short_Literal 0x1
0475 e5fd | | Load 0x2,-0x3
0476 e00a | | Load 0x0,0xa
0477 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0478 c404 | | Store 0x2,0x4
0479 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x12 = 0x479,0xa
047a a5f6 | | Store_Unchecked 0x2,-0xa
047b 4508 |E | Exit_Subprogram 0x8
047c TRAP_0420:
047c 0007 | | Action Break_Optional
047d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x13 = 0x47d,0xb
047e 4801 |H | Short_Literal 0x1
047f 4800 |H | Short_Literal 0x0
0480 e5fd | | Load 0x2,-0x3
0481 e00a | | Load 0x0,0xa
0482 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0483 c404 | | Store 0x2,0x4
0484 e001 | | Load 0x0,0x1 ; Debug Table 0x16.0x14 = 0x484,0xc
0485 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0486 e23a | : | Load 0x1,0x3a
0487 0092 0eb4 | | Action Push_String_Extended,0xeb4 ; "Open (2)"
0489 01cc | | Execute Vector,Catenate
048a e001 | | Load 0x0,0x1
048b 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
048c e00b | | Load 0x0,0xb
048d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
048e c5f6 | | Store 0x2,-0xa
048f 4508 |E | Exit_Subprogram 0x8
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 04a6 | | .CONST 0x04a6 ; Address of begin
0491 04e4 | | .CONST 0x04e4 ; Address of exception handler
0492 0005 | | .CONST 0x0005 ; Number of locals
0493 INIT_0490:
0493 e001 | | Load 0x0,0x1 ; Debug Table 0x17 = .DEBUG 0x0493,0x142c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x08f2
; Debug Table 0x17.0x0 = 0x493,0xffff
0494 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0495 02ff | | Declare_Variable Variant_Record
0496 00d8 | | Load_Top At_Offset_0
0497 1c00 | | Execute_Immediate Run_Utility,0x0
0498 e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x1 = 0x498,0xfffe
0499 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
049a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
049b e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x2 = 0x49b,0xfffd
049c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049d e00a | | Load 0x0,0xa ; Debug Table 0x17.0x3 = 0x49d,0xfffc
049e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049f 02c7 | | Declare_Variable Any
04a0 e016 | | Load 0x0,0x16
04a1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04a2 e5fd | | Load 0x2,-0x3
04a3 e00a | | Load 0x0,0xa
04a4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04a5 c405 | | Store 0x2,0x5
04a6 BODY_0490:
04a6 0007 | | Action Break_Optional ; Debug Table 0x17.0x4 = 0x4a6,0x1
04a7 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x17.0x5 = 0x4a7,0x401
04a8 a5f7 | | Store_Unchecked 0x2,-0x9 ; Debug Table 0x17.0x6 = 0x4a8,0x1
04a9 8223 | # | Call 0x1,0x23 ; Debug Table 0x17.0x7 = 0x4a9,0x2
04aa c5f6 | | Store 0x2,-0xa
04ab e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x8 = 0x4ab,0x3
04ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04ae e402 | | Load 0x2,0x2
04af 6698 |f | Indirect_Literal Discrete,0x348,{0x00000000, 0x00004000}
04b0 e00a | | Load 0x0,0xa
04b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b2 e5fc | | Load 0x2,-0x4
04b3 e5ff | | Load 0x2,-0x1
04b4 e001 | | Load 0x0,0x1
04b5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b6 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04b7 00d1 | | Pop_Control Pop_Count_1
04b8 005b | [ | Store_Top Discrete,At_Offset_3
04b9 00da | | Load_Top At_Offset_2 ; Debug Table 0x17.0x9 = 0x4b9,0x4
04ba 6803 |h | Jump_Zero 0x4be
04bb e00b | | Load 0x0,0xb ; Debug Table 0x17.0xa = 0x4bb,0x5
04bc 1b15 | | Execute Package,Field_Read,Field_Number 0x15
04bd 0257 | W | Execute Discrete,Raise
04be e001 | | Load 0x0,0x1 ; Debug Table 0x17.0xb = 0x4be,0x6
04bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04c0 e5f6 | | Load 0x2,-0xa
04c1 0120 | | Execute Any,Is_Value
04c2 6802 |h | Jump_Zero 0x4c5
04c3 e221 | ! | Load 0x1,0x21
04c4 7801 |x | Jump 0x4c6
04c5 e5f6 | | Load 0x2,-0xa
04c6 e216 | | Load 0x1,0x16
04c7 e5f8 | | Load 0x2,-0x8
04c8 e5f9 | | Load 0x2,-0x7
04c9 e5fa | | Load 0x2,-0x6
04ca e5fb | | Load 0x2,-0x5
04cb e405 | | Load 0x2,0x5
04cc e5fe | | Load 0x2,-0x2
04cd e402 | | Load 0x2,0x2
04ce 8229 | ) | Call 0x1,0x29
04cf c5f7 | | Store 0x2,-0x9
04d0 c5f6 | | Store 0x2,-0xa
04d1 005a | Z | Store_Top Discrete,At_Offset_2
04d2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0xc = 0x4d2,0x7
04d3 0007 | | Action Break_Optional
04d4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xd = 0x4d4,0x801
04d5 6803 |h | Jump_Zero 0x4d9
04d6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xe = 0x4d6,0x802
04d7 e00b | | Load 0x0,0xb
04d8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
04d9 00d1 | | Pop_Control Pop_Count_1
04da 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xf = 0x4da,0x8
04db 4801 |H | Short_Literal 0x1
04dc 4801 |H | Short_Literal 0x1
04dd e5fd | | Load 0x2,-0x3
04de e00a | | Load 0x0,0xa
04df 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04e0 c405 | | Store 0x2,0x5
04e1 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x10 = 0x4e1,0x9
04e2 a5f5 | | Store_Unchecked 0x2,-0xb
04e3 4509 |E | Exit_Subprogram 0x9
04e4 TRAP_0490:
04e4 0007 | | Action Break_Optional
04e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0x11 = 0x4e5,0xa
04e6 4801 |H | Short_Literal 0x1
04e7 4800 |H | Short_Literal 0x0
04e8 e5fd | | Load 0x2,-0x3
04e9 e00a | | Load 0x0,0xa
04ea 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04eb c405 | | Store 0x2,0x5
04ec e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x12 = 0x4ec,0xb
04ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ee e23a | : | Load 0x1,0x3a
04ef 0092 0eb5 | | Action Push_String_Extended,0xeb5 ; "Open (3)"
04f1 01cc | | Execute Vector,Catenate
04f2 e001 | | Load 0x0,0x1
04f3 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
04f4 e00b | | Load 0x0,0xb
04f5 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04f6 c5f5 | | Store 0x2,-0xb
04f7 4509 |E | Exit_Subprogram 0x9
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 0518 | | .CONST 0x0518 ; Address of begin
04f9 0583 | | .CONST 0x0583 ; Address of exception handler
04fa 0008 | | .CONST 0x0008 ; Number of locals
04fb INIT_04f8:
04fb e001 | | Load 0x0,0x1 ; Debug Table 0x18 = .DEBUG 0x04fb,0x1454,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x092f
; Debug Table 0x18.0x0 = 0x4fb,0xffff
04fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04fd e014 | | Load 0x0,0x14 ; Debug Table 0x18.0x1 = 0x4fd,0xfffe
04fe 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04ff e006 | | Load 0x0,0x6 ; Debug Table 0x18.0x2 = 0x4ff,0xfffd
0500 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0501 02c7 | | Declare_Variable Any
0502 00d8 | | Load_Top At_Offset_0
0503 1c00 | | Execute_Immediate Run_Utility,0x0
0504 e213 | | Load 0x1,0x13 ; Debug Table 0x18.0x3 = 0x504,0xfffc
0505 02ff | | Declare_Variable Variant_Record
0506 00d8 | | Load_Top At_Offset_0
0507 1c00 | | Execute_Immediate Run_Utility,0x0
0508 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x4 = 0x508,0xfffb
0509 1b0f | | Execute Package,Field_Read,Field_Number 0xf
050a 02ff | | Declare_Variable Variant_Record
050b 00d8 | | Load_Top At_Offset_0
050c 1c00 | | Execute_Immediate Run_Utility,0x0
050d e00a | | Load 0x0,0xa ; Debug Table 0x18.0x5 = 0x50d,0xfffa
050e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050f 02c7 | | Declare_Variable Any
0510 e016 | | Load 0x0,0x16
0511 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0512 e5fe | | Load 0x2,-0x2
0513 e00a | | Load 0x0,0xa
0514 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0515 c407 | | Store 0x2,0x7
0516 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x6 = 0x516,0xfff9
0517 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0518 BODY_04f8:
0518 e5ff | | Load 0x2,-0x1 ; Debug Table 0x18.0x7 = 0x518,0x1
0519 e00f | | Load 0x0,0xf
051a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
051b e5ff | | Load 0x2,-0x1 ; Debug Table 0x18.0x8 = 0x51b,0x2
051c e002 | | Load 0x0,0x2
051d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
051e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
051f e002 | | Load 0x0,0x2
0520 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0521 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0522 e405 | | Load 0x2,0x5
0523 016d | m | Execute Variant_Record,Structure_Write
0524 e5ff | | Load 0x2,-0x1 ; Debug Table 0x18.0x9 = 0x524,0x3
0525 e002 | | Load 0x0,0x2
0526 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0527 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0528 e001 | | Load 0x0,0x1
0529 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
052a 180e | | Execute Package,Field_Execute,Field_Number 0xe
052b 00db | | Load_Top At_Offset_3
052c 016d | m | Execute Variant_Record,Structure_Write
052d e5ff | | Load 0x2,-0x1 ; Debug Table 0x18.0xa = 0x52d,0x4
052e e002 | | Load 0x0,0x2
052f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0530 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0531 e013 | | Load 0x0,0x13
0532 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0533 00db | | Load_Top At_Offset_3
0534 823f | ? | Call 0x1,0x3f
0535 e5ff | | Load 0x2,-0x1 ; Debug Table 0x18.0xb = 0x535,0x5
0536 e002 | | Load 0x0,0x2
0537 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0538 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0539 e00d | | Load 0x0,0xd
053a 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
053b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
053c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
053d e001 | | Load 0x0,0x1 ; Debug Table 0x18.0xc = 0x53d,0x6
053e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
053f e5fc | | Load 0x2,-0x4
0540 6607 |f | Indirect_Literal Discrete,0x348,{0x00000000, 0x00004000}
0541 e407 | | Load 0x2,0x7
0542 e405 | | Load 0x2,0x5
0543 e406 | | Load 0x2,0x6
0544 e00d | | Load 0x0,0xd
0545 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0546 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0547 c402 | | Store 0x2,0x2
0548 e402 | | Load 0x2,0x2 ; Debug Table 0x18.0xd = 0x548,0x7
0549 0007 | | Action Break_Optional
054a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0xe = 0x54a,0x401
054b 6803 |h | Jump_Zero 0x54f
054c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0xf = 0x54c,0x402
054d e00b | | Load 0x0,0xb
054e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
054f 00d1 | | Pop_Control Pop_Count_1
0550 e404 | | Load 0x2,0x4 ; Debug Table 0x18.0x10 = 0x550,0x8
0551 0120 | | Execute Any,Is_Value
0552 6803 |h | Jump_Zero 0x556
0553 e006 | | Load 0x0,0x6
0554 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0555 7801 |x | Jump 0x557
0556 e404 | | Load 0x2,0x4
0557 e014 | | Load 0x0,0x14
0558 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0559 e5fd | | Load 0x2,-0x3
055a e407 | | Load 0x2,0x7
055b e405 | | Load 0x2,0x5
055c e002 | | Load 0x0,0x2
055d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
055e c403 | | Store 0x2,0x3
055f c404 | | Store 0x2,0x4
0560 e403 | | Load 0x2,0x3 ; Debug Table 0x18.0x11 = 0x560,0x9
0561 0007 | | Action Break_Optional
0562 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x12 = 0x562,0x801
0563 6803 |h | Jump_Zero 0x567
0564 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x13 = 0x564,0x802
0565 e00b | | Load 0x0,0xb
0566 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0567 00d1 | | Pop_Control Pop_Count_1
0568 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x14 = 0x568,0xa
0569 1b0d | | Execute Package,Field_Read,Field_Number 0xd
056a 65dd |e | Indirect_Literal Discrete,0x348,{0x00000000, 0x00004000}
056b 00db | | Load_Top At_Offset_3
056c 00db | | Load_Top At_Offset_3
056d e406 | | Load 0x2,0x6
056e e00d | | Load 0x0,0xd
056f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0570 c402 | | Store 0x2,0x2
0571 e402 | | Load 0x2,0x2 ; Debug Table 0x18.0x15 = 0x571,0xb
0572 0007 | | Action Break_Optional
0573 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x16 = 0x573,0xc01
0574 6803 |h | Jump_Zero 0x578
0575 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x17 = 0x575,0xc02
0576 e00b | | Load 0x0,0xb
0577 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0578 00d1 | | Pop_Control Pop_Count_1
0579 4800 |H | Short_Literal 0x0 ; Debug Table 0x18.0x18 = 0x579,0xc
057a a5fb | | Store_Unchecked 0x2,-0x5
057b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x19 = 0x57b,0xd
057c 4801 |H | Short_Literal 0x1
057d 4801 |H | Short_Literal 0x1
057e e5fe | | Load 0x2,-0x2
057f e00a | | Load 0x0,0xa
0580 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0581 c407 | | Store 0x2,0x7
0582 4505 |E | Exit_Subprogram 0x5
0583 TRAP_04f8:
0583 0007 | | Action Break_Optional
0584 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x1a = 0x584,0xe
0585 4801 |H | Short_Literal 0x1
0586 4800 |H | Short_Literal 0x0
0587 e5fe | | Load 0x2,-0x2
0588 e00a | | Load 0x0,0xa
0589 1819 | | Execute Package,Field_Execute,Field_Number 0x19
058a c407 | | Store 0x2,0x7
058b e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x1b = 0x58b,0xf
058c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058d e23a | : | Load 0x1,0x3a
058e 0092 0eb6 | | Action Push_String_Extended,0xeb6 ; "Save"
0590 01cc | | Execute Vector,Catenate
0591 e001 | | Load 0x0,0x1
0592 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0593 e00b | | Load 0x0,0xb
0594 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0595 c5fb | | Store 0x2,-0x5
0596 4505 |E | Exit_Subprogram 0x5
0597 0000 | | .XXX[0x1]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05b3 | | .CONST 0x05b3 ; Address of begin
0599 0601 | | .CONST 0x0601 ; Address of exception handler
059a 0007 | | .CONST 0x0007 ; Number of locals
059b INIT_0598:
059b e001 | | Load 0x0,0x1 ; Debug Table 0x19 = .DEBUG 0x059b,0x148e,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x094b
; Debug Table 0x19.0x0 = 0x59b,0xffff
059c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
059d e014 | | Load 0x0,0x14 ; Debug Table 0x19.0x1 = 0x59d,0xfffe
059e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
059f e213 | | Load 0x1,0x13 ; Debug Table 0x19.0x2 = 0x59f,0xfffd
05a0 02ff | | Declare_Variable Variant_Record
05a1 00d8 | | Load_Top At_Offset_0
05a2 1c00 | | Execute_Immediate Run_Utility,0x0
05a3 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x3 = 0x5a3,0xfffc
05a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05a5 02ff | | Declare_Variable Variant_Record
05a6 00d8 | | Load_Top At_Offset_0
05a7 1c00 | | Execute_Immediate Run_Utility,0x0
05a8 e00a | | Load 0x0,0xa ; Debug Table 0x19.0x4 = 0x5a8,0xfffb
05a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05aa 02c7 | | Declare_Variable Any
05ab e016 | | Load 0x0,0x16
05ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05ad e5fe | | Load 0x2,-0x2
05ae e00a | | Load 0x0,0xa
05af 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05b0 c406 | | Store 0x2,0x6
05b1 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x5 = 0x5b1,0xfffa
05b2 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
05b3 BODY_0598:
05b3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x6 = 0x5b3,0x1
05b4 e00f | | Load 0x0,0xf
05b5 1820 | | Execute Package,Field_Execute,Field_Number 0x20
05b6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x7 = 0x5b6,0x2
05b7 e002 | | Load 0x0,0x2
05b8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
05b9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05ba e002 | | Load 0x0,0x2
05bb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
05bc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05bd e404 | | Load 0x2,0x4
05be 016d | m | Execute Variant_Record,Structure_Write
05bf e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x8 = 0x5bf,0x3
05c0 e002 | | Load 0x0,0x2
05c1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
05c2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05c3 e001 | | Load 0x0,0x1
05c4 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
05c5 180e | | Execute Package,Field_Execute,Field_Number 0xe
05c6 00db | | Load_Top At_Offset_3
05c7 016d | m | Execute Variant_Record,Structure_Write
05c8 e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x9 = 0x5c8,0x4
05c9 e002 | | Load 0x0,0x2
05ca 1b13 | | Execute Package,Field_Read,Field_Number 0x13
05cb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05cc e00d | | Load 0x0,0xd
05cd 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
05ce 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05cf 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
05d0 e014 | | Load 0x0,0x14 ; Debug Table 0x19.0xa = 0x5d0,0x5
05d1 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05d2 e5fc | | Load 0x2,-0x4
05d3 e5fd | | Load 0x2,-0x3
05d4 e406 | | Load 0x2,0x6
05d5 e404 | | Load 0x2,0x4
05d6 e002 | | Load 0x0,0x2
05d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05d8 c403 | | Store 0x2,0x3
05d9 e403 | | Load 0x2,0x3 ; Debug Table 0x19.0xb = 0x5d9,0x6
05da 0007 | | Action Break_Optional
05db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0xc = 0x5db,0x401
05dc 6803 |h | Jump_Zero 0x5e0
05dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0xd = 0x5dd,0x402
05de e00b | | Load 0x0,0xb
05df 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
05e0 00d1 | | Pop_Control Pop_Count_1
05e1 00da | | Load_Top At_Offset_2 ; Debug Table 0x19.0xe = 0x5e1,0x7
05e2 e001 | | Load 0x0,0x1
05e3 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
05e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05e5 7011 |p | Jump_Nonzero 0x5f7
05e6 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0xf = 0x5e6,0x8
05e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e8 655f |e_ | Indirect_Literal Discrete,0x348,{0x00000000, 0x00004000}
05e9 00db | | Load_Top At_Offset_3
05ea 00db | | Load_Top At_Offset_3
05eb e405 | | Load 0x2,0x5
05ec e00d | | Load 0x0,0xd
05ed 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05ee c402 | | Store 0x2,0x2
05ef e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x10 = 0x5ef,0x9
05f0 0007 | | Action Break_Optional
05f1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x11 = 0x5f1,0x801
05f2 6803 |h | Jump_Zero 0x5f6
05f3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x12 = 0x5f3,0x802
05f4 e00b | | Load 0x0,0xb
05f5 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05f6 00d1 | | Pop_Control Pop_Count_1
05f7 4800 |H | Short_Literal 0x0 ; Debug Table 0x19.0x13 = 0x5f7,0xa
05f8 a5fb | | Store_Unchecked 0x2,-0x5
05f9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x14 = 0x5f9,0xb
05fa 4801 |H | Short_Literal 0x1
05fb 4801 |H | Short_Literal 0x1
05fc e5fe | | Load 0x2,-0x2
05fd e00a | | Load 0x0,0xa
05fe 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05ff c406 | | Store 0x2,0x6
0600 4505 |E | Exit_Subprogram 0x5
0601 TRAP_0598:
0601 0007 | | Action Break_Optional
0602 00da | | Load_Top At_Offset_2 ; Debug Table 0x19.0x15 = 0x602,0xc
0603 4801 |H | Short_Literal 0x1
0604 4800 |H | Short_Literal 0x0
0605 e5fe | | Load 0x2,-0x2
0606 e00a | | Load 0x0,0xa
0607 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0608 c406 | | Store 0x2,0x6
0609 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x16 = 0x609,0xd
060a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060b e23a | : | Load 0x1,0x3a
060c 0092 0eb7 | | Action Push_String_Extended,0xeb7 ; "Close"
060e 01cc | | Execute Vector,Catenate
060f e001 | | Load 0x0,0x1
0610 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0611 e00b | | Load 0x0,0xb
0612 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0613 c5fb | | Store 0x2,-0x5
0614 4505 |E | Exit_Subprogram 0x5
0615 0000 0000 | | .XXX[0x3]
0617 0000 | |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 064c | L | .CONST 0x064c ; Address of begin
0619 0722 | " | .CONST 0x0722 ; Address of exception handler
061a 000a | | .CONST 0x000a ; Number of locals
061b INIT_0618:
061b e213 | | Load 0x1,0x13 ; Debug Table 0x1a = .DEBUG 0x061b,0x14be,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0967
; Debug Table 0x1a.0x0 = 0x61b,0xffff
061c 02ff | | Declare_Variable Variant_Record
061d e001 | | Load 0x0,0x1
061e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
061f 00d9 | | Load_Top At_Offset_1
0620 016d | m | Execute Variant_Record,Structure_Write
0621 e001 | | Load 0x0,0x1 ; Debug Table 0x1a.0x1 = 0x621,0xfffe
0622 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0623 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1a.0x2 = 0x623,0xfffd
0624 e011 | | Load 0x0,0x11
0625 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0626 e5fb | | Load 0x2,-0x5
0627 e012 | | Load 0x0,0x12
0628 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0629 0031 | 1 | Store_Top Heap_Access,At_Offset_1
062a e014 | | Load 0x0,0x14 ; Debug Table 0x1a.0x3 = 0x62a,0xfffc
062b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
062c e001 | | Load 0x0,0x1 ; Debug Table 0x1a.0x4 = 0x62c,0xfffb
062d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
062e 02ff | | Declare_Variable Variant_Record
062f e5ff | | Load 0x2,-0x1
0630 8212 | | Call 0x1,0x12
0631 00d9 | | Load_Top At_Offset_1
0632 016d | m | Execute Variant_Record,Structure_Write
0633 e001 | | Load 0x0,0x1 ; Debug Table 0x1a.0x5 = 0x633,0xfffa
0634 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0635 02ff | | Declare_Variable Variant_Record
0636 00d8 | | Load_Top At_Offset_0
0637 1c00 | | Execute_Immediate Run_Utility,0x0
0638 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1a.0x6 = 0x638,0xfff9
0639 e013 | | Load 0x0,0x13
063a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
063b e00a | | Load 0x0,0xa
063c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
063d 03f1 | | Declare_Variable Discrete,With_Value
063e e017 | | Load 0x0,0x17 ; Debug Table 0x1a.0x7 = 0x63e,0xfff8
063f 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0640 0322 | " | Declare_Variable Record
0641 00d8 | | Load_Top At_Offset_0
0642 1c00 | | Execute_Immediate Run_Utility,0x0
0643 e00a | | Load 0x0,0xa ; Debug Table 0x1a.0x8 = 0x643,0xfff7
0644 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0645 02c7 | | Declare_Variable Any
0646 e016 | | Load 0x0,0x16
0647 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0648 e5fd | | Load 0x2,-0x3
0649 e00a | | Load 0x0,0xa
064a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
064b c40a | | Store 0x2,0xa
064c BODY_0618:
064c e018 | | Load 0x0,0x18 ; Debug Table 0x1a.0x9 = 0x64c,0x1
064d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
064e c5f9 | | Store 0x2,-0x7
064f e5ff | | Load 0x2,-0x1 ; Debug Table 0x1a.0xa = 0x64f,0x2
0650 e00f | | Load 0x0,0xf
0651 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0652 e001 | | Load 0x0,0x1 ; Debug Table 0x1a.0xb = 0x652,0x3
0653 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0654 e402 | | Load 0x2,0x2
0655 e5fa | | Load 0x2,-0x6
0656 00db | | Load_Top At_Offset_3
0657 e5fc | | Load 0x2,-0x4
0658 e406 | | Load 0x2,0x6
0659 e013 | | Load 0x0,0x13
065a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
065b 00d1 | | Pop_Control Pop_Count_1
065c c403 | | Store 0x2,0x3
065d e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0xc = 0x65d,0x4
065e 0007 | | Action Break_Optional
065f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0xd = 0x65f,0x401
0660 6803 |h | Jump_Zero 0x664
0661 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0xe = 0x661,0x402
0662 e00b | | Load 0x0,0xb
0663 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0664 00d1 | | Pop_Control Pop_Count_1
0665 e406 | | Load 0x2,0x6 ; Debug Table 0x1a.0xf = 0x665,0x5
0666 e001 | | Load 0x0,0x1
0667 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0668 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0669 680e |h | Jump_Zero 0x678
066a e23a | : | Load 0x1,0x3a ; Debug Table 0x1a.0x10 = 0x66a,0x6
066b 0092 0eb8 | | Action Push_String_Extended,0xeb8 ; "Open_Image"
066d 01cc | | Execute Vector,Catenate
066e 0092 0eb9 | | Action Push_String_Extended,0xeb9 ; "Libraries do not have images."
0670 480d |H | Short_Literal 0xd
0671 e001 | | Load 0x0,0x1
0672 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0673 e00e | | Load 0x0,0xe
0674 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0675 e00b | | Load 0x0,0xb ; Debug Table 0x1a.0x11 = 0x675,0x7
0676 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0677 0257 | W | Execute Discrete,Raise
0678 e014 | | Load 0x0,0x14 ; Debug Table 0x1a.0x12 = 0x678,0x8
0679 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067a e407 | | Load 0x2,0x7
067b e5fa | | Load 0x2,-0x6
067c 00db | | Load_Top At_Offset_3
067d e402 | | Load 0x2,0x2
067e e002 | | Load 0x0,0x2
067f 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0680 00d1 | | Pop_Control Pop_Count_1
0681 c405 | | Store 0x2,0x5
0682 e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0x13 = 0x682,0x9
0683 0007 | | Action Break_Optional
0684 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x14 = 0x684,0x801
0685 6803 |h | Jump_Zero 0x689
0686 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x15 = 0x686,0x802
0687 e00b | | Load 0x0,0xb
0688 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0689 00d1 | | Pop_Control Pop_Count_1
068a 00db | | Load_Top At_Offset_3 ; Debug Table 0x1a.0x16 = 0x68a,0xa
068b e001 | | Load 0x0,0x1
068c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
068d 6870 |hp | Jump_Zero 0x6fe
068e e5fe | | Load 0x2,-0x2 ; Debug Table 0x1a.0x17 = 0x68e,0xb
068f 0e02 | | Execute_Immediate Not_Equal,0x2
0690 680e |h | Jump_Zero 0x69f
0691 e23a | : | Load 0x1,0x3a ; Debug Table 0x1a.0x18 = 0x691,0xc
0692 0092 0eb8 | | Action Push_String_Extended,0xeb8 ; "Open_Image"
0694 01cc | | Execute Vector,Catenate
0695 0092 0eba | | Action Push_String_Extended,0xeba ; "No image exists. Open again for Update to create one."
0697 4806 |H | Short_Literal 0x6
0698 e001 | | Load 0x0,0x1
0699 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
069a e00e | | Load 0x0,0xe
069b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
069c e00b | | Load 0x0,0xb ; Debug Table 0x1a.0x19 = 0x69c,0xd
069d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
069e 0257 | W | Execute Discrete,Raise
069f e014 | | Load 0x0,0x14 ; Debug Table 0x1a.0x1a = 0x69f,0xe
06a0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
06a1 00da | | Load_Top At_Offset_2
06a2 00da | | Load_Top At_Offset_2
06a3 e5fa | | Load 0x2,-0x6
06a4 e406 | | Load 0x2,0x6
06a5 e001 | | Load 0x0,0x1
06a6 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
06a7 180d | | Execute Package,Field_Execute,Field_Number 0xd
06a8 e017 | | Load 0x0,0x17
06a9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06aa 00d1 | | Pop_Control Pop_Count_1
06ab c405 | | Store 0x2,0x5
06ac e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0x1b = 0x6ac,0xf
06ad 0007 | | Action Break_Optional
06ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x1c = 0x6ae,0xc01
06af 6803 |h | Jump_Zero 0x6b3
06b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x1d = 0x6b0,0xc02
06b1 e00b | | Load 0x0,0xb
06b2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06b3 00d1 | | Pop_Control Pop_Count_1
06b4 e014 | | Load 0x0,0x14 ; Debug Table 0x1a.0x1e = 0x6b4,0x10
06b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06b6 e5f9 | | Load 0x2,-0x7
06b7 0120 | | Execute Any,Is_Value
06b8 6803 |h | Jump_Zero 0x6bc
06b9 e018 | | Load 0x0,0x18
06ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06bb 7801 |x | Jump 0x6bd
06bc e5f9 | | Load 0x2,-0x7
06bd e407 | | Load 0x2,0x7
06be e019 | | Load 0x0,0x19
06bf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06c0 0162 | b | Execute Variant_Record,Check_In_Type
06c1 e5fa | | Load 0x2,-0x6
06c2 e019 | | Load 0x0,0x19
06c3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06c4 e409 | | Load 0x2,0x9
06c5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
06c6 e402 | | Load 0x2,0x2
06c7 e001 | | Load 0x0,0x1
06c8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
06c9 e406 | | Load 0x2,0x6
06ca e001 | | Load 0x0,0x1
06cb 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
06cc 180d | | Execute Package,Field_Execute,Field_Number 0xd
06cd e40a | | Load 0x2,0xa
06ce e404 | | Load 0x2,0x4
06cf e018 | | Load 0x0,0x18
06d0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06d1 00d1 | | Pop_Control Pop_Count_1
06d2 c5f9 | | Store 0x2,-0x7
06d3 c405 | | Store 0x2,0x5
06d4 e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0x1f = 0x6d4,0x11
06d5 0007 | | Action Break_Optional
06d6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x20 = 0x6d6,0x1001
06d7 6803 |h | Jump_Zero 0x6db
06d8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x21 = 0x6d8,0x1002
06d9 e00b | | Load 0x0,0xb
06da 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06db 00d1 | | Pop_Control Pop_Count_1
06dc e014 | | Load 0x0,0x14 ; Debug Table 0x1a.0x22 = 0x6dc,0x12
06dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06de e5fa | | Load 0x2,-0x6
06df e408 | | Load 0x2,0x8
06e0 00db | | Load_Top At_Offset_3
06e1 e407 | | Load 0x2,0x7
06e2 e402 | | Load 0x2,0x2
06e3 e002 | | Load 0x0,0x2
06e4 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
06e5 c405 | | Store 0x2,0x5
06e6 e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0x23 = 0x6e6,0x13
06e7 0007 | | Action Break_Optional
06e8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x24 = 0x6e8,0x1401
06e9 6803 |h | Jump_Zero 0x6ed
06ea 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x25 = 0x6ea,0x1402
06eb e00b | | Load 0x0,0xb
06ec 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06ed 00d1 | | Pop_Control Pop_Count_1
06ee e23a | : | Load 0x1,0x3a ; Debug Table 0x1a.0x26 = 0x6ee,0x14
06ef 0092 0eb8 | | Action Push_String_Extended,0xeb8 ; "Open_Image"
06f1 01cc | | Execute Vector,Catenate
06f2 0092 0ebb | | Action Push_String_Extended,0xebb ; "Created an image for "
06f4 e406 | | Load 0x2,0x6
06f5 e001 | | Load 0x0,0x1
06f6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06f7 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
06f8 01cc | | Execute Vector,Catenate
06f9 e001 | | Load 0x0,0x1
06fa 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
06fb e00e | | Load 0x0,0xe
06fc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06fd 781a |x | Jump 0x718
06fe e014 | | Load 0x0,0x14 ; Debug Table 0x1a.0x27 = 0x6fe,0x15
06ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0700 e5f9 | | Load 0x2,-0x7
0701 0120 | | Execute Any,Is_Value
0702 6803 |h | Jump_Zero 0x706
0703 e018 | | Load 0x0,0x18
0704 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0705 7801 |x | Jump 0x707
0706 e5f9 | | Load 0x2,-0x7
0707 e5fa | | Load 0x2,-0x6
0708 00db | | Load_Top At_Offset_3
0709 e404 | | Load 0x2,0x4
070a e408 | | Load 0x2,0x8
070b e407 | | Load 0x2,0x7
070c e018 | | Load 0x0,0x18
070d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
070e c5f9 | | Store 0x2,-0x7
070f c405 | | Store 0x2,0x5
0710 e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0x28 = 0x710,0x16
0711 0007 | | Action Break_Optional
0712 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x29 = 0x712,0x1801
0713 6803 |h | Jump_Zero 0x717
0714 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x2a = 0x714,0x1802
0715 e00b | | Load 0x0,0xb
0716 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0717 00d1 | | Pop_Control Pop_Count_1
0718 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x2b = 0x718,0x17
0719 4801 |H | Short_Literal 0x1
071a 4801 |H | Short_Literal 0x1
071b e5fd | | Load 0x2,-0x3
071c e00a | | Load 0x0,0xa
071d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
071e c40a | | Store 0x2,0xa
071f 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x2c = 0x71f,0x18
0720 a5f8 | | Store_Unchecked 0x2,-0x8
0721 4507 |E | Exit_Subprogram 0x7
0722 TRAP_0618:
0722 0007 | | Action Break_Optional
0723 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1a.0x2d = 0x723,0x19
0724 4801 |H | Short_Literal 0x1
0725 4800 |H | Short_Literal 0x0
0726 e5fd | | Load 0x2,-0x3
0727 e00a | | Load 0x0,0xa
0728 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0729 c40a | | Store 0x2,0xa
072a e001 | | Load 0x0,0x1 ; Debug Table 0x1a.0x2e = 0x72a,0x1a
072b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072c e23a | : | Load 0x1,0x3a
072d 0092 0eb8 | | Action Push_String_Extended,0xeb8 ; "Open_Image"
072f 01cc | | Execute Vector,Catenate
0730 e001 | | Load 0x0,0x1
0731 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0732 e00b | | Load 0x0,0xb
0733 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0734 c5f8 | | Store 0x2,-0x8
0735 4507 |E | Exit_Subprogram 0x7
0736 0000 0000 | | .XXX[0x2]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073d | = | .CONST 0x073d ; Address of begin
0739 074f | O | .CONST 0x074f ; Address of exception handler
073a 0002 | | .CONST 0x0002 ; Number of locals
073b INIT_0738:
073b e014 | | Load 0x0,0x14 ; Debug Table 0x1b = .DEBUG 0x073b,0x151e,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0998
; Debug Table 0x1b.0x0 = 0x73b,0xffff
073c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
073d BODY_0738:
073d e014 | | Load 0x0,0x14 ; Debug Table 0x1b.0x1 = 0x73d,0x1
073e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
073f e5fd | | Load 0x2,-0x3
0740 e5ff | | Load 0x2,-0x1
0741 e018 | | Load 0x0,0x18
0742 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0743 0059 | Y | Store_Top Discrete,At_Offset_1
0744 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1b.0x2 = 0x744,0x2
0745 0007 | | Action Break_Optional
0746 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1b.0x3 = 0x746,0x401
0747 6803 |h | Jump_Zero 0x74b
0748 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1b.0x4 = 0x748,0x402
0749 e00b | | Load 0x0,0xb
074a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
074b 00d1 | | Pop_Control Pop_Count_1
074c 4800 |H | Short_Literal 0x0 ; Debug Table 0x1b.0x5 = 0x74c,0x3
074d a5fc | | Store_Unchecked 0x2,-0x4
074e 4504 |E | Exit_Subprogram 0x4
074f TRAP_0738:
074f 0007 | | Action Break_Optional
0750 e001 | | Load 0x0,0x1 ; Debug Table 0x1b.0x6 = 0x750,0x4
0751 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0752 e23a | : | Load 0x1,0x3a
0753 0092 0ebc | | Action Push_String_Extended,0xebc ; "Save_Image"
0755 01cc | | Execute Vector,Catenate
0756 e001 | | Load 0x0,0x1
0757 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0758 e00b | | Load 0x0,0xb
0759 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
075a c5fc | | Store 0x2,-0x4
075b 4504 |E | Exit_Subprogram 0x4
075c 0000 0000 | | .BLANK 0000[0x4]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0765 | e | .CONST 0x0765 ; Address of begin
0761 0789 | | .CONST 0x0789 ; Address of exception handler
0762 0002 | | .CONST 0x0002 ; Number of locals
0763 INIT_0760:
0763 e014 | | Load 0x0,0x14 ; Debug Table 0x1c = .DEBUG 0x0763,0x152e,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x09b1
; Debug Table 0x1c.0x0 = 0x763,0xffff
0764 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0765 BODY_0760:
0765 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1c.0x1 = 0x765,0x1
0766 6811 |h | Jump_Zero 0x778
0767 e014 | | Load 0x0,0x14 ; Debug Table 0x1c.0x2 = 0x767,0x2
0768 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0769 e5fc | | Load 0x2,-0x4
076a e5fd | | Load 0x2,-0x3
076b e018 | | Load 0x0,0x18
076c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
076d c5fc | | Store 0x2,-0x4
076e 0059 | Y | Store_Top Discrete,At_Offset_1
076f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x3 = 0x76f,0x3
0770 0007 | | Action Break_Optional
0771 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x4 = 0x771,0x401
0772 6803 |h | Jump_Zero 0x776
0773 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x5 = 0x773,0x402
0774 e00b | | Load 0x0,0xb
0775 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0776 00d1 | | Pop_Control Pop_Count_1
0777 780e |x | Jump 0x786
0778 e23a | : | Load 0x1,0x3a ; Debug Table 0x1c.0x6 = 0x778,0x4
0779 0092 0ebd | | Action Push_String_Extended,0xebd ; "Close_Image"
077b 01cc | | Execute Vector,Catenate
077c 0092 0ebe | | Action Push_String_Extended,0xebe ; "Closing an image without committing is not supported."
077e 4806 |H | Short_Literal 0x6
077f e001 | | Load 0x0,0x1
0780 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0781 e00e | | Load 0x0,0xe
0782 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0783 e00b | | Load 0x0,0xb ; Debug Table 0x1c.0x7 = 0x783,0x5
0784 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0785 0257 | W | Execute Discrete,Raise
0786 4800 |H | Short_Literal 0x0 ; Debug Table 0x1c.0x8 = 0x786,0x6
0787 a5fb | | Store_Unchecked 0x2,-0x5
0788 4504 |E | Exit_Subprogram 0x4
0789 TRAP_0760:
0789 0007 | | Action Break_Optional
078a e001 | | Load 0x0,0x1 ; Debug Table 0x1c.0x9 = 0x78a,0x7
078b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
078c e23a | : | Load 0x1,0x3a
078d 0092 0ebd | | Action Push_String_Extended,0xebd ; "Close_Image"
078f 01cc | | Execute Vector,Catenate
0790 e001 | | Load 0x0,0x1
0791 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0792 e00b | | Load 0x0,0xb
0793 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0794 c5fb | | Store 0x2,-0x5
0795 4504 |E | Exit_Subprogram 0x4
0796 0000 0000 | | .XXX[0x2]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 07d8 | | .CONST 0x07d8 ; Address of begin
0799 08c6 | | .CONST 0x08c6 ; Address of exception handler
079a 000d | | .CONST 0x000d ; Number of locals
079b INIT_0798:
079b 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1d = .DEBUG 0x079b,0x1544,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x09cf
; Debug Table 0x1d.0x0 = 0x79b,0xffff
079c e011 | | Load 0x0,0x11
079d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
079e e012 | | Load 0x0,0x12
079f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07a0 0031 | 1 | Store_Top Heap_Access,At_Offset_1
07a1 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x1 = 0x7a1,0xfffe
07a2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07a3 02ff | | Declare_Variable Variant_Record
07a4 e001 | | Load 0x0,0x1
07a5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07a6 00d9 | | Load_Top At_Offset_1
07a7 016d | m | Execute Variant_Record,Structure_Write
07a8 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x2 = 0x7a8,0xfffd
07a9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07aa 02ff | | Declare_Variable Variant_Record
07ab e5ff | | Load 0x2,-0x1
07ac 8212 | | Call 0x1,0x12
07ad 00d9 | | Load_Top At_Offset_1
07ae 016d | m | Execute Variant_Record,Structure_Write
07af e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x3 = 0x7af,0xfffc
07b0 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
07b1 02ff | | Declare_Variable Variant_Record
07b2 e001 | | Load 0x0,0x1
07b3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07b4 00d9 | | Load_Top At_Offset_1
07b5 016d | m | Execute Variant_Record,Structure_Write
07b6 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x4 = 0x7b6,0xfffb
07b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07b8 e018 | | Load 0x0,0x18 ; Debug Table 0x1d.0x5 = 0x7b8,0xfffa
07b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ba 02c7 | | Declare_Variable Any
07bb e018 | | Load 0x0,0x18
07bc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
07bd c407 | | Store 0x2,0x7
07be e01a | | Load 0x0,0x1a ; Debug Table 0x1d.0x6 = 0x7be,0xfff9
07bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07c0 02c7 | | Declare_Variable Any
07c1 e01a | | Load 0x0,0x1a
07c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07c3 c408 | | Store 0x2,0x8
07c4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1d.0x7 = 0x7c4,0xfff8
07c5 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x8 = 0x7c5,0xfff7
07c6 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
07c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07c8 e221 | ! | Load 0x1,0x21 ; Debug Table 0x1d.0x9 = 0x7c8,0xfff6
07c9 02c7 | | Declare_Variable Any
07ca 00d8 | | Load_Top At_Offset_0
07cb 1c00 | | Execute_Immediate Run_Utility,0x0
07cc e00a | | Load 0x0,0xa ; Debug Table 0x1d.0xa = 0x7cc,0xfff5
07cd 1b10 | | Execute Package,Field_Read,Field_Number 0x10
07ce 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
07cf e00a | | Load 0x0,0xa ; Debug Table 0x1d.0xb = 0x7cf,0xfff4
07d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07d1 02c7 | | Declare_Variable Any
07d2 e016 | | Load 0x0,0x16
07d3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07d4 e5fe | | Load 0x2,-0x2
07d5 e00a | | Load 0x0,0xa
07d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07d7 c40d | | Store 0x2,0xd
07d8 BODY_0798:
07d8 e404 | | Load 0x2,0x4 ; Debug Table 0x1d.0xc = 0x7d8,0x1
07d9 e001 | | Load 0x0,0x1
07da 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
07db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07dc 680e |h | Jump_Zero 0x7eb
07dd e23a | : | Load 0x1,0x3a ; Debug Table 0x1d.0xd = 0x7dd,0x2
07de 0092 0ebf | | Action Push_String_Extended,0xebf ; "Reformat_Image"
07e0 01cc | | Execute Vector,Catenate
07e1 0092 0eb9 | | Action Push_String_Extended,0xeb9 ; "Libraries do not have images."
07e3 480d |H | Short_Literal 0xd
07e4 e001 | | Load 0x0,0x1
07e5 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
07e6 e00e | | Load 0x0,0xe
07e7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07e8 e00b | | Load 0x0,0xb ; Debug Table 0x1d.0xe = 0x7e8,0x3
07e9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
07ea 0257 | W | Execute Discrete,Raise
07eb e5ff | | Load 0x2,-0x1 ; Debug Table 0x1d.0xf = 0x7eb,0x4
07ec e00f | | Load 0x0,0xf
07ed 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
07ee e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x10 = 0x7ee,0x5
07ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f0 e001 | | Load 0x0,0x1
07f1 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
07f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f3 62f8 |b | Indirect_Literal Discrete,0xaec,{0x00000000, 0x00004000}
07f4 e5fe | | Load 0x2,-0x2
07f5 4800 |H | Short_Literal 0x0
07f6 e5ff | | Load 0x2,-0x1
07f7 e001 | | Load 0x0,0x1
07f8 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
07f9 180f | | Execute Package,Field_Execute,Field_Number 0xf
07fa c40a | | Store 0x2,0xa
07fb c406 | | Store 0x2,0x6
07fc 00db | | Load_Top At_Offset_3 ; Debug Table 0x1d.0x11 = 0x7fc,0x6
07fd 0f01 | | Execute_Immediate Equal,0x1
07fe 6849 |hI | Jump_Zero 0x848
07ff 00cf | | Action Mark_Auxiliary ; Debug Table 0x1d.0x12 = 0x7ff,0x7
0800 e20d | | Load 0x1,0xd ; Debug Table 0x1d.0x13 = 0x800,0xfbff
0801 0007 | | Action Break_Optional
0802 e008 | | Load 0x0,0x8 ; Debug Table 0x1d.0x14 = 0x802,0xfbfe
0803 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0804 02c7 | | Declare_Variable Any
0805 00d8 | | Load_Top At_Offset_0
0806 1c00 | | Execute_Immediate Run_Utility,0x0
0807 e217 | | Load 0x1,0x17 ; Debug Table 0x1d.0x15 = 0x807,0xfbfd
0808 0007 | | Action Break_Optional
0809 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x1d.0x16 = 0x809,0xfbfc
080a e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x17 = 0x80a,0xfbfb
080b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
080c e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x18 = 0x80c,0x401
080d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
080e e001 | | Load 0x0,0x1
080f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0810 62db |b | Indirect_Literal Discrete,0xaec,{0x00000000, 0x00004000}
0811 e5fe | | Load 0x2,-0x2
0812 4800 |H | Short_Literal 0x0
0813 e5ff | | Load 0x2,-0x1
0814 8212 | | Call 0x1,0x12
0815 e001 | | Load 0x0,0x1
0816 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0817 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0818 c40f | | Store 0x2,0xf
0819 0059 | Y | Store_Top Discrete,At_Offset_1
081a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x19 = 0x81a,0x402
081b 0007 | | Action Break_Optional
081c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1a = 0x81c,0x801
081d 6803 |h | Jump_Zero 0x821
081e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1b = 0x81e,0x802
081f e00b | | Load 0x0,0xb
0820 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0821 00d1 | | Pop_Control Pop_Count_1
0822 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x1c = 0x822,0x403
0823 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0824 00f1 | | Load_Encached Diana_Temp_Seq
0825 e217 | | Load 0x1,0x17
0826 e410 | | Load 0x2,0x10
0827 0120 | | Execute Any,Is_Value
0828 6803 |h | Jump_Zero 0x82c
0829 e008 | | Load 0x0,0x8
082a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
082b 7801 |x | Jump 0x82d
082c e410 | | Load 0x2,0x10
082d e40f | | Load 0x2,0xf
082e 62bd |b | Indirect_Literal Discrete,0xaec,{0x00000000, 0x00004000}
082f e5fe | | Load 0x2,-0x2
0830 4800 |H | Short_Literal 0x0
0831 e001 | | Load 0x0,0x1
0832 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0833 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0834 e001 | | Load 0x0,0x1
0835 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0836 4802 |H | Short_Literal 0x2
0837 e001 | | Load 0x0,0x1
0838 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0839 1815 | | Execute Package,Field_Execute,Field_Number 0x15
083a c40f | | Store 0x2,0xf
083b c410 | | Store 0x2,0x10
083c c411 | | Store 0x2,0x11
083d 0033 | 3 | Store_Top Heap_Access,At_Offset_3
083e 0059 | Y | Store_Top Discrete,At_Offset_1
083f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1d = 0x83f,0x404
0840 0007 | | Action Break_Optional
0841 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1e = 0x841,0xc01
0842 6803 |h | Jump_Zero 0x846
0843 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1f = 0x843,0xc02
0844 e00b | | Load 0x0,0xb
0845 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0846 00d6 | | Pop_Control Pop_Count_6
0847 00ce | | Action Pop_Auxiliary
0848 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x20 = 0x848,0x8
0849 1b0d | | Execute Package,Field_Read,Field_Number 0xd
084a e403 | | Load 0x2,0x3
084b e5f9 | | Load 0x2,-0x7
084c 00db | | Load_Top At_Offset_3
084d e5fd | | Load 0x2,-0x3
084e e404 | | Load 0x2,0x4
084f e013 | | Load 0x0,0x13
0850 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0851 00d1 | | Pop_Control Pop_Count_1
0852 c406 | | Store 0x2,0x6
0853 e406 | | Load 0x2,0x6 ; Debug Table 0x1d.0x21 = 0x853,0x9
0854 0007 | | Action Break_Optional
0855 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x22 = 0x855,0x1001
0856 6803 |h | Jump_Zero 0x85a
0857 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x23 = 0x857,0x1002
0858 e00b | | Load 0x0,0xb
0859 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
085a 00d1 | | Pop_Control Pop_Count_1
085b e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x24 = 0x85b,0xa
085c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
085d e216 | | Load 0x1,0x16
085e 00da | | Load_Top At_Offset_2
085f e403 | | Load 0x2,0x3
0860 e013 | | Load 0x0,0x13
0861 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0862 c409 | | Store 0x2,0x9
0863 c406 | | Store 0x2,0x6
0864 e406 | | Load 0x2,0x6 ; Debug Table 0x1d.0x25 = 0x864,0xb
0865 0007 | | Action Break_Optional
0866 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x26 = 0x866,0x1401
0867 6803 |h | Jump_Zero 0x86b
0868 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x27 = 0x868,0x1402
0869 e00b | | Load 0x0,0xb
086a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
086b 00d1 | | Pop_Control Pop_Count_1
086c e409 | | Load 0x2,0x9 ; Debug Table 0x1d.0x28 = 0x86c,0xc
086d e001 | | Load 0x0,0x1
086e 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
086f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0870 6802 |h | Jump_Zero 0x873
0871 4803 |H | Short_Literal 0x3 ; Debug Table 0x1d.0x29 = 0x871,0xd
0872 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0873 e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x2a = 0x873,0xe
0874 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0875 00db | | Load_Top At_Offset_3
0876 0120 | | Execute Any,Is_Value
0877 6802 |h | Jump_Zero 0x87a
0878 e221 | ! | Load 0x1,0x21
0879 7801 |x | Jump 0x87b
087a 00db | | Load_Top At_Offset_3
087b e216 | | Load 0x1,0x16
087c 4800 |H | Short_Literal 0x0
087d 4801 |H | Short_Literal 0x1
087e 4800 |H | Short_Literal 0x0
087f e5f9 | | Load 0x2,-0x7
0880 e40d | | Load 0x2,0xd
0881 e40c | | Load 0x2,0xc
0882 e403 | | Load 0x2,0x3
0883 e013 | | Load 0x0,0x13
0884 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0885 c409 | | Store 0x2,0x9
0886 c40b | | Store 0x2,0xb
0887 c406 | | Store 0x2,0x6
0888 e406 | | Load 0x2,0x6 ; Debug Table 0x1d.0x2b = 0x888,0xf
0889 0007 | | Action Break_Optional
088a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x2c = 0x88a,0x1801
088b 6803 |h | Jump_Zero 0x88f
088c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x2d = 0x88c,0x1802
088d e00b | | Load 0x0,0xb
088e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
088f 00d1 | | Pop_Control Pop_Count_1
0890 e405 | | Load 0x2,0x5 ; Debug Table 0x1d.0x2e = 0x890,0x10
0891 e404 | | Load 0x2,0x4
0892 e013 | | Load 0x0,0x13
0893 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0894 00d1 | | Pop_Control Pop_Count_1
0895 e408 | | Load 0x2,0x8 ; Debug Table 0x1d.0x2f = 0x895,0x11
0896 e407 | | Load 0x2,0x7
0897 4801 |H | Short_Literal 0x1
0898 e5f9 | | Load 0x2,-0x7
0899 e40d | | Load 0x2,0xd
089a e405 | | Load 0x2,0x5
089b e402 | | Load 0x2,0x2
089c e404 | | Load 0x2,0x4
089d e409 | | Load 0x2,0x9
089e e00d | | Load 0x0,0xd
089f 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
08a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08a1 c407 | | Store 0x2,0x7
08a2 c408 | | Store 0x2,0x8
08a3 e408 | | Load 0x2,0x8 ; Debug Table 0x1d.0x30 = 0x8a3,0x12
08a4 e407 | | Load 0x2,0x7
08a5 4801 |H | Short_Literal 0x1
08a6 e00d | | Load 0x0,0xd
08a7 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
08a8 180f | | Execute Package,Field_Execute,Field_Number 0xf
08a9 c407 | | Store 0x2,0x7
08aa c408 | | Store 0x2,0x8
08ab e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x31 = 0x8ab,0x13
08ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ad 4800 |H | Short_Literal 0x0
08ae 4801 |H | Short_Literal 0x1
08af 00db | | Load_Top At_Offset_3
08b0 e403 | | Load 0x2,0x3
08b1 e013 | | Load 0x0,0x13
08b2 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
08b3 c406 | | Store 0x2,0x6
08b4 e406 | | Load 0x2,0x6 ; Debug Table 0x1d.0x32 = 0x8b4,0x14
08b5 0007 | | Action Break_Optional
08b6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x33 = 0x8b6,0x1c01
08b7 6803 |h | Jump_Zero 0x8bb
08b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x34 = 0x8b8,0x1c02
08b9 e00b | | Load 0x0,0xb
08ba 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
08bb 00d1 | | Pop_Control Pop_Count_1
08bc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x35 = 0x8bc,0x15
08bd 4801 |H | Short_Literal 0x1
08be 4801 |H | Short_Literal 0x1
08bf e5fe | | Load 0x2,-0x2
08c0 e00a | | Load 0x0,0xa
08c1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
08c2 c40d | | Store 0x2,0xd
08c3 4800 |H | Short_Literal 0x0 ; Debug Table 0x1d.0x36 = 0x8c3,0x16
08c4 a5f8 | | Store_Unchecked 0x2,-0x8
08c5 4508 |E | Exit_Subprogram 0x8
08c6 TRAP_0798:
08c6 0007 | | Action Break_Optional
08c7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1d.0x37 = 0x8c7,0x17
08c8 4801 |H | Short_Literal 0x1
08c9 4800 |H | Short_Literal 0x0
08ca e5fe | | Load 0x2,-0x2
08cb e00a | | Load 0x0,0xa
08cc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
08cd c40d | | Store 0x2,0xd
08ce e001 | | Load 0x0,0x1 ; Debug Table 0x1d.0x38 = 0x8ce,0x18
08cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08d0 e23a | : | Load 0x1,0x3a
08d1 0092 0ebf | | Action Push_String_Extended,0xebf ; "Reformat_Image"
08d3 01cc | | Execute Vector,Catenate
08d4 e001 | | Load 0x0,0x1
08d5 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
08d6 e00b | | Load 0x0,0xb
08d7 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
08d8 c5f8 | | Store 0x2,-0x8
08d9 4508 |E | Exit_Subprogram 0x8
08da 0000 0000 | | .BLANK 0000[0x6]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e9 | | .CONST 0x08e9 ; Address of begin
08e1 0939 | 9 | .CONST 0x0939 ; Address of exception handler
08e2 0003 | | .CONST 0x0003 ; Number of locals
08e3 INIT_08e0:
08e3 e23b | ; | Load 0x1,0x3b ; Debug Table 0x1e = .DEBUG 0x08e3,0x15b8,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0a03
; Debug Table 0x1e.0x0 = 0x8e3,0xffff
08e4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
08e5 0322 | " | Declare_Variable Record
08e6 00d8 | | Load_Top At_Offset_0
08e7 1c00 | | Execute_Immediate Run_Utility,0x0
08e8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1e.0x1 = 0x8e8,0xfffe
08e9 BODY_08e0:
08e9 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1e.0x2 = 0x8e9,0x1
08ea 01db | | Execute Vector,Length
08eb 6832 |h2 | Jump_Zero 0x91e
08ec 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1e.0x3 = 0x8ec,0x2
08ed 00da | | Load_Top At_Offset_2
08ee e5fe | | Load 0x2,-0x2
08ef e23b | ; | Load 0x1,0x3b
08f0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08f1 0217 | | Execute Heap_Access,All_Reference
08f2 e23b | ; | Load 0x1,0x3b
08f3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08f4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08f5 00d1 | | Pop_Control Pop_Count_1
08f6 0059 | Y | Store_Top Discrete,At_Offset_1
08f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x4 = 0x8f7,0x3
08f8 7010 |p | Jump_Nonzero 0x909
08f9 e23a | : | Load 0x1,0x3a ; Debug Table 0x1e.0x5 = 0x8f9,0x4
08fa 0092 0ec0 | | Action Push_String_Extended,0xec0 ; "Set_Diana_Heap"
08fc 01cc | | Execute Vector,Catenate
08fd 0092 0ec1 | | Action Push_String_Extended,0xec1 ; "Can't find attribute space "
08ff e5fe | | Load 0x2,-0x2
0900 01cc | | Execute Vector,Catenate
0901 4806 |H | Short_Literal 0x6
0902 e001 | | Load 0x0,0x1
0903 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0904 e00e | | Load 0x0,0xe
0905 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0906 e00b | | Load 0x0,0xb ; Debug Table 0x1e.0x6 = 0x906,0x5
0907 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0908 0257 | W | Execute Discrete,Raise
0909 e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0x7 = 0x909,0x6
090a 7009 |p | Jump_Nonzero 0x914
090b e016 | | Load 0x0,0x16 ; Debug Table 0x1e.0x8 = 0x90b,0x7
090c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
090d e5ff | | Load 0x2,-0x1
090e 00db | | Load_Top At_Offset_3
090f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0910 e002 | | Load 0x0,0x2
0911 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0912 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0913 7807 |x | Jump 0x91b
0914 e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0x9 = 0x914,0x8
0915 e5ff | | Load 0x2,-0x1
0916 00db | | Load_Top At_Offset_3
0917 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0918 e002 | | Load 0x0,0x2
0919 1b15 | | Execute Package,Field_Read,Field_Number 0x15
091a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
091b 4800 |H | Short_Literal 0x0 ; Debug Table 0x1e.0xa = 0x91b,0x9
091c a5fb | | Store_Unchecked 0x2,-0x5
091d 4505 |E | Exit_Subprogram 0x5 ; Debug Table 0x1e.0xb = 0x91d,0xa
091e e5fd | | Load 0x2,-0x3 ; Debug Table 0x1e.0xc = 0x91e,0xb
091f 700d |p | Jump_Nonzero 0x92d
0920 e5fc | | Load 0x2,-0x4
0921 700b |p | Jump_Nonzero 0x92d
0922 e016 | | Load 0x0,0x16 ; Debug Table 0x1e.0xd = 0x922,0xc
0923 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0924 4800 |H | Short_Literal 0x0
0925 e5ff | | Load 0x2,-0x1
0926 e002 | | Load 0x0,0x2
0927 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0928 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0929 e002 | | Load 0x0,0x2
092a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
092b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
092c 7809 |x | Jump 0x936
092d e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0xe = 0x92d,0xd
092e e5fd | | Load 0x2,-0x3
092f e5ff | | Load 0x2,-0x1
0930 e002 | | Load 0x0,0x2
0931 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0932 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0933 e002 | | Load 0x0,0x2
0934 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0935 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0936 4800 |H | Short_Literal 0x0 ; Debug Table 0x1e.0xf = 0x936,0xe
0937 a5fb | | Store_Unchecked 0x2,-0x5
0938 4505 |E | Exit_Subprogram 0x5
0939 TRAP_08e0:
0939 0007 | | Action Break_Optional
093a e001 | | Load 0x0,0x1 ; Debug Table 0x1e.0x10 = 0x93a,0xf
093b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
093c e23a | : | Load 0x1,0x3a
093d 0092 0ec0 | | Action Push_String_Extended,0xec0 ; "Set_Diana_Heap"
093f 01cc | | Execute Vector,Catenate
0940 e001 | | Load 0x0,0x1
0941 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0942 e00b | | Load 0x0,0xb
0943 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0944 c5fb | | Store 0x2,-0x5
0945 4505 |E | Exit_Subprogram 0x5
0946 0000 0000 | | .XXX[0x2]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 0951 | Q | .CONST 0x0951 ; Address of begin
0949 0985 | | .CONST 0x0985 ; Address of exception handler
094a 0002 | | .CONST 0x0002 ; Number of locals
094b INIT_0948:
094b e002 | | Load 0x0,0x2 ; Debug Table 0x1f = .DEBUG 0x094b,0x15dc,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0a26
; Debug Table 0x1f.0x0 = 0x94b,0xffff
094c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
094d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
094e 02c7 | | Declare_Variable Any
094f 00d8 | | Load_Top At_Offset_0
0950 1c00 | | Execute_Immediate Run_Utility,0x0
0951 BODY_0948:
0951 0007 | | Action Break_Optional ; Debug Table 0x1f.0x1 = 0x951,0x1
0952 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1f.0x2 = 0x952,0x401
0953 a5fd | | Store_Unchecked 0x2,-0x3 ; Debug Table 0x1f.0x3 = 0x953,0x1
0954 4800 |H | Short_Literal 0x0 ; Debug Table 0x1f.0x4 = 0x954,0x2
0955 a5fc | | Store_Unchecked 0x2,-0x4
0956 00db | | Load_Top At_Offset_3 ; Debug Table 0x1f.0x5 = 0x956,0x3
0957 6817 |h | Jump_Zero 0x96f
0958 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1f.0x6 = 0x958,0x4
0959 680e |h | Jump_Zero 0x968
095a e23a | : | Load 0x1,0x3a ; Debug Table 0x1f.0x7 = 0x95a,0x5
095b 0092 0ec2 | | Action Push_String_Extended,0xec2 ; "Get_Diana_Heap"
095d 01cc | | Execute Vector,Catenate
095e 0092 0ec3 | | Action Push_String_Extended,0xec3 ; "Can't get both job and task heaps at once."
0960 4806 |H | Short_Literal 0x6
0961 e001 | | Load 0x0,0x1
0962 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0963 e00e | | Load 0x0,0xe
0964 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0965 e00b | | Load 0x0,0xb ; Debug Table 0x1f.0x8 = 0x965,0x6
0966 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0967 0257 | W | Execute Discrete,Raise
0968 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1f.0x9 = 0x968,0x7
0969 e5ff | | Load 0x2,-0x1
096a e002 | | Load 0x0,0x2
096b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
096c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
096d c402 | | Store 0x2,0x2
096e 7807 |x | Jump 0x976
096f e016 | | Load 0x0,0x16 ; Debug Table 0x1f.0xa = 0x96f,0x8
0970 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0971 e5ff | | Load 0x2,-0x1
0972 e002 | | Load 0x0,0x2
0973 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0974 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0975 c402 | | Store 0x2,0x2
0976 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1f.0xb = 0x976,0x9
0977 e002 | | Load 0x0,0x2
0978 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0979 1811 | | Execute Package,Field_Execute,Field_Number 0x11
097a 6804 |h | Jump_Zero 0x97f
097b 0007 | | Action Break_Optional ; Debug Table 0x1f.0xc = 0x97b,0xa
097c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1f.0xd = 0x97c,0x801
097d a5fd | | Store_Unchecked 0x2,-0x3 ; Debug Table 0x1f.0xe = 0x97d,0xa
097e 4503 |E | Exit_Subprogram 0x3
097f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1f.0xf = 0x97f,0xb
0980 e002 | | Load 0x0,0x2
0981 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0982 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0983 a5fd | | Store_Unchecked 0x2,-0x3
0984 4503 |E | Exit_Subprogram 0x3
0985 TRAP_0948:
0985 0007 | | Action Break_Optional
0986 0007 | | Action Break_Optional ; Debug Table 0x1f.0x10 = 0x986,0xc
0987 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1f.0x11 = 0x987,0xc01
0988 a5fd | | Store_Unchecked 0x2,-0x3 ; Debug Table 0x1f.0x12 = 0x988,0xc
0989 e001 | | Load 0x0,0x1 ; Debug Table 0x1f.0x13 = 0x989,0xd
098a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
098b e23a | : | Load 0x1,0x3a
098c 0092 0ec2 | | Action Push_String_Extended,0xec2 ; "Get_Diana_Heap"
098e 01cc | | Execute Vector,Catenate
098f e001 | | Load 0x0,0x1
0990 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0991 e00b | | Load 0x0,0xb
0992 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0993 c5fc | | Store 0x2,-0x4
0994 4503 |E | Exit_Subprogram 0x3
0995 0000 0000 | | .XXX[0x3]
0997 0000 | |
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099f | | .CONST 0x099f ; Address of begin
0999 0004 | | .CONST 0x0004 ; Address of exception handler
099a 0002 | | .CONST 0x0002 ; Number of locals
099b INIT_0998:
099b e233 | 3 | Load 0x1,0x33 ; Debug Table 0x20 = .DEBUG 0x099b,0x1606,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0a48
; Debug Table 0x20.0x0 = 0x99b,0xffff
099c 0322 | " | Declare_Variable Record
099d 00d8 | | Load_Top At_Offset_0
099e 1c00 | | Execute_Immediate Run_Utility,0x0
099f BODY_0998:
099f e016 | | Load 0x0,0x16 ; Debug Table 0x20.0x1 = 0x99f,0x1
09a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09a1 e002 | | Load 0x0,0x2
09a2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09a3 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
09a4 680b |h | Jump_Zero 0x9b0
09a5 4801 |H | Short_Literal 0x1 ; Debug Table 0x20.0x2 = 0x9a5,0x2
09a6 00d9 | | Load_Top At_Offset_1
09a7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09a8 e016 | | Load 0x0,0x16 ; Debug Table 0x20.0x3 = 0x9a8,0x3
09a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09aa 4800 |H | Short_Literal 0x0
09ab e002 | | Load 0x0,0x2
09ac 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09ad 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09ae 00d9 | | Load_Top At_Offset_1
09af 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
09b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x20.0x4 = 0x9b0,0x4
09b1 00ca | | Action Exit_Nullary_Function
09b2 0000 0000 | | .BLANK 0000[0x6]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09bb | | .CONST 0x09bb ; Address of begin
09b9 0004 | | .CONST 0x0004 ; Address of exception handler
09ba 0001 | | .CONST 0x0001 ; Number of locals
09bb BODY_09b8:
09bb INIT_09b8:
09bb 00da | | Load_Top At_Offset_2 ; Debug Table 0x21 = .DEBUG 0x09bb,0x1612,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0a4d
; Debug Table 0x21.0x0 = 0x9bb,0x1
09bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09bd 6809 |h | Jump_Zero 0x9c7
09be e016 | | Load 0x0,0x16 ; Debug Table 0x21.0x1 = 0x9be,0x2
09bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09c0 4800 |H | Short_Literal 0x0
09c1 e5ff | | Load 0x2,-0x1
09c2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09c3 e002 | | Load 0x0,0x2
09c4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09c5 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
09c6 4502 |E | Exit_Subprogram 0x2
09c7 e016 | | Load 0x0,0x16 ; Debug Table 0x21.0x2 = 0x9c7,0x3
09c8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09c9 e002 | | Load 0x0,0x2
09ca 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09cb 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
09cc 6809 |h | Jump_Zero 0x9d6
09cd e016 | | Load 0x0,0x16 ; Debug Table 0x21.0x3 = 0x9cd,0x4
09ce 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09cf 4800 |H | Short_Literal 0x0
09d0 e002 | | Load 0x0,0x2
09d1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09d2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09d3 e002 | | Load 0x0,0x2
09d4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09d5 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
09d6 4502 |E | Exit_Subprogram 0x2
09d7 0000 | | .XXX[0x1]
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 0a0b | | .CONST 0x0a0b ; Address of begin
09d9 0ad6 | | .CONST 0x0ad6 ; Address of exception handler
09da 000a | | .CONST 0x000a ; Number of locals
09db INIT_09d8:
09db e213 | | Load 0x1,0x13 ; Debug Table 0x22 = .DEBUG 0x09db,0x161c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0bf0
; Debug Table 0x22.0x0 = 0x9db,0xffff
09dc 02ff | | Declare_Variable Variant_Record
09dd e001 | | Load 0x0,0x1
09de 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09df 00d9 | | Load_Top At_Offset_1
09e0 016d | m | Execute Variant_Record,Structure_Write
09e1 e001 | | Load 0x0,0x1 ; Debug Table 0x22.0x1 = 0x9e1,0xfffe
09e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e3 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x22.0x2 = 0x9e3,0xfffd
09e4 e011 | | Load 0x0,0x11
09e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
09e6 e012 | | Load 0x0,0x12
09e7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
09e8 0031 | 1 | Store_Top Heap_Access,At_Offset_1
09e9 e014 | | Load 0x0,0x14 ; Debug Table 0x22.0x3 = 0x9e9,0xfffc
09ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09eb e001 | | Load 0x0,0x1 ; Debug Table 0x22.0x4 = 0x9eb,0xfffb
09ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09ed 02ff | | Declare_Variable Variant_Record
09ee e5ff | | Load 0x2,-0x1
09ef 8212 | | Call 0x1,0x12
09f0 00d9 | | Load_Top At_Offset_1
09f1 016d | m | Execute Variant_Record,Structure_Write
09f2 e001 | | Load 0x0,0x1 ; Debug Table 0x22.0x5 = 0x9f2,0xfffa
09f3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09f4 02ff | | Declare_Variable Variant_Record
09f5 00d8 | | Load_Top At_Offset_0
09f6 1c00 | | Execute_Immediate Run_Utility,0x0
09f7 e5fe | | Load 0x2,-0x2 ; Debug Table 0x22.0x6 = 0x9f7,0xfff9
09f8 e013 | | Load 0x0,0x13
09f9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
09fa e00a | | Load 0x0,0xa
09fb 1b10 | | Execute Package,Field_Read,Field_Number 0x10
09fc 03f1 | | Declare_Variable Discrete,With_Value
09fd e017 | | Load 0x0,0x17 ; Debug Table 0x22.0x7 = 0x9fd,0xfff8
09fe 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
09ff 0322 | " | Declare_Variable Record
0a00 00d8 | | Load_Top At_Offset_0
0a01 1c00 | | Execute_Immediate Run_Utility,0x0
0a02 e00a | | Load 0x0,0xa ; Debug Table 0x22.0x8 = 0xa02,0xfff7
0a03 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a04 02c7 | | Declare_Variable Any
0a05 e016 | | Load 0x0,0x16
0a06 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a07 e5fd | | Load 0x2,-0x3
0a08 e00a | | Load 0x0,0xa
0a09 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a0a c40a | | Store 0x2,0xa
0a0b BODY_09d8:
0a0b e5ff | | Load 0x2,-0x1 ; Debug Table 0x22.0x9 = 0xa0b,0x1
0a0c e00f | | Load 0x0,0xf
0a0d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0a0e e001 | | Load 0x0,0x1 ; Debug Table 0x22.0xa = 0xa0e,0x2
0a0f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a10 e402 | | Load 0x2,0x2
0a11 e5fb | | Load 0x2,-0x5
0a12 00db | | Load_Top At_Offset_3
0a13 e5fc | | Load 0x2,-0x4
0a14 e406 | | Load 0x2,0x6
0a15 e013 | | Load 0x0,0x13
0a16 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0a17 00d1 | | Pop_Control Pop_Count_1
0a18 c403 | | Store 0x2,0x3
0a19 e403 | | Load 0x2,0x3 ; Debug Table 0x22.0xb = 0xa19,0x3
0a1a 0007 | | Action Break_Optional
0a1b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0xc = 0xa1b,0x401
0a1c 6803 |h | Jump_Zero 0xa20
0a1d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0xd = 0xa1d,0x402
0a1e e00b | | Load 0x0,0xb
0a1f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0a20 00d1 | | Pop_Control Pop_Count_1
0a21 e406 | | Load 0x2,0x6 ; Debug Table 0x22.0xe = 0xa21,0x4
0a22 e001 | | Load 0x0,0x1
0a23 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0a24 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a25 680e |h | Jump_Zero 0xa34
0a26 e23a | : | Load 0x1,0x3a ; Debug Table 0x22.0xf = 0xa26,0x5
0a27 0092 0ec4 | | Action Push_String_Extended,0xec4 ; "Reopen_Image"
0a29 01cc | | Execute Vector,Catenate
0a2a 0092 0eb9 | | Action Push_String_Extended,0xeb9 ; "Libraries do not have images."
0a2c 480d |H | Short_Literal 0xd
0a2d e001 | | Load 0x0,0x1
0a2e 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0a2f e00e | | Load 0x0,0xe
0a30 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a31 e00b | | Load 0x0,0xb ; Debug Table 0x22.0x10 = 0xa31,0x6
0a32 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0a33 0257 | W | Execute Discrete,Raise
0a34 e014 | | Load 0x0,0x14 ; Debug Table 0x22.0x11 = 0xa34,0x7
0a35 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a36 e407 | | Load 0x2,0x7
0a37 e5fb | | Load 0x2,-0x5
0a38 00db | | Load_Top At_Offset_3
0a39 e402 | | Load 0x2,0x2
0a3a e002 | | Load 0x0,0x2
0a3b 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0a3c 00d1 | | Pop_Control Pop_Count_1
0a3d c405 | | Store 0x2,0x5
0a3e e405 | | Load 0x2,0x5 ; Debug Table 0x22.0x12 = 0xa3e,0x8
0a3f 0007 | | Action Break_Optional
0a40 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x13 = 0xa40,0x801
0a41 6803 |h | Jump_Zero 0xa45
0a42 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x14 = 0xa42,0x802
0a43 e00b | | Load 0x0,0xb
0a44 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a45 00d1 | | Pop_Control Pop_Count_1
0a46 00db | | Load_Top At_Offset_3 ; Debug Table 0x22.0x15 = 0xa46,0x9
0a47 e001 | | Load 0x0,0x1
0a48 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a49 6870 |hp | Jump_Zero 0xaba
0a4a e5fe | | Load 0x2,-0x2 ; Debug Table 0x22.0x16 = 0xa4a,0xa
0a4b 0e02 | | Execute_Immediate Not_Equal,0x2
0a4c 680e |h | Jump_Zero 0xa5b
0a4d e23a | : | Load 0x1,0x3a ; Debug Table 0x22.0x17 = 0xa4d,0xb
0a4e 0092 0ec4 | | Action Push_String_Extended,0xec4 ; "Reopen_Image"
0a50 01cc | | Execute Vector,Catenate
0a51 0092 0eba | | Action Push_String_Extended,0xeba ; "No image exists. Open again for Update to create one."
0a53 4806 |H | Short_Literal 0x6
0a54 e001 | | Load 0x0,0x1
0a55 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0a56 e00e | | Load 0x0,0xe
0a57 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a58 e00b | | Load 0x0,0xb ; Debug Table 0x22.0x18 = 0xa58,0xc
0a59 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a5a 0257 | W | Execute Discrete,Raise
0a5b e014 | | Load 0x0,0x14 ; Debug Table 0x22.0x19 = 0xa5b,0xd
0a5c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a5d 00da | | Load_Top At_Offset_2
0a5e 00da | | Load_Top At_Offset_2
0a5f e5fb | | Load 0x2,-0x5
0a60 e406 | | Load 0x2,0x6
0a61 e001 | | Load 0x0,0x1
0a62 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0a63 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a64 e017 | | Load 0x0,0x17
0a65 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a66 00d1 | | Pop_Control Pop_Count_1
0a67 c405 | | Store 0x2,0x5
0a68 e405 | | Load 0x2,0x5 ; Debug Table 0x22.0x1a = 0xa68,0xe
0a69 0007 | | Action Break_Optional
0a6a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x1b = 0xa6a,0xc01
0a6b 6803 |h | Jump_Zero 0xa6f
0a6c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x1c = 0xa6c,0xc02
0a6d e00b | | Load 0x0,0xb
0a6e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a6f 00d1 | | Pop_Control Pop_Count_1
0a70 e014 | | Load 0x0,0x14 ; Debug Table 0x22.0x1d = 0xa70,0xf
0a71 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a72 e5fa | | Load 0x2,-0x6
0a73 0120 | | Execute Any,Is_Value
0a74 6803 |h | Jump_Zero 0xa78
0a75 e018 | | Load 0x0,0x18
0a76 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a77 7801 |x | Jump 0xa79
0a78 e5fa | | Load 0x2,-0x6
0a79 e407 | | Load 0x2,0x7
0a7a e019 | | Load 0x0,0x19
0a7b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a7c 0162 | b | Execute Variant_Record,Check_In_Type
0a7d e5fb | | Load 0x2,-0x5
0a7e e019 | | Load 0x0,0x19
0a7f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a80 e409 | | Load 0x2,0x9
0a81 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0a82 e402 | | Load 0x2,0x2
0a83 e001 | | Load 0x0,0x1
0a84 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0a85 e406 | | Load 0x2,0x6
0a86 e001 | | Load 0x0,0x1
0a87 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0a88 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a89 e40a | | Load 0x2,0xa
0a8a e404 | | Load 0x2,0x4
0a8b e018 | | Load 0x0,0x18
0a8c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a8d 00d1 | | Pop_Control Pop_Count_1
0a8e c5fa | | Store 0x2,-0x6
0a8f c405 | | Store 0x2,0x5
0a90 e405 | | Load 0x2,0x5 ; Debug Table 0x22.0x1e = 0xa90,0x10
0a91 0007 | | Action Break_Optional
0a92 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x1f = 0xa92,0x1001
0a93 6803 |h | Jump_Zero 0xa97
0a94 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x20 = 0xa94,0x1002
0a95 e00b | | Load 0x0,0xb
0a96 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a97 00d1 | | Pop_Control Pop_Count_1
0a98 e014 | | Load 0x0,0x14 ; Debug Table 0x22.0x21 = 0xa98,0x11
0a99 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a9a e5fb | | Load 0x2,-0x5
0a9b e408 | | Load 0x2,0x8
0a9c 00db | | Load_Top At_Offset_3
0a9d e407 | | Load 0x2,0x7
0a9e e402 | | Load 0x2,0x2
0a9f e002 | | Load 0x0,0x2
0aa0 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0aa1 c405 | | Store 0x2,0x5
0aa2 e405 | | Load 0x2,0x5 ; Debug Table 0x22.0x22 = 0xaa2,0x12
0aa3 0007 | | Action Break_Optional
0aa4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x23 = 0xaa4,0x1401
0aa5 6803 |h | Jump_Zero 0xaa9
0aa6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x24 = 0xaa6,0x1402
0aa7 e00b | | Load 0x0,0xb
0aa8 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0aa9 00d1 | | Pop_Control Pop_Count_1
0aaa e23a | : | Load 0x1,0x3a ; Debug Table 0x22.0x25 = 0xaaa,0x13
0aab 0092 0ec4 | | Action Push_String_Extended,0xec4 ; "Reopen_Image"
0aad 01cc | | Execute Vector,Catenate
0aae 0092 0ebb | | Action Push_String_Extended,0xebb ; "Created an image for "
0ab0 e406 | | Load 0x2,0x6
0ab1 e001 | | Load 0x0,0x1
0ab2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ab3 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0ab4 01cc | | Execute Vector,Catenate
0ab5 e001 | | Load 0x0,0x1
0ab6 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0ab7 e00e | | Load 0x0,0xe
0ab8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ab9 7812 |x | Jump 0xacc
0aba e014 | | Load 0x0,0x14 ; Debug Table 0x22.0x26 = 0xaba,0x14
0abb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0abc e5fb | | Load 0x2,-0x5
0abd e5fa | | Load 0x2,-0x6
0abe 00db | | Load_Top At_Offset_3
0abf e408 | | Load 0x2,0x8
0ac0 e407 | | Load 0x2,0x7
0ac1 e018 | | Load 0x0,0x18
0ac2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0ac3 c405 | | Store 0x2,0x5
0ac4 e405 | | Load 0x2,0x5 ; Debug Table 0x22.0x27 = 0xac4,0x15
0ac5 0007 | | Action Break_Optional
0ac6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x28 = 0xac6,0x1801
0ac7 6803 |h | Jump_Zero 0xacb
0ac8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x29 = 0xac8,0x1802
0ac9 e00b | | Load 0x0,0xb
0aca 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0acb 00d1 | | Pop_Control Pop_Count_1
0acc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x2a = 0xacc,0x16
0acd 4801 |H | Short_Literal 0x1
0ace 4801 |H | Short_Literal 0x1
0acf e5fd | | Load 0x2,-0x3
0ad0 e00a | | Load 0x0,0xa
0ad1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0ad2 c40a | | Store 0x2,0xa
0ad3 4800 |H | Short_Literal 0x0 ; Debug Table 0x22.0x2b = 0xad3,0x17
0ad4 a5f9 | | Store_Unchecked 0x2,-0x7
0ad5 4506 |E | Exit_Subprogram 0x6
0ad6 TRAP_09d8:
0ad6 0007 | | Action Break_Optional
0ad7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x22.0x2c = 0xad7,0x18
0ad8 4801 |H | Short_Literal 0x1
0ad9 4800 |H | Short_Literal 0x0
0ada e5fd | | Load 0x2,-0x3
0adb e00a | | Load 0x0,0xa
0adc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0add c40a | | Store 0x2,0xa
0ade e001 | | Load 0x0,0x1 ; Debug Table 0x22.0x2d = 0xade,0x19
0adf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ae0 e23a | : | Load 0x1,0x3a
0ae1 0092 0ec4 | | Action Push_String_Extended,0xec4 ; "Reopen_Image"
0ae3 01cc | | Execute Vector,Catenate
0ae4 e001 | | Load 0x0,0x1
0ae5 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0ae6 e00b | | Load 0x0,0xb
0ae7 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ae8 c5f9 | | Store 0x2,-0x7
0ae9 4506 |E | Exit_Subprogram 0x6
0aea 0000 0000 | | .XXX[0x2]
0aec 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0b04 | | .CONST 0x0b04 ; Address of begin
0af1 0b46 | F | .CONST 0x0b46 ; Address of exception handler
0af2 0005 | | .CONST 0x0005 ; Number of locals
0af3 INIT_0af0:
0af3 e213 | | Load 0x1,0x13 ; Debug Table 0x23 = .DEBUG 0x0af3,0x167a,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0c18
; Debug Table 0x23.0x0 = 0xaf3,0xffff
0af4 02ff | | Declare_Variable Variant_Record
0af5 e001 | | Load 0x0,0x1
0af6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0af7 00d9 | | Load_Top At_Offset_1
0af8 016d | m | Execute Variant_Record,Structure_Write
0af9 e001 | | Load 0x0,0x1 ; Debug Table 0x23.0x1 = 0xaf9,0xfffe
0afa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0afb e014 | | Load 0x0,0x14 ; Debug Table 0x23.0x2 = 0xafb,0xfffd
0afc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0afd e001 | | Load 0x0,0x1 ; Debug Table 0x23.0x3 = 0xafd,0xfffc
0afe 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0aff 02ff | | Declare_Variable Variant_Record
0b00 e5ff | | Load 0x2,-0x1
0b01 8212 | | Call 0x1,0x12
0b02 00d9 | | Load_Top At_Offset_1
0b03 016d | m | Execute Variant_Record,Structure_Write
0b04 BODY_0af0:
0b04 e001 | | Load 0x0,0x1 ; Debug Table 0x23.0x4 = 0xb04,0x1
0b05 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b06 e5fb | | Load 0x2,-0x5
0b07 016d | m | Execute Variant_Record,Structure_Write
0b08 e5ff | | Load 0x2,-0x1 ; Debug Table 0x23.0x5 = 0xb08,0x2
0b09 e00f | | Load 0x0,0xf
0b0a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b0b e001 | | Load 0x0,0x1 ; Debug Table 0x23.0x6 = 0xb0b,0x3
0b0c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b0d e402 | | Load 0x2,0x2
0b0e e5fc | | Load 0x2,-0x4
0b0f e5fe | | Load 0x2,-0x2
0b10 e5fd | | Load 0x2,-0x3
0b11 e405 | | Load 0x2,0x5
0b12 e013 | | Load 0x0,0x13
0b13 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0b14 00d1 | | Pop_Control Pop_Count_1
0b15 005b | [ | Store_Top Discrete,At_Offset_3
0b16 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x7 = 0xb16,0x4
0b17 0007 | | Action Break_Optional
0b18 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x8 = 0xb18,0x401
0b19 6803 |h | Jump_Zero 0xb1d
0b1a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x9 = 0xb1a,0x402
0b1b e00b | | Load 0x0,0xb
0b1c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0b1d 00d1 | | Pop_Control Pop_Count_1
0b1e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0xa = 0xb1e,0x5
0b1f e001 | | Load 0x0,0x1
0b20 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0b21 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b22 680e |h | Jump_Zero 0xb31
0b23 e23a | : | Load 0x1,0x3a ; Debug Table 0x23.0xb = 0xb23,0x6
0b24 0092 0ec5 | | Action Push_String_Extended,0xec5 ; "Get_Image"
0b26 01cc | | Execute Vector,Catenate
0b27 0092 0eb9 | | Action Push_String_Extended,0xeb9 ; "Libraries do not have images."
0b29 480d |H | Short_Literal 0xd
0b2a e001 | | Load 0x0,0x1
0b2b 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0b2c e00e | | Load 0x0,0xe
0b2d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b2e e00b | | Load 0x0,0xb ; Debug Table 0x23.0xc = 0xb2e,0x7
0b2f 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0b30 0257 | W | Execute Discrete,Raise
0b31 e014 | | Load 0x0,0x14 ; Debug Table 0x23.0xd = 0xb31,0x8
0b32 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b33 e5fb | | Load 0x2,-0x5
0b34 e5fc | | Load 0x2,-0x4
0b35 e5fe | | Load 0x2,-0x2
0b36 e402 | | Load 0x2,0x2
0b37 e002 | | Load 0x0,0x2
0b38 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0b39 00d1 | | Pop_Control Pop_Count_1
0b3a 005a | Z | Store_Top Discrete,At_Offset_2
0b3b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x23.0xe = 0xb3b,0x9
0b3c 0007 | | Action Break_Optional
0b3d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0xf = 0xb3d,0x801
0b3e 6803 |h | Jump_Zero 0xb42
0b3f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x10 = 0xb3f,0x802
0b40 e00b | | Load 0x0,0xb
0b41 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0b42 00d1 | | Pop_Control Pop_Count_1
0b43 4800 |H | Short_Literal 0x0 ; Debug Table 0x23.0x11 = 0xb43,0xa
0b44 a5fa | | Store_Unchecked 0x2,-0x6
0b45 4505 |E | Exit_Subprogram 0x5
0b46 TRAP_0af0:
0b46 0007 | | Action Break_Optional
0b47 e001 | | Load 0x0,0x1 ; Debug Table 0x23.0x12 = 0xb47,0xb
0b48 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b49 e23a | : | Load 0x1,0x3a
0b4a 0092 0ec5 | | Action Push_String_Extended,0xec5 ; "Get_Image"
0b4c 01cc | | Execute Vector,Catenate
0b4d e001 | | Load 0x0,0x1
0b4e 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0b4f e00b | | Load 0x0,0xb
0b50 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0b51 c5fa | | Store 0x2,-0x6
0b52 4505 |E | Exit_Subprogram 0x5
0b53 0000 0000 | | .BLANK 0000[0x5]
0b58 ; --------------------------------------------------------------------------------------
0b58 ; SUBPROGRAM
0b58 ; --------------------------------------------------------------------------------------
0b58 0b5b | [ | .CONST 0x0b5b ; Address of begin
0b59 0004 | | .CONST 0x0004 ; Address of exception handler
0b5a 0001 | | .CONST 0x0001 ; Number of locals
0b5b BODY_0b58:
0b5b INIT_0b58:
0b5b 00da | | Load_Top At_Offset_2 ; Debug Table 0x24 = .DEBUG 0x0b5b,0x16a2,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0c3f
; Debug Table 0x24.0x0 = 0xb5b,0x1
0b5c e002 | | Load 0x0,0x2
0b5d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b5e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b5f e001 | | Load 0x0,0x1
0b60 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0b61 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b62 e001 | | Load 0x0,0x1
0b63 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0b64 4401 |D | Exit_Subprogram With_Result,0x1
0b65 0000 0000 | | .XXX[0x3]
0b67 0000 | |
0b68 ; --------------------------------------------------------------------------------------
0b68 ; SUBPROGRAM
0b68 ; --------------------------------------------------------------------------------------
0b68 0b6b | k | .CONST 0x0b6b ; Address of begin
0b69 0004 | | .CONST 0x0004 ; Address of exception handler
0b6a 0001 | | .CONST 0x0001 ; Number of locals
0b6b BODY_0b68:
0b6b INIT_0b68:
0b6b 4608 |F | Jump_Case 0x8 ; Debug Table 0x25 = .DEBUG 0x0b6b,0x16a6,0x0005,0x0000,0x0056,0xd7e5,0x0000,0x0c4d
0b6c 7808 |x | Jump 0xb75 ; case 0x0
0b6d 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0b6e 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
0b6f 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0b70 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0b71 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
0b72 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
0b73 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
0b74 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
0b75 4800 |H | Short_Literal 0x0
0b76 00db | | Load_Top At_Offset_3
0b77 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b78 00da | | Load_Top At_Offset_2
0b79 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0b7a 0125 | % | Execute Any,Set_Constraint
0b7b e002 | | Load 0x0,0x2
0b7c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b7d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b7e 00db | | Load_Top At_Offset_3
0b7f 00d9 | | Load_Top At_Offset_1
0b80 00d9 | | Load_Top At_Offset_1
0b81 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
0b82 0119 | | Execute Any,Check_In_Formal_Type
0b83 00d1 | | Pop_Control Pop_Count_1
0b84 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b85 4302 |C | Exit_Subprogram From_Utility,0x2
0b86 0000 0000 | | .XXX[0x2]
0b88 ; --------------------------------------------------------------------------------------
0b88 ; SUBPROGRAM
0b88 ; --------------------------------------------------------------------------------------
0b88 0ba1 | | .CONST 0x0ba1 ; Address of begin
0b89 0004 | | .CONST 0x0004 ; Address of exception handler
0b8a 0007 | | .CONST 0x0007 ; Number of locals
0b8b INIT_0b88:
0b8b e014 | | Load 0x0,0x14 ; Debug Table 0x26 = .DEBUG 0x0b8b,0x16a8,0x0001,0x0000,0x0057,0x13f5,0x0000,0x05e0
; Debug Table 0x26.0x0 = 0xb8b,0xffff
0b8c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0b8d e006 | | Load 0x0,0x6 ; Debug Table 0x26.0x1 = 0xb8d,0xfffe
0b8e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b8f 02c7 | | Declare_Variable Any
0b90 00d8 | | Load_Top At_Offset_0
0b91 1c00 | | Execute_Immediate Run_Utility,0x0
0b92 e002 | | Load 0x0,0x2 ; Debug Table 0x26.0x2 = 0xb92,0xfffd
0b93 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b94 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b95 02c7 | | Declare_Variable Any
0b96 00d8 | | Load_Top At_Offset_0
0b97 1c00 | | Execute_Immediate Run_Utility,0x0
0b98 e001 | | Load 0x0,0x1 ; Debug Table 0x26.0x3 = 0xb98,0xfffc
0b99 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b9a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x26.0x4 = 0xb9a,0xfffb
0b9b e002 | | Load 0x0,0x2 ; Debug Table 0x26.0x5 = 0xb9b,0xfffa
0b9c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b9d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b9e 02c7 | | Declare_Variable Any
0b9f 00d8 | | Load_Top At_Offset_0
0ba0 1c00 | | Execute_Immediate Run_Utility,0x0
0ba1 BODY_0b88:
0ba1 0007 | | Action Break_Optional ; Debug Table 0x26.0x6 = 0xba1,0x1
0ba2 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x26.0x7 = 0xba2,0x401
0ba3 a5f8 | | Store_Unchecked 0x2,-0x8 ; Debug Table 0x26.0x8 = 0xba3,0x1
0ba4 8223 | # | Call 0x1,0x23 ; Debug Table 0x26.0x9 = 0xba4,0x2
0ba5 c5f7 | | Store 0x2,-0x9
0ba6 e001 | | Load 0x0,0x1 ; Debug Table 0x26.0xa = 0xba6,0x3
0ba7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ba8 e5f9 | | Load 0x2,-0x7
0ba9 e5fa | | Load 0x2,-0x6
0baa e5fb | | Load 0x2,-0x5
0bab e5fc | | Load 0x2,-0x4
0bac e5fd | | Load 0x2,-0x3
0bad e5fe | | Load 0x2,-0x2
0bae e013 | | Load 0x0,0x13
0baf 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0bb0 e5ff | | Load 0x2,-0x1
0bb1 e00d | | Load 0x0,0xd
0bb2 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0bb3 180f | | Execute Package,Field_Execute,Field_Number 0xf
0bb4 00d1 | | Pop_Control Pop_Count_1
0bb5 005b | [ | Store_Top Discrete,At_Offset_3
0bb6 00da | | Load_Top At_Offset_2 ; Debug Table 0x26.0xb = 0xbb6,0x4
0bb7 0007 | | Action Break_Optional
0bb8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0xc = 0xbb8,0x801
0bb9 6803 |h | Jump_Zero 0xbbd
0bba 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0xd = 0xbba,0x802
0bbb e00b | | Load 0x0,0xb
0bbc 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0bbd 00d1 | | Pop_Control Pop_Count_1
0bbe e014 | | Load 0x0,0x14 ; Debug Table 0x26.0xe = 0xbbe,0x5
0bbf 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0bc0 e403 | | Load 0x2,0x3
0bc1 0120 | | Execute Any,Is_Value
0bc2 6803 |h | Jump_Zero 0xbc6
0bc3 e006 | | Load 0x0,0x6
0bc4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bc5 7801 |x | Jump 0xbc7
0bc6 e403 | | Load 0x2,0x3
0bc7 e404 | | Load 0x2,0x4
0bc8 0120 | | Execute Any,Is_Value
0bc9 6804 |h | Jump_Zero 0xbce
0bca e002 | | Load 0x0,0x2
0bcb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bcc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bcd 7801 |x | Jump 0xbcf
0bce e404 | | Load 0x2,0x4
0bcf e5fd | | Load 0x2,-0x3
0bd0 e5fc | | Load 0x2,-0x4
0bd1 e5fe | | Load 0x2,-0x2
0bd2 e013 | | Load 0x0,0x13
0bd3 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0bd4 e5f9 | | Load 0x2,-0x7
0bd5 e002 | | Load 0x0,0x2
0bd6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0bd7 c404 | | Store 0x2,0x4
0bd8 c403 | | Store 0x2,0x3
0bd9 c402 | | Store 0x2,0x2
0bda e402 | | Load 0x2,0x2 ; Debug Table 0x26.0xf = 0xbda,0x6
0bdb 0007 | | Action Break_Optional
0bdc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0x10 = 0xbdc,0xc01
0bdd 6803 |h | Jump_Zero 0xbe1
0bde 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0x11 = 0xbde,0xc02
0bdf e00b | | Load 0x0,0xb
0be0 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0be1 00d1 | | Pop_Control Pop_Count_1
0be2 00db | | Load_Top At_Offset_3 ; Debug Table 0x26.0x12 = 0xbe2,0x7
0be3 e002 | | Load 0x0,0x2
0be4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0be5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0be6 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0be7 0007 | | Action Break_Optional ; Debug Table 0x26.0x13 = 0xbe7,0x8
0be8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x26.0x14 = 0xbe8,0x1001
0be9 021d | | Execute Heap_Access,Is_Null
0bea 6821 |h! | Jump_Zero 0xc0c ; Debug Table 0x26.0x15 = 0xbea,0x8
0beb e5fe | | Load 0x2,-0x2
0bec 0f02 | | Execute_Immediate Equal,0x2
0bed 681e |h | Jump_Zero 0xc0c
0bee e016 | | Load 0x0,0x16 ; Debug Table 0x26.0x16 = 0xbee,0x9
0bef 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bf0 4800 |H | Short_Literal 0x0
0bf1 e002 | | Load 0x0,0x2
0bf2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bf3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0bf4 c407 | | Store 0x2,0x7
0bf5 e016 | | Load 0x0,0x16 ; Debug Table 0x26.0x17 = 0xbf5,0xa
0bf6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bf7 4800 |H | Short_Literal 0x0
0bf8 e404 | | Load 0x2,0x4
0bf9 e002 | | Load 0x0,0x2
0bfa 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bfb 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0bfc 48ab |H | Short_Literal 0xab ; Debug Table 0x26.0x18 = 0xbfc,0xb
0bfd 00eb | | Load_Encached Diana_Cache
0bfe 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
0bff 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0c00 00db | | Load_Top At_Offset_3 ; Debug Table 0x26.0x19 = 0xc00,0xc
0c01 00da | | Load_Top At_Offset_2
0c02 e002 | | Load 0x0,0x2
0c03 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c04 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c05 e016 | | Load 0x0,0x16 ; Debug Table 0x26.0x1a = 0xc05,0xd
0c06 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c07 4800 |H | Short_Literal 0x0
0c08 00da | | Load_Top At_Offset_2
0c09 e002 | | Load 0x0,0x2
0c0a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0c0b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0c0c e5fe | | Load 0x2,-0x2 ; Debug Table 0x26.0x1b = 0xc0c,0xe
0c0d 0f02 | | Execute_Immediate Equal,0x2
0c0e 6816 |h | Jump_Zero 0xc25
0c0f 00d9 | | Load_Top At_Offset_1
0c10 e001 | | Load 0x0,0x1
0c11 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0c12 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0c13 6811 |h | Jump_Zero 0xc25
0c14 e5fd | | Load 0x2,-0x3 ; Debug Table 0x26.0x1c = 0xc14,0xf
0c15 e00a | | Load 0x0,0xa
0c16 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0c17 e23a | : | Load 0x1,0x3a ; Debug Table 0x26.0x1d = 0xc17,0x10
0c18 0092 0ec6 | | Action Push_String_Extended,0xec6 ; "Real_Open"
0c1a 01cc | | Execute Vector,Catenate
0c1b 0092 0ec7 | | Action Push_String_Extended,0xec7 ; "Only source units may be opened for update."
0c1d 4806 |H | Short_Literal 0x6
0c1e e001 | | Load 0x0,0x1
0c1f 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0c20 e00e | | Load 0x0,0xe
0c21 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c22 e00b | | Load 0x0,0xb ; Debug Table 0x26.0x1e = 0xc22,0x11
0c23 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0c24 0257 | W | Execute Discrete,Raise
0c25 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x26.0x1f = 0xc25,0x12
0c26 a5f8 | | Store_Unchecked 0x2,-0x8
0c27 e403 | | Load 0x2,0x3 ; Debug Table 0x26.0x20 = 0xc27,0x13
0c28 c5f7 | | Store 0x2,-0x9
0c29 4800 |H | Short_Literal 0x0 ; Debug Table 0x26.0x21 = 0xc29,0x14
0c2a a5f6 | | Store_Unchecked 0x2,-0xa
0c2b 4507 |E | Exit_Subprogram 0x7
0c2c 0000 0000 | | .BLANK 0000[0x4]
0c30 ; --------------------------------------------------------------------------------------
0c30 ; SUBPROGRAM
0c30 ; --------------------------------------------------------------------------------------
0c30 0c39 | 9 | .CONST 0x0c39 ; Address of begin
0c31 0004 | | .CONST 0x0004 ; Address of exception handler
0c32 0003 | | .CONST 0x0003 ; Number of locals
0c33 INIT_0c30:
0c33 00da | | Load_Top At_Offset_2 ; Debug Table 0x27 = .DEBUG 0x0c33,0x16ee,0x0001,0x0000,0x0057,0x13f5,0x0000,0x0981
; Debug Table 0x27.0x0 = 0xc33,0xffff
0c34 e00d | | Load 0x0,0xd
0c35 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c36 e5fe | | Load 0x2,-0x2 ; Debug Table 0x27.0x1 = 0xc36,0xfffe
0c37 e00d | | Load 0x0,0xd
0c38 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c39 BODY_0c30:
0c39 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x27.0x2 = 0xc39,0x1
0c3a 01db | | Execute Vector,Length
0c3b 681e |h | Jump_Zero 0xc5a
0c3c 00d9 | | Load_Top At_Offset_1
0c3d 00d9 | | Load_Top At_Offset_1
0c3e 01de | | Execute Vector,Not_Equal
0c3f 681a |h | Jump_Zero 0xc5a
0c40 e23a | : | Load 0x1,0x3a ; Debug Table 0x27.0x3 = 0xc40,0x2
0c41 0092 0ec8 | | Action Push_String_Extended,0xec8 ; "Check_Unit_Names"
0c43 01cc | | Execute Vector,Catenate
0c44 4822 |H" | Short_Literal 0x22
0c45 4822 |H" | Short_Literal 0x22
0c46 4822 |H" | Short_Literal 0x22
0c47 0092 0ec9 | | Action Push_String_Extended,0xec9 ; "Object name is \x22"
0c49 e402 | | Load 0x2,0x2
0c4a 01cc | | Execute Vector,Catenate
0c4b 01cb | | Execute Vector,Append
0c4c 0092 0eca | | Action Push_String_Extended,0xeca ; ", unit name is "
0c4e 01cc | | Execute Vector,Catenate
0c4f 01cb | | Execute Vector,Append
0c50 00db | | Load_Top At_Offset_3
0c51 01cc | | Execute Vector,Catenate
0c52 01cb | | Execute Vector,Append
0c53 0092 0ecb | | Action Push_String_Extended,0xecb ; ". Promote the unit to correct the object name."
0c55 01cc | | Execute Vector,Catenate
0c56 e001 | | Load 0x0,0x1
0c57 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0c58 e00e | | Load 0x0,0xe
0c59 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c5a 4503 |E | Exit_Subprogram 0x3
0c5b 0000 0000 | | .BLANK 0000[0x5]
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63 | c | .CONST 0x0c63 ; Address of begin
0c61 0c7c | | | .CONST 0x0c7c ; Address of exception handler
0c62 0001 | | .CONST 0x0001 ; Number of locals
0c63 BODY_0c60:
0c63 INIT_0c60:
0c63 e405 | | Load 0x2,0x5 ; Debug Table 0x28 = .DEBUG 0x0c63,0x16f8,0x0004,0x0000,0x0057,0x13f5,0x0000,0x0469
; Debug Table 0x28.0x0 = 0xc63,0x1
0c64 0120 | | Execute Any,Is_Value
0c65 6803 |h | Jump_Zero 0xc69
0c66 e010 | | Load 0x0,0x10
0c67 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c68 7801 |x | Jump 0xc6a
0c69 e405 | | Load 0x2,0x5
0c6a e010 | | Load 0x0,0x10
0c6b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c6c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c6d e5fd | | Load 0x2,-0x3
0c6e e408 | | Load 0x2,0x8
0c6f e407 | | Load 0x2,0x7
0c70 e409 | | Load 0x2,0x9
0c71 e010 | | Load 0x0,0x10
0c72 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c73 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c74 c406 | | Store 0x2,0x6
0c75 c405 | | Store 0x2,0x5
0c76 e405 | | Load 0x2,0x5 ; Debug Table 0x28.0x1 = 0xc76,0x2
0c77 e008 | | Load 0x0,0x8
0c78 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0c79 e00f | | Load 0x0,0xf
0c7a 180d | | Execute Package,Field_Execute,Field_Number 0xd
0c7b 4501 |E | Exit_Subprogram 0x1
0c7c TRAP_0c60:
0c7c 010e | | Execute Exception,Is_Constraint_Error
0c7d 6803 |h | Jump_Zero 0xc81
0c7e 4800 |H | Short_Literal 0x0 ; Debug Table 0x28.0x2 = 0xc7e,0x3
0c7f a406 | | Store_Unchecked 0x2,0x6
0c80 4501 |E | Exit_Subprogram 0x1
0c81 0100 | | Execute Exception,Raise
0c82 0000 0000 | | .BLANK 0000[0x6]
0c88 0cfd 0004 | | .XXX[0x3]
0c8a 0020 | |
0c8b e001 | | Load 0x0,0x1 ; Debug Table 0x29 = .DEBUG 0x0c8b,0x1700,0x0000,0x0000,0x0057,0x13f5,0x0000,0x001f
; Debug Table 0x29.0x0 = 0xc8b,0xffff
0c8c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0c8d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c8e 00e2 | | Load_Encached Integer_Cache
0c8f 029f 0d03 | | Declare_Subprogram For_Call,INIT_0d00
0c91 4802 |H | Short_Literal 0x2
0c92 032e | . | Declare_Type Record,Defined,Visible
0c93 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x29.0x1 = 0xc93,0xfffe
0c94 00d9 | | Load_Top At_Offset_1
0c95 e002 | | Load 0x0,0x2
0c96 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c97 029f 0d1b | | Declare_Subprogram For_Call,INIT_0d18
0c99 4800 |H | Short_Literal 0x0
0c9a 4801 |H | Short_Literal 0x1
0c9b 4801 |H | Short_Literal 0x1
0c9c 4800 |H | Short_Literal 0x0
0c9d 4801 |H | Short_Literal 0x1
0c9e 4801 |H | Short_Literal 0x1
0c9f 031e | | Declare_Type Variant_Record,Defined,Visible
0ca0 02a0 | | Declare_Subprogram Null_Subprogram ; Debug Table 0x29.0x2 = 0xca0,0xfffd
0ca1 4800 |H | Short_Literal 0x0
0ca2 032e | . | Declare_Type Record,Defined,Visible
0ca3 029a 0d4b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0d48 ; Debug Table 0x29.0x3 = 0xca3,0xfffc
0ca5 61ca |a | Indirect_Literal Discrete,0xe70,{0x00000000, 0x005713f5} ; Debug Table 0x29.0x4 = 0xca5,0xfffb
0ca6 485b |H[ | Short_Literal 0x5b
0ca7 4865 |He | Short_Literal 0x65
0ca8 00e9 | | Load_Encached String_Cache
0ca9 e20e | | Load 0x1,0xe
0caa e20f | | Load 0x1,0xf
0cab e003 | | Load 0x0,0x3
0cac 190d | | Execute Package,Field_Reference,Field_Number 0xd
0cad 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0cae e004 | | Load 0x0,0x4
0caf 0386 | | Declare_Variable Package,Visible
0cb0 00d8 | | Load_Top At_Offset_0
0cb1 020f | | Execute Module,Activate
0cb2 e001 | | Load 0x0,0x1 ; Debug Table 0x29.0x5 = 0xcb2,0xfffa
0cb3 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0cb4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cb5 00d9 | | Load_Top At_Offset_1
0cb6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0cb7 029f 0d5b | [| Declare_Subprogram For_Call,INIT_0d58
0cb9 4802 |H | Short_Literal 0x2
0cba 032e | . | Declare_Type Record,Defined,Visible
0cbb 61b4 |a | Indirect_Literal Discrete,0xe70,{0x00000000, 0x005713f5} ; Debug Table 0x29.0x6 = 0xcbb,0xfff9
0cbc 4888 |H | Short_Literal 0x88
0cbd 4817 |H | Short_Literal 0x17
0cbe 00e9 | | Load_Encached String_Cache
0cbf e212 | | Load 0x1,0x12
0cc0 e20f | | Load 0x1,0xf
0cc1 e003 | | Load 0x0,0x3
0cc2 190d | | Execute Package,Field_Reference,Field_Number 0xd
0cc3 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0cc4 e004 | | Load 0x0,0x4
0cc5 0386 | | Declare_Variable Package,Visible
0cc6 00d8 | | Load_Top At_Offset_0
0cc7 020f | | Execute Module,Activate
0cc8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x29.0x7 = 0xcc8,0xfff8
0cc9 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0cca 02a0 | | Declare_Subprogram Null_Subprogram
0ccb 03ae | | Declare_Type Heap_Access,Defined,Visible
0ccc 0007 | | Action Break_Optional ; Debug Table 0x29.0x8 = 0xccc,0xfff7
0ccd 029a 0d73 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0d70 ; Debug Table 0x29.0x9 = 0xccd,0xfff6
0ccf 029a 0d83 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0d80 ; Debug Table 0x29.0xa = 0xccf,0xfff5
0cd1 029a 0d8b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0d88 ; Debug Table 0x29.0xb = 0xcd1,0xfff4
0cd3 00bf | | Action Accept_Activation
0cd4 0007 | | Action Break_Optional ; Debug Table 0x2a = .DEBUG 0x0cd4,0x171a,0x0000,0x0000,0x0057,0x13f5,0x0000,0x143b
; Debug Table 0x2a.0x0 = 0xcd4,0xffff
0cd5 619a |a | Indirect_Literal Discrete,0xe70,{0x00000000, 0x005713f5} ; Debug Table 0x2a.0x1 = 0xcd5,0xfffe
0cd6 6195 |a | Indirect_Literal Discrete,0xe6c,{0x00000000, 0x00001440}
0cd7 e213 | | Load 0x1,0x13
0cd8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0cd9 e214 | | Load 0x1,0x14
0cda e005 | | Load 0x0,0x5
0cdb 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0cdc 0387 | | Declare_Variable Package
0cdd 00d8 | | Load_Top At_Offset_0
0cde 020f | | Execute Module,Activate
0cdf e214 | | Load 0x1,0x14 ; Debug Table 0x2a.0x2 = 0xcdf,0xfffd
0ce0 0007 | | Action Break_Optional
0ce1 e005 | | Load 0x0,0x5 ; Debug Table 0x2a.0x3 = 0xce1,0xfffc
0ce2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0ce3 0322 | " | Declare_Variable Record
0ce4 00d8 | | Load_Top At_Offset_0
0ce5 1c00 | | Execute_Immediate Run_Utility,0x0
0ce6 0092 0ecc | | Action Push_String_Extended,0xecc ; "MACHINE.ATTRIBUTE_SPACE_MAPS_STATE"
; Debug Table 0x2a.0x4 = 0xce6,0xfffb
0ce8 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x2a.0x5 = 0xce8,0xfffa
0ce9 00c7 | | Action Elaborate_Subprogram
0cea 029d 0d9b | | Declare_Subprogram For_Outer_Call,INIT_0d98 ; Debug Table 0x2a.0x6 = 0xcea,0xfff9
0cec 029d 0dc3 | | Declare_Subprogram For_Outer_Call,INIT_0dc0 ; Debug Table 0x2a.0x7 = 0xcec,0xfff8
0cee 029d 0e33 | 3| Declare_Subprogram For_Outer_Call,INIT_0e30 ; Debug Table 0x2a.0x8 = 0xcee,0xfff7
0cf0 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x2a.0x9 = 0xcf0,0xfff6
0cf1 00c7 | | Action Elaborate_Subprogram
0cf2 029d 0e4b | K| Declare_Subprogram For_Outer_Call,INIT_0e48 ; Debug Table 0x2a.0xa = 0xcf2,0xfff5
0cf4 4800 |H | Short_Literal 0x0 ; Debug Table 0x2a.0xb = 0xcf4,0xfff4
0cf5 6172 |ar | Indirect_Literal Discrete,0xe68,{0x0049040e, 0x0000e7b0}
0cf6 02a0 | | Declare_Subprogram Null_Subprogram
0cf7 037d | } | Declare_Type Task,Defined
0cf8 036f | o | Declare_Variable Task
0cf9 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x2a.0xc = 0xcf9,0xfff3
0cfa 00c7 | | Action Elaborate_Subprogram
0cfb 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x2a.0xd = 0xcfb,0xfff2
0cfc 00c7 | | Action Elaborate_Subprogram
0cfd 00be | | Action Activate_Tasks ; Debug Table 0x2a.0xe = 0xcfd,0xfff1
0cfe 00bc | | Action Signal_Activated
0cff 00bb | | Action Signal_Completion
0d00 ; --------------------------------------------------------------------------------------
0d00 ; SUBPROGRAM
0d00 ; --------------------------------------------------------------------------------------
0d00 0d03 | | .CONST 0x0d03 ; Address of begin
0d01 0004 | | .CONST 0x0004 ; Address of exception handler
0d02 0001 | | .CONST 0x0001 ; Number of locals
0d03 BODY_0d00:
0d03 INIT_0d00:
0d03 4608 |F | Jump_Case 0x8 ; Debug Table 0x2b = .DEBUG 0x0d03,0x173a,0x0005,0x0000,0x0057,0x13f5,0x0000,0x0020
0d04 7808 |x | Jump 0xd0d ; case 0x0
0d05 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0d06 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
0d07 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0d08 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0d09 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
0d0a 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
0d0b 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
0d0c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
0d0d 00da | | Load_Top At_Offset_2
0d0e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0d0f 0125 | % | Execute Any,Set_Constraint
0d10 00da | | Load_Top At_Offset_2
0d11 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0d12 1c00 | | Execute_Immediate Run_Utility,0x0
0d13 4800 |H | Short_Literal 0x0
0d14 00db | | Load_Top At_Offset_3
0d15 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0d16 4302 |C | Exit_Subprogram From_Utility,0x2
0d17 0000 | | .XXX[0x1]
0d18 ; --------------------------------------------------------------------------------------
0d18 ; SUBPROGRAM
0d18 ; --------------------------------------------------------------------------------------
0d18 0d1b | | .CONST 0x0d1b ; Address of begin
0d19 0004 | | .CONST 0x0004 ; Address of exception handler
0d1a 0001 | | .CONST 0x0001 ; Number of locals
0d1b BODY_0d18:
0d1b INIT_0d18:
0d1b 4608 |F | Jump_Case 0x8 ; Debug Table 0x2c = .DEBUG 0x0d1b,0x173c,0x0005,0x0000,0x0057,0x13f5,0x0000,0x0033
0d1c 7808 |x | Jump 0xd25 ; case 0x0
0d1d 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0d1e 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
0d1f 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0d20 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0d21 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
0d22 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
0d23 7808 |x | Jump 0xd2c ; case 0x7
0d24 7811 |x | Jump 0xd36 ; case 0x8
0d25 00da | | Load_Top At_Offset_2
0d26 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0d27 1c00 | | Execute_Immediate Run_Utility,0x0
0d28 00da | | Load_Top At_Offset_2
0d29 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0d2a 1c00 | | Execute_Immediate Run_Utility,0x0
0d2b 4302 |C | Exit_Subprogram From_Utility,0x2
0d2c 00db | | Load_Top At_Offset_3
0d2d 4801 |H | Short_Literal 0x1
0d2e e5fe | | Load 0x2,-0x2
0d2f e002 | | Load 0x0,0x2
0d30 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d31 035b | [ | Declare_Type Array,Constrained
0d32 4801 |H | Short_Literal 0x1
0d33 e5ff | | Load 0x2,-0x1
0d34 031b | | Declare_Type Variant_Record,Constrained
0d35 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0d36 00db | | Load_Top At_Offset_3
0d37 00db | | Load_Top At_Offset_3
0d38 02fc | | Declare_Variable Variant_Record,With_Constraint
0d39 4801 |H | Short_Literal 0x1
0d3a e5fe | | Load 0x2,-0x2
0d3b e002 | | Load 0x0,0x2
0d3c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d3d 0334 | 4 | Declare_Variable Array,With_Constraint
0d3e 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0d3f 016a | j | Execute Variant_Record,Indirects_Appended
0d40 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0d41 0000 0000 | | .BLANK 0000[0x7]
0d48 ; --------------------------------------------------------------------------------------
0d48 ; SUBPROGRAM
0d48 ; --------------------------------------------------------------------------------------
0d48 0d4b | K | .CONST 0x0d4b ; Address of begin
0d49 0004 | | .CONST 0x0004 ; Address of exception handler
0d4a 0001 | | .CONST 0x0001 ; Number of locals
0d4b BODY_0d48:
0d4b INIT_0d48:
0d4b e21a | | Load 0x1,0x1a ; Debug Table 0x2d = .DEBUG 0x0d4b,0x173e,0x0002,0x0000,0x0057,0x13f5,0x0000,0x0050
; Debug Table 0x2d.0x0 = 0xd4b,0x1
0d4c e005 | | Load 0x0,0x5
0d4d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0d4e 6803 |h | Jump_Zero 0xd52
0d4f e21a | | Load 0x1,0x1a ; Debug Table 0x2d.0x1 = 0xd4f,0x2
0d50 0320 | | Declare_Variable Record,Duplicate
0d51 4401 |D | Exit_Subprogram With_Result,0x1
0d52 4831 |H1 | Short_Literal 0x31
0d53 0257 | W | Execute Discrete,Raise
0d54 0000 0000 | | .BLANK 0000[0x4]
0d58 ; --------------------------------------------------------------------------------------
0d58 ; SUBPROGRAM
0d58 ; --------------------------------------------------------------------------------------
0d58 0d5b | [ | .CONST 0x0d5b ; Address of begin
0d59 0004 | | .CONST 0x0004 ; Address of exception handler
0d5a 0001 | | .CONST 0x0001 ; Number of locals
0d5b BODY_0d58:
0d5b INIT_0d58:
0d5b 4608 |F | Jump_Case 0x8 ; Debug Table 0x2e = .DEBUG 0x0d5b,0x1744,0x0005,0x0000,0x0057,0x13f5,0x0000,0x0074
0d5c 7808 |x | Jump 0xd65 ; case 0x0
0d5d 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0d5e 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
0d5f 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0d60 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0d61 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
0d62 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
0d63 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
0d64 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
0d65 00da | | Load_Top At_Offset_2
0d66 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0d67 0125 | % | Execute Any,Set_Constraint
0d68 00da | | Load_Top At_Offset_2
0d69 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0d6a 1c00 | | Execute_Immediate Run_Utility,0x0
0d6b 00da | | Load_Top At_Offset_2
0d6c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0d6d 1c00 | | Execute_Immediate Run_Utility,0x0
0d6e 4302 |C | Exit_Subprogram From_Utility,0x2
0d6f 0000 | | .XXX[0x1]
0d70 ; --------------------------------------------------------------------------------------
0d70 ; SUBPROGRAM
0d70 ; --------------------------------------------------------------------------------------
0d70 0d73 | s | .CONST 0x0d73 ; Address of begin
0d71 0004 | | .CONST 0x0004 ; Address of exception handler
0d72 0001 | | .CONST 0x0001 ; Number of locals
0d73 BODY_0d70:
0d73 INIT_0d70:
0d73 e219 | | Load 0x1,0x19 ; Debug Table 0x2f = .DEBUG 0x0d73,0x1746,0x0002,0x0000,0x0057,0x13f5,0x0000,0x00ad
; Debug Table 0x2f.0x0 = 0xd73,0x1
0d74 7002 |p | Jump_Nonzero 0xd77
0d75 821e | | Call 0x1,0x1e ; Debug Table 0x2f.0x1 = 0xd75,0x2
0d76 a219 | | Store_Unchecked 0x1,0x19
0d77 e219 | | Load 0x1,0x19 ; Debug Table 0x2f.0x2 = 0xd77,0x3
0d78 00ca | | Action Exit_Nullary_Function
0d79 0000 0000 | | .BLANK 0000[0x7]
0d80 ; --------------------------------------------------------------------------------------
0d80 ; SUBPROGRAM
0d80 ; --------------------------------------------------------------------------------------
0d80 0d83 | | .CONST 0x0d83 ; Address of begin
0d81 0004 | | .CONST 0x0004 ; Address of exception handler
0d82 0001 | | .CONST 0x0001 ; Number of locals
0d83 BODY_0d80:
0d83 INIT_0d80:
0d83 4800 |H | Short_Literal 0x0 ; Debug Table 0x30 = .DEBUG 0x0d83,0x174e,0x0001,0x0000,0x0057,0x13f5,0x0000,0x00b2
; Debug Table 0x30.0x0 = 0xd83,0x1
0d84 e220 | | Load 0x1,0x20
0d85 170d | | Execute Task,Entry_Call,Field_Number 0xd
0d86 4501 |E | Exit_Subprogram 0x1
0d87 0000 | | .XXX[0x1]
0d88 ; --------------------------------------------------------------------------------------
0d88 ; SUBPROGRAM
0d88 ; --------------------------------------------------------------------------------------
0d88 0d8b | | .CONST 0x0d8b ; Address of begin
0d89 0004 | | .CONST 0x0004 ; Address of exception handler
0d8a 0001 | | .CONST 0x0001 ; Number of locals
0d8b BODY_0d88:
0d8b INIT_0d88:
0d8b 00da | | Load_Top At_Offset_2 ; Debug Table 0x31 = .DEBUG 0x0d8b,0x1752,0x0001,0x0000,0x0057,0x13f5,0x0000,0x00b6
; Debug Table 0x31.0x0 = 0xd8b,0x1
0d8c 6801 |h | Jump_Zero 0xd8e
0d8d 821f | | Call 0x1,0x1f ; Debug Table 0x31.0x1 = 0xd8d,0x2
0d8e 4800 |H | Short_Literal 0x0 ; Debug Table 0x31.0x2 = 0xd8e,0x3
0d8f e220 | | Load 0x1,0x20
0d90 170e | | Execute Task,Entry_Call,Field_Number 0xe
0d91 4502 |E | Exit_Subprogram 0x2
0d92 0000 0000 | | .BLANK 0000[0x6]
0d98 ; --------------------------------------------------------------------------------------
0d98 ; SUBPROGRAM
0d98 ; --------------------------------------------------------------------------------------
0d98 0dab | | .CONST 0x0dab ; Address of begin
0d99 0004 | | .CONST 0x0004 ; Address of exception handler
0d9a 0004 | | .CONST 0x0004 ; Number of locals
0d9b INIT_0d98:
0d9b 60d4 |` | Indirect_Literal Discrete,0xe70,{0x00000000, 0x005713f5} ; Debug Table 0x32 = .DEBUG 0x0d9b,0x175a,0x0001,0x0000,0x0057,0x13f5,0x0000,0x1477
; Debug Table 0x32.0x0 = 0xd9b,0xffff
0d9c 60c7 |` | Indirect_Literal Discrete,0xe64,{0x00000000, 0x0000147a}
0d9d e213 | | Load 0x1,0x13
0d9e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0d9f e005 | | Load 0x0,0x5
0da0 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0da1 0387 | | Declare_Variable Package
0da2 00d8 | | Load_Top At_Offset_0
0da3 020f | | Execute Module,Activate
0da4 e213 | | Load 0x1,0x13 ; Debug Table 0x32.0x1 = 0xda4,0xfffe
0da5 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0da6 0322 | " | Declare_Variable Record
0da7 00d8 | | Load_Top At_Offset_0
0da8 1c00 | | Execute_Immediate Run_Utility,0x0
0da9 e20f | | Load 0x1,0xf ; Debug Table 0x32.0x2 = 0xda9,0xfffd
0daa 0322 | " | Declare_Variable Record
0dab BODY_0d98:
0dab 8216 | | Call 0x1,0x16 ; Debug Table 0x32.0x3 = 0xdab,0x1
0dac 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x32.0x4 = 0xdac,0x2
0dad e005 | | Load 0x0,0x5
0dae 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0daf e21a | | Load 0x1,0x1a
0db0 e402 | | Load 0x2,0x2
0db1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0db2 e005 | | Load 0x0,0x5 ; Debug Table 0x32.0x5 = 0xdb2,0x3
0db3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0db4 e21a | | Load 0x1,0x1a
0db5 e218 | | Load 0x1,0x18
0db6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0db7 0219 | | Execute Heap_Access,All_Read
0db8 00d8 | | Load_Top At_Offset_0
0db9 00da | | Load_Top At_Offset_2
0dba e213 | | Load 0x1,0x13
0dbb 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0dbc 00d2 | | Pop_Control Pop_Count_2
0dbd 4801 |H | Short_Literal 0x1 ; Debug Table 0x32.0x6 = 0xdbd,0x4
0dbe 8217 | | Call 0x1,0x17
0dbf 4501 |E | Exit_Subprogram 0x1
0dc0 ; --------------------------------------------------------------------------------------
0dc0 ; SUBPROGRAM
0dc0 ; --------------------------------------------------------------------------------------
0dc0 0dd7 | | .CONST 0x0dd7 ; Address of begin
0dc1 0004 | | .CONST 0x0004 ; Address of exception handler
0dc2 0007 | | .CONST 0x0007 ; Number of locals
0dc3 INIT_0dc0:
0dc3 e006 | | Load 0x0,0x6 ; Debug Table 0x33 = .DEBUG 0x0dc3,0x176a,0x0001,0x0000,0x0057,0x13f5,0x0000,0x14b8
; Debug Table 0x33.0x0 = 0xdc3,0xffff
0dc4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dc5 02c7 | | Declare_Variable Any
0dc6 00d8 | | Load_Top At_Offset_0
0dc7 1c00 | | Execute_Immediate Run_Utility,0x0
0dc8 e007 | | Load 0x0,0x7 ; Debug Table 0x33.0x1 = 0xdc8,0xfffe
0dc9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0dca 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0dcb 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x33.0x2 = 0xdcb,0xfffd
0dcc e007 | | Load 0x0,0x7 ; Debug Table 0x33.0x3 = 0xdcc,0xfffc
0dcd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dce 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x33.0x4 = 0xdce,0xfffb
0dcf e008 | | Load 0x0,0x8
0dd0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0dd1 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0dd2 e007 | | Load 0x0,0x7 ; Debug Table 0x33.0x5 = 0xdd2,0xfffa
0dd3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0dd4 02ff | | Declare_Variable Variant_Record
0dd5 00d8 | | Load_Top At_Offset_0
0dd6 1c00 | | Execute_Immediate Run_Utility,0x0
0dd7 BODY_0dc0:
0dd7 e005 | | Load 0x0,0x5 ; Debug Table 0x33.0x6 = 0xdd7,0x1
0dd8 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0dd9 e21a | | Load 0x1,0x1a
0dda 4800 |H | Short_Literal 0x0
0ddb 6084 |` | Indirect_Literal Discrete,0xe60,{0x00000000, 0x00004000}
0ddc e009 | | Load 0x0,0x9
0ddd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0dde e406 | | Load 0x2,0x6
0ddf 4800 |H | Short_Literal 0x0
0de0 e21b | | Load 0x1,0x1b
0de1 4802 |H | Short_Literal 0x2
0de2 e005 | | Load 0x0,0x5
0de3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0de4 00d1 | | Pop_Control Pop_Count_1
0de5 005b | [ | Store_Top Discrete,At_Offset_3
0de6 00da | | Load_Top At_Offset_2 ; Debug Table 0x33.0x7 = 0xde6,0x2
0de7 0f09 | | Execute_Immediate Equal,0x9
0de8 683d |h= | Jump_Zero 0xe26
0de9 e007 | | Load 0x0,0x7 ; Debug Table 0x33.0x8 = 0xde9,0x3
0dea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0deb 00f1 | | Load_Encached Diana_Temp_Seq
0dec e007 | | Load 0x0,0x7
0ded 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0dee 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0def e402 | | Load 0x2,0x2
0df0 0120 | | Execute Any,Is_Value
0df1 6803 |h | Jump_Zero 0xdf5
0df2 e006 | | Load 0x0,0x6
0df3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0df4 7801 |x | Jump 0xdf6
0df5 e402 | | Load 0x2,0x2
0df6 e407 | | Load 0x2,0x7
0df7 6068 |`h | Indirect_Literal Discrete,0xe60,{0x00000000, 0x00004000}
0df8 e009 | | Load 0x0,0x9
0df9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0dfa 4800 |H | Short_Literal 0x0
0dfb e007 | | Load 0x0,0x7
0dfc 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0dfd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dfe e007 | | Load 0x0,0x7
0dff 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e00 605b |`[ | Indirect_Literal Discrete,0xe5c,{0x00000000, 0x7fffffff}
0e01 4ffc |O | Short_Literal 0x7fc
0e02 4ffd |O | Short_Literal 0x7fd
0e03 e406 | | Load 0x2,0x6
0e04 e007 | | Load 0x0,0x7
0e05 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0e06 e005 | | Load 0x0,0x5
0e07 180f | | Execute Package,Field_Execute,Field_Number 0xf
0e08 e21b | | Load 0x1,0x1b
0e09 e007 | | Load 0x0,0x7
0e0a 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0e0b 180f | | Execute Package,Field_Execute,Field_Number 0xf
0e0c 00d1 | | Pop_Control Pop_Count_1
0e0d c402 | | Store 0x2,0x2
0e0e c403 | | Store 0x2,0x3
0e0f c404 | | Store 0x2,0x4
0e10 005b | [ | Store_Top Discrete,At_Offset_3
0e11 00da | | Load_Top At_Offset_2 ; Debug Table 0x33.0x9 = 0xe11,0x4
0e12 0007 | | Action Break_Optional
0e13 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x33.0xa = 0xe13,0x401
0e14 6803 |h | Jump_Zero 0xe18
0e15 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x33.0xb = 0xe15,0x402
0e16 e00a | | Load 0x0,0xa
0e17 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0e18 00d1 | | Pop_Control Pop_Count_1
0e19 e005 | | Load 0x0,0x5 ; Debug Table 0x33.0xc = 0xe19,0x5
0e1a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0e1b 00d9 | | Load_Top At_Offset_1
0e1c e21a | | Load 0x1,0x1a
0e1d 4800 |H | Short_Literal 0x0
0e1e 6041 |`A | Indirect_Literal Discrete,0xe60,{0x00000000, 0x00004000}
0e1f e009 | | Load 0x0,0x9
0e20 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e21 4802 |H | Short_Literal 0x2
0e22 e005 | | Load 0x0,0x5
0e23 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e24 00d2 | | Pop_Control Pop_Count_2
0e25 005b | [ | Store_Top Discrete,At_Offset_3
0e26 00da | | Load_Top At_Offset_2 ; Debug Table 0x33.0xd = 0xe26,0x6
0e27 0007 | | Action Break_Optional
0e28 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x33.0xe = 0xe28,0x801
0e29 6803 |h | Jump_Zero 0xe2d
0e2a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x33.0xf = 0xe2a,0x802
0e2b e00a | | Load 0x0,0xa
0e2c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0e2d 4501 |E | Exit_Subprogram 0x1
0e2e 0000 0000 | | .XXX[0x2]
0e30 ; --------------------------------------------------------------------------------------
0e30 ; SUBPROGRAM
0e30 ; --------------------------------------------------------------------------------------
0e30 0e33 | 3 | .CONST 0x0e33 ; Address of begin
0e31 0004 | | .CONST 0x0004 ; Address of exception handler
0e32 0001 | | .CONST 0x0001 ; Number of locals
0e33 BODY_0e30:
0e33 INIT_0e30:
0e33 821d | | Call 0x1,0x1d ; Debug Table 0x34 = .DEBUG 0x0e33,0x178c,0x0002,0x0000,0x0057,0x13f5,0x0000,0x1557
; Debug Table 0x34.0x0 = 0xe33,0x1
0e34 e21a | | Load 0x1,0x1a ; Debug Table 0x34.0x1 = 0xe34,0x2
0e35 e005 | | Load 0x0,0x5
0e36 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0e37 e005 | | Load 0x0,0x5
0e38 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0e39 6801 |h | Jump_Zero 0xe3b
0e3a 821c | | Call 0x1,0x1c ; Debug Table 0x34.0x2 = 0xe3a,0x3
0e3b e005 | | Load 0x0,0x5 ; Debug Table 0x34.0x3 = 0xe3b,0x4
0e3c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e3d e21a | | Load 0x1,0x1a
0e3e e218 | | Load 0x1,0x18
0e3f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0e40 00ca | | Action Exit_Nullary_Function
0e41 0000 0000 | | .BLANK 0000[0x7]
0e48 ; --------------------------------------------------------------------------------------
0e48 ; SUBPROGRAM
0e48 ; --------------------------------------------------------------------------------------
0e48 0e4d | M | .CONST 0x0e4d ; Address of begin
0e49 0004 | | .CONST 0x0004 ; Address of exception handler
0e4a 0002 | | .CONST 0x0002 ; Number of locals
0e4b INIT_0e48:
0e4b e007 | | Load 0x0,0x7 ; Debug Table 0x35 = .DEBUG 0x0e4b,0x1796,0x0001,0x0000,0x0057,0x13f5,0x0000,0x1594
; Debug Table 0x35.0x0 = 0xe4b,0xffff
0e4c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e4d BODY_0e48:
0e4d e005 | | Load 0x0,0x5 ; Debug Table 0x35.0x1 = 0xe4d,0x1
0e4e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0e4f e21a | | Load 0x1,0x1a
0e50 4801 |H | Short_Literal 0x1
0e51 e005 | | Load 0x0,0x5
0e52 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0e53 00d1 | | Pop_Control Pop_Count_1
0e54 0059 | Y | Store_Top Discrete,At_Offset_1
0e55 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x35.0x2 = 0xe55,0x2
0e56 6802 |h | Jump_Zero 0xe59
0e57 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x35.0x3 = 0xe57,0x3
0e58 0257 | W | Execute Discrete,Raise
0e59 4501 |E | Exit_Subprogram 0x1
0e5a 0000 0000 | | .XXX[0x2]
0e5c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0e60 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0e64 0000 0000 | | .LITERAL {0x00000000, 0x0000147a}
0e68 0049 040e | I | .LITERAL {0x0049040e, 0x0000e7b0}
0e6c 0000 0000 | | .LITERAL {0x00000000, 0x00001440}
0e70 0000 0000 | | .LITERAL {0x00000000, 0x005713f5}
0e74 0000 0000 | | .BLANK 0000[0x4]
0e78 0e8b 0004 | | .XXX[0x3]
0e7a 0010 | |
0e7b 4800 |H | Short_Literal 0x0 ; Debug Table 0x36 = .DEBUG 0x0e7b,0x17a0,0x0000,0x0000,0x0057,0x13f5,0x0000,0x15b5
0e7c 02cb | | Declare_Variable Entry
0e7d 4800 |H | Short_Literal 0x0
0e7e 02cb | | Declare_Variable Entry
0e7f 00bf | | Action Accept_Activation
0e80 480e |H | Short_Literal 0xe ; Debug Table 0x37 = .DEBUG 0x0e80,0x17a2,0x0000,0x0000,0x0057,0x13f5,0x0000,0x15e6
0e81 0299 0e9b | | Declare_Subprogram For_Accept,INIT_0e98
0e83 480d 49d4 |H I | Declare_Variable Select 0x000, 0x001,
0e85 4800 4800 |H H | [0x000]: 0x000 = 0x0000,
0e87 4800 4801 |H H | [0x00d]: 0x1d4 = 0x0ea0
0e89 02cf | |
0e8a 00bc | | Action Signal_Activated
0e8b 00cf | | Action Mark_Auxiliary
0e8c 0007 | | Action Break_Optional ; Debug Table 0x37.0x0 = 0xe8c,0x1
0e8d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x37.0x1 = 0xe8d,0x2
0e8e 013f | ? | Execute Select,Rendezvous
0e8f 4601 |F | Jump_Case 0x1
0e90 7800 |x | Jump 0xe91 ; case 0x0
0e91 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; case 0x1
; Debug Table 0x37.0x2 = 0xe91,0x4
0e92 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0e93 0137 | 7 | Execute Entry,Rendezvous
0e94 00c9 | | Action Pop_Auxiliary_Loop
0e95 7ff7 | | Jump 0xe8d
0e96 0000 0000 | | .XXX[0x2]
0e98 ; --------------------------------------------------------------------------------------
0e98 ; SUBPROGRAM
0e98 ; --------------------------------------------------------------------------------------
0e98 0e9b | | .CONST 0x0e9b ; Address of begin
0e99 0004 | | .CONST 0x0004 ; Address of exception handler
0e9a 0001 | | .CONST 0x0001 ; Number of locals
0e9b BODY_0e98:
0e9b INIT_0e98:
0e9b 4100 |A | End_Rendezvous 0x0 ; Debug Table 0x38 = .DEBUG 0x0e9b,0x17aa,0x0003,0x0000,0x0057,0x13f5,0x0000,0x15ef
0e9c 0000 0000 | | .BLANK 0000[0x4]
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; SUBPROGRAM
0ea0 ; See instruction 0x02cf at 0xe83, index=0xd
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0ea3 | | .CONST 0x0ea3 ; Address of begin
0ea1 0004 | | .CONST 0x0004 ; Address of exception handler
0ea2 0001 | | .CONST 0x0001 ; Number of locals
0ea3 BODY_0ea0:
0ea3 INIT_0ea0:
0ea3 4100 |A | End_Rendezvous 0x0 ; Debug Table 0x39 = .DEBUG 0x0ea3,0x17ac,0x0003,0x0000,0x0057,0x13f5,0x0000,0x15eb
0ea4 ; --------------------------------------------------------------------------------------
0ea4 ; STRING TABLE
0ea4 ; --------------------------------------------------------------------------------------
0ea4 0054 | T | .STRTAB 0x0054->0x0ece ; "NONE"
0ea5 0056 | V | .STRTAB 0x0056->0x0ed0 ; "READ"
0ea6 0058 | X | .STRTAB 0x0058->0x0ed2 ; "UPDATE"
0ea7 005c | \ | .STRTAB 0x005c->0x0ed5 ; "Directory.Ada."
0ea8 0068 | h | .STRTAB 0x0068->0x0edc ; "Set_Root"
; "Set_Root"
; "Set_Root"
; "Set_Root"
0ea9 006e | n | .STRTAB 0x006e->0x0ee0 ; "Null pointers cannot be roots."
0eaa 008a | | .STRTAB 0x008a->0x0eef ; "Only source units may have their roots changed."
0eab 00b7 | | .STRTAB 0x00b7->0x0f06 ; "The unit must be open for update to set its root."
0eac 00e6 | | .STRTAB 0x00e6->0x0f1f ; "Get_Root"
0ead 00ec | | .STRTAB 0x00ec->0x0f23 ; "Get_Version"
0eae 00f5 | | .STRTAB 0x00f5->0x0f28 ; "Get_Unit"
0eaf 00fb | | .STRTAB 0x00fb->0x0f2c ; "Get_Parent"
0eb0 0103 | | .STRTAB 0x0103->0x0f31 ; "Get_Phase"
0eb1 010a | | .STRTAB 0x010a->0x0f36 ; "Set_Phase"
0eb2 0111 | | .STRTAB 0x0111->0x0f3a ; "Convert"
0eb3 0116 | | .STRTAB 0x0116->0x0f3e ; "Open (1)"
0eb4 011c | | .STRTAB 0x011c->0x0f42 ; "Open (2)"
0eb5 0122 | " | .STRTAB 0x0122->0x0f46 ; "Open (3)"
0eb6 0128 | ( | .STRTAB 0x0128->0x0f4a ; "Save"
0eb7 012a | * | .STRTAB 0x012a->0x0f4c ; "Close"
0eb8 012d | - | .STRTAB 0x012d->0x0f4e ; "Open_Image"
; "Open_Image"
; "Open_Image"
; "Open_Image"
0eb9 0135 | 5 | .STRTAB 0x0135->0x0f53 ; "Libraries do not have images."
; "Libraries do not have images."
; "Libraries do not have images."
; "Libraries do not have images."
0eba 0150 | P | .STRTAB 0x0150->0x0f62 ; "No image exists. Open again for Update to create one."
; "No image exists. Open again for Update to create one."
0ebb 0184 | | .STRTAB 0x0184->0x0f7d ; "Created an image for "
; "Created an image for "
0ebc 0197 | | .STRTAB 0x0197->0x0f87 ; "Save_Image"
0ebd 019f | | .STRTAB 0x019f->0x0f8c ; "Close_Image"
; "Close_Image"
0ebe 01a8 | | .STRTAB 0x01a8->0x0f92 ; "Closing an image without committing is not supported."
0ebf 01db | | .STRTAB 0x01db->0x0fac ; "Reformat_Image"
; "Reformat_Image"
0ec0 01e7 | | .STRTAB 0x01e7->0x0fb3 ; "Set_Diana_Heap"
; "Set_Diana_Heap"
0ec1 01f3 | | .STRTAB 0x01f3->0x0fba ; "Can't find attribute space "
0ec2 020c | | .STRTAB 0x020c->0x0fc8 ; "Get_Diana_Heap"
; "Get_Diana_Heap"
0ec3 0218 | | .STRTAB 0x0218->0x0fcf ; "Can't get both job and task heaps at once."
0ec4 0240 | @ | .STRTAB 0x0240->0x0fe4 ; "Reopen_Image"
; "Reopen_Image"
; "Reopen_Image"
; "Reopen_Image"
0ec5 024a | J | .STRTAB 0x024a->0x0fea ; "Get_Image"
; "Get_Image"
0ec6 0251 | Q | .STRTAB 0x0251->0x0fee ; "Real_Open"
0ec7 0258 | X | .STRTAB 0x0258->0x0ff3 ; "Only source units may be opened for update."
0ec8 0281 | | .STRTAB 0x0281->0x1008 ; "Check_Unit_Names"
0ec9 028f | | .STRTAB 0x028f->0x1010 ; "Object name is \x22"
0eca 029d | | .STRTAB 0x029d->0x1018 ; ", unit name is "
0ecb 02aa | | .STRTAB 0x02aa->0x1020 ; ". Promote the unit to correct the object name."
0ecc 02d7 | | .STRTAB 0x02d7->0x1037 ; "MACHINE.ATTRIBUTE_SPACE_MAPS_STATE"
0ecd 02f7 | | .STREND 0x02f7->0x1048
0ece 4e4f 4e45 |NONE| .STRTAB_STRINGS
1049 0000 0000 | | .BLANK 0000[0x7]
1050 ; --------------------------------------------------------------------------------------
1050 ; Debug Table
1050 ; --------------------------------------------------------------------------------------
1050 0003 003a | :| .CONST 0x0003,0x003a
1052 000b 1222 | "| .DEBUG 0x000b,0x1222,0x0000,0x0000,0x0056,0xd7e5,0x0000,0x071c
105a 007e 1282 | ~ | .DEBUG 0x007e,0x1282,0x0000,0x0000,0x0057,0x13f5,0x0000,0x0018
1062 00fb 12d8 | | .DEBUG 0x00fb,0x12d8,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0727
106a 0103 12dc | | .DEBUG 0x0103,0x12dc,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0732
1072 010b 12e0 | | .DEBUG 0x010b,0x12e0,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x073d
107a 0113 12e4 | | .DEBUG 0x0113,0x12e4,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x074a
1082 011b 12e8 | | .DEBUG 0x011b,0x12e8,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x075d
108a 0123 12ec | # | .DEBUG 0x0123,0x12ec,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0764
1092 012b 12f0 | + | .DEBUG 0x012b,0x12f0,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0783
109a 0193 1312 | | .DEBUG 0x0193,0x1312,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0795
10a2 01b3 131c | | .DEBUG 0x01b3,0x131c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07a5
10aa 01db 1328 | (| .DEBUG 0x01db,0x1328,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07b7
10b2 0203 1334 | 4| .DEBUG 0x0203,0x1334,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07c9
10ba 0263 135c | c \| .DEBUG 0x0263,0x135c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x07f7
10c2 02f3 1392 | | .DEBUG 0x02f3,0x1392,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x081c
10ca 035b 13b6 | [ | .DEBUG 0x035b,0x13b6,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0845
10d2 037b 13c4 | { | .DEBUG 0x037b,0x13c4,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x085d
10da 0383 13c8 | | .DEBUG 0x0383,0x13c8,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0862
10e2 038b 13cc | | .DEBUG 0x038b,0x13cc,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x086b
10ea 0393 13d0 | | .DEBUG 0x0393,0x13d0,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0876
10f2 039b 13d4 | | .DEBUG 0x039b,0x13d4,0x0005,0x0000,0x0056,0xd7e5,0x0000,0x0888
10fa 03b3 13d6 | | .DEBUG 0x03b3,0x13d6,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x088f
1102 0423 1400 | # | .DEBUG 0x0423,0x1400,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x08be
110a 0493 142c | ,| .DEBUG 0x0493,0x142c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x08f2
1112 04fb 1454 | T| .DEBUG 0x04fb,0x1454,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x092f
111a 059b 148e | | .DEBUG 0x059b,0x148e,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x094b
1122 061b 14be | | .DEBUG 0x061b,0x14be,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0967
112a 073b 151e | ; | .DEBUG 0x073b,0x151e,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0998
1132 0763 152e | c .| .DEBUG 0x0763,0x152e,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x09b1
113a 079b 1544 | D| .DEBUG 0x079b,0x1544,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x09cf
1142 08e3 15b8 | | .DEBUG 0x08e3,0x15b8,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0a03
114a 094b 15dc | K | .DEBUG 0x094b,0x15dc,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0a26
1152 099b 1606 | | .DEBUG 0x099b,0x1606,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0a48
115a 09bb 1612 | | .DEBUG 0x09bb,0x1612,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0a4d
1162 09db 161c | | .DEBUG 0x09db,0x161c,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0bf0
116a 0af3 167a | z| .DEBUG 0x0af3,0x167a,0x0001,0x0000,0x0056,0xd7e5,0x0000,0x0c18
1172 0b5b 16a2 | [ | .DEBUG 0x0b5b,0x16a2,0x0002,0x0000,0x0056,0xd7e5,0x0000,0x0c3f
117a 0b6b 16a6 | k | .DEBUG 0x0b6b,0x16a6,0x0005,0x0000,0x0056,0xd7e5,0x0000,0x0c4d
1182 0b8b 16a8 | | .DEBUG 0x0b8b,0x16a8,0x0001,0x0000,0x0057,0x13f5,0x0000,0x05e0
118a 0c33 16ee | 3 | .DEBUG 0x0c33,0x16ee,0x0001,0x0000,0x0057,0x13f5,0x0000,0x0981
1192 0c63 16f8 | c | .DEBUG 0x0c63,0x16f8,0x0004,0x0000,0x0057,0x13f5,0x0000,0x0469
119a 0c8b 1700 | | .DEBUG 0x0c8b,0x1700,0x0000,0x0000,0x0057,0x13f5,0x0000,0x001f
11a2 0cd4 171a | | .DEBUG 0x0cd4,0x171a,0x0000,0x0000,0x0057,0x13f5,0x0000,0x143b
11aa 0d03 173a | :| .DEBUG 0x0d03,0x173a,0x0005,0x0000,0x0057,0x13f5,0x0000,0x0020
11b2 0d1b 173c | <| .DEBUG 0x0d1b,0x173c,0x0005,0x0000,0x0057,0x13f5,0x0000,0x0033
11ba 0d4b 173e | K >| .DEBUG 0x0d4b,0x173e,0x0002,0x0000,0x0057,0x13f5,0x0000,0x0050
11c2 0d5b 1744 | [ D| .DEBUG 0x0d5b,0x1744,0x0005,0x0000,0x0057,0x13f5,0x0000,0x0074
11ca 0d73 1746 | s F| .DEBUG 0x0d73,0x1746,0x0002,0x0000,0x0057,0x13f5,0x0000,0x00ad
11d2 0d83 174e | N| .DEBUG 0x0d83,0x174e,0x0001,0x0000,0x0057,0x13f5,0x0000,0x00b2
11da 0d8b 1752 | R| .DEBUG 0x0d8b,0x1752,0x0001,0x0000,0x0057,0x13f5,0x0000,0x00b6
11e2 0d9b 175a | Z| .DEBUG 0x0d9b,0x175a,0x0001,0x0000,0x0057,0x13f5,0x0000,0x1477
11ea 0dc3 176a | j| .DEBUG 0x0dc3,0x176a,0x0001,0x0000,0x0057,0x13f5,0x0000,0x14b8
11f2 0e33 178c | 3 | .DEBUG 0x0e33,0x178c,0x0002,0x0000,0x0057,0x13f5,0x0000,0x1557
11fa 0e4b 1796 | K | .DEBUG 0x0e4b,0x1796,0x0001,0x0000,0x0057,0x13f5,0x0000,0x1594
1202 0e7b 17a0 | { | .DEBUG 0x0e7b,0x17a0,0x0000,0x0000,0x0057,0x13f5,0x0000,0x15b5
120a 0e80 17a2 | | .DEBUG 0x0e80,0x17a2,0x0000,0x0000,0x0057,0x13f5,0x0000,0x15e6
1212 0e9b 17aa | | .DEBUG 0x0e9b,0x17aa,0x0003,0x0000,0x0057,0x13f5,0x0000,0x15ef
121a 0ea3 17ac | | .DEBUG 0x0ea3,0x17ac,0x0003,0x0000,0x0057,0x13f5,0x0000,0x15eb
1222 ; --------------------------------------------------------------------------------------
1222 ; Debug3 Subtable 0x0
1222 ; --------------------------------------------------------------------------------------
1222 002f 0000 | / | .DBG3TAB 0x002f,0x0000
1224 000b ffff | | .CONST 0x000b,0xffff
1226 000d fffe | | .CONST 0x000d,0xfffe
1228 0010 fffd | | .CONST 0x0010,0xfffd
122a 0012 fffc | | .CONST 0x0012,0xfffc
122c 0014 fffb | | .CONST 0x0014,0xfffb
122e 0016 fffa | | .CONST 0x0016,0xfffa
1230 0018 fff9 | | .CONST 0x0018,0xfff9
1232 001b fff8 | | .CONST 0x001b,0xfff8
1234 001d fff7 | | .CONST 0x001d,0xfff7
1236 001f fff6 | | .CONST 0x001f,0xfff6
1238 0021 fff5 | ! | .CONST 0x0021,0xfff5
123a 0023 fff4 | # | .CONST 0x0023,0xfff4
123c 0025 fff3 | % | .CONST 0x0025,0xfff3
123e 0027 fff2 | ' | .CONST 0x0027,0xfff2
1240 0029 fff1 | ) | .CONST 0x0029,0xfff1
1242 002b fff0 | + | .CONST 0x002b,0xfff0
1244 002d ffef | - | .CONST 0x002d,0xffef
1246 002f ffee | / | .CONST 0x002f,0xffee
1248 0033 ffed | 3 | .CONST 0x0033,0xffed
124a 0035 ffec | 5 | .CONST 0x0035,0xffec
124c 0037 ffeb | 7 | .CONST 0x0037,0xffeb
124e 003a ffea | : | .CONST 0x003a,0xffea
1250 003c ffe9 | < | .CONST 0x003c,0xffe9
1252 003e ffe8 | > | .CONST 0x003e,0xffe8
1254 0040 ffe7 | @ | .CONST 0x0040,0xffe7
1256 0042 ffe6 | B | .CONST 0x0042,0xffe6
1258 0044 ffe5 | D | .CONST 0x0044,0xffe5
125a 0045 ffe4 | E | .CONST 0x0045,0xffe4
125c 004a ffe3 | J | .CONST 0x004a,0xffe3
125e 004c ffe2 | L | .CONST 0x004c,0xffe2
1260 004e ffe1 | N | .CONST 0x004e,0xffe1
1262 0050 ffe0 | P | .CONST 0x0050,0xffe0
1264 0052 ffdf | R | .CONST 0x0052,0xffdf
1266 0054 ffde | T | .CONST 0x0054,0xffde
1268 0056 ffdd | V | .CONST 0x0056,0xffdd
126a 0058 ffdc | X | .CONST 0x0058,0xffdc
126c 005a ffdb | Z | .CONST 0x005a,0xffdb
126e 005c ffda | \ | .CONST 0x005c,0xffda
1270 005e ffd9 | ^ | .CONST 0x005e,0xffd9
1272 0060 ffd8 | ` | .CONST 0x0060,0xffd8
1274 0062 ffd7 | b | .CONST 0x0062,0xffd7
1276 0064 ffd6 | d | .CONST 0x0064,0xffd6
1278 0066 ffd5 | f | .CONST 0x0066,0xffd5
127a 006f ffd4 | o | .CONST 0x006f,0xffd4
127c 0071 ffd3 | q | .CONST 0x0071,0xffd3
127e 0073 ffd2 | s | .CONST 0x0073,0xffd2
1280 0075 ffd1 | u | .CONST 0x0075,0xffd1
1282 ; --------------------------------------------------------------------------------------
1282 ; Debug3 Subtable 0x1
1282 ; --------------------------------------------------------------------------------------
1282 002a 0000 | * | .DBG3TAB 0x002a,0x0000
1284 007e ffff | ~ | .CONST 0x007e,0xffff
1286 0081 fffe | | .CONST 0x0081,0xfffe
1288 008d fffd | | .CONST 0x008d,0xfffd
128a 008f fffc | | .CONST 0x008f,0xfffc
128c 0091 fffb | | .CONST 0x0091,0xfffb
128e 0093 fffa | | .CONST 0x0093,0xfffa
1290 0095 fff9 | | .CONST 0x0095,0xfff9
1292 009a fff8 | | .CONST 0x009a,0xfff8
1294 009c fff7 | | .CONST 0x009c,0xfff7
1296 009e fff6 | | .CONST 0x009e,0xfff6
1298 00a0 fff5 | | .CONST 0x00a0,0xfff5
129a 00a2 fff4 | | .CONST 0x00a2,0xfff4
129c 00a4 fff3 | | .CONST 0x00a4,0xfff3
129e 00a6 fff2 | | .CONST 0x00a6,0xfff2
12a0 00a8 fff1 | | .CONST 0x00a8,0xfff1
12a2 00aa fff0 | | .CONST 0x00aa,0xfff0
12a4 00ac ffef | | .CONST 0x00ac,0xffef
12a6 00ae ffee | | .CONST 0x00ae,0xffee
12a8 00b3 ffed | | .CONST 0x00b3,0xffed
12aa 00b5 ffec | | .CONST 0x00b5,0xffec
12ac 00b7 ffeb | | .CONST 0x00b7,0xffeb
12ae 00b9 ffea | | .CONST 0x00b9,0xffea
12b0 00bb ffe9 | | .CONST 0x00bb,0xffe9
12b2 00bd ffe8 | | .CONST 0x00bd,0xffe8
12b4 00bf ffe7 | | .CONST 0x00bf,0xffe7
12b6 00c1 ffe6 | | .CONST 0x00c1,0xffe6
12b8 00c3 ffe5 | | .CONST 0x00c3,0xffe5
12ba 00c5 ffe4 | | .CONST 0x00c5,0xffe4
12bc 00c7 ffe3 | | .CONST 0x00c7,0xffe3
12be 00c9 ffe2 | | .CONST 0x00c9,0xffe2
12c0 00cb ffe1 | | .CONST 0x00cb,0xffe1
12c2 00cd ffe0 | | .CONST 0x00cd,0xffe0
12c4 00cf ffdf | | .CONST 0x00cf,0xffdf
12c6 00d1 ffde | | .CONST 0x00d1,0xffde
12c8 00d3 ffdd | | .CONST 0x00d3,0xffdd
12ca 00d5 ffdc | | .CONST 0x00d5,0xffdc
12cc 00d7 ffdb | | .CONST 0x00d7,0xffdb
12ce 00d9 ffda | | .CONST 0x00d9,0xffda
12d0 00db ffd9 | | .CONST 0x00db,0xffd9
12d2 00dd ffd8 | | .CONST 0x00dd,0xffd8
12d4 00e8 ffd7 | | .CONST 0x00e8,0xffd7
12d6 00f2 ffd6 | | .CONST 0x00f2,0xffd6
12d8 ; --------------------------------------------------------------------------------------
12d8 ; Debug3 Subtable 0x2
12d8 ; --------------------------------------------------------------------------------------
12d8 0000 0001 | | .DBG3TAB 0x0000,0x0001
12da 00fb 0001 | | .CONST 0x00fb,0x0001
12dc ; --------------------------------------------------------------------------------------
12dc ; Debug3 Subtable 0x3
12dc ; --------------------------------------------------------------------------------------
12dc 0000 0001 | | .DBG3TAB 0x0000,0x0001
12de 0103 0001 | | .CONST 0x0103,0x0001
12e0 ; --------------------------------------------------------------------------------------
12e0 ; Debug3 Subtable 0x4
12e0 ; --------------------------------------------------------------------------------------
12e0 0000 0001 | | .DBG3TAB 0x0000,0x0001
12e2 010b 0001 | | .CONST 0x010b,0x0001
12e4 ; --------------------------------------------------------------------------------------
12e4 ; Debug3 Subtable 0x5
12e4 ; --------------------------------------------------------------------------------------
12e4 0000 0001 | | .DBG3TAB 0x0000,0x0001
12e6 0113 0001 | | .CONST 0x0113,0x0001
12e8 ; --------------------------------------------------------------------------------------
12e8 ; Debug3 Subtable 0x6
12e8 ; --------------------------------------------------------------------------------------
12e8 0000 0001 | | .DBG3TAB 0x0000,0x0001
12ea 011b 0001 | | .CONST 0x011b,0x0001
12ec ; --------------------------------------------------------------------------------------
12ec ; Debug3 Subtable 0x7
12ec ; --------------------------------------------------------------------------------------
12ec 0000 0001 | | .DBG3TAB 0x0000,0x0001
12ee 0123 0001 | # | .CONST 0x0123,0x0001
12f0 ; --------------------------------------------------------------------------------------
12f0 ; Debug3 Subtable 0x8
12f0 ; --------------------------------------------------------------------------------------
12f0 0001 000f | | .DBG3TAB 0x0001,0x000f
12f2 012b ffff | + | .CONST 0x012b,0xffff
12f4 0131 0001 | 1 | .CONST 0x0131,0x0001
12f6 0136 0002 | 6 | .CONST 0x0136,0x0002
12f8 0137 0401 | 7 | .CONST 0x0137,0x0401
12fa 0139 0002 | 9 | .CONST 0x0139,0x0002
12fc 013a 0003 | : | .CONST 0x013a,0x0003
12fe 0145 0004 | E | .CONST 0x0145,0x0004
1300 0148 0005 | H | .CONST 0x0148,0x0005
1302 014d 0006 | M | .CONST 0x014d,0x0006
1304 0158 0007 | X | .CONST 0x0158,0x0007
1306 015b 0008 | [ | .CONST 0x015b,0x0008
1308 0167 0009 | g | .CONST 0x0167,0x0009
130a 0172 000a | r | .CONST 0x0172,0x000a
130c 0175 000b | u | .CONST 0x0175,0x000b
130e 017a 000c | z | .CONST 0x017a,0x000c
1310 017e 000d | ~ | .CONST 0x017e,0x000d
1312 ; --------------------------------------------------------------------------------------
1312 ; Debug3 Subtable 0x9
1312 ; --------------------------------------------------------------------------------------
1312 0000 0004 | | .DBG3TAB 0x0000,0x0004
1314 0193 0001 | | .CONST 0x0193,0x0001
1316 0196 0002 | | .CONST 0x0196,0x0002
1318 019b 0003 | | .CONST 0x019b,0x0003
131a 019f 0004 | | .CONST 0x019f,0x0004
131c ; --------------------------------------------------------------------------------------
131c ; Debug3 Subtable 0xa
131c ; --------------------------------------------------------------------------------------
131c 0000 0005 | | .DBG3TAB 0x0000,0x0005
131e 01b3 0001 | | .CONST 0x01b3,0x0001
1320 01b7 0002 | | .CONST 0x01b7,0x0002
1322 01ba 0003 | | .CONST 0x01ba,0x0003
1324 01c3 0004 | | .CONST 0x01c3,0x0004
1326 01c7 0005 | | .CONST 0x01c7,0x0005
1328 ; --------------------------------------------------------------------------------------
1328 ; Debug3 Subtable 0xb
1328 ; --------------------------------------------------------------------------------------
1328 0000 0005 | | .DBG3TAB 0x0000,0x0005
132a 01db 0001 | | .CONST 0x01db,0x0001
132c 01df 0002 | | .CONST 0x01df,0x0002
132e 01e2 0003 | | .CONST 0x01e2,0x0003
1330 01ec 0004 | | .CONST 0x01ec,0x0004
1332 01f0 0005 | | .CONST 0x01f0,0x0005
1334 ; --------------------------------------------------------------------------------------
1334 ; Debug3 Subtable 0xc
1334 ; --------------------------------------------------------------------------------------
1334 0003 0010 | | .DBG3TAB 0x0003,0x0010
1336 0203 ffff | | .CONST 0x0203,0xffff
1338 0205 fffe | | .CONST 0x0205,0xfffe
133a 020a fffd | | .CONST 0x020a,0xfffd
133c 020e 0001 | | .CONST 0x020e,0x0001
133e 0212 0002 | | .CONST 0x0212,0x0002
1340 0215 0003 | | .CONST 0x0215,0x0003
1342 0220 0004 | | .CONST 0x0220,0x0004
1344 0222 0401 | " | .CONST 0x0222,0x0401
1346 0224 0402 | $ | .CONST 0x0224,0x0402
1348 0228 0005 | ( | .CONST 0x0228,0x0005
134a 0231 0006 | 1 | .CONST 0x0231,0x0006
134c 0233 0801 | 3 | .CONST 0x0233,0x0801
134e 0235 0802 | 5 | .CONST 0x0235,0x0802
1350 0239 0007 | 9 | .CONST 0x0239,0x0007
1352 0246 0008 | F | .CONST 0x0246,0x0008
1354 0248 0c01 | H | .CONST 0x0248,0x0c01
1356 024a 0c02 | J | .CONST 0x024a,0x0c02
1358 024e 0009 | N | .CONST 0x024e,0x0009
135a 0252 000a | R | .CONST 0x0252,0x000a
135c ; --------------------------------------------------------------------------------------
135c ; Debug3 Subtable 0xd
135c ; --------------------------------------------------------------------------------------
135c 000a 0010 | | .DBG3TAB 0x000a,0x0010
135e 0263 ffff | c | .CONST 0x0263,0xffff
1360 026a fffe | j | .CONST 0x026a,0xfffe
1362 026c fffd | l | .CONST 0x026c,0xfffd
1364 0270 fffc | p | .CONST 0x0270,0xfffc
1366 0275 fffb | u | .CONST 0x0275,0xfffb
1368 0278 fffa | x | .CONST 0x0278,0xfffa
136a 0279 fff9 | y | .CONST 0x0279,0xfff9
136c 027f fff8 | | .CONST 0x027f,0xfff8
136e 0284 fff7 | | .CONST 0x0284,0xfff7
1370 0288 fff6 | | .CONST 0x0288,0xfff6
1372 028f 0001 | | .CONST 0x028f,0x0001
1374 0291 0002 | | .CONST 0x0291,0x0002
1376 0294 0003 | | .CONST 0x0294,0x0003
1378 02a0 0004 | | .CONST 0x02a0,0x0004
137a 02ac 0005 | | .CONST 0x02ac,0x0005
137c 02ae 0401 | | .CONST 0x02ae,0x0401
137e 02b0 0402 | | .CONST 0x02b0,0x0402
1380 02b4 0006 | | .CONST 0x02b4,0x0006
1382 02ca 0007 | | .CONST 0x02ca,0x0007
1384 02cc 0801 | | .CONST 0x02cc,0x0801
1386 02ce 0802 | | .CONST 0x02ce,0x0802
1388 02d2 0008 | | .CONST 0x02d2,0x0008
138a 02d3 0009 | | .CONST 0x02d3,0x0009
138c 02d7 000a | | .CONST 0x02d7,0x000a
138e 02db 000b | | .CONST 0x02db,0x000b
1390 02dd 000c | | .CONST 0x02dd,0x000c
1392 ; --------------------------------------------------------------------------------------
1392 ; Debug3 Subtable 0xe
1392 ; --------------------------------------------------------------------------------------
1392 0004 000d | | .DBG3TAB 0x0004,0x000d
1394 02f3 ffff | | .CONST 0x02f3,0xffff
1396 02f5 fffe | | .CONST 0x02f5,0xfffe
1398 02f9 fffd | | .CONST 0x02f9,0xfffd
139a 0300 fffc | | .CONST 0x0300,0xfffc
139c 0302 0001 | | .CONST 0x0302,0x0001
139e 0305 0002 | | .CONST 0x0305,0x0002
13a0 0311 0003 | | .CONST 0x0311,0x0003
13a2 0313 0401 | | .CONST 0x0313,0x0401
13a4 0315 0402 | | .CONST 0x0315,0x0402
13a6 0319 0004 | | .CONST 0x0319,0x0004
13a8 031c 0005 | | .CONST 0x031c,0x0005
13aa 0326 0006 | & | .CONST 0x0326,0x0006
13ac 0328 0801 | ( | .CONST 0x0328,0x0801
13ae 032a 0802 | * | .CONST 0x032a,0x0802
13b0 032e 0007 | . | .CONST 0x032e,0x0007
13b2 0336 0008 | 6 | .CONST 0x0336,0x0008
13b4 033a 0009 | : | .CONST 0x033a,0x0009
13b6 ; --------------------------------------------------------------------------------------
13b6 ; Debug3 Subtable 0xf
13b6 ; --------------------------------------------------------------------------------------
13b6 0000 0006 | | .DBG3TAB 0x0000,0x0006
13b8 035b 0001 | [ | .CONST 0x035b,0x0001
13ba 0360 0002 | ` | .CONST 0x0360,0x0002
13bc 0364 0003 | d | .CONST 0x0364,0x0003
13be 0365 0401 | e | .CONST 0x0365,0x0401
13c0 0366 0003 | f | .CONST 0x0366,0x0003
13c2 0367 0004 | g | .CONST 0x0367,0x0004
13c4 ; --------------------------------------------------------------------------------------
13c4 ; Debug3 Subtable 0x10
13c4 ; --------------------------------------------------------------------------------------
13c4 0000 0001 | | .DBG3TAB 0x0000,0x0001
13c6 037b 0001 | { | .CONST 0x037b,0x0001
13c8 ; --------------------------------------------------------------------------------------
13c8 ; Debug3 Subtable 0x11
13c8 ; --------------------------------------------------------------------------------------
13c8 0000 0001 | | .DBG3TAB 0x0000,0x0001
13ca 0383 0001 | | .CONST 0x0383,0x0001
13cc ; --------------------------------------------------------------------------------------
13cc ; Debug3 Subtable 0x12
13cc ; --------------------------------------------------------------------------------------
13cc 0000 0001 | | .DBG3TAB 0x0000,0x0001
13ce 038b 0001 | | .CONST 0x038b,0x0001
13d0 ; --------------------------------------------------------------------------------------
13d0 ; Debug3 Subtable 0x13
13d0 ; --------------------------------------------------------------------------------------
13d0 0000 0001 | | .DBG3TAB 0x0000,0x0001
13d2 0393 0001 | | .CONST 0x0393,0x0001
13d4 ; --------------------------------------------------------------------------------------
13d4 ; Debug3 Subtable 0x14
13d4 ; --------------------------------------------------------------------------------------
13d4 0000 0000 | | .DBG3TAB 0x0000,0x0000
13d6 ; --------------------------------------------------------------------------------------
13d6 ; Debug3 Subtable 0x15
13d6 ; --------------------------------------------------------------------------------------
13d6 0003 0011 | | .DBG3TAB 0x0003,0x0011
13d8 03b3 ffff | | .CONST 0x03b3,0xffff
13da 03b5 fffe | | .CONST 0x03b5,0xfffe
13dc 03ba fffd | | .CONST 0x03ba,0xfffd
13de 03c3 0001 | | .CONST 0x03c3,0x0001
13e0 03c4 0401 | | .CONST 0x03c4,0x0401
13e2 03c5 0001 | | .CONST 0x03c5,0x0001
13e4 03c6 0002 | | .CONST 0x03c6,0x0002
13e6 03c8 0003 | | .CONST 0x03c8,0x0003
13e8 03cb 0004 | | .CONST 0x03cb,0x0004
13ea 03d6 0005 | | .CONST 0x03d6,0x0005
13ec 03d8 0801 | | .CONST 0x03d8,0x0801
13ee 03da 0802 | | .CONST 0x03da,0x0802
13f0 03de 0006 | | .CONST 0x03de,0x0006
13f2 03f3 0007 | | .CONST 0x03f3,0x0007
13f4 03f5 0c01 | | .CONST 0x03f5,0x0c01
13f6 03f7 0c02 | | .CONST 0x03f7,0x0c02
13f8 03fb 0008 | | .CONST 0x03fb,0x0008
13fa 0402 0009 | | .CONST 0x0402,0x0009
13fc 0406 000a | | .CONST 0x0406,0x000a
13fe 040d 000b | | .CONST 0x040d,0x000b
1400 ; --------------------------------------------------------------------------------------
1400 ; Debug3 Subtable 0x16
1400 ; --------------------------------------------------------------------------------------
1400 0003 0012 | | .DBG3TAB 0x0003,0x0012
1402 0423 ffff | # | .CONST 0x0423,0xffff
1404 0429 fffe | ) | .CONST 0x0429,0xfffe
1406 042b fffd | + | .CONST 0x042b,0xfffd
1408 0434 0001 | 4 | .CONST 0x0434,0x0001
140a 0435 0401 | 5 | .CONST 0x0435,0x0401
140c 0436 0001 | 6 | .CONST 0x0436,0x0001
140e 0437 0002 | 7 | .CONST 0x0437,0x0002
1410 0439 0003 | 9 | .CONST 0x0439,0x0003
1412 043c 0004 | < | .CONST 0x043c,0x0004
1414 0447 0005 | G | .CONST 0x0447,0x0005
1416 044d 0006 | M | .CONST 0x044d,0x0006
1418 044f 0801 | O | .CONST 0x044f,0x0801
141a 0451 0802 | Q | .CONST 0x0451,0x0802
141c 0455 0007 | U | .CONST 0x0455,0x0007
141e 046a 0008 | j | .CONST 0x046a,0x0008
1420 046c 0c01 | l | .CONST 0x046c,0x0c01
1422 046e 0c02 | n | .CONST 0x046e,0x0c02
1424 0472 0009 | r | .CONST 0x0472,0x0009
1426 0479 000a | y | .CONST 0x0479,0x000a
1428 047d 000b | } | .CONST 0x047d,0x000b
142a 0484 000c | | .CONST 0x0484,0x000c
142c ; --------------------------------------------------------------------------------------
142c ; Debug3 Subtable 0x17
142c ; --------------------------------------------------------------------------------------
142c 0004 000f | | .DBG3TAB 0x0004,0x000f
142e 0493 ffff | | .CONST 0x0493,0xffff
1430 0498 fffe | | .CONST 0x0498,0xfffe
1432 049b fffd | | .CONST 0x049b,0xfffd
1434 049d fffc | | .CONST 0x049d,0xfffc
1436 04a6 0001 | | .CONST 0x04a6,0x0001
1438 04a7 0401 | | .CONST 0x04a7,0x0401
143a 04a8 0001 | | .CONST 0x04a8,0x0001
143c 04a9 0002 | | .CONST 0x04a9,0x0002
143e 04ab 0003 | | .CONST 0x04ab,0x0003
1440 04b9 0004 | | .CONST 0x04b9,0x0004
1442 04bb 0005 | | .CONST 0x04bb,0x0005
1444 04be 0006 | | .CONST 0x04be,0x0006
1446 04d2 0007 | | .CONST 0x04d2,0x0007
1448 04d4 0801 | | .CONST 0x04d4,0x0801
144a 04d6 0802 | | .CONST 0x04d6,0x0802
144c 04da 0008 | | .CONST 0x04da,0x0008
144e 04e1 0009 | | .CONST 0x04e1,0x0009
1450 04e5 000a | | .CONST 0x04e5,0x000a
1452 04ec 000b | | .CONST 0x04ec,0x000b
1454 ; --------------------------------------------------------------------------------------
1454 ; Debug3 Subtable 0x18
1454 ; --------------------------------------------------------------------------------------
1454 0007 0015 | | .DBG3TAB 0x0007,0x0015
1456 04fb ffff | | .CONST 0x04fb,0xffff
1458 04fd fffe | | .CONST 0x04fd,0xfffe
145a 04ff fffd | | .CONST 0x04ff,0xfffd
145c 0504 fffc | | .CONST 0x0504,0xfffc
145e 0508 fffb | | .CONST 0x0508,0xfffb
1460 050d fffa | | .CONST 0x050d,0xfffa
1462 0516 fff9 | | .CONST 0x0516,0xfff9
1464 0518 0001 | | .CONST 0x0518,0x0001
1466 051b 0002 | | .CONST 0x051b,0x0002
1468 0524 0003 | $ | .CONST 0x0524,0x0003
146a 052d 0004 | - | .CONST 0x052d,0x0004
146c 0535 0005 | 5 | .CONST 0x0535,0x0005
146e 053d 0006 | = | .CONST 0x053d,0x0006
1470 0548 0007 | H | .CONST 0x0548,0x0007
1472 054a 0401 | J | .CONST 0x054a,0x0401
1474 054c 0402 | L | .CONST 0x054c,0x0402
1476 0550 0008 | P | .CONST 0x0550,0x0008
1478 0560 0009 | ` | .CONST 0x0560,0x0009
147a 0562 0801 | b | .CONST 0x0562,0x0801
147c 0564 0802 | d | .CONST 0x0564,0x0802
147e 0568 000a | h | .CONST 0x0568,0x000a
1480 0571 000b | q | .CONST 0x0571,0x000b
1482 0573 0c01 | s | .CONST 0x0573,0x0c01
1484 0575 0c02 | u | .CONST 0x0575,0x0c02
1486 0579 000c | y | .CONST 0x0579,0x000c
1488 057b 000d | { | .CONST 0x057b,0x000d
148a 0584 000e | | .CONST 0x0584,0x000e
148c 058b 000f | | .CONST 0x058b,0x000f
148e ; --------------------------------------------------------------------------------------
148e ; Debug3 Subtable 0x19
148e ; --------------------------------------------------------------------------------------
148e 0006 0011 | | .DBG3TAB 0x0006,0x0011
1490 059b ffff | | .CONST 0x059b,0xffff
1492 059d fffe | | .CONST 0x059d,0xfffe
1494 059f fffd | | .CONST 0x059f,0xfffd
1496 05a3 fffc | | .CONST 0x05a3,0xfffc
1498 05a8 fffb | | .CONST 0x05a8,0xfffb
149a 05b1 fffa | | .CONST 0x05b1,0xfffa
149c 05b3 0001 | | .CONST 0x05b3,0x0001
149e 05b6 0002 | | .CONST 0x05b6,0x0002
14a0 05bf 0003 | | .CONST 0x05bf,0x0003
14a2 05c8 0004 | | .CONST 0x05c8,0x0004
14a4 05d0 0005 | | .CONST 0x05d0,0x0005
14a6 05d9 0006 | | .CONST 0x05d9,0x0006
14a8 05db 0401 | | .CONST 0x05db,0x0401
14aa 05dd 0402 | | .CONST 0x05dd,0x0402
14ac 05e1 0007 | | .CONST 0x05e1,0x0007
14ae 05e6 0008 | | .CONST 0x05e6,0x0008
14b0 05ef 0009 | | .CONST 0x05ef,0x0009
14b2 05f1 0801 | | .CONST 0x05f1,0x0801
14b4 05f3 0802 | | .CONST 0x05f3,0x0802
14b6 05f7 000a | | .CONST 0x05f7,0x000a
14b8 05f9 000b | | .CONST 0x05f9,0x000b
14ba 0602 000c | | .CONST 0x0602,0x000c
14bc 0609 000d | | .CONST 0x0609,0x000d
14be ; --------------------------------------------------------------------------------------
14be ; Debug3 Subtable 0x1a
14be ; --------------------------------------------------------------------------------------
14be 0009 0026 | &| .DBG3TAB 0x0009,0x0026
14c0 061b ffff | | .CONST 0x061b,0xffff
14c2 0621 fffe | ! | .CONST 0x0621,0xfffe
14c4 0623 fffd | # | .CONST 0x0623,0xfffd
14c6 062a fffc | * | .CONST 0x062a,0xfffc
14c8 062c fffb | , | .CONST 0x062c,0xfffb
14ca 0633 fffa | 3 | .CONST 0x0633,0xfffa
14cc 0638 fff9 | 8 | .CONST 0x0638,0xfff9
14ce 063e fff8 | > | .CONST 0x063e,0xfff8
14d0 0643 fff7 | C | .CONST 0x0643,0xfff7
14d2 064c 0001 | L | .CONST 0x064c,0x0001
14d4 064f 0002 | O | .CONST 0x064f,0x0002
14d6 0652 0003 | R | .CONST 0x0652,0x0003
14d8 065d 0004 | ] | .CONST 0x065d,0x0004
14da 065f 0401 | _ | .CONST 0x065f,0x0401
14dc 0661 0402 | a | .CONST 0x0661,0x0402
14de 0665 0005 | e | .CONST 0x0665,0x0005
14e0 066a 0006 | j | .CONST 0x066a,0x0006
14e2 0675 0007 | u | .CONST 0x0675,0x0007
14e4 0678 0008 | x | .CONST 0x0678,0x0008
14e6 0682 0009 | | .CONST 0x0682,0x0009
14e8 0684 0801 | | .CONST 0x0684,0x0801
14ea 0686 0802 | | .CONST 0x0686,0x0802
14ec 068a 000a | | .CONST 0x068a,0x000a
14ee 068e 000b | | .CONST 0x068e,0x000b
14f0 0691 000c | | .CONST 0x0691,0x000c
14f2 069c 000d | | .CONST 0x069c,0x000d
14f4 069f 000e | | .CONST 0x069f,0x000e
14f6 06ac 000f | | .CONST 0x06ac,0x000f
14f8 06ae 0c01 | | .CONST 0x06ae,0x0c01
14fa 06b0 0c02 | | .CONST 0x06b0,0x0c02
14fc 06b4 0010 | | .CONST 0x06b4,0x0010
14fe 06d4 0011 | | .CONST 0x06d4,0x0011
1500 06d6 1001 | | .CONST 0x06d6,0x1001
1502 06d8 1002 | | .CONST 0x06d8,0x1002
1504 06dc 0012 | | .CONST 0x06dc,0x0012
1506 06e6 0013 | | .CONST 0x06e6,0x0013
1508 06e8 1401 | | .CONST 0x06e8,0x1401
150a 06ea 1402 | | .CONST 0x06ea,0x1402
150c 06ee 0014 | | .CONST 0x06ee,0x0014
150e 06fe 0015 | | .CONST 0x06fe,0x0015
1510 0710 0016 | | .CONST 0x0710,0x0016
1512 0712 1801 | | .CONST 0x0712,0x1801
1514 0714 1802 | | .CONST 0x0714,0x1802
1516 0718 0017 | | .CONST 0x0718,0x0017
1518 071f 0018 | | .CONST 0x071f,0x0018
151a 0723 0019 | # | .CONST 0x0723,0x0019
151c 072a 001a | * | .CONST 0x072a,0x001a
151e ; --------------------------------------------------------------------------------------
151e ; Debug3 Subtable 0x1b
151e ; --------------------------------------------------------------------------------------
151e 0001 0006 | | .DBG3TAB 0x0001,0x0006
1520 073b ffff | ; | .CONST 0x073b,0xffff
1522 073d 0001 | = | .CONST 0x073d,0x0001
1524 0744 0002 | D | .CONST 0x0744,0x0002
1526 0746 0401 | F | .CONST 0x0746,0x0401
1528 0748 0402 | H | .CONST 0x0748,0x0402
152a 074c 0003 | L | .CONST 0x074c,0x0003
152c 0750 0004 | P | .CONST 0x0750,0x0004
152e ; --------------------------------------------------------------------------------------
152e ; Debug3 Subtable 0x1c
152e ; --------------------------------------------------------------------------------------
152e 0001 0009 | | .DBG3TAB 0x0001,0x0009
1530 0763 ffff | c | .CONST 0x0763,0xffff
1532 0765 0001 | e | .CONST 0x0765,0x0001
1534 0767 0002 | g | .CONST 0x0767,0x0002
1536 076f 0003 | o | .CONST 0x076f,0x0003
1538 0771 0401 | q | .CONST 0x0771,0x0401
153a 0773 0402 | s | .CONST 0x0773,0x0402
153c 0778 0004 | x | .CONST 0x0778,0x0004
153e 0783 0005 | | .CONST 0x0783,0x0005
1540 0786 0006 | | .CONST 0x0786,0x0006
1542 078a 0007 | | .CONST 0x078a,0x0007
1544 ; --------------------------------------------------------------------------------------
1544 ; Debug3 Subtable 0x1d
1544 ; --------------------------------------------------------------------------------------
1544 0011 0028 | (| .DBG3TAB 0x0011,0x0028
1546 079b ffff | | .CONST 0x079b,0xffff
1548 07a1 fffe | | .CONST 0x07a1,0xfffe
154a 07a8 fffd | | .CONST 0x07a8,0xfffd
154c 07af fffc | | .CONST 0x07af,0xfffc
154e 07b6 fffb | | .CONST 0x07b6,0xfffb
1550 07b8 fffa | | .CONST 0x07b8,0xfffa
1552 07be fff9 | | .CONST 0x07be,0xfff9
1554 07c4 fff8 | | .CONST 0x07c4,0xfff8
1556 07c5 fff7 | | .CONST 0x07c5,0xfff7
1558 07c8 fff6 | | .CONST 0x07c8,0xfff6
155a 07cc fff5 | | .CONST 0x07cc,0xfff5
155c 07cf fff4 | | .CONST 0x07cf,0xfff4
155e 07d8 0001 | | .CONST 0x07d8,0x0001
1560 07dd 0002 | | .CONST 0x07dd,0x0002
1562 07e8 0003 | | .CONST 0x07e8,0x0003
1564 07eb 0004 | | .CONST 0x07eb,0x0004
1566 07ee 0005 | | .CONST 0x07ee,0x0005
1568 07fc 0006 | | .CONST 0x07fc,0x0006
156a 07ff 0007 | | .CONST 0x07ff,0x0007
156c 0800 fbff | | .CONST 0x0800,0xfbff
156e 0802 fbfe | | .CONST 0x0802,0xfbfe
1570 0807 fbfd | | .CONST 0x0807,0xfbfd
1572 0809 fbfc | | .CONST 0x0809,0xfbfc
1574 080a fbfb | | .CONST 0x080a,0xfbfb
1576 080c 0401 | | .CONST 0x080c,0x0401
1578 081a 0402 | | .CONST 0x081a,0x0402
157a 081c 0801 | | .CONST 0x081c,0x0801
157c 081e 0802 | | .CONST 0x081e,0x0802
157e 0822 0403 | " | .CONST 0x0822,0x0403
1580 083f 0404 | ? | .CONST 0x083f,0x0404
1582 0841 0c01 | A | .CONST 0x0841,0x0c01
1584 0843 0c02 | C | .CONST 0x0843,0x0c02
1586 0848 0008 | H | .CONST 0x0848,0x0008
1588 0853 0009 | S | .CONST 0x0853,0x0009
158a 0855 1001 | U | .CONST 0x0855,0x1001
158c 0857 1002 | W | .CONST 0x0857,0x1002
158e 085b 000a | [ | .CONST 0x085b,0x000a
1590 0864 000b | d | .CONST 0x0864,0x000b
1592 0866 1401 | f | .CONST 0x0866,0x1401
1594 0868 1402 | h | .CONST 0x0868,0x1402
1596 086c 000c | l | .CONST 0x086c,0x000c
1598 0871 000d | q | .CONST 0x0871,0x000d
159a 0873 000e | s | .CONST 0x0873,0x000e
159c 0888 000f | | .CONST 0x0888,0x000f
159e 088a 1801 | | .CONST 0x088a,0x1801
15a0 088c 1802 | | .CONST 0x088c,0x1802
15a2 0890 0010 | | .CONST 0x0890,0x0010
15a4 0895 0011 | | .CONST 0x0895,0x0011
15a6 08a3 0012 | | .CONST 0x08a3,0x0012
15a8 08ab 0013 | | .CONST 0x08ab,0x0013
15aa 08b4 0014 | | .CONST 0x08b4,0x0014
15ac 08b6 1c01 | | .CONST 0x08b6,0x1c01
15ae 08b8 1c02 | | .CONST 0x08b8,0x1c02
15b0 08bc 0015 | | .CONST 0x08bc,0x0015
15b2 08c3 0016 | | .CONST 0x08c3,0x0016
15b4 08c7 0017 | | .CONST 0x08c7,0x0017
15b6 08ce 0018 | | .CONST 0x08ce,0x0018
15b8 ; --------------------------------------------------------------------------------------
15b8 ; Debug3 Subtable 0x1e
15b8 ; --------------------------------------------------------------------------------------
15b8 0002 000f | | .DBG3TAB 0x0002,0x000f
15ba 08e3 ffff | | .CONST 0x08e3,0xffff
15bc 08e8 fffe | | .CONST 0x08e8,0xfffe
15be 08e9 0001 | | .CONST 0x08e9,0x0001
15c0 08ec 0002 | | .CONST 0x08ec,0x0002
15c2 08f7 0003 | | .CONST 0x08f7,0x0003
15c4 08f9 0004 | | .CONST 0x08f9,0x0004
15c6 0906 0005 | | .CONST 0x0906,0x0005
15c8 0909 0006 | | .CONST 0x0909,0x0006
15ca 090b 0007 | | .CONST 0x090b,0x0007
15cc 0914 0008 | | .CONST 0x0914,0x0008
15ce 091b 0009 | | .CONST 0x091b,0x0009
15d0 091d 000a | | .CONST 0x091d,0x000a
15d2 091e 000b | | .CONST 0x091e,0x000b
15d4 0922 000c | " | .CONST 0x0922,0x000c
15d6 092d 000d | - | .CONST 0x092d,0x000d
15d8 0936 000e | 6 | .CONST 0x0936,0x000e
15da 093a 000f | : | .CONST 0x093a,0x000f
15dc ; --------------------------------------------------------------------------------------
15dc ; Debug3 Subtable 0x1f
15dc ; --------------------------------------------------------------------------------------
15dc 0001 0013 | | .DBG3TAB 0x0001,0x0013
15de 094b ffff | K | .CONST 0x094b,0xffff
15e0 0951 0001 | Q | .CONST 0x0951,0x0001
15e2 0952 0401 | R | .CONST 0x0952,0x0401
15e4 0953 0001 | S | .CONST 0x0953,0x0001
15e6 0954 0002 | T | .CONST 0x0954,0x0002
15e8 0956 0003 | V | .CONST 0x0956,0x0003
15ea 0958 0004 | X | .CONST 0x0958,0x0004
15ec 095a 0005 | Z | .CONST 0x095a,0x0005
15ee 0965 0006 | e | .CONST 0x0965,0x0006
15f0 0968 0007 | h | .CONST 0x0968,0x0007
15f2 096f 0008 | o | .CONST 0x096f,0x0008
15f4 0976 0009 | v | .CONST 0x0976,0x0009
15f6 097b 000a | { | .CONST 0x097b,0x000a
15f8 097c 0801 | | | .CONST 0x097c,0x0801
15fa 097d 000a | } | .CONST 0x097d,0x000a
15fc 097f 000b | | .CONST 0x097f,0x000b
15fe 0986 000c | | .CONST 0x0986,0x000c
1600 0987 0c01 | | .CONST 0x0987,0x0c01
1602 0988 000c | | .CONST 0x0988,0x000c
1604 0989 000d | | .CONST 0x0989,0x000d
1606 ; --------------------------------------------------------------------------------------
1606 ; Debug3 Subtable 0x20
1606 ; --------------------------------------------------------------------------------------
1606 0001 0004 | | .DBG3TAB 0x0001,0x0004
1608 099b ffff | | .CONST 0x099b,0xffff
160a 099f 0001 | | .CONST 0x099f,0x0001
160c 09a5 0002 | | .CONST 0x09a5,0x0002
160e 09a8 0003 | | .CONST 0x09a8,0x0003
1610 09b0 0004 | | .CONST 0x09b0,0x0004
1612 ; --------------------------------------------------------------------------------------
1612 ; Debug3 Subtable 0x21
1612 ; --------------------------------------------------------------------------------------
1612 0000 0004 | | .DBG3TAB 0x0000,0x0004
1614 09bb 0001 | | .CONST 0x09bb,0x0001
1616 09be 0002 | | .CONST 0x09be,0x0002
1618 09c7 0003 | | .CONST 0x09c7,0x0003
161a 09cd 0004 | | .CONST 0x09cd,0x0004
161c ; --------------------------------------------------------------------------------------
161c ; Debug3 Subtable 0x22
161c ; --------------------------------------------------------------------------------------
161c 0009 0025 | %| .DBG3TAB 0x0009,0x0025
161e 09db ffff | | .CONST 0x09db,0xffff
1620 09e1 fffe | | .CONST 0x09e1,0xfffe
1622 09e3 fffd | | .CONST 0x09e3,0xfffd
1624 09e9 fffc | | .CONST 0x09e9,0xfffc
1626 09eb fffb | | .CONST 0x09eb,0xfffb
1628 09f2 fffa | | .CONST 0x09f2,0xfffa
162a 09f7 fff9 | | .CONST 0x09f7,0xfff9
162c 09fd fff8 | | .CONST 0x09fd,0xfff8
162e 0a02 fff7 | | .CONST 0x0a02,0xfff7
1630 0a0b 0001 | | .CONST 0x0a0b,0x0001
1632 0a0e 0002 | | .CONST 0x0a0e,0x0002
1634 0a19 0003 | | .CONST 0x0a19,0x0003
1636 0a1b 0401 | | .CONST 0x0a1b,0x0401
1638 0a1d 0402 | | .CONST 0x0a1d,0x0402
163a 0a21 0004 | ! | .CONST 0x0a21,0x0004
163c 0a26 0005 | & | .CONST 0x0a26,0x0005
163e 0a31 0006 | 1 | .CONST 0x0a31,0x0006
1640 0a34 0007 | 4 | .CONST 0x0a34,0x0007
1642 0a3e 0008 | > | .CONST 0x0a3e,0x0008
1644 0a40 0801 | @ | .CONST 0x0a40,0x0801
1646 0a42 0802 | B | .CONST 0x0a42,0x0802
1648 0a46 0009 | F | .CONST 0x0a46,0x0009
164a 0a4a 000a | J | .CONST 0x0a4a,0x000a
164c 0a4d 000b | M | .CONST 0x0a4d,0x000b
164e 0a58 000c | X | .CONST 0x0a58,0x000c
1650 0a5b 000d | [ | .CONST 0x0a5b,0x000d
1652 0a68 000e | h | .CONST 0x0a68,0x000e
1654 0a6a 0c01 | j | .CONST 0x0a6a,0x0c01
1656 0a6c 0c02 | l | .CONST 0x0a6c,0x0c02
1658 0a70 000f | p | .CONST 0x0a70,0x000f
165a 0a90 0010 | | .CONST 0x0a90,0x0010
165c 0a92 1001 | | .CONST 0x0a92,0x1001
165e 0a94 1002 | | .CONST 0x0a94,0x1002
1660 0a98 0011 | | .CONST 0x0a98,0x0011
1662 0aa2 0012 | | .CONST 0x0aa2,0x0012
1664 0aa4 1401 | | .CONST 0x0aa4,0x1401
1666 0aa6 1402 | | .CONST 0x0aa6,0x1402
1668 0aaa 0013 | | .CONST 0x0aaa,0x0013
166a 0aba 0014 | | .CONST 0x0aba,0x0014
166c 0ac4 0015 | | .CONST 0x0ac4,0x0015
166e 0ac6 1801 | | .CONST 0x0ac6,0x1801
1670 0ac8 1802 | | .CONST 0x0ac8,0x1802
1672 0acc 0016 | | .CONST 0x0acc,0x0016
1674 0ad3 0017 | | .CONST 0x0ad3,0x0017
1676 0ad7 0018 | | .CONST 0x0ad7,0x0018
1678 0ade 0019 | | .CONST 0x0ade,0x0019
167a ; --------------------------------------------------------------------------------------
167a ; Debug3 Subtable 0x23
167a ; --------------------------------------------------------------------------------------
167a 0004 000f | | .DBG3TAB 0x0004,0x000f
167c 0af3 ffff | | .CONST 0x0af3,0xffff
167e 0af9 fffe | | .CONST 0x0af9,0xfffe
1680 0afb fffd | | .CONST 0x0afb,0xfffd
1682 0afd fffc | | .CONST 0x0afd,0xfffc
1684 0b04 0001 | | .CONST 0x0b04,0x0001
1686 0b08 0002 | | .CONST 0x0b08,0x0002
1688 0b0b 0003 | | .CONST 0x0b0b,0x0003
168a 0b16 0004 | | .CONST 0x0b16,0x0004
168c 0b18 0401 | | .CONST 0x0b18,0x0401
168e 0b1a 0402 | | .CONST 0x0b1a,0x0402
1690 0b1e 0005 | | .CONST 0x0b1e,0x0005
1692 0b23 0006 | # | .CONST 0x0b23,0x0006
1694 0b2e 0007 | . | .CONST 0x0b2e,0x0007
1696 0b31 0008 | 1 | .CONST 0x0b31,0x0008
1698 0b3b 0009 | ; | .CONST 0x0b3b,0x0009
169a 0b3d 0801 | = | .CONST 0x0b3d,0x0801
169c 0b3f 0802 | ? | .CONST 0x0b3f,0x0802
169e 0b43 000a | C | .CONST 0x0b43,0x000a
16a0 0b47 000b | G | .CONST 0x0b47,0x000b
16a2 ; --------------------------------------------------------------------------------------
16a2 ; Debug3 Subtable 0x24
16a2 ; --------------------------------------------------------------------------------------
16a2 0000 0001 | | .DBG3TAB 0x0000,0x0001
16a4 0b5b 0001 | [ | .CONST 0x0b5b,0x0001
16a6 ; --------------------------------------------------------------------------------------
16a6 ; Debug3 Subtable 0x25
16a6 ; --------------------------------------------------------------------------------------
16a6 0000 0000 | | .DBG3TAB 0x0000,0x0000
16a8 ; --------------------------------------------------------------------------------------
16a8 ; Debug3 Subtable 0x26
16a8 ; --------------------------------------------------------------------------------------
16a8 0006 001c | | .DBG3TAB 0x0006,0x001c
16aa 0b8b ffff | | .CONST 0x0b8b,0xffff
16ac 0b8d fffe | | .CONST 0x0b8d,0xfffe
16ae 0b92 fffd | | .CONST 0x0b92,0xfffd
16b0 0b98 fffc | | .CONST 0x0b98,0xfffc
16b2 0b9a fffb | | .CONST 0x0b9a,0xfffb
16b4 0b9b fffa | | .CONST 0x0b9b,0xfffa
16b6 0ba1 0001 | | .CONST 0x0ba1,0x0001
16b8 0ba2 0401 | | .CONST 0x0ba2,0x0401
16ba 0ba3 0001 | | .CONST 0x0ba3,0x0001
16bc 0ba4 0002 | | .CONST 0x0ba4,0x0002
16be 0ba6 0003 | | .CONST 0x0ba6,0x0003
16c0 0bb6 0004 | | .CONST 0x0bb6,0x0004
16c2 0bb8 0801 | | .CONST 0x0bb8,0x0801
16c4 0bba 0802 | | .CONST 0x0bba,0x0802
16c6 0bbe 0005 | | .CONST 0x0bbe,0x0005
16c8 0bda 0006 | | .CONST 0x0bda,0x0006
16ca 0bdc 0c01 | | .CONST 0x0bdc,0x0c01
16cc 0bde 0c02 | | .CONST 0x0bde,0x0c02
16ce 0be2 0007 | | .CONST 0x0be2,0x0007
16d0 0be7 0008 | | .CONST 0x0be7,0x0008
16d2 0be8 1001 | | .CONST 0x0be8,0x1001
16d4 0bea 0008 | | .CONST 0x0bea,0x0008
16d6 0bee 0009 | | .CONST 0x0bee,0x0009
16d8 0bf5 000a | | .CONST 0x0bf5,0x000a
16da 0bfc 000b | | .CONST 0x0bfc,0x000b
16dc 0c00 000c | | .CONST 0x0c00,0x000c
16de 0c05 000d | | .CONST 0x0c05,0x000d
16e0 0c0c 000e | | .CONST 0x0c0c,0x000e
16e2 0c14 000f | | .CONST 0x0c14,0x000f
16e4 0c17 0010 | | .CONST 0x0c17,0x0010
16e6 0c22 0011 | " | .CONST 0x0c22,0x0011
16e8 0c25 0012 | % | .CONST 0x0c25,0x0012
16ea 0c27 0013 | ' | .CONST 0x0c27,0x0013
16ec 0c29 0014 | ) | .CONST 0x0c29,0x0014
16ee ; --------------------------------------------------------------------------------------
16ee ; Debug3 Subtable 0x27
16ee ; --------------------------------------------------------------------------------------
16ee 0002 0002 | | .DBG3TAB 0x0002,0x0002
16f0 0c33 ffff | 3 | .CONST 0x0c33,0xffff
16f2 0c36 fffe | 6 | .CONST 0x0c36,0xfffe
16f4 0c39 0001 | 9 | .CONST 0x0c39,0x0001
16f6 0c40 0002 | @ | .CONST 0x0c40,0x0002
16f8 ; --------------------------------------------------------------------------------------
16f8 ; Debug3 Subtable 0x28
16f8 ; --------------------------------------------------------------------------------------
16f8 0000 0003 | | .DBG3TAB 0x0000,0x0003
16fa 0c63 0001 | c | .CONST 0x0c63,0x0001
16fc 0c76 0002 | v | .CONST 0x0c76,0x0002
16fe 0c7e 0003 | ~ | .CONST 0x0c7e,0x0003
1700 ; --------------------------------------------------------------------------------------
1700 ; Debug3 Subtable 0x29
1700 ; --------------------------------------------------------------------------------------
1700 000c 0000 | | .DBG3TAB 0x000c,0x0000
1702 0c8b ffff | | .CONST 0x0c8b,0xffff
1704 0c93 fffe | | .CONST 0x0c93,0xfffe
1706 0ca0 fffd | | .CONST 0x0ca0,0xfffd
1708 0ca3 fffc | | .CONST 0x0ca3,0xfffc
170a 0ca5 fffb | | .CONST 0x0ca5,0xfffb
170c 0cb2 fffa | | .CONST 0x0cb2,0xfffa
170e 0cbb fff9 | | .CONST 0x0cbb,0xfff9
1710 0cc8 fff8 | | .CONST 0x0cc8,0xfff8
1712 0ccc fff7 | | .CONST 0x0ccc,0xfff7
1714 0ccd fff6 | | .CONST 0x0ccd,0xfff6
1716 0ccf fff5 | | .CONST 0x0ccf,0xfff5
1718 0cd1 fff4 | | .CONST 0x0cd1,0xfff4
171a ; --------------------------------------------------------------------------------------
171a ; Debug3 Subtable 0x2a
171a ; --------------------------------------------------------------------------------------
171a 000f 0000 | | .DBG3TAB 0x000f,0x0000
171c 0cd4 ffff | | .CONST 0x0cd4,0xffff
171e 0cd5 fffe | | .CONST 0x0cd5,0xfffe
1720 0cdf fffd | | .CONST 0x0cdf,0xfffd
1722 0ce1 fffc | | .CONST 0x0ce1,0xfffc
1724 0ce6 fffb | | .CONST 0x0ce6,0xfffb
1726 0ce8 fffa | | .CONST 0x0ce8,0xfffa
1728 0cea fff9 | | .CONST 0x0cea,0xfff9
172a 0cec fff8 | | .CONST 0x0cec,0xfff8
172c 0cee fff7 | | .CONST 0x0cee,0xfff7
172e 0cf0 fff6 | | .CONST 0x0cf0,0xfff6
1730 0cf2 fff5 | | .CONST 0x0cf2,0xfff5
1732 0cf4 fff4 | | .CONST 0x0cf4,0xfff4
1734 0cf9 fff3 | | .CONST 0x0cf9,0xfff3
1736 0cfb fff2 | | .CONST 0x0cfb,0xfff2
1738 0cfd fff1 | | .CONST 0x0cfd,0xfff1
173a ; --------------------------------------------------------------------------------------
173a ; Debug3 Subtable 0x2b
173a ; --------------------------------------------------------------------------------------
173a 0000 0000 | | .DBG3TAB 0x0000,0x0000
173c ; --------------------------------------------------------------------------------------
173c ; Debug3 Subtable 0x2c
173c ; --------------------------------------------------------------------------------------
173c 0000 0000 | | .DBG3TAB 0x0000,0x0000
173e ; --------------------------------------------------------------------------------------
173e ; Debug3 Subtable 0x2d
173e ; --------------------------------------------------------------------------------------
173e 0000 0002 | | .DBG3TAB 0x0000,0x0002
1740 0d4b 0001 | K | .CONST 0x0d4b,0x0001
1742 0d4f 0002 | O | .CONST 0x0d4f,0x0002
1744 ; --------------------------------------------------------------------------------------
1744 ; Debug3 Subtable 0x2e
1744 ; --------------------------------------------------------------------------------------
1744 0000 0000 | | .DBG3TAB 0x0000,0x0000
1746 ; --------------------------------------------------------------------------------------
1746 ; Debug3 Subtable 0x2f
1746 ; --------------------------------------------------------------------------------------
1746 0000 0003 | | .DBG3TAB 0x0000,0x0003
1748 0d73 0001 | s | .CONST 0x0d73,0x0001
174a 0d75 0002 | u | .CONST 0x0d75,0x0002
174c 0d77 0003 | w | .CONST 0x0d77,0x0003
174e ; --------------------------------------------------------------------------------------
174e ; Debug3 Subtable 0x30
174e ; --------------------------------------------------------------------------------------
174e 0000 0001 | | .DBG3TAB 0x0000,0x0001
1750 0d83 0001 | | .CONST 0x0d83,0x0001
1752 ; --------------------------------------------------------------------------------------
1752 ; Debug3 Subtable 0x31
1752 ; --------------------------------------------------------------------------------------
1752 0000 0003 | | .DBG3TAB 0x0000,0x0003
1754 0d8b 0001 | | .CONST 0x0d8b,0x0001
1756 0d8d 0002 | | .CONST 0x0d8d,0x0002
1758 0d8e 0003 | | .CONST 0x0d8e,0x0003
175a ; --------------------------------------------------------------------------------------
175a ; Debug3 Subtable 0x32
175a ; --------------------------------------------------------------------------------------
175a 0003 0004 | | .DBG3TAB 0x0003,0x0004
175c 0d9b ffff | | .CONST 0x0d9b,0xffff
175e 0da4 fffe | | .CONST 0x0da4,0xfffe
1760 0da9 fffd | | .CONST 0x0da9,0xfffd
1762 0dab 0001 | | .CONST 0x0dab,0x0001
1764 0dac 0002 | | .CONST 0x0dac,0x0002
1766 0db2 0003 | | .CONST 0x0db2,0x0003
1768 0dbd 0004 | | .CONST 0x0dbd,0x0004
176a ; --------------------------------------------------------------------------------------
176a ; Debug3 Subtable 0x33
176a ; --------------------------------------------------------------------------------------
176a 0006 000a | | .DBG3TAB 0x0006,0x000a
176c 0dc3 ffff | | .CONST 0x0dc3,0xffff
176e 0dc8 fffe | | .CONST 0x0dc8,0xfffe
1770 0dcb fffd | | .CONST 0x0dcb,0xfffd
1772 0dcc fffc | | .CONST 0x0dcc,0xfffc
1774 0dce fffb | | .CONST 0x0dce,0xfffb
1776 0dd2 fffa | | .CONST 0x0dd2,0xfffa
1778 0dd7 0001 | | .CONST 0x0dd7,0x0001
177a 0de6 0002 | | .CONST 0x0de6,0x0002
177c 0de9 0003 | | .CONST 0x0de9,0x0003
177e 0e11 0004 | | .CONST 0x0e11,0x0004
1780 0e13 0401 | | .CONST 0x0e13,0x0401
1782 0e15 0402 | | .CONST 0x0e15,0x0402
1784 0e19 0005 | | .CONST 0x0e19,0x0005
1786 0e26 0006 | & | .CONST 0x0e26,0x0006
1788 0e28 0801 | ( | .CONST 0x0e28,0x0801
178a 0e2a 0802 | * | .CONST 0x0e2a,0x0802
178c ; --------------------------------------------------------------------------------------
178c ; Debug3 Subtable 0x34
178c ; --------------------------------------------------------------------------------------
178c 0000 0004 | | .DBG3TAB 0x0000,0x0004
178e 0e33 0001 | 3 | .CONST 0x0e33,0x0001
1790 0e34 0002 | 4 | .CONST 0x0e34,0x0002
1792 0e3a 0003 | : | .CONST 0x0e3a,0x0003
1794 0e3b 0004 | ; | .CONST 0x0e3b,0x0004
1796 ; --------------------------------------------------------------------------------------
1796 ; Debug3 Subtable 0x35
1796 ; --------------------------------------------------------------------------------------
1796 0001 0003 | | .DBG3TAB 0x0001,0x0003
1798 0e4b ffff | K | .CONST 0x0e4b,0xffff
179a 0e4d 0001 | M | .CONST 0x0e4d,0x0001
179c 0e55 0002 | U | .CONST 0x0e55,0x0002
179e 0e57 0003 | W | .CONST 0x0e57,0x0003
17a0 ; --------------------------------------------------------------------------------------
17a0 ; Debug3 Subtable 0x36
17a0 ; --------------------------------------------------------------------------------------
17a0 0000 0000 | | .DBG3TAB 0x0000,0x0000
17a2 ; --------------------------------------------------------------------------------------
17a2 ; Debug3 Subtable 0x37
17a2 ; --------------------------------------------------------------------------------------
17a2 0000 0003 | | .DBG3TAB 0x0000,0x0003
17a4 0e8c 0001 | | .CONST 0x0e8c,0x0001
17a6 0e8d 0002 | | .CONST 0x0e8d,0x0002
17a8 0e91 0004 | | .CONST 0x0e91,0x0004
17aa ; --------------------------------------------------------------------------------------
17aa ; Debug3 Subtable 0x38
17aa ; --------------------------------------------------------------------------------------
17aa 0000 0000 | | .DBG3TAB 0x0000,0x0000
17ac ; --------------------------------------------------------------------------------------
17ac ; Debug3 Subtable 0x39
17ac ; --------------------------------------------------------------------------------------
17ac 0000 0000 | | .DBG3TAB 0x0000,0x0000
17ae 0000 0000 | | .BLANK 0000[0x52]