|
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: 4096 (0x1000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦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 06d8 | | .CONST 0x06d8 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006d | m | .CONST 0x006d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0025 | % | .CONST 0x0025 ; Number of locals
000b INIT_0008:
000b 03f3 | | Declare_Variable Discrete,Incomplete,Visible,Unsigned
000c 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
000e 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
0017 c213 | | Store 0x1,0x13
0018 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
001a c214 | | Store 0x1,0x14
001b 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated
001d c210 | | Store 0x1,0x10
001e 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
0020 c211 | | Store 0x1,0x11
0021 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0023 c212 | | Store 0x1,0x12
0024 4800 |H | Short_Literal 0x0
0025 48ff |H | Short_Literal 0xff
0026 00e5 | | Load_Encached Long_Integer_Cache
0027 e20d | | Load 0x1,0xd
0028 03ed | | Complete_Type Discrete,By_Constraining
0029 00bf | | Action Accept_Activation
002a e001 | | Load 0x0,0x1
002b e002 | | Load 0x0,0x2
002c 4900 |I | Short_Literal 0x100
002d e20d | | Load 0x1,0xd
002e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
002f 4801 |H | Short_Literal 0x1
0030 e003 | | Load 0x0,0x3
0031 0387 | | Declare_Variable Package
0032 00d8 | | Load_Top At_Offset_0
0033 020f | | Execute Module,Activate
0034 e004 | | Load 0x0,0x4
0035 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0036 e004 | | Load 0x0,0x4
0037 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0038 0322 | " | Declare_Variable Record
0039 e004 | | Load 0x0,0x4
003a 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
003b 00d9 | | Load_Top At_Offset_1
003c 017d | } | Execute Record,Structure_Write
003d 00da | | Load_Top At_Offset_2
003e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
003f 0322 | " | Declare_Variable Record
0040 00d8 | | Load_Top At_Offset_0
0041 1c00 | | Execute_Immediate Run_Utility,0x0
0042 e20d | | Load 0x1,0xd
0043 060a | | Execute_Immediate Set_Value_Unchecked,0xa
0044 e005 | | Load 0x0,0x5
0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0046 02c7 | | Declare_Variable Any
0047 00d8 | | Load_Top At_Offset_0
0048 1c00 | | Execute_Immediate Run_Utility,0x0
0049 0092 0517 | | Action Push_String_Extended,0x517 ; "!machine.rcf.allocated_targets"
004b 0092 0518 | | Action Push_String_Extended,0x518 ; "!machine.rcf.target_file"
004d 0092 0519 | | Action Push_String_Extended,0x519 ; "!machine.rcf.backup_file"
004f 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call
0051 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0052 00c7 | | Action Elaborate_Subprogram
0053 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0054 00c7 | | Action Elaborate_Subprogram
0055 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0056 00c7 | | Action Elaborate_Subprogram
0057 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0058 00c7 | | Action Elaborate_Subprogram
0059 1d0e | | Execute_Immediate Reference_Lex_1,0xe
005a 00c7 | | Action Elaborate_Subprogram
005b 029d 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call
005d 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call
005f 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call
0061 029d 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call
0063 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call
0065 029d 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call
0067 029d 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call
0069 1d11 | | Execute_Immediate Reference_Lex_1,0x11
006a 00c7 | | Action Elaborate_Subprogram
006b 1d12 | | Execute_Immediate Reference_Lex_1,0x12
006c 00c7 | | Action Elaborate_Subprogram
006d BODY_0008:
006d e218 | | Load 0x1,0x18
006e e215 | | Load 0x1,0x15
006f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0070 00d1 | | Pop_Control Pop_Count_1
0071 e218 | | Load 0x1,0x18
0072 4800 |H | Short_Literal 0x0
0073 4800 |H | Short_Literal 0x0
0074 0092 051a | | Action Push_String_Extended,0x51a ; "Rs6000"
0076 e215 | | Load 0x1,0x15
0077 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0078 00d1 | | Pop_Control Pop_Count_1
0079 e218 | | Load 0x1,0x18
007a 4800 |H | Short_Literal 0x0
007b 4801 |H | Short_Literal 0x1
007c 0092 051b | | Action Push_String_Extended,0x51b ; "Ddc_Caps"
007e e215 | | Load 0x1,0x15
007f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0080 00d1 | | Pop_Control Pop_Count_1
0081 e218 | | Load 0x1,0x18
0082 4800 |H | Short_Literal 0x0
0083 4802 |H | Short_Literal 0x2
0084 0092 051c | | Action Push_String_Extended,0x51c ; "Rs6000_Ibm"
0086 e215 | | Load 0x1,0x15
0087 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0088 00d1 | | Pop_Control Pop_Count_1
0089 e218 | | Load 0x1,0x18
008a 4800 |H | Short_Literal 0x0
008b 4803 |H | Short_Literal 0x3
008c 0092 051d | | Action Push_String_Extended,0x51d ; "Rs6000_Aix_Ibm"
008e e215 | | Load 0x1,0x15
008f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0090 00d1 | | Pop_Control Pop_Count_1
0091 00cf | | Action Mark_Auxiliary
0092 4809 |H | Short_Literal 0x9
0093 4804 |H | Short_Literal 0x4
0094 0007 | | Action Break_Optional
0095 e218 | | Load 0x1,0x18
0096 4800 |H | Short_Literal 0x0
0097 00da | | Load_Top At_Offset_2
0098 0092 051e | | Action Push_String_Extended,0x51e ; "Spare_"
009a 4820 |H | Short_Literal 0x20
009b e228 | ( | Load 0x1,0x28
009c 00e0 | | Load_Encached Standard_Cache
009d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
009e e006 | | Load 0x0,0x6
009f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00a0 01cc | | Execute Vector,Catenate
00a1 e215 | | Load 0x1,0x15
00a2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00a3 00d1 | | Pop_Control Pop_Count_1
00a4 00c8 | | Action Pop_Auxiliary_Range
00a5 3fef |? | Loop_Increasing 0x95
00a6 00ce | | Action Pop_Auxiliary
00a7 8222 | " | Call 0x1,0x22
00a8 e007 | | Load 0x0,0x7
00a9 180d | | Execute Package,Field_Execute,Field_Number 0xd
00aa a216 | | Store_Unchecked 0x1,0x16
00ab e216 | | Load 0x1,0x16
00ac e217 | | Load 0x1,0x17
00ad 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00ae e216 | | Load 0x1,0x16
00af e217 | | Load 0x1,0x17
00b0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00b1 e216 | | Load 0x1,0x16
00b2 e217 | | Load 0x1,0x17
00b3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
00b4 00bc | | Action Signal_Activated
00b5 00bb | | Action Signal_Completion
00b6 0000 0000 | | .XXX[0x2]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb | | .CONST 0x00bb ; Address of begin
00b9 00c0 | | .CONST 0x00c0 ; Address of exception handler
00ba 0001 | | .CONST 0x0001 ; Number of locals
00bb BODY_00b8:
00bb INIT_00b8:
00bb 00da | | Load_Top At_Offset_2
00bc e218 | | Load 0x1,0x18
00bd e215 | | Load 0x1,0x15
00be 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00c0 TRAP_00b8:
00c0 0007 | | Action Break_Optional
00c1 e008 | | Load 0x0,0x8
00c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c3 4807 |H | Short_Literal 0x7
00c4 0092 051f | | Action Push_String_Extended,0x51f ; "Undefined target: "
00c6 e5ff | | Load 0x2,-0x1
00c7 01cc | | Execute Vector,Catenate
00c8 e009 | | Load 0x0,0x9
00c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ca 00d8 | | Load_Top At_Offset_0
00cb 0101 | | Execute Exception,Reraise
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 00da | | Load_Top At_Offset_2
00d4 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
00d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00d6 0000 0000 | | .XXX[0x2]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e1 | | .CONST 0x00e1 ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0002 | | .CONST 0x0002 ; Number of locals
00db INIT_00d8:
00db e004 | | Load 0x0,0x4
00dc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00dd 0322 | " | Declare_Variable Record
00de e217 | | Load 0x1,0x17
00df 00d9 | | Load_Top At_Offset_1
00e0 017d | } | Execute Record,Structure_Write
00e1 BODY_00d8:
00e1 00db | | Load_Top At_Offset_3
00e2 00d9 | | Load_Top At_Offset_1
00e3 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
00e4 00d8 | | Load_Top At_Offset_0
00e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00e6 0000 0000 | | .XXX[0x2]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 00da | | Load_Top At_Offset_2
00ec 00d8 | | Load_Top At_Offset_0
00ed e20d | | Load 0x1,0xd
00ee 0260 | ` | Execute Discrete,In_Type
00ef 7001 |p | Jump_Nonzero 0xf1
00f0 0801 | | Execute_Immediate Raise,0x1
00f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00f2 0000 0000 | | .BLANK 0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00da | | Load_Top At_Offset_2
00fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00fd 0000 0000 | | .XXX[0x3]
00ff 0000 | |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0106 | | .CONST 0x0106 ; Address of begin
0101 011d | | .CONST 0x011d ; Address of exception handler
0102 0003 | | .CONST 0x0003 ; Number of locals
0103 INIT_0100:
0103 e219 | | Load 0x1,0x19
0104 0007 | | Action Break_Optional
0105 00e1 | | Load_Encached Boolean_Cache
0106 BODY_0100:
0106 00e1 | | Load_Encached Boolean_Cache
0107 00da | | Load_Top At_Offset_2
0108 e5ff | | Load 0x2,-0x1
0109 e218 | | Load 0x1,0x18
010a e215 | | Load 0x1,0x15
010b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
010c 005b | [ | Store_Top Discrete,At_Offset_3
010d 0059 | Y | Store_Top Discrete,At_Offset_1
010e 00d8 | | Load_Top At_Offset_0
010f 6801 |h | Jump_Zero 0x111
0110 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0111 e218 | | Load 0x1,0x18
0112 4801 |H | Short_Literal 0x1
0113 00db | | Load_Top At_Offset_3
0114 e5ff | | Load 0x2,-0x1
0115 e215 | | Load 0x1,0x15
0116 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0117 00d1 | | Pop_Control Pop_Count_1
0118 00d9 | | Load_Top At_Offset_1
0119 e5ff | | Load 0x2,-0x1
011a 8223 | # | Call 0x1,0x23
011b 8221 | ! | Call 0x1,0x21
011c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
011d TRAP_0100:
011d 0007 | | Action Break_Optional
011e 0092 0520 | | Action Push_String_Extended,0x520 ; "Create_Target"
0120 821e | | Call 0x1,0x1e
0121 e5fe | | Load 0x2,-0x2
0122 4802 |H | Short_Literal 0x2
0123 00ea | | Load_Encached Null_String_Cache
0124 0092 0521 | !| Action Push_String_Extended,0x521 ; "Unhandled Exception"
0126 e00a | | Load 0x0,0xa
0127 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0128 c5fe | | Store 0x2,-0x2
0129 4502 |E | Exit_Suprogram New_Top_Offset 0x2
012a 0000 0000 | | .BLANK 0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0135 | 5 | .CONST 0x0135 ; Address of begin
0131 014a | J | .CONST 0x014a ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 e20d | | Load 0x1,0xd
0134 0007 | | Action Break_Optional
0135 BODY_0130:
0135 00db | | Load_Top At_Offset_3
0136 820e | | Call 0x1,0xe
0137 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0138 00d8 | | Load_Top At_Offset_0
0139 0d0a | | Execute_Immediate Less,0xa
013a 6801 |h | Jump_Zero 0x13c
013b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
013c 00d8 | | Load_Top At_Offset_0
013d e219 | | Load 0x1,0x19
013e 027c | | | Execute Discrete,Less
013f 6802 |h | Jump_Zero 0x142
0140 00d8 | | Load_Top At_Offset_0
0141 a219 | | Store_Unchecked 0x1,0x19
0142 e218 | | Load 0x1,0x18
0143 e5ff | | Load 0x2,-0x1
0144 e215 | | Load 0x1,0x15
0145 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0146 00d1 | | Pop_Control Pop_Count_1
0147 00db | | Load_Top At_Offset_3
0148 8225 | % | Call 0x1,0x25
0149 4502 |E | Exit_Suprogram New_Top_Offset 0x2
014a TRAP_0130:
014a e215 | | Load 0x1,0x15
014b 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
014c 010f | | Execute Exception,Equal
014d 680a |h | Jump_Zero 0x158
014e e008 | | Load 0x0,0x8
014f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0150 4806 |H | Short_Literal 0x6
0151 e5ff | | Load 0x2,-0x1
0152 0092 0522 | "| Action Push_String_Extended,0x522 ; " is already missing from target map"
0154 01cc | | Execute Vector,Catenate
0155 e009 | | Load 0x0,0x9
0156 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0157 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0158 0092 0523 | #| Action Push_String_Extended,0x523 ; "Destroy_Target"
015a 821e | | Call 0x1,0x1e
015b e5fe | | Load 0x2,-0x2
015c 4802 |H | Short_Literal 0x2
015d 00ea | | Load_Encached Null_String_Cache
015e 0092 0521 | !| Action Push_String_Extended,0x521 ; "Unhandled Exception"
0160 e00a | | Load 0x0,0xa
0161 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0162 c5fe | | Store 0x2,-0x2
0163 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0164 0000 0000 | | .BLANK 0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b e008 | | Load 0x0,0x8
016c 180e | | Execute Package,Field_Execute,Field_Number 0xe
016d 4802 |H | Short_Literal 0x2
016e 0092 0524 | $| Action Push_String_Extended,0x524 ; "Unhandled exception in "
0170 e5ff | | Load 0x2,-0x1
0171 01cc | | Execute Vector,Catenate
0172 0092 0525 | %| Action Push_String_Extended,0x525 ; ": "
0174 01cc | | Execute Vector,Catenate
0175 4800 |H | Short_Literal 0x0
0176 4801 |H | Short_Literal 0x1
0177 e00b | | Load 0x0,0xb
0178 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0179 01cc | | Execute Vector,Catenate
017a e009 | | Load 0x0,0x9
017b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0191 | | .CONST 0x0191 ; Address of begin
0181 0208 | | .CONST 0x0208 ; Address of exception handler
0182 0006 | | .CONST 0x0006 ; Number of locals
0183 INIT_0180:
0183 e00c | | Load 0x0,0xc
0184 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0185 02c7 | | Declare_Variable Any
0186 00d8 | | Load_Top At_Offset_0
0187 1c00 | | Execute_Immediate Run_Utility,0x0
0188 e00c | | Load 0x0,0xc
0189 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
018a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018b e00c | | Load 0x0,0xc
018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018d 029f 0483 | | Declare_Subprogram INIT_0480,For_Call
018f 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call
0191 BODY_0180:
0191 e00c | | Load 0x0,0xc
0192 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0193 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0194 e402 | | Load 0x2,0x2
0195 0120 | | Execute Any,Is_Value
0196 6803 |h | Jump_Zero 0x19a
0197 e00c | | Load 0x0,0xc
0198 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0199 7801 |x | Jump 0x19b
019a e402 | | Load 0x2,0x2
019b 607c |`| | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
019c e00d | | Load 0x0,0xd
019d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
019e e00e | | Load 0x0,0xe
019f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a0 e00c | | Load 0x0,0xc
01a1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01a3 0092 0526 | &| Action Push_String_Extended,0x526 ; "!Machine.Rcf"
01a5 e00c | | Load 0x0,0xc
01a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a7 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01a8 c402 | | Store 0x2,0x2
01a9 c403 | | Store 0x2,0x3
01aa 00db | | Load_Top At_Offset_3
01ab 6801 |h | Jump_Zero 0x1ad
01ac 8405 | | Call 0x2,0x5
01ad e00c | | Load 0x0,0xc
01ae 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01af 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b0 e402 | | Load 0x2,0x2
01b1 0120 | | Execute Any,Is_Value
01b2 6803 |h | Jump_Zero 0x1b6
01b3 e00c | | Load 0x0,0xc
01b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b5 7801 |x | Jump 0x1b7
01b6 e402 | | Load 0x2,0x2
01b7 6060 |`` | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
01b8 e00d | | Load 0x0,0xd
01b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ba e00e | | Load 0x0,0xe
01bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01bc e00c | | Load 0x0,0xc
01bd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01be 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01bf e21b | | Load 0x1,0x1b
01c0 e00c | | Load 0x0,0xc
01c1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01c3 c402 | | Store 0x2,0x2
01c4 c403 | | Store 0x2,0x3
01c5 00db | | Load_Top At_Offset_3
01c6 701b |p | Jump_Nonzero 0x1e2
01c7 e00c | | Load 0x0,0xc
01c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c9 604e |`N | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
01ca e00d | | Load 0x0,0xd
01cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01cc e402 | | Load 0x2,0x2
01cd e00c | | Load 0x0,0xc
01ce 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
01cf 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01d0 005b | [ | Store_Top Discrete,At_Offset_3
01d1 e5ff | | Load 0x2,-0x1
01d2 6807 |h | Jump_Zero 0x1da
01d3 e21a | | Load 0x1,0x1a
01d4 00ea | | Load_Encached Null_String_Cache
01d5 e21b | | Load 0x1,0x1b
01d6 e005 | | Load 0x0,0x5
01d7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01d8 c21a | | Store 0x1,0x1a
01d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01da e21a | | Load 0x1,0x1a
01db 00ea | | Load_Encached Null_String_Cache
01dc e21b | | Load 0x1,0x1b
01dd 4800 |H | Short_Literal 0x0
01de e005 | | Load 0x0,0x5
01df 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01e0 c21a | | Store 0x1,0x1a
01e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01e2 4800 |H | Short_Literal 0x0
01e3 a403 | | Store_Unchecked 0x2,0x3
01e4 e00c | | Load 0x0,0xc
01e5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01e6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01e7 e402 | | Load 0x2,0x2
01e8 0120 | | Execute Any,Is_Value
01e9 6803 |h | Jump_Zero 0x1ed
01ea e00c | | Load 0x0,0xc
01eb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01ec 7801 |x | Jump 0x1ee
01ed e402 | | Load 0x2,0x2
01ee 6029 |`) | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
01ef e00d | | Load 0x0,0xd
01f0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f1 e00e | | Load 0x0,0xe
01f2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f3 e00c | | Load 0x0,0xc
01f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01f5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f6 e21c | | Load 0x1,0x1c
01f7 e00c | | Load 0x0,0xc
01f8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01f9 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01fa c402 | | Store 0x2,0x2
01fb c403 | | Store 0x2,0x3
01fc 00db | | Load_Top At_Offset_3
01fd 7002 |p | Jump_Nonzero 0x200
01fe 8406 | | Call 0x2,0x6
01ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0200 e21a | | Load 0x1,0x1a
0201 00ea | | Load_Encached Null_String_Cache
0202 e21b | | Load 0x1,0x1b
0203 e5ff | | Load 0x2,-0x1
0204 e005 | | Load 0x0,0x5
0205 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0206 c21a | | Store 0x1,0x1a
0207 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0208 TRAP_0180:
0208 00d8 | | Load_Top At_Offset_0
0209 0107 | | Execute Exception,Get_Name
020a 4920 |I | Short_Literal 0x120
020b 492f |I/ | Short_Literal 0x12f
020c 0262 | b | Execute Discrete,In_Range
020d 6808 |h | Jump_Zero 0x216
020e e008 | | Load 0x0,0x8
020f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0210 4807 |H | Short_Literal 0x7
0211 0092 0527 | '| Action Push_String_Extended,0x527 ; "Unable to create !machine.rcf.allocated_targets"
0213 e009 | | Load 0x0,0x9
0214 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0215 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0216 0100 | | Execute Exception,Raise
0217 0000 | | .XXX[0x1]
0218 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
021c 0000 0000 | | .BLANK 0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022d | - | .CONST 0x022d ; Address of begin
0221 0254 | T | .CONST 0x0254 ; Address of exception handler
0222 0004 | | .CONST 0x0004 ; Number of locals
0223 INIT_0220:
0223 e00c | | Load 0x0,0xc
0224 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0225 02c7 | | Declare_Variable Any
0226 00d8 | | Load_Top At_Offset_0
0227 1c00 | | Execute_Immediate Run_Utility,0x0
0228 e00c | | Load 0x0,0xc
0229 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
022a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
022b e00c | | Load 0x0,0xc
022c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022d BODY_0220:
022d e21a | | Load 0x1,0x1a
022e e005 | | Load 0x0,0x5
022f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0230 c21a | | Store 0x1,0x1a
0231 e00c | | Load 0x0,0xc
0232 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0233 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0234 00db | | Load_Top At_Offset_3
0235 0120 | | Execute Any,Is_Value
0236 6803 |h | Jump_Zero 0x23a
0237 e00c | | Load 0x0,0xc
0238 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0239 7801 |x | Jump 0x23b
023a 00db | | Load_Top At_Offset_3
023b 67dc |g | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
023c e00d | | Load 0x0,0xd
023d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023e e00e | | Load 0x0,0xe
023f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0240 e00c | | Load 0x0,0xc
0241 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0242 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0243 e21b | | Load 0x1,0x1b
0244 e00c | | Load 0x0,0xc
0245 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0246 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0247 c402 | | Store 0x2,0x2
0248 005a | Z | Store_Top Discrete,At_Offset_2
0249 e00c | | Load 0x0,0xc
024a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024b 67cc |g | Indirect_Literal Discrete,0x218,{0x00000000, 0x00004000}
024c e00d | | Load 0x0,0xd
024d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024e e402 | | Load 0x2,0x2
024f e00c | | Load 0x0,0xc
0250 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0251 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0252 0059 | Y | Store_Top Discrete,At_Offset_1
0253 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0254 TRAP_0220:
0254 00d8 | | Load_Top At_Offset_0
0255 0107 | | Execute Exception,Get_Name
0256 4900 |I | Short_Literal 0x100
0257 490f |I | Short_Literal 0x10f
0258 0262 | b | Execute Discrete,In_Range
0259 6808 |h | Jump_Zero 0x262
025a e008 | | Load 0x0,0x8
025b 180e | | Execute Package,Field_Execute,Field_Number 0xe
025c 4806 |H | Short_Literal 0x6
025d 0092 0528 | (| Action Push_String_Extended,0x528 ; "Status error while trying to close target file"
025f e009 | | Load 0x0,0x9
0260 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0261 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0262 0100 | | Execute Exception,Raise
0263 0000 0000 | | .BLANK 0000[0x5]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026d | m | .CONST 0x026d ; Address of begin
0269 0278 | x | .CONST 0x0278 ; Address of exception handler
026a 0002 | | .CONST 0x0002 ; Number of locals
026b INIT_0268:
026b 029f 04d3 | | Declare_Subprogram INIT_04d0,For_Call
026d BODY_0268:
026d 00cf | | Action Mark_Auxiliary
026e e219 | | Load 0x1,0x19
026f e218 | | Load 0x1,0x18
0270 e215 | | Load 0x1,0x15
0271 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0272 8402 | | Call 0x2,0x2
0273 e219 | | Load 0x1,0x19
0274 0a01 | | Execute_Immediate Plus,0x1
0275 c219 | | Store 0x1,0x19
0276 00c9 | | Action Pop_Auxiliary_Loop
0277 7ff6 | | Jump 0x26e
0278 TRAP_0268:
0278 0007 | | Action Break_Optional
0279 4501 |E | Exit_Suprogram New_Top_Offset 0x1
027a 0000 0000 | | .BLANK 0000[0x6]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0293 | | .CONST 0x0293 ; Address of begin
0281 02fa | | .CONST 0x02fa ; Address of exception handler
0282 000a | | .CONST 0x000a ; Number of locals
0283 INIT_0280:
0283 4801 |H | Short_Literal 0x1
0284 4850 |HP | Short_Literal 0x50
0285 00e9 | | Load_Encached String_Cache
0286 035b | [ | Declare_Type Array,Constrained
0287 0337 | 7 | Declare_Variable Array
0288 00e3 | | Load_Encached Natural_Cache
0289 00e3 | | Load_Encached Natural_Cache
028a 00e3 | | Load_Encached Natural_Cache
028b e20d | | Load 0x1,0xd
028c 0007 | | Action Break_Optional
028d 00e1 | | Load_Encached Boolean_Cache
028e 00e3 | | Load_Encached Natural_Cache
028f 029f 04db | | Declare_Subprogram INIT_04d8,For_Call
0291 029f 04f3 | | Declare_Subprogram INIT_04f0,For_Call
0293 BODY_0280:
0293 4800 |H | Short_Literal 0x0
0294 821f | | Call 0x1,0x1f
0295 00cf | | Action Mark_Auxiliary
0296 785b |x[ | Jump 0x2f2
0297 00e3 | | Load_Encached Natural_Cache
0298 e402 | | Load 0x2,0x2
0299 e21a | | Load 0x1,0x1a
029a e005 | | Load 0x0,0x5
029b 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
029c 00d1 | | Pop_Control Pop_Count_1
029d c403 | | Store 0x2,0x3
029e e403 | | Load 0x2,0x3
029f 0d02 | | Execute_Immediate Less,0x2
02a0 6807 |h | Jump_Zero 0x2a8
02a1 e008 | | Load 0x0,0x8
02a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02a3 4807 |H | Short_Literal 0x7
02a4 0092 0529 | )| Action Push_String_Extended,0x529 ; "Can't get line from !Machine.Rcf.Target_File"
02a6 e009 | | Load 0x0,0x9
02a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a8 4801 |H | Short_Literal 0x1
02a9 4801 |H | Short_Literal 0x1
02aa e403 | | Load 0x2,0x3
02ab e402 | | Load 0x2,0x2
02ac 01cf | | Execute Vector,Slice_Read
02ad 4820 |H | Short_Literal 0x20
02ae e006 | | Load 0x0,0x6
02af 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02b0 a404 | | Store_Unchecked 0x2,0x4
02b1 e404 | | Load 0x2,0x4
02b2 0d02 | | Execute_Immediate Less,0x2
02b3 6801 |h | Jump_Zero 0x2b5
02b4 8409 | | Call 0x2,0x9
02b5 4801 |H | Short_Literal 0x1
02b6 e404 | | Load 0x2,0x4
02b7 0a02 | | Execute_Immediate Plus,0x2
02b8 00d8 | | Load_Top At_Offset_0
02b9 00e2 | | Load_Encached Integer_Cache
02ba 0260 | ` | Execute Discrete,In_Type
02bb 7001 |p | Jump_Nonzero 0x2bd
02bc 0801 | | Execute_Immediate Raise,0x1
02bd e403 | | Load 0x2,0x3
02be e402 | | Load 0x2,0x2
02bf 01cf | | Execute Vector,Slice_Read
02c0 4820 |H | Short_Literal 0x20
02c1 e006 | | Load 0x0,0x6
02c2 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02c3 a405 | | Store_Unchecked 0x2,0x5
02c4 e405 | | Load 0x2,0x5
02c5 e404 | | Load 0x2,0x4
02c6 0a01 | | Execute_Immediate Plus,0x1
02c7 027d | } | Execute Discrete,Greater
02c8 6813 |h | Jump_Zero 0x2dc
02c9 00e1 | | Load_Encached Boolean_Cache
02ca 00e2 | | Load_Encached Integer_Cache
02cb 480a |H | Short_Literal 0xa
02cc e404 | | Load 0x2,0x4
02cd 0a01 | | Execute_Immediate Plus,0x1
02ce 00d8 | | Load_Top At_Offset_0
02cf 00e2 | | Load_Encached Integer_Cache
02d0 0260 | ` | Execute Discrete,In_Type
02d1 7001 |p | Jump_Nonzero 0x2d3
02d2 0801 | | Execute_Immediate Raise,0x1
02d3 e405 | | Load 0x2,0x5
02d4 0aff | | Execute_Immediate Plus,-0x1
02d5 e402 | | Load 0x2,0x2
02d6 01cf | | Execute Vector,Slice_Read
02d7 e006 | | Load 0x0,0x6
02d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02d9 c406 | | Store 0x2,0x6
02da c407 | | Store 0x2,0x7
02db 7811 |x | Jump 0x2ed
02dc 00e1 | | Load_Encached Boolean_Cache
02dd 00e2 | | Load_Encached Integer_Cache
02de 480a |H | Short_Literal 0xa
02df e404 | | Load 0x2,0x4
02e0 0a01 | | Execute_Immediate Plus,0x1
02e1 00d8 | | Load_Top At_Offset_0
02e2 00e2 | | Load_Encached Integer_Cache
02e3 0260 | ` | Execute Discrete,In_Type
02e4 7001 |p | Jump_Nonzero 0x2e6
02e5 0801 | | Execute_Immediate Raise,0x1
02e6 e403 | | Load 0x2,0x3
02e7 e402 | | Load 0x2,0x2
02e8 01cf | | Execute Vector,Slice_Read
02e9 e006 | | Load 0x0,0x6
02ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02eb c406 | | Store 0x2,0x6
02ec c407 | | Store 0x2,0x7
02ed e407 | | Load 0x2,0x7
02ee 7001 |p | Jump_Nonzero 0x2f0
02ef 8409 | | Call 0x2,0x9
02f0 840a | | Call 0x2,0xa
02f1 00c9 | | Action Pop_Auxiliary_Loop
02f2 e21a | | Load 0x1,0x1a
02f3 e005 | | Load 0x0,0x5
02f4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
02f5 6fa1 |o | Jump_Zero 0x297
02f6 00ce | | Action Pop_Auxiliary
02f7 8221 | ! | Call 0x1,0x21
02f8 8220 | | Call 0x1,0x20
02f9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02fa TRAP_0280:
02fa 0007 | | Action Break_Optional
02fb 8220 | | Call 0x1,0x20
02fc 00d8 | | Load_Top At_Offset_0
02fd 0101 | | Execute Exception,Reraise
02fe 0000 0000 | | .XXX[0x2]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303 | | .CONST 0x0303 ; Address of begin
0301 0315 | | .CONST 0x0315 ; Address of exception handler
0302 0001 | | .CONST 0x0001 ; Number of locals
0303 BODY_0300:
0303 INIT_0300:
0303 4801 |H | Short_Literal 0x1
0304 821f | | Call 0x1,0x1f
0305 4820 |H | Short_Literal 0x20
0306 00db | | Load_Top At_Offset_3
0307 e006 | | Load 0x0,0x6
0308 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0309 0092 052a | *| Action Push_String_Extended,0x52a ; " "
030b 01cc | | Execute Vector,Catenate
030c e5fe | | Load 0x2,-0x2
030d 00e0 | | Load_Encached Standard_Cache
030e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
030f 01cc | | Execute Vector,Catenate
0310 e21a | | Load 0x1,0x1a
0311 e005 | | Load 0x0,0x5
0312 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0313 8220 | | Call 0x1,0x20
0314 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0315 TRAP_0300:
0315 0007 | | Action Break_Optional
0316 8220 | | Call 0x1,0x20
0317 00d8 | | Load_Top At_Offset_0
0318 0101 | | Execute Exception,Reraise
0319 0000 0000 | | .BLANK 0000[0x7]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0346 | F | .CONST 0x0346 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0009 | | .CONST 0x0009 ; Number of locals
0323 INIT_0320:
0323 e00c | | Load 0x0,0xc
0324 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0325 02c7 | | Declare_Variable Any
0326 00d8 | | Load_Top At_Offset_0
0327 1c00 | | Execute_Immediate Run_Utility,0x0
0328 e00c | | Load 0x0,0xc
0329 1b0f | | Execute Package,Field_Read,Field_Number 0xf
032a 02c7 | | Declare_Variable Any
032b 00d8 | | Load_Top At_Offset_0
032c 1c00 | | Execute_Immediate Run_Utility,0x0
032d e00c | | Load 0x0,0xc
032e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
032f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0330 e00c | | Load 0x0,0xc
0331 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0332 e00f | | Load 0x0,0xf
0333 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0334 02c7 | | Declare_Variable Any
0335 00d8 | | Load_Top At_Offset_0
0336 1c00 | | Execute_Immediate Run_Utility,0x0
0337 e00c | | Load 0x0,0xc
0338 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0339 02c7 | | Declare_Variable Any
033a 00d8 | | Load_Top At_Offset_0
033b 1c00 | | Execute_Immediate Run_Utility,0x0
033c e00c | | Load 0x0,0xc
033d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
033e 1b17 | | Execute Package,Field_Read,Field_Number 0x17
033f 02c7 | | Declare_Variable Any
0340 00d8 | | Load_Top At_Offset_0
0341 1c00 | | Execute_Immediate Run_Utility,0x0
0342 00f1 | | Load_Encached Diana_Temp_Seq
0343 02c7 | | Declare_Variable Any
0344 00d8 | | Load_Top At_Offset_0
0345 1c00 | | Execute_Immediate Run_Utility,0x0
0346 BODY_0320:
0346 e00c | | Load 0x0,0xc
0347 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0348 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0349 e402 | | Load 0x2,0x2
034a 0120 | | Execute Any,Is_Value
034b 6803 |h | Jump_Zero 0x34f
034c e00c | | Load 0x0,0xc
034d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
034e 7801 |x | Jump 0x350
034f e402 | | Load 0x2,0x2
0350 60a7 |` | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
0351 e00d | | Load 0x0,0xd
0352 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0353 e00e | | Load 0x0,0xe
0354 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0355 e00c | | Load 0x0,0xc
0356 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0357 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0358 e21b | | Load 0x1,0x1b
0359 e00c | | Load 0x0,0xc
035a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
035b 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
035c c402 | | Store 0x2,0x2
035d c404 | | Store 0x2,0x4
035e e404 | | Load 0x2,0x4
035f 700b |p | Jump_Nonzero 0x36b
0360 e00c | | Load 0x0,0xc
0361 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0362 6095 |` | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
0363 e00d | | Load 0x0,0xd
0364 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0365 e402 | | Load 0x2,0x2
0366 e00c | | Load 0x0,0xc
0367 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0368 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0369 c405 | | Store 0x2,0x5
036a 7808 |x | Jump 0x373
036b e008 | | Load 0x0,0x8
036c 180e | | Execute Package,Field_Execute,Field_Number 0xe
036d 4807 |H | Short_Literal 0x7
036e 0092 052b | +| Action Push_String_Extended,0x52b ; "Cannot find target file"
0370 e009 | | Load 0x0,0x9
0371 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0372 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0373 e00c | | Load 0x0,0xc
0374 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0375 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0376 e403 | | Load 0x2,0x3
0377 0120 | | Execute Any,Is_Value
0378 6803 |h | Jump_Zero 0x37c
0379 e00c | | Load 0x0,0xc
037a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
037b 7801 |x | Jump 0x37d
037c e403 | | Load 0x2,0x3
037d 607a |`z | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
037e e00d | | Load 0x0,0xd
037f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0380 e00e | | Load 0x0,0xe
0381 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0382 e00c | | Load 0x0,0xc
0383 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0384 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0385 e21d | | Load 0x1,0x1d
0386 e00c | | Load 0x0,0xc
0387 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0388 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0389 c403 | | Store 0x2,0x3
038a c404 | | Store 0x2,0x4
038b e404 | | Load 0x2,0x4
038c 6808 |h | Jump_Zero 0x395
038d e008 | | Load 0x0,0x8
038e 180e | | Execute Package,Field_Execute,Field_Number 0xe
038f 4807 |H | Short_Literal 0x7
0390 0092 052c | ,| Action Push_String_Extended,0x52c ; "Cannot find backup file"
0392 e009 | | Load 0x0,0x9
0393 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0394 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0395 e00c | | Load 0x0,0xc
0396 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0397 00d9 | | Load_Top At_Offset_1
0398 0120 | | Execute Any,Is_Value
0399 6802 |h | Jump_Zero 0x39c
039a 00f1 | | Load_Encached Diana_Temp_Seq
039b 7801 |x | Jump 0x39d
039c 00d9 | | Load_Top At_Offset_1
039d 00db | | Load_Top At_Offset_3
039e 0120 | | Execute Any,Is_Value
039f 6804 |h | Jump_Zero 0x3a4
03a0 e00c | | Load 0x0,0xc
03a1 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03a2 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03a3 7801 |x | Jump 0x3a5
03a4 00db | | Load_Top At_Offset_3
03a5 e406 | | Load 0x2,0x6
03a6 0120 | | Execute Any,Is_Value
03a7 6803 |h | Jump_Zero 0x3ab
03a8 e00f | | Load 0x0,0xf
03a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03aa 7801 |x | Jump 0x3ac
03ab e406 | | Load 0x2,0x6
03ac 604b |`K | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
03ad e00d | | Load 0x0,0xd
03ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03af 4800 |H | Short_Literal 0x0
03b0 e00c | | Load 0x0,0xc
03b1 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
03b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03b3 e00c | | Load 0x0,0xc
03b4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03b5 4801 |H | Short_Literal 0x1
03b6 4ffc |O | Short_Literal -0x4
03b7 4800 |H | Short_Literal 0x0
03b8 e402 | | Load 0x2,0x2
03b9 e403 | | Load 0x2,0x3
03ba e00c | | Load 0x0,0xc
03bb 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
03bc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03bd c406 | | Store 0x2,0x6
03be c408 | | Store 0x2,0x8
03bf c409 | | Store 0x2,0x9
03c0 c405 | | Store 0x2,0x5
03c1 e00c | | Load 0x0,0xc
03c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c3 00d9 | | Load_Top At_Offset_1
03c4 0120 | | Execute Any,Is_Value
03c5 6802 |h | Jump_Zero 0x3c8
03c6 00f1 | | Load_Encached Diana_Temp_Seq
03c7 7801 |x | Jump 0x3c9
03c8 00d9 | | Load_Top At_Offset_1
03c9 00db | | Load_Top At_Offset_3
03ca 0120 | | Execute Any,Is_Value
03cb 6804 |h | Jump_Zero 0x3d0
03cc e00c | | Load 0x0,0xc
03cd 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03ce 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03cf 7801 |x | Jump 0x3d1
03d0 00db | | Load_Top At_Offset_3
03d1 e406 | | Load 0x2,0x6
03d2 0120 | | Execute Any,Is_Value
03d3 6803 |h | Jump_Zero 0x3d7
03d4 e00f | | Load 0x0,0xf
03d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d6 7801 |x | Jump 0x3d8
03d7 e406 | | Load 0x2,0x6
03d8 601f |` | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
03d9 e00d | | Load 0x0,0xd
03da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03db 4800 |H | Short_Literal 0x0
03dc e00c | | Load 0x0,0xc
03dd 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
03de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03df e00c | | Load 0x0,0xc
03e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03e1 4800 |H | Short_Literal 0x0
03e2 e403 | | Load 0x2,0x3
03e3 e00c | | Load 0x0,0xc
03e4 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
03e5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03e6 c406 | | Store 0x2,0x6
03e7 c408 | | Store 0x2,0x8
03e8 c409 | | Store 0x2,0x9
03e9 c405 | | Store 0x2,0x5
03ea e00c | | Load 0x0,0xc
03eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ec 600b |` | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x00004000}
03ed e00d | | Load 0x0,0xd
03ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ef e402 | | Load 0x2,0x2
03f0 e00c | | Load 0x0,0xc
03f1 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
03f2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03f3 c405 | | Store 0x2,0x5
03f4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03f5 0000 0000 | | .XXX[0x3]
03f7 0000 | |
03f8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03fc 0000 0000 | | .BLANK 0000[0x4]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0413 | | .CONST 0x0413 ; Address of begin
0401 047a | z | .CONST 0x047a ; Address of exception handler
0402 0007 | | .CONST 0x0007 ; Number of locals
0403 INIT_0400:
0403 e005 | | Load 0x0,0x5
0404 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0405 02c7 | | Declare_Variable Any
0406 00d8 | | Load_Top At_Offset_0
0407 1c00 | | Execute_Immediate Run_Utility,0x0
0408 4801 |H | Short_Literal 0x1
0409 4850 |HP | Short_Literal 0x50
040a 00e9 | | Load_Encached String_Cache
040b 035b | [ | Declare_Type Array,Constrained
040c 0337 | 7 | Declare_Variable Array
040d 00e3 | | Load_Encached Natural_Cache
040e 00e3 | | Load_Encached Natural_Cache
040f 00e1 | | Load_Encached Boolean_Cache
0410 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0411 e20d | | Load 0x1,0xd
0412 0007 | | Action Break_Optional
0413 BODY_0400:
0413 4800 |H | Short_Literal 0x0
0414 821f | | Call 0x1,0x1f
0415 e402 | | Load 0x2,0x2
0416 00ea | | Load_Encached Null_String_Cache
0417 e21d | | Load 0x1,0x1d
0418 4801 |H | Short_Literal 0x1
0419 e005 | | Load 0x0,0x5
041a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
041b c402 | | Store 0x2,0x2
041c 00cf | | Action Mark_Auxiliary
041d 782b |x+ | Jump 0x449
041e 00e3 | | Load_Encached Natural_Cache
041f e403 | | Load 0x2,0x3
0420 e21a | | Load 0x1,0x1a
0421 e005 | | Load 0x0,0x5
0422 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
0423 00d1 | | Pop_Control Pop_Count_1
0424 c405 | | Store 0x2,0x5
0425 4801 |H | Short_Literal 0x1
0426 e403 | | Load 0x2,0x3
0427 4820 |H | Short_Literal 0x20
0428 e006 | | Load 0x0,0x6
0429 181e | | Execute Package,Field_Execute,Field_Number 0x1e
042a a404 | | Store_Unchecked 0x2,0x4
042b 4801 |H | Short_Literal 0x1
042c e5ff | | Load 0x2,-0x1
042d 4801 |H | Short_Literal 0x1
042e e404 | | Load 0x2,0x4
042f 0aff | | Execute_Immediate Plus,-0x1
0430 e403 | | Load 0x2,0x3
0431 01cf | | Execute Vector,Slice_Read
0432 e006 | | Load 0x0,0x6
0433 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0434 7008 |p | Jump_Nonzero 0x43d
0435 4801 |H | Short_Literal 0x1
0436 e405 | | Load 0x2,0x5
0437 e403 | | Load 0x2,0x3
0438 01cf | | Execute Vector,Slice_Read
0439 e402 | | Load 0x2,0x2
043a e005 | | Load 0x0,0x5
043b 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
043c 780b |x | Jump 0x448
043d e008 | | Load 0x0,0x8
043e 180e | | Execute Package,Field_Execute,Field_Number 0xe
043f 4802 |H | Short_Literal 0x2
0440 0092 052d | -| Action Push_String_Extended,0x52d ; "Destroying "
0442 e5ff | | Load 0x2,-0x1
0443 01cc | | Execute Vector,Catenate
0444 e009 | | Load 0x0,0x9
0445 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0446 4801 |H | Short_Literal 0x1
0447 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0448 00c9 | | Action Pop_Auxiliary_Loop
0449 e21a | | Load 0x1,0x1a
044a e005 | | Load 0x0,0x5
044b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
044c 6fd1 |o | Jump_Zero 0x41e
044d 00ce | | Action Pop_Auxiliary
044e e402 | | Load 0x2,0x2
044f e005 | | Load 0x0,0x5
0450 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0451 c402 | | Store 0x2,0x2
0452 8220 | | Call 0x1,0x20
0453 8224 | $ | Call 0x1,0x24
0454 00d9 | | Load_Top At_Offset_1
0455 7023 |p# | Jump_Nonzero 0x479
0456 00e1 | | Load_Encached Boolean_Cache
0457 00d9 | | Load_Top At_Offset_1
0458 e5ff | | Load 0x2,-0x1
0459 e218 | | Load 0x1,0x18
045a e215 | | Load 0x1,0x15
045b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
045c 005a | Z | Store_Top Discrete,At_Offset_2
045d 005a | Z | Store_Top Discrete,At_Offset_2
045e 00d9 | | Load_Top At_Offset_1
045f 6810 |h | Jump_Zero 0x470
0460 00d8 | | Load_Top At_Offset_0
0461 0d0a | | Execute_Immediate Less,0xa
0462 680c |h | Jump_Zero 0x46f
0463 e008 | | Load 0x0,0x8
0464 180e | | Execute Package,Field_Execute,Field_Number 0xe
0465 4802 |H | Short_Literal 0x2
0466 0092 052e | .| Action Push_String_Extended,0x52e ; "Destroyed target "
0468 e5ff | | Load 0x2,-0x1
0469 01cc | | Execute Vector,Catenate
046a 0092 052f | /| Action Push_String_Extended,0x52f ; " was predefined"
046c 01cc | | Execute Vector,Catenate
046d e009 | | Load 0x0,0x9
046e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
046f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0470 e008 | | Load 0x0,0x8
0471 180e | | Execute Package,Field_Execute,Field_Number 0xe
0472 4806 |H | Short_Literal 0x6
0473 e5ff | | Load 0x2,-0x1
0474 0092 0530 | 0| Action Push_String_Extended,0x530 ; " is already missing from target file"
0476 01cc | | Execute Vector,Catenate
0477 e009 | | Load 0x0,0x9
0478 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0479 4502 |E | Exit_Suprogram New_Top_Offset 0x2
047a TRAP_0400:
047a 0007 | | Action Break_Optional
047b 8220 | | Call 0x1,0x20
047c 00d8 | | Load_Top At_Offset_0
047d 0101 | | Execute Exception,Reraise
047e 0000 0000 | | .XXX[0x2]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483 | | .CONST 0x0483 ; Address of begin
0481 048e | | .CONST 0x048e ; Address of exception handler
0482 0001 | | .CONST 0x0001 ; Number of locals
0483 BODY_0480:
0483 INIT_0480:
0483 0092 0531 | 1| Action Push_String_Extended,0x531 ; "<PROFILE>"
0485 0092 0532 | 2| Action Push_String_Extended,0x532 ; "!Model.R1000"
0487 4800 |H | Short_Literal 0x0
0488 4800 |H | Short_Literal 0x0
0489 0092 0526 | &| Action Push_String_Extended,0x526 ; "!Machine.Rcf"
048b e010 | | Load 0x0,0x10
048c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
048d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
048e TRAP_0480:
048e e008 | | Load 0x0,0x8
048f 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0490 010f | | Execute Exception,Equal
0491 6809 |h | Jump_Zero 0x49b
0492 e008 | | Load 0x0,0x8
0493 180e | | Execute Package,Field_Execute,Field_Number 0xe
0494 4802 |H | Short_Literal 0x2
0495 0092 0533 | 3| Action Push_String_Extended,0x533 ; "Unable to create world !Machine.Rcf"
0497 e009 | | Load 0x0,0x9
0498 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0499 00d8 | | Load_Top At_Offset_0
049a 0101 | | Execute Exception,Reraise
049b 0100 | | Execute Exception,Raise
049c 0000 0000 | | .BLANK 0000[0x4]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3 | | .CONST 0x04a3 ; Address of begin
04a1 04bd | | .CONST 0x04bd ; Address of exception handler
04a2 0001 | | .CONST 0x0001 ; Number of locals
04a3 BODY_04a0:
04a3 INIT_04a0:
04a3 00ea | | Load_Encached Null_String_Cache
04a4 4801 |H | Short_Literal 0x1
04a5 0092 0534 | 4| Action Push_String_Extended,0x534 ; "<raise_exception>"
04a7 4801 |H | Short_Literal 0x1
04a8 e21b | | Load 0x1,0x1b
04a9 e21c | | Load 0x1,0x1c
04aa e010 | | Load 0x0,0x10
04ab 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04ac e5ff | | Load 0x2,-0x1
04ad 6807 |h | Jump_Zero 0x4b5
04ae e21a | | Load 0x1,0x1a
04af 00ea | | Load_Encached Null_String_Cache
04b0 e21b | | Load 0x1,0x1b
04b1 e005 | | Load 0x0,0x5
04b2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04b3 c21a | | Store 0x1,0x1a
04b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04b5 e21a | | Load 0x1,0x1a
04b6 00ea | | Load_Encached Null_String_Cache
04b7 e21b | | Load 0x1,0x1b
04b8 4800 |H | Short_Literal 0x0
04b9 e005 | | Load 0x0,0x5
04ba 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04bb c21a | | Store 0x1,0x1a
04bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04bd TRAP_04a0:
04bd e008 | | Load 0x0,0x8
04be 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
04bf 010f | | Execute Exception,Equal
04c0 6809 |h | Jump_Zero 0x4ca
04c1 e008 | | Load 0x0,0x8
04c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
04c3 4802 |H | Short_Literal 0x2
04c4 0092 0535 | 5| Action Push_String_Extended,0x535 ; "Unable to copy !machine.rcf.target_file to !machine.rcf.allocated_targets"
04c6 e009 | | Load 0x0,0x9
04c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04c8 00d8 | | Load_Top At_Offset_0
04c9 0101 | | Execute Exception,Reraise
04ca 0100 | | Execute Exception,Raise
04cb 0000 0000 | | .BLANK 0000[0x5]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d3 | | .CONST 0x04d3 ; Address of begin
04d1 0004 | | .CONST 0x0004 ; Address of exception handler
04d2 0001 | | .CONST 0x0001 ; Number of locals
04d3 BODY_04d0:
04d3 INIT_04d0:
04d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04d4 0000 0000 | | .BLANK 0000[0x4]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db | | .CONST 0x04db ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0001 | | .CONST 0x0001 ; Number of locals
04db BODY_04d8:
04db INIT_04d8:
04db e008 | | Load 0x0,0x8
04dc 180e | | Execute Package,Field_Execute,Field_Number 0xe
04dd 4802 |H | Short_Literal 0x2
04de 0092 0536 | 6| Action Push_String_Extended,0x536 ; "Bad line found in !machine.rcf.allocated_targets: "
04e0 4801 |H | Short_Literal 0x1
04e1 e403 | | Load 0x2,0x3
04e2 e402 | | Load 0x2,0x2
04e3 01cf | | Execute Vector,Slice_Read
04e4 01cc | | Execute Vector,Catenate
04e5 0092 0537 | 7| Action Push_String_Extended,0x537 ; "\x22"
04e7 01cc | | Execute Vector,Catenate
04e8 e009 | | Load 0x0,0x9
04e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04eb 0000 0000 | | .BLANK 0000[0x5]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3 | | .CONST 0x04f3 ; Address of begin
04f1 04fe | | .CONST 0x04fe ; Address of exception handler
04f2 0001 | | .CONST 0x0001 ; Number of locals
04f3 BODY_04f0:
04f3 INIT_04f0:
04f3 e218 | | Load 0x1,0x18
04f4 4801 |H | Short_Literal 0x1
04f5 e406 | | Load 0x2,0x6
04f6 4801 |H | Short_Literal 0x1
04f7 e404 | | Load 0x2,0x4
04f8 0aff | | Execute_Immediate Plus,-0x1
04f9 e402 | | Load 0x2,0x2
04fa 01cf | | Execute Vector,Slice_Read
04fb e215 | | Load 0x1,0x15
04fc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04fd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04fe TRAP_04f0:
04fe 0007 | | Action Break_Optional
04ff e008 | | Load 0x0,0x8
0500 180e | | Execute Package,Field_Execute,Field_Number 0xe
0501 4807 |H | Short_Literal 0x7
0502 0092 0538 | 8| Action Push_String_Extended,0x538 ; "Error in target management: Can't enter line \x22"
0504 4801 |H | Short_Literal 0x1
0505 e403 | | Load 0x2,0x3
0506 e402 | | Load 0x2,0x2
0507 01cf | | Execute Vector,Slice_Read
0508 01cc | | Execute Vector,Catenate
0509 0092 0539 | 9| Action Push_String_Extended,0x539 ; "\x22 into target_map. Target "
050b 01cc | | Execute Vector,Catenate
050c e406 | | Load 0x2,0x6
050d e218 | | Load 0x1,0x18
050e e215 | | Load 0x1,0x15
050f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0510 01cc | | Execute Vector,Catenate
0511 0092 053a | :| Action Push_String_Extended,0x53a ; " has requested target number"
0513 01cc | | Execute Vector,Catenate
0514 e009 | | Load 0x0,0x9
0515 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0516 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0517 ; --------------------------------------------------------------------------------------
0517 ; STRING TABLE
0517 ; --------------------------------------------------------------------------------------
0517 004a | J | .STRTAB 0x004a->0x053c ; "!machine.rcf.allocated_targets"
0518 0066 | f | .STRTAB 0x0066->0x054b ; "!machine.rcf.target_file"
0519 007c | | | .STRTAB 0x007c->0x0557 ; "!machine.rcf.backup_file"
051a 0092 | | .STRTAB 0x0092->0x0563 ; "Rs6000"
051b 0096 | | .STRTAB 0x0096->0x0566 ; "Ddc_Caps"
051c 009c | | .STRTAB 0x009c->0x056a ; "Rs6000_Ibm"
051d 00a4 | | .STRTAB 0x00a4->0x056f ; "Rs6000_Aix_Ibm"
051e 00b0 | | .STRTAB 0x00b0->0x0576 ; "Spare_"
051f 00b4 | | .STRTAB 0x00b4->0x0579 ; "Undefined target: "
0520 00c4 | | .STRTAB 0x00c4->0x0582 ; "Create_Target"
0521 00cf | | .STRTAB 0x00cf->0x0588 ; "Unhandled Exception"
0522 00e0 | | .STRTAB 0x00e0->0x0592 ; " is already missing from target map"
0523 0101 | | .STRTAB 0x0101->0x05a3 ; "Destroy_Target"
0524 010d | | .STRTAB 0x010d->0x05aa ; "Unhandled exception in "
0525 0122 | " | .STRTAB 0x0122->0x05b6 ; ": "
0526 0122 | " | .STRTAB 0x0122->0x05b7 ; "!Machine.Rcf"
0527 012c | , | .STRTAB 0x012c->0x05bd ; "Unable to create !machine.rcf.allocated_targets"
0528 0159 | Y | .STRTAB 0x0159->0x05d4 ; "Status error while trying to close target file"
0529 0185 | | .STRTAB 0x0185->0x05eb ; "Can't get line from !Machine.Rcf.Target_File"
052a 01af | | .STRTAB 0x01af->0x0601 ; " "
052b 01ae | | .STRTAB 0x01ae->0x0602 ; "Cannot find target file"
052c 01c3 | | .STRTAB 0x01c3->0x060d ; "Cannot find backup file"
052d 01d8 | | .STRTAB 0x01d8->0x0619 ; "Destroying "
052e 01e1 | | .STRTAB 0x01e1->0x061e ; "Destroyed target "
052f 01f0 | | .STRTAB 0x01f0->0x0627 ; " was predefined"
0530 01fd | | .STRTAB 0x01fd->0x062e ; " is already missing from target file"
0531 021f | | .STRTAB 0x021f->0x0640 ; "<PROFILE>"
0532 0226 | & | .STRTAB 0x0226->0x0645 ; "!Model.R1000"
0533 0230 | 0 | .STRTAB 0x0230->0x064b ; "Unable to create world !Machine.Rcf"
0534 0251 | Q | .STRTAB 0x0251->0x065c ; "<raise_exception>"
0535 0260 | ` | .STRTAB 0x0260->0x0665 ; "Unable to copy !machine.rcf.target_file to !machine.rcf.allocated_targets"
0536 02a7 | | .STRTAB 0x02a7->0x0689 ; "Bad line found in !machine.rcf.allocated_targets: "
0537 02d7 | | .STRTAB 0x02d7->0x06a2 ; "\x22"
0538 02d6 | | .STRTAB 0x02d6->0x06a3 ; "Error in target management: Can't enter line \x22"
0539 0302 | | .STRTAB 0x0302->0x06ba ; "\x22 into target_map. Target "
053a 031b | | .STRTAB 0x031b->0x06c7 ; " has requested target number"
053b 0335 | 5 | .STREND 0x0335->0x06d5
053c 216d 6163 |!mac| .STRTAB_STRINGS
06d6 0000 0000 | | .XXX[0x2]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug Table
06d8 ; --------------------------------------------------------------------------------------
06d8 0004 000c | | .DEBUG4 0x0004,0x000c,0x2e72,0x0000,0x0001,0x0000
06de 0000 0000 | | .BLANK 0000[0x122]