|
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 01d0 | | .CONST 0x01d0 ; 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 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,0x0202,0x0000,0x0000,0x005a,0x8bb5,0x0000,0x05a1 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 00bf | | Action Accept_Activation 0012 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0012,0x020a,0x0000,0x0000,0x005a,0x8d85,0x0000,0x0006 ; Debug Table 0x1.0x0 = 0x12,0xffff 0013 029d 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call ; Debug Table 0x1.0x1 = 0x13,0xfffe 0015 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x2 = 0x15,0xfffd 0016 00c7 | | Action Elaborate_Subprogram 0017 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x3 = 0x17,0xfffc 0018 00c7 | | Action Elaborate_Subprogram 0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x4 = 0x19,0xfffb 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 0036 | 6 | .CONST 0x0036 ; Address of begin 0021 0089 | | .CONST 0x0089 ; Address of exception handler 0022 0008 | | .CONST 0x0008 ; Number of locals 0023 INIT_0020: 0023 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x0023,0x0216,0x0001,0x0000,0x005a,0x8bb5,0x0000,0x05a2 ; Debug Table 0x2.0x0 = 0x23,0xffff 0024 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0025 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x1 = 0x25,0xfffe 0026 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0027 02ff | | Declare_Variable Variant_Record 0028 00d8 | | Load_Top At_Offset_0 0029 1c00 | | Execute_Immediate Run_Utility,0x0 002a e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x2 = 0x2a,0xfffd 002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002c 02c7 | | Declare_Variable Any 002d 00d8 | | Load_Top At_Offset_0 002e 1c00 | | Execute_Immediate Run_Utility,0x0 002f 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x2.0x3 = 0x2f,0xfffc 0030 e5fd | | Load 0x2,-0x3 0031 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0032 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x2.0x4 = 0x32,0xfffb 0033 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0034 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x2.0x5 = 0x34,0xfffa 0035 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x6 = 0x35,0xfff9 0036 BODY_0020: 0036 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x7 = 0x36,0x1 0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0038 e403 | | Load 0x2,0x3 0039 0007 | | Action Break_Optional 003a e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x8 = 0x3a,0x401 003b 0217 | | Execute Heap_Access,All_Reference 003c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 003d e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x9 = 0x3d,0x1 003e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 003f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0040 00d1 | | Pop_Control Pop_Count_1 0041 c402 | | Store 0x2,0x2 0042 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xa = 0x42,0x2 0043 6801 |h | Jump_Zero 0x45 0044 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0xb = 0x44,0x3 0045 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0xc = 0x45,0x4 0046 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0047 e404 | | Load 0x2,0x4 0048 0120 | | Execute Any,Is_Value 0049 6803 |h | Jump_Zero 0x4d 004a e002 | | Load 0x0,0x2 004b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004c 7801 |x | Jump 0x4e 004d e404 | | Load 0x2,0x4 004e 6179 |ay | Indirect_Literal Discrete,0x1c8,{0x00000000, 0x00004000} 004f e5fe | | Load 0x2,-0x2 0050 e403 | | Load 0x2,0x3 0051 e002 | | Load 0x0,0x2 0052 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0053 c404 | | Store 0x2,0x4 0054 c402 | | Store 0x2,0x2 0055 7827 |x' | Jump 0x7d 0056 0007 | | Action Break_Optional ; Debug Table 0x2.0xd = 0x56,0x6 0057 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xe = 0x57,0x801 0058 0217 | | Execute Heap_Access,All_Reference 0059 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 005a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x2.0xf = 0x5a,0x6 005b e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x10 = 0x5b,0x7 005c 00d9 | | Load_Top At_Offset_1 005d e002 | | Load 0x0,0x2 005e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 005f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0060 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x11 = 0x60,0x8 0061 00db | | Load_Top At_Offset_3 0062 027c | | | Execute Discrete,Less 0063 700b |p | Jump_Nonzero 0x6f 0064 e5ff | | Load 0x2,-0x1 0065 6807 |h | Jump_Zero 0x6d 0066 e408 | | Load 0x2,0x8 ; Debug Table 0x2.0x12 = 0x66,0xc01 0067 0007 | | Action Break_Optional 0068 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0x13 = 0x68,0xc02 0069 0007 | | Action Break_Optional ; Debug Table 0x2.0x14 = 0x69,0xc03 006a 0007 | | Action Break_Optional ; Debug Table 0x2.0x15 = 0x6a,0xc04 006b 0f55 | U | Execute_Immediate Equal,0x55 ; Debug Table 0x2.0x16 = 0x6b,0x8 006c 7801 |x | Jump 0x6e 006d 4800 |H | Short_Literal 0x0 006e 6807 |h | Jump_Zero 0x76 006f e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x17 = 0x6f,0x9 0070 e5fd | | Load 0x2,-0x3 0071 e5ff | | Load 0x2,-0x1 0072 8210 | | Call 0x1,0x10 0073 c5fd | | Store 0x2,-0x3 0074 c404 | | Store 0x2,0x4 0075 780b |x | Jump 0x81 ; Debug Table 0x2.0x18 = 0x75,0xa 0076 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x19 = 0x76,0xb 0077 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0078 0007 | | Action Break_Optional ; Debug Table 0x2.0x1a = 0x78,0xc 0079 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1b = 0x79,0x1001 007a 0217 | | Execute Heap_Access,All_Reference 007b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 007c a405 | | Store_Unchecked 0x2,0x5 ; Debug Table 0x2.0x1c = 0x7c,0xc 007d 0007 | | Action Break_Optional ; Debug Table 0x2.0x1d = 0x7d,0x5 007e 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1e = 0x7e,0x1401 007f 021d | | Execute Heap_Access,Is_Null 0080 6fd5 |o | Jump_Zero 0x56 ; Debug Table 0x2.0x1f = 0x80,0x5 0081 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x20 = 0x81,0xd 0082 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0083 e404 | | Load 0x2,0x4 0084 e002 | | Load 0x0,0x2 0085 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0086 c404 | | Store 0x2,0x4 0087 c402 | | Store 0x2,0x2 0088 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0089 TRAP_0020: 0089 0007 | | Action Break_Optional 008a e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x21 = 0x8a,0xe 008b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008c e404 | | Load 0x2,0x4 008d e002 | | Load 0x0,0x2 008e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 008f c404 | | Store 0x2,0x4 0090 c402 | | Store 0x2,0x2 0091 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0092 0000 0000 | | .BLANK 0000[0x6] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00a1 | | .CONST 0x00a1 ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0002 | | .CONST 0x0002 ; Number of locals 009b INIT_0098: 009b e003 | | Load 0x0,0x3 ; Debug Table 0x3 = .DEBUG 0x009b,0x025c,0x0001,0x0000,0x005a,0x8bb5,0x0000,0x05b9 ; Debug Table 0x3.0x0 = 0x9b,0xffff 009c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 009d 00db | | Load_Top At_Offset_3 009e e004 | | Load 0x0,0x4 009f 180d | | Execute Package,Field_Execute,Field_Number 0xd 00a0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00a1 BODY_0098: 00a1 781f |x | Jump 0xc1 00a2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0xa2,0x2 00a3 0217 | | Execute Heap_Access,All_Reference 00a4 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 00a5 0d04 | | Execute_Immediate Less,0x4 00a6 6816 |h | Jump_Zero 0xbd 00a7 00d8 | | Load_Top At_Offset_0 00a8 0217 | | Execute Heap_Access,All_Reference 00a9 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 00aa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ab 0007 | | Action Break_Optional 00ac 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0xac,0x401 00ad 021d | | Execute Heap_Access,Is_Null 00ae 00d0 | | Action Swap_Control 00af 00d1 | | Pop_Control Pop_Count_1 00b0 700c |p | Jump_Nonzero 0xbd ; Debug Table 0x3.0x3 = 0xb0,0x2 00b1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x4 = 0xb1,0x3 00b2 0219 | | Execute Heap_Access,All_Read 00b3 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 00b4 00d8 | | Load_Top At_Offset_0 00b5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00b6 e5ff | | Load 0x2,-0x1 00b7 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 00b8 4800 |H | Short_Literal 0x0 00b9 820d | | Call 0x1,0xd 00ba 00d9 | | Load_Top At_Offset_1 00bb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00bc 00d1 | | Pop_Control Pop_Count_1 00bd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x5 = 0xbd,0x4 00be 0217 | | Execute Heap_Access,All_Reference 00bf 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f 00c0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x6 = 0xc1,0x1 00c2 77df |w | Jump_Nonzero 0xa2 00c3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00c4 0000 0000 | | .BLANK 0000[0x4] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d1 | | .CONST 0x00d1 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0002 | | .CONST 0x0002 ; Number of locals 00cb INIT_00c8: 00cb e003 | | Load 0x0,0x3 ; Debug Table 0x4 = .DEBUG 0x00cb,0x026c,0x0001,0x0000,0x005a,0x8bb5,0x0000,0x05c1 ; Debug Table 0x4.0x0 = 0xcb,0xffff 00cc 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 00cd 00db | | Load_Top At_Offset_3 00ce e004 | | Load 0x0,0x4 00cf 180d | | Execute Package,Field_Execute,Field_Number 0xd 00d0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00d1 BODY_00c8: 00d1 781f |x | Jump 0xf1 00d2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1 = 0xd2,0x2 00d3 0217 | | Execute Heap_Access,All_Reference 00d4 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 00d5 0d04 | | Execute_Immediate Less,0x4 00d6 6816 |h | Jump_Zero 0xed 00d7 00d8 | | Load_Top At_Offset_0 00d8 0217 | | Execute Heap_Access,All_Reference 00d9 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 00da 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00db 0007 | | Action Break_Optional 00dc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x2 = 0xdc,0x401 00dd 021d | | Execute Heap_Access,Is_Null 00de 00d0 | | Action Swap_Control 00df 00d1 | | Pop_Control Pop_Count_1 00e0 700c |p | Jump_Nonzero 0xed ; Debug Table 0x4.0x3 = 0xe0,0x2 00e1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x4 = 0xe1,0x3 00e2 0219 | | Execute Heap_Access,All_Read 00e3 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 00e4 00d8 | | Load_Top At_Offset_0 00e5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e6 e5ff | | Load 0x2,-0x1 00e7 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 00e8 4800 |H | Short_Literal 0x0 00e9 820d | | Call 0x1,0xd 00ea 00d9 | | Load_Top At_Offset_1 00eb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00ec 00d1 | | Pop_Control Pop_Count_1 00ed 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x5 = 0xed,0x4 00ee 0217 | | Execute Heap_Access,All_Reference 00ef 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f 00f0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00f1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x6 = 0xf1,0x1 00f2 77df |w | Jump_Nonzero 0xd2 00f3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 0112 | | .CONST 0x0112 ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0009 | | .CONST 0x0009 ; Number of locals 00fb INIT_00f8: 00fb 4803 |H | Short_Literal 0x3 ; Debug Table 0x5 = .DEBUG 0x00fb,0x027c,0x0001,0x0000,0x005a,0x8d85,0x0000,0x0017 ; Debug Table 0x5.0x0 = 0xfb,0xffff 00fc 032a | * | Declare_Type Record,Incomplete 00fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0xfd,0xfffe 00fe 02a0 | | Declare_Subprogram Null_Subprogram 00ff 4818 |H | Short_Literal 0x18 0100 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0101 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x5.0x2 = 0x101,0xfffd 0102 00ec | | Load_Encached Diana_Tree_Cache 0103 00da | | Load_Top At_Offset_2 0104 02a0 | | Declare_Subprogram Null_Subprogram 0105 e402 | | Load 0x2,0x2 0106 0326 | & | Complete_Type Record,By_Defining 0107 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x5.0x3 = 0x107,0xfffc 0108 e5fe | | Load 0x2,-0x2 0109 0031 | 1 | Store_Top Heap_Access,At_Offset_1 010a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x4 = 0x10a,0xfffb 010b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x5 = 0x10b,0xfffa 010c 0007 | | Action Break_Optional 010d 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x6 = 0x10d,0xfff9 010e 0007 | | Action Break_Optional 010f e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x7 = 0x10f,0xfff8 0110 0007 | | Action Break_Optional 0111 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x5.0x8 = 0x111,0xfff7 0112 BODY_00f8: 0112 7896 |x | Jump 0x1a9 0113 0007 | | Action Break_Optional ; Debug Table 0x5.0x9 = 0x113,0x2 0114 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0xa = 0x114,0x401 0115 0217 | | Execute Heap_Access,All_Reference 0116 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0117 a405 | | Store_Unchecked 0x2,0x5 ; Debug Table 0x5.0xb = 0x117,0x2 0118 e5fd | | Load 0x2,-0x3 ; Debug Table 0x5.0xc = 0x118,0x3 0119 e405 | | Load 0x2,0x5 011a e002 | | Load 0x0,0x2 011b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 011c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 011d e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0xd = 0x11d,0x4 011e 6838 |h8 | Jump_Zero 0x157 011f e405 | | Load 0x2,0x5 ; Debug Table 0x5.0xe = 0x11f,0x801 0120 0007 | | Action Break_Optional 0121 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0xf = 0x121,0x802 0122 0007 | | Action Break_Optional ; Debug Table 0x5.0x10 = 0x122,0x803 0123 0007 | | Action Break_Optional ; Debug Table 0x5.0x11 = 0x123,0x804 0124 0f55 | U | Execute_Immediate Equal,0x55 ; Debug Table 0x5.0x12 = 0x124,0x4 0125 6831 |h1 | Jump_Zero 0x157 0126 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x13 = 0x126,0x5 0127 700f |p | Jump_Nonzero 0x137 0128 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x14 = 0x128,0x6 0129 0322 | " | Declare_Variable Record 012a 6099 |` | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x7fffffff} 012b 00d9 | | Load_Top At_Offset_1 012c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 012d e405 | | Load 0x2,0x5 012e 00d9 | | Load_Top At_Offset_1 012f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0130 e403 | | Load 0x2,0x3 0131 00d9 | | Load_Top At_Offset_1 0132 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0133 e403 | | Load 0x2,0x3 0134 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0135 a406 | | Store_Unchecked 0x2,0x6 0136 786d |xm | Jump 0x1a4 0137 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x15 = 0x137,0x7 0138 003b | ; | Store_Top Access,At_Offset_3 0139 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x16 = 0x139,0x8 013a 0227 | ' | Execute Access,All_Reference 013b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 013c 003a | : | Store_Top Access,At_Offset_2 013d 7806 |x | Jump 0x144 013e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x17 = 0x13e,0xa 013f 003b | ; | Store_Top Access,At_Offset_3 0140 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x18 = 0x140,0xb 0141 0227 | ' | Execute Access,All_Reference 0142 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0143 003a | : | Store_Top Access,At_Offset_2 0144 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x19 = 0x144,0x9 0145 77f8 |w | Jump_Nonzero 0x13e 0146 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x1a = 0x146,0xc 0147 0322 | " | Declare_Variable Record 0148 607b |`{ | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x7fffffff} 0149 00d9 | | Load_Top At_Offset_1 014a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 014b e405 | | Load 0x2,0x5 014c 00d9 | | Load_Top At_Offset_1 014d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 014e e403 | | Load 0x2,0x3 014f 00d9 | | Load_Top At_Offset_1 0150 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0151 e403 | | Load 0x2,0x3 0152 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0153 00db | | Load_Top At_Offset_3 0154 0227 | ' | Execute Access,All_Reference 0155 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0156 784d |xM | Jump 0x1a4 0157 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1b = 0x157,0xd 0158 700f |p | Jump_Nonzero 0x168 0159 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x1c = 0x159,0xe 015a 0322 | " | Declare_Variable Record 015b 00d9 | | Load_Top At_Offset_1 015c 00d9 | | Load_Top At_Offset_1 015d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 015e e405 | | Load 0x2,0x5 015f 00d9 | | Load_Top At_Offset_1 0160 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0161 e403 | | Load 0x2,0x3 0162 00d9 | | Load_Top At_Offset_1 0163 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0164 e403 | | Load 0x2,0x3 0165 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0166 a406 | | Store_Unchecked 0x2,0x6 0167 783c |x< | Jump 0x1a4 0168 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1d = 0x168,0xf 0169 e406 | | Load 0x2,0x6 016a 0227 | ' | Execute Access,All_Reference 016b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 016c 027c | | | Execute Discrete,Less 016d 680f |h | Jump_Zero 0x17d 016e e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x1e = 0x16e,0x10 016f 0322 | " | Declare_Variable Record 0170 00d9 | | Load_Top At_Offset_1 0171 00d9 | | Load_Top At_Offset_1 0172 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0173 e405 | | Load 0x2,0x5 0174 00d9 | | Load_Top At_Offset_1 0175 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0176 e406 | | Load 0x2,0x6 0177 00d9 | | Load_Top At_Offset_1 0178 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0179 e403 | | Load 0x2,0x3 017a 03b6 | | Declare_Variable Access,By_Allocation,With_Value 017b a406 | | Store_Unchecked 0x2,0x6 017c 7827 |x' | Jump 0x1a4 017d 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1f = 0x17d,0x11 017e 003b | ; | Store_Top Access,At_Offset_3 017f 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x20 = 0x17f,0x12 0180 0227 | ' | Execute Access,All_Reference 0181 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0182 003a | : | Store_Top Access,At_Offset_2 0183 0007 | | Action Break_Optional ; Debug Table 0x5.0x21 = 0x183,0x13 0184 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x22 = 0x184,0x14 0185 6806 |h | Jump_Zero 0x18c 0186 00d8 | | Load_Top At_Offset_0 0187 00da | | Load_Top At_Offset_2 0188 0227 | ' | Execute Access,All_Reference 0189 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 018a 027c | | | Execute Discrete,Less 018b 6811 |h | Jump_Zero 0x19d 018c e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x23 = 0x18c,0x15 018d 0322 | " | Declare_Variable Record 018e 00d9 | | Load_Top At_Offset_1 018f 00d9 | | Load_Top At_Offset_1 0190 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0191 e405 | | Load 0x2,0x5 0192 00d9 | | Load_Top At_Offset_1 0193 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0194 00da | | Load_Top At_Offset_2 0195 00d9 | | Load_Top At_Offset_1 0196 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0197 e403 | | Load 0x2,0x3 0198 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0199 00db | | Load_Top At_Offset_3 019a 0227 | ' | Execute Access,All_Reference 019b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 019c 7807 |x | Jump 0x1a4 ; Debug Table 0x5.0x24 = 0x19c,0x16 019d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x25 = 0x19d,0x17 019e 003b | ; | Store_Top Access,At_Offset_3 019f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x26 = 0x19f,0x18 01a0 0227 | ' | Execute Access,All_Reference 01a1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01a2 003a | : | Store_Top Access,At_Offset_2 01a3 7fe0 | | Jump 0x184 01a4 0007 | | Action Break_Optional ; Debug Table 0x5.0x27 = 0x1a4,0x19 01a5 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x28 = 0x1a5,0xc01 01a6 0217 | | Execute Heap_Access,All_Reference 01a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01a8 a404 | | Store_Unchecked 0x2,0x4 ; Debug Table 0x5.0x29 = 0x1a8,0x19 01a9 0007 | | Action Break_Optional ; Debug Table 0x5.0x2a = 0x1a9,0x1 01aa e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x2b = 0x1aa,0x1001 01ab 021d | | Execute Heap_Access,Is_Null 01ac 6f66 |of | Jump_Zero 0x113 ; Debug Table 0x5.0x2c = 0x1ac,0x1 01ad e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x2d = 0x1ad,0x1a 01ae a404 | | Store_Unchecked 0x2,0x4 01af 780f |x | Jump 0x1bf 01b0 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x2e = 0x1b0,0x1c 01b1 0227 | ' | Execute Access,All_Reference 01b2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01b3 e404 | | Load 0x2,0x4 01b4 00eb | | Load_Encached Diana_Cache 01b5 1876 | v | Execute Package,Field_Execute,Field_Number 0x76 01b6 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x2f = 0x1b6,0x1d 01b7 0227 | ' | Execute Access,All_Reference 01b8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01b9 a406 | | Store_Unchecked 0x2,0x6 01ba 0007 | | Action Break_Optional ; Debug Table 0x5.0x30 = 0x1ba,0x1e 01bb e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x31 = 0x1bb,0x1401 01bc 0217 | | Execute Heap_Access,All_Reference 01bd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01be a404 | | Store_Unchecked 0x2,0x4 ; Debug Table 0x5.0x32 = 0x1be,0x1e 01bf 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x33 = 0x1bf,0x1b 01c0 77ef |w | Jump_Nonzero 0x1b0 01c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c2 0000 0000 | | .XXX[0x2] 01c4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 01c8 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 01cc 0000 0000 | | .BLANK 0000[0x4] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; Debug Table 01d0 ; -------------------------------------------------------------------------------------- 01d0 0003 0006 | | .CONST 0x0003,0x0006 01d2 000b 0202 | | .DEBUG 0x000b,0x0202,0x0000,0x0000,0x005a,0x8bb5,0x0000,0x05a1 01da 0012 020a | | .DEBUG 0x0012,0x020a,0x0000,0x0000,0x005a,0x8d85,0x0000,0x0006 01e2 0023 0216 | # | .DEBUG 0x0023,0x0216,0x0001,0x0000,0x005a,0x8bb5,0x0000,0x05a2 01ea 009b 025c | \| .DEBUG 0x009b,0x025c,0x0001,0x0000,0x005a,0x8bb5,0x0000,0x05b9 01f2 00cb 026c | l| .DEBUG 0x00cb,0x026c,0x0001,0x0000,0x005a,0x8bb5,0x0000,0x05c1 01fa 00fb 027c | || .DEBUG 0x00fb,0x027c,0x0001,0x0000,0x005a,0x8d85,0x0000,0x0017 0202 ; -------------------------------------------------------------------------------------- 0202 ; Debug3 Subtable 0x0 0202 ; -------------------------------------------------------------------------------------- 0202 0003 0000 | | .DBG3TAB 0x0003,0x0000 0204 000b ffff | | .CONST 0x000b,0xffff 0206 000d fffe | | .CONST 0x000d,0xfffe 0208 000f fffd | | .CONST 0x000f,0xfffd 020a ; -------------------------------------------------------------------------------------- 020a ; Debug3 Subtable 0x1 020a ; -------------------------------------------------------------------------------------- 020a 0005 0000 | | .DBG3TAB 0x0005,0x0000 020c 0012 ffff | | .CONST 0x0012,0xffff 020e 0013 fffe | | .CONST 0x0013,0xfffe 0210 0015 fffd | | .CONST 0x0015,0xfffd 0212 0017 fffc | | .CONST 0x0017,0xfffc 0214 0019 fffb | | .CONST 0x0019,0xfffb 0216 ; -------------------------------------------------------------------------------------- 0216 ; Debug3 Subtable 0x2 0216 ; -------------------------------------------------------------------------------------- 0216 0007 001b | | .DBG3TAB 0x0007,0x001b 0218 0023 ffff | # | .CONST 0x0023,0xffff 021a 0025 fffe | % | .CONST 0x0025,0xfffe 021c 002a fffd | * | .CONST 0x002a,0xfffd 021e 002f fffc | / | .CONST 0x002f,0xfffc 0220 0032 fffb | 2 | .CONST 0x0032,0xfffb 0222 0034 fffa | 4 | .CONST 0x0034,0xfffa 0224 0035 fff9 | 5 | .CONST 0x0035,0xfff9 0226 0036 0001 | 6 | .CONST 0x0036,0x0001 0228 003a 0401 | : | .CONST 0x003a,0x0401 022a 003d 0001 | = | .CONST 0x003d,0x0001 022c 0042 0002 | B | .CONST 0x0042,0x0002 022e 0044 0003 | D | .CONST 0x0044,0x0003 0230 0045 0004 | E | .CONST 0x0045,0x0004 0232 0056 0006 | V | .CONST 0x0056,0x0006 0234 0057 0801 | W | .CONST 0x0057,0x0801 0236 005a 0006 | Z | .CONST 0x005a,0x0006 0238 005b 0007 | [ | .CONST 0x005b,0x0007 023a 0060 0008 | ` | .CONST 0x0060,0x0008 023c 0066 0c01 | f | .CONST 0x0066,0x0c01 023e 0068 0c02 | h | .CONST 0x0068,0x0c02 0240 0069 0c03 | i | .CONST 0x0069,0x0c03 0242 006a 0c04 | j | .CONST 0x006a,0x0c04 0244 006b 0008 | k | .CONST 0x006b,0x0008 0246 006f 0009 | o | .CONST 0x006f,0x0009 0248 0075 000a | u | .CONST 0x0075,0x000a 024a 0076 000b | v | .CONST 0x0076,0x000b 024c 0078 000c | x | .CONST 0x0078,0x000c 024e 0079 1001 | y | .CONST 0x0079,0x1001 0250 007c 000c | | | .CONST 0x007c,0x000c 0252 007d 0005 | } | .CONST 0x007d,0x0005 0254 007e 1401 | ~ | .CONST 0x007e,0x1401 0256 0080 0005 | | .CONST 0x0080,0x0005 0258 0081 000d | | .CONST 0x0081,0x000d 025a 008a 000e | | .CONST 0x008a,0x000e 025c ; -------------------------------------------------------------------------------------- 025c ; Debug3 Subtable 0x3 025c ; -------------------------------------------------------------------------------------- 025c 0001 0006 | | .DBG3TAB 0x0001,0x0006 025e 009b ffff | | .CONST 0x009b,0xffff 0260 00a2 0002 | | .CONST 0x00a2,0x0002 0262 00ac 0401 | | .CONST 0x00ac,0x0401 0264 00b0 0002 | | .CONST 0x00b0,0x0002 0266 00b1 0003 | | .CONST 0x00b1,0x0003 0268 00bd 0004 | | .CONST 0x00bd,0x0004 026a 00c1 0001 | | .CONST 0x00c1,0x0001 026c ; -------------------------------------------------------------------------------------- 026c ; Debug3 Subtable 0x4 026c ; -------------------------------------------------------------------------------------- 026c 0001 0006 | | .DBG3TAB 0x0001,0x0006 026e 00cb ffff | | .CONST 0x00cb,0xffff 0270 00d2 0002 | | .CONST 0x00d2,0x0002 0272 00dc 0401 | | .CONST 0x00dc,0x0401 0274 00e0 0002 | | .CONST 0x00e0,0x0002 0276 00e1 0003 | | .CONST 0x00e1,0x0003 0278 00ed 0004 | | .CONST 0x00ed,0x0004 027a 00f1 0001 | | .CONST 0x00f1,0x0001 027c ; -------------------------------------------------------------------------------------- 027c ; Debug3 Subtable 0x5 027c ; -------------------------------------------------------------------------------------- 027c 0009 002b | +| .DBG3TAB 0x0009,0x002b 027e 00fb ffff | | .CONST 0x00fb,0xffff 0280 00fd fffe | | .CONST 0x00fd,0xfffe 0282 0101 fffd | | .CONST 0x0101,0xfffd 0284 0107 fffc | | .CONST 0x0107,0xfffc 0286 010a fffb | | .CONST 0x010a,0xfffb 0288 010b fffa | | .CONST 0x010b,0xfffa 028a 010d fff9 | | .CONST 0x010d,0xfff9 028c 010f fff8 | | .CONST 0x010f,0xfff8 028e 0111 fff7 | | .CONST 0x0111,0xfff7 0290 0113 0002 | | .CONST 0x0113,0x0002 0292 0114 0401 | | .CONST 0x0114,0x0401 0294 0117 0002 | | .CONST 0x0117,0x0002 0296 0118 0003 | | .CONST 0x0118,0x0003 0298 011d 0004 | | .CONST 0x011d,0x0004 029a 011f 0801 | | .CONST 0x011f,0x0801 029c 0121 0802 | ! | .CONST 0x0121,0x0802 029e 0122 0803 | " | .CONST 0x0122,0x0803 02a0 0123 0804 | # | .CONST 0x0123,0x0804 02a2 0124 0004 | $ | .CONST 0x0124,0x0004 02a4 0126 0005 | & | .CONST 0x0126,0x0005 02a6 0128 0006 | ( | .CONST 0x0128,0x0006 02a8 0137 0007 | 7 | .CONST 0x0137,0x0007 02aa 0139 0008 | 9 | .CONST 0x0139,0x0008 02ac 013e 000a | > | .CONST 0x013e,0x000a 02ae 0140 000b | @ | .CONST 0x0140,0x000b 02b0 0144 0009 | D | .CONST 0x0144,0x0009 02b2 0146 000c | F | .CONST 0x0146,0x000c 02b4 0157 000d | W | .CONST 0x0157,0x000d 02b6 0159 000e | Y | .CONST 0x0159,0x000e 02b8 0168 000f | h | .CONST 0x0168,0x000f 02ba 016e 0010 | n | .CONST 0x016e,0x0010 02bc 017d 0011 | } | .CONST 0x017d,0x0011 02be 017f 0012 | | .CONST 0x017f,0x0012 02c0 0183 0013 | | .CONST 0x0183,0x0013 02c2 0184 0014 | | .CONST 0x0184,0x0014 02c4 018c 0015 | | .CONST 0x018c,0x0015 02c6 019c 0016 | | .CONST 0x019c,0x0016 02c8 019d 0017 | | .CONST 0x019d,0x0017 02ca 019f 0018 | | .CONST 0x019f,0x0018 02cc 01a4 0019 | | .CONST 0x01a4,0x0019 02ce 01a5 0c01 | | .CONST 0x01a5,0x0c01 02d0 01a8 0019 | | .CONST 0x01a8,0x0019 02d2 01a9 0001 | | .CONST 0x01a9,0x0001 02d4 01aa 1001 | | .CONST 0x01aa,0x1001 02d6 01ac 0001 | | .CONST 0x01ac,0x0001 02d8 01ad 001a | | .CONST 0x01ad,0x001a 02da 01b0 001c | | .CONST 0x01b0,0x001c 02dc 01b6 001d | | .CONST 0x01b6,0x001d 02de 01ba 001e | | .CONST 0x01ba,0x001e 02e0 01bb 1401 | | .CONST 0x01bb,0x1401 02e2 01be 001e | | .CONST 0x01be,0x001e 02e4 01bf 001b | | .CONST 0x01bf,0x001b 02e6 0000 0000 | | .BLANK 0000[0x11a]