|
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_0bf8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 03d8 | | .CONST 0x03d8 ; 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 0035 | 5 | .CONST 0x0035 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0008 | | .CONST 0x0008 ; 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 0235 | 5| Action Push_String_Extended,0x235 ; "R1000_Cg.Retain_Delta1_Compatibility"
0020 e002 | | Load 0x0,0x2
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 e002 | | Load 0x0,0x2
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 0093 0000 | | push_full_address 0x0
002e 6061 |`a | Indirect_Literal Discrete,0x90,{0x80000000, 0x00010000}
002f 0273 | s | Execute Discrete,Plus
0030 0007 | | Action Break_Optional
0031 029f 009b | | Declare_Subprogram INIT_0098,For_Call
0033 029f 00bb | | Declare_Subprogram INIT_00b8,For_Call
0035 BODY_0018:
0035 e003 | | Load 0x0,0x3
0036 180e | | Execute Package,Field_Execute,Field_Number 0xe
0037 4800 |H | Short_Literal 0x0
0038 0092 0236 | 6| Action Push_String_Extended,0x236 ; "[Preserve_Delta1_Switches (Files => "
003a e5ff | | Load 0x2,-0x1
003b 01cc | | Execute Vector,Catenate
003c 0092 0237 | 7| Action Push_String_Extended,0x237 ; ");]"
003e 01cc | | Execute Vector,Catenate
003f e004 | | Load 0x0,0x4
0040 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0041 4801 |H | Short_Literal 0x1
0042 e005 | | Load 0x0,0x5
0043 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0044 e005 | | Load 0x0,0x5
0045 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0046 7007 |p | Jump_Nonzero 0x4e
0047 e003 | | Load 0x0,0x3
0048 180e | | Execute Package,Field_Execute,Field_Number 0xe
0049 4806 |H | Short_Literal 0x6
004a 0092 0238 | 8| Action Push_String_Extended,0x238 ; "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."
004c e004 | | Load 0x0,0x4
004d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
004e 4801 |H | Short_Literal 0x1
004f e002 | | Load 0x0,0x2
0050 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0051 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0052 e402 | | Load 0x2,0x2
0053 e002 | | Load 0x0,0x2
0054 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0055 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0056 c404 | | Store 0x2,0x4
0057 e404 | | Load 0x2,0x4
0058 e002 | | Load 0x0,0x2
0059 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005a 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
005b 6815 |h | Jump_Zero 0x71
005c e003 | | Load 0x0,0x3
005d 180e | | Execute Package,Field_Execute,Field_Number 0xe
005e 4806 |H | Short_Literal 0x6
005f 0092 0239 | 9| Action Push_String_Extended,0x239 ; "No switch files found? ("
0061 e402 | | Load 0x2,0x2
0062 01cc | | Execute Vector,Catenate
0063 0092 023a | :| Action Push_String_Extended,0x23a ; ") ["
0065 01cc | | Execute Vector,Catenate
0066 e404 | | Load 0x2,0x4
0067 e002 | | Load 0x0,0x2
0068 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0069 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
006a 01cc | | Execute Vector,Catenate
006b 0092 023b | ;| Action Push_String_Extended,0x23b ; "]"
006d 01cc | | Execute Vector,Catenate
006e e004 | | Load 0x0,0x4
006f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0070 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0071 00cf | | Action Mark_Auxiliary
0072 780d |x | Jump 0x80
0073 e404 | | Load 0x2,0x4
0074 e002 | | Load 0x0,0x2
0075 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0076 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0077 c405 | | Store 0x2,0x5
0078 e405 | | Load 0x2,0x5
0079 8408 | | Call 0x2,0x8
007a e404 | | Load 0x2,0x4
007b e002 | | Load 0x0,0x2
007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
007e c404 | | Store 0x2,0x4
007f 00c9 | | Action Pop_Auxiliary_Loop
0080 e404 | | Load 0x2,0x4
0081 e002 | | Load 0x0,0x2
0082 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0083 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0084 6fee |o | Jump_Zero 0x73
0085 00ce | | Action Pop_Auxiliary
0086 e003 | | Load 0x0,0x3
0087 180e | | Execute Package,Field_Execute,Field_Number 0xe
0088 4800 |H | Short_Literal 0x0
0089 0092 023c | <| Action Push_String_Extended,0x23c ; "[Done, Preserve_Delta1_Switches]"
008b e004 | | Load 0x0,0x4
008c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
008d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
008e 0000 0000 | | .XXX[0x2]
0090 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0094 0000 0000 | | .BLANK 0000[0x4]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 6816 |h | Jump_Zero 0xb3
009d e003 | | Load 0x0,0x3
009e 180e | | Execute Package,Field_Execute,Field_Number 0xe
009f 4807 |H | Short_Literal 0x7
00a0 e7fe | | Load 0x3,-0x2
00a1 e7fd | | Load 0x3,-0x3
00a2 01cc | | Execute Vector,Catenate
00a3 0092 023d | =| Action Push_String_Extended,0x23d ; " ["
00a5 01cc | | Execute Vector,Catenate
00a6 e7ff | | Load 0x3,-0x1
00a7 e006 | | Load 0x0,0x6
00a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a9 011c | | Execute Any,Convert_Unchecked
00aa 1c01 | | Execute_Immediate Run_Utility,0x1
00ab 01cc | | Execute Vector,Catenate
00ac 0092 023b | ;| Action Push_String_Extended,0x23b ; "]"
00ae 01cc | | Execute Vector,Catenate
00af e004 | | Load 0x0,0x4
00b0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b1 e406 | | Load 0x2,0x6
00b2 0257 | W | Execute Discrete,Raise
00b3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00b4 0000 0000 | | .BLANK 0000[0x4]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00db | | .CONST 0x00db ; Address of begin
00b9 01aa | | .CONST 0x01aa ; Address of exception handler
00ba 000a | | .CONST 0x000a ; Number of locals
00bb INIT_00b8:
00bb e007 | | Load 0x0,0x7
00bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bd 02c7 | | Declare_Variable Any
00be e007 | | Load 0x0,0x7
00bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c0 a602 | | Store_Unchecked 0x3,0x2
00c1 e006 | | Load 0x0,0x6
00c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00c3 02c7 | | Declare_Variable Any
00c4 00d8 | | Load_Top At_Offset_0
00c5 1c00 | | Execute_Immediate Run_Utility,0x0
00c6 00e1 | | Load_Encached Boolean_Cache
00c7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00c8 e7ff | | Load 0x3,-0x1
00c9 e002 | | Load 0x0,0x2
00ca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00cb 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00cc e7ff | | Load 0x3,-0x1
00cd e002 | | Load 0x0,0x2
00ce 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00cf 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00d0 e008 | | Load 0x0,0x8
00d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d2 02c7 | | Declare_Variable Any
00d3 00d8 | | Load_Top At_Offset_0
00d4 1c00 | | Execute_Immediate Run_Utility,0x0
00d5 e006 | | Load 0x0,0x6
00d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d7 029f 01f3 | | Declare_Subprogram INIT_01f0,For_Call
00d9 029f 022b | +| Declare_Subprogram INIT_0228,For_Call
00db BODY_00b8:
00db 00be | | Action Activate_Tasks
00dc e006 | | Load 0x0,0x6
00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00de e603 | | Load 0x3,0x3
00df 0120 | | Execute Any,Is_Value
00e0 6803 |h | Jump_Zero 0xe4
00e1 e006 | | Load 0x0,0x6
00e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00e3 7801 |x | Jump 0xe5
00e4 e603 | | Load 0x3,0x3
00e5 e7ff | | Load 0x3,-0x1
00e6 e002 | | Load 0x0,0x2
00e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e8 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
00e9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00ea c603 | | Store 0x3,0x3
00eb 005b | [ | Store_Top Discrete,At_Offset_3
00ec e605 | | Load 0x3,0x5
00ed 0092 023e | >| Action Push_String_Extended,0x23e ; "Could not get Directory.Object for file: "
00ef e608 | | Load 0x3,0x8
00f0 8407 | | Call 0x2,0x7
00f1 e009 | | Load 0x0,0x9
00f2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00f3 e007 | | Load 0x0,0x7
00f4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00f5 c602 | | Store 0x3,0x2
00f6 e006 | | Load 0x0,0x6
00f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f8 00e1 | | Load_Encached Boolean_Cache
00f9 60f2 |` | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00004000}
00fa e602 | | Load 0x3,0x2
00fb e603 | | Load 0x3,0x3
00fc e006 | | Load 0x0,0x6
00fd 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
00fe 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00ff c604 | | Store 0x3,0x4
0100 005b | [ | Store_Top Discrete,At_Offset_3
0101 e605 | | Load 0x3,0x5
0102 0092 023f | ?| Action Push_String_Extended,0x23f ; "Could not get controlled status of file: "
0104 e608 | | Load 0x3,0x8
0105 8407 | | Call 0x2,0x7
0106 e604 | | Load 0x3,0x4
0107 680e |h | Jump_Zero 0x116
0108 0092 0240 | @| Action Push_String_Extended,0x240 ; "<ERRORS>"
010a 0092 0241 | A| Action Push_String_Extended,0x241 ; "<DEFAULT>"
010c 0092 0242 | B| Action Push_String_Extended,0x242 ; "<TOMORROW>"
010e 4803 |H | Short_Literal 0x3
010f 4801 |H | Short_Literal 0x1
0110 4800 |H | Short_Literal 0x0
0111 4801 |H | Short_Literal 0x1
0112 00ea | | Load_Encached Null_String_Cache
0113 e605 | | Load 0x3,0x5
0114 e00a | | Load 0x0,0xa
0115 180d | | Execute Package,Field_Execute,Field_Number 0xd
0116 e606 | | Load 0x3,0x6
0117 6817 |h | Jump_Zero 0x12f
0118 e006 | | Load 0x0,0x6
0119 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011a 60d1 |` | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00004000}
011b e602 | | Load 0x3,0x2
011c e603 | | Load 0x3,0x3
011d e006 | | Load 0x0,0x6
011e 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
011f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0120 005b | [ | Store_Top Discrete,At_Offset_3
0121 e605 | | Load 0x3,0x5
0122 0092 0243 | C| Action Push_String_Extended,0x243 ; "Could not thaw file: "
0124 e608 | | Load 0x3,0x8
0125 8407 | | Call 0x2,0x7
0126 7808 |x | Jump 0x12f
0127 0244 e605 | D | .XXX[0x8]
0129 01cc 0092 | |
012b 0245 01cc | E |
012d e004 1813 | |
012f e00b | | Load 0x0,0xb
0130 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0131 e607 | | Load 0x3,0x7
0132 4800 |H | Short_Literal 0x0
0133 60b8 |` | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00004000}
0134 e602 | | Load 0x3,0x2
0135 e00c | | Load 0x0,0xc
0136 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0137 e00b | | Load 0x0,0xb
0138 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0139 4800 |H | Short_Literal 0x0
013a e605 | | Load 0x3,0x5
013b 4802 |H | Short_Literal 0x2
013c e00b | | Load 0x0,0xb
013d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
013e c607 | | Store 0x3,0x7
013f 005b | [ | Store_Top Discrete,At_Offset_3
0140 e605 | | Load 0x3,0x5
0141 0092 0246 | F| Action Push_String_Extended,0x246 ; "Could not open switch file: "
0143 e608 | | Load 0x3,0x8
0144 8407 | | Call 0x2,0x7
0145 780c |x | Jump 0x152
0146 0247 01cc | G | .XXX[0xc]
0148 e403 e607 | |
014a e008 183d | =|
014c 00e1 011c | |
014e 1c01 01cc | |
0150 e004 1813 | |
0152 00db | | Load_Top At_Offset_3
0153 e008 | | Load 0x0,0x8
0154 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0155 0e4c | L | Execute_Immediate Not_Equal,0x4c
0156 700e |p | Jump_Nonzero 0x165
0157 e403 | | Load 0x2,0x3
0158 e607 | | Load 0x3,0x7
0159 e008 | | Load 0x0,0x8
015a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
015b 6817 |h | Jump_Zero 0x173
015c 7808 |x | Jump 0x165
015d 0248 e605 | H | .XXX[0x8]
015f 01cc 0092 | |
0161 0249 01cc | I |
0163 e004 1813 | |
0165 e00b | | Load 0x0,0xb
0166 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0167 e607 | | Load 0x3,0x7
0168 e00b | | Load 0x0,0xb
0169 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
016a c607 | | Store 0x3,0x7
016b 005b | [ | Store_Top Discrete,At_Offset_3
016c e605 | | Load 0x3,0x5
016d 0092 024a | J| Action Push_String_Extended,0x24a ; "Could close unmodified switch file: "
016f e608 | | Load 0x3,0x8
0170 8407 | | Call 0x2,0x7
0171 e406 | | Load 0x2,0x6
0172 0257 | W | Execute Discrete,Raise
0173 8609 | | Call 0x3,0x9
0174 7808 |x | Jump 0x17d
0175 024b e605 | K | .XXX[0x8]
0177 01cc 0092 | |
0179 0245 01cc | E |
017b e004 1813 | |
017d e00b | | Load 0x0,0xb
017e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
017f e607 | | Load 0x3,0x7
0180 e00b | | Load 0x0,0xb
0181 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0182 c607 | | Store 0x3,0x7
0183 005b | [ | Store_Top Discrete,At_Offset_3
0184 e605 | | Load 0x3,0x5
0185 0092 024c | L| Action Push_String_Extended,0x24c ; "Could close modified switch file: "
0187 e608 | | Load 0x3,0x8
0188 8407 | | Call 0x2,0x7
0189 e606 | | Load 0x3,0x6
018a 680e |h | Jump_Zero 0x199
018b e006 | | Load 0x0,0x6
018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018d 605e |`^ | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00004000}
018e e602 | | Load 0x3,0x2
018f e603 | | Load 0x3,0x3
0190 e006 | | Load 0x0,0x6
0191 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0192 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0193 005b | [ | Store_Top Discrete,At_Offset_3
0194 e605 | | Load 0x3,0x5
0195 0092 024d | M| Action Push_String_Extended,0x24d ; "Could not refreeze file: "
0197 e608 | | Load 0x3,0x8
0198 8407 | | Call 0x2,0x7
0199 e604 | | Load 0x3,0x4
019a 6808 |h | Jump_Zero 0x1a3
019b 0092 0240 | @| Action Push_String_Extended,0x240 ; "<ERRORS>"
019d 0092 0241 | A| Action Push_String_Extended,0x241 ; "<DEFAULT>"
019f 00ea | | Load_Encached Null_String_Cache
01a0 e605 | | Load 0x3,0x5
01a1 e00a | | Load 0x0,0xa
01a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a3 e602 | | Load 0x3,0x2
01a4 4801 |H | Short_Literal 0x1
01a5 4801 |H | Short_Literal 0x1
01a6 e007 | | Load 0x0,0x7
01a7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a8 c602 | | Store 0x3,0x2
01a9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01aa TRAP_00b8:
01aa e406 | | Load 0x2,0x6
01ab 010f | | Execute Exception,Equal
01ac 6816 |h | Jump_Zero 0x1c3
01ad e602 | | Load 0x3,0x2
01ae e007 | | Load 0x0,0x7
01af 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b0 012f | / | Execute Any,Equal
01b1 7006 |p | Jump_Nonzero 0x1b8
01b2 e602 | | Load 0x3,0x2
01b3 4801 |H | Short_Literal 0x1
01b4 4800 |H | Short_Literal 0x0
01b5 e007 | | Load 0x0,0x7
01b6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01b7 c602 | | Store 0x3,0x2
01b8 e604 | | Load 0x3,0x4
01b9 6808 |h | Jump_Zero 0x1c2
01ba 0092 0240 | @| Action Push_String_Extended,0x240 ; "<ERRORS>"
01bc 0092 0241 | A| Action Push_String_Extended,0x241 ; "<DEFAULT>"
01be 00ea | | Load_Encached Null_String_Cache
01bf e605 | | Load 0x3,0x5
01c0 e00a | | Load 0x0,0xa
01c1 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01c3 e003 | | Load 0x0,0x3
01c4 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c5 4808 |H | Short_Literal 0x8
01c6 0092 024e | N| Action Push_String_Extended,0x24e ; "Unexpected exception: "
01c8 4801 |H | Short_Literal 0x1
01c9 4801 |H | Short_Literal 0x1
01ca e00d | | Load 0x0,0xd
01cb 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01cc 01cc | | Execute Vector,Catenate
01cd 0092 024f | O| Action Push_String_Extended,0x24f ; "; processing switch file: "
01cf 01cc | | Execute Vector,Catenate
01d0 e605 | | Load 0x3,0x5
01d1 01cc | | Execute Vector,Catenate
01d2 e004 | | Load 0x0,0x4
01d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d4 860a | | Call 0x3,0xa
01d5 e602 | | Load 0x3,0x2
01d6 e007 | | Load 0x0,0x7
01d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d8 012f | / | Execute Any,Equal
01d9 7006 |p | Jump_Nonzero 0x1e0
01da e602 | | Load 0x3,0x2
01db 4801 |H | Short_Literal 0x1
01dc 4800 |H | Short_Literal 0x0
01dd e007 | | Load 0x0,0x7
01de 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01df c602 | | Store 0x3,0x2
01e0 e604 | | Load 0x3,0x4
01e1 6808 |h | Jump_Zero 0x1ea
01e2 0092 0240 | @| Action Push_String_Extended,0x240 ; "<ERRORS>"
01e4 0092 0241 | A| Action Push_String_Extended,0x241 ; "<DEFAULT>"
01e6 00ea | | Load_Encached Null_String_Cache
01e7 e605 | | Load 0x3,0x5
01e8 e00a | | Load 0x0,0xa
01e9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01eb 0000 | | .XXX[0x1]
01ec 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f7 | | .CONST 0x01f7 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0002 | | .CONST 0x0002 ; Number of locals
01f3 INIT_01f0:
01f3 e403 | | Load 0x2,0x3
01f4 e607 | | Load 0x3,0x7
01f5 e008 | | Load 0x0,0x8
01f6 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
01f7 BODY_01f0:
01f7 e003 | | Load 0x0,0x3
01f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
01f9 4802 |H | Short_Literal 0x2
01fa 0092 0250 | P| Action Push_String_Extended,0x250 ; "Delta1 => "
01fc 00db | | Load_Top At_Offset_3
01fd 01cc | | Execute Vector,Catenate
01fe 0092 0251 | Q| Action Push_String_Extended,0x251 ; ": "
0200 01cc | | Execute Vector,Catenate
0201 e605 | | Load 0x3,0x5
0202 01cc | | Execute Vector,Catenate
0203 e004 | | Load 0x0,0x4
0204 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0205 780d |x | Jump 0x213
0206 0252 e605 | R | .XXX[0xd]
0208 01cc 0092 | |
020a 0253 01cc | S |
020c 00db 01cc | |
020e 0092 0245 | E|
0210 01cc e004 | |
0212 1813 | |
0213 0092 0254 | T| Action Push_String_Extended,0x254 ; "FALSE"
0215 e403 | | Load 0x2,0x3
0216 e607 | | Load 0x3,0x7
0217 e008 | | Load 0x0,0x8
0218 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0219 0092 0255 | U| Action Push_String_Extended,0x255 ; "TRUE"
021b e403 | | Load 0x2,0x3
021c e607 | | Load 0x3,0x7
021d e008 | | Load 0x0,0x8
021e 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
021f 00d8 | | Load_Top At_Offset_0
0220 e403 | | Load 0x2,0x3
0221 e607 | | Load 0x3,0x7
0222 e008 | | Load 0x0,0x8
0223 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0224 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0225 0000 0000 | | .XXX[0x3]
0227 0000 | |
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0233 | 3 | .CONST 0x0233 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b e00b | | Load 0x0,0xb
022c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
022d e607 | | Load 0x3,0x7
022e e00b | | Load 0x0,0xb
022f 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0230 c607 | | Store 0x3,0x7
0231 c608 | | Store 0x3,0x8
0232 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0233 TRAP_0228:
0233 0007 | | Action Break_Optional
0234 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0235 ; --------------------------------------------------------------------------------------
0235 ; STRING TABLE
0235 ; --------------------------------------------------------------------------------------
0235 0044 | D | .STRTAB 0x0044->0x0257 ; "R1000_Cg.Retain_Delta1_Compatibility"
0236 0066 | f | .STRTAB 0x0066->0x0269 ; "[Preserve_Delta1_Switches (Files => "
0237 0088 | | .STRTAB 0x0088->0x027b ; ");]"
0238 0089 | | .STRTAB 0x0089->0x027c ; "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."
0239 0166 | f | .STRTAB 0x0166->0x02ec ; "No switch files found? ("
023a 017c | | | .STRTAB 0x017c->0x02f8 ; ") ["
023b 017d | } | .STRTAB 0x017d->0x02f9 ; "]"
023c 017c | | | .STRTAB 0x017c->0x02fa ; "[Done, Preserve_Delta1_Switches]"
023d 019a | | .STRTAB 0x019a->0x030a ; " ["
023e 019a | | .STRTAB 0x019a->0x030b ; "Could not get Directory.Object for file: "
023f 01c1 | | .STRTAB 0x01c1->0x031f ; "Could not get controlled status of file: "
0240 01e8 | | .STRTAB 0x01e8->0x0334 ; "<ERRORS>"
0241 01ee | | .STRTAB 0x01ee->0x0338 ; "<DEFAULT>"
0242 01f5 | | .STRTAB 0x01f5->0x033c ; "<TOMORROW>"
0243 01fd | | .STRTAB 0x01fd->0x0341 ; "Could not thaw file: "
0244 0210 | | .STRTAB 0x0210->0x034c ; "Polymorphic_Io.Open("
0245 0222 | " | .STRTAB 0x0222->0x0356 ; ");"
0246 0222 | " | .STRTAB 0x0222->0x0357 ; "Could not open switch file: "
0247 023c | < | .STRTAB 0x023c->0x0365 ; " Has => "
0248 0242 | B | .STRTAB 0x0242->0x0369 ; "not Has("
0249 0248 | H | .STRTAB 0x0248->0x036d ; ",Delta1);"
024a 024f | O | .STRTAB 0x024f->0x0371 ; "Could close unmodified switch file: "
024b 0271 | q | .STRTAB 0x0271->0x0383 ; "Polymorphic_Io.Close("
024c 0284 | | .STRTAB 0x0284->0x038e ; "Could close modified switch file: "
024d 02a4 | | .STRTAB 0x02a4->0x039f ; "Could not refreeze file: "
024e 02bb | | .STRTAB 0x02bb->0x03ab ; "Unexpected exception: "
024f 02cf | | .STRTAB 0x02cf->0x03b6 ; "; processing switch file: "
0250 02e7 | | .STRTAB 0x02e7->0x03c3 ; "Delta1 => "
0251 02ef | | .STRTAB 0x02ef->0x03c8 ; ": "
0252 02ef | | .STRTAB 0x02ef->0x03c9 ; "Has("
0253 02f1 | | .STRTAB 0x02f1->0x03cb ; ",Delta1 => "
0254 02fa | | .STRTAB 0x02fa->0x03d1 ; "FALSE"
0255 02fd | | .STRTAB 0x02fd->0x03d3 ; "TRUE"
0256 02ff | | .STREND 0x02ff->0x03d5
0257 5231 3030 |R100| .STRTAB_STRINGS
03d6 0000 0000 | | .XXX[0x2]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; Debug Table
03d8 ; --------------------------------------------------------------------------------------
03d8 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b7a,0x0000,0x0001,0x0000
03de 4c80 28c8 |L ( | .XXX[0x22]
03e0 c881 e0a1 | |
03e2 bdd9 95c9 | |
03e4 70c0 c4d5 |p |
03e6 bddc a54c | L|
03e8 80c8 c881 | |
03ea e0a1 70a1 | p |
03ec d1a1 a5cc | |
03ee a54c 80c8 | L |
03f0 c881 e0a1 | |
03f2 a5cc a54c | L|
03f4 80c8 c881 | |
03f6 e081 18d0 | |
03f8 e0a1 3955 | 9U|
03fa 3515 4925 |5 I%|
03fc 0d7d 1549 | } I|
03fe 493d 48a5 |I=H |