|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 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 03d0 | | .CONST 0x03d0 ; 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 INIT_0018,For_Outer_Call,Visible,Unelaborated 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 0030 | 0 | .CONST 0x0030 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0007 | | .CONST 0x0007 ; Number of locals 001b INIT_0018: 001b 00da | | Load_Top At_Offset_2 001c 0335 | 5 | Declare_Variable Array,Duplicate 001d 00cd | | Action Spare6_Action 001e 0092 022d | -| Action Push_String_Extended,0x22d ; "R1000_Cg.Retain_Delta1_Compatibility" 0020 e001 | | Load 0x0,0x1 0021 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0022 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0023 02c7 | | Declare_Variable Any 0024 00d8 | | Load_Top At_Offset_0 0025 1c00 | | Execute_Immediate Run_Utility,0x0 0026 e001 | | Load 0x0,0x1 0027 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0028 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0029 02c7 | | Declare_Variable Any 002a 00d8 | | Load_Top At_Offset_0 002b 1c00 | | Execute_Immediate Run_Utility,0x0 002c 029f 0093 | | Declare_Subprogram INIT_0090,For_Call 002e 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call 0030 BODY_0018: 0030 e002 | | Load 0x0,0x2 0031 180e | | Execute Package,Field_Execute,Field_Number 0xe 0032 4800 |H | Short_Literal 0x0 0033 0092 022e | .| Action Push_String_Extended,0x22e ; "[Preserve_Delta1_Switches (Files => " 0035 e5ff | | Load 0x2,-0x1 0036 01cc | | Execute Vector,Catenate 0037 0092 022f | /| Action Push_String_Extended,0x22f ; ");]" 0039 01cc | | Execute Vector,Catenate 003a e003 | | Load 0x0,0x3 003b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 003c 4801 |H | Short_Literal 0x1 003d e004 | | Load 0x0,0x4 003e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 003f e004 | | Load 0x0,0x4 0040 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0041 7007 |p | Jump_Nonzero 0x49 0042 e002 | | Load 0x0,0x2 0043 180e | | Execute Package,Field_Execute,Field_Number 0xe 0044 4806 |H | Short_Literal 0x6 0045 0092 0230 | 0| Action Push_String_Extended,0x230 ; "Use of Preserve_Delta1_Switches without privileges may result in some ACL failures. If the remainder of the Preserve_Delta1_Switches log below does not contain any errors or warnings, then feel free to ignore this message." 0047 e003 | | Load 0x0,0x3 0048 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0049 4801 |H | Short_Literal 0x1 004a e001 | | Load 0x0,0x1 004b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 004d e402 | | Load 0x2,0x2 004e e001 | | Load 0x0,0x1 004f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0050 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0051 c404 | | Store 0x2,0x4 0052 00db | | Load_Top At_Offset_3 0053 e001 | | Load 0x0,0x1 0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0055 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0056 6815 |h | Jump_Zero 0x6c 0057 e002 | | Load 0x0,0x2 0058 180e | | Execute Package,Field_Execute,Field_Number 0xe 0059 4806 |H | Short_Literal 0x6 005a 0092 0231 | 1| Action Push_String_Extended,0x231 ; "No switch files found? (" 005c e402 | | Load 0x2,0x2 005d 01cc | | Execute Vector,Catenate 005e 0092 0232 | 2| Action Push_String_Extended,0x232 ; ") [" 0060 01cc | | Execute Vector,Catenate 0061 e404 | | Load 0x2,0x4 0062 e001 | | Load 0x0,0x1 0063 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0064 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0065 01cc | | Execute Vector,Catenate 0066 0092 0233 | 3| Action Push_String_Extended,0x233 ; "]" 0068 01cc | | Execute Vector,Catenate 0069 e003 | | Load 0x0,0x3 006a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 006b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 006c 00cf | | Action Mark_Auxiliary 006d 780d |x | Jump 0x7b 006e e404 | | Load 0x2,0x4 006f e001 | | Load 0x0,0x1 0070 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0071 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0072 c405 | | Store 0x2,0x5 0073 00db | | Load_Top At_Offset_3 0074 8407 | | Call 0x2,0x7 0075 e404 | | Load 0x2,0x4 0076 e001 | | Load 0x0,0x1 0077 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0078 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0079 c404 | | Store 0x2,0x4 007a 00c9 | | Action Pop_Auxiliary_Loop 007b e404 | | Load 0x2,0x4 007c e001 | | Load 0x0,0x1 007d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 007e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 007f 6fee |o | Jump_Zero 0x6e 0080 00ce | | Action Pop_Auxiliary 0081 e002 | | Load 0x0,0x2 0082 180e | | Execute Package,Field_Execute,Field_Number 0xe 0083 4800 |H | Short_Literal 0x0 0084 0092 0234 | 4| Action Push_String_Extended,0x234 ; "[Done, Preserve_Delta1_Switches]" 0086 e003 | | Load 0x0,0x3 0087 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0088 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0089 0000 0000 | | .BLANK 0000[0x7] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 00da | | Load_Top At_Offset_2 0094 6816 |h | Jump_Zero 0xab 0095 e002 | | Load 0x0,0x2 0096 180e | | Execute Package,Field_Execute,Field_Number 0xe 0097 4807 |H | Short_Literal 0x7 0098 e7fe | | Load 0x3,-0x2 0099 e7fd | | Load 0x3,-0x3 009a 01cc | | Execute Vector,Catenate 009b 0092 0235 | 5| Action Push_String_Extended,0x235 ; " [" 009d 01cc | | Execute Vector,Catenate 009e e7ff | | Load 0x3,-0x1 009f e005 | | Load 0x0,0x5 00a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a1 011c | | Execute Any,Convert_Unchecked 00a2 1c01 | | Execute_Immediate Run_Utility,0x1 00a3 01cc | | Execute Vector,Catenate 00a4 0092 0233 | 3| Action Push_String_Extended,0x233 ; "]" 00a6 01cc | | Execute Vector,Catenate 00a7 e003 | | Load 0x0,0x3 00a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a9 e006 | | Load 0x0,0x6 00aa 0257 | W | Execute Discrete,Raise 00ab 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00ac 0000 0000 | | .BLANK 0000[0x4] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00d3 | | .CONST 0x00d3 ; Address of begin 00b1 01a2 | | .CONST 0x01a2 ; Address of exception handler 00b2 000a | | .CONST 0x000a ; Number of locals 00b3 INIT_00b0: 00b3 e007 | | Load 0x0,0x7 00b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b5 02c7 | | Declare_Variable Any 00b6 e007 | | Load 0x0,0x7 00b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b8 a602 | | Store_Unchecked 0x3,0x2 00b9 e005 | | Load 0x0,0x5 00ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00bb 02c7 | | Declare_Variable Any 00bc 00d8 | | Load_Top At_Offset_0 00bd 1c00 | | Execute_Immediate Run_Utility,0x0 00be 00e1 | | Load_Encached Boolean_Cache 00bf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00c0 e7ff | | Load 0x3,-0x1 00c1 e001 | | Load 0x0,0x1 00c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c3 1820 | | Execute Package,Field_Execute,Field_Number 0x20 00c4 e7ff | | Load 0x3,-0x1 00c5 e001 | | Load 0x0,0x1 00c6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00c7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 00c8 e008 | | Load 0x0,0x8 00c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00ca 02c7 | | Declare_Variable Any 00cb 00d8 | | Load_Top At_Offset_0 00cc 1c00 | | Execute_Immediate Run_Utility,0x0 00cd e005 | | Load 0x0,0x5 00ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00cf 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call 00d1 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call 00d3 BODY_00b0: 00d3 00be | | Action Activate_Tasks 00d4 e005 | | Load 0x0,0x5 00d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00d6 e603 | | Load 0x3,0x3 00d7 0120 | | Execute Any,Is_Value 00d8 6803 |h | Jump_Zero 0xdc 00d9 e005 | | Load 0x0,0x5 00da 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00db 7801 |x | Jump 0xdd 00dc e603 | | Load 0x3,0x3 00dd e7ff | | Load 0x3,-0x1 00de e001 | | Load 0x0,0x1 00df 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e0 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 00e1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00e2 c603 | | Store 0x3,0x3 00e3 005b | [ | Store_Top Discrete,At_Offset_3 00e4 e605 | | Load 0x3,0x5 00e5 0092 0236 | 6| Action Push_String_Extended,0x236 ; "Could not get Directory.Object for file: " 00e7 e608 | | Load 0x3,0x8 00e8 8406 | | Call 0x2,0x6 00e9 e009 | | Load 0x0,0x9 00ea 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00eb e007 | | Load 0x0,0x7 00ec 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00ed c602 | | Store 0x3,0x2 00ee e005 | | Load 0x0,0x5 00ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f0 00e1 | | Load_Encached Boolean_Cache 00f1 60f2 |` | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x00004000} 00f2 e602 | | Load 0x3,0x2 00f3 e603 | | Load 0x3,0x3 00f4 e005 | | Load 0x0,0x5 00f5 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 00f6 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 00f7 c604 | | Store 0x3,0x4 00f8 005b | [ | Store_Top Discrete,At_Offset_3 00f9 e605 | | Load 0x3,0x5 00fa 0092 0237 | 7| Action Push_String_Extended,0x237 ; "Could not get controlled status of file: " 00fc e608 | | Load 0x3,0x8 00fd 8406 | | Call 0x2,0x6 00fe e604 | | Load 0x3,0x4 00ff 680e |h | Jump_Zero 0x10e 0100 0092 0238 | 8| Action Push_String_Extended,0x238 ; "<ERRORS>" 0102 0092 0239 | 9| Action Push_String_Extended,0x239 ; "<DEFAULT>" 0104 0092 023a | :| Action Push_String_Extended,0x23a ; "<TOMORROW>" 0106 4803 |H | Short_Literal 0x3 0107 4801 |H | Short_Literal 0x1 0108 4800 |H | Short_Literal 0x0 0109 4801 |H | Short_Literal 0x1 010a 00ea | | Load_Encached Null_String_Cache 010b e605 | | Load 0x3,0x5 010c e00a | | Load 0x0,0xa 010d 180d | | Execute Package,Field_Execute,Field_Number 0xd 010e e606 | | Load 0x3,0x6 010f 6817 |h | Jump_Zero 0x127 0110 e005 | | Load 0x0,0x5 0111 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0112 60d1 |` | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x00004000} 0113 e602 | | Load 0x3,0x2 0114 e603 | | Load 0x3,0x3 0115 e005 | | Load 0x0,0x5 0116 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0117 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0118 005b | [ | Store_Top Discrete,At_Offset_3 0119 e605 | | Load 0x3,0x5 011a 0092 023b | ;| Action Push_String_Extended,0x23b ; "Could not thaw file: " 011c e608 | | Load 0x3,0x8 011d 8406 | | Call 0x2,0x6 011e 7808 |x | Jump 0x127 011f 023c e605 | < | .XXX[0x8] 0121 01cc 0092 | | 0123 023d 01cc | = | 0125 e003 1813 | | 0127 e00b | | Load 0x0,0xb 0128 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0129 e607 | | Load 0x3,0x7 012a 4800 |H | Short_Literal 0x0 012b 60b8 |` | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x00004000} 012c e602 | | Load 0x3,0x2 012d e00c | | Load 0x0,0xc 012e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 012f e00b | | Load 0x0,0xb 0130 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0131 4800 |H | Short_Literal 0x0 0132 e605 | | Load 0x3,0x5 0133 4802 |H | Short_Literal 0x2 0134 e00b | | Load 0x0,0xb 0135 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0136 c607 | | Store 0x3,0x7 0137 005b | [ | Store_Top Discrete,At_Offset_3 0138 e605 | | Load 0x3,0x5 0139 0092 023e | >| Action Push_String_Extended,0x23e ; "Could not open switch file: " 013b e608 | | Load 0x3,0x8 013c 8406 | | Call 0x2,0x6 013d 780c |x | Jump 0x14a 013e 023f 01cc | ? | .XXX[0xc] 0140 e403 e607 | | 0142 e008 183d | =| 0144 00e1 011c | | 0146 1c01 01cc | | 0148 e003 1813 | | 014a 00db | | Load_Top At_Offset_3 014b e008 | | Load 0x0,0x8 014c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 014d 0e4c | L | Execute_Immediate Not_Equal,0x4c 014e 700e |p | Jump_Nonzero 0x15d 014f e403 | | Load 0x2,0x3 0150 e607 | | Load 0x3,0x7 0151 e008 | | Load 0x0,0x8 0152 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0153 6817 |h | Jump_Zero 0x16b 0154 7808 |x | Jump 0x15d 0155 0240 e605 | @ | .XXX[0x8] 0157 01cc 0092 | | 0159 0241 01cc | A | 015b e003 1813 | | 015d e00b | | Load 0x0,0xb 015e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 015f e607 | | Load 0x3,0x7 0160 e00b | | Load 0x0,0xb 0161 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0162 c607 | | Store 0x3,0x7 0163 005b | [ | Store_Top Discrete,At_Offset_3 0164 e605 | | Load 0x3,0x5 0165 0092 0242 | B| Action Push_String_Extended,0x242 ; "Could close unmodified switch file: " 0167 e608 | | Load 0x3,0x8 0168 8406 | | Call 0x2,0x6 0169 e006 | | Load 0x0,0x6 016a 0257 | W | Execute Discrete,Raise 016b 8609 | | Call 0x3,0x9 016c 7808 |x | Jump 0x175 016d 0243 e605 | C | .XXX[0x8] 016f 01cc 0092 | | 0171 023d 01cc | = | 0173 e003 1813 | | 0175 e00b | | Load 0x0,0xb 0176 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0177 e607 | | Load 0x3,0x7 0178 e00b | | Load 0x0,0xb 0179 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 017a c607 | | Store 0x3,0x7 017b 005b | [ | Store_Top Discrete,At_Offset_3 017c e605 | | Load 0x3,0x5 017d 0092 0244 | D| Action Push_String_Extended,0x244 ; "Could close modified switch file: " 017f e608 | | Load 0x3,0x8 0180 8406 | | Call 0x2,0x6 0181 e606 | | Load 0x3,0x6 0182 680e |h | Jump_Zero 0x191 0183 e005 | | Load 0x0,0x5 0184 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0185 605e |`^ | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x00004000} 0186 e602 | | Load 0x3,0x2 0187 e603 | | Load 0x3,0x3 0188 e005 | | Load 0x0,0x5 0189 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 018a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 018b 005b | [ | Store_Top Discrete,At_Offset_3 018c e605 | | Load 0x3,0x5 018d 0092 0245 | E| Action Push_String_Extended,0x245 ; "Could not refreeze file: " 018f e608 | | Load 0x3,0x8 0190 8406 | | Call 0x2,0x6 0191 e604 | | Load 0x3,0x4 0192 6808 |h | Jump_Zero 0x19b 0193 0092 0238 | 8| Action Push_String_Extended,0x238 ; "<ERRORS>" 0195 0092 0239 | 9| Action Push_String_Extended,0x239 ; "<DEFAULT>" 0197 00ea | | Load_Encached Null_String_Cache 0198 e605 | | Load 0x3,0x5 0199 e00a | | Load 0x0,0xa 019a 180e | | Execute Package,Field_Execute,Field_Number 0xe 019b e602 | | Load 0x3,0x2 019c 4801 |H | Short_Literal 0x1 019d 4801 |H | Short_Literal 0x1 019e e007 | | Load 0x0,0x7 019f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01a0 c602 | | Store 0x3,0x2 01a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01a2 TRAP_00b0: 01a2 e006 | | Load 0x0,0x6 01a3 010f | | Execute Exception,Equal 01a4 6816 |h | Jump_Zero 0x1bb 01a5 e602 | | Load 0x3,0x2 01a6 e007 | | Load 0x0,0x7 01a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01a8 012f | / | Execute Any,Equal 01a9 7006 |p | Jump_Nonzero 0x1b0 01aa e602 | | Load 0x3,0x2 01ab 4801 |H | Short_Literal 0x1 01ac 4800 |H | Short_Literal 0x0 01ad e007 | | Load 0x0,0x7 01ae 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01af c602 | | Store 0x3,0x2 01b0 e604 | | Load 0x3,0x4 01b1 6808 |h | Jump_Zero 0x1ba 01b2 0092 0238 | 8| Action Push_String_Extended,0x238 ; "<ERRORS>" 01b4 0092 0239 | 9| Action Push_String_Extended,0x239 ; "<DEFAULT>" 01b6 00ea | | Load_Encached Null_String_Cache 01b7 e605 | | Load 0x3,0x5 01b8 e00a | | Load 0x0,0xa 01b9 180e | | Execute Package,Field_Execute,Field_Number 0xe 01ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01bb e002 | | Load 0x0,0x2 01bc 180e | | Execute Package,Field_Execute,Field_Number 0xe 01bd 4808 |H | Short_Literal 0x8 01be 0092 0246 | F| Action Push_String_Extended,0x246 ; "Unexpected exception: " 01c0 4801 |H | Short_Literal 0x1 01c1 4801 |H | Short_Literal 0x1 01c2 e00d | | Load 0x0,0xd 01c3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01c4 01cc | | Execute Vector,Catenate 01c5 0092 0247 | G| Action Push_String_Extended,0x247 ; "; processing switch file: " 01c7 01cc | | Execute Vector,Catenate 01c8 e605 | | Load 0x3,0x5 01c9 01cc | | Execute Vector,Catenate 01ca e003 | | Load 0x0,0x3 01cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01cc 860a | | Call 0x3,0xa 01cd e602 | | Load 0x3,0x2 01ce e007 | | Load 0x0,0x7 01cf 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01d0 012f | / | Execute Any,Equal 01d1 7006 |p | Jump_Nonzero 0x1d8 01d2 e602 | | Load 0x3,0x2 01d3 4801 |H | Short_Literal 0x1 01d4 4800 |H | Short_Literal 0x0 01d5 e007 | | Load 0x0,0x7 01d6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01d7 c602 | | Store 0x3,0x2 01d8 e604 | | Load 0x3,0x4 01d9 6808 |h | Jump_Zero 0x1e2 01da 0092 0238 | 8| Action Push_String_Extended,0x238 ; "<ERRORS>" 01dc 0092 0239 | 9| Action Push_String_Extended,0x239 ; "<DEFAULT>" 01de 00ea | | Load_Encached Null_String_Cache 01df e605 | | Load 0x3,0x5 01e0 e00a | | Load 0x0,0xa 01e1 180e | | Execute Package,Field_Execute,Field_Number 0xe 01e2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01e3 0000 | | .XXX[0x1] 01e4 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01ef | | .CONST 0x01ef ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0002 | | .CONST 0x0002 ; Number of locals 01eb INIT_01e8: 01eb e403 | | Load 0x2,0x3 01ec e607 | | Load 0x3,0x7 01ed e008 | | Load 0x0,0x8 01ee 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 01ef BODY_01e8: 01ef e002 | | Load 0x0,0x2 01f0 180e | | Execute Package,Field_Execute,Field_Number 0xe 01f1 4802 |H | Short_Literal 0x2 01f2 0092 0248 | H| Action Push_String_Extended,0x248 ; "Delta1 => " 01f4 00db | | Load_Top At_Offset_3 01f5 01cc | | Execute Vector,Catenate 01f6 0092 0249 | I| Action Push_String_Extended,0x249 ; ": " 01f8 01cc | | Execute Vector,Catenate 01f9 e605 | | Load 0x3,0x5 01fa 01cc | | Execute Vector,Catenate 01fb e003 | | Load 0x0,0x3 01fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01fd 780d |x | Jump 0x20b 01fe 024a e605 | J | .XXX[0xd] 0200 01cc 0092 | | 0202 024b 01cc | K | 0204 00db 01cc | | 0206 0092 023d | =| 0208 01cc e003 | | 020a 1813 | | 020b 0092 024c | L| Action Push_String_Extended,0x24c ; "FALSE" 020d e403 | | Load 0x2,0x3 020e e607 | | Load 0x3,0x7 020f e008 | | Load 0x0,0x8 0210 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0211 0092 024d | M| Action Push_String_Extended,0x24d ; "TRUE" 0213 e403 | | Load 0x2,0x3 0214 e607 | | Load 0x3,0x7 0215 e008 | | Load 0x0,0x8 0216 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0217 00d8 | | Load_Top At_Offset_0 0218 e403 | | Load 0x2,0x3 0219 e607 | | Load 0x3,0x7 021a e008 | | Load 0x0,0x8 021b 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 021c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 021d 0000 0000 | | .XXX[0x3] 021f 0000 | | 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 022b | + | .CONST 0x022b ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 e00b | | Load 0x0,0xb 0224 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0225 e607 | | Load 0x3,0x7 0226 e00b | | Load 0x0,0xb 0227 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0228 c607 | | Store 0x3,0x7 0229 c608 | | Store 0x3,0x8 022a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 022b TRAP_0220: 022b 0007 | | Action Break_Optional 022c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 022d ; -------------------------------------------------------------------------------------- 022d ; STRING TABLE 022d ; -------------------------------------------------------------------------------------- 022d 0044 | D | .STRTAB 0x0044->0x024f ; "R1000_Cg.Retain_Delta1_Compatibility" 022e 0066 | f | .STRTAB 0x0066->0x0261 ; "[Preserve_Delta1_Switches (Files => " 022f 0088 | | .STRTAB 0x0088->0x0273 ; ");]" 0230 0089 | | .STRTAB 0x0089->0x0274 ; "Use of Preserve_Delta1_Switches without privileges may result in some ACL failures. If the remainder of the Preserve_Delta1_Switches log below does not contain any errors or warnings, then feel free to ignore this message." 0231 0166 | f | .STRTAB 0x0166->0x02e4 ; "No switch files found? (" 0232 017c | | | .STRTAB 0x017c->0x02f0 ; ") [" 0233 017d | } | .STRTAB 0x017d->0x02f1 ; "]" 0234 017c | | | .STRTAB 0x017c->0x02f2 ; "[Done, Preserve_Delta1_Switches]" 0235 019a | | .STRTAB 0x019a->0x0302 ; " [" 0236 019a | | .STRTAB 0x019a->0x0303 ; "Could not get Directory.Object for file: " 0237 01c1 | | .STRTAB 0x01c1->0x0317 ; "Could not get controlled status of file: " 0238 01e8 | | .STRTAB 0x01e8->0x032c ; "<ERRORS>" 0239 01ee | | .STRTAB 0x01ee->0x0330 ; "<DEFAULT>" 023a 01f5 | | .STRTAB 0x01f5->0x0334 ; "<TOMORROW>" 023b 01fd | | .STRTAB 0x01fd->0x0339 ; "Could not thaw file: " 023c 0210 | | .STRTAB 0x0210->0x0344 ; "Polymorphic_Io.Open(" 023d 0222 | " | .STRTAB 0x0222->0x034e ; ");" 023e 0222 | " | .STRTAB 0x0222->0x034f ; "Could not open switch file: " 023f 023c | < | .STRTAB 0x023c->0x035d ; " Has => " 0240 0242 | B | .STRTAB 0x0242->0x0361 ; "not Has(" 0241 0248 | H | .STRTAB 0x0248->0x0365 ; ",Delta1);" 0242 024f | O | .STRTAB 0x024f->0x0369 ; "Could close unmodified switch file: " 0243 0271 | q | .STRTAB 0x0271->0x037b ; "Polymorphic_Io.Close(" 0244 0284 | | .STRTAB 0x0284->0x0386 ; "Could close modified switch file: " 0245 02a4 | | .STRTAB 0x02a4->0x0397 ; "Could not refreeze file: " 0246 02bb | | .STRTAB 0x02bb->0x03a3 ; "Unexpected exception: " 0247 02cf | | .STRTAB 0x02cf->0x03ae ; "; processing switch file: " 0248 02e7 | | .STRTAB 0x02e7->0x03bb ; "Delta1 => " 0249 02ef | | .STRTAB 0x02ef->0x03c0 ; ": " 024a 02ef | | .STRTAB 0x02ef->0x03c1 ; "Has(" 024b 02f1 | | .STRTAB 0x02f1->0x03c3 ; ",Delta1 => " 024c 02fa | | .STRTAB 0x02fa->0x03c9 ; "FALSE" 024d 02fd | | .STRTAB 0x02fd->0x03cb ; "TRUE" 024e 02ff | | .STREND 0x02ff->0x03cd 024f 5231 3030 |R100| .STRTAB_STRINGS 03ce 0000 0000 | | .XXX[0x2] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; Debug Table 03d0 ; -------------------------------------------------------------------------------------- 03d0 0004 0001 | | .DEBUG4 0x0004,0x0001,0x391b,0x0000,0x0001,0x0000 03d6 0000 0000 | | .BLANK 0000[0x2a]