|
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: 3072 (0xc00) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0298 | | .CONST 0x0298 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 001b | | .CONST 0x001b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x02ca,0x8000,0x0000,0x0057,0x3555,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 00bf | | Action Accept_Activation 0010 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0010,0x02d0,0x8000,0x0000,0x0057,0x54f5,0x0000,0x0015 ; Debug Table 0x1.0x0 = 0x10,0xffff 0011 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x11,0xfffe 0012 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x12,0xfffd 0013 029d 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call ; Debug Table 0x1.0x3 = 0x13,0xfffc 0015 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x4 = 0x15,0xfffb 0016 00c7 | | Action Elaborate_Subprogram 0017 029d 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call ; Debug Table 0x1.0x5 = 0x17,0xfffa 0019 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x6 = 0x19,0xfff9 001a 00c7 | | Action Elaborate_Subprogram 001b BODY_0008: 001b 00bc | | Action Signal_Activated 001c 00bb | | Action Signal_Completion 001d 0000 0000 | | .XXX[0x3] 001f 0000 | | 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0028 | ( | .CONST 0x0028 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0003 | | .CONST 0x0003 ; Number of locals 0023 INIT_0020: 0023 0007 | | Action Break_Optional ; Debug Table 0x2 = .DEBUG 0x0023,0x02e0,0x0002,0x0000,0x0057,0x3555,0x0000,0x0006 ; Debug Table 0x2.0x0 = 0x23,0xffff 0024 4ffe |O | Short_Literal -0x2 ; Debug Table 0x2.0x1 = 0x24,0xfffe 0025 4802 |H | Short_Literal 0x2 0026 0099 | | Action Reference_Dynamic 0027 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x2.0x2 = 0x27,0xfffd 0028 BODY_0020: 0028 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x3 = 0x28,0x1 0029 820f | | Call 0x1,0xf 002a 6806 |h | Jump_Zero 0x31 002b e5ff | | Load 0x2,-0x1 002c e001 | | Load 0x0,0x1 002d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 002e 6802 |h | Jump_Zero 0x31 002f 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x4 = 0x2f,0x2 0030 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0031 0007 | | Action Break_Optional ; Debug Table 0x2.0x5 = 0x31,0x3 0032 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x6 = 0x32,0x401 0033 0007 | | Action Break_Optional 0034 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0x7 = 0x34,0x402 0035 0007 | | Action Break_Optional ; Debug Table 0x2.0x8 = 0x35,0x403 0036 0007 | | Action Break_Optional ; Debug Table 0x2.0x9 = 0x36,0x404 0037 0b07 | | Execute_Immediate Case_Compare,0x7 ; Debug Table 0x2.0xa = 0x37,0x3 0038 7030 |p0 | Jump_Nonzero 0x69 0039 0b0c | | Execute_Immediate Case_Compare,0xc 003a 702e |p. | Jump_Nonzero 0x69 003b 0b16 | | Execute_Immediate Case_Compare,0x16 003c 702c |p, | Jump_Nonzero 0x69 003d 0b00 | | Execute_Immediate Case_Compare,0x0 003e 702a |p* | Jump_Nonzero 0x69 003f 0b0b | | Execute_Immediate Case_Compare,0xb 0040 702a |p* | Jump_Nonzero 0x6b 0041 0b08 | | Execute_Immediate Case_Compare,0x8 0042 7028 |p( | Jump_Nonzero 0x6b 0043 0b03 | | Execute_Immediate Case_Compare,0x3 0044 7031 |p1 | Jump_Nonzero 0x76 0045 0b15 | | Execute_Immediate Case_Compare,0x15 0046 7031 |p1 | Jump_Nonzero 0x78 0047 0b14 | | Execute_Immediate Case_Compare,0x14 0048 7032 |p2 | Jump_Nonzero 0x7b 0049 0b01 | | Execute_Immediate Case_Compare,0x1 004a 7032 |p2 | Jump_Nonzero 0x7d 004b 0b13 | | Execute_Immediate Case_Compare,0x13 004c 7030 |p0 | Jump_Nonzero 0x7d 004d 0b11 | | Execute_Immediate Case_Compare,0x11 004e 702e |p. | Jump_Nonzero 0x7d 004f 0b8d | | Execute_Immediate Case_Compare,0x8d 0050 702e |p. | Jump_Nonzero 0x7f 0051 0b17 | | Execute_Immediate Case_Compare,0x17 0052 707e |p~ | Jump_Nonzero 0xd1 0053 0b10 | | Execute_Immediate Case_Compare,0x10 0054 7087 |p | Jump_Nonzero 0xdc 0055 0b09 | | Execute_Immediate Case_Compare,0x9 0056 7094 |p | Jump_Nonzero 0xeb 0057 0b06 | | Execute_Immediate Case_Compare,0x6 0058 7092 |p | Jump_Nonzero 0xeb 0059 0b0a | | Execute_Immediate Case_Compare,0xa 005a 7096 |p | Jump_Nonzero 0xf1 005b 0b05 | | Execute_Immediate Case_Compare,0x5 005c 7094 |p | Jump_Nonzero 0xf1 005d 0b04 | | Execute_Immediate Case_Compare,0x4 005e 70a3 |p | Jump_Nonzero 0x102 005f 0b0e | | Execute_Immediate Case_Compare,0xe 0060 70af |p | Jump_Nonzero 0x110 0061 0b0d | | Execute_Immediate Case_Compare,0xd 0062 70b3 |p | Jump_Nonzero 0x116 0063 0b0f | | Execute_Immediate Case_Compare,0xf 0064 70bb |p | Jump_Nonzero 0x120 0065 0b12 | | Execute_Immediate Case_Compare,0x12 0066 70c7 |p | Jump_Nonzero 0x12e 0067 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0xb = 0x67,0x1c 0068 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0069 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0xc = 0x69,0x4 006a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 006b e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0xd = 0x6b,0x5 006c 6802 |h | Jump_Zero 0x6f 006d 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0xe = 0x6d,0x6 006e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 006f e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0xf = 0x6f,0x7 0070 00eb | | Load_Encached Diana_Cache 0071 18fc | | Execute Package,Field_Execute,Field_Number 0xfc 0072 e5ff | | Load 0x2,-0x1 0073 e002 | | Load 0x0,0x2 0074 180e | | Execute Package,Field_Execute,Field_Number 0xe 0075 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0076 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x10 = 0x76,0x8 0077 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0078 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x11 = 0x78,0x9 0079 0f00 | | Execute_Immediate Equal,0x0 007a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 007b 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x12 = 0x7b,0xa 007c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 007d 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x13 = 0x7d,0xb 007e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 007f 00cf | | Action Mark_Auxiliary ; Debug Table 0x2.0x14 = 0x7f,0xc 0080 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x2.0x15 = 0x80,0xf7ff 0081 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x16 = 0x81,0x801 0082 00eb | | Load_Encached Diana_Cache 0083 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0084 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0085 00cf | | Action Mark_Auxiliary 0086 7843 |xC | Jump 0xca 0087 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x17 = 0x87,0x803 0088 00da | | Load_Top At_Offset_2 0089 0007 | | Action Break_Optional 008a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x18 = 0x8a,0xc01 008b 7002 |p | Jump_Nonzero 0x8e 008c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x19 = 0x8c,0xc02 008d 782c |x, | Jump 0xba 008e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x1a = 0x8e,0xc03 008f 0217 | | Execute Heap_Access,All_Reference 0090 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0091 6804 |h | Jump_Zero 0x96 0092 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x1b = 0x92,0xc04 0093 0217 | | Execute Heap_Access,All_Reference 0094 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0095 7824 |x$ | Jump 0xba 0096 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x1c = 0x96,0xc05 0097 0007 | | Action Break_Optional 0098 e40a | | Load 0x2,0xa ; Debug Table 0x2.0x1d = 0x98,0x1001 0099 0007 | | Action Break_Optional 009a 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x2.0x1e = 0x9a,0x1002 009b 0007 | | Action Break_Optional ; Debug Table 0x2.0x1f = 0x9b,0x1003 009c 00d0 | | Action Swap_Control ; Debug Table 0x2.0x20 = 0x9c,0x1004 009d 00d1 | | Pop_Control Pop_Count_1 009e 49bb |I | Short_Literal 0x1bb ; Debug Table 0x2.0x21 = 0x9e,0xc05 009f 00eb | | Load_Encached Diana_Cache 00a0 0098 | | Execute Package,Field_Read_Dynamic 00a1 012c | , | Execute Any,Size 00a2 e003 | | Load 0x0,0x3 00a3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00a4 025b | [ | Execute Discrete,Check_In_Type 00a5 0273 | s | Execute Discrete,Plus 00a6 00d9 | | Load_Top At_Offset_1 00a7 0007 | | Action Break_Optional 00a8 e40b | | Load 0x2,0xb ; Debug Table 0x2.0x22 = 0xa8,0x1401 00a9 0007 | | Action Break_Optional 00aa 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x2.0x23 = 0xaa,0x1402 00ab 0007 | | Action Break_Optional ; Debug Table 0x2.0x24 = 0xab,0x1403 00ac 00d0 | | Action Swap_Control ; Debug Table 0x2.0x25 = 0xac,0x1404 00ad 00d1 | | Pop_Control Pop_Count_1 00ae 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x2.0x26 = 0xae,0x1004 00af 00eb | | Load_Encached Diana_Cache 00b0 0098 | | Execute Package,Field_Read_Dynamic 00b1 49c9 |I | Short_Literal 0x1c9 00b2 00eb | | Load_Encached Diana_Cache 00b3 0098 | | Execute Package,Field_Read_Dynamic 00b4 49ca |I | Short_Literal 0x1ca 00b5 00eb | | Load_Encached Diana_Cache 00b6 0095 | | Execute Package,Field_Reference_Dynamic 00b7 e004 | | Load 0x0,0x4 00b8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00b9 7800 |x | Jump 0xba 00ba 00d0 | | Action Swap_Control 00bb 00d1 | | Pop_Control Pop_Count_1 00bc 8403 | | Call 0x2,0x3 ; Debug Table 0x2.0x27 = 0xbc,0x803 00bd 6802 |h | Jump_Zero 0xc0 00be 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x28 = 0xbe,0x804 00bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00c0 0007 | | Action Break_Optional ; Debug Table 0x2.0x29 = 0xc0,0x805 00c1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x2a = 0xc1,0x1801 00c2 7002 |p | Jump_Nonzero 0xc5 00c3 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x2.0x2b = 0xc3,0x1802 00c4 7803 |x | Jump 0xc8 00c5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x2c = 0xc5,0x1803 00c6 0217 | | Execute Heap_Access,All_Reference 00c7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00c8 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x2.0x2d = 0xc8,0x805 00c9 00c9 | | Action Pop_Auxiliary_Loop 00ca 0007 | | Action Break_Optional ; Debug Table 0x2.0x2e = 0xca,0x802 00cb 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x2f = 0xcb,0x1c01 00cc 021d | | Execute Heap_Access,Is_Null 00cd 6fb9 |o | Jump_Zero 0x87 ; Debug Table 0x2.0x30 = 0xcd,0x802 00ce 00ce | | Action Pop_Auxiliary 00cf 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x31 = 0xcf,0x806 00d0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00d1 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x32 = 0xd1,0xd 00d2 00eb | | Load_Encached Diana_Cache 00d3 18fa | | Execute Package,Field_Execute,Field_Number 0xfa 00d4 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x33 = 0xd4,0x2001 00d5 0007 | | Action Break_Optional 00d6 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0x34 = 0xd6,0x2002 00d7 0007 | | Action Break_Optional ; Debug Table 0x2.0x35 = 0xd7,0x2003 00d8 00d0 | | Action Swap_Control ; Debug Table 0x2.0x36 = 0xd8,0x2004 00d9 00d1 | | Pop_Control Pop_Count_1 00da 0f21 | ! | Execute_Immediate Equal,0x21 ; Debug Table 0x2.0x37 = 0xda,0xd 00db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00dc 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x38 = 0xdc,0xe 00dd e5ff | | Load 0x2,-0x1 00de 00eb | | Load_Encached Diana_Cache 00df 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 00e0 8403 | | Call 0x2,0x3 00e1 7007 |p | Jump_Nonzero 0xe9 00e2 00da | | Load_Top At_Offset_2 00e3 e5ff | | Load 0x2,-0x1 00e4 490c |I | Short_Literal 0x10c 00e5 00eb | | Load_Encached Diana_Cache 00e6 0096 | | Execute Package,Entry 00e7 8403 | | Call 0x2,0x3 00e8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00e9 4801 |H | Short_Literal 0x1 00ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x39 = 0xeb,0xf 00ec e5ff | | Load 0x2,-0x1 00ed 00eb | | Load_Encached Diana_Cache 00ee 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 00ef 8403 | | Call 0x2,0x3 00f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x3a = 0xf1,0x10 00f2 7009 |p | Jump_Nonzero 0xfc 00f3 e5ff | | Load 0x2,-0x1 00f4 00eb | | Load_Encached Diana_Cache 00f5 18fc | | Execute Package,Field_Execute,Field_Number 0xfc 00f6 e5ff | | Load 0x2,-0x1 00f7 e002 | | Load 0x0,0x2 00f8 180e | | Execute Package,Field_Execute,Field_Number 0xe 00f9 6802 |h | Jump_Zero 0xfc 00fa 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x3b = 0xfa,0x11 00fb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00fc 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x3c = 0xfc,0x12 00fd e5ff | | Load 0x2,-0x1 00fe 00eb | | Load_Encached Diana_Cache 00ff 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 0100 8403 | | Call 0x2,0x3 0101 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0102 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x3d = 0x102,0x13 0103 e5ff | | Load 0x2,-0x1 0104 00eb | | Load_Encached Diana_Cache 0105 18c6 | | Execute Package,Field_Execute,Field_Number 0xc6 0106 8403 | | Call 0x2,0x3 0107 7006 |p | Jump_Nonzero 0x10e 0108 00da | | Load_Top At_Offset_2 0109 e5ff | | Load 0x2,-0x1 010a 00eb | | Load_Encached Diana_Cache 010b 18c7 | | Execute Package,Field_Execute,Field_Number 0xc7 010c 8403 | | Call 0x2,0x3 010d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 010e 4801 |H | Short_Literal 0x1 010f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0110 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x3e = 0x110,0x14 0111 e5ff | | Load 0x2,-0x1 0112 00eb | | Load_Encached Diana_Cache 0113 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0114 8403 | | Call 0x2,0x3 0115 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0116 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x3f = 0x116,0x15 0117 6806 |h | Jump_Zero 0x11e 0118 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x40 = 0x118,0x16 0119 e5ff | | Load 0x2,-0x1 011a 00eb | | Load_Encached Diana_Cache 011b 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 011c 8403 | | Call 0x2,0x3 011d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 011e 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x41 = 0x11e,0x17 011f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0120 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x42 = 0x120,0x18 0121 e5ff | | Load 0x2,-0x1 0122 00eb | | Load_Encached Diana_Cache 0123 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0124 8403 | | Call 0x2,0x3 0125 7006 |p | Jump_Nonzero 0x12c 0126 00da | | Load_Top At_Offset_2 0127 e5ff | | Load 0x2,-0x1 0128 00eb | | Load_Encached Diana_Cache 0129 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 012a 8403 | | Call 0x2,0x3 012b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 012c 4801 |H | Short_Literal 0x1 012d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 012e e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x43 = 0x12e,0x19 012f e005 | | Load 0x0,0x5 0130 180e | | Execute Package,Field_Execute,Field_Number 0xe 0131 6814 |h | Jump_Zero 0x146 0132 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x44 = 0x132,0x1a 0133 e5ff | | Load 0x2,-0x1 0134 00eb | | Load_Encached Diana_Cache 0135 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0136 8403 | | Call 0x2,0x3 0137 700c |p | Jump_Nonzero 0x144 0138 e5fe | | Load 0x2,-0x2 0139 7008 |p | Jump_Nonzero 0x142 013a e5ff | | Load 0x2,-0x1 013b 00eb | | Load_Encached Diana_Cache 013c 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0 013d 00eb | | Load_Encached Diana_Cache 013e 18fa | | Execute Package,Field_Execute,Field_Number 0xfa 013f e005 | | Load 0x0,0x5 0140 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0141 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0142 4800 |H | Short_Literal 0x0 0143 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0144 4801 |H | Short_Literal 0x1 0145 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0146 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x45 = 0x146,0x1b 0147 e5ff | | Load 0x2,-0x1 0148 00eb | | Load_Encached Diana_Cache 0149 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0 014a 8403 | | Call 0x2,0x3 014b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 014c 0000 0000 | | .BLANK 0000[0x4] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0158 | X | .CONST 0x0158 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0002 | | .CONST 0x0002 ; Number of locals 0153 INIT_0150: 0153 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x0153,0x036e,0x0002,0x0000,0x0057,0x3555,0x0000,0x0016 ; Debug Table 0x3.0x0 = 0x153,0xffff 0154 00db | | Load_Top At_Offset_3 0155 e006 | | Load 0x0,0x6 0156 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0157 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0158 BODY_0150: 0158 0007 | | Action Break_Optional ; Debug Table 0x3.0x1 = 0x158,0x1 0159 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x2 = 0x159,0x401 015a 0007 | | Action Break_Optional 015b 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x3 = 0x15b,0x402 015c 0007 | | Action Break_Optional ; Debug Table 0x3.0x4 = 0x15c,0x403 015d 0007 | | Action Break_Optional ; Debug Table 0x3.0x5 = 0x15d,0x404 015e 0b73 | s | Execute_Immediate Case_Compare,0x73 ; Debug Table 0x3.0x6 = 0x15e,0x1 015f 700c |p | Jump_Nonzero 0x16c 0160 0b71 | q | Execute_Immediate Case_Compare,0x71 0161 700a |p | Jump_Nonzero 0x16c 0162 0b70 | p | Execute_Immediate Case_Compare,0x70 0163 7008 |p | Jump_Nonzero 0x16c 0164 0b6c | l | Execute_Immediate Case_Compare,0x6c 0165 7008 |p | Jump_Nonzero 0x16e 0166 0b72 | r | Execute_Immediate Case_Compare,0x72 0167 700c |p | Jump_Nonzero 0x174 0168 0ba2 | | Execute_Immediate Case_Compare,0xa2 0169 700a |p | Jump_Nonzero 0x174 016a 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x7 = 0x16a,0x5 016b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 016c 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x8 = 0x16c,0x2 016d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 016e e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x9 = 0x16e,0x3 016f 00da | | Load_Top At_Offset_2 0170 00eb | | Load_Encached Diana_Cache 0171 18b9 | | Execute Package,Field_Execute,Field_Number 0xb9 0172 820e | | Call 0x1,0xe 0173 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0174 00cf | | Action Mark_Auxiliary ; Debug Table 0x3.0xa = 0x174,0x4 0175 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x3.0xb = 0x175,0xf7ff 0176 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xc = 0x176,0x801 0177 00eb | | Load_Encached Diana_Cache 0178 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0179 0031 | 1 | Store_Top Heap_Access,At_Offset_1 017a 00cf | | Action Mark_Auxiliary 017b 7843 |xC | Jump 0x1bf 017c e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0xd = 0x17c,0x803 017d 00da | | Load_Top At_Offset_2 017e 0007 | | Action Break_Optional 017f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xe = 0x17f,0xc01 0180 7002 |p | Jump_Nonzero 0x183 0181 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0xf = 0x181,0xc02 0182 782c |x, | Jump 0x1af 0183 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x10 = 0x183,0xc03 0184 0217 | | Execute Heap_Access,All_Reference 0185 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0186 6804 |h | Jump_Zero 0x18b 0187 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x11 = 0x187,0xc04 0188 0217 | | Execute Heap_Access,All_Reference 0189 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 018a 7824 |x$ | Jump 0x1af 018b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x12 = 0x18b,0xc05 018c 0007 | | Action Break_Optional 018d e409 | | Load 0x2,0x9 ; Debug Table 0x3.0x13 = 0x18d,0x1001 018e 0007 | | Action Break_Optional 018f 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x3.0x14 = 0x18f,0x1002 0190 0007 | | Action Break_Optional ; Debug Table 0x3.0x15 = 0x190,0x1003 0191 00d0 | | Action Swap_Control ; Debug Table 0x3.0x16 = 0x191,0x1004 0192 00d1 | | Pop_Control Pop_Count_1 0193 49bb |I | Short_Literal 0x1bb ; Debug Table 0x3.0x17 = 0x193,0xc05 0194 00eb | | Load_Encached Diana_Cache 0195 0098 | | Execute Package,Field_Read_Dynamic 0196 012c | , | Execute Any,Size 0197 e003 | | Load 0x0,0x3 0198 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0199 025b | [ | Execute Discrete,Check_In_Type 019a 0273 | s | Execute Discrete,Plus 019b 00d9 | | Load_Top At_Offset_1 019c 0007 | | Action Break_Optional 019d e40a | | Load 0x2,0xa ; Debug Table 0x3.0x18 = 0x19d,0x1401 019e 0007 | | Action Break_Optional 019f 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x3.0x19 = 0x19f,0x1402 01a0 0007 | | Action Break_Optional ; Debug Table 0x3.0x1a = 0x1a0,0x1403 01a1 00d0 | | Action Swap_Control ; Debug Table 0x3.0x1b = 0x1a1,0x1404 01a2 00d1 | | Pop_Control Pop_Count_1 01a3 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x3.0x1c = 0x1a3,0x1004 01a4 00eb | | Load_Encached Diana_Cache 01a5 0098 | | Execute Package,Field_Read_Dynamic 01a6 49c9 |I | Short_Literal 0x1c9 01a7 00eb | | Load_Encached Diana_Cache 01a8 0098 | | Execute Package,Field_Read_Dynamic 01a9 49ca |I | Short_Literal 0x1ca 01aa 00eb | | Load_Encached Diana_Cache 01ab 0095 | | Execute Package,Field_Reference_Dynamic 01ac e004 | | Load 0x0,0x4 01ad 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01ae 7800 |x | Jump 0x1af 01af 00d0 | | Action Swap_Control 01b0 00d1 | | Pop_Control Pop_Count_1 01b1 8210 | | Call 0x1,0x10 ; Debug Table 0x3.0x1d = 0x1b1,0x803 01b2 6802 |h | Jump_Zero 0x1b5 01b3 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x1e = 0x1b3,0x804 01b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01b5 0007 | | Action Break_Optional ; Debug Table 0x3.0x1f = 0x1b5,0x805 01b6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x20 = 0x1b6,0x1801 01b7 7002 |p | Jump_Nonzero 0x1ba 01b8 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x3.0x21 = 0x1b8,0x1802 01b9 7803 |x | Jump 0x1bd 01ba 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x22 = 0x1ba,0x1803 01bb 0217 | | Execute Heap_Access,All_Reference 01bc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01bd 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x3.0x23 = 0x1bd,0x805 01be 00c9 | | Action Pop_Auxiliary_Loop 01bf 0007 | | Action Break_Optional ; Debug Table 0x3.0x24 = 0x1bf,0x802 01c0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x25 = 0x1c0,0x1c01 01c1 021d | | Execute Heap_Access,Is_Null 01c2 6fb9 |o | Jump_Zero 0x17c ; Debug Table 0x3.0x26 = 0x1c2,0x802 01c3 00ce | | Action Pop_Auxiliary 01c4 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x27 = 0x1c4,0x806 01c5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01c6 0000 0000 | | .XXX[0x2] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 0007 | | Action Break_Optional ; Debug Table 0x4 = .DEBUG 0x01cb,0x03c0,0x0002,0x0000,0x0057,0x54f5,0x0000,0x0022 ; Debug Table 0x4.0x0 = 0x1cb,0x1 01cc e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x1 = 0x1cc,0x401 01cd 0007 | | Action Break_Optional 01ce 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x2 = 0x1ce,0x402 01cf 0007 | | Action Break_Optional ; Debug Table 0x4.0x3 = 0x1cf,0x403 01d0 0007 | | Action Break_Optional ; Debug Table 0x4.0x4 = 0x1d0,0x404 01d1 0b01 | | Execute_Immediate Case_Compare,0x1 ; Debug Table 0x4.0x5 = 0x1d1,0x1 01d2 7026 |p& | Jump_Nonzero 0x1f9 01d3 0b0d | | Execute_Immediate Case_Compare,0xd 01d4 7024 |p$ | Jump_Nonzero 0x1f9 01d5 0b03 | | Execute_Immediate Case_Compare,0x3 01d6 7022 |p" | Jump_Nonzero 0x1f9 01d7 0b04 | | Execute_Immediate Case_Compare,0x4 01d8 7020 |p | Jump_Nonzero 0x1f9 01d9 0b10 | | Execute_Immediate Case_Compare,0x10 01da 701e |p | Jump_Nonzero 0x1f9 01db 0b11 | | Execute_Immediate Case_Compare,0x11 01dc 701c |p | Jump_Nonzero 0x1f9 01dd 0b06 | | Execute_Immediate Case_Compare,0x6 01de 701a |p | Jump_Nonzero 0x1f9 01df 0b07 | | Execute_Immediate Case_Compare,0x7 01e0 7018 |p | Jump_Nonzero 0x1f9 01e1 0b08 | | Execute_Immediate Case_Compare,0x8 01e2 7016 |p | Jump_Nonzero 0x1f9 01e3 0b09 | | Execute_Immediate Case_Compare,0x9 01e4 7014 |p | Jump_Nonzero 0x1f9 01e5 0b13 | | Execute_Immediate Case_Compare,0x13 01e6 7012 |p | Jump_Nonzero 0x1f9 01e7 0b0b | | Execute_Immediate Case_Compare,0xb 01e8 7010 |p | Jump_Nonzero 0x1f9 01e9 0b0c | | Execute_Immediate Case_Compare,0xc 01ea 700e |p | Jump_Nonzero 0x1f9 01eb 0b16 | | Execute_Immediate Case_Compare,0x16 01ec 700c |p | Jump_Nonzero 0x1f9 01ed 0b0f | | Execute_Immediate Case_Compare,0xf 01ee 700a |p | Jump_Nonzero 0x1f9 01ef 0b05 | | Execute_Immediate Case_Compare,0x5 01f0 7008 |p | Jump_Nonzero 0x1f9 01f1 0b0a | | Execute_Immediate Case_Compare,0xa 01f2 7006 |p | Jump_Nonzero 0x1f9 01f3 0b12 | | Execute_Immediate Case_Compare,0x12 01f4 7010 |p | Jump_Nonzero 0x205 01f5 0b0e | | Execute_Immediate Case_Compare,0xe 01f6 700e |p | Jump_Nonzero 0x205 01f7 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x6 = 0x1f7,0x6 01f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f9 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x7 = 0x1f9,0x2 01fa 00eb | | Load_Encached Diana_Cache 01fb 18fc | | Execute Package,Field_Execute,Field_Number 0xfc 01fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x8 = 0x1fc,0x801 01fd 021d | | Execute Heap_Access,Is_Null 01fe 00d0 | | Action Swap_Control 01ff 00d1 | | Pop_Control Pop_Count_1 0200 6802 |h | Jump_Zero 0x203 ; Debug Table 0x4.0x9 = 0x200,0x2 0201 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xa = 0x201,0x3 0202 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0203 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xb = 0x203,0x4 0204 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0205 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xc = 0x205,0x5 0206 00eb | | Load_Encached Diana_Cache 0207 18fc | | Execute Package,Field_Execute,Field_Number 0xfc 0208 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xd = 0x208,0xc01 0209 021d | | Execute Heap_Access,Is_Null 020a 00d0 | | Action Swap_Control 020b 00d1 | | Pop_Control Pop_Count_1 020c 0f00 | | Execute_Immediate Equal,0x0 ; Debug Table 0x4.0xe = 0x20c,0x5 020d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 020e 0000 0000 | | .XXX[0x2] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 0007 | | Action Break_Optional ; Debug Table 0x5 = .DEBUG 0x0213,0x03e0,0x0002,0x0000,0x0057,0x54f5,0x0000,0x0296 ; Debug Table 0x5.0x0 = 0x213,0x1 0214 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x1 = 0x214,0x401 0215 0007 | | Action Break_Optional 0216 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0x2 = 0x216,0x402 0217 0007 | | Action Break_Optional ; Debug Table 0x5.0x3 = 0x217,0x403 0218 0007 | | Action Break_Optional ; Debug Table 0x5.0x4 = 0x218,0x404 0219 0b39 | 9 | Execute_Immediate Case_Compare,0x39 ; Debug Table 0x5.0x5 = 0x219,0x1 021a 7007 |p | Jump_Nonzero 0x222 021b 0ba6 | | Execute_Immediate Case_Compare,0xa6 021c 7019 |p | Jump_Nonzero 0x236 021d 0ba5 | | Execute_Immediate Case_Compare,0xa5 021e 7071 |pq | Jump_Nonzero 0x290 021f 0b40 | @ | Execute_Immediate Case_Compare,0x40 0220 706f |po | Jump_Nonzero 0x290 0221 7870 |xp | Jump 0x292 ; Debug Table 0x5.0x6 = 0x221,0x7 0222 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x7 = 0x222,0x2 0223 00eb | | Load_Encached Diana_Cache 0224 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7 0225 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x8 = 0x225,0x801 0226 021d | | Execute Heap_Access,Is_Null 0227 00d0 | | Action Swap_Control 0228 00d1 | | Pop_Control Pop_Count_1 0229 6806 |h | Jump_Zero 0x230 ; Debug Table 0x5.0x9 = 0x229,0x2 022a e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xa = 0x22a,0x3 022b e5ff | | Load 0x2,-0x1 022c 00eb | | Load_Encached Diana_Cache 022d 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 022e 820e | | Call 0x1,0xe 022f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0230 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xb = 0x230,0x4 0231 e5ff | | Load 0x2,-0x1 0232 00eb | | Load_Encached Diana_Cache 0233 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7 0234 820d | | Call 0x1,0xd 0235 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0236 00cf | | Action Mark_Auxiliary ; Debug Table 0x5.0xc = 0x236,0x5 0237 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x5.0xd = 0x237,0xf3ff 0238 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0xe = 0x238,0xc01 0239 00eb | | Load_Encached Diana_Cache 023a 18ea | | Execute Package,Field_Execute,Field_Number 0xea 023b 00eb | | Load_Encached Diana_Cache 023c 1889 | | Execute Package,Field_Execute,Field_Number 0x89 023d e007 | | Load 0x0,0x7 023e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 023f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0240 00cf | | Action Mark_Auxiliary 0241 7847 |xG | Jump 0x289 0242 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xf = 0x242,0xc03 0243 00da | | Load_Top At_Offset_2 0244 0007 | | Action Break_Optional 0245 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x10 = 0x245,0x1001 0246 7002 |p | Jump_Nonzero 0x249 0247 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x11 = 0x247,0x1002 0248 782c |x, | Jump 0x275 0249 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x12 = 0x249,0x1003 024a 0217 | | Execute Heap_Access,All_Reference 024b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 024c 6804 |h | Jump_Zero 0x251 024d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x13 = 0x24d,0x1004 024e 0217 | | Execute Heap_Access,All_Reference 024f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0250 7824 |x$ | Jump 0x275 0251 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x14 = 0x251,0x1005 0252 0007 | | Action Break_Optional 0253 e408 | | Load 0x2,0x8 ; Debug Table 0x5.0x15 = 0x253,0x1401 0254 0007 | | Action Break_Optional 0255 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x5.0x16 = 0x255,0x1402 0256 0007 | | Action Break_Optional ; Debug Table 0x5.0x17 = 0x256,0x1403 0257 00d0 | | Action Swap_Control ; Debug Table 0x5.0x18 = 0x257,0x1404 0258 00d1 | | Pop_Control Pop_Count_1 0259 49bb |I | Short_Literal 0x1bb ; Debug Table 0x5.0x19 = 0x259,0x1005 025a 00eb | | Load_Encached Diana_Cache 025b 0098 | | Execute Package,Field_Read_Dynamic 025c 012c | , | Execute Any,Size 025d e003 | | Load 0x0,0x3 025e 1b17 | | Execute Package,Field_Read,Field_Number 0x17 025f 025b | [ | Execute Discrete,Check_In_Type 0260 0273 | s | Execute Discrete,Plus 0261 00d9 | | Load_Top At_Offset_1 0262 0007 | | Action Break_Optional 0263 e409 | | Load 0x2,0x9 ; Debug Table 0x5.0x1a = 0x263,0x1801 0264 0007 | | Action Break_Optional 0265 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x5.0x1b = 0x265,0x1802 0266 0007 | | Action Break_Optional ; Debug Table 0x5.0x1c = 0x266,0x1803 0267 00d0 | | Action Swap_Control ; Debug Table 0x5.0x1d = 0x267,0x1804 0268 00d1 | | Pop_Control Pop_Count_1 0269 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x5.0x1e = 0x269,0x1404 026a 00eb | | Load_Encached Diana_Cache 026b 0098 | | Execute Package,Field_Read_Dynamic 026c 49c9 |I | Short_Literal 0x1c9 026d 00eb | | Load_Encached Diana_Cache 026e 0098 | | Execute Package,Field_Read_Dynamic 026f 49ca |I | Short_Literal 0x1ca 0270 00eb | | Load_Encached Diana_Cache 0271 0095 | | Execute Package,Field_Reference_Dynamic 0272 e004 | | Load 0x0,0x4 0273 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0274 7800 |x | Jump 0x275 0275 00d0 | | Action Swap_Control 0276 00d1 | | Pop_Control Pop_Count_1 0277 00eb | | Load_Encached Diana_Cache ; Debug Table 0x5.0x1f = 0x277,0xc03 0278 18de | | Execute Package,Field_Execute,Field_Number 0xde 0279 820e | | Call 0x1,0xe 027a 6802 |h | Jump_Zero 0x27d 027b 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x20 = 0x27b,0xc04 027c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 027d 0007 | | Action Break_Optional ; Debug Table 0x5.0x21 = 0x27d,0xc05 027e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x22 = 0x27e,0x1c01 027f 7002 |p | Jump_Nonzero 0x282 0280 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x5.0x23 = 0x280,0x1c02 0281 7803 |x | Jump 0x285 0282 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x24 = 0x282,0x1c03 0283 0217 | | Execute Heap_Access,All_Reference 0284 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0285 e007 | | Load 0x0,0x7 ; Debug Table 0x5.0x25 = 0x285,0xc05 0286 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0287 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0288 00c9 | | Action Pop_Auxiliary_Loop 0289 0007 | | Action Break_Optional ; Debug Table 0x5.0x26 = 0x289,0xc02 028a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x27 = 0x28a,0x2001 028b 021d | | Execute Heap_Access,Is_Null 028c 6fb5 |o | Jump_Zero 0x242 ; Debug Table 0x5.0x28 = 0x28c,0xc02 028d 00ce | | Action Pop_Auxiliary 028e 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x29 = 0x28e,0xc06 028f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0290 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x2a = 0x290,0x6 0291 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0292 00d1 | | Pop_Control Pop_Count_1 0293 4831 |H1 | Short_Literal 0x31 0294 0257 | W | Execute Discrete,Raise 0295 0000 0000 | | .XXX[0x3] 0297 0000 | | 0298 ; -------------------------------------------------------------------------------------- 0298 ; Debug Table 0298 ; -------------------------------------------------------------------------------------- 0298 0003 0006 | | .CONST 0x0003,0x0006 029a 000b 02ca | | .DEBUG 0x000b,0x02ca,0x8000,0x0000,0x0057,0x3555,0x0000,0x0005 02a2 0010 02d0 | | .DEBUG 0x0010,0x02d0,0x8000,0x0000,0x0057,0x54f5,0x0000,0x0015 02aa 0023 02e0 | # | .DEBUG 0x0023,0x02e0,0x0002,0x0000,0x0057,0x3555,0x0000,0x0006 02b2 0153 036e | S n| .DEBUG 0x0153,0x036e,0x0002,0x0000,0x0057,0x3555,0x0000,0x0016 02ba 01cb 03c0 | | .DEBUG 0x01cb,0x03c0,0x0002,0x0000,0x0057,0x54f5,0x0000,0x0022 02c2 0213 03e0 | | .DEBUG 0x0213,0x03e0,0x0002,0x0000,0x0057,0x54f5,0x0000,0x0296 02ca ; -------------------------------------------------------------------------------------- 02ca ; Debug3 Subtable 0x0 02ca ; -------------------------------------------------------------------------------------- 02ca 0002 0000 | | .DBG3TAB 0x0002,0x0000 02cc 000b ffff | | .CONST 0x000b,0xffff 02ce 000d fffe | | .CONST 0x000d,0xfffe 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; Debug3 Subtable 0x1 02d0 ; -------------------------------------------------------------------------------------- 02d0 0007 0000 | | .DBG3TAB 0x0007,0x0000 02d2 0010 ffff | | .CONST 0x0010,0xffff 02d4 0011 fffe | | .CONST 0x0011,0xfffe 02d6 0012 fffd | | .CONST 0x0012,0xfffd 02d8 0013 fffc | | .CONST 0x0013,0xfffc 02da 0015 fffb | | .CONST 0x0015,0xfffb 02dc 0017 fffa | | .CONST 0x0017,0xfffa 02de 0019 fff9 | | .CONST 0x0019,0xfff9 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; Debug3 Subtable 0x2 02e0 ; -------------------------------------------------------------------------------------- 02e0 0004 0042 | B| .DBG3TAB 0x0004,0x0042 02e2 0023 ffff | # | .CONST 0x0023,0xffff 02e4 0024 fffe | $ | .CONST 0x0024,0xfffe 02e6 0027 fffd | ' | .CONST 0x0027,0xfffd 02e8 0028 0001 | ( | .CONST 0x0028,0x0001 02ea 002f 0002 | / | .CONST 0x002f,0x0002 02ec 0031 0003 | 1 | .CONST 0x0031,0x0003 02ee 0032 0401 | 2 | .CONST 0x0032,0x0401 02f0 0034 0402 | 4 | .CONST 0x0034,0x0402 02f2 0035 0403 | 5 | .CONST 0x0035,0x0403 02f4 0036 0404 | 6 | .CONST 0x0036,0x0404 02f6 0037 0003 | 7 | .CONST 0x0037,0x0003 02f8 0067 001c | g | .CONST 0x0067,0x001c 02fa 0069 0004 | i | .CONST 0x0069,0x0004 02fc 006b 0005 | k | .CONST 0x006b,0x0005 02fe 006d 0006 | m | .CONST 0x006d,0x0006 0300 006f 0007 | o | .CONST 0x006f,0x0007 0302 0076 0008 | v | .CONST 0x0076,0x0008 0304 0078 0009 | x | .CONST 0x0078,0x0009 0306 007b 000a | { | .CONST 0x007b,0x000a 0308 007d 000b | } | .CONST 0x007d,0x000b 030a 007f 000c | | .CONST 0x007f,0x000c 030c 0080 f7ff | | .CONST 0x0080,0xf7ff 030e 0081 0801 | | .CONST 0x0081,0x0801 0310 0087 0803 | | .CONST 0x0087,0x0803 0312 008a 0c01 | | .CONST 0x008a,0x0c01 0314 008c 0c02 | | .CONST 0x008c,0x0c02 0316 008e 0c03 | | .CONST 0x008e,0x0c03 0318 0092 0c04 | | .CONST 0x0092,0x0c04 031a 0096 0c05 | | .CONST 0x0096,0x0c05 031c 0098 1001 | | .CONST 0x0098,0x1001 031e 009a 1002 | | .CONST 0x009a,0x1002 0320 009b 1003 | | .CONST 0x009b,0x1003 0322 009c 1004 | | .CONST 0x009c,0x1004 0324 009e 0c05 | | .CONST 0x009e,0x0c05 0326 00a8 1401 | | .CONST 0x00a8,0x1401 0328 00aa 1402 | | .CONST 0x00aa,0x1402 032a 00ab 1403 | | .CONST 0x00ab,0x1403 032c 00ac 1404 | | .CONST 0x00ac,0x1404 032e 00ae 1004 | | .CONST 0x00ae,0x1004 0330 00bc 0803 | | .CONST 0x00bc,0x0803 0332 00be 0804 | | .CONST 0x00be,0x0804 0334 00c0 0805 | | .CONST 0x00c0,0x0805 0336 00c1 1801 | | .CONST 0x00c1,0x1801 0338 00c3 1802 | | .CONST 0x00c3,0x1802 033a 00c5 1803 | | .CONST 0x00c5,0x1803 033c 00c8 0805 | | .CONST 0x00c8,0x0805 033e 00ca 0802 | | .CONST 0x00ca,0x0802 0340 00cb 1c01 | | .CONST 0x00cb,0x1c01 0342 00cd 0802 | | .CONST 0x00cd,0x0802 0344 00cf 0806 | | .CONST 0x00cf,0x0806 0346 00d1 000d | | .CONST 0x00d1,0x000d 0348 00d4 2001 | | .CONST 0x00d4,0x2001 034a 00d6 2002 | | .CONST 0x00d6,0x2002 034c 00d7 2003 | | .CONST 0x00d7,0x2003 034e 00d8 2004 | | .CONST 0x00d8,0x2004 0350 00da 000d | | .CONST 0x00da,0x000d 0352 00dc 000e | | .CONST 0x00dc,0x000e 0354 00eb 000f | | .CONST 0x00eb,0x000f 0356 00f1 0010 | | .CONST 0x00f1,0x0010 0358 00fa 0011 | | .CONST 0x00fa,0x0011 035a 00fc 0012 | | .CONST 0x00fc,0x0012 035c 0102 0013 | | .CONST 0x0102,0x0013 035e 0110 0014 | | .CONST 0x0110,0x0014 0360 0116 0015 | | .CONST 0x0116,0x0015 0362 0118 0016 | | .CONST 0x0118,0x0016 0364 011e 0017 | | .CONST 0x011e,0x0017 0366 0120 0018 | | .CONST 0x0120,0x0018 0368 012e 0019 | . | .CONST 0x012e,0x0019 036a 0132 001a | 2 | .CONST 0x0132,0x001a 036c 0146 001b | F | .CONST 0x0146,0x001b 036e ; -------------------------------------------------------------------------------------- 036e ; Debug3 Subtable 0x3 036e ; -------------------------------------------------------------------------------------- 036e 0002 0026 | &| .DBG3TAB 0x0002,0x0026 0370 0153 ffff | S | .CONST 0x0153,0xffff 0372 0158 0001 | X | .CONST 0x0158,0x0001 0374 0159 0401 | Y | .CONST 0x0159,0x0401 0376 015b 0402 | [ | .CONST 0x015b,0x0402 0378 015c 0403 | \ | .CONST 0x015c,0x0403 037a 015d 0404 | ] | .CONST 0x015d,0x0404 037c 015e 0001 | ^ | .CONST 0x015e,0x0001 037e 016a 0005 | j | .CONST 0x016a,0x0005 0380 016c 0002 | l | .CONST 0x016c,0x0002 0382 016e 0003 | n | .CONST 0x016e,0x0003 0384 0174 0004 | t | .CONST 0x0174,0x0004 0386 0175 f7ff | u | .CONST 0x0175,0xf7ff 0388 0176 0801 | v | .CONST 0x0176,0x0801 038a 017c 0803 | | | .CONST 0x017c,0x0803 038c 017f 0c01 | | .CONST 0x017f,0x0c01 038e 0181 0c02 | | .CONST 0x0181,0x0c02 0390 0183 0c03 | | .CONST 0x0183,0x0c03 0392 0187 0c04 | | .CONST 0x0187,0x0c04 0394 018b 0c05 | | .CONST 0x018b,0x0c05 0396 018d 1001 | | .CONST 0x018d,0x1001 0398 018f 1002 | | .CONST 0x018f,0x1002 039a 0190 1003 | | .CONST 0x0190,0x1003 039c 0191 1004 | | .CONST 0x0191,0x1004 039e 0193 0c05 | | .CONST 0x0193,0x0c05 03a0 019d 1401 | | .CONST 0x019d,0x1401 03a2 019f 1402 | | .CONST 0x019f,0x1402 03a4 01a0 1403 | | .CONST 0x01a0,0x1403 03a6 01a1 1404 | | .CONST 0x01a1,0x1404 03a8 01a3 1004 | | .CONST 0x01a3,0x1004 03aa 01b1 0803 | | .CONST 0x01b1,0x0803 03ac 01b3 0804 | | .CONST 0x01b3,0x0804 03ae 01b5 0805 | | .CONST 0x01b5,0x0805 03b0 01b6 1801 | | .CONST 0x01b6,0x1801 03b2 01b8 1802 | | .CONST 0x01b8,0x1802 03b4 01ba 1803 | | .CONST 0x01ba,0x1803 03b6 01bd 0805 | | .CONST 0x01bd,0x0805 03b8 01bf 0802 | | .CONST 0x01bf,0x0802 03ba 01c0 1c01 | | .CONST 0x01c0,0x1c01 03bc 01c2 0802 | | .CONST 0x01c2,0x0802 03be 01c4 0806 | | .CONST 0x01c4,0x0806 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; Debug3 Subtable 0x4 03c0 ; -------------------------------------------------------------------------------------- 03c0 0000 000f | | .DBG3TAB 0x0000,0x000f 03c2 01cb 0001 | | .CONST 0x01cb,0x0001 03c4 01cc 0401 | | .CONST 0x01cc,0x0401 03c6 01ce 0402 | | .CONST 0x01ce,0x0402 03c8 01cf 0403 | | .CONST 0x01cf,0x0403 03ca 01d0 0404 | | .CONST 0x01d0,0x0404 03cc 01d1 0001 | | .CONST 0x01d1,0x0001 03ce 01f7 0006 | | .CONST 0x01f7,0x0006 03d0 01f9 0002 | | .CONST 0x01f9,0x0002 03d2 01fc 0801 | | .CONST 0x01fc,0x0801 03d4 0200 0002 | | .CONST 0x0200,0x0002 03d6 0201 0003 | | .CONST 0x0201,0x0003 03d8 0203 0004 | | .CONST 0x0203,0x0004 03da 0205 0005 | | .CONST 0x0205,0x0005 03dc 0208 0c01 | | .CONST 0x0208,0x0c01 03de 020c 0005 | | .CONST 0x020c,0x0005 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; Debug3 Subtable 0x5 03e0 ; -------------------------------------------------------------------------------------- 03e0 0001 002a | *| .DBG3TAB 0x0001,0x002a 03e2 0213 0001 | | .CONST 0x0213,0x0001 03e4 0214 0401 | | .CONST 0x0214,0x0401 03e6 0216 0402 | | .CONST 0x0216,0x0402 03e8 0217 0403 | | .CONST 0x0217,0x0403 03ea 0218 0404 | | .CONST 0x0218,0x0404 03ec 0219 0001 | | .CONST 0x0219,0x0001 03ee 0221 0007 | ! | .CONST 0x0221,0x0007 03f0 0222 0002 | " | .CONST 0x0222,0x0002 03f2 0225 0801 | % | .CONST 0x0225,0x0801 03f4 0229 0002 | ) | .CONST 0x0229,0x0002 03f6 022a 0003 | * | .CONST 0x022a,0x0003 03f8 0230 0004 | 0 | .CONST 0x0230,0x0004 03fa 0236 0005 | 6 | .CONST 0x0236,0x0005 03fc 0237 f3ff | 7 | .CONST 0x0237,0xf3ff 03fe 0238 0c01 | 8 | .CONST 0x0238,0x0c01 0400 0242 0c03 | B | .CONST 0x0242,0x0c03 0402 0245 1001 | E | .CONST 0x0245,0x1001 0404 0247 1002 | G | .CONST 0x0247,0x1002 0406 0249 1003 | I | .CONST 0x0249,0x1003 0408 024d 1004 | M | .CONST 0x024d,0x1004 040a 0251 1005 | Q | .CONST 0x0251,0x1005 040c 0253 1401 | S | .CONST 0x0253,0x1401 040e 0255 1402 | U | .CONST 0x0255,0x1402 0410 0256 1403 | V | .CONST 0x0256,0x1403 0412 0257 1404 | W | .CONST 0x0257,0x1404 0414 0259 1005 | Y | .CONST 0x0259,0x1005 0416 0263 1801 | c | .CONST 0x0263,0x1801 0418 0265 1802 | e | .CONST 0x0265,0x1802 041a 0266 1803 | f | .CONST 0x0266,0x1803 041c 0267 1804 | g | .CONST 0x0267,0x1804 041e 0269 1404 | i | .CONST 0x0269,0x1404 0420 0277 0c03 | w | .CONST 0x0277,0x0c03 0422 027b 0c04 | { | .CONST 0x027b,0x0c04 0424 027d 0c05 | } | .CONST 0x027d,0x0c05 0426 027e 1c01 | ~ | .CONST 0x027e,0x1c01 0428 0280 1c02 | | .CONST 0x0280,0x1c02 042a 0282 1c03 | | .CONST 0x0282,0x1c03 042c 0285 0c05 | | .CONST 0x0285,0x0c05 042e 0289 0c02 | | .CONST 0x0289,0x0c02 0430 028a 2001 | | .CONST 0x028a,0x2001 0432 028c 0c02 | | .CONST 0x028c,0x0c02 0434 028e 0c06 | | .CONST 0x028e,0x0c06 0436 0290 0006 | | .CONST 0x0290,0x0006 0438 0000 0000 | | .BLANK 0000[0x1c8]