|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 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,0x0054,0xf7e5,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,0x0054,0xf7e5,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, 0x57935501} ; 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, 0x57935501} ; 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, 0x57935501} ; 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, 0x57935501} ; 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, 0x57935501}
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, 0x56858504}
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,0x0057,0x9355,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,0x0057,0x9355,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,0x0057,0x9355,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, 0x56858504}
0288 0000 0000 | | .LITERAL {0x00000000, 0x57935501}
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,0x0054,0xf7e5,0x0000,0x0003
0322 001b 0344 | D| .DEBUG 0x001b,0x0344,0x8001,0x0000,0x0054,0xf7e5,0x0000,0x0003
032a 014b 03f8 | K | .DEBUG 0x014b,0x03f8,0x0002,0x0000,0x0057,0x9355,0x0000,0x006e
0332 0173 0410 | s | .DEBUG 0x0173,0x0410,0x0002,0x0000,0x0057,0x9355,0x0000,0x00be
033a 019b 041a | | .DEBUG 0x019b,0x041a,0x0001,0x0000,0x0057,0x9355,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]