|
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_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 0318 | | .CONST 0x0318 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0342,0x8000,0x0000,0x005a,0x7d15,0x0000,0x0003 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 003b | ; | .CONST 0x003b ; Address of begin 0019 0131 | 1 | .CONST 0x0131 ; Address of exception handler 001a 000b | | .CONST 0x000b ; Number of locals 001b INIT_0018: 001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x0344,0x8001,0x0000,0x005a,0x7d15,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x1b,0xffff 001c 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1c,0xfffe 001d 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x1d,0xfffd 001e 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x1e,0xfffc 001f 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x1f,0xfffb 0020 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x5 = 0x20,0xfffa 0021 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0022 0322 | " | Declare_Variable Record 0023 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x6 = 0x23,0xfff9 0024 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0025 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x7 = 0x25,0xfff8 0026 02c7 | | Declare_Variable Any 0027 00d8 | | Load_Top At_Offset_0 0028 1c00 | | Execute_Immediate Run_Utility,0x0 0029 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x8 = 0x29,0xfff7 002a e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x9 = 0x2a,0xfff6 002b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 002c 0322 | " | Declare_Variable Record 002d 00d8 | | Load_Top At_Offset_0 002e 1c00 | | Execute_Immediate Run_Utility,0x0 002f e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xa = 0x2f,0xfff5 0030 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0031 0322 | " | Declare_Variable Record 0032 00d8 | | Load_Top At_Offset_0 0033 1c00 | | Execute_Immediate Run_Utility,0x0 0034 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0xb = 0x34,0xfff4 0035 029f 014b | K| Declare_Subprogram INIT_0148,For_Call ; Debug Table 0x1.0xc = 0x35,0xfff3 0037 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call ; Debug Table 0x1.0xd = 0x37,0xfff2 0039 029f 019b | | Declare_Subprogram INIT_0198,For_Call ; Debug Table 0x1.0xe = 0x39,0xfff1 003b BODY_0018: 003b e5ff | | Load 0x2,-0x1 ; Debug Table 0x1.0xf = 0x3b,0x1 003c 840a | | Call 0x2,0xa 003d 7006 |p | Jump_Nonzero 0x44 003e 0092 028c | | Action Push_String_Extended,0x28c ; "Replace_Id failed - Old id is not a simple name" ; Debug Table 0x1.0x10 = 0x3e,0x2 0040 e003 | | Load 0x0,0x3 0041 180d | | Execute Package,Field_Execute,Field_Number 0xd 0042 6245 |bE | Indirect_Literal Discrete,0x288,{0x00000000, 0x5a897501} ; Debug Table 0x1.0x11 = 0x42,0x3 0043 0257 | W | Execute Discrete,Raise 0044 e406 | | Load 0x2,0x6 ; Debug Table 0x1.0x12 = 0x44,0x4 0045 e402 | | Load 0x2,0x2 0046 e001 | | Load 0x0,0x1 0047 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0048 e004 | | Load 0x0,0x4 0049 181a | | Execute Package,Field_Execute,Field_Number 0x1a 004a 4801 |H | Short_Literal 0x1 004b e001 | | Load 0x0,0x1 004c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 004d e001 | | Load 0x0,0x1 004e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 004f c403 | | Store 0x2,0x3 0050 00d2 | | Pop_Control Pop_Count_2 0051 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x13 = 0x51,0x5 0052 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0053 0007 | | Action Break_Optional 0054 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x14 = 0x54,0x401 0055 021d | | Execute Heap_Access,Is_Null 0056 00d0 | | Action Swap_Control 0057 00d1 | | Pop_Control Pop_Count_1 0058 6806 |h | Jump_Zero 0x5f ; Debug Table 0x1.0x15 = 0x58,0x5 0059 0092 028d | | Action Push_String_Extended,0x28d ; "Replace_Id failed - needs a selection with the cursor in it" ; Debug Table 0x1.0x16 = 0x59,0x6 005b e003 | | Load 0x0,0x3 005c 180d | | Execute Package,Field_Execute,Field_Number 0xd 005d 622a |b* | Indirect_Literal Discrete,0x288,{0x00000000, 0x5a897501} ; Debug Table 0x1.0x17 = 0x5d,0x7 005e 0257 | W | Execute Discrete,Raise 005f e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x18 = 0x5f,0x8 0060 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0061 e005 | | Load 0x0,0x5 0062 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 0063 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0064 7006 |p | Jump_Nonzero 0x6b 0065 0092 028e | | Action Push_String_Extended,0x28e ; "Replace_Id failed - image is not source" ; Debug Table 0x1.0x19 = 0x65,0x9 0067 e003 | | Load 0x0,0x3 0068 180d | | Execute Package,Field_Execute,Field_Number 0xd 0069 621e |b | Indirect_Literal Discrete,0x288,{0x00000000, 0x5a897501} ; Debug Table 0x1.0x1a = 0x69,0xa 006a 0257 | W | Execute Discrete,Raise 006b e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x1b = 0x6b,0xb 006c e402 | | Load 0x2,0x2 006d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 006e e006 | | Load 0x0,0x6 006f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0070 e002 | | Load 0x0,0x2 0071 180e | | Execute Package,Field_Execute,Field_Number 0xe 0072 e402 | | Load 0x2,0x2 0073 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0074 00d1 | | Pop_Control Pop_Count_1 0075 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1.0x1c = 0x75,0xc 0076 8409 | | Call 0x2,0x9 0077 a405 | | Store_Unchecked 0x2,0x5 0078 e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x1d = 0x78,0xd 0079 e007 | | Load 0x0,0x7 007a 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 007b 700b |p | Jump_Nonzero 0x87 007c 0092 028f | | Action Push_String_Extended,0x28f ; "Replace_Id failed - New id is not a name" ; Debug Table 0x1.0x1e = 0x7c,0xe 007e e003 | | Load 0x0,0x3 007f 180d | | Execute Package,Field_Execute,Field_Number 0xd 0080 e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x1f = 0x80,0xf 0081 4800 |H | Short_Literal 0x0 0082 e002 | | Load 0x0,0x2 0083 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0084 00d1 | | Pop_Control Pop_Count_1 0085 6202 |b | Indirect_Literal Discrete,0x288,{0x00000000, 0x5a897501} ; Debug Table 0x1.0x20 = 0x85,0x10 0086 0257 | W | Execute Discrete,Raise 0087 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1.0x21 = 0x87,0x11 0088 840a | | Call 0x2,0xa 0089 a408 | | Store_Unchecked 0x2,0x8 008a e5ff | | Load 0x2,-0x1 ; Debug Table 0x1.0x22 = 0x8a,0x12 008b e008 | | Load 0x0,0x8 008c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 008d 00eb | | Load_Encached Diana_Cache 008e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 008f c404 | | Store 0x2,0x4 0090 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x23 = 0x90,0x13 0091 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0092 0f01 | | Execute_Immediate Equal,0x1 0093 6806 |h | Jump_Zero 0x9a 0094 e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x24 = 0x94,0x14 0095 e404 | | Load 0x2,0x4 0096 e402 | | Load 0x2,0x2 0097 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0098 840b | | Call 0x2,0xb 0099 7892 |x | Jump 0x12c 009a 0007 | | Action Break_Optional ; Debug Table 0x1.0x25 = 0x9a,0x15 009b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x26 = 0x9b,0xf7ff 009c e402 | | Load 0x2,0x2 009d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 009e 00eb | | Load_Encached Diana_Cache 009f 18ec | | Execute Package,Field_Execute,Field_Number 0xec 00a0 00eb | | Load_Encached Diana_Cache 00a1 1888 | | Execute Package,Field_Execute,Field_Number 0x88 00a2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00a3 7809 |x | Jump 0xad 00a4 0007 | | Action Break_Optional ; Debug Table 0x1.0x27 = 0xa4,0x802 00a5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x28 = 0xa5,0xc01 00a6 7002 |p | Jump_Nonzero 0xa9 00a7 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x29 = 0xa7,0xc02 00a8 7803 |x | Jump 0xac 00a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x2a = 0xa9,0xc03 00aa 0217 | | Execute Heap_Access,All_Reference 00ab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ac 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x1.0x2b = 0xac,0x802 00ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x2c = 0xad,0x801 00ae 0007 | | Action Break_Optional 00af 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x2d = 0xaf,0x1001 00b0 7002 |p | Jump_Nonzero 0xb3 00b1 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x2e = 0xb1,0x1002 00b2 782c |x, | Jump 0xdf 00b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x2f = 0xb3,0x1003 00b4 0217 | | Execute Heap_Access,All_Reference 00b5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b6 6804 |h | Jump_Zero 0xbb 00b7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x30 = 0xb7,0x1004 00b8 0217 | | Execute Heap_Access,All_Reference 00b9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00ba 7824 |x$ | Jump 0xdf 00bb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x31 = 0xbb,0x1005 00bc 0007 | | Action Break_Optional 00bd e40e | | Load 0x2,0xe ; Debug Table 0x1.0x32 = 0xbd,0x1401 00be 0007 | | Action Break_Optional 00bf 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x1.0x33 = 0xbf,0x1402 00c0 0007 | | Action Break_Optional ; Debug Table 0x1.0x34 = 0xc0,0x1403 00c1 00d0 | | Action Swap_Control ; Debug Table 0x1.0x35 = 0xc1,0x1404 00c2 00d1 | | Pop_Control Pop_Count_1 00c3 49bb |I | Short_Literal 0x1bb ; Debug Table 0x1.0x36 = 0xc3,0x1005 00c4 00eb | | Load_Encached Diana_Cache 00c5 0098 | | Execute Package,Field_Read_Dynamic 00c6 012c | , | Execute Any,Size 00c7 e009 | | Load 0x0,0x9 00c8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00c9 025b | [ | Execute Discrete,Check_In_Type 00ca 0273 | s | Execute Discrete,Plus 00cb 00d9 | | Load_Top At_Offset_1 00cc 0007 | | Action Break_Optional 00cd e40f | | Load 0x2,0xf ; Debug Table 0x1.0x37 = 0xcd,0x1801 00ce 0007 | | Action Break_Optional 00cf 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x1.0x38 = 0xcf,0x1802 00d0 0007 | | Action Break_Optional ; Debug Table 0x1.0x39 = 0xd0,0x1803 00d1 00d0 | | Action Swap_Control ; Debug Table 0x1.0x3a = 0xd1,0x1804 00d2 00d1 | | Pop_Control Pop_Count_1 00d3 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x1.0x3b = 0xd3,0x1404 00d4 00eb | | Load_Encached Diana_Cache 00d5 0098 | | Execute Package,Field_Read_Dynamic 00d6 49c9 |I | Short_Literal 0x1c9 00d7 00eb | | Load_Encached Diana_Cache 00d8 0098 | | Execute Package,Field_Read_Dynamic 00d9 49ca |I | Short_Literal 0x1ca 00da 00eb | | Load_Encached Diana_Cache 00db 0095 | | Execute Package,Field_Reference_Dynamic 00dc e00a | | Load 0x0,0xa 00dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00de 7800 |x | Jump 0xdf 00df 00d0 | | Action Swap_Control 00e0 00d1 | | Pop_Control Pop_Count_1 00e1 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x3c = 0xe1,0x801 00e2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e3 021f | | Execute Heap_Access,Equal 00e4 6fbf |o | Jump_Zero 0xa4 00e5 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x3d = 0xe5,0x803 00e6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00e7 4801 |H | Short_Literal 0x1 00e8 0263 | c | Execute Discrete,Above_Bound 00e9 7041 |pA | Jump_Nonzero 0x12b 00ea e405 | | Load 0x2,0x5 ; Debug Table 0x1.0x3e = 0xea,0x804 00eb e404 | | Load 0x2,0x4 00ec e40c | | Load 0x2,0xc 00ed 0007 | | Action Break_Optional 00ee 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x3f = 0xee,0x1c01 00ef 7002 |p | Jump_Nonzero 0xf2 00f0 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x40 = 0xf0,0x1c02 00f1 782c |x, | Jump 0x11e 00f2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x41 = 0xf2,0x1c03 00f3 0217 | | Execute Heap_Access,All_Reference 00f4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00f5 6804 |h | Jump_Zero 0xfa 00f6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x42 = 0xf6,0x1c04 00f7 0217 | | Execute Heap_Access,All_Reference 00f8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00f9 7824 |x$ | Jump 0x11e 00fa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x43 = 0xfa,0x1c05 00fb 0007 | | Action Break_Optional 00fc e412 | | Load 0x2,0x12 ; Debug Table 0x1.0x44 = 0xfc,0x2001 00fd 0007 | | Action Break_Optional 00fe 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x1.0x45 = 0xfe,0x2002 00ff 0007 | | Action Break_Optional ; Debug Table 0x1.0x46 = 0xff,0x2003 0100 00d0 | | Action Swap_Control ; Debug Table 0x1.0x47 = 0x100,0x2004 0101 00d1 | | Pop_Control Pop_Count_1 0102 49bb |I | Short_Literal 0x1bb ; Debug Table 0x1.0x48 = 0x102,0x1c05 0103 00eb | | Load_Encached Diana_Cache 0104 0098 | | Execute Package,Field_Read_Dynamic 0105 012c | , | Execute Any,Size 0106 e009 | | Load 0x0,0x9 0107 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0108 025b | [ | Execute Discrete,Check_In_Type 0109 0273 | s | Execute Discrete,Plus 010a 00d9 | | Load_Top At_Offset_1 010b 0007 | | Action Break_Optional 010c e413 | | Load 0x2,0x13 ; Debug Table 0x1.0x49 = 0x10c,0x2401 010d 0007 | | Action Break_Optional 010e 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x1.0x4a = 0x10e,0x2402 010f 0007 | | Action Break_Optional ; Debug Table 0x1.0x4b = 0x10f,0x2403 0110 00d0 | | Action Swap_Control ; Debug Table 0x1.0x4c = 0x110,0x2404 0111 00d1 | | Pop_Control Pop_Count_1 0112 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x1.0x4d = 0x112,0x2004 0113 00eb | | Load_Encached Diana_Cache 0114 0098 | | Execute Package,Field_Read_Dynamic 0115 49c9 |I | Short_Literal 0x1c9 0116 00eb | | Load_Encached Diana_Cache 0117 0098 | | Execute Package,Field_Read_Dynamic 0118 49ca |I | Short_Literal 0x1ca 0119 00eb | | Load_Encached Diana_Cache 011a 0095 | | Execute Package,Field_Reference_Dynamic 011b e00a | | Load 0x0,0xa 011c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 011d 7800 |x | Jump 0x11e 011e 00d0 | | Action Swap_Control 011f 00d1 | | Pop_Control Pop_Count_1 0120 840b | | Call 0x2,0xb ; Debug Table 0x1.0x4e = 0x120,0x804 0121 0007 | | Action Break_Optional ; Debug Table 0x1.0x4f = 0x121,0x805 0122 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x50 = 0x122,0x2801 0123 7002 |p | Jump_Nonzero 0x126 0124 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x51 = 0x124,0x2802 0125 7803 |x | Jump 0x129 0126 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x52 = 0x126,0x2803 0127 0217 | | Execute Heap_Access,All_Reference 0128 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0129 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0x1.0x53 = 0x129,0x805 012a 3fbf |? | Loop_Increasing 0xea 012b 00d1 | | Pop_Control Pop_Count_1 012c e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x54 = 0x12c,0x16 012d 4800 |H | Short_Literal 0x0 012e e002 | | Load 0x0,0x2 012f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0130 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0131 TRAP_0018: 0131 6156 |aV | Indirect_Literal Discrete,0x288,{0x00000000, 0x5a897501} 0132 010f | | Execute Exception,Equal 0133 6801 |h | Jump_Zero 0x135 0134 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x1.0x55 = 0x134,0x17 0135 614e |aN | Indirect_Literal Discrete,0x284,{0x00000000, 0x5a846504} 0136 010f | | Execute Exception,Equal 0137 6805 |h | Jump_Zero 0x13d 0138 0092 0290 | | Action Push_String_Extended,0x290 ; "Replace_Id failed - needs a selection" ; Debug Table 0x1.0x56 = 0x138,0x18 013a e003 | | Load 0x0,0x3 013b 180d | | Execute Package,Field_Execute,Field_Number 0xd 013c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 013d e00b | | Load 0x0,0xb ; Debug Table 0x1.0x57 = 0x13d,0x19 013e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 013f 0092 0291 | | Action Push_String_Extended,0x291 ; "Replace_Id failed - internal error" ; Debug Table 0x1.0x58 = 0x13f,0x1a 0141 e00b | | Load 0x0,0xb 0142 180f | | Execute Package,Field_Execute,Field_Number 0xf 0143 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0144 0000 0000 | | .BLANK 0000[0x4] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014e | N | .CONST 0x014e ; Address of begin 0149 0169 | i | .CONST 0x0169 ; Address of exception handler 014a 0003 | | .CONST 0x0003 ; Number of locals 014b INIT_0148: 014b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2 = .DEBUG 0x014b,0x03f8,0x0002,0x0000,0x005a,0x8975,0x0000,0x006e ; Debug Table 0x2.0x0 = 0x14b,0xffff 014c e00c | | Load 0x0,0xc ; Debug Table 0x2.0x1 = 0x14c,0xfffe 014d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 014e BODY_0148: 014e e00c | | Load 0x0,0xc ; Debug Table 0x2.0x2 = 0x14e,0x1 014f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0150 00ec | | Load_Encached Diana_Tree_Cache 0151 e00d | | Load 0x0,0xd 0152 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0153 e00e | | Load 0x0,0xe 0154 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0155 4800 |H | Short_Literal 0x0 0156 e00f | | Load 0x0,0xf 0157 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0158 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0159 4812 |H | Short_Literal 0x12 015a e7ff | | Load 0x3,-0x1 015b e010 | | Load 0x0,0x10 015c 180d | | Execute Package,Field_Execute,Field_Number 0xd 015d 0033 | 3 | Store_Top Heap_Access,At_Offset_3 015e 0059 | Y | Store_Top Discrete,At_Offset_1 015f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x3 = 0x15f,0x2 0160 4602 |F | Jump_Case 0x3 0161 7805 |x | Jump 0x167 ; case 0x0 0162 7804 |x | Jump 0x167 ; case 0x1 0163 7800 |x | Jump 0x164 ; case 0x2 0164 0007 | | Action Break_Optional ; Debug Table 0x2.0x4 = 0x164,0x4 0165 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x5 = 0x165,0x401 0166 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x2.0x6 = 0x166,0x4 0167 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x7 = 0x167,0x5 0168 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0169 TRAP_0148: 0169 0007 | | Action Break_Optional 016a 0007 | | Action Break_Optional ; Debug Table 0x2.0x8 = 0x16a,0x6 016b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x9 = 0x16b,0x801 016c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0x2.0xa = 0x16c,0x6 016d 0000 0000 | | .XXX[0x3] 016f 0000 | | 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0173,0x0410,0x0002,0x0000,0x005a,0x8975,0x0000,0x00be ; Debug Table 0x3.0x0 = 0x173,0x1 0174 01d9 | | Execute Vector,Reverse_Bounds 0175 0263 | c | Execute Discrete,Above_Bound 0176 7018 |p | Jump_Nonzero 0x18f 0177 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0x177,0x2 0178 e7ff | | Load 0x3,-0x1 0179 01d7 | | Execute Vector,Field_Read 017a 00d8 | | Load_Top At_Offset_0 017b 4861 |Ha | Short_Literal 0x61 017c 487a |Hz | Short_Literal 0x7a 017d 0262 | b | Execute Discrete,In_Range 017e 700e |p | Jump_Nonzero 0x18d 017f 00d8 | | Load_Top At_Offset_0 0180 4841 |HA | Short_Literal 0x41 0181 485a |HZ | Short_Literal 0x5a 0182 0262 | b | Execute Discrete,In_Range 0183 7009 |p | Jump_Nonzero 0x18d 0184 00d8 | | Load_Top At_Offset_0 0185 4830 |H0 | Short_Literal 0x30 0186 4839 |H9 | Short_Literal 0x39 0187 0262 | b | Execute Discrete,In_Range 0188 7004 |p | Jump_Nonzero 0x18d 0189 0b5f | _ | Execute_Immediate Case_Compare,0x5f 018a 7002 |p | Jump_Nonzero 0x18d 018b 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x2 = 0x18b,0x4 018c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018d 00d1 | | Pop_Control Pop_Count_1 018e 3fe8 |? | Loop_Increasing 0x177 018f 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x3 = 0x18f,0x5 0190 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0191 0000 0000 | | .BLANK 0000[0x7] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019e | | .CONST 0x019e ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0004 | | .CONST 0x0004 ; Number of locals 019b INIT_0198: 019b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x019b,0x041a,0x0001,0x0000,0x005a,0x8975,0x0000,0x00ee ; Debug Table 0x4.0x0 = 0x19b,0xffff 019c 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x4.0x1 = 0x19c,0xfffe 019d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x2 = 0x19d,0xfffd 019e BODY_0198: 019e 0007 | | Action Break_Optional ; Debug Table 0x4.0x3 = 0x19e,0x1 019f e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x4 = 0x19f,0x401 01a0 0007 | | Action Break_Optional 01a1 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x5 = 0x1a1,0x402 01a2 0007 | | Action Break_Optional ; Debug Table 0x4.0x6 = 0x1a2,0x403 01a3 0007 | | Action Break_Optional ; Debug Table 0x4.0x7 = 0x1a3,0x404 01a4 0007 | | Action Break_Optional ; Debug Table 0x4.0x8 = 0x1a4,0x1 01a5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x9 = 0x1a5,0x801 01a6 49e1 |I | Short_Literal 0x1e1 01a7 00eb | | Load_Encached Diana_Cache 01a8 0098 | | Execute Package,Field_Read_Dynamic 01a9 180d | | Execute Package,Field_Execute,Field_Number 0xd 01aa 7800 |x | Jump 0x1ab 01ab 00d0 | | Action Swap_Control 01ac 00d1 | | Pop_Control Pop_Count_1 01ad 683b |h; | Jump_Zero 0x1e9 ; Debug Table 0x4.0xa = 0x1ad,0x1 01ae e7fe | | Load 0x3,-0x2 01af e7ff | | Load 0x3,-0x1 01b0 00eb | | Load_Encached Diana_Cache 01b1 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 01b2 00eb | | Load_Encached Diana_Cache 01b3 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 01b4 6834 |h4 | Jump_Zero 0x1e9 01b5 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0xb = 0x1b5,0x2 01b6 e007 | | Load 0x0,0x7 01b7 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 01b8 6822 |h" | Jump_Zero 0x1db 01b9 0007 | | Action Break_Optional ; Debug Table 0x4.0xc = 0x1b9,0x3 01ba e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0xd = 0x1ba,0xc01 01bb 0007 | | Action Break_Optional 01bc 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0xe = 0x1bc,0xc02 01bd 0007 | | Action Break_Optional ; Debug Table 0x4.0xf = 0x1bd,0xc03 01be 0007 | | Action Break_Optional ; Debug Table 0x4.0x10 = 0x1be,0xc04 01bf 0007 | | Action Break_Optional ; Debug Table 0x4.0x11 = 0x1bf,0x3 01c0 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x12 = 0x1c0,0x1001 01c1 0007 | | Action Break_Optional 01c2 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x13 = 0x1c2,0x1002 01c3 0007 | | Action Break_Optional ; Debug Table 0x4.0x14 = 0x1c3,0x1003 01c4 0007 | | Action Break_Optional ; Debug Table 0x4.0x15 = 0x1c4,0x1004 01c5 027f | | Execute Discrete,Equal ; Debug Table 0x4.0x16 = 0x1c5,0xc04 01c6 6809 |h | Jump_Zero 0x1d0 01c7 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x17 = 0x1c7,0x4 01c8 00eb | | Load_Encached Diana_Cache 01c9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 01ca e7ff | | Load 0x3,-0x1 01cb e407 | | Load 0x2,0x7 01cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01cd e011 | | Load 0x0,0x11 01ce 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01cf 7819 |x | Jump 0x1e9 01d0 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x18 = 0x1d0,0x5 01d1 e012 | | Load 0x0,0x12 01d2 180e | | Execute Package,Field_Execute,Field_Number 0xe 01d3 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01d4 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x19 = 0x1d4,0x6 01d5 e7ff | | Load 0x3,-0x1 01d6 e407 | | Load 0x2,0x7 01d7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01d8 e011 | | Load 0x0,0x11 01d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01da 780e |x | Jump 0x1e9 01db e408 | | Load 0x2,0x8 ; Debug Table 0x4.0x1a = 0x1db,0x7 01dc 680c |h | Jump_Zero 0x1e9 01dd e7ff | | Load 0x3,-0x1 01de e007 | | Load 0x0,0x7 01df 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01e0 6808 |h | Jump_Zero 0x1e9 01e1 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x1b = 0x1e1,0x8 01e2 00eb | | Load_Encached Diana_Cache 01e3 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 01e4 e7ff | | Load 0x3,-0x1 01e5 e407 | | Load 0x2,0x7 01e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01e7 e011 | | Load 0x0,0x11 01e8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01e9 0007 | | Action Break_Optional ; Debug Table 0x4.0x1c = 0x1e9,0x9 01ea e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x1d = 0x1ea,0x1401 01eb 0007 | | Action Break_Optional 01ec 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x1e = 0x1ec,0x1402 01ed 0007 | | Action Break_Optional ; Debug Table 0x4.0x1f = 0x1ed,0x1403 01ee 0007 | | Action Break_Optional ; Debug Table 0x4.0x20 = 0x1ee,0x1404 01ef 0b0e | | Execute_Immediate Case_Compare,0xe ; Debug Table 0x4.0x21 = 0x1ef,0x9 01f0 7001 |p | Jump_Nonzero 0x1f2 01f1 7807 |x | Jump 0x1f9 ; Debug Table 0x4.0x22 = 0x1f1,0xc 01f2 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x23 = 0x1f2,0xa 01f3 e7fe | | Load 0x3,-0x2 01f4 e7ff | | Load 0x3,-0x1 01f5 00eb | | Load_Encached Diana_Cache 01f6 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 01f7 840b | | Call 0x2,0xb 01f8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x4.0x24 = 0x1f8,0xb 01f9 00d1 | | Pop_Control Pop_Count_1 01fa e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x25 = 0x1fa,0xd 01fb 0007 | | Action Break_Optional 01fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x26 = 0x1fc,0x1801 01fd 0007 | | Action Break_Optional 01fe e606 | | Load 0x3,0x6 ; Debug Table 0x4.0x27 = 0x1fe,0x1c01 01ff 0007 | | Action Break_Optional 0200 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x28 = 0x200,0x1c02 0201 0007 | | Action Break_Optional ; Debug Table 0x4.0x29 = 0x201,0x1c03 0202 00d0 | | Action Swap_Control ; Debug Table 0x4.0x2a = 0x202,0x1c04 0203 00d1 | | Pop_Control Pop_Count_1 0204 49e2 |I | Short_Literal 0x1e2 ; Debug Table 0x4.0x2b = 0x204,0x1801 0205 00eb | | Load_Encached Diana_Cache 0206 0098 | | Execute Package,Field_Read_Dynamic 0207 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0208 7800 |x | Jump 0x209 0209 00d0 | | Action Swap_Control 020a 00d1 | | Pop_Control Pop_Count_1 020b 4604 |F | Jump_Case 0x5 ; Debug Table 0x4.0x2c = 0x20b,0xd 020c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x0 020d 7803 |x | Jump 0x211 ; case 0x1 020e 7809 |x | Jump 0x218 ; case 0x2 020f 7815 |x | Jump 0x225 ; case 0x3 0210 7827 |x' | Jump 0x238 ; case 0x4 0211 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x2d = 0x211,0xf 0212 e7fe | | Load 0x3,-0x2 0213 e7ff | | Load 0x3,-0x1 0214 00eb | | Load_Encached Diana_Cache 0215 1885 | | Execute Package,Field_Execute,Field_Number 0x85 0216 840b | | Call 0x2,0xb 0217 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0218 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x2e = 0x218,0x10 0219 e7fe | | Load 0x3,-0x2 021a e7ff | | Load 0x3,-0x1 021b 00eb | | Load_Encached Diana_Cache 021c 1885 | | Execute Package,Field_Execute,Field_Number 0x85 021d 840b | | Call 0x2,0xb 021e e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x2f = 0x21e,0x11 021f e7fe | | Load 0x3,-0x2 0220 e7ff | | Load 0x3,-0x1 0221 00eb | | Load_Encached Diana_Cache 0222 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0223 840b | | Call 0x2,0xb 0224 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0225 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x30 = 0x225,0x12 0226 e7fe | | Load 0x3,-0x2 0227 e7ff | | Load 0x3,-0x1 0228 00eb | | Load_Encached Diana_Cache 0229 1885 | | Execute Package,Field_Execute,Field_Number 0x85 022a 840b | | Call 0x2,0xb 022b e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x31 = 0x22b,0x13 022c e7fe | | Load 0x3,-0x2 022d e7ff | | Load 0x3,-0x1 022e 00eb | | Load_Encached Diana_Cache 022f 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0230 840b | | Call 0x2,0xb 0231 e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x32 = 0x231,0x14 0232 e7fe | | Load 0x3,-0x2 0233 e7ff | | Load 0x3,-0x1 0234 00eb | | Load_Encached Diana_Cache 0235 1887 | | Execute Package,Field_Execute,Field_Number 0x87 0236 840b | | Call 0x2,0xb 0237 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0238 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x33 = 0x238,0x15 0239 00eb | | Load_Encached Diana_Cache 023a 1888 | | Execute Package,Field_Execute,Field_Number 0x88 023b 0032 | 2 | Store_Top Heap_Access,At_Offset_2 023c 7842 |xB | Jump 0x27f 023d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x34 = 0x23d,0x17 023e 0007 | | Action Break_Optional 023f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x35 = 0x23f,0x2001 0240 7002 |p | Jump_Nonzero 0x243 0241 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x36 = 0x241,0x2002 0242 782c |x, | Jump 0x26f 0243 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x37 = 0x243,0x2003 0244 0217 | | Execute Heap_Access,All_Reference 0245 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0246 6804 |h | Jump_Zero 0x24b 0247 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x38 = 0x247,0x2004 0248 0217 | | Execute Heap_Access,All_Reference 0249 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 024a 7824 |x$ | Jump 0x26f 024b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x39 = 0x24b,0x2005 024c 0007 | | Action Break_Optional 024d e606 | | Load 0x3,0x6 ; Debug Table 0x4.0x3a = 0x24d,0x2401 024e 0007 | | Action Break_Optional 024f 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x4.0x3b = 0x24f,0x2402 0250 0007 | | Action Break_Optional ; Debug Table 0x4.0x3c = 0x250,0x2403 0251 00d0 | | Action Swap_Control ; Debug Table 0x4.0x3d = 0x251,0x2404 0252 00d1 | | Pop_Control Pop_Count_1 0253 49bb |I | Short_Literal 0x1bb ; Debug Table 0x4.0x3e = 0x253,0x2005 0254 00eb | | Load_Encached Diana_Cache 0255 0098 | | Execute Package,Field_Read_Dynamic 0256 012c | , | Execute Any,Size 0257 e009 | | Load 0x0,0x9 0258 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0259 025b | [ | Execute Discrete,Check_In_Type 025a 0273 | s | Execute Discrete,Plus 025b 00d9 | | Load_Top At_Offset_1 025c 0007 | | Action Break_Optional 025d e607 | | Load 0x3,0x7 ; Debug Table 0x4.0x3f = 0x25d,0x2801 025e 0007 | | Action Break_Optional 025f 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x4.0x40 = 0x25f,0x2802 0260 0007 | | Action Break_Optional ; Debug Table 0x4.0x41 = 0x260,0x2803 0261 00d0 | | Action Swap_Control ; Debug Table 0x4.0x42 = 0x261,0x2804 0262 00d1 | | Pop_Control Pop_Count_1 0263 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x4.0x43 = 0x263,0x2404 0264 00eb | | Load_Encached Diana_Cache 0265 0098 | | Execute Package,Field_Read_Dynamic 0266 49c9 |I | Short_Literal 0x1c9 0267 00eb | | Load_Encached Diana_Cache 0268 0098 | | Execute Package,Field_Read_Dynamic 0269 49ca |I | Short_Literal 0x1ca 026a 00eb | | Load_Encached Diana_Cache 026b 0095 | | Execute Package,Field_Reference_Dynamic 026c e00a | | Load 0x0,0xa 026d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 026e 7800 |x | Jump 0x26f 026f 00d0 | | Action Swap_Control 0270 00d1 | | Pop_Control Pop_Count_1 0271 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x4.0x44 = 0x271,0x17 0272 0007 | | Action Break_Optional ; Debug Table 0x4.0x45 = 0x272,0x18 0273 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x46 = 0x273,0x2c01 0274 7002 |p | Jump_Nonzero 0x277 0275 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x4.0x47 = 0x275,0x2c02 0276 7803 |x | Jump 0x27a 0277 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x48 = 0x277,0x2c03 0278 0217 | | Execute Heap_Access,All_Reference 0279 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 027a 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x4.0x49 = 0x27a,0x18 027b e7fd | | Load 0x3,-0x3 ; Debug Table 0x4.0x4a = 0x27b,0x19 027c e7fe | | Load 0x3,-0x2 027d 00da | | Load_Top At_Offset_2 027e 840b | | Call 0x2,0xb 027f 0007 | | Action Break_Optional ; Debug Table 0x4.0x4b = 0x27f,0x16 0280 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x4c = 0x280,0x3001 0281 021d | | Execute Heap_Access,Is_Null 0282 6fba |o | Jump_Zero 0x23d ; Debug Table 0x4.0x4d = 0x282,0x16 0283 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0284 0000 0000 | | .LITERAL {0x00000000, 0x5a846504} 0288 0000 0000 | | .LITERAL {0x00000000, 0x5a897501} 028c ; -------------------------------------------------------------------------------------- 028c ; STRING TABLE 028c ; -------------------------------------------------------------------------------------- 028c 000e | | .STRTAB 0x000e->0x0293 ; "Replace_Id failed - Old id is not a simple name" 028d 003b | ; | .STRTAB 0x003b->0x02aa ; "Replace_Id failed - needs a selection with the cursor in it" 028e 0074 | t | .STRTAB 0x0074->0x02c8 ; "Replace_Id failed - image is not source" 028f 0099 | | .STRTAB 0x0099->0x02db ; "Replace_Id failed - New id is not a name" 0290 00bf | | .STRTAB 0x00bf->0x02ef ; "Replace_Id failed - needs a selection" 0291 00e2 | | .STRTAB 0x00e2->0x0302 ; "Replace_Id failed - internal error" 0292 0102 | | .STREND 0x0102->0x0313 0293 5265 706c |Repl| .STRTAB_STRINGS 0313 0000 0000 | | .BLANK 0000[0x5] 0318 ; -------------------------------------------------------------------------------------- 0318 ; Debug Table 0318 ; -------------------------------------------------------------------------------------- 0318 0003 0005 | | .CONST 0x0003,0x0005 031a 000b 0342 | B| .DEBUG 0x000b,0x0342,0x8000,0x0000,0x005a,0x7d15,0x0000,0x0003 0322 001b 0344 | D| .DEBUG 0x001b,0x0344,0x8001,0x0000,0x005a,0x7d15,0x0000,0x0003 032a 014b 03f8 | K | .DEBUG 0x014b,0x03f8,0x0002,0x0000,0x005a,0x8975,0x0000,0x006e 0332 0173 0410 | s | .DEBUG 0x0173,0x0410,0x0002,0x0000,0x005a,0x8975,0x0000,0x00be 033a 019b 041a | | .DEBUG 0x019b,0x041a,0x0001,0x0000,0x005a,0x8975,0x0000,0x00ee 0342 ; -------------------------------------------------------------------------------------- 0342 ; Debug3 Subtable 0x0 0342 ; -------------------------------------------------------------------------------------- 0342 0000 0000 | | .DBG3TAB 0x0000,0x0000 0344 ; -------------------------------------------------------------------------------------- 0344 ; Debug3 Subtable 0x1 0344 ; -------------------------------------------------------------------------------------- 0344 0010 0049 | I| .DBG3TAB 0x0010,0x0049 0346 001b ffff | | .CONST 0x001b,0xffff 0348 001c fffe | | .CONST 0x001c,0xfffe 034a 001d fffd | | .CONST 0x001d,0xfffd 034c 001e fffc | | .CONST 0x001e,0xfffc 034e 001f fffb | | .CONST 0x001f,0xfffb 0350 0020 fffa | | .CONST 0x0020,0xfffa 0352 0023 fff9 | # | .CONST 0x0023,0xfff9 0354 0025 fff8 | % | .CONST 0x0025,0xfff8 0356 0029 fff7 | ) | .CONST 0x0029,0xfff7 0358 002a fff6 | * | .CONST 0x002a,0xfff6 035a 002f fff5 | / | .CONST 0x002f,0xfff5 035c 0034 fff4 | 4 | .CONST 0x0034,0xfff4 035e 0035 fff3 | 5 | .CONST 0x0035,0xfff3 0360 0037 fff2 | 7 | .CONST 0x0037,0xfff2 0362 0039 fff1 | 9 | .CONST 0x0039,0xfff1 0364 003b 0001 | ; | .CONST 0x003b,0x0001 0366 003e 0002 | > | .CONST 0x003e,0x0002 0368 0042 0003 | B | .CONST 0x0042,0x0003 036a 0044 0004 | D | .CONST 0x0044,0x0004 036c 0051 0005 | Q | .CONST 0x0051,0x0005 036e 0054 0401 | T | .CONST 0x0054,0x0401 0370 0058 0005 | X | .CONST 0x0058,0x0005 0372 0059 0006 | Y | .CONST 0x0059,0x0006 0374 005d 0007 | ] | .CONST 0x005d,0x0007 0376 005f 0008 | _ | .CONST 0x005f,0x0008 0378 0065 0009 | e | .CONST 0x0065,0x0009 037a 0069 000a | i | .CONST 0x0069,0x000a 037c 006b 000b | k | .CONST 0x006b,0x000b 037e 0075 000c | u | .CONST 0x0075,0x000c 0380 0078 000d | x | .CONST 0x0078,0x000d 0382 007c 000e | | | .CONST 0x007c,0x000e 0384 0080 000f | | .CONST 0x0080,0x000f 0386 0085 0010 | | .CONST 0x0085,0x0010 0388 0087 0011 | | .CONST 0x0087,0x0011 038a 008a 0012 | | .CONST 0x008a,0x0012 038c 0090 0013 | | .CONST 0x0090,0x0013 038e 0094 0014 | | .CONST 0x0094,0x0014 0390 009a 0015 | | .CONST 0x009a,0x0015 0392 009b f7ff | | .CONST 0x009b,0xf7ff 0394 00a4 0802 | | .CONST 0x00a4,0x0802 0396 00a5 0c01 | | .CONST 0x00a5,0x0c01 0398 00a7 0c02 | | .CONST 0x00a7,0x0c02 039a 00a9 0c03 | | .CONST 0x00a9,0x0c03 039c 00ac 0802 | | .CONST 0x00ac,0x0802 039e 00ad 0801 | | .CONST 0x00ad,0x0801 03a0 00af 1001 | | .CONST 0x00af,0x1001 03a2 00b1 1002 | | .CONST 0x00b1,0x1002 03a4 00b3 1003 | | .CONST 0x00b3,0x1003 03a6 00b7 1004 | | .CONST 0x00b7,0x1004 03a8 00bb 1005 | | .CONST 0x00bb,0x1005 03aa 00bd 1401 | | .CONST 0x00bd,0x1401 03ac 00bf 1402 | | .CONST 0x00bf,0x1402 03ae 00c0 1403 | | .CONST 0x00c0,0x1403 03b0 00c1 1404 | | .CONST 0x00c1,0x1404 03b2 00c3 1005 | | .CONST 0x00c3,0x1005 03b4 00cd 1801 | | .CONST 0x00cd,0x1801 03b6 00cf 1802 | | .CONST 0x00cf,0x1802 03b8 00d0 1803 | | .CONST 0x00d0,0x1803 03ba 00d1 1804 | | .CONST 0x00d1,0x1804 03bc 00d3 1404 | | .CONST 0x00d3,0x1404 03be 00e1 0801 | | .CONST 0x00e1,0x0801 03c0 00e5 0803 | | .CONST 0x00e5,0x0803 03c2 00ea 0804 | | .CONST 0x00ea,0x0804 03c4 00ee 1c01 | | .CONST 0x00ee,0x1c01 03c6 00f0 1c02 | | .CONST 0x00f0,0x1c02 03c8 00f2 1c03 | | .CONST 0x00f2,0x1c03 03ca 00f6 1c04 | | .CONST 0x00f6,0x1c04 03cc 00fa 1c05 | | .CONST 0x00fa,0x1c05 03ce 00fc 2001 | | .CONST 0x00fc,0x2001 03d0 00fe 2002 | | .CONST 0x00fe,0x2002 03d2 00ff 2003 | | .CONST 0x00ff,0x2003 03d4 0100 2004 | | .CONST 0x0100,0x2004 03d6 0102 1c05 | | .CONST 0x0102,0x1c05 03d8 010c 2401 | $ | .CONST 0x010c,0x2401 03da 010e 2402 | $ | .CONST 0x010e,0x2402 03dc 010f 2403 | $ | .CONST 0x010f,0x2403 03de 0110 2404 | $ | .CONST 0x0110,0x2404 03e0 0112 2004 | | .CONST 0x0112,0x2004 03e2 0120 0804 | | .CONST 0x0120,0x0804 03e4 0121 0805 | ! | .CONST 0x0121,0x0805 03e6 0122 2801 | "( | .CONST 0x0122,0x2801 03e8 0124 2802 | $( | .CONST 0x0124,0x2802 03ea 0126 2803 | &( | .CONST 0x0126,0x2803 03ec 0129 0805 | ) | .CONST 0x0129,0x0805 03ee 012c 0016 | , | .CONST 0x012c,0x0016 03f0 0134 0017 | 4 | .CONST 0x0134,0x0017 03f2 0138 0018 | 8 | .CONST 0x0138,0x0018 03f4 013d 0019 | = | .CONST 0x013d,0x0019 03f6 013f 001a | ? | .CONST 0x013f,0x001a 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; Debug3 Subtable 0x2 03f8 ; -------------------------------------------------------------------------------------- 03f8 0002 0009 | | .DBG3TAB 0x0002,0x0009 03fa 014b ffff | K | .CONST 0x014b,0xffff 03fc 014c fffe | L | .CONST 0x014c,0xfffe 03fe 014e 0001 | N | .CONST 0x014e,0x0001 0400 015f 0002 | _ | .CONST 0x015f,0x0002 0402 0164 0004 | d | .CONST 0x0164,0x0004 0404 0165 0401 | e | .CONST 0x0165,0x0401 0406 0166 0004 | f | .CONST 0x0166,0x0004 0408 0167 0005 | g | .CONST 0x0167,0x0005 040a 016a 0006 | j | .CONST 0x016a,0x0006 040c 016b 0801 | k | .CONST 0x016b,0x0801 040e 016c 0006 | l | .CONST 0x016c,0x0006 0410 ; -------------------------------------------------------------------------------------- 0410 ; Debug3 Subtable 0x3 0410 ; -------------------------------------------------------------------------------------- 0410 0000 0004 | | .DBG3TAB 0x0000,0x0004 0412 0173 0001 | s | .CONST 0x0173,0x0001 0414 0177 0002 | w | .CONST 0x0177,0x0002 0416 018b 0004 | | .CONST 0x018b,0x0004 0418 018f 0005 | | .CONST 0x018f,0x0005 041a ; -------------------------------------------------------------------------------------- 041a ; Debug3 Subtable 0x4 041a ; -------------------------------------------------------------------------------------- 041a 0003 004b | K| .DBG3TAB 0x0003,0x004b 041c 019b ffff | | .CONST 0x019b,0xffff 041e 019c fffe | | .CONST 0x019c,0xfffe 0420 019d fffd | | .CONST 0x019d,0xfffd 0422 019e 0001 | | .CONST 0x019e,0x0001 0424 019f 0401 | | .CONST 0x019f,0x0401 0426 01a1 0402 | | .CONST 0x01a1,0x0402 0428 01a2 0403 | | .CONST 0x01a2,0x0403 042a 01a3 0404 | | .CONST 0x01a3,0x0404 042c 01a4 0001 | | .CONST 0x01a4,0x0001 042e 01a5 0801 | | .CONST 0x01a5,0x0801 0430 01ad 0001 | | .CONST 0x01ad,0x0001 0432 01b5 0002 | | .CONST 0x01b5,0x0002 0434 01b9 0003 | | .CONST 0x01b9,0x0003 0436 01ba 0c01 | | .CONST 0x01ba,0x0c01 0438 01bc 0c02 | | .CONST 0x01bc,0x0c02 043a 01bd 0c03 | | .CONST 0x01bd,0x0c03 043c 01be 0c04 | | .CONST 0x01be,0x0c04 043e 01bf 0003 | | .CONST 0x01bf,0x0003 0440 01c0 1001 | | .CONST 0x01c0,0x1001 0442 01c2 1002 | | .CONST 0x01c2,0x1002 0444 01c3 1003 | | .CONST 0x01c3,0x1003 0446 01c4 1004 | | .CONST 0x01c4,0x1004 0448 01c5 0c04 | | .CONST 0x01c5,0x0c04 044a 01c7 0004 | | .CONST 0x01c7,0x0004 044c 01d0 0005 | | .CONST 0x01d0,0x0005 044e 01d4 0006 | | .CONST 0x01d4,0x0006 0450 01db 0007 | | .CONST 0x01db,0x0007 0452 01e1 0008 | | .CONST 0x01e1,0x0008 0454 01e9 0009 | | .CONST 0x01e9,0x0009 0456 01ea 1401 | | .CONST 0x01ea,0x1401 0458 01ec 1402 | | .CONST 0x01ec,0x1402 045a 01ed 1403 | | .CONST 0x01ed,0x1403 045c 01ee 1404 | | .CONST 0x01ee,0x1404 045e 01ef 0009 | | .CONST 0x01ef,0x0009 0460 01f1 000c | | .CONST 0x01f1,0x000c 0462 01f2 000a | | .CONST 0x01f2,0x000a 0464 01f8 000b | | .CONST 0x01f8,0x000b 0466 01fa 000d | | .CONST 0x01fa,0x000d 0468 01fc 1801 | | .CONST 0x01fc,0x1801 046a 01fe 1c01 | | .CONST 0x01fe,0x1c01 046c 0200 1c02 | | .CONST 0x0200,0x1c02 046e 0201 1c03 | | .CONST 0x0201,0x1c03 0470 0202 1c04 | | .CONST 0x0202,0x1c04 0472 0204 1801 | | .CONST 0x0204,0x1801 0474 020b 000d | | .CONST 0x020b,0x000d 0476 0211 000f | | .CONST 0x0211,0x000f 0478 0218 0010 | | .CONST 0x0218,0x0010 047a 021e 0011 | | .CONST 0x021e,0x0011 047c 0225 0012 | % | .CONST 0x0225,0x0012 047e 022b 0013 | + | .CONST 0x022b,0x0013 0480 0231 0014 | 1 | .CONST 0x0231,0x0014 0482 0238 0015 | 8 | .CONST 0x0238,0x0015 0484 023d 0017 | = | .CONST 0x023d,0x0017 0486 023f 2001 | ? | .CONST 0x023f,0x2001 0488 0241 2002 | A | .CONST 0x0241,0x2002 048a 0243 2003 | C | .CONST 0x0243,0x2003 048c 0247 2004 | G | .CONST 0x0247,0x2004 048e 024b 2005 | K | .CONST 0x024b,0x2005 0490 024d 2401 | M$ | .CONST 0x024d,0x2401 0492 024f 2402 | O$ | .CONST 0x024f,0x2402 0494 0250 2403 | P$ | .CONST 0x0250,0x2403 0496 0251 2404 | Q$ | .CONST 0x0251,0x2404 0498 0253 2005 | S | .CONST 0x0253,0x2005 049a 025d 2801 | ]( | .CONST 0x025d,0x2801 049c 025f 2802 | _( | .CONST 0x025f,0x2802 049e 0260 2803 | `( | .CONST 0x0260,0x2803 04a0 0261 2804 | a( | .CONST 0x0261,0x2804 04a2 0263 2404 | c$ | .CONST 0x0263,0x2404 04a4 0271 0017 | q | .CONST 0x0271,0x0017 04a6 0272 0018 | r | .CONST 0x0272,0x0018 04a8 0273 2c01 | s, | .CONST 0x0273,0x2c01 04aa 0275 2c02 | u, | .CONST 0x0275,0x2c02 04ac 0277 2c03 | w, | .CONST 0x0277,0x2c03 04ae 027a 0018 | z | .CONST 0x027a,0x0018 04b0 027b 0019 | { | .CONST 0x027b,0x0019 04b2 027f 0016 | | .CONST 0x027f,0x0016 04b4 0280 3001 | 0 | .CONST 0x0280,0x3001 04b6 0282 0016 | | .CONST 0x0282,0x0016 04b8 0000 0000 | | .BLANK 0000[0x148]