|
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: 2048 (0x800) 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 0168 | h | .CONST 0x0168 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0020 | | .CONST 0x0020 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x019a,0x8000,0x0000,0x005a,0x2f75,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 00bf | | Action Accept_Activation 0014 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0014,0x01a4,0x8000,0x0000,0x005a,0x2f85,0x0000,0x000d ; Debug Table 0x1.0x0 = 0x14,0xffff 0015 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x15,0xfffe 0016 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x16,0xfffd 0017 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x17,0xfffc 0018 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x4 = 0x18,0xfffb 0019 00c7 | | Action Elaborate_Subprogram 001a 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x5 = 0x1a,0xfffa 001b 00c7 | | Action Elaborate_Subprogram 001c 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x6 = 0x1c,0xfff9 001d 00c7 | | Action Elaborate_Subprogram 001e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x7 = 0x1e,0xfff8 001f 00c7 | | Action Elaborate_Subprogram 0020 BODY_0008: 0020 00bc | | Action Signal_Activated 0021 00bb | | Action Signal_Completion 0022 0000 0000 | | .BLANK 0000[0x6] 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 0035 | 5 | .CONST 0x0035 ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0004 | | .CONST 0x0004 ; Number of locals 002b INIT_0028: 002b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x2 = .DEBUG 0x002b,0x01b6,0x0002,0x0000,0x005a,0x2f75,0x0000,0x0006 ; Debug Table 0x2.0x0 = 0x2b,0xffff 002c 00db | | Load_Top At_Offset_3 002d 00eb | | Load_Encached Diana_Cache 002e 18fe | | Execute Package,Field_Execute,Field_Number 0xfe 002f 00eb | | Load_Encached Diana_Cache 0030 1888 | | Execute Package,Field_Execute,Field_Number 0x88 0031 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0032 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x2.0x1 = 0x32,0xfffe 0033 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0034 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x2 = 0x34,0xfffd 0035 BODY_0028: 0035 00cf | | Action Mark_Auxiliary 0036 785e |x^ | Jump 0x95 0037 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x3 = 0x37,0x2 0038 0007 | | Action Break_Optional 0039 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x4 = 0x39,0x401 003a 7002 |p | Jump_Nonzero 0x3d 003b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x5 = 0x3b,0x402 003c 782c |x, | Jump 0x69 003d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x6 = 0x3d,0x403 003e 0217 | | Execute Heap_Access,All_Reference 003f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0040 6804 |h | Jump_Zero 0x45 0041 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x7 = 0x41,0x404 0042 0217 | | Execute Heap_Access,All_Reference 0043 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0044 7824 |x$ | Jump 0x69 0045 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x8 = 0x45,0x405 0046 0007 | | Action Break_Optional 0047 e407 | | Load 0x2,0x7 ; Debug Table 0x2.0x9 = 0x47,0x801 0048 0007 | | Action Break_Optional 0049 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x2.0xa = 0x49,0x802 004a 0007 | | Action Break_Optional ; Debug Table 0x2.0xb = 0x4a,0x803 004b 00d0 | | Action Swap_Control ; Debug Table 0x2.0xc = 0x4b,0x804 004c 00d1 | | Pop_Control Pop_Count_1 004d 49bb |I | Short_Literal 0x1bb ; Debug Table 0x2.0xd = 0x4d,0x405 004e 00eb | | Load_Encached Diana_Cache 004f 0098 | | Execute Package,Field_Read_Dynamic 0050 012c | , | Execute Any,Size 0051 e001 | | Load 0x0,0x1 0052 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0053 025b | [ | Execute Discrete,Check_In_Type 0054 0273 | s | Execute Discrete,Plus 0055 00d9 | | Load_Top At_Offset_1 0056 0007 | | Action Break_Optional 0057 e408 | | Load 0x2,0x8 ; Debug Table 0x2.0xe = 0x57,0xc01 0058 0007 | | Action Break_Optional 0059 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x2.0xf = 0x59,0xc02 005a 0007 | | Action Break_Optional ; Debug Table 0x2.0x10 = 0x5a,0xc03 005b 00d0 | | Action Swap_Control ; Debug Table 0x2.0x11 = 0x5b,0xc04 005c 00d1 | | Pop_Control Pop_Count_1 005d 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x2.0x12 = 0x5d,0x804 005e 00eb | | Load_Encached Diana_Cache 005f 0098 | | Execute Package,Field_Read_Dynamic 0060 49c9 |I | Short_Literal 0x1c9 0061 00eb | | Load_Encached Diana_Cache 0062 0098 | | Execute Package,Field_Read_Dynamic 0063 49ca |I | Short_Literal 0x1ca 0064 00eb | | Load_Encached Diana_Cache 0065 0095 | | Execute Package,Field_Reference_Dynamic 0066 e002 | | Load 0x0,0x2 0067 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0068 7800 |x | Jump 0x69 0069 00d0 | | Action Swap_Control 006a 00d1 | | Pop_Control Pop_Count_1 006b 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x2.0x13 = 0x6b,0x2 006c 0007 | | Action Break_Optional ; Debug Table 0x2.0x14 = 0x6c,0x3 006d e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x15 = 0x6d,0x1001 006e 0007 | | Action Break_Optional 006f 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0x16 = 0x6f,0x1002 0070 0007 | | Action Break_Optional ; Debug Table 0x2.0x17 = 0x70,0x1003 0071 0007 | | Action Break_Optional ; Debug Table 0x2.0x18 = 0x71,0x1004 0072 0b7e | ~ | Execute_Immediate Case_Compare,0x7e ; Debug Table 0x2.0x19 = 0x72,0x3 0073 7009 |p | Jump_Nonzero 0x7d 0074 0b7f | | Execute_Immediate Case_Compare,0x7f 0075 7007 |p | Jump_Nonzero 0x7d 0076 0b40 | @ | Execute_Immediate Case_Compare,0x40 0077 7012 |p | Jump_Nonzero 0x8a 0078 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1a = 0x78,0x6 0079 0a01 | | Execute_Immediate Plus,0x1 007a 0248 | H | Execute Discrete,Check_In_Integer 007b a403 | | Store_Unchecked 0x2,0x3 007c 780d |x | Jump 0x8a 007d 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1b = 0x7d,0x4 007e 00db | | Load_Top At_Offset_3 007f 00eb | | Load_Encached Diana_Cache 0080 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0 0081 00eb | | Load_Encached Diana_Cache 0082 1888 | | Execute Package,Field_Execute,Field_Number 0x88 0083 4975 |Iu | Short_Literal 0x175 0084 00eb | | Load_Encached Diana_Cache 0085 0098 | | Execute Package,Field_Read_Dynamic 0086 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0087 0273 | s | Execute Discrete,Plus 0088 0248 | H | Execute Discrete,Check_In_Integer 0089 a403 | | Store_Unchecked 0x2,0x3 008a 00d1 | | Pop_Control Pop_Count_1 008b 0007 | | Action Break_Optional ; Debug Table 0x2.0x1c = 0x8b,0x7 008c 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1d = 0x8c,0x1401 008d 7002 |p | Jump_Nonzero 0x90 008e 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x2.0x1e = 0x8e,0x1402 008f 7803 |x | Jump 0x93 0090 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1f = 0x90,0x1403 0091 0217 | | Execute Heap_Access,All_Reference 0092 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0093 a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x2.0x20 = 0x93,0x7 0094 00c9 | | Action Pop_Auxiliary_Loop 0095 0007 | | Action Break_Optional ; Debug Table 0x2.0x21 = 0x95,0x1 0096 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x22 = 0x96,0x1801 0097 021d | | Execute Heap_Access,Is_Null 0098 6f9e |o | Jump_Zero 0x37 ; Debug Table 0x2.0x23 = 0x98,0x1 0099 00ce | | Action Pop_Auxiliary 009a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x24 = 0x9a,0x8 009b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 009c 0000 0000 | | .BLANK 0000[0x4] 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 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x00a3,0x0202,0x0001,0x0000,0x005a,0x2f75,0x0000,0x0011 ; Debug Table 0x3.0x0 = 0xa3,0xffff 00a4 00db | | Load_Top At_Offset_3 00a5 4976 |Iv | Short_Literal 0x176 00a6 00eb | | Load_Encached Diana_Cache 00a7 0098 | | Execute Package,Field_Read_Dynamic 00a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a9 e003 | | Load 0x0,0x3 00aa 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 00ab 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00ac BODY_00a0: 00ac 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0xac,0x1 00ad e004 | | Load 0x0,0x4 00ae 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00af 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00cf | | .CONST 0x00cf ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0007 | | .CONST 0x0007 ; Number of locals 00b3 INIT_00b0: 00b3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00b3,0x0208,0x0001,0x0000,0x005a,0x2f75,0x0000,0x001b ; Debug Table 0x4.0x0 = 0xb3,0xffff 00b4 00db | | Load_Top At_Offset_3 00b5 4974 |It | Short_Literal 0x174 00b6 00eb | | Load_Encached Diana_Cache 00b7 0098 | | Execute Package,Field_Read_Dynamic 00b8 180d | | Execute Package,Field_Execute,Field_Number 0xd 00b9 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00ba 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0xba,0xfffe 00bb 00eb | | Load_Encached Diana_Cache 00bc 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 00bd e5fe | | Load 0x2,-0x2 00be 00eb | | Load_Encached Diana_Cache 00bf 1879 | y | Execute Package,Field_Execute,Field_Number 0x79 00c0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00c1 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x4.0x2 = 0xc1,0xfffd 00c2 00da | | Load_Top At_Offset_2 00c3 00eb | | Load_Encached Diana_Cache 00c4 18da | | Execute Package,Field_Execute,Field_Number 0xda 00c5 4976 |Iv | Short_Literal 0x176 00c6 00eb | | Load_Encached Diana_Cache 00c7 0098 | | Execute Package,Field_Read_Dynamic 00c8 181f | | Execute Package,Field_Execute,Field_Number 0x1f 00c9 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00ca 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x3 = 0xca,0xfffc 00cb 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x4.0x4 = 0xcb,0xfffb 00cc 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x4.0x5 = 0xcc,0x401 00cd 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x4.0x6 = 0xcd,0xfffb 00ce 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x7 = 0xce,0xfffa 00cf BODY_00b0: 00cf e005 | | Load 0x0,0x5 ; Debug Table 0x4.0x8 = 0xcf,0x1 00d0 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00d1 e402 | | Load 0x2,0x2 00d2 e006 | | Load 0x0,0x6 00d3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 00d4 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x9 = 0xd4,0x2 00d5 e403 | | Load 0x2,0x3 00d6 4963 |Ic | Short_Literal 0x163 00d7 00eb | | Load_Encached Diana_Cache 00d8 0096 | | Execute Package,Entry 00d9 00cf | | Action Mark_Auxiliary 00da 783b |x; | Jump 0x116 00db e404 | | Load 0x2,0x4 ; Debug Table 0x4.0xa = 0xdb,0x4 00dc 0007 | | Action Break_Optional 00dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xb = 0xdd,0x801 00de 0217 | | Execute Heap_Access,All_Reference 00df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e0 00d9 | | Load_Top At_Offset_1 00e1 0007 | | Action Break_Optional 00e2 e40b | | Load 0x2,0xb ; Debug Table 0x4.0xc = 0xe2,0xc01 00e3 0007 | | Action Break_Optional 00e4 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x4.0xd = 0xe4,0xc02 00e5 0007 | | Action Break_Optional ; Debug Table 0x4.0xe = 0xe5,0xc03 00e6 00d0 | | Action Swap_Control ; Debug Table 0x4.0xf = 0xe6,0xc04 00e7 00d1 | | Pop_Control Pop_Count_1 00e8 49af |I | Short_Literal 0x1af ; Debug Table 0x4.0x10 = 0xe8,0x801 00e9 00eb | | Load_Encached Diana_Cache 00ea 0096 | | Execute Package,Entry 00eb 00d0 | | Action Swap_Control 00ec 00d1 | | Pop_Control Pop_Count_1 00ed 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x4.0x11 = 0xed,0x4 00ee 4816 |H | Short_Literal 0x16 ; Debug Table 0x4.0x12 = 0xee,0x5 00ef 00eb | | Load_Encached Diana_Cache 00f0 1878 | x | Execute Package,Field_Execute,Field_Number 0x78 00f1 a405 | | Store_Unchecked 0x2,0x5 00f2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x13 = 0xf2,0x6 00f3 00da | | Load_Top At_Offset_2 00f4 496a |Ij | Short_Literal 0x16a 00f5 00eb | | Load_Encached Diana_Cache 00f6 0096 | | Execute Package,Entry 00f7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x14 = 0xf7,0x7 00f8 e405 | | Load 0x2,0x5 00f9 4959 |IY | Short_Literal 0x159 00fa 00eb | | Load_Encached Diana_Cache 00fb 0096 | | Execute Package,Entry 00fc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x15 = 0xfc,0x8 00fd 4902 |I | Short_Literal 0x102 00fe 00eb | | Load_Encached Diana_Cache 00ff 0096 | | Execute Package,Entry 0100 e405 | | Load 0x2,0x5 0101 495b |I[ | Short_Literal 0x15b 0102 00eb | | Load_Encached Diana_Cache 0103 0096 | | Execute Package,Entry 0104 e005 | | Load 0x0,0x5 ; Debug Table 0x4.0x16 = 0x104,0x9 0105 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0106 00da | | Load_Top At_Offset_2 0107 e006 | | Load 0x0,0x6 0108 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0109 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x17 = 0x109,0xa 010a e405 | | Load 0x2,0x5 010b 4975 |Iu | Short_Literal 0x175 010c 00eb | | Load_Encached Diana_Cache 010d 0098 | | Execute Package,Field_Read_Dynamic 010e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 010f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0110 0007 | | Action Break_Optional ; Debug Table 0x4.0x18 = 0x110,0xb 0111 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x19 = 0x111,0x1001 0112 0217 | | Execute Heap_Access,All_Reference 0113 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0114 a404 | | Store_Unchecked 0x2,0x4 ; Debug Table 0x4.0x1a = 0x114,0xb 0115 00c9 | | Action Pop_Auxiliary_Loop 0116 0007 | | Action Break_Optional ; Debug Table 0x4.0x1b = 0x116,0x3 0117 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x1c = 0x117,0x1401 0118 021d | | Execute Heap_Access,Is_Null 0119 6fc1 |o | Jump_Zero 0xdb ; Debug Table 0x4.0x1d = 0x119,0x3 011a 00ce | | Action Pop_Auxiliary 011b e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x1e = 0x11b,0xc 011c e402 | | Load 0x2,0x2 011d e403 | | Load 0x2,0x3 011e e007 | | Load 0x0,0x7 011f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0120 e403 | | Load 0x2,0x3 ; Debug Table 0x4.0x1f = 0x120,0xd 0121 e006 | | Load 0x0,0x6 0122 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 0123 c5fc | | Store 0x2,-0x4 0124 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x20 = 0x124,0xe 0125 00eb | | Load_Encached Diana_Cache 0126 1880 | | Execute Package,Field_Execute,Field_Number 0x80 0127 a5fb | | Store_Unchecked 0x2,-0x5 0128 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0129 0000 0000 | | .BLANK 0000[0x7] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0147 | G | .CONST 0x0147 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0003 | | .CONST 0x0003 ; Number of locals 0133 INIT_0130: 0133 00db | | Load_Top At_Offset_3 ; Debug Table 0x5 = .DEBUG 0x0133,0x024c,0x0002,0x0000,0x005a,0x2f75,0x0000,0x0039 ; Debug Table 0x5.0x0 = 0x133,0xffff 0134 490c |I | Short_Literal 0x10c 0135 00eb | | Load_Encached Diana_Cache 0136 0096 | | Execute Package,Entry 0137 00eb | | Load_Encached Diana_Cache 0138 18ed | | Execute Package,Field_Execute,Field_Number 0xed 0139 00db | | Load_Top At_Offset_3 013a 4975 |Iu | Short_Literal 0x175 013b 00eb | | Load_Encached Diana_Cache 013c 0098 | | Execute Package,Field_Read_Dynamic 013d 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 013e 0a01 | | Execute_Immediate Plus,0x1 013f 0248 | H | Execute Discrete,Check_In_Integer 0140 00e2 | | Load_Encached Integer_Cache 0141 03f1 | | Declare_Variable Discrete,With_Value 0142 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x1 = 0x142,0xfffe 0143 e5fe | | Load 0x2,-0x2 0144 00eb | | Load_Encached Diana_Cache 0145 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0146 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0147 BODY_0130: 0147 0007 | | Action Break_Optional ; Debug Table 0x5.0x2 = 0x147,0x1 0148 e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x3 = 0x148,0x401 0149 0007 | | Action Break_Optional 014a 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0x4 = 0x14a,0x402 014b 0007 | | Action Break_Optional ; Debug Table 0x5.0x5 = 0x14b,0x403 014c 0007 | | Action Break_Optional ; Debug Table 0x5.0x6 = 0x14c,0x404 014d 0f11 | | Execute_Immediate Equal,0x11 ; Debug Table 0x5.0x7 = 0x14d,0x1 014e 6804 |h | Jump_Zero 0x153 014f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x8 = 0x14f,0x2 0150 00eb | | Load_Encached Diana_Cache 0151 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0152 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0153 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x9 = 0x153,0x3 0154 00d9 | | Load_Top At_Offset_1 0155 4976 |Iv | Short_Literal 0x176 0156 00eb | | Load_Encached Diana_Cache 0157 0098 | | Execute Package,Field_Read_Dynamic 0158 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0159 4904 |I | Short_Literal 0x104 015a 00eb | | Load_Encached Diana_Cache 015b 0096 | | Execute Package,Entry 015c 00eb | | Load_Encached Diana_Cache 015d 18da | | Execute Package,Field_Execute,Field_Number 0xda 015e 4976 |Iv | Short_Literal 0x176 015f 00eb | | Load_Encached Diana_Cache 0160 0098 | | Execute Package,Field_Read_Dynamic 0161 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0162 4975 |Iu | Short_Literal 0x175 0163 00eb | | Load_Encached Diana_Cache 0164 0098 | | Execute Package,Field_Read_Dynamic 0165 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0166 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0167 0000 | | .XXX[0x1] 0168 ; -------------------------------------------------------------------------------------- 0168 ; Debug Table 0168 ; -------------------------------------------------------------------------------------- 0168 0003 0006 | | .CONST 0x0003,0x0006 016a 000b 019a | | .DEBUG 0x000b,0x019a,0x8000,0x0000,0x005a,0x2f75,0x0000,0x0005 0172 0014 01a4 | | .DEBUG 0x0014,0x01a4,0x8000,0x0000,0x005a,0x2f85,0x0000,0x000d 017a 002b 01b6 | + | .DEBUG 0x002b,0x01b6,0x0002,0x0000,0x005a,0x2f75,0x0000,0x0006 0182 00a3 0202 | | .DEBUG 0x00a3,0x0202,0x0001,0x0000,0x005a,0x2f75,0x0000,0x0011 018a 00b3 0208 | | .DEBUG 0x00b3,0x0208,0x0001,0x0000,0x005a,0x2f75,0x0000,0x001b 0192 0133 024c | 3 L| .DEBUG 0x0133,0x024c,0x0002,0x0000,0x005a,0x2f75,0x0000,0x0039 019a ; -------------------------------------------------------------------------------------- 019a ; Debug3 Subtable 0x0 019a ; -------------------------------------------------------------------------------------- 019a 0004 0000 | | .DBG3TAB 0x0004,0x0000 019c 000b ffff | | .CONST 0x000b,0xffff 019e 000d fffe | | .CONST 0x000d,0xfffe 01a0 000f fffd | | .CONST 0x000f,0xfffd 01a2 0011 fffc | | .CONST 0x0011,0xfffc 01a4 ; -------------------------------------------------------------------------------------- 01a4 ; Debug3 Subtable 0x1 01a4 ; -------------------------------------------------------------------------------------- 01a4 0008 0000 | | .DBG3TAB 0x0008,0x0000 01a6 0014 ffff | | .CONST 0x0014,0xffff 01a8 0015 fffe | | .CONST 0x0015,0xfffe 01aa 0016 fffd | | .CONST 0x0016,0xfffd 01ac 0017 fffc | | .CONST 0x0017,0xfffc 01ae 0018 fffb | | .CONST 0x0018,0xfffb 01b0 001a fffa | | .CONST 0x001a,0xfffa 01b2 001c fff9 | | .CONST 0x001c,0xfff9 01b4 001e fff8 | | .CONST 0x001e,0xfff8 01b6 ; -------------------------------------------------------------------------------------- 01b6 ; Debug3 Subtable 0x2 01b6 ; -------------------------------------------------------------------------------------- 01b6 0003 0022 | "| .DBG3TAB 0x0003,0x0022 01b8 002b ffff | + | .CONST 0x002b,0xffff 01ba 0032 fffe | 2 | .CONST 0x0032,0xfffe 01bc 0034 fffd | 4 | .CONST 0x0034,0xfffd 01be 0037 0002 | 7 | .CONST 0x0037,0x0002 01c0 0039 0401 | 9 | .CONST 0x0039,0x0401 01c2 003b 0402 | ; | .CONST 0x003b,0x0402 01c4 003d 0403 | = | .CONST 0x003d,0x0403 01c6 0041 0404 | A | .CONST 0x0041,0x0404 01c8 0045 0405 | E | .CONST 0x0045,0x0405 01ca 0047 0801 | G | .CONST 0x0047,0x0801 01cc 0049 0802 | I | .CONST 0x0049,0x0802 01ce 004a 0803 | J | .CONST 0x004a,0x0803 01d0 004b 0804 | K | .CONST 0x004b,0x0804 01d2 004d 0405 | M | .CONST 0x004d,0x0405 01d4 0057 0c01 | W | .CONST 0x0057,0x0c01 01d6 0059 0c02 | Y | .CONST 0x0059,0x0c02 01d8 005a 0c03 | Z | .CONST 0x005a,0x0c03 01da 005b 0c04 | [ | .CONST 0x005b,0x0c04 01dc 005d 0804 | ] | .CONST 0x005d,0x0804 01de 006b 0002 | k | .CONST 0x006b,0x0002 01e0 006c 0003 | l | .CONST 0x006c,0x0003 01e2 006d 1001 | m | .CONST 0x006d,0x1001 01e4 006f 1002 | o | .CONST 0x006f,0x1002 01e6 0070 1003 | p | .CONST 0x0070,0x1003 01e8 0071 1004 | q | .CONST 0x0071,0x1004 01ea 0072 0003 | r | .CONST 0x0072,0x0003 01ec 0078 0006 | x | .CONST 0x0078,0x0006 01ee 007d 0004 | } | .CONST 0x007d,0x0004 01f0 008b 0007 | | .CONST 0x008b,0x0007 01f2 008c 1401 | | .CONST 0x008c,0x1401 01f4 008e 1402 | | .CONST 0x008e,0x1402 01f6 0090 1403 | | .CONST 0x0090,0x1403 01f8 0093 0007 | | .CONST 0x0093,0x0007 01fa 0095 0001 | | .CONST 0x0095,0x0001 01fc 0096 1801 | | .CONST 0x0096,0x1801 01fe 0098 0001 | | .CONST 0x0098,0x0001 0200 009a 0008 | | .CONST 0x009a,0x0008 0202 ; -------------------------------------------------------------------------------------- 0202 ; Debug3 Subtable 0x3 0202 ; -------------------------------------------------------------------------------------- 0202 0001 0001 | | .DBG3TAB 0x0001,0x0001 0204 00a3 ffff | | .CONST 0x00a3,0xffff 0206 00ac 0001 | | .CONST 0x00ac,0x0001 0208 ; -------------------------------------------------------------------------------------- 0208 ; Debug3 Subtable 0x4 0208 ; -------------------------------------------------------------------------------------- 0208 0007 001a | | .DBG3TAB 0x0007,0x001a 020a 00b3 ffff | | .CONST 0x00b3,0xffff 020c 00ba fffe | | .CONST 0x00ba,0xfffe 020e 00c1 fffd | | .CONST 0x00c1,0xfffd 0210 00ca fffc | | .CONST 0x00ca,0xfffc 0212 00cb fffb | | .CONST 0x00cb,0xfffb 0214 00cc 0401 | | .CONST 0x00cc,0x0401 0216 00cd fffb | | .CONST 0x00cd,0xfffb 0218 00ce fffa | | .CONST 0x00ce,0xfffa 021a 00cf 0001 | | .CONST 0x00cf,0x0001 021c 00d4 0002 | | .CONST 0x00d4,0x0002 021e 00db 0004 | | .CONST 0x00db,0x0004 0220 00dd 0801 | | .CONST 0x00dd,0x0801 0222 00e2 0c01 | | .CONST 0x00e2,0x0c01 0224 00e4 0c02 | | .CONST 0x00e4,0x0c02 0226 00e5 0c03 | | .CONST 0x00e5,0x0c03 0228 00e6 0c04 | | .CONST 0x00e6,0x0c04 022a 00e8 0801 | | .CONST 0x00e8,0x0801 022c 00ed 0004 | | .CONST 0x00ed,0x0004 022e 00ee 0005 | | .CONST 0x00ee,0x0005 0230 00f2 0006 | | .CONST 0x00f2,0x0006 0232 00f7 0007 | | .CONST 0x00f7,0x0007 0234 00fc 0008 | | .CONST 0x00fc,0x0008 0236 0104 0009 | | .CONST 0x0104,0x0009 0238 0109 000a | | .CONST 0x0109,0x000a 023a 0110 000b | | .CONST 0x0110,0x000b 023c 0111 1001 | | .CONST 0x0111,0x1001 023e 0114 000b | | .CONST 0x0114,0x000b 0240 0116 0003 | | .CONST 0x0116,0x0003 0242 0117 1401 | | .CONST 0x0117,0x1401 0244 0119 0003 | | .CONST 0x0119,0x0003 0246 011b 000c | | .CONST 0x011b,0x000c 0248 0120 000d | | .CONST 0x0120,0x000d 024a 0124 000e | $ | .CONST 0x0124,0x000e 024c ; -------------------------------------------------------------------------------------- 024c ; Debug3 Subtable 0x5 024c ; -------------------------------------------------------------------------------------- 024c 0002 0008 | | .DBG3TAB 0x0002,0x0008 024e 0133 ffff | 3 | .CONST 0x0133,0xffff 0250 0142 fffe | B | .CONST 0x0142,0xfffe 0252 0147 0001 | G | .CONST 0x0147,0x0001 0254 0148 0401 | H | .CONST 0x0148,0x0401 0256 014a 0402 | J | .CONST 0x014a,0x0402 0258 014b 0403 | K | .CONST 0x014b,0x0403 025a 014c 0404 | L | .CONST 0x014c,0x0404 025c 014d 0001 | M | .CONST 0x014d,0x0001 025e 014f 0002 | O | .CONST 0x014f,0x0002 0260 0153 0003 | S | .CONST 0x0153,0x0003 0262 0000 0000 | | .BLANK 0000[0x19e]