|
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, 5811_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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 04f0 | | .CONST 0x04f0 ; 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 0084 | | .CONST 0x0084 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 002a | * | .CONST 0x002a ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x05aa,0x8000,0x0000,0x0037,0xdb64,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 000d 0129 | ) | Execute Any,Make_Visible 000e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1 = 0xe,0xfffe 000f 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0010 0129 | ) | Execute Any,Make_Visible 0011 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2 = 0x11,0xfffd 0012 1b4c | L | Execute Package,Field_Read,Field_Number 0x4c 0013 0129 | ) | Execute Any,Make_Visible 0014 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3 = 0x14,0xfffc 0015 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e 0016 0129 | ) | Execute Any,Make_Visible 0017 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x4 = 0x17,0xfffb 0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0019 0129 | ) | Execute Any,Make_Visible 001a 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x5 = 0x1a,0xfffa 001b 4804 |H | Short_Literal 0x4 001c 029f 008b | | Declare_Subprogram INIT_0088,For_Call 001e 03fe | | Declare_Type Discrete,Defined,Visible 001f 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x1f,0xfff9 0021 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x21,0xfff8 0023 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x23,0xfff7 0025 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x25,0xfff6 0027 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x27,0xfff5 0029 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x29,0xfff4 002b 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x2b,0xfff3 002d 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x2d,0xfff2 002f 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xe = 0x2f,0xfff1 0030 4803 |H | Short_Literal 0x3 0031 029f 0203 | | Declare_Subprogram INIT_0200,For_Call 0033 03fe | | Declare_Type Discrete,Defined,Visible 0034 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x34,0xfff0 0036 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x36,0xffef 0038 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x38,0xffee 003a e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x12 = 0x3a,0xffed 003b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003c 0129 | ) | Execute Any,Make_Visible 003d e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x13 = 0x3d,0xffec 003e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003f 0129 | ) | Execute Any,Make_Visible 0040 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x14 = 0x40,0xffeb 0041 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0042 0129 | ) | Execute Any,Make_Visible 0043 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x15 = 0x43,0xffea 0045 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x16 = 0x45,0xffe9 0047 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x17 = 0x47,0xffe8 0049 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x18 = 0x49,0xffe7 004b 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x19 = 0x4b,0xffe6 004d 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1a = 0x4d,0xffe5 004f 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1b = 0x4f,0xffe4 0051 0007 | | Action Break_Optional ; Debug Table 0x0.0x1c = 0x51,0xffe3 0052 0007 | | Action Break_Optional ; Debug Table 0x0.0x1d = 0x52,0xffe2 0053 00bf | | Action Accept_Activation ; Debug Table 0x0.0x1e = 0x53,0xffe1 0054 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0054,0x05ea,0x8000,0x0000,0x0037,0xdcc4,0x0000,0x0013 ; Debug Table 0x1.0x0 = 0x54,0xffff 0055 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x55,0xfffe 0056 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x56,0xfffd 0057 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x57,0xfffc 0058 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x58,0xfffb 0059 1b58 | X | Execute Package,Field_Read,Field_Number 0x58 005a 190f | | Execute Package,Field_Reference,Field_Number 0xf 005b 0007 | | Action Break_Optional 005c e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x5 = 0x5c,0xfffa 005d 1b58 | X | Execute Package,Field_Read,Field_Number 0x58 005e 190e | | Execute Package,Field_Reference,Field_Number 0xe 005f 0007 | | Action Break_Optional 0060 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x60,0xfff9 0061 00c7 | | Action Elaborate_Subprogram 0062 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x7 = 0x62,0xfff8 0063 00c7 | | Action Elaborate_Subprogram 0064 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x8 = 0x64,0xfff7 0065 00c7 | | Action Elaborate_Subprogram 0066 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x9 = 0x66,0xfff6 0067 00c7 | | Action Elaborate_Subprogram 0068 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xa = 0x68,0xfff5 0069 00c7 | | Action Elaborate_Subprogram 006a 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xb = 0x6a,0xfff4 006b 00c7 | | Action Elaborate_Subprogram 006c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0xc = 0x6c,0xfff3 006d 00c7 | | Action Elaborate_Subprogram 006e 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0xd = 0x6e,0xfff2 006f 00c7 | | Action Elaborate_Subprogram 0070 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0xe = 0x70,0xfff1 0071 00c7 | | Action Elaborate_Subprogram 0072 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0xf = 0x72,0xfff0 0073 00c7 | | Action Elaborate_Subprogram 0074 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x10 = 0x74,0xffef 0075 00c7 | | Action Elaborate_Subprogram 0076 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 ; Debug Table 0x1.0x11 = 0x76,0xffee 0077 00c7 | | Action Elaborate_Subprogram 0078 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 ; Debug Table 0x1.0x12 = 0x78,0xffed 0079 00c7 | | Action Elaborate_Subprogram 007a 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 ; Debug Table 0x1.0x13 = 0x7a,0xffec 007b 00c7 | | Action Elaborate_Subprogram 007c 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 ; Debug Table 0x1.0x14 = 0x7c,0xffeb 007d 00c7 | | Action Elaborate_Subprogram 007e 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 ; Debug Table 0x1.0x15 = 0x7e,0xffea 007f 00c7 | | Action Elaborate_Subprogram 0080 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 ; Debug Table 0x1.0x16 = 0x80,0xffe9 0081 00c7 | | Action Elaborate_Subprogram 0082 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x17 = 0x82,0xffe8 0083 00c7 | | Action Elaborate_Subprogram 0084 BODY_0008: 0084 00bc | | Action Signal_Activated 0085 00bb | | Action Signal_Completion 0086 0000 0000 | | .XXX[0x2] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x008b,0x061c,0x0005,0x0000,0x0037,0xdb64,0x0000,0x0024 008c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 008d 7802 |x | Jump 0x90 ; case 0x1 008e 7805 |x | Jump 0x94 ; case 0x2 008f 7809 |x | Jump 0x99 ; case 0x3 0090 00da | | Load_Top At_Offset_2 0091 0091 0387 | | Action Push_String_Extended_Indexed,0x387 ; "A_LENGTH_CLAUSE" 0093 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0094 00db | | Load_Top At_Offset_3 0095 00db | | Load_Top At_Offset_3 0096 00e0 | | Load_Encached Standard_Cache 0097 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0098 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0099 00da | | Load_Top At_Offset_2 009a 00e0 | | Load_Encached Standard_Cache 009b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 009c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 009d 0000 0000 | | .XXX[0x3] 009f 0000 | | 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00ac | | .CONST 0x00ac ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0002 | | .CONST 0x0002 ; Number of locals 00a3 INIT_00a0: 00a3 e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x00a3,0x061e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x002d ; Debug Table 0x3.0x0 = 0xa3,0xffff 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 02ff | | Declare_Variable Variant_Record 00a6 00db | | Load_Top At_Offset_3 00a7 8229 | ) | Call 0x1,0x29 00a8 e002 | | Load 0x0,0x2 00a9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00aa 00d9 | | Load_Top At_Offset_1 00ab 016d | m | Execute Variant_Record,Structure_Write 00ac BODY_00a0: 00ac 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0xac,0x1 00ad 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 00ae 0f05 | | Execute_Immediate Equal,0x5 00af 6803 |h | Jump_Zero 0xb3 00b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0xb0,0x2 00b1 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 00b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b3 4804 |H | Short_Literal 0x4 ; Debug Table 0x3.0x3 = 0xb3,0x3 00b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b5 0000 0000 | | .XXX[0x3] 00b7 0000 | | 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00c0 | | .CONST 0x00c0 ; Address of begin 00b9 00ea | | .CONST 0x00ea ; Address of exception handler 00ba 0003 | | .CONST 0x0003 ; Number of locals 00bb INIT_00b8: 00bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00bb,0x0628,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0036 ; Debug Table 0x4.0x0 = 0xbb,0xffff 00bc 00db | | Load_Top At_Offset_3 00bd 8229 | ) | Call 0x1,0x29 00be 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00bf 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0xbf,0xfffe 00c0 BODY_00b8: 00c0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x2 = 0xc0,0x1 00c1 00eb | | Load_Encached Diana_Cache 00c2 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 00c3 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00c4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x3 = 0xc4,0x2 00c5 00eb | | Load_Encached Diana_Cache 00c6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00c7 0b44 | D | Execute_Immediate Case_Compare,0x44 00c8 700d |p | Jump_Nonzero 0xd6 00c9 0b43 | C | Execute_Immediate Case_Compare,0x43 00ca 701a |p | Jump_Nonzero 0xe5 00cb 0b42 | B | Execute_Immediate Case_Compare,0x42 00cc 7018 |p | Jump_Nonzero 0xe5 00cd 0092 0390 | | Action Push_String_Extended,0x390 ; "Element is not a Representation Clause" ; Debug Table 0x4.0x4 = 0xcd,0x7 00cf e003 | | Load 0x0,0x3 00d0 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 00d1 e004 | | Load 0x0,0x4 00d2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00d3 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x5 = 0xd3,0x8 00d4 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 00d5 0257 | W | Execute Discrete,Raise 00d6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x6 = 0xd6,0x3 00d7 00eb | | Load_Encached Diana_Cache 00d8 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00d9 0f0e | | Execute_Immediate Equal,0xe 00da 6805 |h | Jump_Zero 0xe0 00db 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x7 = 0xdb,0x4 00dc e005 | | Load 0x0,0x5 00dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00de 822a | * | Call 0x1,0x2a 00df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x8 = 0xe0,0x5 00e1 e005 | | Load 0x0,0x5 00e2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00e3 822a | * | Call 0x1,0x2a 00e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x9 = 0xe5,0x6 00e6 e005 | | Load 0x0,0x5 00e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00e8 822a | * | Call 0x1,0x2a 00e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ea TRAP_00b8: 00ea 010e | | Execute Exception,Is_Constraint_Error 00eb 6809 |h | Jump_Zero 0xf5 00ec 0092 0390 | | Action Push_String_Extended,0x390 ; "Element is not a Representation Clause" ; Debug Table 0x4.0xa = 0xec,0x9 00ee e003 | | Load 0x0,0x3 00ef 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 00f0 e004 | | Load 0x0,0x4 00f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f2 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0xb = 0xf2,0xa 00f3 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 00f4 0257 | W | Execute Discrete,Raise 00f5 0100 | | Execute Exception,Raise 00f6 0000 0000 | | .XXX[0x2] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00ff | | .CONST 0x00ff ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0002 | | .CONST 0x0002 ; Number of locals 00fb INIT_00f8: 00fb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x00fb,0x0642,0x0002,0x0000,0x0037,0xdb64,0x0000,0x003f ; Debug Table 0x5.0x0 = 0xfb,0xffff 00fc 00db | | Load_Top At_Offset_3 00fd 8229 | ) | Call 0x1,0x29 00fe 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00ff BODY_00f8: 00ff 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0xff,0x1 0100 00eb | | Load_Encached Diana_Cache 0101 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0102 0b6d | m | Execute_Immediate Case_Compare,0x6d 0103 701f |p | Jump_Nonzero 0x123 0104 0b6e | n | Execute_Immediate Case_Compare,0x6e 0105 701d |p | Jump_Nonzero 0x123 0106 0b6f | o | Execute_Immediate Case_Compare,0x6f 0107 701b |p | Jump_Nonzero 0x123 0108 0b65 | e | Execute_Immediate Case_Compare,0x65 0109 7019 |p | Jump_Nonzero 0x123 010a 0b64 | d | Execute_Immediate Case_Compare,0x64 010b 7017 |p | Jump_Nonzero 0x123 010c 0b6c | l | Execute_Immediate Case_Compare,0x6c 010d 7015 |p | Jump_Nonzero 0x123 010e 0b72 | r | Execute_Immediate Case_Compare,0x72 010f 7013 |p | Jump_Nonzero 0x123 0110 0b6b | k | Execute_Immediate Case_Compare,0x6b 0111 7011 |p | Jump_Nonzero 0x123 0112 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x2 = 0x112,0x3 0113 e006 | | Load 0x0,0x6 0114 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0115 0b0c | | Execute_Immediate Case_Compare,0xc 0116 7003 |p | Jump_Nonzero 0x11a 0117 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x3 = 0x117,0x6 0118 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0119 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 011a 0092 0391 | | Action Push_String_Extended,0x391 ; "Element is not a Type Definition" ; Debug Table 0x5.0x4 = 0x11a,0x4 011c e003 | | Load 0x0,0x3 011d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 011e e004 | | Load 0x0,0x4 011f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0120 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x5 = 0x120,0x5 0121 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0122 0257 | W | Execute Discrete,Raise 0123 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x6 = 0x123,0x2 0124 4903 |I | Short_Literal 0x103 0125 00eb | | Load_Encached Diana_Cache 0126 0096 | | Execute Package,Entry 0127 822a | * | Call 0x1,0x2a 0128 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0129 0000 0000 | | .BLANK 0000[0x7] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0137 | 7 | .CONST 0x0137 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0002 | | .CONST 0x0002 ; Number of locals 0133 INIT_0130: 0133 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6 = .DEBUG 0x0133,0x0652,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0048 ; Debug Table 0x6.0x0 = 0x133,0xffff 0134 00db | | Load_Top At_Offset_3 0135 8229 | ) | Call 0x1,0x29 0136 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0137 BODY_0130: 0137 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x137,0x1 0138 00eb | | Load_Encached Diana_Cache 0139 1814 | | Execute Package,Field_Execute,Field_Number 0x14 013a 0b6d | m | Execute_Immediate Case_Compare,0x6d 013b 700d |p | Jump_Nonzero 0x149 013c 0b6b | k | Execute_Immediate Case_Compare,0x6b 013d 700b |p | Jump_Nonzero 0x149 013e 0b73 | s | Execute_Immediate Case_Compare,0x73 013f 7009 |p | Jump_Nonzero 0x149 0140 0092 0392 | | Action Push_String_Extended,0x392 ; "Element can't have a Storage Size Rep" ; Debug Table 0x6.0x2 = 0x140,0x3 0142 e003 | | Load 0x0,0x3 0143 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0144 e004 | | Load 0x0,0x4 0145 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0146 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x3 = 0x146,0x4 0147 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0148 0257 | W | Execute Discrete,Raise 0149 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x4 = 0x149,0x2 014a 4906 |I | Short_Literal 0x106 014b 00eb | | Load_Encached Diana_Cache 014c 0096 | | Execute Package,Entry 014d 822a | * | Call 0x1,0x2a 014e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0157 | W | .CONST 0x0157 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0002 | | .CONST 0x0002 ; Number of locals 0153 INIT_0150: 0153 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x0153,0x065e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0051 ; Debug Table 0x7.0x0 = 0x153,0xffff 0154 00db | | Load_Top At_Offset_3 0155 8229 | ) | Call 0x1,0x29 0156 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0157 BODY_0150: 0157 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0x157,0x1 0158 00eb | | Load_Encached Diana_Cache 0159 1814 | | Execute Package,Field_Execute,Field_Number 0x14 015a 0b31 | 1 | Execute_Immediate Case_Compare,0x31 015b 700b |p | Jump_Nonzero 0x167 015c 0b32 | 2 | Execute_Immediate Case_Compare,0x32 015d 7009 |p | Jump_Nonzero 0x167 015e 0092 0393 | | Action Push_String_Extended,0x393 ; "Element isn't an Enumeration Element" ; Debug Table 0x7.0x2 = 0x15e,0x3 0160 e003 | | Load 0x0,0x3 0161 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0162 e004 | | Load 0x0,0x4 0163 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0164 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x3 = 0x164,0x4 0165 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0166 0257 | W | Execute Discrete,Raise 0167 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x4 = 0x167,0x2 0168 4903 |I | Short_Literal 0x103 0169 00eb | | Load_Encached Diana_Cache 016a 0096 | | Execute Package,Entry 016b 822a | * | Call 0x1,0x2a 016c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 016d 0000 0000 | | .XXX[0x3] 016f 0000 | | 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 0092 0394 | | Action Push_String_Extended,0x394 ; "The LONG_INTEGER form of Associated_Enumeration_Representation is not yet implemented" ; Debug Table 0x8 = .DEBUG 0x0173,0x066a,0x0002,0x0000,0x0037,0xdb64,0x0000,0x005a ; Debug Table 0x8.0x0 = 0x173,0x1 0175 e003 | | Load 0x0,0x3 0176 1b22 | " | Execute Package,Field_Read,Field_Number 0x22 0177 e004 | | Load 0x0,0x4 0178 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0179 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x1 = 0x179,0x2 017a 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a 017b 0257 | W | Execute Discrete,Raise 017c 0000 0000 | | .BLANK 0000[0x4] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0187 | | .CONST 0x0187 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0002 | | .CONST 0x0002 ; Number of locals 0183 INIT_0180: 0183 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x0183,0x0670,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0063 ; Debug Table 0x9.0x0 = 0x183,0xffff 0184 00db | | Load_Top At_Offset_3 0185 8229 | ) | Call 0x1,0x29 0186 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0187 BODY_0180: 0187 00cf | | Action Mark_Auxiliary 0188 0007 | | Action Break_Optional ; Debug Table 0x9.0x1 = 0x188,0x1 0189 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x2 = 0x189,0x2 018a 00eb | | Load_Encached Diana_Cache 018b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 018c 0b1c | | Execute_Immediate Case_Compare,0x1c 018d 700d |p | Jump_Nonzero 0x19b 018e 0b72 | r | Execute_Immediate Case_Compare,0x72 018f 7011 |p | Jump_Nonzero 0x1a1 0190 0b39 | 9 | Execute_Immediate Case_Compare,0x39 0191 7015 |p | Jump_Nonzero 0x1a7 0192 0092 0395 | | Action Push_String_Extended,0x395 ; "Element can't have a record rep" ; Debug Table 0x9.0x3 = 0x192,0x6 0194 e003 | | Load 0x0,0x3 0195 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0196 e004 | | Load 0x0,0x4 0197 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0198 e001 | | Load 0x0,0x1 ; Debug Table 0x9.0x4 = 0x198,0x7 0199 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 019a 0257 | W | Execute Discrete,Raise 019b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x5 = 0x19b,0x3 019c 4909 |I | Short_Literal 0x109 019d 00eb | | Load_Encached Diana_Cache 019e 0096 | | Execute Package,Entry 019f 822a | * | Call 0x1,0x2a 01a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a1 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x6 = 0x1a1,0x4 01a2 490e |I | Short_Literal 0x10e 01a3 00eb | | Load_Encached Diana_Cache 01a4 0096 | | Execute Package,Entry 01a5 822a | * | Call 0x1,0x2a 01a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a7 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x7 = 0x1a7,0x5 01a8 00eb | | Load_Encached Diana_Cache 01a9 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0 01aa 00eb | | Load_Encached Diana_Cache 01ab 1889 | | Execute Package,Field_Execute,Field_Number 0x89 01ac 00eb | | Load_Encached Diana_Cache 01ad 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 01ae 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01af 00d1 | | Pop_Control Pop_Count_1 01b0 00c9 | | Action Pop_Auxiliary_Loop 01b1 7fd7 | | Jump 0x189 01b2 0000 0000 | | .BLANK 0000[0x6] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bf | | .CONST 0x01bf ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0002 | | .CONST 0x0002 ; Number of locals 01bb INIT_01b8: 01bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa = .DEBUG 0x01bb,0x0682,0x0002,0x0000,0x0037,0xdb64,0x0000,0x006e ; Debug Table 0xa.0x0 = 0x1bb,0xffff 01bc 00db | | Load_Top At_Offset_3 01bd 8229 | ) | Call 0x1,0x29 01be 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01bf BODY_01b8: 01bf 00cf | | Action Mark_Auxiliary 01c0 0007 | | Action Break_Optional ; Debug Table 0xa.0x1 = 0x1c0,0x1 01c1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x2 = 0x1c1,0x2 01c2 00eb | | Load_Encached Diana_Cache 01c3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01c4 0b30 | 0 | Execute_Immediate Case_Compare,0x30 01c5 701b |p | Jump_Nonzero 0x1e1 01c6 0b1d | | Execute_Immediate Case_Compare,0x1d 01c7 7019 |p | Jump_Nonzero 0x1e1 01c8 0b29 | ) | Execute_Immediate Case_Compare,0x29 01c9 7017 |p | Jump_Nonzero 0x1e1 01ca 0b1f | | Execute_Immediate Case_Compare,0x1f 01cb 7015 |p | Jump_Nonzero 0x1e1 01cc 0b73 | s | Execute_Immediate Case_Compare,0x73 01cd 7013 |p | Jump_Nonzero 0x1e1 01ce 0b39 | 9 | Execute_Immediate Case_Compare,0x39 01cf 7016 |p | Jump_Nonzero 0x1e6 01d0 0b38 | 8 | Execute_Immediate Case_Compare,0x38 01d1 7014 |p | Jump_Nonzero 0x1e6 01d2 0b02 | | Execute_Immediate Case_Compare,0x2 01d3 7012 |p | Jump_Nonzero 0x1e6 01d4 0b3e | > | Execute_Immediate Case_Compare,0x3e 01d5 7019 |p | Jump_Nonzero 0x1ef 01d6 0b3d | = | Execute_Immediate Case_Compare,0x3d 01d7 701c |p | Jump_Nonzero 0x1f4 01d8 0092 0396 | | Action Push_String_Extended,0x396 ; "Element can't have an Address Rep" ; Debug Table 0xa.0x3 = 0x1d8,0x7 01da e003 | | Load 0x0,0x3 01db 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 01dc e004 | | Load 0x0,0x4 01dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01de e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x4 = 0x1de,0x8 01df 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 01e0 0257 | W | Execute Discrete,Raise 01e1 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x5 = 0x1e1,0x3 01e2 00eb | | Load_Encached Diana_Cache 01e3 18f6 | | Execute Package,Field_Execute,Field_Number 0xf6 01e4 822a | * | Call 0x1,0x2a 01e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e6 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x6 = 0x1e6,0x4 01e7 00eb | | Load_Encached Diana_Cache 01e8 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0 01e9 00eb | | Load_Encached Diana_Cache 01ea 1889 | | Execute Package,Field_Execute,Field_Number 0x89 01eb 00eb | | Load_Encached Diana_Cache 01ec 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 01ed 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01ee 7809 |x | Jump 0x1f8 01ef 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x7 = 0x1ef,0x5 01f0 00eb | | Load_Encached Diana_Cache 01f1 18cf | | Execute Package,Field_Execute,Field_Number 0xcf 01f2 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01f3 7804 |x | Jump 0x1f8 01f4 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x8 = 0x1f4,0x6 01f5 00eb | | Load_Encached Diana_Cache 01f6 18bf | | Execute Package,Field_Execute,Field_Number 0xbf 01f7 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01f8 00d1 | | Pop_Control Pop_Count_1 01f9 00c9 | | Action Pop_Auxiliary_Loop 01fa 7fc6 | | Jump 0x1c1 01fb 0000 0000 | | .BLANK 0000[0x5] 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 0203 | | .CONST 0x0203 ; Address of begin 0201 0004 | | .CONST 0x0004 ; Address of exception handler 0202 0001 | | .CONST 0x0001 ; Number of locals 0203 BODY_0200: 0203 INIT_0200: 0203 4603 |F | Jump_Case 0x4 ; Debug Table 0xb = .DEBUG 0x0203,0x0696,0x0005,0x0000,0x0037,0xdb64,0x0000,0x007b 0204 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0205 7802 |x | Jump 0x208 ; case 0x1 0206 7805 |x | Jump 0x20c ; case 0x2 0207 7809 |x | Jump 0x211 ; case 0x3 0208 00da | | Load_Top At_Offset_2 0209 0091 038c | | Action Push_String_Extended_Indexed,0x38c ; "SIZE" 020b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 020c 00db | | Load_Top At_Offset_3 020d 00db | | Load_Top At_Offset_3 020e 00e0 | | Load_Encached Standard_Cache 020f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0210 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0211 00da | | Load_Top At_Offset_2 0212 00e0 | | Load_Encached Standard_Cache 0213 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0214 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0215 0000 0000 | | .XXX[0x3] 0217 0000 | | 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0222 | " | .CONST 0x0222 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0004 | | .CONST 0x0004 ; Number of locals 021b INIT_0218: 021b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc = .DEBUG 0x021b,0x0698,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0083 ; Debug Table 0xc.0x0 = 0x21b,0xffff 021c 00db | | Load_Top At_Offset_3 021d 8229 | ) | Call 0x1,0x29 021e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 021f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x1 = 0x21f,0xfffe 0220 029f 035b | [| Declare_Subprogram INIT_0358,For_Call 0222 BODY_0218: 0222 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x2 = 0x222,0x1 0223 00eb | | Load_Encached Diana_Cache 0224 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0225 0f44 | D | Execute_Immediate Equal,0x44 0226 6806 |h | Jump_Zero 0x22d 0227 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x3 = 0x227,0x2 0228 00eb | | Load_Encached Diana_Cache 0229 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 022a 0032 | 2 | Store_Top Heap_Access,At_Offset_2 022b 8404 | | Call 0x2,0x4 ; Debug Table 0xc.0x4 = 0x22b,0x3 022c 7809 |x | Jump 0x236 022d 0092 0397 | | Action Push_String_Extended,0x397 ; "Element isn't a Length Clause" ; Debug Table 0xc.0x5 = 0x22d,0x4 022f e003 | | Load 0x0,0x3 0230 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0231 e004 | | Load 0x0,0x4 0232 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0233 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x6 = 0x233,0x5 0234 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0235 0257 | W | Execute Discrete,Raise 0236 4831 |H1 | Short_Literal 0x31 0237 0257 | W | Execute Discrete,Raise 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023f | ? | .CONST 0x023f ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0002 | | .CONST 0x0002 ; Number of locals 023b INIT_0238: 023b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd = .DEBUG 0x023b,0x06a8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x008c ; Debug Table 0xd.0x0 = 0x23b,0xffff 023c 00db | | Load_Top At_Offset_3 023d 8229 | ) | Call 0x1,0x29 023e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 023f BODY_0238: 023f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1 = 0x23f,0x1 0240 00eb | | Load_Encached Diana_Cache 0241 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0242 0f44 | D | Execute_Immediate Equal,0x44 0243 680c |h | Jump_Zero 0x250 0244 00d8 | | Load_Top At_Offset_0 0245 00eb | | Load_Encached Diana_Cache 0246 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0247 00eb | | Load_Encached Diana_Cache 0248 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0249 0f0e | | Execute_Immediate Equal,0xe 024a 7005 |p | Jump_Nonzero 0x250 024b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x2 = 0x24b,0x2 024c 00eb | | Load_Encached Diana_Cache 024d 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 024e 822a | * | Call 0x1,0x2a 024f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0250 0092 0398 | | Action Push_String_Extended,0x398 ; "Element isn't a Representation Aggregate" ; Debug Table 0xd.0x3 = 0x250,0x3 0252 e003 | | Load 0x0,0x3 0253 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0254 e004 | | Load 0x0,0x4 0255 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0256 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x4 = 0x256,0x4 0257 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0258 0257 | W | Execute Discrete,Raise 0259 0000 0000 | | .BLANK 0000[0x7] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0268 | h | .CONST 0x0268 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0003 | | .CONST 0x0003 ; Number of locals 0263 INIT_0260: 0263 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe = .DEBUG 0x0263,0x06b4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0095 ; Debug Table 0xe.0x0 = 0x263,0xffff 0264 00db | | Load_Top At_Offset_3 0265 8229 | ) | Call 0x1,0x29 0266 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0267 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x1 = 0x267,0xfffe 0268 BODY_0260: 0268 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x2 = 0x268,0x1 0269 00eb | | Load_Encached Diana_Cache 026a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 026b 0f43 | C | Execute_Immediate Equal,0x43 026c 6810 |h | Jump_Zero 0x27d 026d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x3 = 0x26d,0x2 026e 00eb | | Load_Encached Diana_Cache 026f 18b3 | | Execute Package,Field_Execute,Field_Number 0xb3 0270 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0271 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x4 = 0x271,0x3 0272 00eb | | Load_Encached Diana_Cache 0273 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0274 6803 |h | Jump_Zero 0x278 0275 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x5 = 0x275,0x4 0276 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0277 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0278 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x6 = 0x278,0x5 0279 00eb | | Load_Encached Diana_Cache 027a 18ca | | Execute Package,Field_Execute,Field_Number 0xca 027b 822a | * | Call 0x1,0x2a 027c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 027d 0092 0399 | | Action Push_String_Extended,0x399 ; "Element isn't an Alignment Expression" ; Debug Table 0xe.0x7 = 0x27d,0x6 027f e003 | | Load 0x0,0x3 0280 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0281 e004 | | Load 0x0,0x4 0282 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0283 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x8 = 0x283,0x7 0284 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0285 0257 | W | Execute Discrete,Raise 0286 0000 0000 | | .XXX[0x2] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028f | | .CONST 0x028f ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0002 | | .CONST 0x0002 ; Number of locals 028b INIT_0288: 028b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf = .DEBUG 0x028b,0x06c8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b0 ; Debug Table 0xf.0x0 = 0x28b,0xffff 028c 00db | | Load_Top At_Offset_3 028d 8229 | ) | Call 0x1,0x29 028e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 028f BODY_0288: 028f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x1 = 0x28f,0x1 0290 00eb | | Load_Encached Diana_Cache 0291 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0292 0f43 | C | Execute_Immediate Equal,0x43 0293 6809 |h | Jump_Zero 0x29d 0294 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x294,0x2 0295 00eb | | Load_Encached Diana_Cache 0296 18b8 | | Execute Package,Field_Execute,Field_Number 0xb8 0297 00eb | | Load_Encached Diana_Cache 0298 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0299 e001 | | Load 0x0,0x1 029a 1b58 | X | Execute Package,Field_Read,Field_Number 0x58 029b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 029c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 029d 0092 039a | | Action Push_String_Extended,0x39a ; "Element isn't a Record Rep" ; Debug Table 0xf.0x3 = 0x29d,0x3 029f e003 | | Load 0x0,0x3 02a0 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02a1 e004 | | Load 0x0,0x4 02a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02a3 e001 | | Load 0x0,0x1 ; Debug Table 0xf.0x4 = 0x2a3,0x4 02a4 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 02a5 0257 | W | Execute Discrete,Raise 02a6 0000 0000 | | .XXX[0x2] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x02ab,0x06d4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b9 ; Debug Table 0x10.0x0 = 0x2ab,0x1 02ac 8229 | ) | Call 0x1,0x29 02ad 00eb | | Load_Encached Diana_Cache 02ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02af 0fa0 | | Execute_Immediate Equal,-0x60 02b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b1 0000 0000 | | .BLANK 0000[0x7] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bf | | .CONST 0x02bf ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0002 | | .CONST 0x0002 ; Number of locals 02bb INIT_02b8: 02bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x11 = .DEBUG 0x02bb,0x06d8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00c2 ; Debug Table 0x11.0x0 = 0x2bb,0xffff 02bc 00db | | Load_Top At_Offset_3 02bd 8229 | ) | Call 0x1,0x29 02be 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02bf BODY_02b8: 02bf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x1 = 0x2bf,0x1 02c0 00eb | | Load_Encached Diana_Cache 02c1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02c2 0fa0 | | Execute_Immediate Equal,-0x60 02c3 6804 |h | Jump_Zero 0x2c8 02c4 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x2 = 0x2c4,0x2 02c5 e001 | | Load 0x0,0x1 02c6 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 02c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c8 0092 039b | | Action Push_String_Extended,0x39b ; "Element isn't a Component Clause" ; Debug Table 0x11.0x3 = 0x2c8,0x3 02ca e003 | | Load 0x0,0x3 02cb 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02cc e004 | | Load 0x0,0x4 02cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ce e001 | | Load 0x0,0x1 ; Debug Table 0x11.0x4 = 0x2ce,0x4 02cf 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 02d0 0257 | W | Execute Discrete,Raise 02d1 0000 0000 | | .BLANK 0000[0x7] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02df | | .CONST 0x02df ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0002 | | .CONST 0x0002 ; Number of locals 02db INIT_02d8: 02db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12 = .DEBUG 0x02db,0x06e4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00cb ; Debug Table 0x12.0x0 = 0x2db,0xffff 02dc 00db | | Load_Top At_Offset_3 02dd 8229 | ) | Call 0x1,0x29 02de 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02df BODY_02d8: 02df 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x1 = 0x2df,0x1 02e0 00eb | | Load_Encached Diana_Cache 02e1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02e2 0fa0 | | Execute_Immediate Equal,-0x60 02e3 6805 |h | Jump_Zero 0x2e9 02e4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x2 = 0x2e4,0x2 02e5 00eb | | Load_Encached Diana_Cache 02e6 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 02e7 822a | * | Call 0x1,0x2a 02e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02e9 0092 039b | | Action Push_String_Extended,0x39b ; "Element isn't a Component Clause" ; Debug Table 0x12.0x3 = 0x2e9,0x3 02eb e003 | | Load 0x0,0x3 02ec 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02ed e004 | | Load 0x0,0x4 02ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ef e001 | | Load 0x0,0x1 ; Debug Table 0x12.0x4 = 0x2ef,0x4 02f0 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 02f1 0257 | W | Execute Discrete,Raise 02f2 0000 0000 | | .BLANK 0000[0x6] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02ff | | .CONST 0x02ff ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0002 | | .CONST 0x0002 ; Number of locals 02fb INIT_02f8: 02fb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13 = .DEBUG 0x02fb,0x06f0,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00d4 ; Debug Table 0x13.0x0 = 0x2fb,0xffff 02fc 00db | | Load_Top At_Offset_3 02fd 8229 | ) | Call 0x1,0x29 02fe 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02ff BODY_02f8: 02ff 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1 = 0x2ff,0x1 0300 00eb | | Load_Encached Diana_Cache 0301 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0302 0fa0 | | Execute_Immediate Equal,-0x60 0303 6805 |h | Jump_Zero 0x309 0304 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x2 = 0x304,0x2 0305 00eb | | Load_Encached Diana_Cache 0306 18dc | | Execute Package,Field_Execute,Field_Number 0xdc 0307 822a | * | Call 0x1,0x2a 0308 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0309 0092 039b | | Action Push_String_Extended,0x39b ; "Element isn't a Component Clause" ; Debug Table 0x13.0x3 = 0x309,0x3 030b e003 | | Load 0x0,0x3 030c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 030d e004 | | Load 0x0,0x4 030e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 030f e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x4 = 0x30f,0x4 0310 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0311 0257 | W | Execute Discrete,Raise 0312 0000 0000 | | .BLANK 0000[0x6] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 031f | | .CONST 0x031f ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0002 | | .CONST 0x0002 ; Number of locals 031b INIT_0318: 031b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x14 = .DEBUG 0x031b,0x06fc,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00dd ; Debug Table 0x14.0x0 = 0x31b,0xffff 031c 00db | | Load_Top At_Offset_3 031d 8229 | ) | Call 0x1,0x29 031e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 031f BODY_0318: 031f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x1 = 0x31f,0x1 0320 00eb | | Load_Encached Diana_Cache 0321 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0322 0f42 | B | Execute_Immediate Equal,0x42 0323 6806 |h | Jump_Zero 0x32a 0324 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x2 = 0x324,0x2 0325 00d9 | | Load_Top At_Offset_1 0326 e007 | | Load 0x0,0x7 0327 180e | | Execute Package,Field_Execute,Field_Number 0xe 0328 822a | * | Call 0x1,0x2a 0329 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 032a 0092 039c | | Action Push_String_Extended,0x39c ; "Element isn't an Address Clause" ; Debug Table 0x14.0x3 = 0x32a,0x3 032c e003 | | Load 0x0,0x3 032d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 032e e004 | | Load 0x0,0x4 032f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0330 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x4 = 0x330,0x4 0331 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0332 0257 | W | Execute Discrete,Raise 0333 0000 0000 | | .BLANK 0000[0x5] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033f | ? | .CONST 0x033f ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0002 | | .CONST 0x0002 ; Number of locals 033b INIT_0338: 033b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15 = .DEBUG 0x033b,0x0708,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00e6 ; Debug Table 0x15.0x0 = 0x33b,0xffff 033c 00db | | Load_Top At_Offset_3 033d 8229 | ) | Call 0x1,0x29 033e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 033f BODY_0338: 033f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x1 = 0x33f,0x1 0340 00eb | | Load_Encached Diana_Cache 0341 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0342 0f42 | B | Execute_Immediate Equal,0x42 0343 6805 |h | Jump_Zero 0x349 0344 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x2 = 0x344,0x2 0345 00eb | | Load_Encached Diana_Cache 0346 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 0347 822a | * | Call 0x1,0x2a 0348 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0349 0092 039c | | Action Push_String_Extended,0x39c ; "Element isn't an Address Clause" ; Debug Table 0x15.0x3 = 0x349,0x3 034b e003 | | Load 0x0,0x3 034c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 034d e004 | | Load 0x0,0x4 034e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 034f e001 | | Load 0x0,0x1 ; Debug Table 0x15.0x4 = 0x34f,0x4 0350 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0351 0257 | W | Execute Discrete,Raise 0352 0000 0000 | | .BLANK 0000[0x6] 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 035e | ^ | .CONST 0x035e ; Address of begin 0359 0004 | | .CONST 0x0004 ; Address of exception handler 035a 0002 | | .CONST 0x0002 ; Number of locals 035b INIT_0358: 035b e403 | | Load 0x2,0x3 ; Debug Table 0x16 = .DEBUG 0x035b,0x0714,0x0004,0x0000,0x0037,0xdcc4,0x0000,0x038e ; Debug Table 0x16.0x0 = 0x35b,0xffff 035c e005 | | Load 0x0,0x5 035d 180d | | Execute Package,Field_Execute,Field_Number 0xd 035e BODY_0358: 035e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x1 = 0x35e,0x1 035f 0092 038c | | Action Push_String_Extended,0x38c ; "SIZE" 0361 01df | | Execute Vector,Equal 0362 6803 |h | Jump_Zero 0x366 0363 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x2 = 0x363,0x2 0364 00cb | | Action Pop_Block_With_Result 0365 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0366 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x3 = 0x366,0x3 0367 0092 039d | | Action Push_String_Extended,0x39d ; "STORAGE_SIZE" 0369 01df | | Execute Vector,Equal 036a 6812 |h | Jump_Zero 0x37d 036b e403 | | Load 0x2,0x3 ; Debug Table 0x16.0x4 = 0x36b,0x4 036c e005 | | Load 0x0,0x5 036d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 036e 00eb | | Load_Encached Diana_Cache 036f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0370 0b6b | k | Execute_Immediate Case_Compare,0x6b 0371 7003 |p | Jump_Nonzero 0x375 0372 0b73 | s | Execute_Immediate Case_Compare,0x73 0373 7004 |p | Jump_Nonzero 0x378 0374 7806 |x | Jump 0x37b ; Debug Table 0x16.0x5 = 0x374,0x7 0375 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x6 = 0x375,0x5 0376 00cb | | Action Pop_Block_With_Result 0377 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0378 4802 |H | Short_Literal 0x2 ; Debug Table 0x16.0x7 = 0x378,0x6 0379 00cb | | Action Pop_Block_With_Result 037a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 037b 00d1 | | Pop_Control Pop_Count_1 037c 7808 |x | Jump 0x385 037d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x8 = 0x37d,0x8 037e 0092 038f | | Action Push_String_Extended,0x38f ; "SMALL" 0380 01df | | Execute Vector,Equal 0381 6803 |h | Jump_Zero 0x385 0382 4803 |H | Short_Literal 0x3 ; Debug Table 0x16.0x9 = 0x382,0x9 0383 00cb | | Action Pop_Block_With_Result 0384 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0385 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x16.0xa = 0x385,0xa 0386 0257 | W | Execute Discrete,Raise 0387 ; -------------------------------------------------------------------------------------- 0387 ; STRING TABLE 0387 ; -------------------------------------------------------------------------------------- 0387 0030 | 0 | .STRTAB 0x0030->0x039f ; "A_LENGTH_CLAUSE" 0388 003d | = | .STRTAB 0x003d->0x03a6 ; "AN_ENUMERATION_REPRESENTATION_CLAUSE" 0389 005f | _ | .STRTAB 0x005f->0x03b8 ; "A_RECORD_REPRESENTATION_CLAUSE" 038a 007b | { | .STRTAB 0x007b->0x03c7 ; "AN_ADDRESS_CLAUSE" 038b 008a | | .STRTAB 0x008a->0x03d0 ; "NOT_A_REPRESENTATION_CLAUSE" 038c 00a3 | | .STRTAB 0x00a3->0x03dd ; "SIZE" 038d 00a5 | | .STRTAB 0x00a5->0x03df ; "COLLECTION_STORAGE_SIZE" 038e 00ba | | .STRTAB 0x00ba->0x03eb ; "TASK_STORAGE_SIZE" 038f 00c9 | | .STRTAB 0x00c9->0x03f3 ; "SMALL" 0390 00cc | | .STRTAB 0x00cc->0x03f6 ; "Element is not a Representation Clause" 0391 00f0 | | .STRTAB 0x00f0->0x0409 ; "Element is not a Type Definition" 0392 010e | | .STRTAB 0x010e->0x0419 ; "Element can't have a Storage Size Rep" 0393 0131 | 1 | .STRTAB 0x0131->0x042b ; "Element isn't an Enumeration Element" 0394 0153 | S | .STRTAB 0x0153->0x043d ; "The LONG_INTEGER form of Associated_Enumeration_Representation is not yet implemented" 0395 01a6 | | .STRTAB 0x01a6->0x0468 ; "Element can't have a record rep" 0396 01c3 | | .STRTAB 0x01c3->0x0477 ; "Element can't have an Address Rep" 0397 01e2 | | .STRTAB 0x01e2->0x0488 ; "Element isn't a Length Clause" 0398 01fd | | .STRTAB 0x01fd->0x0496 ; "Element isn't a Representation Aggregate" 0399 0223 | # | .STRTAB 0x0223->0x04aa ; "Element isn't an Alignment Expression" 039a 0246 | F | .STRTAB 0x0246->0x04bd ; "Element isn't a Record Rep" 039b 025e | ^ | .STRTAB 0x025e->0x04ca ; "Element isn't a Component Clause" 039c 027c | | | .STRTAB 0x027c->0x04da ; "Element isn't an Address Clause" 039d 0299 | | .STRTAB 0x0299->0x04e9 ; "STORAGE_SIZE" 039e 02a3 | | .STREND 0x02a3->0x04ef 039f 415f 4c45 |A_LE| .STRTAB_STRINGS 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; Debug Table 04f0 ; -------------------------------------------------------------------------------------- 04f0 0003 0017 | | .CONST 0x0003,0x0017 04f2 000b 05aa | | .DEBUG 0x000b,0x05aa,0x8000,0x0000,0x0037,0xdb64,0x0000,0x0005 04fa 0054 05ea | T | .DEBUG 0x0054,0x05ea,0x8000,0x0000,0x0037,0xdcc4,0x0000,0x0013 0502 008b 061c | | .DEBUG 0x008b,0x061c,0x0005,0x0000,0x0037,0xdb64,0x0000,0x0024 050a 00a3 061e | | .DEBUG 0x00a3,0x061e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x002d 0512 00bb 0628 | (| .DEBUG 0x00bb,0x0628,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0036 051a 00fb 0642 | B| .DEBUG 0x00fb,0x0642,0x0002,0x0000,0x0037,0xdb64,0x0000,0x003f 0522 0133 0652 | 3 R| .DEBUG 0x0133,0x0652,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0048 052a 0153 065e | S ^| .DEBUG 0x0153,0x065e,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0051 0532 0173 066a | s j| .DEBUG 0x0173,0x066a,0x0002,0x0000,0x0037,0xdb64,0x0000,0x005a 053a 0183 0670 | p| .DEBUG 0x0183,0x0670,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0063 0542 01bb 0682 | | .DEBUG 0x01bb,0x0682,0x0002,0x0000,0x0037,0xdb64,0x0000,0x006e 054a 0203 0696 | | .DEBUG 0x0203,0x0696,0x0005,0x0000,0x0037,0xdb64,0x0000,0x007b 0552 021b 0698 | | .DEBUG 0x021b,0x0698,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0083 055a 023b 06a8 | ; | .DEBUG 0x023b,0x06a8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x008c 0562 0263 06b4 | c | .DEBUG 0x0263,0x06b4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x0095 056a 028b 06c8 | | .DEBUG 0x028b,0x06c8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b0 0572 02ab 06d4 | | .DEBUG 0x02ab,0x06d4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00b9 057a 02bb 06d8 | | .DEBUG 0x02bb,0x06d8,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00c2 0582 02db 06e4 | | .DEBUG 0x02db,0x06e4,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00cb 058a 02fb 06f0 | | .DEBUG 0x02fb,0x06f0,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00d4 0592 031b 06fc | | .DEBUG 0x031b,0x06fc,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00dd 059a 033b 0708 | ; | .DEBUG 0x033b,0x0708,0x0002,0x0000,0x0037,0xdb64,0x0000,0x00e6 05a2 035b 0714 | [ | .DEBUG 0x035b,0x0714,0x0004,0x0000,0x0037,0xdcc4,0x0000,0x038e 05aa ; -------------------------------------------------------------------------------------- 05aa ; Debug3 Subtable 0x0 05aa ; -------------------------------------------------------------------------------------- 05aa 001f 0000 | | .DBG3TAB 0x001f,0x0000 05ac 000b ffff | | .CONST 0x000b,0xffff 05ae 000e fffe | | .CONST 0x000e,0xfffe 05b0 0011 fffd | | .CONST 0x0011,0xfffd 05b2 0014 fffc | | .CONST 0x0014,0xfffc 05b4 0017 fffb | | .CONST 0x0017,0xfffb 05b6 001a fffa | | .CONST 0x001a,0xfffa 05b8 001f fff9 | | .CONST 0x001f,0xfff9 05ba 0021 fff8 | ! | .CONST 0x0021,0xfff8 05bc 0023 fff7 | # | .CONST 0x0023,0xfff7 05be 0025 fff6 | % | .CONST 0x0025,0xfff6 05c0 0027 fff5 | ' | .CONST 0x0027,0xfff5 05c2 0029 fff4 | ) | .CONST 0x0029,0xfff4 05c4 002b fff3 | + | .CONST 0x002b,0xfff3 05c6 002d fff2 | - | .CONST 0x002d,0xfff2 05c8 002f fff1 | / | .CONST 0x002f,0xfff1 05ca 0034 fff0 | 4 | .CONST 0x0034,0xfff0 05cc 0036 ffef | 6 | .CONST 0x0036,0xffef 05ce 0038 ffee | 8 | .CONST 0x0038,0xffee 05d0 003a ffed | : | .CONST 0x003a,0xffed 05d2 003d ffec | = | .CONST 0x003d,0xffec 05d4 0040 ffeb | @ | .CONST 0x0040,0xffeb 05d6 0043 ffea | C | .CONST 0x0043,0xffea 05d8 0045 ffe9 | E | .CONST 0x0045,0xffe9 05da 0047 ffe8 | G | .CONST 0x0047,0xffe8 05dc 0049 ffe7 | I | .CONST 0x0049,0xffe7 05de 004b ffe6 | K | .CONST 0x004b,0xffe6 05e0 004d ffe5 | M | .CONST 0x004d,0xffe5 05e2 004f ffe4 | O | .CONST 0x004f,0xffe4 05e4 0051 ffe3 | Q | .CONST 0x0051,0xffe3 05e6 0052 ffe2 | R | .CONST 0x0052,0xffe2 05e8 0053 ffe1 | S | .CONST 0x0053,0xffe1 05ea ; -------------------------------------------------------------------------------------- 05ea ; Debug3 Subtable 0x1 05ea ; -------------------------------------------------------------------------------------- 05ea 0018 0000 | | .DBG3TAB 0x0018,0x0000 05ec 0054 ffff | T | .CONST 0x0054,0xffff 05ee 0055 fffe | U | .CONST 0x0055,0xfffe 05f0 0056 fffd | V | .CONST 0x0056,0xfffd 05f2 0057 fffc | W | .CONST 0x0057,0xfffc 05f4 0058 fffb | X | .CONST 0x0058,0xfffb 05f6 005c fffa | \ | .CONST 0x005c,0xfffa 05f8 0060 fff9 | ` | .CONST 0x0060,0xfff9 05fa 0062 fff8 | b | .CONST 0x0062,0xfff8 05fc 0064 fff7 | d | .CONST 0x0064,0xfff7 05fe 0066 fff6 | f | .CONST 0x0066,0xfff6 0600 0068 fff5 | h | .CONST 0x0068,0xfff5 0602 006a fff4 | j | .CONST 0x006a,0xfff4 0604 006c fff3 | l | .CONST 0x006c,0xfff3 0606 006e fff2 | n | .CONST 0x006e,0xfff2 0608 0070 fff1 | p | .CONST 0x0070,0xfff1 060a 0072 fff0 | r | .CONST 0x0072,0xfff0 060c 0074 ffef | t | .CONST 0x0074,0xffef 060e 0076 ffee | v | .CONST 0x0076,0xffee 0610 0078 ffed | x | .CONST 0x0078,0xffed 0612 007a ffec | z | .CONST 0x007a,0xffec 0614 007c ffeb | | | .CONST 0x007c,0xffeb 0616 007e ffea | ~ | .CONST 0x007e,0xffea 0618 0080 ffe9 | | .CONST 0x0080,0xffe9 061a 0082 ffe8 | | .CONST 0x0082,0xffe8 061c ; -------------------------------------------------------------------------------------- 061c ; Debug3 Subtable 0x2 061c ; -------------------------------------------------------------------------------------- 061c 0000 0000 | | .DBG3TAB 0x0000,0x0000 061e ; -------------------------------------------------------------------------------------- 061e ; Debug3 Subtable 0x3 061e ; -------------------------------------------------------------------------------------- 061e 0001 0003 | | .DBG3TAB 0x0001,0x0003 0620 00a3 ffff | | .CONST 0x00a3,0xffff 0622 00ac 0001 | | .CONST 0x00ac,0x0001 0624 00b0 0002 | | .CONST 0x00b0,0x0002 0626 00b3 0003 | | .CONST 0x00b3,0x0003 0628 ; -------------------------------------------------------------------------------------- 0628 ; Debug3 Subtable 0x4 0628 ; -------------------------------------------------------------------------------------- 0628 0002 000a | | .DBG3TAB 0x0002,0x000a 062a 00bb ffff | | .CONST 0x00bb,0xffff 062c 00bf fffe | | .CONST 0x00bf,0xfffe 062e 00c0 0001 | | .CONST 0x00c0,0x0001 0630 00c4 0002 | | .CONST 0x00c4,0x0002 0632 00cd 0007 | | .CONST 0x00cd,0x0007 0634 00d3 0008 | | .CONST 0x00d3,0x0008 0636 00d6 0003 | | .CONST 0x00d6,0x0003 0638 00db 0004 | | .CONST 0x00db,0x0004 063a 00e0 0005 | | .CONST 0x00e0,0x0005 063c 00e5 0006 | | .CONST 0x00e5,0x0006 063e 00ec 0009 | | .CONST 0x00ec,0x0009 0640 00f2 000a | | .CONST 0x00f2,0x000a 0642 ; -------------------------------------------------------------------------------------- 0642 ; Debug3 Subtable 0x5 0642 ; -------------------------------------------------------------------------------------- 0642 0001 0006 | | .DBG3TAB 0x0001,0x0006 0644 00fb ffff | | .CONST 0x00fb,0xffff 0646 00ff 0001 | | .CONST 0x00ff,0x0001 0648 0112 0003 | | .CONST 0x0112,0x0003 064a 0117 0006 | | .CONST 0x0117,0x0006 064c 011a 0004 | | .CONST 0x011a,0x0004 064e 0120 0005 | | .CONST 0x0120,0x0005 0650 0123 0002 | # | .CONST 0x0123,0x0002 0652 ; -------------------------------------------------------------------------------------- 0652 ; Debug3 Subtable 0x6 0652 ; -------------------------------------------------------------------------------------- 0652 0001 0004 | | .DBG3TAB 0x0001,0x0004 0654 0133 ffff | 3 | .CONST 0x0133,0xffff 0656 0137 0001 | 7 | .CONST 0x0137,0x0001 0658 0140 0003 | @ | .CONST 0x0140,0x0003 065a 0146 0004 | F | .CONST 0x0146,0x0004 065c 0149 0002 | I | .CONST 0x0149,0x0002 065e ; -------------------------------------------------------------------------------------- 065e ; Debug3 Subtable 0x7 065e ; -------------------------------------------------------------------------------------- 065e 0001 0004 | | .DBG3TAB 0x0001,0x0004 0660 0153 ffff | S | .CONST 0x0153,0xffff 0662 0157 0001 | W | .CONST 0x0157,0x0001 0664 015e 0003 | ^ | .CONST 0x015e,0x0003 0666 0164 0004 | d | .CONST 0x0164,0x0004 0668 0167 0002 | g | .CONST 0x0167,0x0002 066a ; -------------------------------------------------------------------------------------- 066a ; Debug3 Subtable 0x8 066a ; -------------------------------------------------------------------------------------- 066a 0000 0002 | | .DBG3TAB 0x0000,0x0002 066c 0173 0001 | s | .CONST 0x0173,0x0001 066e 0179 0002 | y | .CONST 0x0179,0x0002 0670 ; -------------------------------------------------------------------------------------- 0670 ; Debug3 Subtable 0x9 0670 ; -------------------------------------------------------------------------------------- 0670 0001 0007 | | .DBG3TAB 0x0001,0x0007 0672 0183 ffff | | .CONST 0x0183,0xffff 0674 0188 0001 | | .CONST 0x0188,0x0001 0676 0189 0002 | | .CONST 0x0189,0x0002 0678 0192 0006 | | .CONST 0x0192,0x0006 067a 0198 0007 | | .CONST 0x0198,0x0007 067c 019b 0003 | | .CONST 0x019b,0x0003 067e 01a1 0004 | | .CONST 0x01a1,0x0004 0680 01a7 0005 | | .CONST 0x01a7,0x0005 0682 ; -------------------------------------------------------------------------------------- 0682 ; Debug3 Subtable 0xa 0682 ; -------------------------------------------------------------------------------------- 0682 0001 0008 | | .DBG3TAB 0x0001,0x0008 0684 01bb ffff | | .CONST 0x01bb,0xffff 0686 01c0 0001 | | .CONST 0x01c0,0x0001 0688 01c1 0002 | | .CONST 0x01c1,0x0002 068a 01d8 0007 | | .CONST 0x01d8,0x0007 068c 01de 0008 | | .CONST 0x01de,0x0008 068e 01e1 0003 | | .CONST 0x01e1,0x0003 0690 01e6 0004 | | .CONST 0x01e6,0x0004 0692 01ef 0005 | | .CONST 0x01ef,0x0005 0694 01f4 0006 | | .CONST 0x01f4,0x0006 0696 ; -------------------------------------------------------------------------------------- 0696 ; Debug3 Subtable 0xb 0696 ; -------------------------------------------------------------------------------------- 0696 0000 0000 | | .DBG3TAB 0x0000,0x0000 0698 ; -------------------------------------------------------------------------------------- 0698 ; Debug3 Subtable 0xc 0698 ; -------------------------------------------------------------------------------------- 0698 0002 0005 | | .DBG3TAB 0x0002,0x0005 069a 021b ffff | | .CONST 0x021b,0xffff 069c 021f fffe | | .CONST 0x021f,0xfffe 069e 0222 0001 | " | .CONST 0x0222,0x0001 06a0 0227 0002 | ' | .CONST 0x0227,0x0002 06a2 022b 0003 | + | .CONST 0x022b,0x0003 06a4 022d 0004 | - | .CONST 0x022d,0x0004 06a6 0233 0005 | 3 | .CONST 0x0233,0x0005 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; Debug3 Subtable 0xd 06a8 ; -------------------------------------------------------------------------------------- 06a8 0001 0004 | | .DBG3TAB 0x0001,0x0004 06aa 023b ffff | ; | .CONST 0x023b,0xffff 06ac 023f 0001 | ? | .CONST 0x023f,0x0001 06ae 024b 0002 | K | .CONST 0x024b,0x0002 06b0 0250 0003 | P | .CONST 0x0250,0x0003 06b2 0256 0004 | V | .CONST 0x0256,0x0004 06b4 ; -------------------------------------------------------------------------------------- 06b4 ; Debug3 Subtable 0xe 06b4 ; -------------------------------------------------------------------------------------- 06b4 0002 0007 | | .DBG3TAB 0x0002,0x0007 06b6 0263 ffff | c | .CONST 0x0263,0xffff 06b8 0267 fffe | g | .CONST 0x0267,0xfffe 06ba 0268 0001 | h | .CONST 0x0268,0x0001 06bc 026d 0002 | m | .CONST 0x026d,0x0002 06be 0271 0003 | q | .CONST 0x0271,0x0003 06c0 0275 0004 | u | .CONST 0x0275,0x0004 06c2 0278 0005 | x | .CONST 0x0278,0x0005 06c4 027d 0006 | } | .CONST 0x027d,0x0006 06c6 0283 0007 | | .CONST 0x0283,0x0007 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; Debug3 Subtable 0xf 06c8 ; -------------------------------------------------------------------------------------- 06c8 0001 0004 | | .DBG3TAB 0x0001,0x0004 06ca 028b ffff | | .CONST 0x028b,0xffff 06cc 028f 0001 | | .CONST 0x028f,0x0001 06ce 0294 0002 | | .CONST 0x0294,0x0002 06d0 029d 0003 | | .CONST 0x029d,0x0003 06d2 02a3 0004 | | .CONST 0x02a3,0x0004 06d4 ; -------------------------------------------------------------------------------------- 06d4 ; Debug3 Subtable 0x10 06d4 ; -------------------------------------------------------------------------------------- 06d4 0000 0001 | | .DBG3TAB 0x0000,0x0001 06d6 02ab 0001 | | .CONST 0x02ab,0x0001 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; Debug3 Subtable 0x11 06d8 ; -------------------------------------------------------------------------------------- 06d8 0001 0004 | | .DBG3TAB 0x0001,0x0004 06da 02bb ffff | | .CONST 0x02bb,0xffff 06dc 02bf 0001 | | .CONST 0x02bf,0x0001 06de 02c4 0002 | | .CONST 0x02c4,0x0002 06e0 02c8 0003 | | .CONST 0x02c8,0x0003 06e2 02ce 0004 | | .CONST 0x02ce,0x0004 06e4 ; -------------------------------------------------------------------------------------- 06e4 ; Debug3 Subtable 0x12 06e4 ; -------------------------------------------------------------------------------------- 06e4 0001 0004 | | .DBG3TAB 0x0001,0x0004 06e6 02db ffff | | .CONST 0x02db,0xffff 06e8 02df 0001 | | .CONST 0x02df,0x0001 06ea 02e4 0002 | | .CONST 0x02e4,0x0002 06ec 02e9 0003 | | .CONST 0x02e9,0x0003 06ee 02ef 0004 | | .CONST 0x02ef,0x0004 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; Debug3 Subtable 0x13 06f0 ; -------------------------------------------------------------------------------------- 06f0 0001 0004 | | .DBG3TAB 0x0001,0x0004 06f2 02fb ffff | | .CONST 0x02fb,0xffff 06f4 02ff 0001 | | .CONST 0x02ff,0x0001 06f6 0304 0002 | | .CONST 0x0304,0x0002 06f8 0309 0003 | | .CONST 0x0309,0x0003 06fa 030f 0004 | | .CONST 0x030f,0x0004 06fc ; -------------------------------------------------------------------------------------- 06fc ; Debug3 Subtable 0x14 06fc ; -------------------------------------------------------------------------------------- 06fc 0001 0004 | | .DBG3TAB 0x0001,0x0004 06fe 031b ffff | | .CONST 0x031b,0xffff 0700 031f 0001 | | .CONST 0x031f,0x0001 0702 0324 0002 | $ | .CONST 0x0324,0x0002 0704 032a 0003 | * | .CONST 0x032a,0x0003 0706 0330 0004 | 0 | .CONST 0x0330,0x0004 0708 ; -------------------------------------------------------------------------------------- 0708 ; Debug3 Subtable 0x15 0708 ; -------------------------------------------------------------------------------------- 0708 0001 0004 | | .DBG3TAB 0x0001,0x0004 070a 033b ffff | ; | .CONST 0x033b,0xffff 070c 033f 0001 | ? | .CONST 0x033f,0x0001 070e 0344 0002 | D | .CONST 0x0344,0x0002 0710 0349 0003 | I | .CONST 0x0349,0x0003 0712 034f 0004 | O | .CONST 0x034f,0x0004 0714 ; -------------------------------------------------------------------------------------- 0714 ; Debug3 Subtable 0x16 0714 ; -------------------------------------------------------------------------------------- 0714 0001 000a | | .DBG3TAB 0x0001,0x000a 0716 035b ffff | [ | .CONST 0x035b,0xffff 0718 035e 0001 | ^ | .CONST 0x035e,0x0001 071a 0363 0002 | c | .CONST 0x0363,0x0002 071c 0366 0003 | f | .CONST 0x0366,0x0003 071e 036b 0004 | k | .CONST 0x036b,0x0004 0720 0374 0007 | t | .CONST 0x0374,0x0007 0722 0375 0005 | u | .CONST 0x0375,0x0005 0724 0378 0006 | x | .CONST 0x0378,0x0006 0726 037d 0008 | } | .CONST 0x037d,0x0008 0728 0382 0009 | | .CONST 0x0382,0x0009 072a 0385 000a | | .CONST 0x0385,0x000a 072c 0000 0000 | | .BLANK 0000[0xd4]