|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 6144 (0x1800) Notes: 00_class, 580b_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 580b |X | .CONST 0x580b ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0748 | H | .CONST 0x0748 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00a1 | | .CONST 0x00a1 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0034 | 4 | .CONST 0x0034 ; Number of locals 000b INIT_0008: 000b 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x084a,0x8000,0x0000,0x0038,0xc6b6,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb 0015 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa 0017 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9 0019 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8 001b 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7 001d 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6 001f 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1f,0xfff5 0021 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x21,0xfff4 0023 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x23,0xfff3 0025 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x25,0xfff2 0027 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x27,0xfff1 0029 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x29,0xfff0 002b 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x2b,0xffef 002d 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x2d,0xffee 002f 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x2f,0xffed 0031 00bf | | Action Accept_Activation 0032 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0032,0x0872,0x8000,0x0000,0x0039,0x3426,0x0000,0x002d ; Debug Table 0x1.0x0 = 0x32,0xffff 0033 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x33,0xfffe 0034 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x34,0xfffd 0035 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x35,0xfffc 0036 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x36,0xfffb 0037 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x37,0xfffa 0038 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x38,0xfff9 0039 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x39,0xfff8 003a 0007 | | Action Break_Optional ; Debug Table 0x1.0x8 = 0x3a,0xfff7 003b 0007 | | Action Break_Optional ; Debug Table 0x1.0x9 = 0x3b,0xfff6 003c 0007 | | Action Break_Optional ; Debug Table 0x1.0xa = 0x3c,0xfff5 003d e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xb = 0x3d,0xfff4 003e 1912 | | Execute Package,Field_Reference,Field_Number 0x12 003f 0007 | | Action Break_Optional 0040 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xc = 0x40,0xfff3 0041 191b | | Execute Package,Field_Reference,Field_Number 0x1b 0042 0007 | | Action Break_Optional 0043 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xd = 0x43,0xfff2 0044 191e | | Execute Package,Field_Reference,Field_Number 0x1e 0045 0007 | | Action Break_Optional 0046 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0xe = 0x46,0xfff1 0047 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x1.0xf = 0x47,0xfff0 0048 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x10 = 0x48,0xffef 0049 4804 |H | Short_Literal 0x4 004a 029f 056b | k| Declare_Subprogram INIT_0568,For_Call 004c 03fd | | Declare_Type Discrete,Defined 004d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x11 = 0x4d,0xffee 004e 02a0 | | Declare_Subprogram Null_Subprogram ; Debug Table 0x1.0x12 = 0x4e,0xffed 004f 4800 |H | Short_Literal 0x0 0050 032d | - | Declare_Type Record,Defined 0051 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x13 = 0x51,0xffec 0052 02a0 | | Declare_Subprogram Null_Subprogram 0053 03ad | | Declare_Type Heap_Access,Defined 0054 0007 | | Action Break_Optional ; Debug Table 0x1.0x14 = 0x54,0xffeb 0055 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x1.0x15 = 0x55,0xffea 0056 e226 | & | Load 0x1,0x26 ; Debug Table 0x1.0x16 = 0x56,0xffe9 0057 0007 | | Action Break_Optional 0058 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x17 = 0x58,0xffe8 0059 1919 | | Execute Package,Field_Reference,Field_Number 0x19 005a 00c6 | | Action Check_Subprogram_Elaborated 005b 00d9 | | Load_Top At_Offset_1 005c 00d9 | | Load_Top At_Offset_1 005d 62e6 |b | Indirect_Literal Discrete,0x344,{0x00000000, 0x00393426} 005e 48db |H | Short_Literal 0xdb 005f 4800 |H | Short_Literal 0x0 0060 0007 | | Action Break_Optional 0061 029d 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call ; Debug Table 0x1.0x18 = 0x61,0xffe7 0063 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call ; Debug Table 0x1.0x19 = 0x63,0xffe6 0065 029d 059b | | Declare_Subprogram INIT_0598,For_Outer_Call ; Debug Table 0x1.0x1a = 0x65,0xffe5 0067 029d 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call ; Debug Table 0x1.0x1b = 0x67,0xffe4 0069 62da |b | Indirect_Literal Discrete,0x344,{0x00000000, 0x00393426} ; Debug Table 0x1.0x1c = 0x69,0xffe3 006a 4957 |IW | Short_Literal 0x157 006b e225 | % | Load 0x1,0x25 006c e003 | | Load 0x0,0x3 006d 190d | | Execute Package,Field_Reference,Field_Number 0xd 006e e001 | | Load 0x0,0x1 006f 191f | | Execute Package,Field_Reference,Field_Number 0x1f 0070 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 0071 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0072 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 0073 e004 | | Load 0x0,0x4 0074 0387 | | Declare_Variable Package 0075 00d8 | | Load_Top At_Offset_0 0076 020f | | Execute Module,Activate 0077 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call ; Debug Table 0x1.0x1d = 0x77,0xffe2 0079 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1e = 0x79,0xffe1 007a 00c7 | | Action Elaborate_Subprogram 007b 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x1f = 0x7b,0xffe0 007c 00c7 | | Action Elaborate_Subprogram 007d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x20 = 0x7d,0xffdf 007e 00c7 | | Action Elaborate_Subprogram 007f 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x21 = 0x7f,0xffde 0080 00c7 | | Action Elaborate_Subprogram 0081 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x22 = 0x81,0xffdd 0082 00c7 | | Action Elaborate_Subprogram 0083 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x23 = 0x83,0xffdc 0084 00c7 | | Action Elaborate_Subprogram 0085 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x24 = 0x85,0xffdb 0086 00c7 | | Action Elaborate_Subprogram 0087 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x25 = 0x87,0xffda 0088 00c7 | | Action Elaborate_Subprogram 0089 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x26 = 0x89,0xffd9 008a 00c7 | | Action Elaborate_Subprogram 008b 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x27 = 0x8b,0xffd8 008c 00c7 | | Action Elaborate_Subprogram 008d 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x28 = 0x8d,0xffd7 008e 00c7 | | Action Elaborate_Subprogram 008f 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call ; Debug Table 0x1.0x29 = 0x8f,0xffd6 0091 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x2a = 0x91,0xffd5 0092 00c7 | | Action Elaborate_Subprogram 0093 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x2b = 0x93,0xffd4 0094 00c7 | | Action Elaborate_Subprogram 0095 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x2c = 0x95,0xffd3 0096 00c7 | | Action Elaborate_Subprogram 0097 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x2d = 0x97,0xffd2 0098 00c7 | | Action Elaborate_Subprogram 0099 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x2e = 0x99,0xffd1 009a 00c7 | | Action Elaborate_Subprogram 009b 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x2f = 0x9b,0xffd0 009c 00c7 | | Action Elaborate_Subprogram 009d 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x30 = 0x9d,0xffcf 009e 00c7 | | Action Elaborate_Subprogram 009f 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x31 = 0x9f,0xffce 00a0 00c7 | | Action Elaborate_Subprogram 00a1 BODY_0008: 00a1 00bc | | Action Signal_Activated 00a2 00bb | | Action Signal_Completion 00a3 0000 0000 | | .BLANK 0000[0x5] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab e223 | # | Load 0x1,0x23 ; Debug Table 0x2 = .DEBUG 0x00ab,0x08d8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0006 ; Debug Table 0x2.0x0 = 0xab,0x1 00ac 00eb | | Load_Encached Diana_Cache 00ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00ae 7009 |p | Jump_Nonzero 0xb8 00af e223 | # | Load 0x1,0x23 ; Debug Table 0x2.0x1 = 0xaf,0x2 00b0 8221 | ! | Call 0x1,0x21 00b1 00eb | | Load_Encached Diana_Cache ; Debug Table 0x2.0x2 = 0xb1,0x3 00b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00b3 a223 | # | Store_Unchecked 0x1,0x23 00b4 00eb | | Load_Encached Diana_Cache ; Debug Table 0x2.0x3 = 0xb4,0x4 00b5 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 00b6 a224 | $ | Store_Unchecked 0x1,0x24 00b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00b8 8220 | | Call 0x1,0x20 ; Debug Table 0x2.0x4 = 0xb8,0x5 00b9 00eb | | Load_Encached Diana_Cache 00ba 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00bb 0fa8 | | Execute_Immediate Equal,-0x58 00bc 6805 |h | Jump_Zero 0xc2 00bd 8220 | | Call 0x1,0x20 ; Debug Table 0x2.0x5 = 0xbd,0x6 00be e005 | | Load 0x0,0x5 00bf 180e | | Execute Package,Field_Execute,Field_Number 0xe 00c0 8221 | ! | Call 0x1,0x21 00c1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00c2 8220 | | Call 0x1,0x20 ; Debug Table 0x2.0x6 = 0xc2,0x7 00c3 00eb | | Load_Encached Diana_Cache 00c4 18ec | | Execute Package,Field_Execute,Field_Number 0xec 00c5 8221 | ! | Call 0x1,0x21 00c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00c7 0000 | | .XXX[0x1] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cc | | .CONST 0x00cc ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0002 | | .CONST 0x0002 ; Number of locals 00cb INIT_00c8: 00cb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x00cb,0x08e8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x000a ; Debug Table 0x3.0x0 = 0xcb,0xffff 00cc BODY_00c8: 00cc 8220 | | Call 0x1,0x20 ; Debug Table 0x3.0x1 = 0xcc,0x1 00cd e006 | | Load 0x0,0x6 00ce 180f | | Execute Package,Field_Execute,Field_Number 0xf 00cf 6802 |h | Jump_Zero 0xd2 00d0 8210 | | Call 0x1,0x10 ; Debug Table 0x3.0x2 = 0xd0,0x2 00d1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00d2 8220 | | Call 0x1,0x20 ; Debug Table 0x3.0x3 = 0xd2,0x3 00d3 e007 | | Load 0x0,0x7 00d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00d5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00d6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x4 = 0xd6,0x4 00d7 00eb | | Load_Encached Diana_Cache 00d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00d9 7003 |p | Jump_Nonzero 0xdd 00da 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x5 = 0xda,0x5 00db 8221 | ! | Call 0x1,0x21 00dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00dd 8220 | | Call 0x1,0x20 ; Debug Table 0x3.0x6 = 0xdd,0x6 00de e008 | | Load 0x0,0x8 00df 180e | | Execute Package,Field_Execute,Field_Number 0xe 00e0 8221 | ! | Call 0x1,0x21 00e1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00e2 0000 0000 | | .BLANK 0000[0x6] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00ef | | .CONST 0x00ef ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0003 | | .CONST 0x0003 ; Number of locals 00eb INIT_00e8: 00eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00eb,0x08f8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x000e ; Debug Table 0x4.0x0 = 0xeb,0xffff 00ec 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0xec,0xfffe 00ed 8220 | | Call 0x1,0x20 00ee 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00ef BODY_00e8: 00ef 00eb | | Load_Encached Diana_Cache ; Debug Table 0x4.0x2 = 0xef,0x1 00f0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00f1 0032 | 2 | Store_Top Heap_Access,At_Offset_2 00f2 00cf | | Action Mark_Auxiliary 00f3 7804 |x | Jump 0xf8 00f4 8220 | | Call 0x1,0x20 ; Debug Table 0x4.0x3 = 0xf4,0x3 00f5 0033 | 3 | Store_Top Heap_Access,At_Offset_3 00f6 820d | | Call 0x1,0xd ; Debug Table 0x4.0x4 = 0xf6,0x4 00f7 00c9 | | Action Pop_Auxiliary_Loop 00f8 8220 | | Call 0x1,0x20 ; Debug Table 0x4.0x5 = 0xf8,0x2 00f9 00eb | | Load_Encached Diana_Cache 00fa 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00fb 0fa8 | | Execute_Immediate Equal,-0x58 00fc 7004 |p | Jump_Nonzero 0x101 00fd 00da | | Load_Top At_Offset_2 00fe 8220 | | Call 0x1,0x20 00ff 021f | | Execute Heap_Access,Equal 0100 6ff3 |o | Jump_Zero 0xf4 0101 00ce | | Action Pop_Auxiliary 0102 820d | | Call 0x1,0xd ; Debug Table 0x4.0x6 = 0x102,0x5 0103 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x7 = 0x103,0x6 0104 e006 | | Load 0x0,0x6 0105 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0106 6801 |h | Jump_Zero 0x108 0107 820d | | Call 0x1,0xd ; Debug Table 0x4.0x8 = 0x107,0x7 0108 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0109 0000 0000 | | .BLANK 0000[0x7] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0118 | | .CONST 0x0118 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0002 | | .CONST 0x0002 ; Number of locals 0113 INIT_0110: 0113 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x0113,0x090c,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0012 ; Debug Table 0x5.0x0 = 0x113,0xffff 0114 8220 | | Call 0x1,0x20 0115 e006 | | Load 0x0,0x6 0116 180d | | Execute Package,Field_Execute,Field_Number 0xd 0117 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0118 BODY_0110: 0118 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0x118,0x1 0119 00eb | | Load_Encached Diana_Cache 011a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 011b 7003 |p | Jump_Nonzero 0x11f 011c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x11c,0x2 011d 8221 | ! | Call 0x1,0x21 011e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 011f 8222 | " | Call 0x1,0x22 ; Debug Table 0x5.0x3 = 0x11f,0x3 0120 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0121 0000 0000 | | .BLANK 0000[0x7] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012c | , | .CONST 0x012c ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0002 | | .CONST 0x0002 ; Number of locals 012b INIT_0128: 012b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6 = .DEBUG 0x012b,0x0916,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0016 ; Debug Table 0x6.0x0 = 0x12b,0xffff 012c BODY_0128: 012c 8220 | | Call 0x1,0x20 ; Debug Table 0x6.0x1 = 0x12c,0x1 012d 00eb | | Load_Encached Diana_Cache 012e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 012f 0fa8 | | Execute_Immediate Equal,-0x58 0130 7007 |p | Jump_Nonzero 0x138 0131 8220 | | Call 0x1,0x20 0132 00eb | | Load_Encached Diana_Cache 0133 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0134 00eb | | Load_Encached Diana_Cache 0135 1883 | | Execute Package,Field_Execute,Field_Number 0x83 0136 0f04 | | Execute_Immediate Equal,0x4 0137 7005 |p | Jump_Nonzero 0x13d 0138 00eb | | Load_Encached Diana_Cache ; Debug Table 0x6.0x2 = 0x138,0x2 0139 1812 | | Execute Package,Field_Execute,Field_Number 0x12 013a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 013b 8218 | | Call 0x1,0x18 ; Debug Table 0x6.0x3 = 0x13b,0x3 013c 7803 |x | Jump 0x140 013d 8220 | | Call 0x1,0x20 ; Debug Table 0x6.0x4 = 0x13d,0x4 013e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 013f 8212 | | Call 0x1,0x12 ; Debug Table 0x6.0x5 = 0x13f,0x5 0140 00cf | | Action Mark_Auxiliary 0141 7808 |x | Jump 0x14a 0142 8220 | | Call 0x1,0x20 ; Debug Table 0x6.0x6 = 0x142,0x7 0143 e005 | | Load 0x0,0x5 0144 180d | | Execute Package,Field_Execute,Field_Number 0xd 0145 7008 |p | Jump_Nonzero 0x14e 0146 8220 | | Call 0x1,0x20 ; Debug Table 0x6.0x7 = 0x146,0x8 0147 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0148 8212 | | Call 0x1,0x12 ; Debug Table 0x6.0x8 = 0x148,0x9 0149 00c9 | | Action Pop_Auxiliary_Loop 014a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x9 = 0x14a,0x6 014b 8220 | | Call 0x1,0x20 014c 021f | | Execute Heap_Access,Equal 014d 6ff4 |o | Jump_Zero 0x142 014e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0154 | T | .CONST 0x0154 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0002 | | .CONST 0x0002 ; Number of locals 0153 INIT_0150: 0153 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x7 = .DEBUG 0x0153,0x092c,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x001a ; Debug Table 0x7.0x0 = 0x153,0xffff 0154 BODY_0150: 0154 e224 | $ | Load 0x1,0x24 ; Debug Table 0x7.0x1 = 0x154,0x1 0155 00eb | | Load_Encached Diana_Cache 0156 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0157 7009 |p | Jump_Nonzero 0x161 0158 e224 | $ | Load 0x1,0x24 ; Debug Table 0x7.0x2 = 0x158,0x2 0159 00eb | | Load_Encached Diana_Cache 015a 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 015b 8221 | ! | Call 0x1,0x21 015c e224 | $ | Load 0x1,0x24 ; Debug Table 0x7.0x3 = 0x15c,0x3 015d 00eb | | Load_Encached Diana_Cache 015e 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 015f a224 | $ | Store_Unchecked 0x1,0x24 0160 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0161 8220 | | Call 0x1,0x20 ; Debug Table 0x7.0x4 = 0x161,0x4 0162 00eb | | Load_Encached Diana_Cache 0163 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0164 00eb | | Load_Encached Diana_Cache 0165 1883 | | Execute Package,Field_Execute,Field_Number 0x83 0166 0f04 | | Execute_Immediate Equal,0x4 0167 6813 |h | Jump_Zero 0x17b 0168 8220 | | Call 0x1,0x20 ; Debug Table 0x7.0x5 = 0x168,0x5 0169 4975 |Iu | Short_Literal 0x175 016a 00eb | | Load_Encached Diana_Cache 016b 0098 | | Execute Package,Field_Read_Dynamic 016c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 016d 00eb | | Load_Encached Diana_Cache 016e 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 016f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0170 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x6 = 0x170,0x6 0171 00eb | | Load_Encached Diana_Cache 0172 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0173 7005 |p | Jump_Nonzero 0x179 0174 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x7 = 0x174,0x7 0175 00eb | | Load_Encached Diana_Cache 0176 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0177 8221 | ! | Call 0x1,0x21 0178 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0179 8222 | " | Call 0x1,0x22 ; Debug Table 0x7.0x8 = 0x179,0x8 017a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 017b 8220 | | Call 0x1,0x20 ; Debug Table 0x7.0x9 = 0x17b,0x9 017c 00eb | | Load_Encached Diana_Cache 017d 1883 | | Execute Package,Field_Execute,Field_Number 0x83 017e 0f04 | | Execute_Immediate Equal,0x4 017f 680f |h | Jump_Zero 0x18f 0180 8220 | | Call 0x1,0x20 ; Debug Table 0x7.0xa = 0x180,0xa 0181 00eb | | Load_Encached Diana_Cache 0182 1888 | | Execute Package,Field_Execute,Field_Number 0x88 0183 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0184 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xb = 0x184,0xb 0185 00eb | | Load_Encached Diana_Cache 0186 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0187 7005 |p | Jump_Nonzero 0x18d 0188 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xc = 0x188,0xc 0189 00eb | | Load_Encached Diana_Cache 018a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 018b 8221 | ! | Call 0x1,0x21 018c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 018d 8222 | " | Call 0x1,0x22 ; Debug Table 0x7.0xd = 0x18d,0xd 018e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 018f 8222 | " | Call 0x1,0x22 ; Debug Table 0x7.0xe = 0x18f,0xe 0190 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0191 0000 0000 | | .BLANK 0000[0x7] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019e | | .CONST 0x019e ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0003 | | .CONST 0x0003 ; Number of locals 019b INIT_0198: 019b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x8 = .DEBUG 0x019b,0x094c,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x001e ; Debug Table 0x8.0x0 = 0x19b,0xffff 019c 029f 0623 | #| Declare_Subprogram INIT_0620,For_Call ; Debug Table 0x8.0x1 = 0x19c,0xfffe 019e BODY_0198: 019e 8220 | | Call 0x1,0x20 ; Debug Table 0x8.0x2 = 0x19e,0x1 019f 00eb | | Load_Encached Diana_Cache 01a0 18ec | | Execute Package,Field_Execute,Field_Number 0xec 01a1 00eb | | Load_Encached Diana_Cache 01a2 1883 | | Execute Package,Field_Execute,Field_Number 0x83 01a3 0f04 | | Execute_Immediate Equal,0x4 01a4 680e |h | Jump_Zero 0x1b3 01a5 8220 | | Call 0x1,0x20 ; Debug Table 0x8.0x3 = 0x1a5,0x2 01a6 4975 |Iu | Short_Literal 0x175 01a7 00eb | | Load_Encached Diana_Cache 01a8 0098 | | Execute Package,Field_Read_Dynamic 01a9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01aa 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01ab 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x4 = 0x1ab,0x3 01ac 00eb | | Load_Encached Diana_Cache 01ad 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 01ae 7002 |p | Jump_Nonzero 0x1b1 01af 8403 | | Call 0x2,0x3 ; Debug Table 0x8.0x5 = 0x1af,0x4 01b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b1 8222 | " | Call 0x1,0x22 ; Debug Table 0x8.0x6 = 0x1b1,0x5 01b2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b3 8220 | | Call 0x1,0x20 ; Debug Table 0x8.0x7 = 0x1b3,0x6 01b4 00eb | | Load_Encached Diana_Cache 01b5 1883 | | Execute Package,Field_Execute,Field_Number 0x83 01b6 0f04 | | Execute_Immediate Equal,0x4 01b7 680c |h | Jump_Zero 0x1c4 01b8 8220 | | Call 0x1,0x20 ; Debug Table 0x8.0x8 = 0x1b8,0x7 01b9 00eb | | Load_Encached Diana_Cache 01ba 1888 | | Execute Package,Field_Execute,Field_Number 0x88 01bb 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01bc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x9 = 0x1bc,0x8 01bd 00eb | | Load_Encached Diana_Cache 01be 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 01bf 7002 |p | Jump_Nonzero 0x1c2 01c0 8403 | | Call 0x2,0x3 ; Debug Table 0x8.0xa = 0x1c0,0x9 01c1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01c2 8222 | " | Call 0x1,0x22 ; Debug Table 0x8.0xb = 0x1c2,0xa 01c3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01c4 8222 | " | Call 0x1,0x22 ; Debug Table 0x8.0xc = 0x1c4,0xb 01c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01c6 0000 0000 | | .XXX[0x2] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cf | | .CONST 0x01cf ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0005 | | .CONST 0x0005 ; Number of locals 01cb INIT_01c8: 01cb 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9 = .DEBUG 0x01cb,0x0968,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0022 ; Debug Table 0x9.0x0 = 0x1cb,0xffff 01cc 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9.0x1 = 0x1cc,0xfffe 01cd 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x2 = 0x1cd,0xfffd 01ce 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x3 = 0x1ce,0xfffc 01cf BODY_01c8: 01cf 8220 | | Call 0x1,0x20 ; Debug Table 0x9.0x4 = 0x1cf,0x1 01d0 00eb | | Load_Encached Diana_Cache 01d1 18ec | | Execute Package,Field_Execute,Field_Number 0xec 01d2 00eb | | Load_Encached Diana_Cache 01d3 1883 | | Execute Package,Field_Execute,Field_Number 0x83 01d4 0f04 | | Execute_Immediate Equal,0x4 01d5 682c |h, | Jump_Zero 0x202 01d6 8220 | | Call 0x1,0x20 ; Debug Table 0x9.0x5 = 0x1d6,0x2 01d7 00eb | | Load_Encached Diana_Cache 01d8 18ec | | Execute Package,Field_Execute,Field_Number 0xec 01d9 00eb | | Load_Encached Diana_Cache 01da 1888 | | Execute Package,Field_Execute,Field_Number 0x88 01db 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01dc 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x6 = 0x1dc,0x3 01dd 00eb | | Load_Encached Diana_Cache 01de 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 01df 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01e0 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x7 = 0x1e0,0x4 01e1 00eb | | Load_Encached Diana_Cache 01e2 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 01e3 a402 | | Store_Unchecked 0x2,0x2 01e4 00cf | | Action Mark_Auxiliary 01e5 0007 | | Action Break_Optional ; Debug Table 0x9.0x8 = 0x1e5,0x5 01e6 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x9 = 0x1e6,0x6 01e7 00eb | | Load_Encached Diana_Cache 01e8 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 01e9 7015 |p | Jump_Nonzero 0x1ff 01ea e402 | | Load 0x2,0x2 ; Debug Table 0x9.0xa = 0x1ea,0x7 01eb 00eb | | Load_Encached Diana_Cache 01ec 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 01ed 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01ee 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xb = 0x1ee,0x8 01ef 8220 | | Call 0x1,0x20 01f0 021f | | Execute Heap_Access,Equal 01f1 6803 |h | Jump_Zero 0x1f5 01f2 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xc = 0x1f2,0x9 01f3 8221 | ! | Call 0x1,0x21 01f4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0xd = 0x1f4,0xa 01f5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xe = 0x1f5,0xb 01f6 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01f7 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0xf = 0x1f7,0xc 01f8 a403 | | Store_Unchecked 0x2,0x3 01f9 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x10 = 0x1f9,0xd 01fa 00eb | | Load_Encached Diana_Cache 01fb 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 01fc a402 | | Store_Unchecked 0x2,0x2 01fd 00c9 | | Action Pop_Auxiliary_Loop 01fe 7fe7 | | Jump 0x1e6 01ff 00ce | | Action Pop_Auxiliary 0200 8222 | " | Call 0x1,0x22 ; Debug Table 0x9.0x11 = 0x200,0xe 0201 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0202 8222 | " | Call 0x1,0x22 ; Debug Table 0x9.0x12 = 0x202,0xf 0203 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0204 0000 0000 | | .BLANK 0000[0x4] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020c | | .CONST 0x020c ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0002 | | .CONST 0x0002 ; Number of locals 020b INIT_0208: 020b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa = .DEBUG 0x020b,0x0990,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0026 ; Debug Table 0xa.0x0 = 0x20b,0xffff 020c BODY_0208: 020c 8220 | | Call 0x1,0x20 ; Debug Table 0xa.0x1 = 0x20c,0x1 020d 00eb | | Load_Encached Diana_Cache 020e 1883 | | Execute Package,Field_Execute,Field_Number 0x83 020f 0f04 | | Execute_Immediate Equal,0x4 0210 680d |h | Jump_Zero 0x21e 0211 8220 | | Call 0x1,0x20 ; Debug Table 0xa.0x2 = 0x211,0x2 0212 00eb | | Load_Encached Diana_Cache 0213 1888 | | Execute Package,Field_Execute,Field_Number 0x88 0214 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0215 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x3 = 0x215,0x3 0216 00eb | | Load_Encached Diana_Cache 0217 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0218 7004 |p | Jump_Nonzero 0x21d 0219 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x4 = 0x219,0x4 021a 00eb | | Load_Encached Diana_Cache 021b 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 021c 8221 | ! | Call 0x1,0x21 021d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 021e 8220 | | Call 0x1,0x20 ; Debug Table 0xa.0x5 = 0x21e,0x5 021f 00eb | | Load_Encached Diana_Cache 0220 1885 | | Execute Package,Field_Execute,Field_Number 0x85 0221 8221 | ! | Call 0x1,0x21 0222 8220 | | Call 0x1,0x20 ; Debug Table 0xa.0x6 = 0x222,0x6 0223 00eb | | Load_Encached Diana_Cache 0224 1883 | | Execute Package,Field_Execute,Field_Number 0x83 0225 0f04 | | Execute_Immediate Equal,0x4 0226 680c |h | Jump_Zero 0x233 0227 8220 | | Call 0x1,0x20 ; Debug Table 0xa.0x7 = 0x227,0x7 0228 00eb | | Load_Encached Diana_Cache 0229 1888 | | Execute Package,Field_Execute,Field_Number 0x88 022a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 022b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x8 = 0x22b,0x8 022c 00eb | | Load_Encached Diana_Cache 022d 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 022e 7004 |p | Jump_Nonzero 0x233 022f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x9 = 0x22f,0x9 0230 00eb | | Load_Encached Diana_Cache 0231 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0232 8221 | ! | Call 0x1,0x21 0233 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0234 0000 0000 | | .BLANK 0000[0x4] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023c | < | .CONST 0x023c ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0002 | | .CONST 0x0002 ; Number of locals 023b INIT_0238: 023b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb = .DEBUG 0x023b,0x09a6,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x002a ; Debug Table 0xb.0x0 = 0x23b,0xffff 023c BODY_0238: 023c 8220 | | Call 0x1,0x20 ; Debug Table 0xb.0x1 = 0x23c,0x1 023d 00eb | | Load_Encached Diana_Cache 023e 1886 | | Execute Package,Field_Execute,Field_Number 0x86 023f 8221 | ! | Call 0x1,0x21 0240 8220 | | Call 0x1,0x20 ; Debug Table 0xb.0x2 = 0x240,0x2 0241 00eb | | Load_Encached Diana_Cache 0242 1883 | | Execute Package,Field_Execute,Field_Number 0x83 0243 0f04 | | Execute_Immediate Equal,0x4 0244 680c |h | Jump_Zero 0x251 0245 8220 | | Call 0x1,0x20 ; Debug Table 0xb.0x3 = 0x245,0x3 0246 00eb | | Load_Encached Diana_Cache 0247 1888 | | Execute Package,Field_Execute,Field_Number 0x88 0248 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0249 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x249,0x4 024a 00eb | | Load_Encached Diana_Cache 024b 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 024c 7004 |p | Jump_Nonzero 0x251 024d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x5 = 0x24d,0x5 024e 00eb | | Load_Encached Diana_Cache 024f 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0250 8221 | ! | Call 0x1,0x21 0251 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0252 0000 0000 | | .BLANK 0000[0x6] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 8220 | | Call 0x1,0x20 ; Debug Table 0xc = .DEBUG 0x025b,0x09b4,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x002e ; Debug Table 0xc.0x0 = 0x25b,0x1 025c 00eb | | Load_Encached Diana_Cache 025d 1887 | | Execute Package,Field_Execute,Field_Number 0x87 025e 8221 | ! | Call 0x1,0x21 025f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 8220 | | Call 0x1,0x20 ; Debug Table 0xd = .DEBUG 0x0263,0x09b8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0032 ; Debug Table 0xd.0x0 = 0x263,0x1 0264 8234 | 4 | Call 0x1,0x34 0265 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0266 0000 0000 | | .XXX[0x2] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 8218 | | Call 0x1,0x18 ; Debug Table 0xe = .DEBUG 0x026b,0x09bc,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0036 ; Debug Table 0xe.0x0 = 0x26b,0x1 026c 8213 | | Call 0x1,0x13 ; Debug Table 0xe.0x1 = 0x26c,0x2 026d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 026e 0000 0000 | | .XXX[0x2] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0287 | | .CONST 0x0287 ; Address of begin 0271 0341 | A | .CONST 0x0341 ; Address of exception handler 0272 0008 | | .CONST 0x0008 ; Number of locals 0273 INIT_0270: 0273 4801 |H | Short_Literal 0x1 ; Debug Table 0xf = .DEBUG 0x0273,0x09c2,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x003a ; Debug Table 0xf.0x0 = 0x273,0xffff 0274 4864 |Hd | Short_Literal 0x64 0275 00e9 | | Load_Encached String_Cache 0276 0334 | 4 | Declare_Variable Array,With_Constraint 0277 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xf.0x1 = 0x277,0xfffe 0278 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x2 = 0x278,0xfffd 0279 e009 | | Load 0x0,0x9 ; Debug Table 0xf.0x3 = 0x279,0xfffc 027a 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 027b 02c7 | | Declare_Variable Any 027c 00d8 | | Load_Top At_Offset_0 027d 1c00 | | Execute_Immediate Run_Utility,0x0 027e e00a | | Load 0x0,0xa ; Debug Table 0xf.0x4 = 0x27e,0xfffb 027f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0280 e00b | | Load 0x0,0xb ; Debug Table 0xf.0x5 = 0x280,0xfffa 0281 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0282 02c7 | | Declare_Variable Any 0283 00d8 | | Load_Top At_Offset_0 0284 1c00 | | Execute_Immediate Run_Utility,0x0 0285 029f 063b | ;| Declare_Subprogram INIT_0638,For_Call 0287 BODY_0270: 0287 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xf.0x6 = 0x287,0x1 0288 e402 | | Load 0x2,0x2 0289 4801 |H | Short_Literal 0x1 028a e001 | | Load 0x0,0x1 028b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 028c 00d1 | | Pop_Control Pop_Count_1 028d c403 | | Store 0x2,0x3 028e e403 | | Load 0x2,0x3 ; Debug Table 0xf.0x7 = 0x28e,0x2 028f 7007 |p | Jump_Nonzero 0x297 0290 0092 066f | o| Action Push_String_Extended,0x66f ; "*** no name given" ; Debug Table 0xf.0x8 = 0x290,0x3 0292 e003 | | Load 0x0,0x3 0293 180e | | Execute Package,Field_Execute,Field_Number 0xe 0294 e003 | | Load 0x0,0x3 ; Debug Table 0xf.0x9 = 0x294,0x4 0295 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0296 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0xa = 0x296,0x5 0297 e00a | | Load 0x0,0xa ; Debug Table 0xf.0xb = 0x297,0x6 0298 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0299 e405 | | Load 0x2,0x5 029a 0120 | | Execute Any,Is_Value 029b 6803 |h | Jump_Zero 0x29f 029c e009 | | Load 0x0,0x9 029d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 029e 7801 |x | Jump 0x2a0 029f e405 | | Load 0x2,0x5 02a0 e00b | | Load 0x0,0xb 02a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02a2 4800 |H | Short_Literal 0x0 02a3 4800 |H | Short_Literal 0x0 02a4 e00c | | Load 0x0,0xc 02a5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02a6 4800 |H | Short_Literal 0x0 02a7 8220 | | Call 0x1,0x20 02a8 e009 | | Load 0x0,0x9 02a9 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 02aa c405 | | Store 0x2,0x5 02ab 005b | [ | Store_Top Discrete,At_Offset_3 02ac 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0xc = 0x2ac,0x7 02ad e009 | | Load 0x0,0x9 02ae 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 02af 680d |h | Jump_Zero 0x2bd 02b0 0092 0670 | p| Action Push_String_Extended,0x670 ; "data base is nil, status = " ; Debug Table 0xf.0xd = 0x2b0,0x8 02b2 00db | | Load_Top At_Offset_3 02b3 e00a | | Load 0x0,0xa 02b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02b5 025e | ^ | Execute Discrete,Convert 02b6 1c01 | | Execute_Immediate Run_Utility,0x1 02b7 01cc | | Execute Vector,Catenate 02b8 e003 | | Load 0x0,0x3 02b9 180e | | Execute Package,Field_Execute,Field_Number 0xe 02ba e003 | | Load 0x0,0x3 ; Debug Table 0xf.0xe = 0x2ba,0x9 02bb 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0xf = 0x2bc,0xa 02bd 8408 | | Call 0x2,0x8 ; Debug Table 0xf.0x10 = 0x2bd,0xb 02be e404 | | Load 0x2,0x4 ; Debug Table 0xf.0x11 = 0x2be,0xc 02bf 00eb | | Load_Encached Diana_Cache 02c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02c1 7005 |p | Jump_Nonzero 0x2c7 02c2 8220 | | Call 0x1,0x20 ; Debug Table 0xf.0x12 = 0x2c2,0xd 02c3 a223 | # | Store_Unchecked 0x1,0x23 02c4 e404 | | Load 0x2,0x4 ; Debug Table 0xf.0x13 = 0x2c4,0xe 02c5 8221 | ! | Call 0x1,0x21 02c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02c7 e00d | | Load 0x0,0xd ; Debug Table 0xf.0x14 = 0x2c7,0xf 02c8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02c9 e00b | | Load 0x0,0xb 02ca 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02cb c407 | | Store 0x2,0x7 02cc e00a | | Load 0x0,0xa ; Debug Table 0xf.0x15 = 0x2cc,0x10 02cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ce e405 | | Load 0x2,0x5 02cf 0120 | | Execute Any,Is_Value 02d0 6803 |h | Jump_Zero 0x2d4 02d1 e009 | | Load 0x0,0x9 02d2 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 02d3 7801 |x | Jump 0x2d5 02d4 e405 | | Load 0x2,0x5 02d5 00db | | Load_Top At_Offset_3 02d6 4800 |H | Short_Literal 0x0 02d7 4800 |H | Short_Literal 0x0 02d8 e00c | | Load 0x0,0xc 02d9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02da 4803 |H | Short_Literal 0x3 02db 8220 | | Call 0x1,0x20 02dc e009 | | Load 0x0,0x9 02dd 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 02de c405 | | Store 0x2,0x5 02df 005b | [ | Store_Top Discrete,At_Offset_3 02e0 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x16 = 0x2e0,0x11 02e1 e009 | | Load 0x0,0x9 02e2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 02e3 6813 |h | Jump_Zero 0x2f7 02e4 0092 0671 | q| Action Push_String_Extended,0x671 ; "data base is nil when owrite, status = " ; Debug Table 0xf.0x17 = 0x2e4,0x12 02e6 00db | | Load_Top At_Offset_3 02e7 e00a | | Load 0x0,0xa 02e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02e9 025e | ^ | Execute Discrete,Convert 02ea 1c01 | | Execute_Immediate Run_Utility,0x1 02eb 01cc | | Execute Vector,Catenate 02ec e003 | | Load 0x0,0x3 02ed 180e | | Execute Package,Field_Execute,Field_Number 0xe 02ee e003 | | Load 0x0,0x3 ; Debug Table 0xf.0x18 = 0x2ee,0x13 02ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02f0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x19 = 0x2f0,0x14 02f1 4801 |H | Short_Literal 0x1 02f2 4800 |H | Short_Literal 0x0 02f3 e00b | | Load 0x0,0xb 02f4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02f5 c407 | | Store 0x2,0x7 02f6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0x1a = 0x2f6,0x15 02f7 e00a | | Load 0x0,0xa ; Debug Table 0xf.0x1b = 0x2f7,0x16 02f8 1b11 | | Execute Package,Field_Read,Field_Number 0x11 02f9 00da | | Load_Top At_Offset_2 02fa e405 | | Load 0x2,0x5 02fb e009 | | Load 0x0,0x9 02fc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 02fd 005b | [ | Store_Top Discrete,At_Offset_3 02fe 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x1c = 0x2fe,0x17 02ff 4801 |H | Short_Literal 0x1 0300 4801 |H | Short_Literal 0x1 0301 e00b | | Load 0x0,0xb 0302 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0303 c407 | | Store 0x2,0x7 0304 e00a | | Load 0x0,0xa ; Debug Table 0xf.0x1d = 0x304,0x18 0305 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0306 e405 | | Load 0x2,0x5 0307 0120 | | Execute Any,Is_Value 0308 6803 |h | Jump_Zero 0x30c 0309 e009 | | Load 0x0,0x9 030a 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 030b 7801 |x | Jump 0x30d 030c e405 | | Load 0x2,0x5 030d e00b | | Load 0x0,0xb 030e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 030f 4800 |H | Short_Literal 0x0 0310 4800 |H | Short_Literal 0x0 0311 e00c | | Load 0x0,0xc 0312 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0313 4800 |H | Short_Literal 0x0 0314 8220 | | Call 0x1,0x20 0315 e009 | | Load 0x0,0x9 0316 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0317 c405 | | Store 0x2,0x5 0318 005b | [ | Store_Top Discrete,At_Offset_3 0319 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x1e = 0x319,0x19 031a e009 | | Load 0x0,0x9 031b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 031c 680d |h | Jump_Zero 0x32a 031d 0092 0672 | r| Action Push_String_Extended,0x672 ; "data base is nil 2nd none, status = " ; Debug Table 0xf.0x1f = 0x31d,0x1a 031f 00db | | Load_Top At_Offset_3 0320 e00a | | Load 0x0,0xa 0321 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0322 025e | ^ | Execute Discrete,Convert 0323 1c01 | | Execute_Immediate Run_Utility,0x1 0324 01cc | | Execute Vector,Catenate 0325 e003 | | Load 0x0,0x3 0326 180e | | Execute Package,Field_Execute,Field_Number 0xe 0327 e003 | | Load 0x0,0x3 ; Debug Table 0xf.0x20 = 0x327,0x1b 0328 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0329 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xf.0x21 = 0x329,0x1c 032a 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x22 = 0x32a,0x1d 032b e403 | | Load 0x2,0x3 032c e402 | | Load 0x2,0x2 032d 01cf | | Execute Vector,Slice_Read 032e 00eb | | Load_Encached Diana_Cache 032f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0330 e405 | | Load 0x2,0x5 0331 e009 | | Load 0x0,0x9 0332 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0333 e00e | | Load 0x0,0xe 0334 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0335 a404 | | Store_Unchecked 0x2,0x4 0336 e404 | | Load 0x2,0x4 ; Debug Table 0xf.0x23 = 0x336,0x1e 0337 00eb | | Load_Encached Diana_Cache 0338 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0339 7005 |p | Jump_Nonzero 0x33f 033a 8220 | | Call 0x1,0x20 ; Debug Table 0xf.0x24 = 0x33a,0x1f 033b a223 | # | Store_Unchecked 0x1,0x23 033c e404 | | Load 0x2,0x4 ; Debug Table 0xf.0x25 = 0x33c,0x20 033d 8221 | ! | Call 0x1,0x21 033e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 033f 8222 | " | Call 0x1,0x22 ; Debug Table 0xf.0x26 = 0x33f,0x21 0340 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0341 TRAP_0270: 0341 0007 | | Action Break_Optional 0342 8222 | " | Call 0x1,0x22 ; Debug Table 0xf.0x27 = 0x342,0x22 0343 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0344 0000 0000 | | .LITERAL {0x00000000, 0x00393426} 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 035c | \ | .CONST 0x035c ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0008 | | .CONST 0x0008 ; Number of locals 034b INIT_0348: 034b 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call ; Debug Table 0x10 = .DEBUG 0x034b,0x0a14,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x003e ; Debug Table 0x10.0x0 = 0x34b,0xffff 034d 029f 065b | [| Declare_Subprogram INIT_0658,For_Call ; Debug Table 0x10.0x1 = 0x34d,0xfffe 034f e003 | | Load 0x0,0x3 ; Debug Table 0x10.0x2 = 0x34f,0xfffd 0350 1926 | & | Execute Package,Field_Reference,Field_Number 0x26 0351 00c6 | | Action Check_Subprogram_Elaborated 0352 4802 |H | Short_Literal 0x2 0353 4802 |H | Short_Literal 0x2 0354 0099 | | Action Reference_Dynamic 0355 4803 |H | Short_Literal 0x3 0356 4802 |H | Short_Literal 0x2 0357 0099 | | Action Reference_Dynamic 0358 67eb |g | Indirect_Literal Discrete,0x344,{0x00000000, 0x00393426} 0359 62c2 |b | Indirect_Literal Discrete,0x61c,{0x00000000, 0x00000815} 035a 4808 |H | Short_Literal 0x8 035b 0007 | | Action Break_Optional 035c BODY_0348: 035c e5ff | | Load 0x2,-0x1 ; Debug Table 0x10.0x3 = 0x35c,0x1 035d 4804 |H | Short_Literal 0x4 035e 4802 |H | Short_Literal 0x2 035f 0099 | | Action Reference_Dynamic 0360 4805 |H | Short_Literal 0x5 0361 4802 |H | Short_Literal 0x2 0362 0099 | | Action Reference_Dynamic 0363 4806 |H | Short_Literal 0x6 0364 4802 |H | Short_Literal 0x2 0365 0099 | | Action Reference_Dynamic 0366 e003 | | Load 0x0,0x3 0367 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0368 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0369 0000 0000 | | .BLANK 0000[0x7] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 037e | ~ | .CONST 0x037e ; Address of begin 0371 03c6 | | .CONST 0x03c6 ; Address of exception handler 0372 0004 | | .CONST 0x0004 ; Number of locals 0373 INIT_0370: 0373 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x11 = .DEBUG 0x0373,0x0a1e,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0048 ; Debug Table 0x11.0x0 = 0x373,0xffff 0374 e225 | % | Load 0x1,0x25 ; Debug Table 0x11.0x1 = 0x374,0xfffe 0375 0007 | | Action Break_Optional 0376 e00b | | Load 0x0,0xb ; Debug Table 0x11.0x2 = 0x376,0xfffd 0377 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0378 02c7 | | Declare_Variable Any 0379 e00d | | Load 0x0,0xd 037a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 037b e00b | | Load 0x0,0xb 037c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 037d c404 | | Store 0x2,0x4 037e BODY_0370: 037e e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x3 = 0x37e,0x1 037f 00eb | | Load_Encached Diana_Cache 0380 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0381 6803 |h | Jump_Zero 0x385 0382 e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x4 = 0x382,0x2 0383 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0384 7807 |x | Jump 0x38c 0385 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x5 = 0x385,0x3 0386 e5ff | | Load 0x2,-0x1 0387 4976 |Iv | Short_Literal 0x176 0388 00eb | | Load_Encached Diana_Cache 0389 0098 | | Execute Package,Field_Read_Dynamic 038a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 038b 0033 | 3 | Store_Top Heap_Access,At_Offset_3 038c e232 | 2 | Load 0x1,0x32 ; Debug Table 0x11.0x6 = 0x38c,0x4 038d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 038e e232 | 2 | Load 0x1,0x32 038f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0390 005a | Z | Store_Top Discrete,At_Offset_2 0391 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x7 = 0x391,0x5 0392 4604 |F | Jump_Case 0x5 0393 7804 |x | Jump 0x398 ; case 0x0 0394 780b |x | Jump 0x3a0 ; case 0x1 0395 7812 |x | Jump 0x3a8 ; case 0x2 0396 7819 |x | Jump 0x3b0 ; case 0x3 0397 7820 |x | Jump 0x3b8 ; case 0x4 0398 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x8 = 0x398,0x6 0399 00e7 | | Load_Encached Duration_Cache 039a 0269 | i | Execute Discrete,Last 039b e402 | | Load 0x2,0x2 039c e00f | | Load 0x0,0xf 039d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 039e 8221 | ! | Call 0x1,0x21 039f 781f |x | Jump 0x3bf 03a0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x9 = 0x3a0,0x7 03a1 00e7 | | Load_Encached Duration_Cache 03a2 0269 | i | Execute Discrete,Last 03a3 e402 | | Load 0x2,0x2 03a4 e00f | | Load 0x0,0xf 03a5 180e | | Execute Package,Field_Execute,Field_Number 0xe 03a6 8221 | ! | Call 0x1,0x21 03a7 7817 |x | Jump 0x3bf 03a8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xa = 0x3a8,0x8 03a9 00e7 | | Load_Encached Duration_Cache 03aa 0269 | i | Execute Discrete,Last 03ab e402 | | Load 0x2,0x2 03ac e00f | | Load 0x0,0xf 03ad 180f | | Execute Package,Field_Execute,Field_Number 0xf 03ae 8221 | ! | Call 0x1,0x21 03af 780f |x | Jump 0x3bf 03b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xb = 0x3b0,0x9 03b1 00e7 | | Load_Encached Duration_Cache 03b2 0269 | i | Execute Discrete,Last 03b3 e402 | | Load 0x2,0x2 03b4 e00f | | Load 0x0,0xf 03b5 180d | | Execute Package,Field_Execute,Field_Number 0xd 03b6 8221 | ! | Call 0x1,0x21 03b7 7807 |x | Jump 0x3bf 03b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xc = 0x3b8,0xa 03b9 00e7 | | Load_Encached Duration_Cache 03ba 0269 | i | Execute Discrete,Last 03bb e402 | | Load 0x2,0x2 03bc e00f | | Load 0x0,0xf 03bd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03be 8221 | ! | Call 0x1,0x21 03bf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0xd = 0x3bf,0xb 03c0 4801 |H | Short_Literal 0x1 03c1 4800 |H | Short_Literal 0x0 03c2 e00b | | Load 0x0,0xb 03c3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03c4 c404 | | Store 0x2,0x4 03c5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c6 TRAP_0370: 03c6 0007 | | Action Break_Optional 03c7 8222 | " | Call 0x1,0x22 ; Debug Table 0x11.0xe = 0x3c7,0xc 03c8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0xf = 0x3c8,0xd 03c9 4801 |H | Short_Literal 0x1 03ca 4800 |H | Short_Literal 0x0 03cb e00b | | Load 0x0,0xb 03cc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03cd c404 | | Store 0x2,0x4 03ce 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03cf 0000 | | .XXX[0x1] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03dd | | .CONST 0x03dd ; Address of begin 03d1 041e | | .CONST 0x041e ; Address of exception handler 03d2 0006 | | .CONST 0x0006 ; Number of locals 03d3 INIT_03d0: 03d3 e010 | | Load 0x0,0x10 ; Debug Table 0x12 = .DEBUG 0x03d3,0x0a40,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0052 ; Debug Table 0x12.0x0 = 0x3d3,0xffff 03d4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 03d5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03d6 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x3d6,0xfffe 03d7 4990 |I | Short_Literal 0x190 03d8 00e9 | | Load_Encached String_Cache 03d9 0334 | 4 | Declare_Variable Array,With_Constraint 03da 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x12.0x2 = 0x3da,0xfffd 03db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12.0x3 = 0x3db,0xfffc 03dc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12.0x4 = 0x3dc,0xfffb 03dd BODY_03d0: 03dd 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x12.0x5 = 0x3dd,0x1 03de e403 | | Load 0x2,0x3 03df 4801 |H | Short_Literal 0x1 03e0 e001 | | Load 0x0,0x1 03e1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 03e2 00d1 | | Pop_Control Pop_Count_1 03e3 005b | [ | Store_Top Discrete,At_Offset_3 03e4 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0x6 = 0x3e4,0x2 03e5 7005 |p | Jump_Nonzero 0x3eb 03e6 0092 0673 | s| Action Push_String_Extended,0x673 ; "no name given" ; Debug Table 0x12.0x7 = 0x3e6,0x3 03e8 e011 | | Load 0x0,0x11 03e9 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x12.0x8 = 0x3ea,0x4 03eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12.0x9 = 0x3eb,0x5 03ec e010 | | Load 0x0,0x10 03ed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 03ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03ef 4801 |H | Short_Literal 0x1 03f0 e404 | | Load 0x2,0x4 03f1 e403 | | Load 0x2,0x3 03f2 01cf | | Execute Vector,Slice_Read 03f3 e012 | | Load 0x0,0x12 03f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03f5 c402 | | Store 0x2,0x2 03f6 0032 | 2 | Store_Top Heap_Access,At_Offset_2 03f7 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0xa = 0x3f7,0x6 03f8 680a |h | Jump_Zero 0x403 03f9 0092 0674 | t| Action Push_String_Extended,0x674 ; "can't resolve " ; Debug Table 0x12.0xb = 0x3f9,0x7 03fb 4801 |H | Short_Literal 0x1 03fc e404 | | Load 0x2,0x4 03fd e403 | | Load 0x2,0x3 03fe 01cf | | Execute Vector,Slice_Read 03ff 01cc | | Execute Vector,Catenate 0400 e011 | | Load 0x0,0x11 0401 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0402 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x12.0xc = 0x402,0x8 0403 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0xd = 0x403,0x9 0404 00eb | | Load_Encached Diana_Cache 0405 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0406 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0407 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xe = 0x407,0xa 0408 00eb | | Load_Encached Diana_Cache 0409 1814 | | Execute Package,Field_Execute,Field_Number 0x14 040a 0f90 | | Execute_Immediate Equal,-0x70 040b 6804 |h | Jump_Zero 0x410 040c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xf = 0x40c,0xb 040d 00eb | | Load_Encached Diana_Cache 040e 18ec | | Execute Package,Field_Execute,Field_Number 0xec 040f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0410 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x10 = 0x410,0xc 0411 8221 | ! | Call 0x1,0x21 0412 e001 | | Load 0x0,0x1 ; Debug Table 0x12.0x11 = 0x412,0xd 0413 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0414 7005 |p | Jump_Nonzero 0x41a 0415 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x12 = 0x415,0xe 0416 e003 | | Load 0x0,0x3 0417 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0418 e003 | | Load 0x0,0x3 ; Debug Table 0x12.0x13 = 0x418,0xf 0419 1810 | | Execute Package,Field_Execute,Field_Number 0x10 041a 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x14 = 0x41a,0x10 041b e001 | | Load 0x0,0x1 041c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 041d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 041e TRAP_03d0: 041e 0007 | | Action Break_Optional 041f 0092 0675 | u| Action Push_String_Extended,0x675 ; "exception " ; Debug Table 0x12.0x15 = 0x41f,0x11 0421 e013 | | Load 0x0,0x13 0422 180d | | Execute Package,Field_Execute,Field_Number 0xd 0423 01cc | | Execute Vector,Catenate 0424 e011 | | Load 0x0,0x11 0425 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0426 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0427 0000 | | .XXX[0x1] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 0441 | A | .CONST 0x0441 ; Address of begin 0429 04d3 | | .CONST 0x04d3 ; Address of exception handler 042a 0008 | | .CONST 0x0008 ; Number of locals 042b INIT_0428: 042b e010 | | Load 0x0,0x10 ; Debug Table 0x13 = .DEBUG 0x042b,0x0a6e,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0056 ; Debug Table 0x13.0x0 = 0x42b,0xffff 042c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 042d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 042e 02c7 | | Declare_Variable Any 042f 00d8 | | Load_Top At_Offset_0 0430 1c00 | | Execute_Immediate Run_Utility,0x0 0431 e010 | | Load 0x0,0x10 ; Debug Table 0x13.0x1 = 0x431,0xfffe 0432 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0433 e010 | | Load 0x0,0x10 ; Debug Table 0x13.0x2 = 0x433,0xfffd 0434 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0435 02c7 | | Declare_Variable Any 0436 00d8 | | Load_Top At_Offset_0 0437 1c00 | | Execute_Immediate Run_Utility,0x0 0438 e010 | | Load 0x0,0x10 ; Debug Table 0x13.0x3 = 0x438,0xfffc 0439 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 043a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 043b 02c7 | | Declare_Variable Any 043c 00d8 | | Load_Top At_Offset_0 043d 1c00 | | Execute_Immediate Run_Utility,0x0 043e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13.0x4 = 0x43e,0xfffb 043f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13.0x5 = 0x43f,0xfffa 0440 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x13.0x6 = 0x440,0xfff9 0441 BODY_0428: 0441 8220 | | Call 0x1,0x20 ; Debug Table 0x13.0x7 = 0x441,0x1 0442 e005 | | Load 0x0,0x5 0443 180d | | Execute Package,Field_Execute,Field_Number 0xd 0444 681d |h | Jump_Zero 0x462 0445 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x8 = 0x445,0x2 0446 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0447 e010 | | Load 0x0,0x10 ; Debug Table 0x13.0x9 = 0x447,0x3 0448 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0449 e404 | | Load 0x2,0x4 044a 0120 | | Execute Any,Is_Value 044b 6803 |h | Jump_Zero 0x44f 044c e010 | | Load 0x0,0x10 044d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 044e 7801 |x | Jump 0x450 044f e404 | | Load 0x2,0x4 0450 61c7 |a | Indirect_Literal Discrete,0x618,{0x00000000, 0x00028000} 0451 e00b | | Load 0x0,0xb 0452 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0453 4800 |H | Short_Literal 0x0 0454 e010 | | Load 0x0,0x10 0455 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0456 8220 | | Call 0x1,0x20 0457 e010 | | Load 0x0,0x10 0458 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0459 1816 | | Execute Package,Field_Execute,Field_Number 0x16 045a c404 | | Store 0x2,0x4 045b c403 | | Store 0x2,0x3 045c e404 | | Load 0x2,0x4 ; Debug Table 0x13.0xa = 0x45c,0x4 045d e010 | | Load 0x0,0x10 045e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 045f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0460 c405 | | Store 0x2,0x5 0461 7812 |x | Jump 0x474 0462 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0xb = 0x462,0x5 0463 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0464 e010 | | Load 0x0,0x10 ; Debug Table 0x13.0xc = 0x464,0x6 0465 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0466 e405 | | Load 0x2,0x5 0467 0120 | | Execute Any,Is_Value 0468 6804 |h | Jump_Zero 0x46d 0469 e010 | | Load 0x0,0x10 046a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 046b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 046c 7801 |x | Jump 0x46e 046d e405 | | Load 0x2,0x5 046e 8220 | | Call 0x1,0x20 046f e010 | | Load 0x0,0x10 0470 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0471 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0472 c405 | | Store 0x2,0x5 0473 c403 | | Store 0x2,0x3 0474 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0xd = 0x474,0x7 0475 6805 |h | Jump_Zero 0x47b 0476 0092 0676 | v| Action Push_String_Extended,0x676 ; "can't get current ada unit" ; Debug Table 0x13.0xe = 0x476,0x8 0478 e011 | | Load 0x0,0x11 0479 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 047a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0xf = 0x47a,0x9 047b e010 | | Load 0x0,0x10 ; Debug Table 0x13.0x10 = 0x47b,0xa 047c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 047d e402 | | Load 0x2,0x2 047e 0120 | | Execute Any,Is_Value 047f 6804 |h | Jump_Zero 0x484 0480 e010 | | Load 0x0,0x10 0481 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0482 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0483 7801 |x | Jump 0x485 0484 e402 | | Load 0x2,0x2 0485 6192 |a | Indirect_Literal Discrete,0x618,{0x00000000, 0x00028000} 0486 e00b | | Load 0x0,0xb 0487 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0488 e405 | | Load 0x2,0x5 0489 e010 | | Load 0x0,0x10 048a 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 048b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 048c c402 | | Store 0x2,0x2 048d c403 | | Store 0x2,0x3 048e e403 | | Load 0x2,0x3 ; Debug Table 0x13.0x11 = 0x48e,0xb 048f 6805 |h | Jump_Zero 0x495 0490 0092 0677 | w| Action Push_String_Extended,0x677 ; "can't get other part ada unit" ; Debug Table 0x13.0x12 = 0x490,0xc 0492 e011 | | Load 0x0,0x11 0493 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0494 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0x13 = 0x494,0xd 0495 e010 | | Load 0x0,0x10 ; Debug Table 0x13.0x14 = 0x495,0xe 0496 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0497 e010 | | Load 0x0,0x10 0498 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0499 617e |a~ | Indirect_Literal Discrete,0x618,{0x00000000, 0x00028000} 049a e00b | | Load 0x0,0xb 049b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 049c 4800 |H | Short_Literal 0x0 049d e402 | | Load 0x2,0x2 049e e010 | | Load 0x0,0x10 049f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 04a0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04a1 e010 | | Load 0x0,0x10 04a2 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 04a3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04a4 c406 | | Store 0x2,0x6 04a5 c403 | | Store 0x2,0x3 04a6 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0x15 = 0x4a6,0xf 04a7 6805 |h | Jump_Zero 0x4ad 04a8 0092 0678 | x| Action Push_String_Extended,0x678 ; "can't get declaration of other part" ; Debug Table 0x13.0x16 = 0x4a8,0x10 04aa e011 | | Load 0x0,0x11 04ab 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 04ac 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0x17 = 0x4ac,0x11 04ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x18 = 0x4ad,0x12 04ae 7016 |p | Jump_Nonzero 0x4c5 04af 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x19 = 0x4af,0x13 04b0 e008 | | Load 0x0,0x8 04b1 180e | | Execute Package,Field_Execute,Field_Number 0xe 04b2 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04b3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x1a = 0x4b3,0x14 04b4 00eb | | Load_Encached Diana_Cache 04b5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04b6 0fa8 | | Execute_Immediate Equal,-0x58 04b7 680d |h | Jump_Zero 0x4c5 04b8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x1b = 0x4b8,0x15 04b9 00eb | | Load_Encached Diana_Cache 04ba 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9 04bb 0033 | 3 | Store_Top Heap_Access,At_Offset_3 04bc 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x1c = 0x4bc,0x16 04bd 00eb | | Load_Encached Diana_Cache 04be 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04bf 0f49 | I | Execute_Immediate Equal,0x49 04c0 6804 |h | Jump_Zero 0x4c5 04c1 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x1d = 0x4c1,0x17 04c2 00eb | | Load_Encached Diana_Cache 04c3 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5 04c4 0033 | 3 | Store_Top Heap_Access,At_Offset_3 04c5 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x1e = 0x4c5,0x18 04c6 8221 | ! | Call 0x1,0x21 04c7 e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x1f = 0x4c7,0x19 04c8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 04c9 7005 |p | Jump_Nonzero 0x4cf 04ca 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x20 = 0x4ca,0x1a 04cb e003 | | Load 0x0,0x3 04cc 181f | | Execute Package,Field_Execute,Field_Number 0x1f 04cd e003 | | Load 0x0,0x3 ; Debug Table 0x13.0x21 = 0x4cd,0x1b 04ce 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04cf 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x22 = 0x4cf,0x1c 04d0 e001 | | Load 0x0,0x1 04d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04d2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04d3 TRAP_0428: 04d3 0007 | | Action Break_Optional 04d4 0092 0675 | u| Action Push_String_Extended,0x675 ; "exception " ; Debug Table 0x13.0x23 = 0x4d4,0x1d 04d6 e013 | | Load 0x0,0x13 04d7 180d | | Execute Package,Field_Execute,Field_Number 0xd 04d8 01cc | | Execute Vector,Catenate 04d9 e011 | | Load 0x0,0x11 04da 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 04db 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04dc 0000 0000 | | .BLANK 0000[0x4] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04f4 | | .CONST 0x04f4 ; Address of begin 04e1 0561 | a | .CONST 0x0561 ; Address of exception handler 04e2 000a | | .CONST 0x000a ; Number of locals 04e3 INIT_04e0: 04e3 4801 |H | Short_Literal 0x1 ; Debug Table 0x14 = .DEBUG 0x04e3,0x0ab8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x005a ; Debug Table 0x14.0x0 = 0x4e3,0xffff 04e4 4864 |Hd | Short_Literal 0x64 04e5 00e9 | | Load_Encached String_Cache 04e6 0334 | 4 | Declare_Variable Array,With_Constraint 04e7 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x14.0x1 = 0x4e7,0xfffe 04e8 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x14.0x2 = 0x4e8,0xfffd 04e9 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x14.0x3 = 0x4e9,0xfffc 04ea 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x4 = 0x4ea,0xfffb 04eb 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 04ec 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x14.0x5 = 0x4ec,0xfffa 04ed e228 | ( | Load 0x1,0x28 ; Debug Table 0x14.0x6 = 0x4ed,0xfff9 04ee 0007 | | Action Break_Optional 04ef e014 | | Load 0x0,0x14 ; Debug Table 0x14.0x7 = 0x4ef,0xfff8 04f0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04f1 0322 | " | Declare_Variable Record 04f2 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x14.0x8 = 0x4f2,0xfff7 04f3 0007 | | Action Break_Optional ; Debug Table 0x14.0x9 = 0x4f3,0xfff6 04f4 BODY_04e0: 04f4 0092 0679 | y| Action Push_String_Extended,0x679 ; "with address (in hex seg_offset): " ; Debug Table 0x14.0xa = 0x4f4,0x1 04f6 e003 | | Load 0x0,0x3 04f7 180e | | Execute Package,Field_Execute,Field_Number 0xe 04f8 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x14.0xb = 0x4f8,0x2 04f9 e402 | | Load 0x2,0x2 04fa 4801 |H | Short_Literal 0x1 04fb e001 | | Load 0x0,0x1 04fc 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04fd 00d1 | | Pop_Control Pop_Count_1 04fe c403 | | Store 0x2,0x3 04ff e403 | | Load 0x2,0x3 ; Debug Table 0x14.0xc = 0x4ff,0x3 0500 7007 |p | Jump_Nonzero 0x508 0501 0092 067a | z| Action Push_String_Extended,0x67a ; "*** no address given" ; Debug Table 0x14.0xd = 0x501,0x4 0503 e003 | | Load 0x0,0x3 0504 180e | | Execute Package,Field_Execute,Field_Number 0xe 0505 e003 | | Load 0x0,0x3 ; Debug Table 0x14.0xe = 0x505,0x5 0506 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0507 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x14.0xf = 0x507,0x6 0508 00cf | | Action Mark_Auxiliary 0509 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x10 = 0x509,0x7 050a 4801 |H | Short_Literal 0x1 050b 0263 | c | Execute Discrete,Above_Bound 050c 702b |p+ | Jump_Nonzero 0x538 050d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x11 = 0x50d,0x8 050e e402 | | Load 0x2,0x2 050f 01d7 | | Execute Vector,Field_Read 0510 0f5f | _ | Execute_Immediate Equal,0x5f 0511 6824 |h$ | Jump_Zero 0x536 0512 0092 067b | {| Action Push_String_Extended,0x67b ; "16#" ; Debug Table 0x14.0x12 = 0x512,0x9 0514 4801 |H | Short_Literal 0x1 0515 00da | | Load_Top At_Offset_2 0516 0aff | | Execute_Immediate Plus,-0x1 0517 0248 | H | Execute Discrete,Check_In_Integer 0518 e402 | | Load 0x2,0x2 0519 01cf | | Execute Vector,Slice_Read 051a 01cc | | Execute Vector,Catenate 051b 0092 067c | || Action Push_String_Extended,0x67c ; "#" 051d 01cc | | Execute Vector,Catenate 051e 00e2 | | Load_Encached Integer_Cache 051f 00e0 | | Load_Encached Standard_Cache 0520 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0521 a404 | | Store_Unchecked 0x2,0x4 0522 0092 067b | {| Action Push_String_Extended,0x67b ; "16#" ; Debug Table 0x14.0x13 = 0x522,0xa 0524 00d9 | | Load_Top At_Offset_1 0525 0a01 | | Execute_Immediate Plus,0x1 0526 0248 | H | Execute Discrete,Check_In_Integer 0527 e403 | | Load 0x2,0x3 0528 e402 | | Load 0x2,0x2 0529 01cf | | Execute Vector,Slice_Read 052a 01cc | | Execute Vector,Catenate 052b 0092 067c | || Action Push_String_Extended,0x67c ; "#" 052d 01cc | | Execute Vector,Catenate 052e 00e2 | | Load_Encached Integer_Cache 052f 00e0 | | Load_Encached Standard_Cache 0530 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0531 a405 | | Store_Unchecked 0x2,0x5 0532 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x14 = 0x532,0xb 0533 a406 | | Store_Unchecked 0x2,0x6 0534 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x14.0x15 = 0x534,0xc 0535 7802 |x | Jump 0x538 0536 00c8 | | Action Pop_Auxiliary_Range 0537 3fd5 |? | Loop_Increasing 0x50d 0538 00ce | | Action Pop_Auxiliary 0539 e406 | | Load 0x2,0x6 ; Debug Table 0x14.0x16 = 0x539,0xd 053a 7007 |p | Jump_Nonzero 0x542 053b 0092 067d | }| Action Push_String_Extended,0x67d ; "*** bad format for address" ; Debug Table 0x14.0x17 = 0x53b,0xe 053d e003 | | Load 0x0,0x3 053e 180e | | Execute Package,Field_Execute,Field_Number 0xe 053f e003 | | Load 0x0,0x3 ; Debug Table 0x14.0x18 = 0x53f,0xf 0540 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0541 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x14.0x19 = 0x541,0x10 0542 4804 |H | Short_Literal 0x4 ; Debug Table 0x14.0x1a = 0x542,0x11 0543 e404 | | Load 0x2,0x4 0544 4802 |H | Short_Literal 0x2 0545 4820 |H | Short_Literal 0x20 0546 026d | m | Execute Discrete,Exponentiate 0547 0271 | q | Execute Discrete,Times 0548 e014 | | Load 0x0,0x14 0549 181d | | Execute Package,Field_Execute,Field_Number 0x1d 054a 00da | | Load_Top At_Offset_2 054b 017d | } | Execute Record,Structure_Write 054c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x1b = 0x54c,0x12 054d e002 | | Load 0x0,0x2 054e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 054f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0550 e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x1c = 0x550,0x13 0551 e015 | | Load 0x0,0x15 0552 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0553 025b | [ | Execute Discrete,Check_In_Type 0554 00d9 | | Load_Top At_Offset_1 0555 e229 | ) | Load 0x1,0x29 0556 e22a | * | Load 0x1,0x2a 0557 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0558 e002 | | Load 0x0,0x2 0559 1819 | | Execute Package,Field_Execute,Field_Number 0x19 055a 0033 | 3 | Store_Top Heap_Access,At_Offset_3 055b 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x1d = 0x55b,0x14 055c 822e | . | Call 0x1,0x2e 055d a407 | | Store_Unchecked 0x2,0x7 055e 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x1e = 0x55e,0x15 055f 8221 | ! | Call 0x1,0x21 0560 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0561 TRAP_04e0: 0561 0007 | | Action Break_Optional 0562 e013 | | Load 0x0,0x13 ; Debug Table 0x14.0x1f = 0x562,0x16 0563 180d | | Execute Package,Field_Execute,Field_Number 0xd 0564 8233 | 3 | Call 0x1,0x33 0565 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0566 0000 0000 | | .XXX[0x2] 0568 ; -------------------------------------------------------------------------------------- 0568 ; SUBPROGRAM 0568 ; -------------------------------------------------------------------------------------- 0568 056b | k | .CONST 0x056b ; Address of begin 0569 0004 | | .CONST 0x0004 ; Address of exception handler 056a 0001 | | .CONST 0x0001 ; Number of locals 056b BODY_0568: 056b INIT_0568: 056b 4603 |F | Jump_Case 0x4 ; Debug Table 0x15 = .DEBUG 0x056b,0x0afa,0x0005,0x0000,0x0039,0x3426,0x0000,0x009d 056c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 056d 7802 |x | Jump 0x570 ; case 0x1 056e 7805 |x | Jump 0x574 ; case 0x2 056f 7809 |x | Jump 0x579 ; case 0x3 0570 00da | | Load_Top At_Offset_2 0571 0091 066a | j| Action Push_String_Extended_Indexed,0x66a ; "SM_SPEC" 0573 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0574 00db | | Load_Top At_Offset_3 0575 00db | | Load_Top At_Offset_3 0576 00e0 | | Load_Encached Standard_Cache 0577 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0578 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0579 00da | | Load_Top At_Offset_2 057a 00e0 | | Load_Encached Standard_Cache 057b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 057c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 057d 0000 0000 | | .XXX[0x3] 057f 0000 | | 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0585 | | .CONST 0x0585 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 INIT_0580: 0583 0007 | | Action Break_Optional ; Debug Table 0x16 = .DEBUG 0x0583,0x0afc,0x0002,0x0000,0x0039,0x3426,0x0000,0x00ec ; Debug Table 0x16.0x0 = 0x583,0xffff 0584 0007 | | Action Break_Optional ; Debug Table 0x16.0x1 = 0x584,0xfffe 0585 BODY_0580: 0585 0007 | | Action Break_Optional ; Debug Table 0x16.0x2 = 0x585,0x1 0586 e5ff | | Load 0x2,-0x1 ; Debug Table 0x16.0x3 = 0x586,0x401 0587 0007 | | Action Break_Optional 0588 4400 |D | Exit_Subprogram With_Value,New_Top_Offset 0x0 ; Debug Table 0x16.0x4 = 0x588,0x402 0589 4831 0257 |H1 W| .XXX[0x2] 058b 0000 0000 | | .BLANK 0000[0x5] 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 e001 | | Load 0x0,0x1 ; Debug Table 0x17 = .DEBUG 0x0593,0x0b08,0x0002,0x0000,0x0039,0x3426,0x0000,0x0133 ; Debug Table 0x17.0x0 = 0x593,0x1 0594 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0595 0f00 | | Execute_Immediate Equal,0x0 0596 00ca | | Action Exit_Nullary_Function 0597 0000 | | .XXX[0x1] 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 059b | | .CONST 0x059b ; Address of begin 0599 0004 | | .CONST 0x0004 ; Address of exception handler 059a 0001 | | .CONST 0x0001 ; Number of locals 059b BODY_0598: 059b INIT_0598: 059b 822f | / | Call 0x1,0x2f ; Debug Table 0x18 = .DEBUG 0x059b,0x0b0c,0x0002,0x0000,0x0039,0x3426,0x0000,0x0143 ; Debug Table 0x18.0x0 = 0x59b,0x1 059c 00ca | | Action Exit_Nullary_Function 059d 0000 0000 | | .XXX[0x3] 059f 0000 | | 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x19 = .DEBUG 0x05a3,0x0b10,0x0001,0x0000,0x0039,0x3426,0x0000,0x014e ; Debug Table 0x19.0x0 = 0x5a3,0x1 05a4 0000 0000 | | .BLANK 0000[0x4] 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab e003 | | Load 0x0,0x3 ; Debug Table 0x1a = .DEBUG 0x05ab,0x0b14,0x0001,0x0000,0x0039,0x3426,0x0000,0x0164 ; Debug Table 0x1a.0x0 = 0x5ab,0x1 05ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05ad 0092 067e | ~| Action Push_String_Extended,0x67e ; "*** exception: " ; Debug Table 0x1a.0x1 = 0x5ad,0x2 05af 00db | | Load_Top At_Offset_3 05b0 01cc | | Execute Vector,Catenate 05b1 e003 | | Load 0x0,0x3 05b2 180e | | Execute Package,Field_Execute,Field_Number 0xe 05b3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b4 0000 0000 | | .BLANK 0000[0x4] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05bb | | .CONST 0x05bb ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0001 | | .CONST 0x0001 ; Number of locals 05bb BODY_05b8: 05bb INIT_05b8: 05bb 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x05bb,0x0b1a,0x0001,0x0000,0x0039,0x3426,0x0000,0x056b ; Debug Table 0x1b.0x0 = 0x5bb,0x1 05bc 00eb | | Load_Encached Diana_Cache 05bd 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05be 0ba8 | | Execute_Immediate Case_Compare,0xa8 05bf 701e |p | Jump_Nonzero 0x5de 05c0 0b49 | I | Execute_Immediate Case_Compare,0x49 05c1 701f |p | Jump_Nonzero 0x5e1 05c2 0b3e | > | Execute_Immediate Case_Compare,0x3e 05c3 7020 |p | Jump_Nonzero 0x5e4 05c4 0b41 | A | Execute_Immediate Case_Compare,0x41 05c5 7029 |p) | Jump_Nonzero 0x5ef 05c6 0b47 | G | Execute_Immediate Case_Compare,0x47 05c7 7032 |p2 | Jump_Nonzero 0x5fa 05c8 0b46 | F | Execute_Immediate Case_Compare,0x46 05c9 7030 |p0 | Jump_Nonzero 0x5fa 05ca 0b48 | H | Execute_Immediate Case_Compare,0x48 05cb 7039 |p9 | Jump_Nonzero 0x605 05cc 0b3f | ? | Execute_Immediate Case_Compare,0x3f 05cd 7042 |pB | Jump_Nonzero 0x610 05ce 0b7c | | | Execute_Immediate Case_Compare,0x7c 05cf 7043 |pC | Jump_Nonzero 0x613 05d0 0b8c | | Execute_Immediate Case_Compare,0x8c 05d1 7041 |pA | Jump_Nonzero 0x613 05d2 0b91 | | Execute_Immediate Case_Compare,0x91 05d3 703f |p? | Jump_Nonzero 0x613 05d4 0b94 | | Execute_Immediate Case_Compare,0x94 05d5 703d |p= | Jump_Nonzero 0x613 05d6 0b8f | | Execute_Immediate Case_Compare,0x8f 05d7 703b |p; | Jump_Nonzero 0x613 05d8 0b73 | s | Execute_Immediate Case_Compare,0x73 05d9 7039 |p9 | Jump_Nonzero 0x613 05da 0b4e | N | Execute_Immediate Case_Compare,0x4e 05db 7037 |p7 | Jump_Nonzero 0x613 05dc 8222 | " | Call 0x1,0x22 ; Debug Table 0x1b.0x1 = 0x5dc,0x19 05dd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05de 8216 | | Call 0x1,0x16 ; Debug Table 0x1b.0x2 = 0x5de,0x2 05df 8218 | | Call 0x1,0x18 ; Debug Table 0x1b.0x3 = 0x5df,0x3 05e0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05e1 8216 | | Call 0x1,0x16 ; Debug Table 0x1b.0x4 = 0x5e1,0x4 05e2 8218 | | Call 0x1,0x18 ; Debug Table 0x1b.0x5 = 0x5e2,0x5 05e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05e4 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x6 = 0x5e4,0x6 05e5 00eb | | Load_Encached Diana_Cache 05e6 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 05e7 00eb | | Load_Encached Diana_Cache 05e8 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05e9 0f77 | w | Execute_Immediate Equal,0x77 05ea 6801 |h | Jump_Zero 0x5ec 05eb 820e | | Call 0x1,0xe ; Debug Table 0x1b.0x7 = 0x5eb,0x7 05ec 8216 | | Call 0x1,0x16 ; Debug Table 0x1b.0x8 = 0x5ec,0x8 05ed 8215 | | Call 0x1,0x15 ; Debug Table 0x1b.0x9 = 0x5ed,0x9 05ee 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05ef 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0xa = 0x5ef,0xa 05f0 00eb | | Load_Encached Diana_Cache 05f1 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 05f2 00eb | | Load_Encached Diana_Cache 05f3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05f4 0f77 | w | Execute_Immediate Equal,0x77 05f5 6801 |h | Jump_Zero 0x5f7 05f6 820e | | Call 0x1,0xe ; Debug Table 0x1b.0xb = 0x5f6,0xb 05f7 8217 | | Call 0x1,0x17 ; Debug Table 0x1b.0xc = 0x5f7,0xc 05f8 8215 | | Call 0x1,0x15 ; Debug Table 0x1b.0xd = 0x5f8,0xd 05f9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05fa 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0xe = 0x5fa,0xe 05fb 00eb | | Load_Encached Diana_Cache 05fc 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 05fd 00eb | | Load_Encached Diana_Cache 05fe 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05ff 0f77 | w | Execute_Immediate Equal,0x77 0600 6801 |h | Jump_Zero 0x602 0601 820e | | Call 0x1,0xe ; Debug Table 0x1b.0xf = 0x601,0xf 0602 8216 | | Call 0x1,0x16 ; Debug Table 0x1b.0x10 = 0x602,0x10 0603 8215 | | Call 0x1,0x15 ; Debug Table 0x1b.0x11 = 0x603,0x11 0604 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0605 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x12 = 0x605,0x12 0606 00eb | | Load_Encached Diana_Cache 0607 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 0608 00eb | | Load_Encached Diana_Cache 0609 1814 | | Execute Package,Field_Execute,Field_Number 0x14 060a 0f77 | w | Execute_Immediate Equal,0x77 060b 6801 |h | Jump_Zero 0x60d 060c 820e | | Call 0x1,0xe ; Debug Table 0x1b.0x13 = 0x60c,0x13 060d 8217 | | Call 0x1,0x17 ; Debug Table 0x1b.0x14 = 0x60d,0x14 060e 8215 | | Call 0x1,0x15 ; Debug Table 0x1b.0x15 = 0x60e,0x15 060f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0610 8216 | | Call 0x1,0x16 ; Debug Table 0x1b.0x16 = 0x610,0x16 0611 8215 | | Call 0x1,0x15 ; Debug Table 0x1b.0x17 = 0x611,0x17 0612 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0613 8215 | | Call 0x1,0x15 ; Debug Table 0x1b.0x18 = 0x613,0x18 0614 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0615 0000 0000 | | .XXX[0x3] 0617 0000 | | 0618 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 061c 0000 0000 | | .LITERAL {0x00000000, 0x00000815} 0620 ; -------------------------------------------------------------------------------------- 0620 ; SUBPROGRAM 0620 ; -------------------------------------------------------------------------------------- 0620 0623 | # | .CONST 0x0623 ; Address of begin 0621 0004 | | .CONST 0x0004 ; Address of exception handler 0622 0001 | | .CONST 0x0001 ; Number of locals 0623 BODY_0620: 0623 INIT_0620: 0623 00cf | | Action Mark_Auxiliary ; Debug Table 0x1c = .DEBUG 0x0623,0x0b4e,0x0001,0x0000,0x0039,0x3426,0x0000,0x037d 0624 7805 |x | Jump 0x62a 0625 e402 | | Load 0x2,0x2 ; Debug Table 0x1c.0x0 = 0x625,0x2 0626 00eb | | Load_Encached Diana_Cache 0627 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0628 a402 | | Store_Unchecked 0x2,0x2 0629 00c9 | | Action Pop_Auxiliary_Loop 062a e402 | | Load 0x2,0x2 ; Debug Table 0x1c.0x1 = 0x62a,0x1 062b 00eb | | Load_Encached Diana_Cache 062c 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 062d 00eb | | Load_Encached Diana_Cache 062e 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 062f 6ff5 |o | Jump_Zero 0x625 0630 00ce | | Action Pop_Auxiliary 0631 e402 | | Load 0x2,0x2 ; Debug Table 0x1c.0x2 = 0x631,0x3 0632 00eb | | Load_Encached Diana_Cache 0633 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0634 8221 | ! | Call 0x1,0x21 0635 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0636 0000 0000 | | .XXX[0x2] 0638 ; -------------------------------------------------------------------------------------- 0638 ; SUBPROGRAM 0638 ; -------------------------------------------------------------------------------------- 0638 063b | ; | .CONST 0x063b ; Address of begin 0639 0648 | H | .CONST 0x0648 ; Address of exception handler 063a 0001 | | .CONST 0x0001 ; Number of locals 063b BODY_0638: 063b INIT_0638: 063b 4801 |H | Short_Literal 0x1 ; Debug Table 0x1d = .DEBUG 0x063b,0x0b56,0x0004,0x0000,0x0039,0x3426,0x0000,0x0706 ; Debug Table 0x1d.0x0 = 0x63b,0x1 063c e403 | | Load 0x2,0x3 063d e402 | | Load 0x2,0x2 063e 01cf | | Execute Vector,Slice_Read 063f 00eb | | Load_Encached Diana_Cache 0640 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0641 e405 | | Load 0x2,0x5 0642 e009 | | Load 0x0,0x9 0643 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0644 e00e | | Load 0x0,0xe 0645 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0646 a404 | | Store_Unchecked 0x2,0x4 0647 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0648 TRAP_0638: 0648 0007 | | Action Break_Optional 0649 00eb | | Load_Encached Diana_Cache ; Debug Table 0x1d.0x1 = 0x649,0x2 064a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 064b a404 | | Store_Unchecked 0x2,0x4 064c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 064d 0000 0000 | | .XXX[0x3] 064f 0000 | | 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0653 | S | .CONST 0x0653 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0001 | | .CONST 0x0001 ; Number of locals 0653 BODY_0650: 0653 INIT_0650: 0653 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e = .DEBUG 0x0653,0x0b5c,0x0001,0x0000,0x0039,0x3426,0x0000,0x07d5 ; Debug Table 0x1e.0x0 = 0x653,0x1 0654 8221 | ! | Call 0x1,0x21 0655 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0656 0000 0000 | | .XXX[0x2] 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f = .DEBUG 0x065b,0x0b60,0x0001,0x0000,0x0039,0x3426,0x0000,0x07e7 ; Debug Table 0x1f.0x0 = 0x65b,0x1 065c 00eb | | Load_Encached Diana_Cache 065d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 065e 700a |p | Jump_Nonzero 0x669 065f 8220 | | Call 0x1,0x20 ; Debug Table 0x1f.0x1 = 0x65f,0x2 0660 a223 | # | Store_Unchecked 0x1,0x23 0661 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f.0x2 = 0x661,0x3 0662 00eb | | Load_Encached Diana_Cache 0663 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 0664 a224 | $ | Store_Unchecked 0x1,0x24 0665 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f.0x3 = 0x665,0x4 0666 00eb | | Load_Encached Diana_Cache 0667 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0668 8221 | ! | Call 0x1,0x21 0669 4502 |E | Exit_Suprogram New_Top_Offset 0x2 066a ; -------------------------------------------------------------------------------------- 066a ; STRING TABLE 066a ; -------------------------------------------------------------------------------------- 066a 002c | , | .STRTAB 0x002c->0x0680 ; "SM_SPEC" 066b 0031 | 1 | .STRTAB 0x0031->0x0683 ; "SM_BODY" 066c 0036 | 6 | .STRTAB 0x0036->0x0687 ; "SM_STUB" 066d 003b | ; | .STRTAB 0x003b->0x068a ; "SM_TYPE_SPEC" 066e 0045 | E | .STRTAB 0x0045->0x0690 ; "SM_GENERIC_PARAM_S" 066f 0055 | U | .STRTAB 0x0055->0x0699 ; "*** no name given" 0670 0064 | d | .STRTAB 0x0064->0x06a2 ; "data base is nil, status = " 0671 007d | } | .STRTAB 0x007d->0x06af ; "data base is nil when owrite, status = " 0672 00a2 | | .STRTAB 0x00a2->0x06c3 ; "data base is nil 2nd none, status = " 0673 00c4 | | .STRTAB 0x00c4->0x06d5 ; "no name given" 0674 00cf | | .STRTAB 0x00cf->0x06db ; "can't resolve " 0675 00db | | .STRTAB 0x00db->0x06e2 ; "exception " 0676 00e3 | | .STRTAB 0x00e3->0x06e7 ; "can't get current ada unit" 0677 00fb | | .STRTAB 0x00fb->0x06f4 ; "can't get other part ada unit" 0678 0116 | | .STRTAB 0x0116->0x0703 ; "can't get declaration of other part" 0679 0137 | 7 | .STRTAB 0x0137->0x0714 ; "with address (in hex seg_offset): " 067a 0157 | W | .STRTAB 0x0157->0x0725 ; "*** no address given" 067b 0169 | i | .STRTAB 0x0169->0x072f ; "16#" 067c 016a | j | .STRTAB 0x016a->0x0731 ; "#" 067d 0169 | i | .STRTAB 0x0169->0x0731 ; "*** bad format for address" 067e 0181 | | .STRTAB 0x0181->0x073e ; "*** exception: " 067f 018e | | .STREND 0x018e->0x0746 0680 534d 5f53 |SM_S| .STRTAB_STRINGS 0746 0000 0000 | | .XXX[0x2] 0748 ; -------------------------------------------------------------------------------------- 0748 ; Debug Table 0748 ; -------------------------------------------------------------------------------------- 0748 0003 0020 | | .CONST 0x0003,0x0020 074a 000b 084a | J| .DEBUG 0x000b,0x084a,0x8000,0x0000,0x0038,0xc6b6,0x0000,0x0005 0752 0032 0872 | 2 r| .DEBUG 0x0032,0x0872,0x8000,0x0000,0x0039,0x3426,0x0000,0x002d 075a 00ab 08d8 | | .DEBUG 0x00ab,0x08d8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0006 0762 00cb 08e8 | | .DEBUG 0x00cb,0x08e8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x000a 076a 00eb 08f8 | | .DEBUG 0x00eb,0x08f8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x000e 0772 0113 090c | | .DEBUG 0x0113,0x090c,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0012 077a 012b 0916 | + | .DEBUG 0x012b,0x0916,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0016 0782 0153 092c | S ,| .DEBUG 0x0153,0x092c,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x001a 078a 019b 094c | L| .DEBUG 0x019b,0x094c,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x001e 0792 01cb 0968 | h| .DEBUG 0x01cb,0x0968,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0022 079a 020b 0990 | | .DEBUG 0x020b,0x0990,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0026 07a2 023b 09a6 | ; | .DEBUG 0x023b,0x09a6,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x002a 07aa 025b 09b4 | [ | .DEBUG 0x025b,0x09b4,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x002e 07b2 0263 09b8 | c | .DEBUG 0x0263,0x09b8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0032 07ba 026b 09bc | k | .DEBUG 0x026b,0x09bc,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0036 07c2 0273 09c2 | s | .DEBUG 0x0273,0x09c2,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x003a 07ca 034b 0a14 | K | .DEBUG 0x034b,0x0a14,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x003e 07d2 0373 0a1e | s | .DEBUG 0x0373,0x0a1e,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0048 07da 03d3 0a40 | @| .DEBUG 0x03d3,0x0a40,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0052 07e2 042b 0a6e | + n| .DEBUG 0x042b,0x0a6e,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x0056 07ea 04e3 0ab8 | | .DEBUG 0x04e3,0x0ab8,0x0001,0x0000,0x0038,0xc6b6,0x0000,0x005a 07f2 056b 0afa | k | .DEBUG 0x056b,0x0afa,0x0005,0x0000,0x0039,0x3426,0x0000,0x009d 07fa 0583 0afc | | .DEBUG 0x0583,0x0afc,0x0002,0x0000,0x0039,0x3426,0x0000,0x00ec 0802 0593 0b08 | | .DEBUG 0x0593,0x0b08,0x0002,0x0000,0x0039,0x3426,0x0000,0x0133 080a 059b 0b0c | | .DEBUG 0x059b,0x0b0c,0x0002,0x0000,0x0039,0x3426,0x0000,0x0143 0812 05a3 0b10 | | .DEBUG 0x05a3,0x0b10,0x0001,0x0000,0x0039,0x3426,0x0000,0x014e 081a 05ab 0b14 | | .DEBUG 0x05ab,0x0b14,0x0001,0x0000,0x0039,0x3426,0x0000,0x0164 0822 05bb 0b1a | | .DEBUG 0x05bb,0x0b1a,0x0001,0x0000,0x0039,0x3426,0x0000,0x056b 082a 0623 0b4e | # N| .DEBUG 0x0623,0x0b4e,0x0001,0x0000,0x0039,0x3426,0x0000,0x037d 0832 063b 0b56 | ; V| .DEBUG 0x063b,0x0b56,0x0004,0x0000,0x0039,0x3426,0x0000,0x0706 083a 0653 0b5c | S \| .DEBUG 0x0653,0x0b5c,0x0001,0x0000,0x0039,0x3426,0x0000,0x07d5 0842 065b 0b60 | [ `| .DEBUG 0x065b,0x0b60,0x0001,0x0000,0x0039,0x3426,0x0000,0x07e7 084a ; -------------------------------------------------------------------------------------- 084a ; Debug3 Subtable 0x0 084a ; -------------------------------------------------------------------------------------- 084a 0013 0000 | | .DBG3TAB 0x0013,0x0000 084c 000b ffff | | .CONST 0x000b,0xffff 084e 000d fffe | | .CONST 0x000d,0xfffe 0850 000f fffd | | .CONST 0x000f,0xfffd 0852 0011 fffc | | .CONST 0x0011,0xfffc 0854 0013 fffb | | .CONST 0x0013,0xfffb 0856 0015 fffa | | .CONST 0x0015,0xfffa 0858 0017 fff9 | | .CONST 0x0017,0xfff9 085a 0019 fff8 | | .CONST 0x0019,0xfff8 085c 001b fff7 | | .CONST 0x001b,0xfff7 085e 001d fff6 | | .CONST 0x001d,0xfff6 0860 001f fff5 | | .CONST 0x001f,0xfff5 0862 0021 fff4 | ! | .CONST 0x0021,0xfff4 0864 0023 fff3 | # | .CONST 0x0023,0xfff3 0866 0025 fff2 | % | .CONST 0x0025,0xfff2 0868 0027 fff1 | ' | .CONST 0x0027,0xfff1 086a 0029 fff0 | ) | .CONST 0x0029,0xfff0 086c 002b ffef | + | .CONST 0x002b,0xffef 086e 002d ffee | - | .CONST 0x002d,0xffee 0870 002f ffed | / | .CONST 0x002f,0xffed 0872 ; -------------------------------------------------------------------------------------- 0872 ; Debug3 Subtable 0x1 0872 ; -------------------------------------------------------------------------------------- 0872 0032 0000 | 2 | .DBG3TAB 0x0032,0x0000 0874 0032 ffff | 2 | .CONST 0x0032,0xffff 0876 0033 fffe | 3 | .CONST 0x0033,0xfffe 0878 0034 fffd | 4 | .CONST 0x0034,0xfffd 087a 0035 fffc | 5 | .CONST 0x0035,0xfffc 087c 0036 fffb | 6 | .CONST 0x0036,0xfffb 087e 0037 fffa | 7 | .CONST 0x0037,0xfffa 0880 0038 fff9 | 8 | .CONST 0x0038,0xfff9 0882 0039 fff8 | 9 | .CONST 0x0039,0xfff8 0884 003a fff7 | : | .CONST 0x003a,0xfff7 0886 003b fff6 | ; | .CONST 0x003b,0xfff6 0888 003c fff5 | < | .CONST 0x003c,0xfff5 088a 003d fff4 | = | .CONST 0x003d,0xfff4 088c 0040 fff3 | @ | .CONST 0x0040,0xfff3 088e 0043 fff2 | C | .CONST 0x0043,0xfff2 0890 0046 fff1 | F | .CONST 0x0046,0xfff1 0892 0047 fff0 | G | .CONST 0x0047,0xfff0 0894 0048 ffef | H | .CONST 0x0048,0xffef 0896 004d ffee | M | .CONST 0x004d,0xffee 0898 004e ffed | N | .CONST 0x004e,0xffed 089a 0051 ffec | Q | .CONST 0x0051,0xffec 089c 0054 ffeb | T | .CONST 0x0054,0xffeb 089e 0055 ffea | U | .CONST 0x0055,0xffea 08a0 0056 ffe9 | V | .CONST 0x0056,0xffe9 08a2 0058 ffe8 | X | .CONST 0x0058,0xffe8 08a4 0061 ffe7 | a | .CONST 0x0061,0xffe7 08a6 0063 ffe6 | c | .CONST 0x0063,0xffe6 08a8 0065 ffe5 | e | .CONST 0x0065,0xffe5 08aa 0067 ffe4 | g | .CONST 0x0067,0xffe4 08ac 0069 ffe3 | i | .CONST 0x0069,0xffe3 08ae 0077 ffe2 | w | .CONST 0x0077,0xffe2 08b0 0079 ffe1 | y | .CONST 0x0079,0xffe1 08b2 007b ffe0 | { | .CONST 0x007b,0xffe0 08b4 007d ffdf | } | .CONST 0x007d,0xffdf 08b6 007f ffde | | .CONST 0x007f,0xffde 08b8 0081 ffdd | | .CONST 0x0081,0xffdd 08ba 0083 ffdc | | .CONST 0x0083,0xffdc 08bc 0085 ffdb | | .CONST 0x0085,0xffdb 08be 0087 ffda | | .CONST 0x0087,0xffda 08c0 0089 ffd9 | | .CONST 0x0089,0xffd9 08c2 008b ffd8 | | .CONST 0x008b,0xffd8 08c4 008d ffd7 | | .CONST 0x008d,0xffd7 08c6 008f ffd6 | | .CONST 0x008f,0xffd6 08c8 0091 ffd5 | | .CONST 0x0091,0xffd5 08ca 0093 ffd4 | | .CONST 0x0093,0xffd4 08cc 0095 ffd3 | | .CONST 0x0095,0xffd3 08ce 0097 ffd2 | | .CONST 0x0097,0xffd2 08d0 0099 ffd1 | | .CONST 0x0099,0xffd1 08d2 009b ffd0 | | .CONST 0x009b,0xffd0 08d4 009d ffcf | | .CONST 0x009d,0xffcf 08d6 009f ffce | | .CONST 0x009f,0xffce 08d8 ; -------------------------------------------------------------------------------------- 08d8 ; Debug3 Subtable 0x2 08d8 ; -------------------------------------------------------------------------------------- 08d8 0000 0007 | | .DBG3TAB 0x0000,0x0007 08da 00ab 0001 | | .CONST 0x00ab,0x0001 08dc 00af 0002 | | .CONST 0x00af,0x0002 08de 00b1 0003 | | .CONST 0x00b1,0x0003 08e0 00b4 0004 | | .CONST 0x00b4,0x0004 08e2 00b8 0005 | | .CONST 0x00b8,0x0005 08e4 00bd 0006 | | .CONST 0x00bd,0x0006 08e6 00c2 0007 | | .CONST 0x00c2,0x0007 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; Debug3 Subtable 0x3 08e8 ; -------------------------------------------------------------------------------------- 08e8 0001 0006 | | .DBG3TAB 0x0001,0x0006 08ea 00cb ffff | | .CONST 0x00cb,0xffff 08ec 00cc 0001 | | .CONST 0x00cc,0x0001 08ee 00d0 0002 | | .CONST 0x00d0,0x0002 08f0 00d2 0003 | | .CONST 0x00d2,0x0003 08f2 00d6 0004 | | .CONST 0x00d6,0x0004 08f4 00da 0005 | | .CONST 0x00da,0x0005 08f6 00dd 0006 | | .CONST 0x00dd,0x0006 08f8 ; -------------------------------------------------------------------------------------- 08f8 ; Debug3 Subtable 0x4 08f8 ; -------------------------------------------------------------------------------------- 08f8 0002 0007 | | .DBG3TAB 0x0002,0x0007 08fa 00eb ffff | | .CONST 0x00eb,0xffff 08fc 00ec fffe | | .CONST 0x00ec,0xfffe 08fe 00ef 0001 | | .CONST 0x00ef,0x0001 0900 00f4 0003 | | .CONST 0x00f4,0x0003 0902 00f6 0004 | | .CONST 0x00f6,0x0004 0904 00f8 0002 | | .CONST 0x00f8,0x0002 0906 0102 0005 | | .CONST 0x0102,0x0005 0908 0103 0006 | | .CONST 0x0103,0x0006 090a 0107 0007 | | .CONST 0x0107,0x0007 090c ; -------------------------------------------------------------------------------------- 090c ; Debug3 Subtable 0x5 090c ; -------------------------------------------------------------------------------------- 090c 0001 0003 | | .DBG3TAB 0x0001,0x0003 090e 0113 ffff | | .CONST 0x0113,0xffff 0910 0118 0001 | | .CONST 0x0118,0x0001 0912 011c 0002 | | .CONST 0x011c,0x0002 0914 011f 0003 | | .CONST 0x011f,0x0003 0916 ; -------------------------------------------------------------------------------------- 0916 ; Debug3 Subtable 0x6 0916 ; -------------------------------------------------------------------------------------- 0916 0001 0009 | | .DBG3TAB 0x0001,0x0009 0918 012b ffff | + | .CONST 0x012b,0xffff 091a 012c 0001 | , | .CONST 0x012c,0x0001 091c 0138 0002 | 8 | .CONST 0x0138,0x0002 091e 013b 0003 | ; | .CONST 0x013b,0x0003 0920 013d 0004 | = | .CONST 0x013d,0x0004 0922 013f 0005 | ? | .CONST 0x013f,0x0005 0924 0142 0007 | B | .CONST 0x0142,0x0007 0926 0146 0008 | F | .CONST 0x0146,0x0008 0928 0148 0009 | H | .CONST 0x0148,0x0009 092a 014a 0006 | J | .CONST 0x014a,0x0006 092c ; -------------------------------------------------------------------------------------- 092c ; Debug3 Subtable 0x7 092c ; -------------------------------------------------------------------------------------- 092c 0001 000e | | .DBG3TAB 0x0001,0x000e 092e 0153 ffff | S | .CONST 0x0153,0xffff 0930 0154 0001 | T | .CONST 0x0154,0x0001 0932 0158 0002 | X | .CONST 0x0158,0x0002 0934 015c 0003 | \ | .CONST 0x015c,0x0003 0936 0161 0004 | a | .CONST 0x0161,0x0004 0938 0168 0005 | h | .CONST 0x0168,0x0005 093a 0170 0006 | p | .CONST 0x0170,0x0006 093c 0174 0007 | t | .CONST 0x0174,0x0007 093e 0179 0008 | y | .CONST 0x0179,0x0008 0940 017b 0009 | { | .CONST 0x017b,0x0009 0942 0180 000a | | .CONST 0x0180,0x000a 0944 0184 000b | | .CONST 0x0184,0x000b 0946 0188 000c | | .CONST 0x0188,0x000c 0948 018d 000d | | .CONST 0x018d,0x000d 094a 018f 000e | | .CONST 0x018f,0x000e 094c ; -------------------------------------------------------------------------------------- 094c ; Debug3 Subtable 0x8 094c ; -------------------------------------------------------------------------------------- 094c 0002 000b | | .DBG3TAB 0x0002,0x000b 094e 019b ffff | | .CONST 0x019b,0xffff 0950 019c fffe | | .CONST 0x019c,0xfffe 0952 019e 0001 | | .CONST 0x019e,0x0001 0954 01a5 0002 | | .CONST 0x01a5,0x0002 0956 01ab 0003 | | .CONST 0x01ab,0x0003 0958 01af 0004 | | .CONST 0x01af,0x0004 095a 01b1 0005 | | .CONST 0x01b1,0x0005 095c 01b3 0006 | | .CONST 0x01b3,0x0006 095e 01b8 0007 | | .CONST 0x01b8,0x0007 0960 01bc 0008 | | .CONST 0x01bc,0x0008 0962 01c0 0009 | | .CONST 0x01c0,0x0009 0964 01c2 000a | | .CONST 0x01c2,0x000a 0966 01c4 000b | | .CONST 0x01c4,0x000b 0968 ; -------------------------------------------------------------------------------------- 0968 ; Debug3 Subtable 0x9 0968 ; -------------------------------------------------------------------------------------- 0968 0004 000f | | .DBG3TAB 0x0004,0x000f 096a 01cb ffff | | .CONST 0x01cb,0xffff 096c 01cc fffe | | .CONST 0x01cc,0xfffe 096e 01cd fffd | | .CONST 0x01cd,0xfffd 0970 01ce fffc | | .CONST 0x01ce,0xfffc 0972 01cf 0001 | | .CONST 0x01cf,0x0001 0974 01d6 0002 | | .CONST 0x01d6,0x0002 0976 01dc 0003 | | .CONST 0x01dc,0x0003 0978 01e0 0004 | | .CONST 0x01e0,0x0004 097a 01e5 0005 | | .CONST 0x01e5,0x0005 097c 01e6 0006 | | .CONST 0x01e6,0x0006 097e 01ea 0007 | | .CONST 0x01ea,0x0007 0980 01ee 0008 | | .CONST 0x01ee,0x0008 0982 01f2 0009 | | .CONST 0x01f2,0x0009 0984 01f4 000a | | .CONST 0x01f4,0x000a 0986 01f5 000b | | .CONST 0x01f5,0x000b 0988 01f7 000c | | .CONST 0x01f7,0x000c 098a 01f9 000d | | .CONST 0x01f9,0x000d 098c 0200 000e | | .CONST 0x0200,0x000e 098e 0202 000f | | .CONST 0x0202,0x000f 0990 ; -------------------------------------------------------------------------------------- 0990 ; Debug3 Subtable 0xa 0990 ; -------------------------------------------------------------------------------------- 0990 0001 0009 | | .DBG3TAB 0x0001,0x0009 0992 020b ffff | | .CONST 0x020b,0xffff 0994 020c 0001 | | .CONST 0x020c,0x0001 0996 0211 0002 | | .CONST 0x0211,0x0002 0998 0215 0003 | | .CONST 0x0215,0x0003 099a 0219 0004 | | .CONST 0x0219,0x0004 099c 021e 0005 | | .CONST 0x021e,0x0005 099e 0222 0006 | " | .CONST 0x0222,0x0006 09a0 0227 0007 | ' | .CONST 0x0227,0x0007 09a2 022b 0008 | + | .CONST 0x022b,0x0008 09a4 022f 0009 | / | .CONST 0x022f,0x0009 09a6 ; -------------------------------------------------------------------------------------- 09a6 ; Debug3 Subtable 0xb 09a6 ; -------------------------------------------------------------------------------------- 09a6 0001 0005 | | .DBG3TAB 0x0001,0x0005 09a8 023b ffff | ; | .CONST 0x023b,0xffff 09aa 023c 0001 | < | .CONST 0x023c,0x0001 09ac 0240 0002 | @ | .CONST 0x0240,0x0002 09ae 0245 0003 | E | .CONST 0x0245,0x0003 09b0 0249 0004 | I | .CONST 0x0249,0x0004 09b2 024d 0005 | M | .CONST 0x024d,0x0005 09b4 ; -------------------------------------------------------------------------------------- 09b4 ; Debug3 Subtable 0xc 09b4 ; -------------------------------------------------------------------------------------- 09b4 0000 0001 | | .DBG3TAB 0x0000,0x0001 09b6 025b 0001 | [ | .CONST 0x025b,0x0001 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; Debug3 Subtable 0xd 09b8 ; -------------------------------------------------------------------------------------- 09b8 0000 0001 | | .DBG3TAB 0x0000,0x0001 09ba 0263 0001 | c | .CONST 0x0263,0x0001 09bc ; -------------------------------------------------------------------------------------- 09bc ; Debug3 Subtable 0xe 09bc ; -------------------------------------------------------------------------------------- 09bc 0000 0002 | | .DBG3TAB 0x0000,0x0002 09be 026b 0001 | k | .CONST 0x026b,0x0001 09c0 026c 0002 | l | .CONST 0x026c,0x0002 09c2 ; -------------------------------------------------------------------------------------- 09c2 ; Debug3 Subtable 0xf 09c2 ; -------------------------------------------------------------------------------------- 09c2 0006 0022 | "| .DBG3TAB 0x0006,0x0022 09c4 0273 ffff | s | .CONST 0x0273,0xffff 09c6 0277 fffe | w | .CONST 0x0277,0xfffe 09c8 0278 fffd | x | .CONST 0x0278,0xfffd 09ca 0279 fffc | y | .CONST 0x0279,0xfffc 09cc 027e fffb | ~ | .CONST 0x027e,0xfffb 09ce 0280 fffa | | .CONST 0x0280,0xfffa 09d0 0287 0001 | | .CONST 0x0287,0x0001 09d2 028e 0002 | | .CONST 0x028e,0x0002 09d4 0290 0003 | | .CONST 0x0290,0x0003 09d6 0294 0004 | | .CONST 0x0294,0x0004 09d8 0296 0005 | | .CONST 0x0296,0x0005 09da 0297 0006 | | .CONST 0x0297,0x0006 09dc 02ac 0007 | | .CONST 0x02ac,0x0007 09de 02b0 0008 | | .CONST 0x02b0,0x0008 09e0 02ba 0009 | | .CONST 0x02ba,0x0009 09e2 02bc 000a | | .CONST 0x02bc,0x000a 09e4 02bd 000b | | .CONST 0x02bd,0x000b 09e6 02be 000c | | .CONST 0x02be,0x000c 09e8 02c2 000d | | .CONST 0x02c2,0x000d 09ea 02c4 000e | | .CONST 0x02c4,0x000e 09ec 02c7 000f | | .CONST 0x02c7,0x000f 09ee 02cc 0010 | | .CONST 0x02cc,0x0010 09f0 02e0 0011 | | .CONST 0x02e0,0x0011 09f2 02e4 0012 | | .CONST 0x02e4,0x0012 09f4 02ee 0013 | | .CONST 0x02ee,0x0013 09f6 02f0 0014 | | .CONST 0x02f0,0x0014 09f8 02f6 0015 | | .CONST 0x02f6,0x0015 09fa 02f7 0016 | | .CONST 0x02f7,0x0016 09fc 02fe 0017 | | .CONST 0x02fe,0x0017 09fe 0304 0018 | | .CONST 0x0304,0x0018 0a00 0319 0019 | | .CONST 0x0319,0x0019 0a02 031d 001a | | .CONST 0x031d,0x001a 0a04 0327 001b | ' | .CONST 0x0327,0x001b 0a06 0329 001c | ) | .CONST 0x0329,0x001c 0a08 032a 001d | * | .CONST 0x032a,0x001d 0a0a 0336 001e | 6 | .CONST 0x0336,0x001e 0a0c 033a 001f | : | .CONST 0x033a,0x001f 0a0e 033c 0020 | < | .CONST 0x033c,0x0020 0a10 033f 0021 | ? !| .CONST 0x033f,0x0021 0a12 0342 0022 | B "| .CONST 0x0342,0x0022 0a14 ; -------------------------------------------------------------------------------------- 0a14 ; Debug3 Subtable 0x10 0a14 ; -------------------------------------------------------------------------------------- 0a14 0003 0001 | | .DBG3TAB 0x0003,0x0001 0a16 034b ffff | K | .CONST 0x034b,0xffff 0a18 034d fffe | M | .CONST 0x034d,0xfffe 0a1a 034f fffd | O | .CONST 0x034f,0xfffd 0a1c 035c 0001 | \ | .CONST 0x035c,0x0001 0a1e ; -------------------------------------------------------------------------------------- 0a1e ; Debug3 Subtable 0x11 0a1e ; -------------------------------------------------------------------------------------- 0a1e 0003 000d | | .DBG3TAB 0x0003,0x000d 0a20 0373 ffff | s | .CONST 0x0373,0xffff 0a22 0374 fffe | t | .CONST 0x0374,0xfffe 0a24 0376 fffd | v | .CONST 0x0376,0xfffd 0a26 037e 0001 | ~ | .CONST 0x037e,0x0001 0a28 0382 0002 | | .CONST 0x0382,0x0002 0a2a 0385 0003 | | .CONST 0x0385,0x0003 0a2c 038c 0004 | | .CONST 0x038c,0x0004 0a2e 0391 0005 | | .CONST 0x0391,0x0005 0a30 0398 0006 | | .CONST 0x0398,0x0006 0a32 03a0 0007 | | .CONST 0x03a0,0x0007 0a34 03a8 0008 | | .CONST 0x03a8,0x0008 0a36 03b0 0009 | | .CONST 0x03b0,0x0009 0a38 03b8 000a | | .CONST 0x03b8,0x000a 0a3a 03bf 000b | | .CONST 0x03bf,0x000b 0a3c 03c7 000c | | .CONST 0x03c7,0x000c 0a3e 03c8 000d | | .CONST 0x03c8,0x000d 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; Debug3 Subtable 0x12 0a40 ; -------------------------------------------------------------------------------------- 0a40 0005 0011 | | .DBG3TAB 0x0005,0x0011 0a42 03d3 ffff | | .CONST 0x03d3,0xffff 0a44 03d6 fffe | | .CONST 0x03d6,0xfffe 0a46 03da fffd | | .CONST 0x03da,0xfffd 0a48 03db fffc | | .CONST 0x03db,0xfffc 0a4a 03dc fffb | | .CONST 0x03dc,0xfffb 0a4c 03dd 0001 | | .CONST 0x03dd,0x0001 0a4e 03e4 0002 | | .CONST 0x03e4,0x0002 0a50 03e6 0003 | | .CONST 0x03e6,0x0003 0a52 03ea 0004 | | .CONST 0x03ea,0x0004 0a54 03eb 0005 | | .CONST 0x03eb,0x0005 0a56 03f7 0006 | | .CONST 0x03f7,0x0006 0a58 03f9 0007 | | .CONST 0x03f9,0x0007 0a5a 0402 0008 | | .CONST 0x0402,0x0008 0a5c 0403 0009 | | .CONST 0x0403,0x0009 0a5e 0407 000a | | .CONST 0x0407,0x000a 0a60 040c 000b | | .CONST 0x040c,0x000b 0a62 0410 000c | | .CONST 0x0410,0x000c 0a64 0412 000d | | .CONST 0x0412,0x000d 0a66 0415 000e | | .CONST 0x0415,0x000e 0a68 0418 000f | | .CONST 0x0418,0x000f 0a6a 041a 0010 | | .CONST 0x041a,0x0010 0a6c 041f 0011 | | .CONST 0x041f,0x0011 0a6e ; -------------------------------------------------------------------------------------- 0a6e ; Debug3 Subtable 0x13 0a6e ; -------------------------------------------------------------------------------------- 0a6e 0007 001d | | .DBG3TAB 0x0007,0x001d 0a70 042b ffff | + | .CONST 0x042b,0xffff 0a72 0431 fffe | 1 | .CONST 0x0431,0xfffe 0a74 0433 fffd | 3 | .CONST 0x0433,0xfffd 0a76 0438 fffc | 8 | .CONST 0x0438,0xfffc 0a78 043e fffb | > | .CONST 0x043e,0xfffb 0a7a 043f fffa | ? | .CONST 0x043f,0xfffa 0a7c 0440 fff9 | @ | .CONST 0x0440,0xfff9 0a7e 0441 0001 | A | .CONST 0x0441,0x0001 0a80 0445 0002 | E | .CONST 0x0445,0x0002 0a82 0447 0003 | G | .CONST 0x0447,0x0003 0a84 045c 0004 | \ | .CONST 0x045c,0x0004 0a86 0462 0005 | b | .CONST 0x0462,0x0005 0a88 0464 0006 | d | .CONST 0x0464,0x0006 0a8a 0474 0007 | t | .CONST 0x0474,0x0007 0a8c 0476 0008 | v | .CONST 0x0476,0x0008 0a8e 047a 0009 | z | .CONST 0x047a,0x0009 0a90 047b 000a | { | .CONST 0x047b,0x000a 0a92 048e 000b | | .CONST 0x048e,0x000b 0a94 0490 000c | | .CONST 0x0490,0x000c 0a96 0494 000d | | .CONST 0x0494,0x000d 0a98 0495 000e | | .CONST 0x0495,0x000e 0a9a 04a6 000f | | .CONST 0x04a6,0x000f 0a9c 04a8 0010 | | .CONST 0x04a8,0x0010 0a9e 04ac 0011 | | .CONST 0x04ac,0x0011 0aa0 04ad 0012 | | .CONST 0x04ad,0x0012 0aa2 04af 0013 | | .CONST 0x04af,0x0013 0aa4 04b3 0014 | | .CONST 0x04b3,0x0014 0aa6 04b8 0015 | | .CONST 0x04b8,0x0015 0aa8 04bc 0016 | | .CONST 0x04bc,0x0016 0aaa 04c1 0017 | | .CONST 0x04c1,0x0017 0aac 04c5 0018 | | .CONST 0x04c5,0x0018 0aae 04c7 0019 | | .CONST 0x04c7,0x0019 0ab0 04ca 001a | | .CONST 0x04ca,0x001a 0ab2 04cd 001b | | .CONST 0x04cd,0x001b 0ab4 04cf 001c | | .CONST 0x04cf,0x001c 0ab6 04d4 001d | | .CONST 0x04d4,0x001d 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 ; Debug3 Subtable 0x14 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 000a 0016 | | .DBG3TAB 0x000a,0x0016 0aba 04e3 ffff | | .CONST 0x04e3,0xffff 0abc 04e7 fffe | | .CONST 0x04e7,0xfffe 0abe 04e8 fffd | | .CONST 0x04e8,0xfffd 0ac0 04e9 fffc | | .CONST 0x04e9,0xfffc 0ac2 04ea fffb | | .CONST 0x04ea,0xfffb 0ac4 04ec fffa | | .CONST 0x04ec,0xfffa 0ac6 04ed fff9 | | .CONST 0x04ed,0xfff9 0ac8 04ef fff8 | | .CONST 0x04ef,0xfff8 0aca 04f2 fff7 | | .CONST 0x04f2,0xfff7 0acc 04f3 fff6 | | .CONST 0x04f3,0xfff6 0ace 04f4 0001 | | .CONST 0x04f4,0x0001 0ad0 04f8 0002 | | .CONST 0x04f8,0x0002 0ad2 04ff 0003 | | .CONST 0x04ff,0x0003 0ad4 0501 0004 | | .CONST 0x0501,0x0004 0ad6 0505 0005 | | .CONST 0x0505,0x0005 0ad8 0507 0006 | | .CONST 0x0507,0x0006 0ada 0509 0007 | | .CONST 0x0509,0x0007 0adc 050d 0008 | | .CONST 0x050d,0x0008 0ade 0512 0009 | | .CONST 0x0512,0x0009 0ae0 0522 000a | " | .CONST 0x0522,0x000a 0ae2 0532 000b | 2 | .CONST 0x0532,0x000b 0ae4 0534 000c | 4 | .CONST 0x0534,0x000c 0ae6 0539 000d | 9 | .CONST 0x0539,0x000d 0ae8 053b 000e | ; | .CONST 0x053b,0x000e 0aea 053f 000f | ? | .CONST 0x053f,0x000f 0aec 0541 0010 | A | .CONST 0x0541,0x0010 0aee 0542 0011 | B | .CONST 0x0542,0x0011 0af0 054c 0012 | L | .CONST 0x054c,0x0012 0af2 0550 0013 | P | .CONST 0x0550,0x0013 0af4 055b 0014 | [ | .CONST 0x055b,0x0014 0af6 055e 0015 | ^ | .CONST 0x055e,0x0015 0af8 0562 0016 | b | .CONST 0x0562,0x0016 0afa ; -------------------------------------------------------------------------------------- 0afa ; Debug3 Subtable 0x15 0afa ; -------------------------------------------------------------------------------------- 0afa 0000 0000 | | .DBG3TAB 0x0000,0x0000 0afc ; -------------------------------------------------------------------------------------- 0afc ; Debug3 Subtable 0x16 0afc ; -------------------------------------------------------------------------------------- 0afc 0002 0003 | | .DBG3TAB 0x0002,0x0003 0afe 0583 ffff | | .CONST 0x0583,0xffff 0b00 0584 fffe | | .CONST 0x0584,0xfffe 0b02 0585 0001 | | .CONST 0x0585,0x0001 0b04 0586 0401 | | .CONST 0x0586,0x0401 0b06 0588 0402 | | .CONST 0x0588,0x0402 0b08 ; -------------------------------------------------------------------------------------- 0b08 ; Debug3 Subtable 0x17 0b08 ; -------------------------------------------------------------------------------------- 0b08 0000 0001 | | .DBG3TAB 0x0000,0x0001 0b0a 0593 0001 | | .CONST 0x0593,0x0001 0b0c ; -------------------------------------------------------------------------------------- 0b0c ; Debug3 Subtable 0x18 0b0c ; -------------------------------------------------------------------------------------- 0b0c 0000 0001 | | .DBG3TAB 0x0000,0x0001 0b0e 059b 0001 | | .CONST 0x059b,0x0001 0b10 ; -------------------------------------------------------------------------------------- 0b10 ; Debug3 Subtable 0x19 0b10 ; -------------------------------------------------------------------------------------- 0b10 0000 0001 | | .DBG3TAB 0x0000,0x0001 0b12 05a3 0001 | | .CONST 0x05a3,0x0001 0b14 ; -------------------------------------------------------------------------------------- 0b14 ; Debug3 Subtable 0x1a 0b14 ; -------------------------------------------------------------------------------------- 0b14 0000 0002 | | .DBG3TAB 0x0000,0x0002 0b16 05ab 0001 | | .CONST 0x05ab,0x0001 0b18 05ad 0002 | | .CONST 0x05ad,0x0002 0b1a ; -------------------------------------------------------------------------------------- 0b1a ; Debug3 Subtable 0x1b 0b1a ; -------------------------------------------------------------------------------------- 0b1a 0000 0019 | | .DBG3TAB 0x0000,0x0019 0b1c 05bb 0001 | | .CONST 0x05bb,0x0001 0b1e 05dc 0019 | | .CONST 0x05dc,0x0019 0b20 05de 0002 | | .CONST 0x05de,0x0002 0b22 05df 0003 | | .CONST 0x05df,0x0003 0b24 05e1 0004 | | .CONST 0x05e1,0x0004 0b26 05e2 0005 | | .CONST 0x05e2,0x0005 0b28 05e4 0006 | | .CONST 0x05e4,0x0006 0b2a 05eb 0007 | | .CONST 0x05eb,0x0007 0b2c 05ec 0008 | | .CONST 0x05ec,0x0008 0b2e 05ed 0009 | | .CONST 0x05ed,0x0009 0b30 05ef 000a | | .CONST 0x05ef,0x000a 0b32 05f6 000b | | .CONST 0x05f6,0x000b 0b34 05f7 000c | | .CONST 0x05f7,0x000c 0b36 05f8 000d | | .CONST 0x05f8,0x000d 0b38 05fa 000e | | .CONST 0x05fa,0x000e 0b3a 0601 000f | | .CONST 0x0601,0x000f 0b3c 0602 0010 | | .CONST 0x0602,0x0010 0b3e 0603 0011 | | .CONST 0x0603,0x0011 0b40 0605 0012 | | .CONST 0x0605,0x0012 0b42 060c 0013 | | .CONST 0x060c,0x0013 0b44 060d 0014 | | .CONST 0x060d,0x0014 0b46 060e 0015 | | .CONST 0x060e,0x0015 0b48 0610 0016 | | .CONST 0x0610,0x0016 0b4a 0611 0017 | | .CONST 0x0611,0x0017 0b4c 0613 0018 | | .CONST 0x0613,0x0018 0b4e ; -------------------------------------------------------------------------------------- 0b4e ; Debug3 Subtable 0x1c 0b4e ; -------------------------------------------------------------------------------------- 0b4e 0000 0003 | | .DBG3TAB 0x0000,0x0003 0b50 0625 0002 | % | .CONST 0x0625,0x0002 0b52 062a 0001 | * | .CONST 0x062a,0x0001 0b54 0631 0003 | 1 | .CONST 0x0631,0x0003 0b56 ; -------------------------------------------------------------------------------------- 0b56 ; Debug3 Subtable 0x1d 0b56 ; -------------------------------------------------------------------------------------- 0b56 0000 0002 | | .DBG3TAB 0x0000,0x0002 0b58 063b 0001 | ; | .CONST 0x063b,0x0001 0b5a 0649 0002 | I | .CONST 0x0649,0x0002 0b5c ; -------------------------------------------------------------------------------------- 0b5c ; Debug3 Subtable 0x1e 0b5c ; -------------------------------------------------------------------------------------- 0b5c 0000 0001 | | .DBG3TAB 0x0000,0x0001 0b5e 0653 0001 | S | .CONST 0x0653,0x0001 0b60 ; -------------------------------------------------------------------------------------- 0b60 ; Debug3 Subtable 0x1f 0b60 ; -------------------------------------------------------------------------------------- 0b60 0000 0004 | | .DBG3TAB 0x0000,0x0004 0b62 065b 0001 | [ | .CONST 0x065b,0x0001 0b64 065f 0002 | _ | .CONST 0x065f,0x0002 0b66 0661 0003 | a | .CONST 0x0661,0x0003 0b68 0665 0004 | e | .CONST 0x0665,0x0004 0b6a 0000 0000 | | .BLANK 0000[0x96]