|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d2ce3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 04a8 | | .CONST 0x04a8 ; 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 8002 | | .CONST 0x8002 ; 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 For_Outer_Call,Visible,Unelaborated,INIT_0018
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 002b | + | .CONST 0x002b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0006 | | .CONST 0x0006 ; Number of locals
001b INIT_0018:
001b 4800 |H | Short_Literal 0x0
001c 4802 |H | Short_Literal 0x2
001d 029f 0043 | C| Declare_Subprogram For_Call,INIT_0040
001f 03fd | | Declare_Type Discrete,Defined
0020 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "***"
0022 e001 | | Load 0x0,0x1
0023 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0024 02c7 | | Declare_Variable Any
0025 00d8 | | Load_Top At_Offset_0
0026 1c00 | | Execute_Immediate Run_Utility,0x0
0027 029f 006b | k| Declare_Subprogram For_Call,INIT_0068
0029 029f 0083 | | Declare_Subprogram For_Call,INIT_0080
002b BODY_0018:
002b 00da | | Load_Top At_Offset_2
002c 00ea | | Load_Encached Null_String_Cache
002d e5ff | | Load 0x2,-0x1
002e 4800 |H | Short_Literal 0x0
002f e001 | | Load 0x0,0x1
0030 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0031 c404 | | Store 0x2,0x4
0032 00cf | | Action Mark_Auxiliary
0033 7802 |x | Jump 0x36
0034 8406 | | Call 0x2,0x6
0035 00c9 | | Action Pop_Auxiliary_Loop
0036 00db | | Load_Top At_Offset_3
0037 e001 | | Load 0x0,0x1
0038 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0039 6ffa |o | Jump_Zero 0x34
003a 00ce | | Action Pop_Auxiliary
003b 00da | | Load_Top At_Offset_2
003c e001 | | Load 0x0,0x1
003d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
003e c404 | | Store 0x2,0x4
003f 4502 |E | Exit_Subprogram 0x2
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 4607 |F | Jump_Case 0x7
0044 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0045 7806 |x | Jump 0x4c ; case 0x1
0046 7809 |x | Jump 0x50 ; case 0x2
0047 780d |x | Jump 0x55 ; case 0x3
0048 7810 |x | Jump 0x59 ; case 0x4
0049 7811 |x | Jump 0x5b ; case 0x5
004a 7812 |x | Jump 0x5d ; case 0x6
004b 7815 |x | Jump 0x61 ; case 0x7
004c 00da | | Load_Top At_Offset_2
004d 0091 03c4 | | Action Push_String_Extended_Indexed,0x3c4 ; "INSERT"
004f 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0050 00db | | Load_Top At_Offset_3
0051 00db | | Load_Top At_Offset_3
0052 00e0 | | Load_Encached Standard_Cache
0053 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0054 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0055 00da | | Load_Top At_Offset_2
0056 00e0 | | Load_Encached Standard_Cache
0057 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0058 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0059 00db | | Load_Top At_Offset_3
005a 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
005b 00db | | Load_Top At_Offset_3
005c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
005d e402 | | Load 0x2,0x2
005e 00dc | | Load_Top At_Offset_4
005f 0267 | g | Execute Discrete,Predecessor
0060 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0061 e402 | | Load 0x2,0x2
0062 00dc | | Load_Top At_Offset_4
0063 0268 | h | Execute Discrete,Successor
0064 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0065 0000 0000 | | .XXX[0x3]
0067 0000 | |
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006e | n | .CONST 0x006e ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0002 | | .CONST 0x0002 ; Number of locals
006b INIT_0068:
006b e404 | | Load 0x2,0x4
006c e001 | | Load 0x0,0x1
006d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
006e BODY_0068:
006e 00d8 | | Load_Top At_Offset_0
006f e403 | | Load 0x2,0x3
0070 01df | | Execute Vector,Equal
0071 6802 |h | Jump_Zero 0x74
0072 00ea | | Load_Encached Null_String_Cache
0073 00ca | | Action Exit_Nullary_Function
0074 480a |H | Short_Literal 0xa
0075 00d9 | | Load_Top At_Offset_1
0076 01cb | | Execute Vector,Append
0077 8405 | | Call 0x2,0x5
0078 01cc | | Execute Vector,Catenate
0079 00ca | | Action Exit_Nullary_Function
007a 0000 0000 | | .BLANK 0000[0x6]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 00b2 | | .CONST 0x00b2 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 000e | | .CONST 0x000e ; Number of locals
0083 INIT_0080:
0083 e404 | | Load 0x2,0x4
0084 e001 | | Load 0x0,0x1
0085 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0086 e402 | | Load 0x2,0x2
0087 1c02 | | Execute_Immediate Run_Utility,0x2
0088 e404 | | Load 0x2,0x4
0089 e001 | | Load 0x0,0x1
008a 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
008b e404 | | Load 0x2,0x4
008c e001 | | Load 0x0,0x1
008d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
008e e404 | | Load 0x2,0x4
008f e001 | | Load 0x0,0x1
0090 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0091 8405 | | Call 0x2,0x5
0092 00da | | Load_Top At_Offset_2
0093 01dd | | Execute Vector,First
0094 4800 |H | Short_Literal 0x0
0095 e604 | | Load 0x3,0x4
0096 4820 |H | Short_Literal 0x20
0097 e002 | | Load 0x0,0x2
0098 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0099 0aff | | Execute_Immediate Plus,-0x1
009a e604 | | Load 0x3,0x4
009b 01cf | | Execute Vector,Slice_Read
009c 0007 | | Action Break_Optional
009d e003 | | Load 0x0,0x3
009e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
009f 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00a0 02c7 | | Declare_Variable Any
00a1 00d8 | | Load_Top At_Offset_0
00a2 1c00 | | Execute_Immediate Run_Utility,0x0
00a3 e003 | | Load 0x0,0x3
00a4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00a6 00e1 | | Load_Encached Boolean_Cache
00a7 e003 | | Load 0x0,0x3
00a8 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
00a9 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00aa e003 | | Load 0x0,0x3
00ab 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ac 02c7 | | Declare_Variable Any
00ad 00d8 | | Load_Top At_Offset_0
00ae 1c00 | | Execute_Immediate Run_Utility,0x0
00af e003 | | Load 0x0,0x3
00b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b1 00e1 | | Load_Encached Boolean_Cache
00b2 BODY_0080:
00b2 e602 | | Load 0x3,0x2
00b3 4602 |F | Jump_Case 0x2
00b4 79f7 |y | Jump 0x2ac ; case 0x0
00b5 7918 |y | Jump 0x1ce ; case 0x1
00b6 7800 |x | Jump 0xb7 ; case 0x2
00b7 e004 | | Load 0x0,0x4
00b8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b9 4802 |H | Short_Literal 0x2
00ba 0092 03c8 | | Action Push_String_Extended,0x3c8 ; "Replacing \x22"
00bc e607 | | Load 0x3,0x7
00bd 01cc | | Execute Vector,Catenate
00be 0092 03c9 | | Action Push_String_Extended,0x3c9 ; "\x22 with \x22"
00c0 01cc | | Execute Vector,Catenate
00c1 e605 | | Load 0x3,0x5
00c2 01cc | | Execute Vector,Catenate
00c3 0092 03ca | | Action Push_String_Extended,0x3ca ; "\x22"
00c5 01cc | | Execute Vector,Catenate
00c6 e005 | | Load 0x0,0x5
00c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00c8 e605 | | Load 0x3,0x5
00c9 e607 | | Load 0x3,0x7
00ca 01de | | Execute Vector,Not_Equal
00cb 6819 |h | Jump_Zero 0xe5
00cc e003 | | Load 0x0,0x3
00cd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00ce 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00cf e608 | | Load 0x3,0x8
00d0 62ef |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
00d1 e006 | | Load 0x0,0x6
00d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d3 e007 | | Load 0x0,0x7
00d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d5 e008 | | Load 0x0,0x8
00d6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d7 4800 |H | Short_Literal 0x0
00d8 4800 |H | Short_Literal 0x0
00d9 e007 | | Load 0x0,0x7
00da 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00db e003 | | Load 0x0,0x3
00dc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00dd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00de e605 | | Load 0x3,0x5
00df e003 | | Load 0x0,0x3
00e0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00e1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00e2 c608 | | Store 0x3,0x8
00e3 c609 | | Store 0x3,0x9
00e4 7802 |x | Jump 0xe7
00e5 4803 |H | Short_Literal 0x3
00e6 a609 | | Store_Unchecked 0x3,0x9
00e7 e609 | | Load 0x3,0x9
00e8 460e |F | Jump_Case 0xe
00e9 782f |x/ | Jump 0x119 ; case 0x0
00ea 780d |x | Jump 0xf8 ; case 0x1
00eb 780c |x | Jump 0xf8 ; case 0x2
00ec 7839 |x9 | Jump 0x126 ; case 0x3
00ed 780a |x | Jump 0xf8 ; case 0x4
00ee 7809 |x | Jump 0xf8 ; case 0x5
00ef 7808 |x | Jump 0xf8 ; case 0x6
00f0 7807 |x | Jump 0xf8 ; case 0x7
00f1 7806 |x | Jump 0xf8 ; case 0x8
00f2 7805 |x | Jump 0xf8 ; case 0x9
00f3 7804 |x | Jump 0xf8 ; case 0xa
00f4 7803 |x | Jump 0xf8 ; case 0xb
00f5 7802 |x | Jump 0xf8 ; case 0xc
00f6 7801 |x | Jump 0xf8 ; case 0xd
00f7 7800 |x | Jump 0xf8 ; case 0xe
00f8 e004 | | Load 0x0,0x4
00f9 180e | | Execute Package,Field_Execute,Field_Number 0xe
00fa 4805 |H | Short_Literal 0x5
00fb 0092 03cb | | Action Push_String_Extended,0x3cb ; "Cannot replace "
00fd e605 | | Load 0x3,0x5
00fe 01cc | | Execute Vector,Catenate
00ff 0092 03cc | | Action Push_String_Extended,0x3cc ; " because "
0101 01cc | | Execute Vector,Catenate
0102 62bd |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0103 e006 | | Load 0x0,0x6
0104 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0105 e007 | | Load 0x0,0x7
0106 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0107 e008 | | Load 0x0,0x8
0108 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0109 4800 |H | Short_Literal 0x0
010a 4800 |H | Short_Literal 0x0
010b e007 | | Load 0x0,0x7
010c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
010d e003 | | Load 0x0,0x3
010e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
010f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0110 e605 | | Load 0x3,0x5
0111 e609 | | Load 0x3,0x9
0112 e003 | | Load 0x0,0x3
0113 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0114 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0115 01cc | | Execute Vector,Catenate
0116 e005 | | Load 0x0,0x5
0117 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0118 4501 |E | Exit_Subprogram 0x1
0119 e004 | | Load 0x0,0x4
011a 180e | | Execute Package,Field_Execute,Field_Number 0xe
011b 4803 |H | Short_Literal 0x3
011c 0092 03cd | | Action Push_String_Extended,0x3cd ; "'New' declaration "
011e e605 | | Load 0x3,0x5
011f 01cc | | Execute Vector,Catenate
0120 0092 03ce | | Action Push_String_Extended,0x3ce ; " already exists"
0122 01cc | | Execute Vector,Catenate
0123 e005 | | Load 0x0,0x5
0124 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0125 4501 |E | Exit_Subprogram 0x1
0126 e003 | | Load 0x0,0x3
0127 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0128 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0129 e608 | | Load 0x3,0x8
012a 6295 |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
012b e006 | | Load 0x0,0x6
012c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012d e007 | | Load 0x0,0x7
012e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
012f e008 | | Load 0x0,0x8
0130 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0131 4800 |H | Short_Literal 0x0
0132 4800 |H | Short_Literal 0x0
0133 e007 | | Load 0x0,0x7
0134 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0135 e003 | | Load 0x0,0x3
0136 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0137 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0138 e607 | | Load 0x3,0x7
0139 e003 | | Load 0x0,0x3
013a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
013b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
013c c608 | | Store 0x3,0x8
013d c609 | | Store 0x3,0x9
013e e609 | | Load 0x3,0x9
013f 6821 |h! | Jump_Zero 0x161
0140 e004 | | Load 0x0,0x4
0141 180e | | Execute Package,Field_Execute,Field_Number 0xe
0142 4805 |H | Short_Literal 0x5
0143 0092 03cb | | Action Push_String_Extended,0x3cb ; "Cannot replace "
0145 e607 | | Load 0x3,0x7
0146 01cc | | Execute Vector,Catenate
0147 0092 03cf | | Action Push_String_Extended,0x3cf ; "; resolution of name failed because "
0149 01cc | | Execute Vector,Catenate
014a 6275 |bu | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
014b e006 | | Load 0x0,0x6
014c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014d e007 | | Load 0x0,0x7
014e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014f e008 | | Load 0x0,0x8
0150 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0151 4800 |H | Short_Literal 0x0
0152 4800 |H | Short_Literal 0x0
0153 e007 | | Load 0x0,0x7
0154 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0155 e003 | | Load 0x0,0x3
0156 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0157 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0158 e607 | | Load 0x3,0x7
0159 e609 | | Load 0x3,0x9
015a e003 | | Load 0x0,0x3
015b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
015c 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
015d 01cc | | Execute Vector,Catenate
015e e005 | | Load 0x0,0x5
015f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0160 4501 |E | Exit_Subprogram 0x1
0161 e003 | | Load 0x0,0x3
0162 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0163 e003 | | Load 0x0,0x3
0164 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0165 625a |bZ | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0166 e006 | | Load 0x0,0x6
0167 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0168 e608 | | Load 0x3,0x8
0169 e003 | | Load 0x0,0x3
016a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
016b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
016c c60b | | Store 0x3,0xb
016d 005a | Z | Store_Top Discrete,At_Offset_2
016e e608 | | Load 0x3,0x8
016f e003 | | Load 0x0,0x3
0170 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0171 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0172 c608 | | Store 0x3,0x8
0173 e608 | | Load 0x3,0x8
0174 e003 | | Load 0x0,0x3
0175 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0176 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0177 700d |p | Jump_Nonzero 0x185
0178 e004 | | Load 0x0,0x4
0179 180e | | Execute Package,Field_Execute,Field_Number 0xe
017a 4805 |H | Short_Literal 0x5
017b 0092 03cb | | Action Push_String_Extended,0x3cb ; "Cannot replace "
017d e607 | | Load 0x3,0x7
017e 01cc | | Execute Vector,Catenate
017f 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "; name is ambiguous"
0181 01cc | | Execute Vector,Catenate
0182 e005 | | Load 0x0,0x5
0183 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0184 4501 |E | Exit_Subprogram 0x1
0185 e003 | | Load 0x0,0x3
0186 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0187 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0188 00db | | Load_Top At_Offset_3
0189 0120 | | Execute Any,Is_Value
018a 6803 |h | Jump_Zero 0x18e
018b e003 | | Load 0x0,0x3
018c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018d 7801 |x | Jump 0x18f
018e 00db | | Load_Top At_Offset_3
018f 6230 |b0 | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0190 e006 | | Load 0x0,0x6
0191 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0192 e007 | | Load 0x0,0x7
0193 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0194 e003 | | Load 0x0,0x3
0195 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0196 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0197 e603 | | Load 0x3,0x3
0198 e003 | | Load 0x0,0x3
0199 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
019a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
019b c60c | | Store 0x3,0xc
019c c609 | | Store 0x3,0x9
019d e003 | | Load 0x0,0x3
019e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019f 00e1 | | Load_Encached Boolean_Cache
01a0 621f |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
01a1 e006 | | Load 0x0,0x6
01a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a3 e60c | | Load 0x3,0xc
01a4 e003 | | Load 0x0,0x3
01a5 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
01a6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01a7 005a | Z | Store_Top Discrete,At_Offset_2
01a8 005a | Z | Store_Top Discrete,At_Offset_2
01a9 00d8 | | Load_Top At_Offset_0
01aa 680a |h | Jump_Zero 0x1b5
01ab e003 | | Load 0x0,0x3
01ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ad 6212 |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
01ae e006 | | Load 0x0,0x6
01af 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b0 e60c | | Load 0x3,0xc
01b1 e003 | | Load 0x0,0x3
01b2 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
01b3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01b4 005a | Z | Store_Top Discrete,At_Offset_2
01b5 00e1 | | Load_Encached Boolean_Cache
01b6 e006 | | Load 0x0,0x6
01b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b8 e004 | | Load 0x0,0x4
01b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ba 4801 |H | Short_Literal 0x1
01bb 4800 |H | Short_Literal 0x0
01bc e604 | | Load 0x3,0x4
01bd e606 | | Load 0x3,0x6
01be e009 | | Load 0x0,0x9
01bf 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
01c0 c60a | | Store 0x3,0xa
01c1 00d8 | | Load_Top At_Offset_0
01c2 680a |h | Jump_Zero 0x1cd
01c3 e003 | | Load 0x0,0x3
01c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c5 61fa |a | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
01c6 e006 | | Load 0x0,0x6
01c7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c8 e60c | | Load 0x3,0xc
01c9 e003 | | Load 0x0,0x3
01ca 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
01cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01cc 005a | Z | Store_Top Discrete,At_Offset_2
01cd 4501 |E | Exit_Subprogram 0x1
01ce e004 | | Load 0x0,0x4
01cf 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d0 4802 |H | Short_Literal 0x2
01d1 0092 03d1 | | Action Push_String_Extended,0x3d1 ; "Removing \x22"
01d3 e605 | | Load 0x3,0x5
01d4 01cc | | Execute Vector,Catenate
01d5 0092 03ca | | Action Push_String_Extended,0x3ca ; "\x22"
01d7 01cc | | Execute Vector,Catenate
01d8 e005 | | Load 0x0,0x5
01d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01da e605 | | Load 0x3,0x5
01db e607 | | Load 0x3,0x7
01dc 01de | | Execute Vector,Not_Equal
01dd 680d |h | Jump_Zero 0x1eb
01de e004 | | Load 0x0,0x4
01df 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e0 4805 |H | Short_Literal 0x5
01e1 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "Cannot remove "
01e3 e605 | | Load 0x3,0x5
01e4 01cc | | Execute Vector,Catenate
01e5 0092 03d3 | | Action Push_String_Extended,0x3d3 ; "; illegal command syntax"
01e7 01cc | | Execute Vector,Catenate
01e8 e005 | | Load 0x0,0x5
01e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ea 4501 |E | Exit_Subprogram 0x1
01eb e003 | | Load 0x0,0x3
01ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01ee e608 | | Load 0x3,0x8
01ef 61d0 |a | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
01f0 e006 | | Load 0x0,0x6
01f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f2 e007 | | Load 0x0,0x7
01f3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f4 e008 | | Load 0x0,0x8
01f5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f6 4800 |H | Short_Literal 0x0
01f7 4800 |H | Short_Literal 0x0
01f8 e007 | | Load 0x0,0x7
01f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01fa e003 | | Load 0x0,0x3
01fb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01fc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01fd e605 | | Load 0x3,0x5
01fe e003 | | Load 0x0,0x3
01ff 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0200 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0201 c608 | | Store 0x3,0x8
0202 c609 | | Store 0x3,0x9
0203 e609 | | Load 0x3,0x9
0204 460e |F | Jump_Case 0xe
0205 782f |x/ | Jump 0x235 ; case 0x0
0206 780d |x | Jump 0x214 ; case 0x1
0207 780c |x | Jump 0x214 ; case 0x2
0208 7896 |x | Jump 0x29f ; case 0x3
0209 780a |x | Jump 0x214 ; case 0x4
020a 7809 |x | Jump 0x214 ; case 0x5
020b 7808 |x | Jump 0x214 ; case 0x6
020c 7807 |x | Jump 0x214 ; case 0x7
020d 7806 |x | Jump 0x214 ; case 0x8
020e 7805 |x | Jump 0x214 ; case 0x9
020f 7804 |x | Jump 0x214 ; case 0xa
0210 7803 |x | Jump 0x214 ; case 0xb
0211 7802 |x | Jump 0x214 ; case 0xc
0212 7801 |x | Jump 0x214 ; case 0xd
0213 7800 |x | Jump 0x214 ; case 0xe
0214 e004 | | Load 0x0,0x4
0215 180e | | Execute Package,Field_Execute,Field_Number 0xe
0216 4805 |H | Short_Literal 0x5
0217 0092 03d4 | | Action Push_String_Extended,0x3d4 ; "Cannot resolve "
0219 e605 | | Load 0x3,0x5
021a 01cc | | Execute Vector,Catenate
021b 0092 03cc | | Action Push_String_Extended,0x3cc ; " because "
021d 01cc | | Execute Vector,Catenate
021e 61a1 |a | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
021f e006 | | Load 0x0,0x6
0220 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0221 e007 | | Load 0x0,0x7
0222 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0223 e008 | | Load 0x0,0x8
0224 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0225 4800 |H | Short_Literal 0x0
0226 4800 |H | Short_Literal 0x0
0227 e007 | | Load 0x0,0x7
0228 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0229 e003 | | Load 0x0,0x3
022a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
022b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
022c e607 | | Load 0x3,0x7
022d e609 | | Load 0x3,0x9
022e e003 | | Load 0x0,0x3
022f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0230 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0231 01cc | | Execute Vector,Catenate
0232 e005 | | Load 0x0,0x5
0233 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0234 4501 |E | Exit_Subprogram 0x1
0235 e003 | | Load 0x0,0x3
0236 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0237 e003 | | Load 0x0,0x3
0238 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0239 6186 |a | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
023a e006 | | Load 0x0,0x6
023b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023c e608 | | Load 0x3,0x8
023d e003 | | Load 0x0,0x3
023e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
023f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0240 c60b | | Store 0x3,0xb
0241 005a | Z | Store_Top Discrete,At_Offset_2
0242 e608 | | Load 0x3,0x8
0243 e003 | | Load 0x0,0x3
0244 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0245 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0246 c608 | | Store 0x3,0x8
0247 e608 | | Load 0x3,0x8
0248 e003 | | Load 0x0,0x3
0249 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
024a 181e | | Execute Package,Field_Execute,Field_Number 0x1e
024b 700d |p | Jump_Nonzero 0x259
024c e004 | | Load 0x0,0x4
024d 180e | | Execute Package,Field_Execute,Field_Number 0xe
024e 4805 |H | Short_Literal 0x5
024f 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "Cannot remove "
0251 e605 | | Load 0x3,0x5
0252 01cc | | Execute Vector,Catenate
0253 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "; name is ambiguous"
0255 01cc | | Execute Vector,Catenate
0256 e005 | | Load 0x0,0x5
0257 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0258 4501 |E | Exit_Subprogram 0x1
0259 e003 | | Load 0x0,0x3
025a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
025b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
025c 00db | | Load_Top At_Offset_3
025d 0120 | | Execute Any,Is_Value
025e 6803 |h | Jump_Zero 0x262
025f e003 | | Load 0x0,0x3
0260 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0261 7801 |x | Jump 0x263
0262 00db | | Load_Top At_Offset_3
0263 615c |a\ | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0264 e006 | | Load 0x0,0x6
0265 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0266 e007 | | Load 0x0,0x7
0267 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0268 e003 | | Load 0x0,0x3
0269 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
026a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
026b e603 | | Load 0x3,0x3
026c e003 | | Load 0x0,0x3
026d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
026e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
026f c60c | | Store 0x3,0xc
0270 c609 | | Store 0x3,0x9
0271 e003 | | Load 0x0,0x3
0272 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0273 00e1 | | Load_Encached Boolean_Cache
0274 614b |aK | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0275 e006 | | Load 0x0,0x6
0276 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0277 e60c | | Load 0x3,0xc
0278 e003 | | Load 0x0,0x3
0279 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
027a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
027b 005a | Z | Store_Top Discrete,At_Offset_2
027c 005a | Z | Store_Top Discrete,At_Offset_2
027d 00d8 | | Load_Top At_Offset_0
027e 680a |h | Jump_Zero 0x289
027f e003 | | Load 0x0,0x3
0280 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0281 613e |a> | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0282 e006 | | Load 0x0,0x6
0283 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0284 e60c | | Load 0x3,0xc
0285 e003 | | Load 0x0,0x3
0286 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0287 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0288 005a | Z | Store_Top Discrete,At_Offset_2
0289 00e1 | | Load_Encached Boolean_Cache
028a e006 | | Load 0x0,0x6
028b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
028c e004 | | Load 0x0,0x4
028d 180e | | Execute Package,Field_Execute,Field_Number 0xe
028e e604 | | Load 0x3,0x4
028f e009 | | Load 0x0,0x9
0290 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0291 c60a | | Store 0x3,0xa
0292 00d8 | | Load_Top At_Offset_0
0293 6817 |h | Jump_Zero 0x2ab
0294 e003 | | Load 0x0,0x3
0295 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0296 6129 |a) | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0297 e006 | | Load 0x0,0x6
0298 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0299 e60c | | Load 0x3,0xc
029a e003 | | Load 0x0,0x3
029b 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
029c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
029d 005a | Z | Store_Top Discrete,At_Offset_2
029e 4501 |E | Exit_Subprogram 0x1
029f e004 | | Load 0x0,0x4
02a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
02a1 4803 |H | Short_Literal 0x3
02a2 0092 03d5 | | Action Push_String_Extended,0x3d5 ; "Declaration to be removed,"
02a4 e605 | | Load 0x3,0x5
02a5 01cc | | Execute Vector,Catenate
02a6 0092 03d6 | | Action Push_String_Extended,0x3d6 ; ", does not exist"
02a8 01cc | | Execute Vector,Catenate
02a9 e005 | | Load 0x0,0x5
02aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ab 4501 |E | Exit_Subprogram 0x1
02ac e004 | | Load 0x0,0x4
02ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
02ae 4802 |H | Short_Literal 0x2
02af 0092 03d7 | | Action Push_String_Extended,0x3d7 ; "Inserting \x22"
02b1 e605 | | Load 0x3,0x5
02b2 01cc | | Execute Vector,Catenate
02b3 0092 03ca | | Action Push_String_Extended,0x3ca ; "\x22"
02b5 01cc | | Execute Vector,Catenate
02b6 e005 | | Load 0x0,0x5
02b7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02b8 e003 | | Load 0x0,0x3
02b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02bb e608 | | Load 0x3,0x8
02bc 6103 |a | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
02bd e006 | | Load 0x0,0x6
02be 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02bf e007 | | Load 0x0,0x7
02c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02c1 e008 | | Load 0x0,0x8
02c2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02c3 4800 |H | Short_Literal 0x0
02c4 4800 |H | Short_Literal 0x0
02c5 e007 | | Load 0x0,0x7
02c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02c7 e003 | | Load 0x0,0x3
02c8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02c9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02ca e605 | | Load 0x3,0x5
02cb e003 | | Load 0x0,0x3
02cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02cd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02ce c608 | | Store 0x3,0x8
02cf c609 | | Store 0x3,0x9
02d0 e609 | | Load 0x3,0x9
02d1 460e |F | Jump_Case 0xe
02d2 782f |x/ | Jump 0x302 ; case 0x0
02d3 780d |x | Jump 0x2e1 ; case 0x1
02d4 780c |x | Jump 0x2e1 ; case 0x2
02d5 7839 |x9 | Jump 0x30f ; case 0x3
02d6 780a |x | Jump 0x2e1 ; case 0x4
02d7 7809 |x | Jump 0x2e1 ; case 0x5
02d8 7808 |x | Jump 0x2e1 ; case 0x6
02d9 7807 |x | Jump 0x2e1 ; case 0x7
02da 7806 |x | Jump 0x2e1 ; case 0x8
02db 7805 |x | Jump 0x2e1 ; case 0x9
02dc 7804 |x | Jump 0x2e1 ; case 0xa
02dd 7803 |x | Jump 0x2e1 ; case 0xb
02de 7802 |x | Jump 0x2e1 ; case 0xc
02df 7801 |x | Jump 0x2e1 ; case 0xd
02e0 7800 |x | Jump 0x2e1 ; case 0xe
02e1 e004 | | Load 0x0,0x4
02e2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02e3 4805 |H | Short_Literal 0x5
02e4 0092 03d8 | | Action Push_String_Extended,0x3d8 ; "Cannot insert "
02e6 e605 | | Load 0x3,0x5
02e7 01cc | | Execute Vector,Catenate
02e8 0092 03cc | | Action Push_String_Extended,0x3cc ; " because "
02ea 01cc | | Execute Vector,Catenate
02eb 60d4 |` | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
02ec e006 | | Load 0x0,0x6
02ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ee e007 | | Load 0x0,0x7
02ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02f0 e008 | | Load 0x0,0x8
02f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02f2 4800 |H | Short_Literal 0x0
02f3 4800 |H | Short_Literal 0x0
02f4 e007 | | Load 0x0,0x7
02f5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02f6 e003 | | Load 0x0,0x3
02f7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02f8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02f9 e605 | | Load 0x3,0x5
02fa e609 | | Load 0x3,0x9
02fb e003 | | Load 0x0,0x3
02fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02fd 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
02fe 01cc | | Execute Vector,Catenate
02ff e005 | | Load 0x0,0x5
0300 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0301 4501 |E | Exit_Subprogram 0x1
0302 e004 | | Load 0x0,0x4
0303 180e | | Execute Package,Field_Execute,Field_Number 0xe
0304 4803 |H | Short_Literal 0x3
0305 0092 03cd | | Action Push_String_Extended,0x3cd ; "'New' declaration "
0307 e605 | | Load 0x3,0x5
0308 01cc | | Execute Vector,Catenate
0309 0092 03ce | | Action Push_String_Extended,0x3ce ; " already exists"
030b 01cc | | Execute Vector,Catenate
030c e005 | | Load 0x0,0x5
030d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
030e 4501 |E | Exit_Subprogram 0x1
030f e003 | | Load 0x0,0x3
0310 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0311 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0312 e608 | | Load 0x3,0x8
0313 60ac |` | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0314 e006 | | Load 0x0,0x6
0315 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0316 e007 | | Load 0x0,0x7
0317 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0318 e008 | | Load 0x0,0x8
0319 1811 | | Execute Package,Field_Execute,Field_Number 0x11
031a 4800 |H | Short_Literal 0x0
031b 4800 |H | Short_Literal 0x0
031c e007 | | Load 0x0,0x7
031d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
031e e003 | | Load 0x0,0x3
031f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0320 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0321 e607 | | Load 0x3,0x7
0322 e003 | | Load 0x0,0x3
0323 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0324 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0325 c608 | | Store 0x3,0x8
0326 c609 | | Store 0x3,0x9
0327 e609 | | Load 0x3,0x9
0328 6826 |h& | Jump_Zero 0x34f
0329 e004 | | Load 0x0,0x4
032a 180e | | Execute Package,Field_Execute,Field_Number 0xe
032b 4805 |H | Short_Literal 0x5
032c 0092 03d8 | | Action Push_String_Extended,0x3d8 ; "Cannot insert "
032e e605 | | Load 0x3,0x5
032f 01cc | | Execute Vector,Catenate
0330 0092 03d9 | | Action Push_String_Extended,0x3d9 ; "; resolution of predecessor declaration, "
0332 01cc | | Execute Vector,Catenate
0333 e607 | | Load 0x3,0x7
0334 01cc | | Execute Vector,Catenate
0335 0092 03da | | Action Push_String_Extended,0x3da ; ", failed because "
0337 01cc | | Execute Vector,Catenate
0338 6087 |` | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0339 e006 | | Load 0x0,0x6
033a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033b e007 | | Load 0x0,0x7
033c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
033d e008 | | Load 0x0,0x8
033e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
033f 4800 |H | Short_Literal 0x0
0340 4800 |H | Short_Literal 0x0
0341 e007 | | Load 0x0,0x7
0342 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0343 e003 | | Load 0x0,0x3
0344 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0345 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0346 e607 | | Load 0x3,0x7
0347 e609 | | Load 0x3,0x9
0348 e003 | | Load 0x0,0x3
0349 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034a 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
034b 01cc | | Execute Vector,Catenate
034c e005 | | Load 0x0,0x5
034d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
034e 4501 |E | Exit_Subprogram 0x1
034f e003 | | Load 0x0,0x3
0350 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0351 e003 | | Load 0x0,0x3
0352 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0353 606c |`l | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0354 e006 | | Load 0x0,0x6
0355 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0356 e608 | | Load 0x3,0x8
0357 e003 | | Load 0x0,0x3
0358 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0359 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
035a c60b | | Store 0x3,0xb
035b 005a | Z | Store_Top Discrete,At_Offset_2
035c e608 | | Load 0x3,0x8
035d e003 | | Load 0x0,0x3
035e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
035f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0360 c608 | | Store 0x3,0x8
0361 e608 | | Load 0x3,0x8
0362 e003 | | Load 0x0,0x3
0363 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0364 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0365 7012 |p | Jump_Nonzero 0x378
0366 e004 | | Load 0x0,0x4
0367 180e | | Execute Package,Field_Execute,Field_Number 0xe
0368 4805 |H | Short_Literal 0x5
0369 0092 03d8 | | Action Push_String_Extended,0x3d8 ; "Cannot insert "
036b e605 | | Load 0x3,0x5
036c 01cc | | Execute Vector,Catenate
036d 0092 03db | | Action Push_String_Extended,0x3db ; "; name of predecessor declaration, "
036f 01cc | | Execute Vector,Catenate
0370 e607 | | Load 0x3,0x7
0371 01cc | | Execute Vector,Catenate
0372 0092 03dc | | Action Push_String_Extended,0x3dc ; ", is ambiguous"
0374 01cc | | Execute Vector,Catenate
0375 e005 | | Load 0x0,0x5
0376 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0377 4501 |E | Exit_Subprogram 0x1
0378 e003 | | Load 0x0,0x3
0379 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
037a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
037b 00db | | Load_Top At_Offset_3
037c 0120 | | Execute Any,Is_Value
037d 6803 |h | Jump_Zero 0x381
037e e003 | | Load 0x0,0x3
037f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0380 7801 |x | Jump 0x382
0381 00db | | Load_Top At_Offset_3
0382 603d |`= | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0383 e006 | | Load 0x0,0x6
0384 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0385 e007 | | Load 0x0,0x7
0386 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0387 e003 | | Load 0x0,0x3
0388 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0389 1816 | | Execute Package,Field_Execute,Field_Number 0x16
038a e603 | | Load 0x3,0x3
038b e003 | | Load 0x0,0x3
038c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
038d 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
038e c60c | | Store 0x3,0xc
038f c609 | | Store 0x3,0x9
0390 e003 | | Load 0x0,0x3
0391 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0392 00e1 | | Load_Encached Boolean_Cache
0393 602c |`, | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
0394 e006 | | Load 0x0,0x6
0395 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0396 e60c | | Load 0x3,0xc
0397 e003 | | Load 0x0,0x3
0398 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0399 181b | | Execute Package,Field_Execute,Field_Number 0x1b
039a 005a | Z | Store_Top Discrete,At_Offset_2
039b 005a | Z | Store_Top Discrete,At_Offset_2
039c 00d8 | | Load_Top At_Offset_0
039d 680a |h | Jump_Zero 0x3a8
039e e003 | | Load 0x0,0x3
039f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03a0 601f |` | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
03a1 e006 | | Load 0x0,0x6
03a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03a3 e60c | | Load 0x3,0xc
03a4 e003 | | Load 0x0,0x3
03a5 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
03a6 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03a7 005a | Z | Store_Top Discrete,At_Offset_2
03a8 00e1 | | Load_Encached Boolean_Cache
03a9 e006 | | Load 0x0,0x6
03aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ab e004 | | Load 0x0,0x4
03ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ad e604 | | Load 0x3,0x4
03ae e606 | | Load 0x3,0x6
03af e009 | | Load 0x0,0x9
03b0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03b1 c60a | | Store 0x3,0xa
03b2 00d8 | | Load_Top At_Offset_0
03b3 680a |h | Jump_Zero 0x3be
03b4 e003 | | Load 0x0,0x3
03b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b6 6009 |` | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x00004000}
03b7 e006 | | Load 0x0,0x6
03b8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03b9 e60c | | Load 0x3,0xc
03ba e003 | | Load 0x0,0x3
03bb 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
03bc 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03bd 005a | Z | Store_Top Discrete,At_Offset_2
03be 4501 |E | Exit_Subprogram 0x1
03bf 0000 | | .XXX[0x1]
03c0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03c4 ; --------------------------------------------------------------------------------------
03c4 ; STRING TABLE
03c4 ; --------------------------------------------------------------------------------------
03c4 0034 | 4 | .STRTAB 0x0034->0x03de ; "INSERT"
03c5 0038 | 8 | .STRTAB 0x0038->0x03e1 ; "DELETE"
03c6 003c | < | .STRTAB 0x003c->0x03e4 ; "REPLACE"
03c7 0041 | A | .STRTAB 0x0041->0x03e7 ; "***"
03c8 0042 | B | .STRTAB 0x0042->0x03e9 ; "Replacing \x22"
03c9 004b | K | .STRTAB 0x004b->0x03ee ; "\x22 with \x22"
03ca 0051 | Q | .STRTAB 0x0051->0x03f2 ; "\x22"
; "\x22"
; "\x22"
03cb 0050 | P | .STRTAB 0x0050->0x03f3 ; "Cannot replace "
; "Cannot replace "
; "Cannot replace "
03cc 005d | ] | .STRTAB 0x005d->0x03fa ; " because "
; " because "
; " because "
03cd 0064 | d | .STRTAB 0x0064->0x03ff ; "'New' declaration "
; "'New' declaration "
03ce 0074 | t | .STRTAB 0x0074->0x0408 ; " already exists"
; " already exists"
03cf 0081 | | .STRTAB 0x0081->0x040f ; "; resolution of name failed because "
03d0 00a3 | | .STRTAB 0x00a3->0x0421 ; "; name is ambiguous"
; "; name is ambiguous"
03d1 00b4 | | .STRTAB 0x00b4->0x042b ; "Removing \x22"
03d2 00bc | | .STRTAB 0x00bc->0x0430 ; "Cannot remove "
; "Cannot remove "
03d3 00c8 | | .STRTAB 0x00c8->0x0437 ; "; illegal command syntax"
03d4 00de | | .STRTAB 0x00de->0x0443 ; "Cannot resolve "
03d5 00eb | | .STRTAB 0x00eb->0x044a ; "Declaration to be removed,"
03d6 0103 | | .STRTAB 0x0103->0x0457 ; ", does not exist"
03d7 0111 | | .STRTAB 0x0111->0x045f ; "Inserting \x22"
03d8 011a | | .STRTAB 0x011a->0x0465 ; "Cannot insert "
; "Cannot insert "
; "Cannot insert "
03d9 0126 | & | .STRTAB 0x0126->0x046c ; "; resolution of predecessor declaration, "
03da 014d | M | .STRTAB 0x014d->0x0480 ; ", failed because "
03db 015c | \ | .STRTAB 0x015c->0x0489 ; "; name of predecessor declaration, "
03dc 017d | } | .STRTAB 0x017d->0x049a ; ", is ambiguous"
03dd 0189 | | .STREND 0x0189->0x04a1
03de 494e 5345 |INSE| .STRTAB_STRINGS
04a2 0000 0000 | | .BLANK 0000[0x6]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; Debug Table
04a8 ; --------------------------------------------------------------------------------------
04a8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x7782,0x0000,0x0001,0x0000
04ae 0000 0900 | | .XXX[0x6]
04b0 014e 3200 | N2 |
04b2 0000 0300 | |
04b4 0000 0000 | | .BLANK 0000[0x4]
04b8 000c 7600 | v | .XXX[0xa]
04ba 000b 2440 | $@|
04bc 0000 0480 | |
04be 00a7 1a00 | |
04c0 0000 0180 | |
04c2 0000 0000 | | .BLANK 0000[0x4]
04c6 0005 5500 | U | .XXX[0xa]
04c8 0004 ac20 | |
04ca 0000 0240 | @|
04cc 0053 8d80 | S |
04ce 0000 00c0 | |
04d0 0000 0000 | | .BLANK 0000[0x4]
04d4 0002 3f80 | ? | .XXX[0xa]
04d6 0001 f310 | |
04d8 0000 0120 | |
04da 0029 c700 | ) |
04dc 0000 0060 | `|
04de 0000 0000 | | .BLANK 0000[0x5]
04e3 ea40 0000 | @ | .XXX[0x17]
04e5 c008 0000 | |
04e7 0090 0014 | |
04e9 e3a0 0000 | |
04eb 0030 0000 | 0 |
04ed 0000 0002 | |
04ef efd8 0000 | |
04f1 5820 0000 |X |
04f3 414c 0000 |AL |
04f5 0048 000a | H |
04f7 71e0 0000 |q |
04f9 0018 | |
04fa 0000 0000 | | .BLANK 0000[0x9]
0503 4022 6000 |@"` | .XXX[0x8]
0505 0000 0000 | |
0507 001d e000 | |
0509 2004 e800 | |
050b 0000 0000 | | .BLANK 0000[0x5]
0510 1000 0001 | | .XXX[0xc]
0512 6000 000c |` |
0514 8000 0001 | |
0516 8000 0004 | |
0518 8000 0000 | |
051a 0000 0001 | |
051c 0000 0000 | | .BLANK 0000[0x4]
0520 0800 4d5a | MZ| .XXX[0x9]
0522 3400 0000 |4 |
0524 0000 0000 | |
0526 0010 004d | M|
0528 5e28 |^( |
0529 0000 0000 | | .BLANK 0000[0xa]
0533 0059 dbd0 | Y | .XXX[0x2]
0535 0000 0000 | | .BLANK 0000[0x4]
0539 001f e2b8 | | .XXX[0x4]
053b 001f c088 | |
053d 0000 0000 | | .BLANK 0000[0xf]
054c 7780 00fa |w | .XXX[0x3]
054e 9660 | ` |
054f 0000 0000 | | .BLANK 0000[0x5]
0554 0040 0000 | @ | .XXX[0xd]
0556 0580 0000 | |
0558 0500 0000 | |
055a 0400 0000 | |
055c 1200 0000 | |
055e 0000 0000 | |
0560 0400 | |
0561 0000 0000 | | .BLANK 0000[0x5]
0566 0010 0000 | | .XXX[0x5]
0568 0000 000f | |
056a a6e7 | |
056b 0000 0000 | | .BLANK 0000[0xc]
0577 0001 a94e | N| .XXX[0x3]
0579 8000 | |
057a 0000 0000 | | .BLANK 0000[0x5]
057f 4000 0003 |@ | .XXX[0x13]
0581 2aa9 c92a |* *|
0583 8a65 c8c9 | e |
0585 29c8 8be9 |) |
0587 caa9 898b | |
0589 e828 698a | (i |
058b 64e8 49e8 |d I |
058d 8b20 0080 | |
058f 13a0 007f | |
0591 0220 | |
0592 0000 0000 | | .BLANK 0000[0x4]
0596 0040 2860 | @(`| .XXX[0x22]
0598 000a 04a0 | |
059a 003f 8110 | ? |
059c 0040 2e60 | @.`|
059e 000a e3c0 | |
05a0 003f 8110 | ? |
05a2 0040 3460 | @4`|
05a4 0009 6fe0 | o |
05a6 003f 8110 | ? |
05a8 0040 3a60 | @:`|
05aa 0002 5ed0 | ^ |
05ac 003f 8110 | ? |
05ae 0000 0000 | |
05b0 0013 f850 | P|
05b2 003f 8110 | ? |
05b4 0040 84c0 | @ |
05b6 0040 4060 | @@`|
05b8 0000 0000 | | .BLANK 0000[0xa]
05c2 0207 0d80 | | .XXX[0x8]
05c4 0000 0000 | |
05c6 0000 ef00 | |
05c8 0103 2480 | $ |
05ca 0000 0000 | | .BLANK 0000[0x5]
05cf 0080 0000 | | .XXX[0x13]
05d1 0b00 0000 | |
05d3 6400 0000 |d |
05d5 0c00 0000 | |
05d7 2400 0000 |$ |
05d9 0000 0000 | |
05db 0800 0000 | |
05dd 0000 0000 | |
05df 01c0 026b | k|
05e1 1120 | |
05e2 0000 0000 | | .BLANK 0000[0x4]
05e6 8002 6b30 | k0| .XXX[0x5]
05e8 c002 6b50 | kP|
05ea 8000 | |
05eb 0000 0000 | | .BLANK 0000[0x7]
05f2 0002 d04f | O| .XXX[0xe]
05f4 4000 0000 |@ |
05f6 0000 0000 | |
05f8 0001 0213 | |
05fa 0001 0101 | |
05fc 8000 0000 | |
05fe 0000 0000 | |