|
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_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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 04c0 | | .CONST 0x04c0 ; 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 0079 | y | .CONST 0x0079 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0026 | & | .CONST 0x0026 ; Number of locals 000b INIT_0008: 000b 62b4 |b | Indirect_Literal Discrete,0x2c0,{0x00000000, 0x58c11501} ; Debug Table 0x0 = .DEBUG 0x000b,0x057a,0x0000,0x0000,0x0058,0xc115,0x0000,0x0144 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0129 | ) | Execute Any,Make_Visible 000d 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x1 = 0xd,0xfffe 000e 032b | + | Declare_Type Record,Incomplete,Visible 000f 00c4 | | Action Make_Default ; Debug Table 0x0.0x2 = 0xf,0xfffd 0010 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x0.0x3 = 0x10,0xfffc 0011 0266 | f | Execute Discrete,Bounds 0012 00db | | Load_Top At_Offset_3 0013 02a0 | | Declare_Subprogram Null_Subprogram 0014 4801 |H | Short_Literal 0x1 0015 0349 | I | Declare_Type Array,Defined_Incomplete,Visible,Bounds_With_Object 0016 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x16,0xfffb 0018 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x18,0xfffa 001a 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x1a,0xfff9 001c 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1c,0xfff8 001e 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1e,0xfff7 0020 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x20,0xfff6 0022 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x22,0xfff5 0024 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x24,0xfff4 0026 0092 044b | K| Action Push_String_Extended,0x44b ; "##UNDEFINED##;" ; Debug Table 0x0.0xc = 0x26,0xfff3 0028 0129 | ) | Execute Any,Make_Visible 0029 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x29,0xfff2 ; Debug Table 0x0.0xe = 0x29,0xfff1 002b 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x2b,0xfff0 002d 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x10 = 0x2d,0xffef 002e 4803 |H | Short_Literal 0x3 002f 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call 0031 03fd | | Declare_Type Discrete,Defined 0032 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x11 = 0x32,0xffee 0033 00e2 | | Load_Encached Integer_Cache 0034 00ec | | Load_Encached Diana_Tree_Cache 0035 02a0 | | Declare_Subprogram Null_Subprogram 0036 e20e | | Load 0x1,0xe 0037 0326 | & | Complete_Type Record,By_Defining 0038 e210 | | Load 0x1,0x10 0039 0340 | @ | Complete_Type Array,By_Component_Completion 003a e20e | | Load 0x1,0xe ; Debug Table 0x0.0x12 = 0x3a,0xffed 003b 0322 | " | Declare_Variable Record 003c 4803 |H | Short_Literal 0x3 003d 00d9 | | Load_Top At_Offset_1 003e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 003f 4800 |H | Short_Literal 0x0 0040 00d9 | | Load_Top At_Offset_1 0041 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0042 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x0.0x13 = 0x42,0x401 0043 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x14 = 0x43,0xffed 0044 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0045 0129 | ) | Execute Any,Make_Visible 0046 c20f | | Store 0x1,0xf 0047 00bf | | Action Accept_Activation 0048 4801 |H | Short_Literal 0x1 ; Debug Table 0x1 = .DEBUG 0x0048,0x05a6,0x0000,0x0000,0x0059,0x8b75,0x0000,0x0010 ; Debug Table 0x1.0x0 = 0x48,0xffff ; Debug Table 0x1.0x1 = 0x48,0xfffe 0049 4800 |H | Short_Literal 0x0 004a e210 | | Load 0x1,0x10 004b 0334 | 4 | Declare_Variable Array,With_Constraint 004c 4801 |H | Short_Literal 0x1 004d 4800 |H | Short_Literal 0x0 004e e210 | | Load 0x1,0x10 004f 0334 | 4 | Declare_Variable Array,With_Constraint 0050 00d9 | | Load_Top At_Offset_1 0051 01d4 | | Execute Vector,Structure_Write 0052 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x2 = 0x52,0xfffd 0053 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x3 = 0x53,0x801 0054 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x1.0x4 = 0x54,0xfffd 0055 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call ; Debug Table 0x1.0x5 = 0x55,0xfffc ; Debug Table 0x1.0x6 = 0x55,0xfffb ; Debug Table 0x1.0x7 = 0x55,0xfffa 0057 029d 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call ; Debug Table 0x1.0x8 = 0x57,0xfff9 0059 029d 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call ; Debug Table 0x1.0x9 = 0x59,0xfff8 005b 029d 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call ; Debug Table 0x1.0xa = 0x5b,0xfff7 005d 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call ; Debug Table 0x1.0xb = 0x5d,0xfff6 005f 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call ; Debug Table 0x1.0xc = 0x5f,0xfff5 0061 029d 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call ; Debug Table 0x1.0xd = 0x61,0xfff4 0063 029d 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call ; Debug Table 0x1.0xe = 0x63,0xfff3 0065 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xf = 0x65,0xfff2 0066 00c7 | | Action Elaborate_Subprogram 0067 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x10 = 0x67,0xfff1 0068 00c7 | | Action Elaborate_Subprogram 0069 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x11 = 0x69,0xfff0 006a 00c7 | | Action Elaborate_Subprogram 006b 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x12 = 0x6b,0xffef 006c 00c7 | | Action Elaborate_Subprogram 006d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x13 = 0x6d,0xffee 006e 00c7 | | Action Elaborate_Subprogram 006f 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x14 = 0x6f,0xffed 0070 00c7 | | Action Elaborate_Subprogram 0071 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x15 = 0x71,0xffec 0072 00c7 | | Action Elaborate_Subprogram 0073 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x16 = 0x73,0xffeb 0074 00c7 | | Action Elaborate_Subprogram 0075 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x17 = 0x75,0xffea 0076 00c7 | | Action Elaborate_Subprogram 0077 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x18 = 0x77,0xffe9 0078 00c7 | | Action Elaborate_Subprogram 0079 BODY_0008: 0079 00bc | | Action Signal_Activated 007a 00bb | | Action Signal_Completion 007b 0000 0000 | | .BLANK 0000[0x5] 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 e21d | | Load 0x1,0x1d ; Debug Table 0x2 = .DEBUG 0x0083,0x05da,0x0002,0x0000,0x0058,0xc115,0x0000,0x0159 ; Debug Table 0x2.0x0 = 0x83,0x1 0084 00ca | | Action Exit_Nullary_Function 0085 0000 0000 | | .XXX[0x3] 0087 0000 | | 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008c | | .CONST 0x008c ; Address of begin 0089 00af | | .CONST 0x00af ; Address of exception handler 008a 0002 | | .CONST 0x0002 ; Number of locals 008b INIT_0088: 008b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x008b,0x05de,0x0002,0x0000,0x0058,0xc115,0x0000,0x015e ; Debug Table 0x3.0x0 = 0x8b,0xffff 008c BODY_0088: 008c 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x1 = 0x8c,0x1 008d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 008e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0x8e,0x401 008f 021d | | Execute Heap_Access,Is_Null 0090 00d0 | | Action Swap_Control 0091 00d1 | | Pop_Control Pop_Count_1 0092 6802 |h | Jump_Zero 0x95 ; Debug Table 0x3.0x3 = 0x92,0x1 0093 8211 | | Call 0x1,0x11 ; Debug Table 0x3.0x4 = 0x93,0x2 0094 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0095 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x5 = 0x95,0x3 0096 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0097 490c |I | Short_Literal 0x10c 0098 00eb | | Load_Encached Diana_Cache 0099 0096 | | Execute Package,Entry 009a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 009b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x6 = 0x9b,0x4 ; Debug Table 0x3.0x7 = 0x9b,0x801 009c 021d | | Execute Heap_Access,Is_Null 009d 680a |h | Jump_Zero 0xa8 ; Debug Table 0x3.0x8 = 0x9d,0x4 009e 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x9 = 0x9e,0x5 009f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 00a0 e5ff | | Load 0x2,-0x1 00a1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00a2 e5ff | | Load 0x2,-0x1 00a3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00a4 00eb | | Load_Encached Diana_Cache 00a5 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9 00a6 8225 | % | Call 0x1,0x25 00a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a8 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xa = 0xa8,0x6 00a9 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 00aa e5ff | | Load 0x2,-0x1 00ab 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00ac 00da | | Load_Top At_Offset_2 00ad 8224 | $ | Call 0x1,0x24 00ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00af TRAP_0088: 00af e20d | | Load 0x1,0xd 00b0 010f | | Execute Exception,Equal 00b1 6802 |h | Jump_Zero 0xb4 00b2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xb = 0xb2,0x7 00b3 0101 | | Execute Exception,Reraise 00b4 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xc = 0xb4,0x8 00b5 e001 | | Load 0x0,0x1 00b6 180d | | Execute Package,Field_Execute,Field_Number 0xd 00b7 0092 044c | L| Action Push_String_Extended,0x44c ; "Get (1)" 00b9 8220 | | Call 0x1,0x20 00ba 8211 | | Call 0x1,0x11 ; Debug Table 0x3.0xd = 0xba,0x9 00bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00bc 0000 0000 | | .BLANK 0000[0x4] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c4 | | .CONST 0x00c4 ; Address of begin 00c1 00d8 | | .CONST 0x00d8 ; Address of exception handler 00c2 0002 | | .CONST 0x0002 ; Number of locals 00c3 INIT_00c0: 00c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00c3,0x05fc,0x0002,0x0000,0x0058,0xc115,0x0000,0x0167 ; Debug Table 0x4.0x0 = 0xc3,0xffff 00c4 BODY_00c0: 00c4 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x1 = 0xc4,0x1 00c5 490c |I | Short_Literal 0x10c 00c6 00eb | | Load_Encached Diana_Cache 00c7 0096 | | Execute Package,Entry 00c8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00c9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x2 = 0xc9,0x2 ; Debug Table 0x4.0x3 = 0xc9,0x401 00ca 021d | | Execute Heap_Access,Is_Null 00cb 6807 |h | Jump_Zero 0xd3 ; Debug Table 0x4.0x4 = 0xcb,0x2 00cc 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x5 = 0xcc,0x3 00cd 4800 |H | Short_Literal 0x0 00ce e5ff | | Load 0x2,-0x1 00cf 00eb | | Load_Encached Diana_Cache 00d0 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9 00d1 8225 | % | Call 0x1,0x25 00d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00d3 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x6 = 0xd3,0x4 00d4 4800 |H | Short_Literal 0x0 00d5 00da | | Load_Top At_Offset_2 00d6 8224 | $ | Call 0x1,0x24 00d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00d8 TRAP_00c0: 00d8 e20d | | Load 0x1,0xd 00d9 010f | | Execute Exception,Equal 00da 6802 |h | Jump_Zero 0xdd 00db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x7 = 0xdb,0x5 00dc 0101 | | Execute Exception,Reraise 00dd 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x8 = 0xdd,0x6 00de e001 | | Load 0x0,0x1 00df 180d | | Execute Package,Field_Execute,Field_Number 0xd 00e0 0092 044d | M| Action Push_String_Extended,0x44d ; "Get (2)" 00e2 8220 | | Call 0x1,0x20 00e3 8211 | | Call 0x1,0x11 ; Debug Table 0x4.0x9 = 0xe3,0x7 00e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e5 0000 0000 | | .XXX[0x3] 00e7 0000 | | 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00ed | | .CONST 0x00ed ; Address of begin 00e9 011b | | .CONST 0x011b ; Address of exception handler 00ea 0003 | | .CONST 0x0003 ; Number of locals 00eb INIT_00e8: 00eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x00eb,0x0612,0x0002,0x0000,0x0058,0xc115,0x0000,0x0172 ; Debug Table 0x5.0x0 = 0xeb,0xffff 00ec 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x1 = 0xec,0xfffe 00ed BODY_00e8: 00ed e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x2 = 0xed,0x1 00ee 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0xef,0x401 00f0 021d | | Execute Heap_Access,Is_Null 00f1 00d0 | | Action Swap_Control 00f2 00d1 | | Pop_Control Pop_Count_1 00f3 680b |h | Jump_Zero 0xff ; Debug Table 0x5.0x4 = 0xf3,0x1 00f4 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x5 = 0xf4,0x2 00f5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00f6 e002 | | Load 0x0,0x2 00f7 180d | | Execute Package,Field_Execute,Field_Number 0xd 00f8 e002 | | Load 0x0,0x2 00f9 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00fa 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00fb e003 | | Load 0x0,0x3 00fc 180e | | Execute Package,Field_Execute,Field_Number 0xe 00fd 0032 | 2 | Store_Top Heap_Access,At_Offset_2 00fe 781a |x | Jump 0x119 00ff 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x6 = 0xff,0x3 0100 e5ff | | Load 0x2,-0x1 0101 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0102 e004 | | Load 0x0,0x4 0103 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0104 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0105 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x7 = 0x105,0x4 0106 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0107 6811 |h | Jump_Zero 0x119 0108 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x8 = 0x108,0x5 0109 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 010a e004 | | Load 0x0,0x4 010b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 010c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 010d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x9 = 0x10d,0x6 010e 680a |h | Jump_Zero 0x119 010f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xa = 0x10f,0x7 0110 00e4 | | Load_Encached Positive_Cache 0111 025b | [ | Execute Discrete,Check_In_Type 0112 e5ff | | Load 0x2,-0x1 0113 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0114 00db | | Load_Top At_Offset_3 0115 e002 | | Load 0x0,0x2 0116 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0117 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0118 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0119 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xb = 0x119,0x8 011a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 011b TRAP_00e8: 011b 0007 | | Action Break_Optional 011c 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xc = 0x11c,0x9 011d e001 | | Load 0x0,0x1 011e 180d | | Execute Package,Field_Execute,Field_Number 0xd 011f 0092 044e | N| Action Push_String_Extended,0x44e ; "Get_Call" 0121 8220 | | Call 0x1,0x20 0122 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0xd = 0x122,0xa ; Debug Table 0x5.0xe = 0x122,0x801 0123 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0x5.0xf = 0x123,0xa 0124 0000 0000 | | .BLANK 0000[0x4] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x012b,0x0634,0x0002,0x0000,0x0058,0xc115,0x0000,0x017d ; Debug Table 0x6.0x0 = 0x12b,0x1 012c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 012d 0f02 | | Execute_Immediate Equal,0x2 012e 6807 |h | Jump_Zero 0x136 012f 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x1 = 0x12f,0x2 0130 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0131 00eb | | Load_Encached Diana_Cache 0132 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0133 00eb | | Load_Encached Diana_Cache 0134 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0135 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0136 e20d | | Load 0x1,0xd ; Debug Table 0x6.0x2 = 0x136,0x3 0137 0257 | W | Execute Discrete,Raise 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x013b,0x063c,0x0002,0x0000,0x0058,0xc115,0x0000,0x0186 ; Debug Table 0x7.0x0 = 0x13b,0x1 013c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 013d 4603 |F | Jump_Case 0x4 013e 7803 |x | Jump 0x142 ; case 0x0 013f 7802 |x | Jump 0x142 ; case 0x1 0140 7804 |x | Jump 0x145 ; case 0x2 0141 7803 |x | Jump 0x145 ; case 0x3 0142 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x1 = 0x142,0x2 0143 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0144 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0145 e20d | | Load 0x1,0xd ; Debug Table 0x7.0x2 = 0x145,0x3 0146 0257 | W | Execute Discrete,Raise 0147 0000 | | .XXX[0x1] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0154 | T | .CONST 0x0154 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x014b,0x0644,0x0002,0x0000,0x0058,0xc115,0x0000,0x018f ; Debug Table 0x8.0x0 = 0x14b,0x1 014c 8216 | | Call 0x1,0x16 014d 00d8 | | Load_Top At_Offset_0 014e 00e1 | | Load_Encached Boolean_Cache 014f 0260 | ` | Execute Discrete,In_Type 0150 7002 |p | Jump_Nonzero 0x153 0151 48e0 |H | Short_Literal 0xe0 0152 0257 | W | Execute Discrete,Raise 0153 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0154 TRAP_0148: 0154 010e | | Execute Exception,Is_Constraint_Error 0155 6802 |h | Jump_Zero 0x158 0156 e20d | | Load 0x1,0xd ; Debug Table 0x8.0x1 = 0x156,0x2 0157 0257 | W | Execute Discrete,Raise 0158 0100 | | Execute Exception,Raise 0159 0000 0000 | | .BLANK 0000[0x7] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 016c | l | .CONST 0x016c ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x0163,0x064a,0x0002,0x0000,0x0058,0xc115,0x0000,0x0198 ; Debug Table 0x9.0x0 = 0x163,0x1 0164 8216 | | Call 0x1,0x16 0165 00d8 | | Load_Top At_Offset_0 0166 00e8 | | Load_Encached Character_Cache 0167 0260 | ` | Execute Discrete,In_Type 0168 7002 |p | Jump_Nonzero 0x16b 0169 48e0 |H | Short_Literal 0xe0 016a 0257 | W | Execute Discrete,Raise 016b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 016c TRAP_0160: 016c 010e | | Execute Exception,Is_Constraint_Error 016d 6802 |h | Jump_Zero 0x170 016e e20d | | Load 0x1,0xd ; Debug Table 0x9.0x1 = 0x16e,0x2 016f 0257 | W | Execute Discrete,Raise 0170 0100 | | Execute Exception,Raise 0171 0000 0000 | | .BLANK 0000[0x7] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017d | } | .CONST 0x017d ; Address of begin 0179 0191 | | .CONST 0x0191 ; Address of exception handler 017a 0002 | | .CONST 0x0002 ; Number of locals 017b INIT_0178: 017b e20e | | Load 0x1,0xe ; Debug Table 0xa = .DEBUG 0x017b,0x0650,0x0002,0x0000,0x0058,0xc115,0x0000,0x01af ; Debug Table 0xa.0x0 = 0x17b,0xffff 017c 0322 | " | Declare_Variable Record 017d BODY_0178: 017d e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x1 = 0x17d,0x1 017e e5ff | | Load 0x2,-0x1 017f 01dc | | Execute Vector,Last 0180 027d | } | Execute Discrete,Greater 0181 6802 |h | Jump_Zero 0x184 0182 e219 | | Load 0x1,0x19 ; Debug Table 0xa.0x2 = 0x182,0x2 0183 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0184 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x3 = 0x184,0x3 0185 e5fe | | Load 0x2,-0x2 0186 e5ff | | Load 0x2,-0x1 0187 8226 | & | Call 0x1,0x26 0188 00d9 | | Load_Top At_Offset_1 0189 017d | } | Execute Record,Structure_Write 018a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x4 = 0x18a,0x4 018b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 018c 00eb | | Load_Encached Diana_Cache 018d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 018e 00eb | | Load_Encached Diana_Cache 018f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0190 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0191 TRAP_0178: 0191 e20d | | Load 0x1,0xd 0192 010f | | Execute Exception,Equal 0193 6802 |h | Jump_Zero 0x196 0194 e219 | | Load 0x1,0x19 ; Debug Table 0xa.0x5 = 0x194,0x5 0195 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0196 0100 | | Execute Exception,Raise 0197 0000 | | .XXX[0x1] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019d | | .CONST 0x019d ; Address of begin 0199 01ad | | .CONST 0x01ad ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b e20e | | Load 0x1,0xe ; Debug Table 0xb = .DEBUG 0x019b,0x065e,0x0002,0x0000,0x0058,0xc115,0x0000,0x01bc ; Debug Table 0xb.0x0 = 0x19b,0xffff 019c 0322 | " | Declare_Variable Record 019d BODY_0198: 019d e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x1 = 0x19d,0x1 019e e5ff | | Load 0x2,-0x1 019f 01dc | | Execute Vector,Last 01a0 027d | } | Execute Discrete,Greater 01a1 6802 |h | Jump_Zero 0x1a4 01a2 6119 |a | Indirect_Literal Discrete,0x2bc,{0xffffffff, 0x80000001} ; Debug Table 0xb.0x2 = 0x1a2,0x2 01a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01a4 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x3 = 0x1a4,0x3 01a5 e5fe | | Load 0x2,-0x2 01a6 e5ff | | Load 0x2,-0x1 01a7 8226 | & | Call 0x1,0x26 01a8 00d9 | | Load_Top At_Offset_1 01a9 017d | } | Execute Record,Structure_Write 01aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x1aa,0x4 01ab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01ad TRAP_0198: 01ad e20d | | Load 0x1,0xd 01ae 010f | | Execute Exception,Equal 01af 6802 |h | Jump_Zero 0x1b2 01b0 610b |a | Indirect_Literal Discrete,0x2bc,{0xffffffff, 0x80000001} ; Debug Table 0xb.0x5 = 0x1b0,0x5 01b1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01b2 0100 | | Execute Exception,Raise 01b3 0000 0000 | | .BLANK 0000[0x5] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 4603 |F | Jump_Case 0x4 ; Debug Table 0xc = .DEBUG 0x01bb,0x066c,0x0005,0x0000,0x0058,0xc115,0x0000,0x01ca 01bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01bd 7802 |x | Jump 0x1c0 ; case 0x1 01be 7805 |x | Jump 0x1c4 ; case 0x2 01bf 7809 |x | Jump 0x1c9 ; case 0x3 01c0 00da | | Load_Top At_Offset_2 01c1 0091 0447 | G| Action Push_String_Extended_Indexed,0x447 ; "ENUMERATED" 01c3 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01c4 00db | | Load_Top At_Offset_3 01c5 00db | | Load_Top At_Offset_3 01c6 00e0 | | Load_Encached Standard_Cache 01c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01c8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01c9 00da | | Load_Top At_Offset_2 01ca 00e0 | | Load_Encached Standard_Cache 01cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01cc 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01cd 0000 0000 | | .XXX[0x3] 01cf 0000 | | 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 e005 | | Load 0x0,0x5 ; Debug Table 0xd = .DEBUG 0x01d3,0x066e,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0035 ; Debug Table 0xd.0x0 = 0x1d3,0x1 01d4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01d5 0092 044f | O| Action Push_String_Extended,0x44f ; "*** Bad status from Directory." ; Debug Table 0xd.0x1 = 0x1d5,0x2 01d7 00db | | Load_Top At_Offset_3 01d8 01cc | | Execute Vector,Catenate 01d9 e5fe | | Load 0x2,-0x2 01da e006 | | Load 0x0,0x6 01db 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01dc 025e | ^ | Execute Discrete,Convert 01dd 1c01 | | Execute_Immediate Run_Utility,0x1 01de 01cc | | Execute Vector,Catenate 01df e005 | | Load 0x0,0x5 01e0 180f | | Execute Package,Field_Execute,Field_Number 0xf 01e1 60d6 |` | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x598b7502} ; Debug Table 0xd.0x2 = 0x1e1,0x3 01e2 0257 | W | Execute Discrete,Raise 01e3 0000 0000 | | .BLANK 0000[0x5] 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 e005 | | Load 0x0,0x5 ; Debug Table 0xe = .DEBUG 0x01eb,0x0676,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0062 ; Debug Table 0xe.0x0 = 0x1eb,0x1 01ec 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01ed 0092 0450 | P| Action Push_String_Extended,0x450 ; "*** Exception in Command.Parameters." ; Debug Table 0xe.0x1 = 0x1ed,0x2 01ef 00db | | Load_Top At_Offset_3 01f0 01cc | | Execute Vector,Catenate 01f1 0092 0451 | Q| Action Push_String_Extended,0x451 ; ": " 01f3 01cc | | Execute Vector,Catenate 01f4 e5fe | | Load 0x2,-0x2 01f5 01cc | | Execute Vector,Catenate 01f6 e005 | | Load 0x0,0x5 01f7 180f | | Execute Package,Field_Execute,Field_Number 0xf 01f8 60bb |` | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x598b7501} ; Debug Table 0xe.0x2 = 0x1f8,0x3 01f9 0257 | W | Execute Discrete,Raise 01fa 0000 0000 | | .BLANK 0000[0x6] 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 0207 | | .CONST 0x0207 ; Address of begin 0201 029f | | .CONST 0x029f ; Address of exception handler 0202 0003 | | .CONST 0x0003 ; Number of locals 0203 INIT_0200: 0203 029f 03fb | | Declare_Subprogram INIT_03f8,For_Call ; Debug Table 0xf = .DEBUG 0x0203,0x067e,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0090 ; Debug Table 0xf.0x0 = 0x203,0xffff 0205 029f 042b | +| Declare_Subprogram INIT_0428,For_Call 0207 BODY_0200: 0207 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1 = 0x207,0x1 ; Debug Table 0xf.0x2 = 0x207,0x401 0208 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0x3 = 0x208,0x402 0209 0b12 | | Execute_Immediate Case_Compare,0x12 ; Debug Table 0xf.0x4 = 0x209,0x403 ; Debug Table 0xf.0x5 = 0x209,0x404 ; Debug Table 0xf.0x6 = 0x209,0x1 020a 7010 |p | Jump_Nonzero 0x21b 020b 0b17 | | Execute_Immediate Case_Compare,0x17 020c 7013 |p | Jump_Nonzero 0x220 020d 0b16 | | Execute_Immediate Case_Compare,0x16 020e 7014 |p | Jump_Nonzero 0x223 020f 0b08 | | Execute_Immediate Case_Compare,0x8 0210 7047 |pG | Jump_Nonzero 0x258 0211 0b0b | | Execute_Immediate Case_Compare,0xb 0212 7047 |pG | Jump_Nonzero 0x25a 0213 0b0c | | Execute_Immediate Case_Compare,0xc 0214 7051 |pQ | Jump_Nonzero 0x266 0215 0b10 | | Execute_Immediate Case_Compare,0x10 0216 7066 |pf | Jump_Nonzero 0x27d 0217 0ba9 | | Execute_Immediate Case_Compare,0xa9 0218 707e |p~ | Jump_Nonzero 0x297 0219 e20d | | Load 0x1,0xd ; Debug Table 0xf.0x7 = 0x219,0xa 021a 0257 | W | Execute Discrete,Raise 021b e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x8 = 0x21b,0x2 021c 00eb | | Load_Encached Diana_Cache 021d 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0 021e 8221 | ! | Call 0x1,0x21 021f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0220 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x9 = 0x220,0x3 0221 8402 | | Call 0x2,0x2 0222 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0223 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0xa = 0x223,0x4 0224 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0xb = 0x224,0xf7ff 0225 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0xc = 0x225,0x801 0226 00eb | | Load_Encached Diana_Cache 0227 18fa | | Execute Package,Field_Execute,Field_Number 0xfa 0228 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0229 e406 | | Load 0x2,0x6 ; Debug Table 0xf.0xd = 0x229,0x802 ; Debug Table 0xf.0xe = 0x229,0xc01 022a 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0xf = 0x22a,0xc02 022b 0b1d | | Execute_Immediate Case_Compare,0x1d ; Debug Table 0xf.0x10 = 0x22b,0xc03 ; Debug Table 0xf.0x11 = 0x22b,0xc04 ; Debug Table 0xf.0x12 = 0x22b,0x802 022c 7006 |p | Jump_Nonzero 0x233 022d 0b31 | 1 | Execute_Immediate Case_Compare,0x31 022e 700a |p | Jump_Nonzero 0x239 022f 0b00 | | Execute_Immediate Case_Compare,0x0 0230 7024 |p$ | Jump_Nonzero 0x255 0231 e20d | | Load 0x1,0xd ; Debug Table 0xf.0x13 = 0x231,0x806 0232 0257 | W | Execute Discrete,Raise 0233 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x14 = 0x233,0x803 0234 4901 |I | Short_Literal 0x101 0235 00eb | | Load_Encached Diana_Cache 0236 0096 | | Execute Package,Entry 0237 8221 | ! | Call 0x1,0x21 0238 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0239 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0x15 = 0x239,0x804 023a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x16 = 0x23a,0xefff 023b 00db | | Load_Top At_Offset_3 023c 00eb | | Load_Encached Diana_Cache 023d 18ec | | Execute Package,Field_Execute,Field_Number 0xec 023e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 023f 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xf.0x17 = 0x23f,0xeffe 0240 00d9 | | Load_Top At_Offset_1 0241 00eb | | Load_Encached Diana_Cache 0242 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0243 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0244 e20e | | Load 0x1,0xe ; Debug Table 0xf.0x18 = 0x244,0x1001 0245 0322 | " | Declare_Variable Record 0246 4800 |H | Short_Literal 0x0 0247 00d9 | | Load_Top At_Offset_1 0248 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0249 00d9 | | Load_Top At_Offset_1 024a e406 | | Load 0x2,0x6 024b 4975 |Iu | Short_Literal 0x175 024c 00eb | | Load_Encached Diana_Cache 024d 0098 | | Execute Package,Field_Read_Dynamic 024e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 024f 00d9 | | Load_Top At_Offset_1 0250 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0251 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x19 = 0x251,0x1401 0252 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x1a = 0x252,0x1001 0253 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0254 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0255 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1b = 0x255,0x805 0256 8402 | | Call 0x2,0x2 0257 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0258 8403 | | Call 0x2,0x3 ; Debug Table 0xf.0x1c = 0x258,0x5 0259 7842 |xB | Jump 0x29c 025a e20e | | Load 0x1,0xe ; Debug Table 0xf.0x1d = 0x25a,0x6 025b 0322 | " | Declare_Variable Record 025c 4802 |H | Short_Literal 0x2 025d 00d9 | | Load_Top At_Offset_1 025e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 025f 4800 |H | Short_Literal 0x0 0260 00d9 | | Load_Top At_Offset_1 0261 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0262 e5ff | | Load 0x2,-0x1 0263 00d9 | | Load_Top At_Offset_1 0264 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0265 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0266 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0x1e = 0x266,0x7 0267 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1f = 0x267,0xe7ff 0268 00eb | | Load_Encached Diana_Cache 0269 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 026a 00eb | | Load_Encached Diana_Cache 026b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 026c e20e | | Load 0x1,0xe ; Debug Table 0xf.0x20 = 0x26c,0x1801 026d 0322 | " | Declare_Variable Record 026e 4800 |H | Short_Literal 0x0 026f 00d9 | | Load_Top At_Offset_1 0270 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0271 00d9 | | Load_Top At_Offset_1 0272 01dd | | Execute Vector,First 0273 0a01 | | Execute_Immediate Plus,0x1 0274 0248 | H | Execute Discrete,Check_In_Integer 0275 00da | | Load_Top At_Offset_2 0276 01d7 | | Execute Vector,Field_Read 0277 00d9 | | Load_Top At_Offset_1 0278 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0279 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x21 = 0x279,0x1c01 027a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x22 = 0x27a,0x1801 027b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 027c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 027d 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0x23 = 0x27d,0x8 027e 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xf.0x24 = 0x27e,0xdfff 027f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x25 = 0x27f,0xdffe 0280 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x26 = 0x280,0x2001 0281 00e2 | | Load_Encached Integer_Cache 0282 e5ff | | Load 0x2,-0x1 0283 e004 | | Load 0x0,0x4 0284 180e | | Execute Package,Field_Execute,Field_Number 0xe 0285 005b | [ | Store_Top Discrete,At_Offset_3 0286 0059 | Y | Store_Top Discrete,At_Offset_1 0287 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x27 = 0x287,0x2002 0288 680c |h | Jump_Zero 0x295 0289 e20e | | Load 0x1,0xe ; Debug Table 0xf.0x28 = 0x289,0x2003 028a 0322 | " | Declare_Variable Record 028b 4801 |H | Short_Literal 0x1 028c 00d9 | | Load_Top At_Offset_1 028d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 028e 00da | | Load_Top At_Offset_2 028f 00d9 | | Load_Top At_Offset_1 0290 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0291 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x29 = 0x291,0x2401 0292 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x2a = 0x292,0x2003 0293 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0294 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0295 e20d | | Load 0x1,0xd ; Debug Table 0xf.0x2b = 0x295,0x2004 0296 0257 | W | Execute Discrete,Raise 0297 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x2c = 0x297,0x9 0298 00eb | | Load_Encached Diana_Cache 0299 18b2 | | Execute Package,Field_Execute,Field_Number 0xb2 029a 8221 | ! | Call 0x1,0x21 029b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 029c 00d1 | | Pop_Control Pop_Count_1 029d 4831 |H1 | Short_Literal 0x31 029e 0257 | W | Execute Discrete,Raise 029f TRAP_0200: 029f e20d | | Load 0x1,0xd 02a0 010f | | Execute Exception,Equal 02a1 6802 |h | Jump_Zero 0x2a4 02a2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2d = 0x2a2,0xb 02a3 0101 | | Execute Exception,Reraise 02a4 600f |` | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x598b7501} 02a5 010f | | Execute Exception,Equal 02a6 6802 |h | Jump_Zero 0x2a9 02a7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2e = 0x2a7,0xc 02a8 0101 | | Execute Exception,Reraise 02a9 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x2f = 0x2a9,0xd 02aa e001 | | Load 0x0,0x1 02ab 180d | | Execute Package,Field_Execute,Field_Number 0xd 02ac 0092 0452 | R| Action Push_String_Extended,0x452 ; "Parameter_Of" 02ae 8220 | | Call 0x1,0x20 02af 4831 |H1 | Short_Literal 0x31 02b0 0257 | W | Execute Discrete,Raise 02b1 0000 0000 | | .XXX[0x3] 02b3 0000 | | 02b4 0000 0000 | | .LITERAL {0x00000000, 0x598b7501} 02b8 0000 0000 | | .LITERAL {0x00000000, 0x598b7502} 02bc ffff ffff | | .LITERAL {0xffffffff, 0x80000001} 02c0 0000 0000 | | .LITERAL {0x00000000, 0x58c11501} 02c4 0000 0000 | | .BLANK 0000[0x4] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x02cb,0x06e0,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0286 ; Debug Table 0x10.0x0 = 0x2cb,0x1 02cc 0d00 | | Execute_Immediate Less,0x0 02cd 6802 |h | Jump_Zero 0x2d0 02ce 4fff |O | Short_Literal -0x1 ; Debug Table 0x10.0x1 = 0x2ce,0x2 02cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d0 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x2 = 0x2d0,0x3 02d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d2 0000 0000 | | .BLANK 0000[0x6] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 02f9 | | .CONST 0x02f9 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 00db | | Load_Top At_Offset_3 ; Debug Table 0x11 = .DEBUG 0x02db,0x06e8,0x0001,0x0000,0x0059,0x8b75,0x0000,0x02a4 ; Debug Table 0x11.0x0 = 0x2db,0x1 02dc 681b |h | Jump_Zero 0x2f8 02dd 00cf | | Action Mark_Auxiliary 02de e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0x1 = 0x2de,0x2 02df 01d9 | | Execute Vector,Reverse_Bounds 02e0 0263 | c | Execute Discrete,Above_Bound 02e1 7015 |p | Jump_Nonzero 0x2f7 02e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x2e2,0x3 02e3 e5fd | | Load 0x2,-0x3 02e4 01d5 | | Execute Vector,Field_Reference 02e5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02e6 0f01 | | Execute_Immediate Equal,0x1 02e7 680d |h | Jump_Zero 0x2f5 02e8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x2e8,0x4 02e9 e5fd | | Load 0x2,-0x3 02ea 01d5 | | Execute Vector,Field_Reference 02eb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ec 8222 | " | Call 0x1,0x22 02ed e5ff | | Load 0x2,-0x1 02ee 0271 | q | Execute Discrete,Times 02ef 00d9 | | Load_Top At_Offset_1 02f0 e5fd | | Load 0x2,-0x3 02f1 01d5 | | Execute Vector,Field_Reference 02f2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02f3 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x11.0x4 = 0x2f3,0x5 02f4 7802 |x | Jump 0x2f7 02f5 00c8 | | Action Pop_Auxiliary_Range 02f6 3feb |? | Loop_Increasing 0x2e2 02f7 00ce | | Action Pop_Auxiliary 02f8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02f9 TRAP_02d8: 02f9 e20d | | Load 0x1,0xd 02fa 010f | | Execute Exception,Equal 02fb 6802 |h | Jump_Zero 0x2fe 02fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x5 = 0x2fc,0x6 02fd 0101 | | Execute Exception,Reraise 02fe 67b5 |g | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x598b7501} 02ff 010f | | Execute Exception,Equal 0300 6802 |h | Jump_Zero 0x303 0301 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x6 = 0x301,0x7 0302 0101 | | Execute Exception,Reraise 0303 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x7 = 0x303,0x8 0304 e001 | | Load 0x0,0x1 0305 180d | | Execute Package,Field_Execute,Field_Number 0xd 0306 0092 0453 | S| Action Push_String_Extended,0x453 ; "Adjust_Argument" 0308 8220 | | Call 0x1,0x20 0309 4503 |E | Exit_Suprogram New_Top_Offset 0x3 030a 0000 0000 | | .BLANK 0000[0x6] 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0320 | | .CONST 0x0320 ; Address of begin 0311 0345 | E | .CONST 0x0345 ; Address of exception handler 0312 0003 | | .CONST 0x0003 ; Number of locals 0313 INIT_0310: 0313 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x12 = .DEBUG 0x0313,0x06fa,0x0002,0x0000,0x0059,0x8b75,0x0000,0x02fe ; Debug Table 0x12.0x0 = 0x313,0xffff 0314 00db | | Load_Top At_Offset_3 0315 00eb | | Load_Encached Diana_Cache 0316 18ed | | Execute Package,Field_Execute,Field_Number 0xed 0317 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0318 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x318,0xfffe 0319 00d9 | | Load_Top At_Offset_1 031a 4975 |Iu | Short_Literal 0x175 031b 00eb | | Load_Encached Diana_Cache 031c 0098 | | Execute Package,Field_Read_Dynamic 031d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 031e e210 | | Load 0x1,0x10 031f 0334 | 4 | Declare_Variable Array,With_Constraint 0320 BODY_0310: 0320 00cf | | Action Mark_Auxiliary 0321 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0x2 = 0x321,0x1 0322 01d9 | | Execute Vector,Reverse_Bounds 0323 0263 | c | Execute Discrete,Above_Bound 0324 7018 |p | Jump_Nonzero 0x33d 0325 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0x3 = 0x325,0x2 0326 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x4 = 0x326,0x401 0327 0217 | | Execute Heap_Access,All_Reference 0328 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0329 00d9 | | Load_Top At_Offset_1 032a e409 | | Load 0x2,0x9 ; Debug Table 0x12.0x5 = 0x32a,0x801 032b 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x12.0x6 = 0x32b,0x802 032c 00d0 | | Action Swap_Control ; Debug Table 0x12.0x7 = 0x32c,0x803 ; Debug Table 0x12.0x8 = 0x32c,0x804 032d 00d1 | | Pop_Control Pop_Count_1 032e 49af |I | Short_Literal 0x1af ; Debug Table 0x12.0x9 = 0x32e,0x401 032f 00eb | | Load_Encached Diana_Cache 0330 0096 | | Execute Package,Entry 0331 00d0 | | Action Swap_Control 0332 00d1 | | Pop_Control Pop_Count_1 0333 8221 | ! | Call 0x1,0x21 ; Debug Table 0x12.0xa = 0x333,0x2 0334 00d9 | | Load_Top At_Offset_1 0335 e403 | | Load 0x2,0x3 0336 01d6 | | Execute Vector,Field_Write 0337 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0xb = 0x337,0x3 ; Debug Table 0x12.0xc = 0x337,0xc01 0338 0217 | | Execute Heap_Access,All_Reference 0339 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 033a a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x12.0xd = 0x33a,0x3 033b 00c8 | | Action Pop_Auxiliary_Range 033c 3fe8 |? | Loop_Increasing 0x325 033d 00ce | | Action Pop_Auxiliary 033e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xe = 0x33e,0x4 033f e5fd | | Load 0x2,-0x3 0340 e5fe | | Load 0x2,-0x2 0341 8223 | # | Call 0x1,0x23 0342 00d1 | | Pop_Control Pop_Count_1 0343 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xf = 0x343,0x5 0344 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0345 TRAP_0310: 0345 e20d | | Load 0x1,0xd 0346 010f | | Execute Exception,Equal 0347 6802 |h | Jump_Zero 0x34a 0348 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x10 = 0x348,0x6 0349 0101 | | Execute Exception,Reraise 034a 6769 |gi | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x598b7501} 034b 010f | | Execute Exception,Equal 034c 6802 |h | Jump_Zero 0x34f 034d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x11 = 0x34d,0x7 034e 0101 | | Execute Exception,Reraise 034f 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x12 = 0x34f,0x8 0350 e001 | | Load 0x0,0x1 0351 180d | | Execute Package,Field_Execute,Field_Number 0xd 0352 0092 0454 | T| Action Push_String_Extended,0x454 ; "List_From_Normalized" 0354 8220 | | Call 0x1,0x20 0355 4831 |H1 | Short_Literal 0x31 0356 0257 | W | Execute Discrete,Raise 0357 0000 | | .XXX[0x1] 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 0368 | h | .CONST 0x0368 ; Address of begin 0359 03b0 | | .CONST 0x03b0 ; Address of exception handler 035a 0003 | | .CONST 0x0003 ; Number of locals 035b INIT_0358: 035b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13 = .DEBUG 0x035b,0x0722,0x0002,0x0000,0x0059,0x8b75,0x0000,0x036a ; Debug Table 0x13.0x0 = 0x35b,0xffff 035c 00db | | Load_Top At_Offset_3 035d 00eb | | Load_Encached Diana_Cache 035e 1889 | | Execute Package,Field_Execute,Field_Number 0x89 035f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0360 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x1 = 0x360,0xfffe 0361 00d9 | | Load_Top At_Offset_1 0362 4975 |Iu | Short_Literal 0x175 0363 00eb | | Load_Encached Diana_Cache 0364 0098 | | Execute Package,Field_Read_Dynamic 0365 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0366 e210 | | Load 0x1,0x10 0367 0334 | 4 | Declare_Variable Array,With_Constraint 0368 BODY_0358: 0368 00cf | | Action Mark_Auxiliary 0369 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x2 = 0x369,0x1 036a 01d9 | | Execute Vector,Reverse_Bounds 036b 0263 | c | Execute Discrete,Above_Bound 036c 703b |p; | Jump_Nonzero 0x3a8 036d e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x3 = 0x36d,0x2 036e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x4 = 0x36e,0x401 036f 7002 |p | Jump_Nonzero 0x372 0370 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13.0x5 = 0x370,0x402 0371 7826 |x& | Jump 0x398 0372 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x6 = 0x372,0x403 0373 0217 | | Execute Heap_Access,All_Reference 0374 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0375 6804 |h | Jump_Zero 0x37a 0376 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x7 = 0x376,0x404 0377 0217 | | Execute Heap_Access,All_Reference 0378 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0379 781e |x | Jump 0x398 037a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x8 = 0x37a,0x405 037b e408 | | Load 0x2,0x8 ; Debug Table 0x13.0x9 = 0x37b,0x801 037c 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x13.0xa = 0x37c,0x802 037d 00d0 | | Action Swap_Control ; Debug Table 0x13.0xb = 0x37d,0x803 ; Debug Table 0x13.0xc = 0x37d,0x804 037e 00d1 | | Pop_Control Pop_Count_1 037f 49bb |I | Short_Literal 0x1bb ; Debug Table 0x13.0xd = 0x37f,0x405 0380 00eb | | Load_Encached Diana_Cache 0381 0098 | | Execute Package,Field_Read_Dynamic 0382 012c | , | Execute Any,Size 0383 e007 | | Load 0x0,0x7 0384 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0385 025b | [ | Execute Discrete,Check_In_Type 0386 0273 | s | Execute Discrete,Plus 0387 00d9 | | Load_Top At_Offset_1 0388 e409 | | Load 0x2,0x9 ; Debug Table 0x13.0xe = 0x388,0xc01 0389 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x13.0xf = 0x389,0xc02 038a 00d0 | | Action Swap_Control ; Debug Table 0x13.0x10 = 0x38a,0xc03 ; Debug Table 0x13.0x11 = 0x38a,0xc04 038b 00d1 | | Pop_Control Pop_Count_1 038c 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x13.0x12 = 0x38c,0x804 038d 00eb | | Load_Encached Diana_Cache 038e 0098 | | Execute Package,Field_Read_Dynamic 038f 49c9 |I | Short_Literal 0x1c9 0390 00eb | | Load_Encached Diana_Cache 0391 0098 | | Execute Package,Field_Read_Dynamic 0392 49ca |I | Short_Literal 0x1ca 0393 00eb | | Load_Encached Diana_Cache 0394 0095 | | Execute Package,Field_Reference_Dynamic 0395 e008 | | Load 0x0,0x8 0396 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0397 7800 |x | Jump 0x398 0398 00d0 | | Action Swap_Control 0399 00d1 | | Pop_Control Pop_Count_1 039a 8221 | ! | Call 0x1,0x21 ; Debug Table 0x13.0x13 = 0x39a,0x2 039b 00d9 | | Load_Top At_Offset_1 039c e403 | | Load 0x2,0x3 039d 01d6 | | Execute Vector,Field_Write 039e e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x14 = 0x39e,0x3 ; Debug Table 0x13.0x15 = 0x39e,0x1001 039f 7002 |p | Jump_Nonzero 0x3a2 03a0 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13.0x16 = 0x3a0,0x1002 03a1 7803 |x | Jump 0x3a5 03a2 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x17 = 0x3a2,0x1003 03a3 0217 | | Execute Heap_Access,All_Reference 03a4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03a5 a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x13.0x18 = 0x3a5,0x3 03a6 00c8 | | Action Pop_Auxiliary_Range 03a7 3fc5 |? | Loop_Increasing 0x36d 03a8 00ce | | Action Pop_Auxiliary 03a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x19 = 0x3a9,0x4 03aa e5fd | | Load 0x2,-0x3 03ab e5fe | | Load 0x2,-0x2 03ac 8223 | # | Call 0x1,0x23 03ad 00d1 | | Pop_Control Pop_Count_1 03ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1a = 0x3ae,0x5 03af 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03b0 TRAP_0358: 03b0 e20d | | Load 0x1,0xd 03b1 010f | | Execute Exception,Equal 03b2 6802 |h | Jump_Zero 0x3b5 03b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1b = 0x3b3,0x6 03b4 0101 | | Execute Exception,Reraise 03b5 66fe |f | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x598b7501} 03b6 010f | | Execute Exception,Equal 03b7 6802 |h | Jump_Zero 0x3ba 03b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1c = 0x3b8,0x7 03b9 0101 | | Execute Exception,Reraise 03ba 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x1d = 0x3ba,0x8 03bb e001 | | Load 0x0,0x1 03bc 180d | | Execute Package,Field_Execute,Field_Number 0xd 03bd 0092 0455 | U| Action Push_String_Extended,0x455 ; "List_From_Call" 03bf 8220 | | Call 0x1,0x20 03c0 4831 |H1 | Short_Literal 0x31 03c1 0257 | W | Execute Discrete,Raise 03c2 0000 0000 | | .BLANK 0000[0x6] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03ce | | .CONST 0x03ce ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0004 | | .CONST 0x0004 ; Number of locals 03cb INIT_03c8: 03cb 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x14 = .DEBUG 0x03cb,0x0760,0x0002,0x0000,0x0059,0x8b75,0x0000,0x03d6 ; Debug Table 0x14.0x0 = 0x3cb,0xffff 03cc 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x14.0x1 = 0x3cc,0xfffe 03cd 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x2 = 0x3cd,0xfffd 03ce BODY_03c8: 03ce 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x3 = 0x3ce,0x1 03cf 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 03d0 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x4 = 0x3d0,0x2 03d1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 03d2 00cf | | Action Mark_Auxiliary 03d3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x14.0x5 = 0x3d3,0x3 03d4 01d9 | | Execute Vector,Reverse_Bounds 03d5 0263 | c | Execute Discrete,Above_Bound 03d6 7017 |p | Jump_Nonzero 0x3ee 03d7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x14.0x6 = 0x3d7,0x4 03d8 00d9 | | Load_Top At_Offset_1 03d9 e5ff | | Load 0x2,-0x1 03da 01d5 | | Execute Vector,Field_Reference 03db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03dc 0f02 | | Execute_Immediate Equal,0x2 03dd 027f | | Execute Discrete,Equal 03de 680d |h | Jump_Zero 0x3ec 03df e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x7 = 0x3df,0x5 03e0 0a01 | | Execute_Immediate Plus,0x1 03e1 c402 | | Store 0x2,0x2 03e2 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x8 = 0x3e2,0x6 03e3 e5fe | | Load 0x2,-0x2 03e4 027f | | Execute Discrete,Equal 03e5 6806 |h | Jump_Zero 0x3ec 03e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x9 = 0x3e6,0x7 03e7 a403 | | Store_Unchecked 0x2,0x3 03e8 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0xa = 0x3e8,0x8 03e9 a404 | | Store_Unchecked 0x2,0x4 03ea 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x14.0xb = 0x3ea,0x9 03eb 7802 |x | Jump 0x3ee 03ec 00c8 | | Action Pop_Auxiliary_Range 03ed 3fe9 |? | Loop_Increasing 0x3d7 03ee 00ce | | Action Pop_Auxiliary 03ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0xc = 0x3ef,0xa 03f0 6804 |h | Jump_Zero 0x3f5 03f1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0xd = 0x3f1,0xb 03f2 e5ff | | Load 0x2,-0x1 03f3 01d5 | | Execute Vector,Field_Reference 03f4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03f5 e20d | | Load 0x1,0xd ; Debug Table 0x14.0xe = 0x3f5,0xc 03f6 0257 | W | Execute Discrete,Raise 03f7 0000 | | .XXX[0x1] 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 0400 | | .CONST 0x0400 ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0002 | | .CONST 0x0002 ; Number of locals 03fb INIT_03f8: 03fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x15 = .DEBUG 0x03fb,0x0780,0x0002,0x0000,0x0059,0x8b75,0x0000,0x009a ; Debug Table 0x15.0x0 = 0x3fb,0xffff 03fc 00eb | | Load_Encached Diana_Cache 03fd 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 03fe 00eb | | Load_Encached Diana_Cache 03ff 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0400 BODY_03f8: 0400 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x1 = 0x400,0x1 0401 0092 0456 | V| Action Push_String_Extended,0x456 ; "TRUE" 0403 01df | | Execute Vector,Equal 0404 680c |h | Jump_Zero 0x411 0405 e20e | | Load 0x1,0xe ; Debug Table 0x15.0x2 = 0x405,0x2 0406 0322 | " | Declare_Variable Record 0407 4800 |H | Short_Literal 0x0 0408 00d9 | | Load_Top At_Offset_1 0409 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 040a 4801 |H | Short_Literal 0x1 040b 00d9 | | Load_Top At_Offset_1 040c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 040d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x3 = 0x40d,0x401 040e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x4 = 0x40e,0x2 040f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0410 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0411 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x5 = 0x411,0x3 0412 0092 0457 | W| Action Push_String_Extended,0x457 ; "FALSE" 0414 01df | | Execute Vector,Equal 0415 680c |h | Jump_Zero 0x422 0416 e20e | | Load 0x1,0xe ; Debug Table 0x15.0x6 = 0x416,0x4 0417 0322 | " | Declare_Variable Record 0418 4800 |H | Short_Literal 0x0 0419 00d9 | | Load_Top At_Offset_1 041a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 041b 4800 |H | Short_Literal 0x0 041c 00d9 | | Load_Top At_Offset_1 041d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 041e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x7 = 0x41e,0x801 041f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x8 = 0x41f,0x4 0420 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0421 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0422 e20d | | Load 0x1,0xd ; Debug Table 0x15.0x9 = 0x422,0x5 0423 0257 | W | Execute Discrete,Raise 0424 0000 0000 | | .BLANK 0000[0x4] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042c | , | .CONST 0x042c ; Address of begin 0429 0442 | B | .CONST 0x0442 ; Address of exception handler 042a 0002 | | .CONST 0x0002 ; Number of locals 042b INIT_0428: 042b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x16 = .DEBUG 0x042b,0x0796,0x0004,0x0000,0x0059,0x8b75,0x0000,0x01cd ; Debug Table 0x16.0x0 = 0x42b,0xffff 042c BODY_0428: 042c e5ff | | Load 0x2,-0x1 ; Debug Table 0x16.0x1 = 0x42c,0x1 042d 00eb | | Load_Encached Diana_Cache 042e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 042f 00eb | | Load_Encached Diana_Cache 0430 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0431 00e2 | | Load_Encached Integer_Cache 0432 00e0 | | Load_Encached Standard_Cache 0433 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0434 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0435 e20e | | Load 0x1,0xe ; Debug Table 0x16.0x2 = 0x435,0x2 0436 0322 | " | Declare_Variable Record 0437 4801 |H | Short_Literal 0x1 0438 00d9 | | Load_Top At_Offset_1 0439 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 043a 00d9 | | Load_Top At_Offset_1 043b 00d9 | | Load_Top At_Offset_1 043c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 043d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16.0x3 = 0x43d,0x401 043e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x4 = 0x43e,0x2 043f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0440 00cb | | Action Pop_Block_With_Result 0441 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0442 TRAP_0428: 0442 010e | | Execute Exception,Is_Constraint_Error 0443 6802 |h | Jump_Zero 0x446 0444 e20d | | Load 0x1,0xd ; Debug Table 0x16.0x5 = 0x444,0x3 0445 0257 | W | Execute Discrete,Raise 0446 0100 | | Execute Exception,Raise 0447 ; -------------------------------------------------------------------------------------- 0447 ; STRING TABLE 0447 ; -------------------------------------------------------------------------------------- 0447 0024 | $ | .STRTAB 0x0024->0x0459 ; "ENUMERATED" 0448 002c | , | .STRTAB 0x002c->0x045e ; "NUMERIC" 0449 0031 | 1 | .STRTAB 0x0031->0x0461 ; "TEXT" 044a 0033 | 3 | .STRTAB 0x0033->0x0463 ; "UNKNOWN" 044b 0038 | 8 | .STRTAB 0x0038->0x0467 ; "##UNDEFINED##;" 044c 0044 | D | .STRTAB 0x0044->0x046e ; "Get (1)" 044d 0049 | I | .STRTAB 0x0049->0x0471 ; "Get (2)" 044e 004e | N | .STRTAB 0x004e->0x0475 ; "Get_Call" 044f 0054 | T | .STRTAB 0x0054->0x0479 ; "*** Bad status from Directory." 0450 0070 | p | .STRTAB 0x0070->0x0488 ; "*** Exception in Command.Parameters." 0451 0092 | | .STRTAB 0x0092->0x049a ; ": " 0452 0092 | | .STRTAB 0x0092->0x049b ; "Parameter_Of" 0453 009c | | .STRTAB 0x009c->0x04a1 ; "Adjust_Argument" 0454 00a9 | | .STRTAB 0x00a9->0x04a8 ; "List_From_Normalized" 0455 00bb | | .STRTAB 0x00bb->0x04b2 ; "List_From_Call" 0456 00c7 | | .STRTAB 0x00c7->0x04b9 ; "TRUE" 0457 00c9 | | .STRTAB 0x00c9->0x04bb ; "FALSE" 0458 00cc | | .STREND 0x00cc->0x04be 0459 454e 554d |ENUM| .STRTAB_STRINGS 04be 0000 0000 | | .XXX[0x2] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; Debug Table 04c0 ; -------------------------------------------------------------------------------------- 04c0 0003 0017 | | .CONST 0x0003,0x0017 04c2 000b 057a | z| .DEBUG 0x000b,0x057a,0x0000,0x0000,0x0058,0xc115,0x0000,0x0144 04ca 0048 05a6 | H | .DEBUG 0x0048,0x05a6,0x0000,0x0000,0x0059,0x8b75,0x0000,0x0010 04d2 0083 05da | | .DEBUG 0x0083,0x05da,0x0002,0x0000,0x0058,0xc115,0x0000,0x0159 04da 008b 05de | | .DEBUG 0x008b,0x05de,0x0002,0x0000,0x0058,0xc115,0x0000,0x015e 04e2 00c3 05fc | | .DEBUG 0x00c3,0x05fc,0x0002,0x0000,0x0058,0xc115,0x0000,0x0167 04ea 00eb 0612 | | .DEBUG 0x00eb,0x0612,0x0002,0x0000,0x0058,0xc115,0x0000,0x0172 04f2 012b 0634 | + 4| .DEBUG 0x012b,0x0634,0x0002,0x0000,0x0058,0xc115,0x0000,0x017d 04fa 013b 063c | ; <| .DEBUG 0x013b,0x063c,0x0002,0x0000,0x0058,0xc115,0x0000,0x0186 0502 014b 0644 | K D| .DEBUG 0x014b,0x0644,0x0002,0x0000,0x0058,0xc115,0x0000,0x018f 050a 0163 064a | c J| .DEBUG 0x0163,0x064a,0x0002,0x0000,0x0058,0xc115,0x0000,0x0198 0512 017b 0650 | { P| .DEBUG 0x017b,0x0650,0x0002,0x0000,0x0058,0xc115,0x0000,0x01af 051a 019b 065e | ^| .DEBUG 0x019b,0x065e,0x0002,0x0000,0x0058,0xc115,0x0000,0x01bc 0522 01bb 066c | l| .DEBUG 0x01bb,0x066c,0x0005,0x0000,0x0058,0xc115,0x0000,0x01ca 052a 01d3 066e | n| .DEBUG 0x01d3,0x066e,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0035 0532 01eb 0676 | v| .DEBUG 0x01eb,0x0676,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0062 053a 0203 067e | ~| .DEBUG 0x0203,0x067e,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0090 0542 02cb 06e0 | | .DEBUG 0x02cb,0x06e0,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0286 054a 02db 06e8 | | .DEBUG 0x02db,0x06e8,0x0001,0x0000,0x0059,0x8b75,0x0000,0x02a4 0552 0313 06fa | | .DEBUG 0x0313,0x06fa,0x0002,0x0000,0x0059,0x8b75,0x0000,0x02fe 055a 035b 0722 | [ "| .DEBUG 0x035b,0x0722,0x0002,0x0000,0x0059,0x8b75,0x0000,0x036a 0562 03cb 0760 | `| .DEBUG 0x03cb,0x0760,0x0002,0x0000,0x0059,0x8b75,0x0000,0x03d6 056a 03fb 0780 | | .DEBUG 0x03fb,0x0780,0x0002,0x0000,0x0059,0x8b75,0x0000,0x009a 0572 042b 0796 | + | .DEBUG 0x042b,0x0796,0x0004,0x0000,0x0059,0x8b75,0x0000,0x01cd 057a ; -------------------------------------------------------------------------------------- 057a ; Debug3 Subtable 0x0 057a ; -------------------------------------------------------------------------------------- 057a 0014 0001 | | .DBG3TAB 0x0014,0x0001 057c 000b ffff | | .CONST 0x000b,0xffff 057e 000d fffe | | .CONST 0x000d,0xfffe 0580 000f fffd | | .CONST 0x000f,0xfffd 0582 0010 fffc | | .CONST 0x0010,0xfffc 0584 0016 fffb | | .CONST 0x0016,0xfffb 0586 0018 fffa | | .CONST 0x0018,0xfffa 0588 001a fff9 | | .CONST 0x001a,0xfff9 058a 001c fff8 | | .CONST 0x001c,0xfff8 058c 001e fff7 | | .CONST 0x001e,0xfff7 058e 0020 fff6 | | .CONST 0x0020,0xfff6 0590 0022 fff5 | " | .CONST 0x0022,0xfff5 0592 0024 fff4 | $ | .CONST 0x0024,0xfff4 0594 0026 fff3 | & | .CONST 0x0026,0xfff3 0596 0029 fff2 | ) | .CONST 0x0029,0xfff2 0598 0029 fff1 | ) | .CONST 0x0029,0xfff1 059a 002b fff0 | + | .CONST 0x002b,0xfff0 059c 002d ffef | - | .CONST 0x002d,0xffef 059e 0032 ffee | 2 | .CONST 0x0032,0xffee 05a0 003a ffed | : | .CONST 0x003a,0xffed 05a2 0042 0401 | B | .CONST 0x0042,0x0401 05a4 0043 ffed | C | .CONST 0x0043,0xffed 05a6 ; -------------------------------------------------------------------------------------- 05a6 ; Debug3 Subtable 0x1 05a6 ; -------------------------------------------------------------------------------------- 05a6 0018 0001 | | .DBG3TAB 0x0018,0x0001 05a8 0048 ffff | H | .CONST 0x0048,0xffff 05aa 0048 fffe | H | .CONST 0x0048,0xfffe 05ac 0052 fffd | R | .CONST 0x0052,0xfffd 05ae 0053 0801 | S | .CONST 0x0053,0x0801 05b0 0054 fffd | T | .CONST 0x0054,0xfffd 05b2 0055 fffc | U | .CONST 0x0055,0xfffc 05b4 0055 fffb | U | .CONST 0x0055,0xfffb 05b6 0055 fffa | U | .CONST 0x0055,0xfffa 05b8 0057 fff9 | W | .CONST 0x0057,0xfff9 05ba 0059 fff8 | Y | .CONST 0x0059,0xfff8 05bc 005b fff7 | [ | .CONST 0x005b,0xfff7 05be 005d fff6 | ] | .CONST 0x005d,0xfff6 05c0 005f fff5 | _ | .CONST 0x005f,0xfff5 05c2 0061 fff4 | a | .CONST 0x0061,0xfff4 05c4 0063 fff3 | c | .CONST 0x0063,0xfff3 05c6 0065 fff2 | e | .CONST 0x0065,0xfff2 05c8 0067 fff1 | g | .CONST 0x0067,0xfff1 05ca 0069 fff0 | i | .CONST 0x0069,0xfff0 05cc 006b ffef | k | .CONST 0x006b,0xffef 05ce 006d ffee | m | .CONST 0x006d,0xffee 05d0 006f ffed | o | .CONST 0x006f,0xffed 05d2 0071 ffec | q | .CONST 0x0071,0xffec 05d4 0073 ffeb | s | .CONST 0x0073,0xffeb 05d6 0075 ffea | u | .CONST 0x0075,0xffea 05d8 0077 ffe9 | w | .CONST 0x0077,0xffe9 05da ; -------------------------------------------------------------------------------------- 05da ; Debug3 Subtable 0x2 05da ; -------------------------------------------------------------------------------------- 05da 0000 0001 | | .DBG3TAB 0x0000,0x0001 05dc 0083 0001 | | .CONST 0x0083,0x0001 05de ; -------------------------------------------------------------------------------------- 05de ; Debug3 Subtable 0x3 05de ; -------------------------------------------------------------------------------------- 05de 0001 000d | | .DBG3TAB 0x0001,0x000d 05e0 008b ffff | | .CONST 0x008b,0xffff 05e2 008c 0001 | | .CONST 0x008c,0x0001 05e4 008e 0401 | | .CONST 0x008e,0x0401 05e6 0092 0001 | | .CONST 0x0092,0x0001 05e8 0093 0002 | | .CONST 0x0093,0x0002 05ea 0095 0003 | | .CONST 0x0095,0x0003 05ec 009b 0004 | | .CONST 0x009b,0x0004 05ee 009b 0801 | | .CONST 0x009b,0x0801 05f0 009d 0004 | | .CONST 0x009d,0x0004 05f2 009e 0005 | | .CONST 0x009e,0x0005 05f4 00a8 0006 | | .CONST 0x00a8,0x0006 05f6 00b2 0007 | | .CONST 0x00b2,0x0007 05f8 00b4 0008 | | .CONST 0x00b4,0x0008 05fa 00ba 0009 | | .CONST 0x00ba,0x0009 05fc ; -------------------------------------------------------------------------------------- 05fc ; Debug3 Subtable 0x4 05fc ; -------------------------------------------------------------------------------------- 05fc 0001 0009 | | .DBG3TAB 0x0001,0x0009 05fe 00c3 ffff | | .CONST 0x00c3,0xffff 0600 00c4 0001 | | .CONST 0x00c4,0x0001 0602 00c9 0002 | | .CONST 0x00c9,0x0002 0604 00c9 0401 | | .CONST 0x00c9,0x0401 0606 00cb 0002 | | .CONST 0x00cb,0x0002 0608 00cc 0003 | | .CONST 0x00cc,0x0003 060a 00d3 0004 | | .CONST 0x00d3,0x0004 060c 00db 0005 | | .CONST 0x00db,0x0005 060e 00dd 0006 | | .CONST 0x00dd,0x0006 0610 00e3 0007 | | .CONST 0x00e3,0x0007 0612 ; -------------------------------------------------------------------------------------- 0612 ; Debug3 Subtable 0x5 0612 ; -------------------------------------------------------------------------------------- 0612 0002 000e | | .DBG3TAB 0x0002,0x000e 0614 00eb ffff | | .CONST 0x00eb,0xffff 0616 00ec fffe | | .CONST 0x00ec,0xfffe 0618 00ed 0001 | | .CONST 0x00ed,0x0001 061a 00ef 0401 | | .CONST 0x00ef,0x0401 061c 00f3 0001 | | .CONST 0x00f3,0x0001 061e 00f4 0002 | | .CONST 0x00f4,0x0002 0620 00ff 0003 | | .CONST 0x00ff,0x0003 0622 0105 0004 | | .CONST 0x0105,0x0004 0624 0108 0005 | | .CONST 0x0108,0x0005 0626 010d 0006 | | .CONST 0x010d,0x0006 0628 010f 0007 | | .CONST 0x010f,0x0007 062a 0119 0008 | | .CONST 0x0119,0x0008 062c 011c 0009 | | .CONST 0x011c,0x0009 062e 0122 000a | " | .CONST 0x0122,0x000a 0630 0122 0801 | " | .CONST 0x0122,0x0801 0632 0123 000a | # | .CONST 0x0123,0x000a 0634 ; -------------------------------------------------------------------------------------- 0634 ; Debug3 Subtable 0x6 0634 ; -------------------------------------------------------------------------------------- 0634 0000 0003 | | .DBG3TAB 0x0000,0x0003 0636 012b 0001 | + | .CONST 0x012b,0x0001 0638 012f 0002 | / | .CONST 0x012f,0x0002 063a 0136 0003 | 6 | .CONST 0x0136,0x0003 063c ; -------------------------------------------------------------------------------------- 063c ; Debug3 Subtable 0x7 063c ; -------------------------------------------------------------------------------------- 063c 0000 0003 | | .DBG3TAB 0x0000,0x0003 063e 013b 0001 | ; | .CONST 0x013b,0x0001 0640 0142 0002 | B | .CONST 0x0142,0x0002 0642 0145 0003 | E | .CONST 0x0145,0x0003 0644 ; -------------------------------------------------------------------------------------- 0644 ; Debug3 Subtable 0x8 0644 ; -------------------------------------------------------------------------------------- 0644 0000 0002 | | .DBG3TAB 0x0000,0x0002 0646 014b 0001 | K | .CONST 0x014b,0x0001 0648 0156 0002 | V | .CONST 0x0156,0x0002 064a ; -------------------------------------------------------------------------------------- 064a ; Debug3 Subtable 0x9 064a ; -------------------------------------------------------------------------------------- 064a 0000 0002 | | .DBG3TAB 0x0000,0x0002 064c 0163 0001 | c | .CONST 0x0163,0x0001 064e 016e 0002 | n | .CONST 0x016e,0x0002 0650 ; -------------------------------------------------------------------------------------- 0650 ; Debug3 Subtable 0xa 0650 ; -------------------------------------------------------------------------------------- 0650 0001 0005 | | .DBG3TAB 0x0001,0x0005 0652 017b ffff | { | .CONST 0x017b,0xffff 0654 017d 0001 | } | .CONST 0x017d,0x0001 0656 0182 0002 | | .CONST 0x0182,0x0002 0658 0184 0003 | | .CONST 0x0184,0x0003 065a 018a 0004 | | .CONST 0x018a,0x0004 065c 0194 0005 | | .CONST 0x0194,0x0005 065e ; -------------------------------------------------------------------------------------- 065e ; Debug3 Subtable 0xb 065e ; -------------------------------------------------------------------------------------- 065e 0001 0005 | | .DBG3TAB 0x0001,0x0005 0660 019b ffff | | .CONST 0x019b,0xffff 0662 019d 0001 | | .CONST 0x019d,0x0001 0664 01a2 0002 | | .CONST 0x01a2,0x0002 0666 01a4 0003 | | .CONST 0x01a4,0x0003 0668 01aa 0004 | | .CONST 0x01aa,0x0004 066a 01b0 0005 | | .CONST 0x01b0,0x0005 066c ; -------------------------------------------------------------------------------------- 066c ; Debug3 Subtable 0xc 066c ; -------------------------------------------------------------------------------------- 066c 0000 0000 | | .DBG3TAB 0x0000,0x0000 066e ; -------------------------------------------------------------------------------------- 066e ; Debug3 Subtable 0xd 066e ; -------------------------------------------------------------------------------------- 066e 0000 0003 | | .DBG3TAB 0x0000,0x0003 0670 01d3 0001 | | .CONST 0x01d3,0x0001 0672 01d5 0002 | | .CONST 0x01d5,0x0002 0674 01e1 0003 | | .CONST 0x01e1,0x0003 0676 ; -------------------------------------------------------------------------------------- 0676 ; Debug3 Subtable 0xe 0676 ; -------------------------------------------------------------------------------------- 0676 0000 0003 | | .DBG3TAB 0x0000,0x0003 0678 01eb 0001 | | .CONST 0x01eb,0x0001 067a 01ed 0002 | | .CONST 0x01ed,0x0002 067c 01f8 0003 | | .CONST 0x01f8,0x0003 067e ; -------------------------------------------------------------------------------------- 067e ; Debug3 Subtable 0xf 067e ; -------------------------------------------------------------------------------------- 067e 0007 0029 | )| .DBG3TAB 0x0007,0x0029 0680 0203 ffff | | .CONST 0x0203,0xffff 0682 0207 0001 | | .CONST 0x0207,0x0001 0684 0207 0401 | | .CONST 0x0207,0x0401 0686 0208 0402 | | .CONST 0x0208,0x0402 0688 0209 0403 | | .CONST 0x0209,0x0403 068a 0209 0404 | | .CONST 0x0209,0x0404 068c 0209 0001 | | .CONST 0x0209,0x0001 068e 0219 000a | | .CONST 0x0219,0x000a 0690 021b 0002 | | .CONST 0x021b,0x0002 0692 0220 0003 | | .CONST 0x0220,0x0003 0694 0223 0004 | # | .CONST 0x0223,0x0004 0696 0224 f7ff | $ | .CONST 0x0224,0xf7ff 0698 0225 0801 | % | .CONST 0x0225,0x0801 069a 0229 0802 | ) | .CONST 0x0229,0x0802 069c 0229 0c01 | ) | .CONST 0x0229,0x0c01 069e 022a 0c02 | * | .CONST 0x022a,0x0c02 06a0 022b 0c03 | + | .CONST 0x022b,0x0c03 06a2 022b 0c04 | + | .CONST 0x022b,0x0c04 06a4 022b 0802 | + | .CONST 0x022b,0x0802 06a6 0231 0806 | 1 | .CONST 0x0231,0x0806 06a8 0233 0803 | 3 | .CONST 0x0233,0x0803 06aa 0239 0804 | 9 | .CONST 0x0239,0x0804 06ac 023a efff | : | .CONST 0x023a,0xefff 06ae 023f effe | ? | .CONST 0x023f,0xeffe 06b0 0244 1001 | D | .CONST 0x0244,0x1001 06b2 0251 1401 | Q | .CONST 0x0251,0x1401 06b4 0252 1001 | R | .CONST 0x0252,0x1001 06b6 0255 0805 | U | .CONST 0x0255,0x0805 06b8 0258 0005 | X | .CONST 0x0258,0x0005 06ba 025a 0006 | Z | .CONST 0x025a,0x0006 06bc 0266 0007 | f | .CONST 0x0266,0x0007 06be 0267 e7ff | g | .CONST 0x0267,0xe7ff 06c0 026c 1801 | l | .CONST 0x026c,0x1801 06c2 0279 1c01 | y | .CONST 0x0279,0x1c01 06c4 027a 1801 | z | .CONST 0x027a,0x1801 06c6 027d 0008 | } | .CONST 0x027d,0x0008 06c8 027e dfff | ~ | .CONST 0x027e,0xdfff 06ca 027f dffe | | .CONST 0x027f,0xdffe 06cc 0280 2001 | | .CONST 0x0280,0x2001 06ce 0287 2002 | | .CONST 0x0287,0x2002 06d0 0289 2003 | | .CONST 0x0289,0x2003 06d2 0291 2401 | $ | .CONST 0x0291,0x2401 06d4 0292 2003 | | .CONST 0x0292,0x2003 06d6 0295 2004 | | .CONST 0x0295,0x2004 06d8 0297 0009 | | .CONST 0x0297,0x0009 06da 02a2 000b | | .CONST 0x02a2,0x000b 06dc 02a7 000c | | .CONST 0x02a7,0x000c 06de 02a9 000d | | .CONST 0x02a9,0x000d 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; Debug3 Subtable 0x10 06e0 ; -------------------------------------------------------------------------------------- 06e0 0000 0003 | | .DBG3TAB 0x0000,0x0003 06e2 02cb 0001 | | .CONST 0x02cb,0x0001 06e4 02ce 0002 | | .CONST 0x02ce,0x0002 06e6 02d0 0003 | | .CONST 0x02d0,0x0003 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; Debug3 Subtable 0x11 06e8 ; -------------------------------------------------------------------------------------- 06e8 0000 0008 | | .DBG3TAB 0x0000,0x0008 06ea 02db 0001 | | .CONST 0x02db,0x0001 06ec 02de 0002 | | .CONST 0x02de,0x0002 06ee 02e2 0003 | | .CONST 0x02e2,0x0003 06f0 02e8 0004 | | .CONST 0x02e8,0x0004 06f2 02f3 0005 | | .CONST 0x02f3,0x0005 06f4 02fc 0006 | | .CONST 0x02fc,0x0006 06f6 0301 0007 | | .CONST 0x0301,0x0007 06f8 0303 0008 | | .CONST 0x0303,0x0008 06fa ; -------------------------------------------------------------------------------------- 06fa ; Debug3 Subtable 0x12 06fa ; -------------------------------------------------------------------------------------- 06fa 0002 0011 | | .DBG3TAB 0x0002,0x0011 06fc 0313 ffff | | .CONST 0x0313,0xffff 06fe 0318 fffe | | .CONST 0x0318,0xfffe 0700 0321 0001 | ! | .CONST 0x0321,0x0001 0702 0325 0002 | % | .CONST 0x0325,0x0002 0704 0326 0401 | & | .CONST 0x0326,0x0401 0706 032a 0801 | * | .CONST 0x032a,0x0801 0708 032b 0802 | + | .CONST 0x032b,0x0802 070a 032c 0803 | , | .CONST 0x032c,0x0803 070c 032c 0804 | , | .CONST 0x032c,0x0804 070e 032e 0401 | . | .CONST 0x032e,0x0401 0710 0333 0002 | 3 | .CONST 0x0333,0x0002 0712 0337 0003 | 7 | .CONST 0x0337,0x0003 0714 0337 0c01 | 7 | .CONST 0x0337,0x0c01 0716 033a 0003 | : | .CONST 0x033a,0x0003 0718 033e 0004 | > | .CONST 0x033e,0x0004 071a 0343 0005 | C | .CONST 0x0343,0x0005 071c 0348 0006 | H | .CONST 0x0348,0x0006 071e 034d 0007 | M | .CONST 0x034d,0x0007 0720 034f 0008 | O | .CONST 0x034f,0x0008 0722 ; -------------------------------------------------------------------------------------- 0722 ; Debug3 Subtable 0x13 0722 ; -------------------------------------------------------------------------------------- 0722 0002 001c | | .DBG3TAB 0x0002,0x001c 0724 035b ffff | [ | .CONST 0x035b,0xffff 0726 0360 fffe | ` | .CONST 0x0360,0xfffe 0728 0369 0001 | i | .CONST 0x0369,0x0001 072a 036d 0002 | m | .CONST 0x036d,0x0002 072c 036e 0401 | n | .CONST 0x036e,0x0401 072e 0370 0402 | p | .CONST 0x0370,0x0402 0730 0372 0403 | r | .CONST 0x0372,0x0403 0732 0376 0404 | v | .CONST 0x0376,0x0404 0734 037a 0405 | z | .CONST 0x037a,0x0405 0736 037b 0801 | { | .CONST 0x037b,0x0801 0738 037c 0802 | | | .CONST 0x037c,0x0802 073a 037d 0803 | } | .CONST 0x037d,0x0803 073c 037d 0804 | } | .CONST 0x037d,0x0804 073e 037f 0405 | | .CONST 0x037f,0x0405 0740 0388 0c01 | | .CONST 0x0388,0x0c01 0742 0389 0c02 | | .CONST 0x0389,0x0c02 0744 038a 0c03 | | .CONST 0x038a,0x0c03 0746 038a 0c04 | | .CONST 0x038a,0x0c04 0748 038c 0804 | | .CONST 0x038c,0x0804 074a 039a 0002 | | .CONST 0x039a,0x0002 074c 039e 0003 | | .CONST 0x039e,0x0003 074e 039e 1001 | | .CONST 0x039e,0x1001 0750 03a0 1002 | | .CONST 0x03a0,0x1002 0752 03a2 1003 | | .CONST 0x03a2,0x1003 0754 03a5 0003 | | .CONST 0x03a5,0x0003 0756 03a9 0004 | | .CONST 0x03a9,0x0004 0758 03ae 0005 | | .CONST 0x03ae,0x0005 075a 03b3 0006 | | .CONST 0x03b3,0x0006 075c 03b8 0007 | | .CONST 0x03b8,0x0007 075e 03ba 0008 | | .CONST 0x03ba,0x0008 0760 ; -------------------------------------------------------------------------------------- 0760 ; Debug3 Subtable 0x14 0760 ; -------------------------------------------------------------------------------------- 0760 0003 000c | | .DBG3TAB 0x0003,0x000c 0762 03cb ffff | | .CONST 0x03cb,0xffff 0764 03cc fffe | | .CONST 0x03cc,0xfffe 0766 03cd fffd | | .CONST 0x03cd,0xfffd 0768 03ce 0001 | | .CONST 0x03ce,0x0001 076a 03d0 0002 | | .CONST 0x03d0,0x0002 076c 03d3 0003 | | .CONST 0x03d3,0x0003 076e 03d7 0004 | | .CONST 0x03d7,0x0004 0770 03df 0005 | | .CONST 0x03df,0x0005 0772 03e2 0006 | | .CONST 0x03e2,0x0006 0774 03e6 0007 | | .CONST 0x03e6,0x0007 0776 03e8 0008 | | .CONST 0x03e8,0x0008 0778 03ea 0009 | | .CONST 0x03ea,0x0009 077a 03ef 000a | | .CONST 0x03ef,0x000a 077c 03f1 000b | | .CONST 0x03f1,0x000b 077e 03f5 000c | | .CONST 0x03f5,0x000c 0780 ; -------------------------------------------------------------------------------------- 0780 ; Debug3 Subtable 0x15 0780 ; -------------------------------------------------------------------------------------- 0780 0001 0009 | | .DBG3TAB 0x0001,0x0009 0782 03fb ffff | | .CONST 0x03fb,0xffff 0784 0400 0001 | | .CONST 0x0400,0x0001 0786 0405 0002 | | .CONST 0x0405,0x0002 0788 040d 0401 | | .CONST 0x040d,0x0401 078a 040e 0002 | | .CONST 0x040e,0x0002 078c 0411 0003 | | .CONST 0x0411,0x0003 078e 0416 0004 | | .CONST 0x0416,0x0004 0790 041e 0801 | | .CONST 0x041e,0x0801 0792 041f 0004 | | .CONST 0x041f,0x0004 0794 0422 0005 | " | .CONST 0x0422,0x0005 0796 ; -------------------------------------------------------------------------------------- 0796 ; Debug3 Subtable 0x16 0796 ; -------------------------------------------------------------------------------------- 0796 0001 0005 | | .DBG3TAB 0x0001,0x0005 0798 042b ffff | + | .CONST 0x042b,0xffff 079a 042c 0001 | , | .CONST 0x042c,0x0001 079c 0435 0002 | 5 | .CONST 0x0435,0x0002 079e 043d 0401 | = | .CONST 0x043d,0x0401 07a0 043e 0002 | > | .CONST 0x043e,0x0002 07a2 0444 0003 | D | .CONST 0x0444,0x0003 07a4 0000 0000 | | .BLANK 0000[0x5c]