|
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: 4096 (0x1000) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 04f8 | | .CONST 0x04f8 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 007a | z | .CONST 0x007a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001a | | .CONST 0x001a ; Number of locals 000b INIT_0008: 000b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x0 = .DEBUG 0x000b,0x055a,0x8000,0x0000,0x0056,0x85f5,0x0000,0x000b ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0129 | ) | Execute Any,Make_Visible 000d 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb 0015 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa 0017 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9 0019 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8 001b 00bf | | Action Accept_Activation 001c 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001c,0x056c,0x8000,0x0000,0x0057,0x8dc5,0x0000,0x000d ; Debug Table 0x1.0x0 = 0x1c,0xffff 001d 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1d,0xfffe 001e 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x1e,0xfffd 001f e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x3 = 0x1f,0xfffc 0020 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0021 0266 | f | Execute Discrete,Bounds 0022 e002 | | Load 0x0,0x2 0023 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0024 02a0 | | Declare_Subprogram Null_Subprogram 0025 4801 |H | Short_Literal 0x1 0026 035d | ] | Declare_Type Array,Defined 0027 00d8 | | Load_Top At_Offset_0 0028 0337 | 7 | Declare_Variable Array 0029 00d8 | | Load_Top At_Offset_0 002a 0337 | 7 | Declare_Variable Array 002b 4800 |H | Short_Literal 0x0 002c 4800 |H | Short_Literal 0x0 002d 00da | | Load_Top At_Offset_2 002e 01d6 | | Execute Vector,Field_Write 002f 4801 |H | Short_Literal 0x1 0030 4801 |H | Short_Literal 0x1 0031 00da | | Load_Top At_Offset_2 0032 01d6 | | Execute Vector,Field_Write 0033 4806 |H | Short_Literal 0x6 0034 4802 |H | Short_Literal 0x2 0035 00da | | Load_Top At_Offset_2 0036 01d6 | | Execute Vector,Field_Write 0037 480a |H | Short_Literal 0xa 0038 4806 |H | Short_Literal 0x6 0039 00da | | Load_Top At_Offset_2 003a 01d6 | | Execute Vector,Field_Write 003b 480c |H | Short_Literal 0xc 003c 4803 |H | Short_Literal 0x3 003d 00da | | Load_Top At_Offset_2 003e 01d6 | | Execute Vector,Field_Write 003f 4808 |H | Short_Literal 0x8 0040 4804 |H | Short_Literal 0x4 0041 00da | | Load_Top At_Offset_2 0042 01d6 | | Execute Vector,Field_Write 0043 480e |H | Short_Literal 0xe 0044 4807 |H | Short_Literal 0x7 0045 00da | | Load_Top At_Offset_2 0046 01d6 | | Execute Vector,Field_Write 0047 480e |H | Short_Literal 0xe 0048 4805 |H | Short_Literal 0x5 0049 00da | | Load_Top At_Offset_2 004a 01d6 | | Execute Vector,Field_Write 004b 00d9 | | Load_Top At_Offset_1 004c 01d4 | | Execute Vector,Structure_Write 004d e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x4 = 0x4d,0xfffb 004e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 004f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0050 0266 | f | Execute Discrete,Bounds 0051 e003 | | Load 0x0,0x3 0052 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0053 02a0 | | Declare_Subprogram Null_Subprogram 0054 4801 |H | Short_Literal 0x1 0055 035d | ] | Declare_Type Array,Defined 0056 00d8 | | Load_Top At_Offset_0 0057 0337 | 7 | Declare_Variable Array 0058 00d8 | | Load_Top At_Offset_0 0059 0337 | 7 | Declare_Variable Array 005a 4800 |H | Short_Literal 0x0 005b 4800 |H | Short_Literal 0x0 005c 00da | | Load_Top At_Offset_2 005d 01d6 | | Execute Vector,Field_Write 005e 4801 |H | Short_Literal 0x1 005f 4801 |H | Short_Literal 0x1 0060 00da | | Load_Top At_Offset_2 0061 01d6 | | Execute Vector,Field_Write 0062 4802 |H | Short_Literal 0x2 0063 4802 |H | Short_Literal 0x2 0064 00da | | Load_Top At_Offset_2 0065 01d6 | | Execute Vector,Field_Write 0066 00d9 | | Load_Top At_Offset_1 0067 01d4 | | Execute Vector,Structure_Write 0068 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x5 = 0x68,0xfffa 0069 00c7 | | Action Elaborate_Subprogram 006a 029d 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call ; Debug Table 0x1.0x6 = 0x6a,0xfff9 006c 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x7 = 0x6c,0xfff8 006d 00c7 | | Action Elaborate_Subprogram 006e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x8 = 0x6e,0xfff7 006f 00c7 | | Action Elaborate_Subprogram 0070 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x9 = 0x70,0xfff6 0071 00c7 | | Action Elaborate_Subprogram 0072 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xa = 0x72,0xfff5 0073 00c7 | | Action Elaborate_Subprogram 0074 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xb = 0x74,0xfff4 0075 00c7 | | Action Elaborate_Subprogram 0076 029d 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call ; Debug Table 0x1.0xc = 0x76,0xfff3 0078 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xd = 0x78,0xfff2 0079 00c7 | | Action Elaborate_Subprogram 007a BODY_0008: 007a 00bc | | Action Signal_Activated 007b 00bb | | Action Signal_Completion 007c 0000 0000 | | .BLANK 0000[0x4] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0083,0x058a,0x0002,0x0000,0x0056,0x85f5,0x0000,0x0012 ; Debug Table 0x2.0x0 = 0x83,0x1 0084 00eb | | Load_Encached Diana_Cache 0085 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0086 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x1 = 0x86,0x401 0087 021d | | Execute Heap_Access,Is_Null 0088 00d0 | | Action Swap_Control 0089 00d1 | | Pop_Control Pop_Count_1 008a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0x2.0x2 = 0x8a,0x1 008b 0000 0000 | | .BLANK 0000[0x5] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 0007 | | Action Break_Optional ; Debug Table 0x3 = .DEBUG 0x0093,0x0592,0x0002,0x0000,0x0056,0x85f5,0x0000,0x001b ; Debug Table 0x3.0x0 = 0x93,0x1 0094 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x1 = 0x94,0x401 0095 0007 | | Action Break_Optional 0096 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x2 = 0x96,0x402 0097 0007 | | Action Break_Optional ; Debug Table 0x3.0x3 = 0x97,0x403 0098 0007 | | Action Break_Optional ; Debug Table 0x3.0x4 = 0x98,0x404 0099 0ba8 | | Execute_Immediate Case_Compare,0xa8 ; Debug Table 0x3.0x5 = 0x99,0x1 009a 705b |p[ | Jump_Nonzero 0xf6 009b 0ba3 | | Execute_Immediate Case_Compare,0xa3 009c 705e |p^ | Jump_Nonzero 0xfb 009d 0b49 | I | Execute_Immediate Case_Compare,0x49 009e 7093 |p | Jump_Nonzero 0x132 009f 0b47 | G | Execute_Immediate Case_Compare,0x47 00a0 7096 |p | Jump_Nonzero 0x137 00a1 0b46 | F | Execute_Immediate Case_Compare,0x46 00a2 7094 |p | Jump_Nonzero 0x137 00a3 0b48 | H | Execute_Immediate Case_Compare,0x48 00a4 7092 |p | Jump_Nonzero 0x137 00a5 0b3e | > | Execute_Immediate Case_Compare,0x3e 00a6 709d |p | Jump_Nonzero 0x144 00a7 0b3f | ? | Execute_Immediate Case_Compare,0x3f 00a8 709b |p | Jump_Nonzero 0x144 00a9 0b41 | A | Execute_Immediate Case_Compare,0x41 00aa 7099 |p | Jump_Nonzero 0x144 00ab 0b3d | = | Execute_Immediate Case_Compare,0x3d 00ac 7097 |p | Jump_Nonzero 0x144 00ad 0bab | | Execute_Immediate Case_Compare,0xab 00ae 70a2 |p | Jump_Nonzero 0x151 00af 0b3b | ; | Execute_Immediate Case_Compare,0x3b 00b0 70a3 |p | Jump_Nonzero 0x154 00b1 0b3c | < | Execute_Immediate Case_Compare,0x3c 00b2 70a1 |p | Jump_Nonzero 0x154 00b3 0b42 | B | Execute_Immediate Case_Compare,0x42 00b4 70a6 |p | Jump_Nonzero 0x15b 00b5 0b43 | C | Execute_Immediate Case_Compare,0x43 00b6 70a4 |p | Jump_Nonzero 0x15b 00b7 0b44 | D | Execute_Immediate Case_Compare,0x44 00b8 70a2 |p | Jump_Nonzero 0x15b 00b9 0b12 | | Execute_Immediate Case_Compare,0x12 00ba 70a5 |p | Jump_Nonzero 0x160 00bb 0b3a | : | Execute_Immediate Case_Compare,0x3a 00bc 70b0 |p | Jump_Nonzero 0x16d 00bd 0b37 | 7 | Execute_Immediate Case_Compare,0x37 00be 70b3 |p | Jump_Nonzero 0x172 00bf 0b38 | 8 | Execute_Immediate Case_Compare,0x38 00c0 70b6 |p | Jump_Nonzero 0x177 00c1 0b02 | | Execute_Immediate Case_Compare,0x2 00c2 70b9 |p | Jump_Nonzero 0x17c 00c3 0b39 | 9 | Execute_Immediate Case_Compare,0x39 00c4 70bc |p | Jump_Nonzero 0x181 00c5 0b40 | @ | Execute_Immediate Case_Compare,0x40 00c6 70bf |p | Jump_Nonzero 0x186 00c7 0b45 | E | Execute_Immediate Case_Compare,0x45 00c8 70c7 |p | Jump_Nonzero 0x190 00c9 0b85 | | Execute_Immediate Case_Compare,0x85 00ca 70c8 |p | Jump_Nonzero 0x193 00cb 0b9f | | Execute_Immediate Case_Compare,0x9f 00cc 70c9 |p | Jump_Nonzero 0x196 00cd 0b0c | | Execute_Immediate Case_Compare,0xc 00ce 70e2 |p | Jump_Nonzero 0x1b1 00cf 0b89 | | Execute_Immediate Case_Compare,0x89 00d0 70ea |p | Jump_Nonzero 0x1bb 00d1 0b84 | | Execute_Immediate Case_Compare,0x84 00d2 7106 |q | Jump_Nonzero 0x1d9 00d3 0b91 | | Execute_Immediate Case_Compare,0x91 00d4 7107 |q | Jump_Nonzero 0x1dc 00d5 0b8c | | Execute_Immediate Case_Compare,0x8c 00d6 7105 |q | Jump_Nonzero 0x1dc 00d7 0b95 | | Execute_Immediate Case_Compare,0x95 00d8 7106 |q | Jump_Nonzero 0x1df 00d9 0b97 | | Execute_Immediate Case_Compare,0x97 00da 7107 |q | Jump_Nonzero 0x1e2 00db 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x6 = 0xdb,0x1c 00dc e004 | | Load 0x0,0x4 00dd 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 00de 6806 |h | Jump_Zero 0xe5 00df 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x7 = 0xdf,0x1d 00e0 00eb | | Load_Encached Diana_Cache 00e1 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 00e2 00eb | | Load_Encached Diana_Cache 00e3 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e5 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x8 = 0xe5,0x1e 00e6 e004 | | Load 0x0,0x4 00e7 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 00e8 6803 |h | Jump_Zero 0xec 00e9 0092 0430 | 0| Action Push_String_Extended,0x430 ; "Statement" ; Debug Table 0x3.0x9 = 0xe9,0x1f 00eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ec 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xa = 0xec,0x20 00ed e004 | | Load 0x0,0x4 00ee 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 00ef 6803 |h | Jump_Zero 0xf3 00f0 0092 0431 | 1| Action Push_String_Extended,0x431 ; "Declaration" ; Debug Table 0x3.0xb = 0xf0,0x21 00f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f3 0092 0432 | 2| Action Push_String_Extended,0x432 ; "..." ; Debug Table 0x3.0xc = 0xf3,0x22 00f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f6 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xd = 0xf6,0x2 00f7 00eb | | Load_Encached Diana_Cache 00f8 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9 00f9 820f | | Call 0x1,0xf 00fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00fb 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xe = 0xfb,0x3 00fc 00eb | | Load_Encached Diana_Cache 00fd 1888 | | Execute Package,Field_Execute,Field_Number 0x88 00fe 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xf = 0xfe,0x801 00ff 7002 |p | Jump_Nonzero 0x102 0100 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x10 = 0x100,0x802 0101 782c |x, | Jump 0x12e 0102 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x11 = 0x102,0x803 0103 0217 | | Execute Heap_Access,All_Reference 0104 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0105 6804 |h | Jump_Zero 0x10a 0106 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x12 = 0x106,0x804 0107 0217 | | Execute Heap_Access,All_Reference 0108 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0109 7824 |x$ | Jump 0x12e 010a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x13 = 0x10a,0x805 010b 0007 | | Action Break_Optional 010c e404 | | Load 0x2,0x4 ; Debug Table 0x3.0x14 = 0x10c,0xc01 010d 0007 | | Action Break_Optional 010e 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x3.0x15 = 0x10e,0xc02 010f 0007 | | Action Break_Optional ; Debug Table 0x3.0x16 = 0x10f,0xc03 0110 00d0 | | Action Swap_Control ; Debug Table 0x3.0x17 = 0x110,0xc04 0111 00d1 | | Pop_Control Pop_Count_1 0112 49bb |I | Short_Literal 0x1bb ; Debug Table 0x3.0x18 = 0x112,0x805 0113 00eb | | Load_Encached Diana_Cache 0114 0098 | | Execute Package,Field_Read_Dynamic 0115 012c | , | Execute Any,Size 0116 e005 | | Load 0x0,0x5 0117 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0118 025b | [ | Execute Discrete,Check_In_Type 0119 0273 | s | Execute Discrete,Plus 011a 00d9 | | Load_Top At_Offset_1 011b 0007 | | Action Break_Optional 011c e405 | | Load 0x2,0x5 ; Debug Table 0x3.0x19 = 0x11c,0x1001 011d 0007 | | Action Break_Optional 011e 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x3.0x1a = 0x11e,0x1002 011f 0007 | | Action Break_Optional ; Debug Table 0x3.0x1b = 0x11f,0x1003 0120 00d0 | | Action Swap_Control ; Debug Table 0x3.0x1c = 0x120,0x1004 0121 00d1 | | Pop_Control Pop_Count_1 0122 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x3.0x1d = 0x122,0xc04 0123 00eb | | Load_Encached Diana_Cache 0124 0098 | | Execute Package,Field_Read_Dynamic 0125 49c9 |I | Short_Literal 0x1c9 0126 00eb | | Load_Encached Diana_Cache 0127 0098 | | Execute Package,Field_Read_Dynamic 0128 49ca |I | Short_Literal 0x1ca 0129 00eb | | Load_Encached Diana_Cache 012a 0095 | | Execute Package,Field_Reference_Dynamic 012b e006 | | Load 0x0,0x6 012c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 012d 7800 |x | Jump 0x12e 012e 00d0 | | Action Swap_Control 012f 00d1 | | Pop_Control Pop_Count_1 0130 820f | | Call 0x1,0xf ; Debug Table 0x3.0x1e = 0x130,0x3 0131 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0132 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x1f = 0x132,0x4 0133 00eb | | Load_Encached Diana_Cache 0134 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5 0135 820f | | Call 0x1,0xf 0136 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0137 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x20 = 0x137,0x5 0138 4976 |Iv | Short_Literal 0x176 0139 00eb | | Load_Encached Diana_Cache 013a 0098 | | Execute Package,Field_Read_Dynamic 013b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 013c 00eb | | Load_Encached Diana_Cache 013d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 013e 00eb | | Load_Encached Diana_Cache 013f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0140 0092 0433 | 3| Action Push_String_Extended,0x433 ; "'Body" 0142 01cc | | Execute Vector,Catenate 0143 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0144 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x21 = 0x144,0x6 0145 4976 |Iv | Short_Literal 0x176 0146 00eb | | Load_Encached Diana_Cache 0147 0098 | | Execute Package,Field_Read_Dynamic 0148 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0149 00eb | | Load_Encached Diana_Cache 014a 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 014b 00eb | | Load_Encached Diana_Cache 014c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 014d 0092 0434 | 4| Action Push_String_Extended,0x434 ; "'Spec" 014f 01cc | | Execute Vector,Catenate 0150 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0151 0092 0435 | 5| Action Push_String_Extended,0x435 ; "Anonymous" ; Debug Table 0x3.0x22 = 0x151,0x7 0153 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0154 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x23 = 0x154,0x8 0155 4976 |Iv | Short_Literal 0x176 0156 00eb | | Load_Encached Diana_Cache 0157 0098 | | Execute Package,Field_Read_Dynamic 0158 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0159 820f | | Call 0x1,0xf 015a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 015b 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x24 = 0x15b,0x9 015c 00eb | | Load_Encached Diana_Cache 015d 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 015e 820f | | Call 0x1,0xf 015f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0160 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x25 = 0x160,0xa 0161 00eb | | Load_Encached Diana_Cache 0162 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0163 820f | | Call 0x1,0xf 0164 0092 0436 | 6| Action Push_String_Extended,0x436 ; "." 0166 01cc | | Execute Vector,Catenate 0167 e5ff | | Load 0x2,-0x1 0168 00eb | | Load_Encached Diana_Cache 0169 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0 016a 820f | | Call 0x1,0xf 016b 01cc | | Execute Vector,Catenate 016c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 016d 0092 0437 | 7| Action Push_String_Extended,0x437 ; "Number declaration" ; Debug Table 0x3.0x26 = 0x16d,0xb 016f e5ff | | Load 0x2,-0x1 0170 8219 | | Call 0x1,0x19 0171 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0172 0092 0438 | 8| Action Push_String_Extended,0x438 ; "Exception declaration" ; Debug Table 0x3.0x27 = 0x172,0xc 0174 e5ff | | Load 0x2,-0x1 0175 8219 | | Call 0x1,0x19 0176 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0177 0092 0439 | 9| Action Push_String_Extended,0x439 ; "Constant declaration" ; Debug Table 0x3.0x28 = 0x177,0xd 0179 e5ff | | Load 0x2,-0x1 017a 8219 | | Call 0x1,0x19 017b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017c 0092 043a | :| Action Push_String_Extended,0x43a ; "Deferred Constant declaration" ; Debug Table 0x3.0x29 = 0x17c,0xe 017e e5ff | | Load 0x2,-0x1 017f 8219 | | Call 0x1,0x19 0180 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0181 0092 043b | ;| Action Push_String_Extended,0x43b ; "Variable declaration" ; Debug Table 0x3.0x2a = 0x181,0xf 0183 e5ff | | Load 0x2,-0x1 0184 8219 | | Call 0x1,0x19 0185 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0186 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x2b = 0x186,0x10 0187 e007 | | Load 0x0,0x7 0188 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0189 6803 |h | Jump_Zero 0x18d 018a 0092 043c | <| Action Push_String_Extended,0x43c ; "Comment" ; Debug Table 0x3.0x2c = 0x18a,0x11 018c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018d 0092 043d | =| Action Push_String_Extended,0x43d ; "Pragma" ; Debug Table 0x3.0x2d = 0x18d,0x12 018f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0190 0092 043e | >| Action Push_String_Extended,0x43e ; "Use declaration" ; Debug Table 0x3.0x2e = 0x190,0x13 0192 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0193 0092 043f | ?| Action Push_String_Extended,0x43f ; "With declaration" ; Debug Table 0x3.0x2f = 0x193,0x14 0195 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0196 0007 | | Action Break_Optional ; Debug Table 0x3.0x30 = 0x196,0x15 0197 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x31 = 0x197,0xebff 0198 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x32 = 0x198,0x1401 0199 00eb | | Load_Encached Diana_Cache 019a 18ec | | Execute Package,Field_Execute,Field_Number 0xec 019b 00eb | | Load_Encached Diana_Cache 019c 18ec | | Execute Package,Field_Execute,Field_Number 0xec 019d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 019e 0007 | | Action Break_Optional ; Debug Table 0x3.0x33 = 0x19e,0x1402 019f e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x34 = 0x19f,0x1801 01a0 0007 | | Action Break_Optional 01a1 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x35 = 0x1a1,0x1802 01a2 0007 | | Action Break_Optional ; Debug Table 0x3.0x36 = 0x1a2,0x1803 01a3 0007 | | Action Break_Optional ; Debug Table 0x3.0x37 = 0x1a3,0x1804 01a4 0b4f | O | Execute_Immediate Case_Compare,0x4f ; Debug Table 0x3.0x38 = 0x1a4,0x1402 01a5 7005 |p | Jump_Nonzero 0x1ab 01a6 0b4e | N | Execute_Immediate Case_Compare,0x4e 01a7 7006 |p | Jump_Nonzero 0x1ae 01a8 0092 0440 | @| Action Push_String_Extended,0x440 ; " ..." ; Debug Table 0x3.0x39 = 0x1a8,0x1405 01aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ab 0092 0441 | A| Action Push_String_Extended,0x441 ; "Case alternative" ; Debug Table 0x3.0x3a = 0x1ab,0x1403 01ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ae 0092 0442 | B| Action Push_String_Extended,0x442 ; "Exception handler" ; Debug Table 0x3.0x3b = 0x1ae,0x1404 01b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b1 4822 |H" | Short_Literal 0x22 ; Debug Table 0x3.0x3c = 0x1b1,0x16 01b2 4822 |H" | Short_Literal 0x22 01b3 e5ff | | Load 0x2,-0x1 01b4 00eb | | Load_Encached Diana_Cache 01b5 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 01b6 00eb | | Load_Encached Diana_Cache 01b7 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 01b8 01ca | | Execute Vector,Prepend 01b9 01cb | | Execute Vector,Append 01ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bb 0007 | | Action Break_Optional ; Debug Table 0x3.0x3d = 0x1bb,0x17 01bc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x3e = 0x1bc,0xe3ff 01bd e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x3f = 0x1bd,0x1c01 01be 00eb | | Load_Encached Diana_Cache 01bf 18ec | | Execute Package,Field_Execute,Field_Number 0xec 01c0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01c1 0007 | | Action Break_Optional ; Debug Table 0x3.0x40 = 0x1c1,0x1c02 01c2 e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x41 = 0x1c2,0x2001 01c3 0007 | | Action Break_Optional 01c4 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x42 = 0x1c4,0x2002 01c5 0007 | | Action Break_Optional ; Debug Table 0x3.0x43 = 0x1c5,0x2003 01c6 0007 | | Action Break_Optional ; Debug Table 0x3.0x44 = 0x1c6,0x2004 01c7 0b00 | | Execute_Immediate Case_Compare,0x0 ; Debug Table 0x3.0x45 = 0x1c7,0x1c02 01c8 7007 |p | Jump_Nonzero 0x1d0 01c9 0b4f | O | Execute_Immediate Case_Compare,0x4f 01ca 7008 |p | Jump_Nonzero 0x1d3 01cb 0b4e | N | Execute_Immediate Case_Compare,0x4e 01cc 7009 |p | Jump_Nonzero 0x1d6 01cd 0092 0440 | @| Action Push_String_Extended,0x440 ; " ..." ; Debug Table 0x3.0x46 = 0x1cd,0x1c06 01cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d0 0092 0443 | C| Action Push_String_Extended,0x443 ; "Alternative list" ; Debug Table 0x3.0x47 = 0x1d0,0x1c03 01d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d3 0092 0444 | D| Action Push_String_Extended,0x444 ; "Case alternative list" ; Debug Table 0x3.0x48 = 0x1d3,0x1c04 01d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d6 0092 0445 | E| Action Push_String_Extended,0x445 ; "Exception handler list" ; Debug Table 0x3.0x49 = 0x1d6,0x1c05 01d8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d9 0092 0446 | F| Action Push_String_Extended,0x446 ; "Context list" ; Debug Table 0x3.0x4a = 0x1d9,0x18 01db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01dc 0092 0447 | G| Action Push_String_Extended,0x447 ; "Declaration list" ; Debug Table 0x3.0x4b = 0x1dc,0x19 01de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01df 0092 0448 | H| Action Push_String_Extended,0x448 ; "Pragma list" ; Debug Table 0x3.0x4c = 0x1df,0x1a 01e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e2 0092 0449 | I| Action Push_String_Extended,0x449 ; "Statement list" ; Debug Table 0x3.0x4d = 0x1e2,0x1b 01e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e5 0000 0000 | | .XXX[0x3] 01e7 0000 | | 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x01eb,0x0630,0x0002,0x0000,0x0056,0x85f5,0x0000,0x0024 ; Debug Table 0x4.0x0 = 0x1eb,0x1 01ec 0b89 | | Execute_Immediate Case_Compare,0x89 01ed 7012 |p | Jump_Nonzero 0x200 01ee 0b84 | | Execute_Immediate Case_Compare,0x84 01ef 7010 |p | Jump_Nonzero 0x200 01f0 0b8c | | Execute_Immediate Case_Compare,0x8c 01f1 700e |p | Jump_Nonzero 0x200 01f2 0b8f | | Execute_Immediate Case_Compare,0x8f 01f3 700c |p | Jump_Nonzero 0x200 01f4 0b91 | | Execute_Immediate Case_Compare,0x91 01f5 700a |p | Jump_Nonzero 0x200 01f6 0b95 | | Execute_Immediate Case_Compare,0x95 01f7 7008 |p | Jump_Nonzero 0x200 01f8 0b97 | | Execute_Immediate Case_Compare,0x97 01f9 7006 |p | Jump_Nonzero 0x200 01fa 0b72 | r | Execute_Immediate Case_Compare,0x72 01fb 7004 |p | Jump_Nonzero 0x200 01fc 0ba2 | | Execute_Immediate Case_Compare,0xa2 01fd 7002 |p | Jump_Nonzero 0x200 01fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1 = 0x1fe,0x3 01ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0200 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x2 = 0x200,0x2 0201 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0202 0000 0000 | | .BLANK 0000[0x6] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020d | | .CONST 0x020d ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0003 | | .CONST 0x0003 ; Number of locals 020b INIT_0208: 020b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x020b,0x0638,0x0002,0x0000,0x0056,0x85f5,0x0000,0x002f ; Debug Table 0x5.0x0 = 0x20b,0xffff 020c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x1 = 0x20c,0xfffe 020d BODY_0208: 020d e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x2 = 0x20d,0x1 020e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 020f 780b |x | Jump 0x21b 0210 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0x210,0x3 0211 00eb | | Load_Encached Diana_Cache 0212 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0213 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0214 0007 | | Action Break_Optional ; Debug Table 0x5.0x4 = 0x214,0x4 0215 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x5 = 0x215,0x401 0216 021d | | Execute Heap_Access,Is_Null 0217 6801 |h | Jump_Zero 0x219 ; Debug Table 0x5.0x6 = 0x217,0x4 0218 7806 |x | Jump 0x21f ; Debug Table 0x5.0x7 = 0x218,0x5 0219 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x8 = 0x219,0x6 021a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 021b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x9 = 0x21b,0x2 021c e004 | | Load 0x0,0x4 021d 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 021e 6ff1 |o | Jump_Zero 0x210 021f 0007 | | Action Break_Optional ; Debug Table 0x5.0xa = 0x21f,0x7 0220 e403 | | Load 0x2,0x3 ; Debug Table 0x5.0xb = 0x220,0x801 0221 0007 | | Action Break_Optional 0222 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0xc = 0x222,0x802 0223 0007 | | Action Break_Optional ; Debug Table 0x5.0xd = 0x223,0x803 0224 0007 | | Action Break_Optional ; Debug Table 0x5.0xe = 0x224,0x804 0225 0b3d | = | Execute_Immediate Case_Compare,0x3d ; Debug Table 0x5.0xf = 0x225,0x7 0226 7008 |p | Jump_Nonzero 0x22f 0227 0b3e | > | Execute_Immediate Case_Compare,0x3e 0228 7006 |p | Jump_Nonzero 0x22f 0229 0b3f | ? | Execute_Immediate Case_Compare,0x3f 022a 7004 |p | Jump_Nonzero 0x22f 022b 0b41 | A | Execute_Immediate Case_Compare,0x41 022c 7002 |p | Jump_Nonzero 0x22f 022d 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x10 = 0x22d,0x9 022e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 022f 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x11 = 0x22f,0x8 0230 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0231 0000 0000 | | .BLANK 0000[0x7] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 0244 | D | .CONST 0x0244 ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0004 | | .CONST 0x0004 ; Number of locals 023b INIT_0238: 023b e002 | | Load 0x0,0x2 ; Debug Table 0x6 = .DEBUG 0x023b,0x065e,0x0001,0x0000,0x0056,0x85f5,0x0000,0x0038 ; Debug Table 0x6.0x0 = 0x23b,0xffff 023c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 023d e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x1 = 0x23d,0xfffe 023e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 023f e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x2 = 0x23f,0xfffd 0240 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0241 02ff | | Declare_Variable Variant_Record 0242 00d8 | | Load_Top At_Offset_0 0243 1c00 | | Execute_Immediate Run_Utility,0x0 0244 BODY_0238: 0244 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x3 = 0x244,0x1 0245 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0246 00d9 | | Load_Top At_Offset_1 0247 4800 |H | Short_Literal 0x0 0248 e5fc | | Load 0x2,-0x4 0249 e5fd | | Load 0x2,-0x3 024a e5ff | | Load 0x2,-0x1 024b e002 | | Load 0x0,0x2 024c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 024d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 024e 00d1 | | Pop_Control Pop_Count_1 024f 005b | [ | Store_Top Discrete,At_Offset_3 0250 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x4 = 0x250,0x2 0251 6803 |h | Jump_Zero 0x255 0252 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x5 = 0x252,0x3 0253 a5fa | | Store_Unchecked 0x2,-0x6 0254 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x6.0x6 = 0x254,0x4 0255 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x7 = 0x255,0x5 0256 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0257 e5fb | | Load 0x2,-0x5 0258 0120 | | Execute Any,Is_Value 0259 6803 |h | Jump_Zero 0x25d 025a e008 | | Load 0x0,0x8 025b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 025c 7801 |x | Jump 0x25e 025d e5fb | | Load 0x2,-0x5 025e 4800 |H | Short_Literal 0x0 025f e5fd | | Load 0x2,-0x3 0260 e009 | | Load 0x0,0x9 0261 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0262 e00a | | Load 0x0,0xa 0263 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0264 e5fe | | Load 0x2,-0x2 0265 e218 | | Load 0x1,0x18 0266 01d7 | | Execute Vector,Field_Read 0267 e404 | | Load 0x2,0x4 0268 e008 | | Load 0x0,0x8 0269 1813 | | Execute Package,Field_Execute,Field_Number 0x13 026a c5fb | | Store 0x2,-0x5 026b 005a | Z | Store_Top Discrete,At_Offset_2 026c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x8 = 0x26c,0x6 026d e216 | | Load 0x1,0x16 026e 01d7 | | Execute Vector,Field_Read 026f a5fa | | Store_Unchecked 0x2,-0x6 0270 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0271 0000 0000 | | .BLANK 0000[0x7] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027d | } | .CONST 0x027d ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0002 | | .CONST 0x0002 ; Number of locals 027b INIT_0278: 027b e001 | | Load 0x0,0x1 ; Debug Table 0x7 = .DEBUG 0x027b,0x0672,0x0001,0x0000,0x0056,0x85f5,0x0000,0x0067 ; Debug Table 0x7.0x0 = 0x27b,0xffff 027c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 027d BODY_0278: 027d e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x1 = 0x27d,0x1 027e 680d |h | Jump_Zero 0x28c 027f e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x2 = 0x27f,0x2 0280 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0281 e5fd | | Load 0x2,-0x3 0282 4800 |H | Short_Literal 0x0 0283 e008 | | Load 0x0,0x8 0284 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0285 c5fd | | Store 0x2,-0x3 0286 0059 | Y | Store_Top Discrete,At_Offset_1 0287 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x3 = 0x287,0x3 0288 e216 | | Load 0x1,0x16 0289 01d7 | | Execute Vector,Field_Read 028a a5fc | | Store_Unchecked 0x2,-0x4 028b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 028c 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x4 = 0x28c,0x4 028d a5fc | | Store_Unchecked 0x2,-0x4 028e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 028f 0000 | | .XXX[0x1] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 029e | | .CONST 0x029e ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0004 | | .CONST 0x0004 ; Number of locals 0293 INIT_0290: 0293 4801 |H | Short_Literal 0x1 ; Debug Table 0x8 = .DEBUG 0x0293,0x067e,0x0002,0x0000,0x0056,0x85f5,0x0000,0x0082 ; Debug Table 0x8.0x0 = 0x293,0xffff 0294 00db | | Load_Top At_Offset_3 0295 821a | | Call 0x1,0x1a 0296 49a0 |I | Short_Literal 0x1a0 0297 00eb | | Load_Encached Diana_Cache 0298 0098 | | Execute Package,Field_Read_Dynamic 0299 0334 | 4 | Declare_Variable Array,With_Constraint 029a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x1 = 0x29a,0xfffe 029b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 029c 029f 0373 | s| Declare_Subprogram INIT_0370,For_Call ; Debug Table 0x8.0x2 = 0x29c,0xfffd 029e BODY_0290: 029e 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x3 = 0x29e,0x1 029f 01db | | Execute Vector,Length 02a0 0c01 | | Execute_Immediate Greater_Equal,0x1 02a1 6802 |h | Jump_Zero 0x2a4 02a2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x4 = 0x2a2,0x2 02a3 8404 | | Call 0x2,0x4 02a4 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x5 = 0x2a4,0x3 02a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a6 0000 0000 | | .XXX[0x2] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ac | | .CONST 0x02ac ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0002 | | .CONST 0x0002 ; Number of locals 02ab INIT_02a8: 02ab 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x9 = .DEBUG 0x02ab,0x068c,0x0002,0x0000,0x0057,0x8dc5,0x0000,0x00b3 ; Debug Table 0x9.0x0 = 0x2ab,0xffff 02ac BODY_02a8: 02ac 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x1 = 0x2ac,0x1 02ad 00eb | | Load_Encached Diana_Cache 02ae 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0 02af 00eb | | Load_Encached Diana_Cache 02b0 1889 | | Execute Package,Field_Execute,Field_Number 0x89 02b1 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02b2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x2 = 0x2b2,0x2 02b3 4975 |Iu | Short_Literal 0x175 02b4 00eb | | Load_Encached Diana_Cache 02b5 0098 | | Execute Package,Field_Read_Dynamic 02b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02b7 6839 |h9 | Jump_Zero 0x2f1 02b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x3 = 0x2b8,0x3 02b9 0007 | | Action Break_Optional 02ba 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x4 = 0x2ba,0x401 02bb 7002 |p | Jump_Nonzero 0x2be 02bc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9.0x5 = 0x2bc,0x402 02bd 782c |x, | Jump 0x2ea 02be 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x2be,0x403 02bf 0217 | | Execute Heap_Access,All_Reference 02c0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c1 6804 |h | Jump_Zero 0x2c6 02c2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x7 = 0x2c2,0x404 02c3 0217 | | Execute Heap_Access,All_Reference 02c4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02c5 7824 |x$ | Jump 0x2ea 02c6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x8 = 0x2c6,0x405 02c7 0007 | | Action Break_Optional 02c8 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x9 = 0x2c8,0x801 02c9 0007 | | Action Break_Optional 02ca 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x9.0xa = 0x2ca,0x802 02cb 0007 | | Action Break_Optional ; Debug Table 0x9.0xb = 0x2cb,0x803 02cc 00d0 | | Action Swap_Control ; Debug Table 0x9.0xc = 0x2cc,0x804 02cd 00d1 | | Pop_Control Pop_Count_1 02ce 49bb |I | Short_Literal 0x1bb ; Debug Table 0x9.0xd = 0x2ce,0x405 02cf 00eb | | Load_Encached Diana_Cache 02d0 0098 | | Execute Package,Field_Read_Dynamic 02d1 012c | , | Execute Any,Size 02d2 e005 | | Load 0x0,0x5 02d3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02d4 025b | [ | Execute Discrete,Check_In_Type 02d5 0273 | s | Execute Discrete,Plus 02d6 00d9 | | Load_Top At_Offset_1 02d7 0007 | | Action Break_Optional 02d8 e405 | | Load 0x2,0x5 ; Debug Table 0x9.0xe = 0x2d8,0xc01 02d9 0007 | | Action Break_Optional 02da 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x9.0xf = 0x2da,0xc02 02db 0007 | | Action Break_Optional ; Debug Table 0x9.0x10 = 0x2db,0xc03 02dc 00d0 | | Action Swap_Control ; Debug Table 0x9.0x11 = 0x2dc,0xc04 02dd 00d1 | | Pop_Control Pop_Count_1 02de 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x9.0x12 = 0x2de,0x804 02df 00eb | | Load_Encached Diana_Cache 02e0 0098 | | Execute Package,Field_Read_Dynamic 02e1 49c9 |I | Short_Literal 0x1c9 02e2 00eb | | Load_Encached Diana_Cache 02e3 0098 | | Execute Package,Field_Read_Dynamic 02e4 49ca |I | Short_Literal 0x1ca 02e5 00eb | | Load_Encached Diana_Cache 02e6 0095 | | Execute Package,Field_Reference_Dynamic 02e7 e006 | | Load 0x0,0x6 02e8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02e9 7800 |x | Jump 0x2ea 02ea 00d0 | | Action Swap_Control 02eb 00d1 | | Pop_Control Pop_Count_1 02ec 00eb | | Load_Encached Diana_Cache ; Debug Table 0x9.0x13 = 0x2ec,0x3 02ed 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 02ee 00eb | | Load_Encached Diana_Cache 02ef 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 02f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02f1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x14 = 0x2f1,0x4 02f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02f3 0000 0000 | | .BLANK 0000[0x5] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fe | | .CONST 0x02fe ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0003 | | .CONST 0x0003 ; Number of locals 02fb INIT_02f8: 02fb 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa = .DEBUG 0x02fb,0x06b8,0x0002,0x0000,0x0057,0x8dc5,0x0000,0x0491 ; Debug Table 0xa.0x0 = 0x2fb,0xffff 02fc 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x1 = 0x2fc,0xfffe 02fd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02fe BODY_02f8: 02fe 0007 | | Action Break_Optional ; Debug Table 0xa.0x2 = 0x2fe,0x1 02ff e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x3 = 0x2ff,0x401 0300 0007 | | Action Break_Optional 0301 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xa.0x4 = 0x301,0x402 0302 0007 | | Action Break_Optional ; Debug Table 0xa.0x5 = 0x302,0x403 0303 0007 | | Action Break_Optional ; Debug Table 0xa.0x6 = 0x303,0x404 0304 0b97 | | Execute_Immediate Case_Compare,0x97 ; Debug Table 0xa.0x7 = 0x304,0x1 0305 7007 |p | Jump_Nonzero 0x30d 0306 0b4e | N | Execute_Immediate Case_Compare,0x4e 0307 7050 |pP | Jump_Nonzero 0x358 0308 0b10 | | Execute_Immediate Case_Compare,0x10 0309 7054 |pT | Jump_Nonzero 0x35e 030a 0b5b | [ | Execute_Immediate Case_Compare,0x5b 030b 7052 |pR | Jump_Nonzero 0x35e 030c 785d |x] | Jump 0x36a ; Debug Table 0xa.0x8 = 0x30c,0x9 030d e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x9 = 0x30d,0x2 030e 00eb | | Load_Encached Diana_Cache 030f 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0310 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0311 7841 |xA | Jump 0x353 0312 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0xa = 0x312,0x4 0313 00db | | Load_Top At_Offset_3 0314 0007 | | Action Break_Optional 0315 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xb = 0x315,0x801 0316 7002 |p | Jump_Nonzero 0x319 0317 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0xc = 0x317,0x802 0318 782c |x, | Jump 0x345 0319 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xd = 0x319,0x803 031a 0217 | | Execute Heap_Access,All_Reference 031b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 031c 6804 |h | Jump_Zero 0x321 031d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xe = 0x31d,0x804 031e 0217 | | Execute Heap_Access,All_Reference 031f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0320 7824 |x$ | Jump 0x345 0321 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xf = 0x321,0x805 0322 0007 | | Action Break_Optional 0323 e407 | | Load 0x2,0x7 ; Debug Table 0xa.0x10 = 0x323,0xc01 0324 0007 | | Action Break_Optional 0325 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xa.0x11 = 0x325,0xc02 0326 0007 | | Action Break_Optional ; Debug Table 0xa.0x12 = 0x326,0xc03 0327 00d0 | | Action Swap_Control ; Debug Table 0xa.0x13 = 0x327,0xc04 0328 00d1 | | Pop_Control Pop_Count_1 0329 49bb |I | Short_Literal 0x1bb ; Debug Table 0xa.0x14 = 0x329,0x805 032a 00eb | | Load_Encached Diana_Cache 032b 0098 | | Execute Package,Field_Read_Dynamic 032c 012c | , | Execute Any,Size 032d e005 | | Load 0x0,0x5 032e 1b17 | | Execute Package,Field_Read,Field_Number 0x17 032f 025b | [ | Execute Discrete,Check_In_Type 0330 0273 | s | Execute Discrete,Plus 0331 00d9 | | Load_Top At_Offset_1 0332 0007 | | Action Break_Optional 0333 e408 | | Load 0x2,0x8 ; Debug Table 0xa.0x15 = 0x333,0x1001 0334 0007 | | Action Break_Optional 0335 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xa.0x16 = 0x335,0x1002 0336 0007 | | Action Break_Optional ; Debug Table 0xa.0x17 = 0x336,0x1003 0337 00d0 | | Action Swap_Control ; Debug Table 0xa.0x18 = 0x337,0x1004 0338 00d1 | | Pop_Control Pop_Count_1 0339 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xa.0x19 = 0x339,0xc04 033a 00eb | | Load_Encached Diana_Cache 033b 0098 | | Execute Package,Field_Read_Dynamic 033c 49c9 |I | Short_Literal 0x1c9 033d 00eb | | Load_Encached Diana_Cache 033e 0098 | | Execute Package,Field_Read_Dynamic 033f 49ca |I | Short_Literal 0x1ca 0340 00eb | | Load_Encached Diana_Cache 0341 0095 | | Execute Package,Field_Reference_Dynamic 0342 e006 | | Load 0x0,0x6 0343 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0344 7800 |x | Jump 0x345 0345 00d0 | | Action Swap_Control 0346 00d1 | | Pop_Control Pop_Count_1 0347 821a | | Call 0x1,0x1a ; Debug Table 0xa.0x1a = 0x347,0x4 0348 0273 | s | Execute Discrete,Plus 0349 005a | Z | Store_Top Discrete,At_Offset_2 034a 0007 | | Action Break_Optional ; Debug Table 0xa.0x1b = 0x34a,0x5 034b 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1c = 0x34b,0x1401 034c 7002 |p | Jump_Nonzero 0x34f 034d 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa.0x1d = 0x34d,0x1402 034e 7803 |x | Jump 0x352 034f 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1e = 0x34f,0x1403 0350 0217 | | Execute Heap_Access,All_Reference 0351 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0352 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0xa.0x1f = 0x352,0x5 0353 0007 | | Action Break_Optional ; Debug Table 0xa.0x20 = 0x353,0x3 0354 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x21 = 0x354,0x1801 0355 021d | | Execute Heap_Access,Is_Null 0356 6fbb |o | Jump_Zero 0x312 ; Debug Table 0xa.0x22 = 0x356,0x3 0357 7812 |x | Jump 0x36a 0358 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x23 = 0x358,0x6 0359 00eb | | Load_Encached Diana_Cache 035a 18e1 | | Execute Package,Field_Execute,Field_Number 0xe1 035b 821a | | Call 0x1,0x1a 035c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 035d 780c |x | Jump 0x36a 035e e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x24 = 0x35e,0x7 035f 00eb | | Load_Encached Diana_Cache 0360 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9 0361 00eb | | Load_Encached Diana_Cache 0362 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0363 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0364 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x25 = 0x364,0x8 0365 4975 |Iu | Short_Literal 0x175 0366 00eb | | Load_Encached Diana_Cache 0367 0098 | | Execute Package,Field_Read_Dynamic 0368 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0369 005a | Z | Store_Top Discrete,At_Offset_2 036a 00d1 | | Pop_Control Pop_Count_1 036b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x26 = 0x36b,0xa 036c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 036d 0000 0000 | | .XXX[0x3] 036f 0000 | | 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0375 | u | .CONST 0x0375 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0003 | | .CONST 0x0003 ; Number of locals 0373 INIT_0370: 0373 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb = .DEBUG 0x0373,0x0708,0x0001,0x0000,0x0057,0x8dc5,0x0000,0x053c ; Debug Table 0xb.0x0 = 0x373,0xffff 0374 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x1 = 0x374,0xfffe 0375 BODY_0370: 0375 0007 | | Action Break_Optional ; Debug Table 0xb.0x2 = 0x375,0x1 0376 e7ff | | Load 0x3,-0x1 ; Debug Table 0xb.0x3 = 0x376,0x401 0377 0007 | | Action Break_Optional 0378 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xb.0x4 = 0x378,0x402 0379 0007 | | Action Break_Optional ; Debug Table 0xb.0x5 = 0x379,0x403 037a 0007 | | Action Break_Optional ; Debug Table 0xb.0x6 = 0x37a,0x404 037b 0b97 | | Execute_Immediate Case_Compare,0x97 ; Debug Table 0xb.0x7 = 0x37b,0x1 037c 7007 |p | Jump_Nonzero 0x384 037d 0b4e | N | Execute_Immediate Case_Compare,0x4e 037e 704d |pM | Jump_Nonzero 0x3cc 037f 0b10 | | Execute_Immediate Case_Compare,0x10 0380 7050 |pP | Jump_Nonzero 0x3d1 0381 0b5b | [ | Execute_Immediate Case_Compare,0x5b 0382 704e |pN | Jump_Nonzero 0x3d1 0383 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0xb.0x8 = 0x383,0x10 0384 e7ff | | Load 0x3,-0x1 ; Debug Table 0xb.0x9 = 0x384,0x2 0385 00eb | | Load_Encached Diana_Cache 0386 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0387 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0388 783e |x> | Jump 0x3c7 0389 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xa = 0x389,0x4 038a 0007 | | Action Break_Optional 038b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xb = 0x38b,0x801 038c 7002 |p | Jump_Nonzero 0x38f 038d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0xc = 0x38d,0x802 038e 782c |x, | Jump 0x3bb 038f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xd = 0x38f,0x803 0390 0217 | | Execute Heap_Access,All_Reference 0391 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0392 6804 |h | Jump_Zero 0x397 0393 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xe = 0x393,0x804 0394 0217 | | Execute Heap_Access,All_Reference 0395 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0396 7824 |x$ | Jump 0x3bb 0397 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xf = 0x397,0x805 0398 0007 | | Action Break_Optional 0399 e606 | | Load 0x3,0x6 ; Debug Table 0xb.0x10 = 0x399,0xc01 039a 0007 | | Action Break_Optional 039b 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xb.0x11 = 0x39b,0xc02 039c 0007 | | Action Break_Optional ; Debug Table 0xb.0x12 = 0x39c,0xc03 039d 00d0 | | Action Swap_Control ; Debug Table 0xb.0x13 = 0x39d,0xc04 039e 00d1 | | Pop_Control Pop_Count_1 039f 49bb |I | Short_Literal 0x1bb ; Debug Table 0xb.0x14 = 0x39f,0x805 03a0 00eb | | Load_Encached Diana_Cache 03a1 0098 | | Execute Package,Field_Read_Dynamic 03a2 012c | , | Execute Any,Size 03a3 e005 | | Load 0x0,0x5 03a4 1b17 | | Execute Package,Field_Read,Field_Number 0x17 03a5 025b | [ | Execute Discrete,Check_In_Type 03a6 0273 | s | Execute Discrete,Plus 03a7 00d9 | | Load_Top At_Offset_1 03a8 0007 | | Action Break_Optional 03a9 e607 | | Load 0x3,0x7 ; Debug Table 0xb.0x15 = 0x3a9,0x1001 03aa 0007 | | Action Break_Optional 03ab 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x16 = 0x3ab,0x1002 03ac 0007 | | Action Break_Optional ; Debug Table 0xb.0x17 = 0x3ac,0x1003 03ad 00d0 | | Action Swap_Control ; Debug Table 0xb.0x18 = 0x3ad,0x1004 03ae 00d1 | | Pop_Control Pop_Count_1 03af 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xb.0x19 = 0x3af,0xc04 03b0 00eb | | Load_Encached Diana_Cache 03b1 0098 | | Execute Package,Field_Read_Dynamic 03b2 49c9 |I | Short_Literal 0x1c9 03b3 00eb | | Load_Encached Diana_Cache 03b4 0098 | | Execute Package,Field_Read_Dynamic 03b5 49ca |I | Short_Literal 0x1ca 03b6 00eb | | Load_Encached Diana_Cache 03b7 0095 | | Execute Package,Field_Reference_Dynamic 03b8 e006 | | Load 0x0,0x6 03b9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03ba 7800 |x | Jump 0x3bb 03bb 00d0 | | Action Swap_Control 03bc 00d1 | | Pop_Control Pop_Count_1 03bd 8404 | | Call 0x2,0x4 ; Debug Table 0xb.0x1a = 0x3bd,0x4 03be 0007 | | Action Break_Optional ; Debug Table 0xb.0x1b = 0x3be,0x5 03bf 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1c = 0x3bf,0x1401 03c0 7002 |p | Jump_Nonzero 0x3c3 03c1 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x1d = 0x3c1,0x1402 03c2 7803 |x | Jump 0x3c6 03c3 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1e = 0x3c3,0x1403 03c4 0217 | | Execute Heap_Access,All_Reference 03c5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03c6 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0xb.0x1f = 0x3c6,0x5 03c7 0007 | | Action Break_Optional ; Debug Table 0xb.0x20 = 0x3c7,0x3 03c8 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x21 = 0x3c8,0x1801 03c9 021d | | Execute Heap_Access,Is_Null 03ca 6fbe |o | Jump_Zero 0x389 ; Debug Table 0xb.0x22 = 0x3ca,0x3 03cb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03cc e7ff | | Load 0x3,-0x1 ; Debug Table 0xb.0x23 = 0x3cc,0x6 03cd 00eb | | Load_Encached Diana_Cache 03ce 18e1 | | Execute Package,Field_Execute,Field_Number 0xe1 03cf 8404 | | Call 0x2,0x4 03d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03d1 e7ff | | Load 0x3,-0x1 ; Debug Table 0xb.0x24 = 0x3d1,0x7 03d2 00eb | | Load_Encached Diana_Cache 03d3 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9 03d4 00eb | | Load_Encached Diana_Cache 03d5 1889 | | Execute Package,Field_Execute,Field_Number 0x89 03d6 0033 | 3 | Store_Top Heap_Access,At_Offset_3 03d7 7853 |xS | Jump 0x42b 03d8 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x25 = 0x3d8,0x9 03d9 0007 | | Action Break_Optional 03da 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x26 = 0x3da,0x1c01 03db 7002 |p | Jump_Nonzero 0x3de 03dc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x27 = 0x3dc,0x1c02 03dd 782c |x, | Jump 0x40a 03de 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x28 = 0x3de,0x1c03 03df 0217 | | Execute Heap_Access,All_Reference 03e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03e1 6804 |h | Jump_Zero 0x3e6 03e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x29 = 0x3e2,0x1c04 03e3 0217 | | Execute Heap_Access,All_Reference 03e4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03e5 7824 |x$ | Jump 0x40a 03e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x2a = 0x3e6,0x1c05 03e7 0007 | | Action Break_Optional 03e8 e606 | | Load 0x3,0x6 ; Debug Table 0xb.0x2b = 0x3e8,0x2001 03e9 0007 | | Action Break_Optional 03ea 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xb.0x2c = 0x3ea,0x2002 03eb 0007 | | Action Break_Optional ; Debug Table 0xb.0x2d = 0x3eb,0x2003 03ec 00d0 | | Action Swap_Control ; Debug Table 0xb.0x2e = 0x3ec,0x2004 03ed 00d1 | | Pop_Control Pop_Count_1 03ee 49bb |I | Short_Literal 0x1bb ; Debug Table 0xb.0x2f = 0x3ee,0x1c05 03ef 00eb | | Load_Encached Diana_Cache 03f0 0098 | | Execute Package,Field_Read_Dynamic 03f1 012c | , | Execute Any,Size 03f2 e005 | | Load 0x0,0x5 03f3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 03f4 025b | [ | Execute Discrete,Check_In_Type 03f5 0273 | s | Execute Discrete,Plus 03f6 00d9 | | Load_Top At_Offset_1 03f7 0007 | | Action Break_Optional 03f8 e607 | | Load 0x3,0x7 ; Debug Table 0xb.0x30 = 0x3f8,0x2401 03f9 0007 | | Action Break_Optional 03fa 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x31 = 0x3fa,0x2402 03fb 0007 | | Action Break_Optional ; Debug Table 0xb.0x32 = 0x3fb,0x2403 03fc 00d0 | | Action Swap_Control ; Debug Table 0xb.0x33 = 0x3fc,0x2404 03fd 00d1 | | Pop_Control Pop_Count_1 03fe 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xb.0x34 = 0x3fe,0x2004 03ff 00eb | | Load_Encached Diana_Cache 0400 0098 | | Execute Package,Field_Read_Dynamic 0401 49c9 |I | Short_Literal 0x1c9 0402 00eb | | Load_Encached Diana_Cache 0403 0098 | | Execute Package,Field_Read_Dynamic 0404 49ca |I | Short_Literal 0x1ca 0405 00eb | | Load_Encached Diana_Cache 0406 0095 | | Execute Package,Field_Reference_Dynamic 0407 e006 | | Load 0x0,0x6 0408 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0409 7800 |x | Jump 0x40a 040a 00d0 | | Action Swap_Control 040b 00d1 | | Pop_Control Pop_Count_1 040c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0xb.0x35 = 0x40c,0x9 040d 0007 | | Action Break_Optional ; Debug Table 0xb.0x36 = 0x40d,0xa 040e e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x37 = 0x40e,0x2801 040f 0007 | | Action Break_Optional 0410 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xb.0x38 = 0x410,0x2802 0411 0007 | | Action Break_Optional ; Debug Table 0xb.0x39 = 0x411,0x2803 0412 0007 | | Action Break_Optional ; Debug Table 0xb.0x3a = 0x412,0x2804 0413 0ba9 | | Execute_Immediate Case_Compare,0xa9 ; Debug Table 0xb.0x3b = 0x413,0xa 0414 7001 |p | Jump_Nonzero 0x416 0415 7804 |x | Jump 0x41a ; Debug Table 0xb.0x3c = 0x415,0xc 0416 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x3d = 0x416,0xb 0417 00eb | | Load_Encached Diana_Cache 0418 18b2 | | Execute Package,Field_Execute,Field_Number 0xb2 0419 0033 | 3 | Store_Top Heap_Access,At_Offset_3 041a 00d1 | | Pop_Control Pop_Count_1 041b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x3e = 0x41b,0xd 041c e403 | | Load 0x2,0x3 041d e402 | | Load 0x2,0x2 041e 01d6 | | Execute Vector,Field_Write 041f e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x3f = 0x41f,0xe 0420 0a01 | | Execute_Immediate Plus,0x1 0421 c403 | | Store 0x2,0x3 0422 0007 | | Action Break_Optional ; Debug Table 0xb.0x40 = 0x422,0xf 0423 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x41 = 0x423,0x2c01 0424 7002 |p | Jump_Nonzero 0x427 0425 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x42 = 0x425,0x2c02 0426 7803 |x | Jump 0x42a 0427 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x43 = 0x427,0x2c03 0428 0217 | | Execute Heap_Access,All_Reference 0429 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 042a 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0xb.0x44 = 0x42a,0xf 042b 0007 | | Action Break_Optional ; Debug Table 0xb.0x45 = 0x42b,0x8 042c 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x46 = 0x42c,0x3001 042d 021d | | Execute Heap_Access,Is_Null 042e 6fa9 |o | Jump_Zero 0x3d8 ; Debug Table 0xb.0x47 = 0x42e,0x8 042f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0430 ; -------------------------------------------------------------------------------------- 0430 ; STRING TABLE 0430 ; -------------------------------------------------------------------------------------- 0430 0036 | 6 | .STRTAB 0x0036->0x044b ; "Statement" 0431 003d | = | .STRTAB 0x003d->0x044f ; "Declaration" 0432 0046 | F | .STRTAB 0x0046->0x0455 ; "..." 0433 0047 | G | .STRTAB 0x0047->0x0456 ; "'Body" 0434 004a | J | .STRTAB 0x004a->0x0459 ; "'Spec" 0435 004d | M | .STRTAB 0x004d->0x045b ; "Anonymous" 0436 0054 | T | .STRTAB 0x0054->0x0460 ; "." 0437 0053 | S | .STRTAB 0x0053->0x0460 ; "Number declaration" 0438 0063 | c | .STRTAB 0x0063->0x0469 ; "Exception declaration" 0439 0076 | v | .STRTAB 0x0076->0x0474 ; "Constant declaration" 043a 0088 | | .STRTAB 0x0088->0x047e ; "Deferred Constant declaration" 043b 00a3 | | .STRTAB 0x00a3->0x048c ; "Variable declaration" 043c 00b5 | | .STRTAB 0x00b5->0x0496 ; "Comment" 043d 00ba | | .STRTAB 0x00ba->0x049a ; "Pragma" 043e 00be | | .STRTAB 0x00be->0x049d ; "Use declaration" 043f 00cb | | .STRTAB 0x00cb->0x04a4 ; "With declaration" 0440 00d9 | | .STRTAB 0x00d9->0x04ac ; " ..." 0441 00db | | .STRTAB 0x00db->0x04ae ; "Case alternative" 0442 00e9 | | .STRTAB 0x00e9->0x04b6 ; "Exception handler" 0443 00f8 | | .STRTAB 0x00f8->0x04bf ; "Alternative list" 0444 0106 | | .STRTAB 0x0106->0x04c7 ; "Case alternative list" 0445 0119 | | .STRTAB 0x0119->0x04d1 ; "Exception handler list" 0446 012d | - | .STRTAB 0x012d->0x04dc ; "Context list" 0447 0137 | 7 | .STRTAB 0x0137->0x04e2 ; "Declaration list" 0448 0145 | E | .STRTAB 0x0145->0x04ea ; "Pragma list" 0449 014e | N | .STRTAB 0x014e->0x04f0 ; "Statement list" 044a 015a | Z | .STREND 0x015a->0x04f7 044b 5374 6174 |Stat| .STRTAB_STRINGS 04f7 0000 | | .XXX[0x1] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; Debug Table 04f8 ; -------------------------------------------------------------------------------------- 04f8 0003 000c | | .CONST 0x0003,0x000c 04fa 000b 055a | Z| .DEBUG 0x000b,0x055a,0x8000,0x0000,0x0056,0x85f5,0x0000,0x000b 0502 001c 056c | l| .DEBUG 0x001c,0x056c,0x8000,0x0000,0x0057,0x8dc5,0x0000,0x000d 050a 0083 058a | | .DEBUG 0x0083,0x058a,0x0002,0x0000,0x0056,0x85f5,0x0000,0x0012 0512 0093 0592 | | .DEBUG 0x0093,0x0592,0x0002,0x0000,0x0056,0x85f5,0x0000,0x001b 051a 01eb 0630 | 0| .DEBUG 0x01eb,0x0630,0x0002,0x0000,0x0056,0x85f5,0x0000,0x0024 0522 020b 0638 | 8| .DEBUG 0x020b,0x0638,0x0002,0x0000,0x0056,0x85f5,0x0000,0x002f 052a 023b 065e | ; ^| .DEBUG 0x023b,0x065e,0x0001,0x0000,0x0056,0x85f5,0x0000,0x0038 0532 027b 0672 | { r| .DEBUG 0x027b,0x0672,0x0001,0x0000,0x0056,0x85f5,0x0000,0x0067 053a 0293 067e | ~| .DEBUG 0x0293,0x067e,0x0002,0x0000,0x0056,0x85f5,0x0000,0x0082 0542 02ab 068c | | .DEBUG 0x02ab,0x068c,0x0002,0x0000,0x0057,0x8dc5,0x0000,0x00b3 054a 02fb 06b8 | | .DEBUG 0x02fb,0x06b8,0x0002,0x0000,0x0057,0x8dc5,0x0000,0x0491 0552 0373 0708 | s | .DEBUG 0x0373,0x0708,0x0001,0x0000,0x0057,0x8dc5,0x0000,0x053c 055a ; -------------------------------------------------------------------------------------- 055a ; Debug3 Subtable 0x0 055a ; -------------------------------------------------------------------------------------- 055a 0008 0000 | | .DBG3TAB 0x0008,0x0000 055c 000b ffff | | .CONST 0x000b,0xffff 055e 000d fffe | | .CONST 0x000d,0xfffe 0560 000f fffd | | .CONST 0x000f,0xfffd 0562 0011 fffc | | .CONST 0x0011,0xfffc 0564 0013 fffb | | .CONST 0x0013,0xfffb 0566 0015 fffa | | .CONST 0x0015,0xfffa 0568 0017 fff9 | | .CONST 0x0017,0xfff9 056a 0019 fff8 | | .CONST 0x0019,0xfff8 056c ; -------------------------------------------------------------------------------------- 056c ; Debug3 Subtable 0x1 056c ; -------------------------------------------------------------------------------------- 056c 000e 0000 | | .DBG3TAB 0x000e,0x0000 056e 001c ffff | | .CONST 0x001c,0xffff 0570 001d fffe | | .CONST 0x001d,0xfffe 0572 001e fffd | | .CONST 0x001e,0xfffd 0574 001f fffc | | .CONST 0x001f,0xfffc 0576 004d fffb | M | .CONST 0x004d,0xfffb 0578 0068 fffa | h | .CONST 0x0068,0xfffa 057a 006a fff9 | j | .CONST 0x006a,0xfff9 057c 006c fff8 | l | .CONST 0x006c,0xfff8 057e 006e fff7 | n | .CONST 0x006e,0xfff7 0580 0070 fff6 | p | .CONST 0x0070,0xfff6 0582 0072 fff5 | r | .CONST 0x0072,0xfff5 0584 0074 fff4 | t | .CONST 0x0074,0xfff4 0586 0076 fff3 | v | .CONST 0x0076,0xfff3 0588 0078 fff2 | x | .CONST 0x0078,0xfff2 058a ; -------------------------------------------------------------------------------------- 058a ; Debug3 Subtable 0x2 058a ; -------------------------------------------------------------------------------------- 058a 0000 0003 | | .DBG3TAB 0x0000,0x0003 058c 0083 0001 | | .CONST 0x0083,0x0001 058e 0086 0401 | | .CONST 0x0086,0x0401 0590 008a 0001 | | .CONST 0x008a,0x0001 0592 ; -------------------------------------------------------------------------------------- 0592 ; Debug3 Subtable 0x3 0592 ; -------------------------------------------------------------------------------------- 0592 0002 004c | L| .DBG3TAB 0x0002,0x004c 0594 0093 0001 | | .CONST 0x0093,0x0001 0596 0094 0401 | | .CONST 0x0094,0x0401 0598 0096 0402 | | .CONST 0x0096,0x0402 059a 0097 0403 | | .CONST 0x0097,0x0403 059c 0098 0404 | | .CONST 0x0098,0x0404 059e 0099 0001 | | .CONST 0x0099,0x0001 05a0 00db 001c | | .CONST 0x00db,0x001c 05a2 00df 001d | | .CONST 0x00df,0x001d 05a4 00e5 001e | | .CONST 0x00e5,0x001e 05a6 00e9 001f | | .CONST 0x00e9,0x001f 05a8 00ec 0020 | | .CONST 0x00ec,0x0020 05aa 00f0 0021 | !| .CONST 0x00f0,0x0021 05ac 00f3 0022 | "| .CONST 0x00f3,0x0022 05ae 00f6 0002 | | .CONST 0x00f6,0x0002 05b0 00fb 0003 | | .CONST 0x00fb,0x0003 05b2 00fe 0801 | | .CONST 0x00fe,0x0801 05b4 0100 0802 | | .CONST 0x0100,0x0802 05b6 0102 0803 | | .CONST 0x0102,0x0803 05b8 0106 0804 | | .CONST 0x0106,0x0804 05ba 010a 0805 | | .CONST 0x010a,0x0805 05bc 010c 0c01 | | .CONST 0x010c,0x0c01 05be 010e 0c02 | | .CONST 0x010e,0x0c02 05c0 010f 0c03 | | .CONST 0x010f,0x0c03 05c2 0110 0c04 | | .CONST 0x0110,0x0c04 05c4 0112 0805 | | .CONST 0x0112,0x0805 05c6 011c 1001 | | .CONST 0x011c,0x1001 05c8 011e 1002 | | .CONST 0x011e,0x1002 05ca 011f 1003 | | .CONST 0x011f,0x1003 05cc 0120 1004 | | .CONST 0x0120,0x1004 05ce 0122 0c04 | " | .CONST 0x0122,0x0c04 05d0 0130 0003 | 0 | .CONST 0x0130,0x0003 05d2 0132 0004 | 2 | .CONST 0x0132,0x0004 05d4 0137 0005 | 7 | .CONST 0x0137,0x0005 05d6 0144 0006 | D | .CONST 0x0144,0x0006 05d8 0151 0007 | Q | .CONST 0x0151,0x0007 05da 0154 0008 | T | .CONST 0x0154,0x0008 05dc 015b 0009 | [ | .CONST 0x015b,0x0009 05de 0160 000a | ` | .CONST 0x0160,0x000a 05e0 016d 000b | m | .CONST 0x016d,0x000b 05e2 0172 000c | r | .CONST 0x0172,0x000c 05e4 0177 000d | w | .CONST 0x0177,0x000d 05e6 017c 000e | | | .CONST 0x017c,0x000e 05e8 0181 000f | | .CONST 0x0181,0x000f 05ea 0186 0010 | | .CONST 0x0186,0x0010 05ec 018a 0011 | | .CONST 0x018a,0x0011 05ee 018d 0012 | | .CONST 0x018d,0x0012 05f0 0190 0013 | | .CONST 0x0190,0x0013 05f2 0193 0014 | | .CONST 0x0193,0x0014 05f4 0196 0015 | | .CONST 0x0196,0x0015 05f6 0197 ebff | | .CONST 0x0197,0xebff 05f8 0198 1401 | | .CONST 0x0198,0x1401 05fa 019e 1402 | | .CONST 0x019e,0x1402 05fc 019f 1801 | | .CONST 0x019f,0x1801 05fe 01a1 1802 | | .CONST 0x01a1,0x1802 0600 01a2 1803 | | .CONST 0x01a2,0x1803 0602 01a3 1804 | | .CONST 0x01a3,0x1804 0604 01a4 1402 | | .CONST 0x01a4,0x1402 0606 01a8 1405 | | .CONST 0x01a8,0x1405 0608 01ab 1403 | | .CONST 0x01ab,0x1403 060a 01ae 1404 | | .CONST 0x01ae,0x1404 060c 01b1 0016 | | .CONST 0x01b1,0x0016 060e 01bb 0017 | | .CONST 0x01bb,0x0017 0610 01bc e3ff | | .CONST 0x01bc,0xe3ff 0612 01bd 1c01 | | .CONST 0x01bd,0x1c01 0614 01c1 1c02 | | .CONST 0x01c1,0x1c02 0616 01c2 2001 | | .CONST 0x01c2,0x2001 0618 01c4 2002 | | .CONST 0x01c4,0x2002 061a 01c5 2003 | | .CONST 0x01c5,0x2003 061c 01c6 2004 | | .CONST 0x01c6,0x2004 061e 01c7 1c02 | | .CONST 0x01c7,0x1c02 0620 01cd 1c06 | | .CONST 0x01cd,0x1c06 0622 01d0 1c03 | | .CONST 0x01d0,0x1c03 0624 01d3 1c04 | | .CONST 0x01d3,0x1c04 0626 01d6 1c05 | | .CONST 0x01d6,0x1c05 0628 01d9 0018 | | .CONST 0x01d9,0x0018 062a 01dc 0019 | | .CONST 0x01dc,0x0019 062c 01df 001a | | .CONST 0x01df,0x001a 062e 01e2 001b | | .CONST 0x01e2,0x001b 0630 ; -------------------------------------------------------------------------------------- 0630 ; Debug3 Subtable 0x4 0630 ; -------------------------------------------------------------------------------------- 0630 0000 0003 | | .DBG3TAB 0x0000,0x0003 0632 01eb 0001 | | .CONST 0x01eb,0x0001 0634 01fe 0003 | | .CONST 0x01fe,0x0003 0636 0200 0002 | | .CONST 0x0200,0x0002 0638 ; -------------------------------------------------------------------------------------- 0638 ; Debug3 Subtable 0x5 0638 ; -------------------------------------------------------------------------------------- 0638 0002 0010 | | .DBG3TAB 0x0002,0x0010 063a 020b ffff | | .CONST 0x020b,0xffff 063c 020c fffe | | .CONST 0x020c,0xfffe 063e 020d 0001 | | .CONST 0x020d,0x0001 0640 0210 0003 | | .CONST 0x0210,0x0003 0642 0214 0004 | | .CONST 0x0214,0x0004 0644 0215 0401 | | .CONST 0x0215,0x0401 0646 0217 0004 | | .CONST 0x0217,0x0004 0648 0218 0005 | | .CONST 0x0218,0x0005 064a 0219 0006 | | .CONST 0x0219,0x0006 064c 021b 0002 | | .CONST 0x021b,0x0002 064e 021f 0007 | | .CONST 0x021f,0x0007 0650 0220 0801 | | .CONST 0x0220,0x0801 0652 0222 0802 | " | .CONST 0x0222,0x0802 0654 0223 0803 | # | .CONST 0x0223,0x0803 0656 0224 0804 | $ | .CONST 0x0224,0x0804 0658 0225 0007 | % | .CONST 0x0225,0x0007 065a 022d 0009 | - | .CONST 0x022d,0x0009 065c 022f 0008 | / | .CONST 0x022f,0x0008 065e ; -------------------------------------------------------------------------------------- 065e ; Debug3 Subtable 0x6 065e ; -------------------------------------------------------------------------------------- 065e 0003 0006 | | .DBG3TAB 0x0003,0x0006 0660 023b ffff | ; | .CONST 0x023b,0xffff 0662 023d fffe | = | .CONST 0x023d,0xfffe 0664 023f fffd | ? | .CONST 0x023f,0xfffd 0666 0244 0001 | D | .CONST 0x0244,0x0001 0668 0250 0002 | P | .CONST 0x0250,0x0002 066a 0252 0003 | R | .CONST 0x0252,0x0003 066c 0254 0004 | T | .CONST 0x0254,0x0004 066e 0255 0005 | U | .CONST 0x0255,0x0005 0670 026c 0006 | l | .CONST 0x026c,0x0006 0672 ; -------------------------------------------------------------------------------------- 0672 ; Debug3 Subtable 0x7 0672 ; -------------------------------------------------------------------------------------- 0672 0001 0004 | | .DBG3TAB 0x0001,0x0004 0674 027b ffff | { | .CONST 0x027b,0xffff 0676 027d 0001 | } | .CONST 0x027d,0x0001 0678 027f 0002 | | .CONST 0x027f,0x0002 067a 0287 0003 | | .CONST 0x0287,0x0003 067c 028c 0004 | | .CONST 0x028c,0x0004 067e ; -------------------------------------------------------------------------------------- 067e ; Debug3 Subtable 0x8 067e ; -------------------------------------------------------------------------------------- 067e 0003 0003 | | .DBG3TAB 0x0003,0x0003 0680 0293 ffff | | .CONST 0x0293,0xffff 0682 029a fffe | | .CONST 0x029a,0xfffe 0684 029c fffd | | .CONST 0x029c,0xfffd 0686 029e 0001 | | .CONST 0x029e,0x0001 0688 02a2 0002 | | .CONST 0x02a2,0x0002 068a 02a4 0003 | | .CONST 0x02a4,0x0003 068c ; -------------------------------------------------------------------------------------- 068c ; Debug3 Subtable 0x9 068c ; -------------------------------------------------------------------------------------- 068c 0001 0014 | | .DBG3TAB 0x0001,0x0014 068e 02ab ffff | | .CONST 0x02ab,0xffff 0690 02ac 0001 | | .CONST 0x02ac,0x0001 0692 02b2 0002 | | .CONST 0x02b2,0x0002 0694 02b8 0003 | | .CONST 0x02b8,0x0003 0696 02ba 0401 | | .CONST 0x02ba,0x0401 0698 02bc 0402 | | .CONST 0x02bc,0x0402 069a 02be 0403 | | .CONST 0x02be,0x0403 069c 02c2 0404 | | .CONST 0x02c2,0x0404 069e 02c6 0405 | | .CONST 0x02c6,0x0405 06a0 02c8 0801 | | .CONST 0x02c8,0x0801 06a2 02ca 0802 | | .CONST 0x02ca,0x0802 06a4 02cb 0803 | | .CONST 0x02cb,0x0803 06a6 02cc 0804 | | .CONST 0x02cc,0x0804 06a8 02ce 0405 | | .CONST 0x02ce,0x0405 06aa 02d8 0c01 | | .CONST 0x02d8,0x0c01 06ac 02da 0c02 | | .CONST 0x02da,0x0c02 06ae 02db 0c03 | | .CONST 0x02db,0x0c03 06b0 02dc 0c04 | | .CONST 0x02dc,0x0c04 06b2 02de 0804 | | .CONST 0x02de,0x0804 06b4 02ec 0003 | | .CONST 0x02ec,0x0003 06b6 02f1 0004 | | .CONST 0x02f1,0x0004 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; Debug3 Subtable 0xa 06b8 ; -------------------------------------------------------------------------------------- 06b8 0002 0025 | %| .DBG3TAB 0x0002,0x0025 06ba 02fb ffff | | .CONST 0x02fb,0xffff 06bc 02fc fffe | | .CONST 0x02fc,0xfffe 06be 02fe 0001 | | .CONST 0x02fe,0x0001 06c0 02ff 0401 | | .CONST 0x02ff,0x0401 06c2 0301 0402 | | .CONST 0x0301,0x0402 06c4 0302 0403 | | .CONST 0x0302,0x0403 06c6 0303 0404 | | .CONST 0x0303,0x0404 06c8 0304 0001 | | .CONST 0x0304,0x0001 06ca 030c 0009 | | .CONST 0x030c,0x0009 06cc 030d 0002 | | .CONST 0x030d,0x0002 06ce 0312 0004 | | .CONST 0x0312,0x0004 06d0 0315 0801 | | .CONST 0x0315,0x0801 06d2 0317 0802 | | .CONST 0x0317,0x0802 06d4 0319 0803 | | .CONST 0x0319,0x0803 06d6 031d 0804 | | .CONST 0x031d,0x0804 06d8 0321 0805 | ! | .CONST 0x0321,0x0805 06da 0323 0c01 | # | .CONST 0x0323,0x0c01 06dc 0325 0c02 | % | .CONST 0x0325,0x0c02 06de 0326 0c03 | & | .CONST 0x0326,0x0c03 06e0 0327 0c04 | ' | .CONST 0x0327,0x0c04 06e2 0329 0805 | ) | .CONST 0x0329,0x0805 06e4 0333 1001 | 3 | .CONST 0x0333,0x1001 06e6 0335 1002 | 5 | .CONST 0x0335,0x1002 06e8 0336 1003 | 6 | .CONST 0x0336,0x1003 06ea 0337 1004 | 7 | .CONST 0x0337,0x1004 06ec 0339 0c04 | 9 | .CONST 0x0339,0x0c04 06ee 0347 0004 | G | .CONST 0x0347,0x0004 06f0 034a 0005 | J | .CONST 0x034a,0x0005 06f2 034b 1401 | K | .CONST 0x034b,0x1401 06f4 034d 1402 | M | .CONST 0x034d,0x1402 06f6 034f 1403 | O | .CONST 0x034f,0x1403 06f8 0352 0005 | R | .CONST 0x0352,0x0005 06fa 0353 0003 | S | .CONST 0x0353,0x0003 06fc 0354 1801 | T | .CONST 0x0354,0x1801 06fe 0356 0003 | V | .CONST 0x0356,0x0003 0700 0358 0006 | X | .CONST 0x0358,0x0006 0702 035e 0007 | ^ | .CONST 0x035e,0x0007 0704 0364 0008 | d | .CONST 0x0364,0x0008 0706 036b 000a | k | .CONST 0x036b,0x000a 0708 ; -------------------------------------------------------------------------------------- 0708 ; Debug3 Subtable 0xb 0708 ; -------------------------------------------------------------------------------------- 0708 0002 0046 | F| .DBG3TAB 0x0002,0x0046 070a 0373 ffff | s | .CONST 0x0373,0xffff 070c 0374 fffe | t | .CONST 0x0374,0xfffe 070e 0375 0001 | u | .CONST 0x0375,0x0001 0710 0376 0401 | v | .CONST 0x0376,0x0401 0712 0378 0402 | x | .CONST 0x0378,0x0402 0714 0379 0403 | y | .CONST 0x0379,0x0403 0716 037a 0404 | z | .CONST 0x037a,0x0404 0718 037b 0001 | { | .CONST 0x037b,0x0001 071a 0383 0010 | | .CONST 0x0383,0x0010 071c 0384 0002 | | .CONST 0x0384,0x0002 071e 0389 0004 | | .CONST 0x0389,0x0004 0720 038b 0801 | | .CONST 0x038b,0x0801 0722 038d 0802 | | .CONST 0x038d,0x0802 0724 038f 0803 | | .CONST 0x038f,0x0803 0726 0393 0804 | | .CONST 0x0393,0x0804 0728 0397 0805 | | .CONST 0x0397,0x0805 072a 0399 0c01 | | .CONST 0x0399,0x0c01 072c 039b 0c02 | | .CONST 0x039b,0x0c02 072e 039c 0c03 | | .CONST 0x039c,0x0c03 0730 039d 0c04 | | .CONST 0x039d,0x0c04 0732 039f 0805 | | .CONST 0x039f,0x0805 0734 03a9 1001 | | .CONST 0x03a9,0x1001 0736 03ab 1002 | | .CONST 0x03ab,0x1002 0738 03ac 1003 | | .CONST 0x03ac,0x1003 073a 03ad 1004 | | .CONST 0x03ad,0x1004 073c 03af 0c04 | | .CONST 0x03af,0x0c04 073e 03bd 0004 | | .CONST 0x03bd,0x0004 0740 03be 0005 | | .CONST 0x03be,0x0005 0742 03bf 1401 | | .CONST 0x03bf,0x1401 0744 03c1 1402 | | .CONST 0x03c1,0x1402 0746 03c3 1403 | | .CONST 0x03c3,0x1403 0748 03c6 0005 | | .CONST 0x03c6,0x0005 074a 03c7 0003 | | .CONST 0x03c7,0x0003 074c 03c8 1801 | | .CONST 0x03c8,0x1801 074e 03ca 0003 | | .CONST 0x03ca,0x0003 0750 03cc 0006 | | .CONST 0x03cc,0x0006 0752 03d1 0007 | | .CONST 0x03d1,0x0007 0754 03d8 0009 | | .CONST 0x03d8,0x0009 0756 03da 1c01 | | .CONST 0x03da,0x1c01 0758 03dc 1c02 | | .CONST 0x03dc,0x1c02 075a 03de 1c03 | | .CONST 0x03de,0x1c03 075c 03e2 1c04 | | .CONST 0x03e2,0x1c04 075e 03e6 1c05 | | .CONST 0x03e6,0x1c05 0760 03e8 2001 | | .CONST 0x03e8,0x2001 0762 03ea 2002 | | .CONST 0x03ea,0x2002 0764 03eb 2003 | | .CONST 0x03eb,0x2003 0766 03ec 2004 | | .CONST 0x03ec,0x2004 0768 03ee 1c05 | | .CONST 0x03ee,0x1c05 076a 03f8 2401 | $ | .CONST 0x03f8,0x2401 076c 03fa 2402 | $ | .CONST 0x03fa,0x2402 076e 03fb 2403 | $ | .CONST 0x03fb,0x2403 0770 03fc 2404 | $ | .CONST 0x03fc,0x2404 0772 03fe 2004 | | .CONST 0x03fe,0x2004 0774 040c 0009 | | .CONST 0x040c,0x0009 0776 040d 000a | | .CONST 0x040d,0x000a 0778 040e 2801 | ( | .CONST 0x040e,0x2801 077a 0410 2802 | ( | .CONST 0x0410,0x2802 077c 0411 2803 | ( | .CONST 0x0411,0x2803 077e 0412 2804 | ( | .CONST 0x0412,0x2804 0780 0413 000a | | .CONST 0x0413,0x000a 0782 0415 000c | | .CONST 0x0415,0x000c 0784 0416 000b | | .CONST 0x0416,0x000b 0786 041b 000d | | .CONST 0x041b,0x000d 0788 041f 000e | | .CONST 0x041f,0x000e 078a 0422 000f | " | .CONST 0x0422,0x000f 078c 0423 2c01 | #, | .CONST 0x0423,0x2c01 078e 0425 2c02 | %, | .CONST 0x0425,0x2c02 0790 0427 2c03 | ', | .CONST 0x0427,0x2c03 0792 042a 000f | * | .CONST 0x042a,0x000f 0794 042b 0008 | + | .CONST 0x042b,0x0008 0796 042c 3001 | ,0 | .CONST 0x042c,0x3001 0798 042e 0008 | . | .CONST 0x042e,0x0008 079a 0000 0000 | | .BLANK 0000[0x66]