|
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 INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x10,0xfffd 0012 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x12,0xfffc 0014 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x14,0xfffb 0016 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1b,0xfff8 001d 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0128,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x25,0xfff3 0027 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x27,0xfff2 0029 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x29,0xfff1 002b 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x2b,0xfff0 002d 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0260,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x33,0xffed 0035 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0358,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x15 = 0x3a,0xffea 003c 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x16 = 0x3c,0xffe9 003e 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x17 = 0x3e,0xffe8 0040 029a 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x18 = 0x40,0xffe7 0042 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0398,For_Call 0049 03fe | | Declare_Type Discrete,Defined,Visible 004a 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1c = 0x4a,0xffe3 004c 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1d = 0x4c,0xffe2 004e 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1e = 0x4e,0xffe1 0050 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1f = 0x50,0xffe0 0052 029a 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x20 = 0x52,0xffdf 0054 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x21 = 0x54,0xffde 0056 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x22 = 0x56,0xffdd 0058 029a 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x23 = 0x58,0xffdc 005a 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x24 = 0x5a,0xffdb 005c 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x25 = 0x5c,0xffda 005e 029a 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0998,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x28 = 0x62,0xffd7 0064 029a 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call,Visible,Unelaborated ; 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 INIT_09d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2b = 0x6f,0xffd4 0071 029a 0af3 | | Declare_Subprogram INIT_0af0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2c = 0x71,0xffd3 0073 029a 0b5b | [| Declare_Subprogram INIT_0b58,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0b68,For_Call 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 INIT_0b88,For_Outer_Call,Visible ; 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 INIT_0c30,For_Outer_Call,Visible ; 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_0c60,For_Call 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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 0x4 ; Debug Table 0x14 = .DEBUG 0x039b,0x13d4,0x0005,0x0000,0x0056,0xd7e5,0x0000,0x0888 039c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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 0x9 ; 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,New_Top_Offset 0x2 ; case 0x1 0b6e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0b6f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0b70 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0b71 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0b72 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 0b73 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 0b74 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_0d00,For_Call 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 INIT_0d18,For_Call 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 INIT_0d48,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0d58,For_Call 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 INIT_0d70,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x29.0x9 = 0xccd,0xfff6 0ccf 029a 0d83 | | Declare_Subprogram INIT_0d80,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x29.0xa = 0xccf,0xfff5 0cd1 029a 0d8b | | Declare_Subprogram INIT_0d88,For_Outer_Call,Visible,Unelaborated ; 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 INIT_0d98,For_Outer_Call ; Debug Table 0x2a.0x6 = 0xcea,0xfff9 0cec 029d 0dc3 | | Declare_Subprogram INIT_0dc0,For_Outer_Call ; Debug Table 0x2a.0x7 = 0xcec,0xfff8 0cee 029d 0e33 | 3| Declare_Subprogram INIT_0e30,For_Outer_Call ; 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 INIT_0e48,For_Outer_Call ; 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 0x9 ; 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,New_Top_Offset 0x2 ; case 0x1 0d06 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0d07 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0d08 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0d09 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0d0a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 0d0b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 0d0c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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 0x9 ; 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,New_Top_Offset 0x2 ; case 0x1 0d1e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0d1f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0d20 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0d21 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0d22 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,Indirect,Field_Number 0x3 0d2a 1c00 | | Execute_Immediate Run_Utility,0x0 0d2b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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 | QQ_execute Variant_Record,XXX 0d40 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 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_Value,New_Top_Offset 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 0x9 ; 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,New_Top_Offset 0x2 ; case 0x1 0d5e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0d5f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0d60 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0d61 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0d62 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 0d63 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 0d64 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 -0x4 0e02 4ffd |O | Short_Literal -0x3 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_0e98,For_Accept 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 0x2 0e90 7800 |x | Jump 0xe91 ; case 0x0 0e91 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x37.0x2 = 0xe91,0x4 ; case 0x1 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" 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" 0eb9 0135 | 5 | .STRTAB 0x0135->0x0f53 ; "Libraries do not have images." 0eba 0150 | P | .STRTAB 0x0150->0x0f62 ; "No image exists. Open again for Update to create one." 0ebb 0184 | | .STRTAB 0x0184->0x0f7d ; "Created an image for " 0ebc 0197 | | .STRTAB 0x0197->0x0f87 ; "Save_Image" 0ebd 019f | | .STRTAB 0x019f->0x0f8c ; "Close_Image" 0ebe 01a8 | | .STRTAB 0x01a8->0x0f92 ; "Closing an image without committing is not supported." 0ebf 01db | | .STRTAB 0x01db->0x0fac ; "Reformat_Image" 0ec0 01e7 | | .STRTAB 0x01e7->0x0fb3 ; "Set_Diana_Heap" 0ec1 01f3 | | .STRTAB 0x01f3->0x0fba ; "Can't find attribute space " 0ec2 020c | | .STRTAB 0x020c->0x0fc8 ; "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" 0ec5 024a | J | .STRTAB 0x024a->0x0fea ; "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]