|
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 0180 | | .CONST 0x0180 ; 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 002a | * | .CONST 0x002a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0014 | | .CONST 0x0014 ; Number of locals 000b INIT_0008: 000b 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x01d2,0x8000,0x0000,0x005a,0x3d55,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb 0015 0007 | | Action Break_Optional ; Debug Table 0x0.0x5 = 0x15,0xfffa 0016 0007 | | Action Break_Optional ; Debug Table 0x0.0x6 = 0x16,0xfff9 0017 00bf | | Action Accept_Activation ; Debug Table 0x0.0x7 = 0x17,0xfff8 0018 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0018,0x01e4,0x8000,0x0000,0x005a,0x3d65,0x0000,0x000b ; Debug Table 0x1.0x0 = 0x18,0xffff 0019 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x19,0xfffe 001a 029d 011b | | Declare_Subprogram INIT_0118,For_Outer_Call ; Debug Table 0x1.0x2 = 0x1a,0xfffd 001c 029d 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call ; Debug Table 0x1.0x3 = 0x1c,0xfffc 001e 029d 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call ; Debug Table 0x1.0x4 = 0x1e,0xfffb 0020 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x5 = 0x20,0xfffa 0021 00c7 | | Action Elaborate_Subprogram 0022 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x6 = 0x22,0xfff9 0023 00c7 | | Action Elaborate_Subprogram 0024 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x7 = 0x24,0xfff8 0025 00c7 | | Action Elaborate_Subprogram 0026 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x8 = 0x26,0xfff7 0027 00c7 | | Action Elaborate_Subprogram 0028 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x9 = 0x28,0xfff6 0029 00c7 | | Action Elaborate_Subprogram 002a BODY_0008: 002a 00bc | | Action Signal_Activated 002b 00bb | | Action Signal_Completion 002c 0000 0000 | | .BLANK 0000[0x4] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0033,0x01fa,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0008 ; Debug Table 0x2.0x0 = 0x33,0x1 0034 e001 | | Load 0x0,0x1 0035 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0036 6806 |h | Jump_Zero 0x3d 0037 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x1 = 0x37,0x2 0038 e001 | | Load 0x0,0x1 0039 1813 | | Execute Package,Field_Execute,Field_Number 0x13 003a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 003b 0c01 | | Execute_Immediate Greater_Equal,0x1 003c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003d 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x2 = 0x3d,0x3 003e 8213 | | Call 0x1,0x13 003f 6802 |h | Jump_Zero 0x42 0040 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x3 = 0x40,0x4 0041 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0042 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x4 = 0x42,0x5 0043 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x004b,0x0206,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0013 ; Debug Table 0x3.0x0 = 0x4b,0x1 004c e001 | | Load 0x0,0x1 004d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 004e 6807 |h | Jump_Zero 0x56 004f 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1 = 0x4f,0x2 0050 e001 | | Load 0x0,0x1 0051 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0052 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0053 00e3 | | Load_Encached Natural_Cache 0054 025b | [ | Execute Discrete,Check_In_Type 0055 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0056 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x2 = 0x56,0x3 0057 8214 | | Call 0x1,0x14 0058 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0059 0000 0000 | | .BLANK 0000[0x7] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0068 | h | .CONST 0x0068 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0002 | | .CONST 0x0002 ; Number of locals 0063 INIT_0060: 0063 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x0063,0x020e,0x0002,0x0000,0x005a,0x3d55,0x0000,0x001e ; Debug Table 0x4.0x0 = 0x63,0xffff 0064 00db | | Load_Top At_Offset_3 0065 00eb | | Load_Encached Diana_Cache 0066 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0067 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0068 BODY_0060: 0068 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1 = 0x68,0x1 0069 0007 | | Action Break_Optional 006a e403 | | Load 0x2,0x3 ; Debug Table 0x4.0x2 = 0x6a,0x401 006b 0007 | | Action Break_Optional 006c 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x3 = 0x6c,0x402 006d 0007 | | Action Break_Optional ; Debug Table 0x4.0x4 = 0x6d,0x403 006e 00d0 | | Action Swap_Control ; Debug Table 0x4.0x5 = 0x6e,0x404 006f 00d1 | | Pop_Control Pop_Count_1 0070 0b3e | > | Execute_Immediate Case_Compare,0x3e ; Debug Table 0x4.0x6 = 0x70,0x1 0071 7008 |p | Jump_Nonzero 0x7a 0072 0b3f | ? | Execute_Immediate Case_Compare,0x3f 0073 7019 |p | Jump_Nonzero 0x8d 0074 0b3b | ; | Execute_Immediate Case_Compare,0x3b 0075 701d |p | Jump_Nonzero 0x93 0076 0b41 | A | Execute_Immediate Case_Compare,0x41 0077 702e |p. | Jump_Nonzero 0xa6 0078 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x7 = 0x78,0xa 0079 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 007a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x8 = 0x7a,0x2 007b 00eb | | Load_Encached Diana_Cache 007c 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 007d e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x9 = 0x7d,0x801 007e 0007 | | Action Break_Optional 007f 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0xa = 0x7f,0x802 0080 0007 | | Action Break_Optional ; Debug Table 0x4.0xb = 0x80,0x803 0081 00d0 | | Action Swap_Control ; Debug Table 0x4.0xc = 0x81,0x804 0082 00d1 | | Pop_Control Pop_Count_1 0083 0f7c | | | Execute_Immediate Equal,0x7c ; Debug Table 0x4.0xd = 0x83,0x2 0084 6806 |h | Jump_Zero 0x8b 0085 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xe = 0x85,0x3 0086 00eb | | Load_Encached Diana_Cache 0087 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 0088 e001 | | Load 0x0,0x1 0089 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 008a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 008b 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xf = 0x8b,0x4 008c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 008d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x10 = 0x8d,0x5 008e 00eb | | Load_Encached Diana_Cache 008f 18e6 | | Execute Package,Field_Execute,Field_Number 0xe6 0090 e001 | | Load 0x0,0x1 0091 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 0092 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0093 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x11 = 0x93,0x6 0094 00eb | | Load_Encached Diana_Cache 0095 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 0096 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x12 = 0x96,0xc01 0097 0007 | | Action Break_Optional 0098 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x13 = 0x98,0xc02 0099 0007 | | Action Break_Optional ; Debug Table 0x4.0x14 = 0x99,0xc03 009a 00d0 | | Action Swap_Control ; Debug Table 0x4.0x15 = 0x9a,0xc04 009b 00d1 | | Pop_Control Pop_Count_1 009c 0f73 | s | Execute_Immediate Equal,0x73 ; Debug Table 0x4.0x16 = 0x9c,0x6 009d 6806 |h | Jump_Zero 0xa4 009e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x17 = 0x9e,0x7 009f 00eb | | Load_Encached Diana_Cache 00a0 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 00a1 e001 | | Load 0x0,0x1 00a2 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 00a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a4 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x18 = 0xa4,0x8 00a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x19 = 0xa6,0x9 00a7 00eb | | Load_Encached Diana_Cache 00a8 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 00a9 e001 | | Load 0x0,0x1 00aa 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 00ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ac 0000 0000 | | .BLANK 0000[0x4] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b8 | | .CONST 0x00b8 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0002 | | .CONST 0x0002 ; Number of locals 00b3 INIT_00b0: 00b3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x00b3,0x0244,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0029 ; Debug Table 0x5.0x0 = 0xb3,0xffff 00b4 00db | | Load_Top At_Offset_3 00b5 00eb | | Load_Encached Diana_Cache 00b6 18ec | | Execute Package,Field_Execute,Field_Number 0xec 00b7 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00b8 BODY_00b0: 00b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0xb8,0x1 00b9 0007 | | Action Break_Optional 00ba e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x2 = 0xba,0x401 00bb 0007 | | Action Break_Optional 00bc 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0x3 = 0xbc,0x402 00bd 0007 | | Action Break_Optional ; Debug Table 0x5.0x4 = 0xbd,0x403 00be 00d0 | | Action Swap_Control ; Debug Table 0x5.0x5 = 0xbe,0x404 00bf 00d1 | | Pop_Control Pop_Count_1 00c0 0b3e | > | Execute_Immediate Case_Compare,0x3e ; Debug Table 0x5.0x6 = 0xc0,0x1 00c1 7008 |p | Jump_Nonzero 0xca 00c2 0b3f | ? | Execute_Immediate Case_Compare,0x3f 00c3 701b |p | Jump_Nonzero 0xdf 00c4 0b3b | ; | Execute_Immediate Case_Compare,0x3b 00c5 7021 |p! | Jump_Nonzero 0xe7 00c6 0b41 | A | Execute_Immediate Case_Compare,0x41 00c7 7034 |p4 | Jump_Nonzero 0xfc 00c8 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x5.0x7 = 0xc8,0xa 00c9 0257 | W | Execute Discrete,Raise 00ca 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x8 = 0xca,0x2 00cb 00eb | | Load_Encached Diana_Cache 00cc 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 00cd e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x9 = 0xcd,0x801 00ce 0007 | | Action Break_Optional 00cf 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0xa = 0xcf,0x802 00d0 0007 | | Action Break_Optional ; Debug Table 0x5.0xb = 0xd0,0x803 00d1 00d0 | | Action Swap_Control ; Debug Table 0x5.0xc = 0xd1,0x804 00d2 00d1 | | Pop_Control Pop_Count_1 00d3 0f7c | | | Execute_Immediate Equal,0x7c ; Debug Table 0x5.0xd = 0xd3,0x2 00d4 6808 |h | Jump_Zero 0xdd 00d5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xe = 0xd5,0x3 00d6 00eb | | Load_Encached Diana_Cache 00d7 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 00d8 e001 | | Load 0x0,0x1 00d9 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 00da 00e3 | | Load_Encached Natural_Cache 00db 025b | [ | Execute Discrete,Check_In_Type 00dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00dd 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x5.0xf = 0xdd,0x4 00de 0257 | W | Execute Discrete,Raise 00df 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x10 = 0xdf,0x5 00e0 00eb | | Load_Encached Diana_Cache 00e1 18e6 | | Execute Package,Field_Execute,Field_Number 0xe6 00e2 e001 | | Load 0x0,0x1 00e3 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 00e4 00e3 | | Load_Encached Natural_Cache 00e5 025b | [ | Execute Discrete,Check_In_Type 00e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x11 = 0xe7,0x6 00e8 00eb | | Load_Encached Diana_Cache 00e9 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 00ea e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x12 = 0xea,0xc01 00eb 0007 | | Action Break_Optional 00ec 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0x13 = 0xec,0xc02 00ed 0007 | | Action Break_Optional ; Debug Table 0x5.0x14 = 0xed,0xc03 00ee 00d0 | | Action Swap_Control ; Debug Table 0x5.0x15 = 0xee,0xc04 00ef 00d1 | | Pop_Control Pop_Count_1 00f0 0f73 | s | Execute_Immediate Equal,0x73 ; Debug Table 0x5.0x16 = 0xf0,0x6 00f1 6808 |h | Jump_Zero 0xfa 00f2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x17 = 0xf2,0x7 00f3 00eb | | Load_Encached Diana_Cache 00f4 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 00f5 e001 | | Load 0x0,0x1 00f6 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 00f7 00e3 | | Load_Encached Natural_Cache 00f8 025b | [ | Execute Discrete,Check_In_Type 00f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00fa 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x5.0x18 = 0xfa,0x8 00fb 0257 | W | Execute Discrete,Raise 00fc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x19 = 0xfc,0x9 00fd 00eb | | Load_Encached Diana_Cache 00fe 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 00ff e001 | | Load 0x0,0x1 0100 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0101 00e3 | | Load_Encached Natural_Cache 0102 025b | [ | Execute Discrete,Check_In_Type 0103 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0104 0000 0000 | | .BLANK 0000[0x4] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x010b,0x027a,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0034 ; Debug Table 0x6.0x0 = 0x10b,0x1 010c e001 | | Load 0x0,0x1 010d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 010e 6805 |h | Jump_Zero 0x114 010f 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x1 = 0x10f,0x2 0110 e001 | | Load 0x0,0x1 0111 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0112 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0113 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0114 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x2 = 0x114,0x3 0115 8212 | | Call 0x1,0x12 0116 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0117 0000 | | .XXX[0x1] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 0007 | | Action Break_Optional ; Debug Table 0x7 = .DEBUG 0x011b,0x0282,0x0002,0x0000,0x005a,0x3d65,0x0000,0x0016 ; Debug Table 0x7.0x0 = 0x11b,0x1 011c e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x1 = 0x11c,0x401 011d 0007 | | Action Break_Optional 011e 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x7.0x2 = 0x11e,0x402 011f 0007 | | Action Break_Optional ; Debug Table 0x7.0x3 = 0x11f,0x403 0120 0007 | | Action Break_Optional ; Debug Table 0x7.0x4 = 0x120,0x404 0121 0b30 | 0 | Execute_Immediate Case_Compare,0x30 ; Debug Table 0x7.0x5 = 0x121,0x1 0122 700e |p | Jump_Nonzero 0x131 0123 0b1d | | Execute_Immediate Case_Compare,0x1d 0124 700c |p | Jump_Nonzero 0x131 0125 0b20 | | Execute_Immediate Case_Compare,0x20 0126 700e |p | Jump_Nonzero 0x135 0127 0b29 | ) | Execute_Immediate Case_Compare,0x29 0128 7010 |p | Jump_Nonzero 0x139 0129 0b22 | " | Execute_Immediate Case_Compare,0x22 012a 700e |p | Jump_Nonzero 0x139 012b 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x6 = 0x12b,0x5 012c 00eb | | Load_Encached Diana_Cache 012d 18ec | | Execute Package,Field_Execute,Field_Number 0xec 012e e002 | | Load 0x0,0x2 012f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0130 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0131 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x7 = 0x131,0x2 0132 e002 | | Load 0x0,0x2 0133 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0134 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0135 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x8 = 0x135,0x3 0136 e002 | | Load 0x0,0x2 0137 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0138 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0139 00cf | | Action Mark_Auxiliary ; Debug Table 0x7.0x9 = 0x139,0x4 013a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0xa = 0x13a,0xf7ff 013b e5ff | | Load 0x2,-0x1 013c 00eb | | Load_Encached Diana_Cache 013d 18ec | | Execute Package,Field_Execute,Field_Number 0xec 013e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 013f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xb = 0x13f,0x801 0140 00eb | | Load_Encached Diana_Cache 0141 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0142 e405 | | Load 0x2,0x5 ; Debug Table 0x7.0xc = 0x142,0xc01 0143 0007 | | Action Break_Optional 0144 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x7.0xd = 0x144,0xc02 0145 0007 | | Action Break_Optional ; Debug Table 0x7.0xe = 0x145,0xc03 0146 00d0 | | Action Swap_Control ; Debug Table 0x7.0xf = 0x146,0xc04 0147 00d1 | | Pop_Control Pop_Count_1 0148 0fa8 | | Execute_Immediate Equal,-0x58 ; Debug Table 0x7.0x10 = 0x148,0x801 0149 6802 |h | Jump_Zero 0x14c 014a 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x11 = 0x14a,0x802 014b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 014c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x12 = 0x14c,0x803 014d e002 | | Load 0x0,0x2 014e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 014f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x0153,0x02aa,0x0002,0x0000,0x005a,0x3d65,0x0000,0x0093 ; Debug Table 0x8.0x0 = 0x153,0x1 0154 8212 | | Call 0x1,0x12 0155 0e00 | | Execute_Immediate Not_Equal,0x0 0156 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0157 0000 | | .XXX[0x1] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 0162 | b | .CONST 0x0162 ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0002 | | .CONST 0x0002 ; Number of locals 015b INIT_0158: 015b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x015b,0x02ae,0x0002,0x0000,0x005a,0x3d65,0x0000,0x00ab ; Debug Table 0x9.0x0 = 0x15b,0xffff 015c 00db | | Load_Top At_Offset_3 015d 4976 |Iv | Short_Literal 0x176 015e 00eb | | Load_Encached Diana_Cache 015f 0098 | | Execute Package,Field_Read_Dynamic 0160 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0161 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0162 BODY_0158: 0162 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x1 = 0x162,0x1 0163 0007 | | Action Break_Optional 0164 e403 | | Load 0x2,0x3 ; Debug Table 0x9.0x2 = 0x164,0x401 0165 0007 | | Action Break_Optional 0166 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x3 = 0x166,0x402 0167 0007 | | Action Break_Optional ; Debug Table 0x9.0x4 = 0x167,0x403 0168 00d0 | | Action Swap_Control ; Debug Table 0x9.0x5 = 0x168,0x404 0169 00d1 | | Pop_Control Pop_Count_1 016a 0b39 | 9 | Execute_Immediate Case_Compare,0x39 ; Debug Table 0x9.0x6 = 0x16a,0x1 016b 700a |p | Jump_Nonzero 0x176 016c 0b38 | 8 | Execute_Immediate Case_Compare,0x38 016d 7008 |p | Jump_Nonzero 0x176 016e 0b02 | | Execute_Immediate Case_Compare,0x2 016f 7006 |p | Jump_Nonzero 0x176 0170 0b37 | 7 | Execute_Immediate Case_Compare,0x37 0171 7008 |p | Jump_Nonzero 0x17a 0172 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x7 = 0x172,0x4 0173 e002 | | Load 0x0,0x2 0174 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0175 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0176 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x8 = 0x176,0x2 0177 e002 | | Load 0x0,0x2 0178 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0179 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017a e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x9 = 0x17a,0x3 017b e002 | | Load 0x0,0x2 017c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 017d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017e 0000 0000 | | .XXX[0x2] 0180 ; -------------------------------------------------------------------------------------- 0180 ; Debug Table 0180 ; -------------------------------------------------------------------------------------- 0180 0003 000a | | .CONST 0x0003,0x000a 0182 000b 01d2 | | .DEBUG 0x000b,0x01d2,0x8000,0x0000,0x005a,0x3d55,0x0000,0x0007 018a 0018 01e4 | | .DEBUG 0x0018,0x01e4,0x8000,0x0000,0x005a,0x3d65,0x0000,0x000b 0192 0033 01fa | 3 | .DEBUG 0x0033,0x01fa,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0008 019a 004b 0206 | K | .DEBUG 0x004b,0x0206,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0013 01a2 0063 020e | c | .DEBUG 0x0063,0x020e,0x0002,0x0000,0x005a,0x3d55,0x0000,0x001e 01aa 00b3 0244 | D| .DEBUG 0x00b3,0x0244,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0029 01b2 010b 027a | z| .DEBUG 0x010b,0x027a,0x0002,0x0000,0x005a,0x3d55,0x0000,0x0034 01ba 011b 0282 | | .DEBUG 0x011b,0x0282,0x0002,0x0000,0x005a,0x3d65,0x0000,0x0016 01c2 0153 02aa | S | .DEBUG 0x0153,0x02aa,0x0002,0x0000,0x005a,0x3d65,0x0000,0x0093 01ca 015b 02ae | [ | .DEBUG 0x015b,0x02ae,0x0002,0x0000,0x005a,0x3d65,0x0000,0x00ab 01d2 ; -------------------------------------------------------------------------------------- 01d2 ; Debug3 Subtable 0x0 01d2 ; -------------------------------------------------------------------------------------- 01d2 0008 0000 | | .DBG3TAB 0x0008,0x0000 01d4 000b ffff | | .CONST 0x000b,0xffff 01d6 000d fffe | | .CONST 0x000d,0xfffe 01d8 000f fffd | | .CONST 0x000f,0xfffd 01da 0011 fffc | | .CONST 0x0011,0xfffc 01dc 0013 fffb | | .CONST 0x0013,0xfffb 01de 0015 fffa | | .CONST 0x0015,0xfffa 01e0 0016 fff9 | | .CONST 0x0016,0xfff9 01e2 0017 fff8 | | .CONST 0x0017,0xfff8 01e4 ; -------------------------------------------------------------------------------------- 01e4 ; Debug3 Subtable 0x1 01e4 ; -------------------------------------------------------------------------------------- 01e4 000a 0000 | | .DBG3TAB 0x000a,0x0000 01e6 0018 ffff | | .CONST 0x0018,0xffff 01e8 0019 fffe | | .CONST 0x0019,0xfffe 01ea 001a fffd | | .CONST 0x001a,0xfffd 01ec 001c fffc | | .CONST 0x001c,0xfffc 01ee 001e fffb | | .CONST 0x001e,0xfffb 01f0 0020 fffa | | .CONST 0x0020,0xfffa 01f2 0022 fff9 | " | .CONST 0x0022,0xfff9 01f4 0024 fff8 | $ | .CONST 0x0024,0xfff8 01f6 0026 fff7 | & | .CONST 0x0026,0xfff7 01f8 0028 fff6 | ( | .CONST 0x0028,0xfff6 01fa ; -------------------------------------------------------------------------------------- 01fa ; Debug3 Subtable 0x2 01fa ; -------------------------------------------------------------------------------------- 01fa 0000 0005 | | .DBG3TAB 0x0000,0x0005 01fc 0033 0001 | 3 | .CONST 0x0033,0x0001 01fe 0037 0002 | 7 | .CONST 0x0037,0x0002 0200 003d 0003 | = | .CONST 0x003d,0x0003 0202 0040 0004 | @ | .CONST 0x0040,0x0004 0204 0042 0005 | B | .CONST 0x0042,0x0005 0206 ; -------------------------------------------------------------------------------------- 0206 ; Debug3 Subtable 0x3 0206 ; -------------------------------------------------------------------------------------- 0206 0000 0003 | | .DBG3TAB 0x0000,0x0003 0208 004b 0001 | K | .CONST 0x004b,0x0001 020a 004f 0002 | O | .CONST 0x004f,0x0002 020c 0056 0003 | V | .CONST 0x0056,0x0003 020e ; -------------------------------------------------------------------------------------- 020e ; Debug3 Subtable 0x4 020e ; -------------------------------------------------------------------------------------- 020e 0001 0019 | | .DBG3TAB 0x0001,0x0019 0210 0063 ffff | c | .CONST 0x0063,0xffff 0212 0068 0001 | h | .CONST 0x0068,0x0001 0214 006a 0401 | j | .CONST 0x006a,0x0401 0216 006c 0402 | l | .CONST 0x006c,0x0402 0218 006d 0403 | m | .CONST 0x006d,0x0403 021a 006e 0404 | n | .CONST 0x006e,0x0404 021c 0070 0001 | p | .CONST 0x0070,0x0001 021e 0078 000a | x | .CONST 0x0078,0x000a 0220 007a 0002 | z | .CONST 0x007a,0x0002 0222 007d 0801 | } | .CONST 0x007d,0x0801 0224 007f 0802 | | .CONST 0x007f,0x0802 0226 0080 0803 | | .CONST 0x0080,0x0803 0228 0081 0804 | | .CONST 0x0081,0x0804 022a 0083 0002 | | .CONST 0x0083,0x0002 022c 0085 0003 | | .CONST 0x0085,0x0003 022e 008b 0004 | | .CONST 0x008b,0x0004 0230 008d 0005 | | .CONST 0x008d,0x0005 0232 0093 0006 | | .CONST 0x0093,0x0006 0234 0096 0c01 | | .CONST 0x0096,0x0c01 0236 0098 0c02 | | .CONST 0x0098,0x0c02 0238 0099 0c03 | | .CONST 0x0099,0x0c03 023a 009a 0c04 | | .CONST 0x009a,0x0c04 023c 009c 0006 | | .CONST 0x009c,0x0006 023e 009e 0007 | | .CONST 0x009e,0x0007 0240 00a4 0008 | | .CONST 0x00a4,0x0008 0242 00a6 0009 | | .CONST 0x00a6,0x0009 0244 ; -------------------------------------------------------------------------------------- 0244 ; Debug3 Subtable 0x5 0244 ; -------------------------------------------------------------------------------------- 0244 0001 0019 | | .DBG3TAB 0x0001,0x0019 0246 00b3 ffff | | .CONST 0x00b3,0xffff 0248 00b8 0001 | | .CONST 0x00b8,0x0001 024a 00ba 0401 | | .CONST 0x00ba,0x0401 024c 00bc 0402 | | .CONST 0x00bc,0x0402 024e 00bd 0403 | | .CONST 0x00bd,0x0403 0250 00be 0404 | | .CONST 0x00be,0x0404 0252 00c0 0001 | | .CONST 0x00c0,0x0001 0254 00c8 000a | | .CONST 0x00c8,0x000a 0256 00ca 0002 | | .CONST 0x00ca,0x0002 0258 00cd 0801 | | .CONST 0x00cd,0x0801 025a 00cf 0802 | | .CONST 0x00cf,0x0802 025c 00d0 0803 | | .CONST 0x00d0,0x0803 025e 00d1 0804 | | .CONST 0x00d1,0x0804 0260 00d3 0002 | | .CONST 0x00d3,0x0002 0262 00d5 0003 | | .CONST 0x00d5,0x0003 0264 00dd 0004 | | .CONST 0x00dd,0x0004 0266 00df 0005 | | .CONST 0x00df,0x0005 0268 00e7 0006 | | .CONST 0x00e7,0x0006 026a 00ea 0c01 | | .CONST 0x00ea,0x0c01 026c 00ec 0c02 | | .CONST 0x00ec,0x0c02 026e 00ed 0c03 | | .CONST 0x00ed,0x0c03 0270 00ee 0c04 | | .CONST 0x00ee,0x0c04 0272 00f0 0006 | | .CONST 0x00f0,0x0006 0274 00f2 0007 | | .CONST 0x00f2,0x0007 0276 00fa 0008 | | .CONST 0x00fa,0x0008 0278 00fc 0009 | | .CONST 0x00fc,0x0009 027a ; -------------------------------------------------------------------------------------- 027a ; Debug3 Subtable 0x6 027a ; -------------------------------------------------------------------------------------- 027a 0000 0003 | | .DBG3TAB 0x0000,0x0003 027c 010b 0001 | | .CONST 0x010b,0x0001 027e 010f 0002 | | .CONST 0x010f,0x0002 0280 0114 0003 | | .CONST 0x0114,0x0003 0282 ; -------------------------------------------------------------------------------------- 0282 ; Debug3 Subtable 0x7 0282 ; -------------------------------------------------------------------------------------- 0282 0001 0012 | | .DBG3TAB 0x0001,0x0012 0284 011b 0001 | | .CONST 0x011b,0x0001 0286 011c 0401 | | .CONST 0x011c,0x0401 0288 011e 0402 | | .CONST 0x011e,0x0402 028a 011f 0403 | | .CONST 0x011f,0x0403 028c 0120 0404 | | .CONST 0x0120,0x0404 028e 0121 0001 | ! | .CONST 0x0121,0x0001 0290 012b 0005 | + | .CONST 0x012b,0x0005 0292 0131 0002 | 1 | .CONST 0x0131,0x0002 0294 0135 0003 | 5 | .CONST 0x0135,0x0003 0296 0139 0004 | 9 | .CONST 0x0139,0x0004 0298 013a f7ff | : | .CONST 0x013a,0xf7ff 029a 013f 0801 | ? | .CONST 0x013f,0x0801 029c 0142 0c01 | B | .CONST 0x0142,0x0c01 029e 0144 0c02 | D | .CONST 0x0144,0x0c02 02a0 0145 0c03 | E | .CONST 0x0145,0x0c03 02a2 0146 0c04 | F | .CONST 0x0146,0x0c04 02a4 0148 0801 | H | .CONST 0x0148,0x0801 02a6 014a 0802 | J | .CONST 0x014a,0x0802 02a8 014c 0803 | L | .CONST 0x014c,0x0803 02aa ; -------------------------------------------------------------------------------------- 02aa ; Debug3 Subtable 0x8 02aa ; -------------------------------------------------------------------------------------- 02aa 0000 0001 | | .DBG3TAB 0x0000,0x0001 02ac 0153 0001 | S | .CONST 0x0153,0x0001 02ae ; -------------------------------------------------------------------------------------- 02ae ; Debug3 Subtable 0x9 02ae ; -------------------------------------------------------------------------------------- 02ae 0001 0009 | | .DBG3TAB 0x0001,0x0009 02b0 015b ffff | [ | .CONST 0x015b,0xffff 02b2 0162 0001 | b | .CONST 0x0162,0x0001 02b4 0164 0401 | d | .CONST 0x0164,0x0401 02b6 0166 0402 | f | .CONST 0x0166,0x0402 02b8 0167 0403 | g | .CONST 0x0167,0x0403 02ba 0168 0404 | h | .CONST 0x0168,0x0404 02bc 016a 0001 | j | .CONST 0x016a,0x0001 02be 0172 0004 | r | .CONST 0x0172,0x0004 02c0 0176 0002 | v | .CONST 0x0176,0x0002 02c2 017a 0003 | z | .CONST 0x017a,0x0003 02c4 0000 0000 | | .BLANK 0000[0x13c]