|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦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 05e0 | | .CONST 0x05e0 ; 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 8003 | | .CONST 0x8003 ; 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 0044 | D | .CONST 0x0044 ; Address of begin
0019 0069 | i | .CONST 0x0069 ; Address of exception handler
001a 0012 | | .CONST 0x0012 ; Number of locals
001b INIT_0018:
001b e002 | | Load 0x0,0x2
001c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
001d e002 | | Load 0x0,0x2
001e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
001f 03f1 | | Declare_Variable Discrete,With_Value
0020 00e3 | | Load_Encached Natural_Cache
0021 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0022 00e3 | | Load_Encached Natural_Cache
0023 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0024 00e1 | | Load_Encached Boolean_Cache
0025 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0026 0093 0000 | | push_full_address 0x0
0028 6083 |` | Indirect_Literal Discrete,0xac,{0x80000000, 0x00010000}
0029 0273 | s | Execute Discrete,Plus
002a 0007 | | Action Break_Optional
002b e003 | | Load 0x0,0x3
002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
002d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
002e 0092 02d1 | | Action Push_String_Extended,0x2d1 ; "!Targets.Implementation.Rci_Release"
0030 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
0032 029f 00db | | Declare_Subprogram INIT_00d8,For_Call
0034 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
0036 029f 010b | | Declare_Subprogram INIT_0108,For_Call
0038 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call
003a 029f 014b | K| Declare_Subprogram INIT_0148,For_Call
003c 029f 0183 | | Declare_Subprogram INIT_0180,For_Call
003e 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call
0040 029f 021b | | Declare_Subprogram INIT_0218,For_Call
0042 029f 024b | K| Declare_Subprogram INIT_0248,For_Call
0044 BODY_0018:
0044 e004 | | Load 0x0,0x4
0045 180e | | Execute Package,Field_Execute,Field_Number 0xe
0046 4800 |H | Short_Literal 0x0
0047 0092 02d2 | | Action Push_String_Extended,0x2d2 ; "Installing Customizable RCI."
0049 e005 | | Load 0x0,0x5
004a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
004b 4803 |H | Short_Literal 0x3
004c e004 | | Load 0x0,0x4
004d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
004e 8411 | | Call 0x2,0x11
004f e405 | | Load 0x2,0x5
0050 6801 |h | Jump_Zero 0x52
0051 8412 | | Call 0x2,0x12
0052 840d | | Call 0x2,0xd
0053 e403 | | Load 0x2,0x3
0054 7008 |p | Jump_Nonzero 0x5d
0055 e004 | | Load 0x0,0x4
0056 180e | | Execute Package,Field_Execute,Field_Number 0xe
0057 4802 |H | Short_Literal 0x2
0058 0092 02d3 | | Action Push_String_Extended,0x2d3 ; "Successfully Restored Links "
005a e005 | | Load 0x0,0x5
005b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005c 7807 |x | Jump 0x64
005d e004 | | Load 0x0,0x4
005e 180e | | Execute Package,Field_Execute,Field_Number 0xe
005f 4806 |H | Short_Literal 0x6
0060 0092 02d4 | | Action Push_String_Extended,0x2d4 ; "Unable to restore Links to all RCI commands. "
0062 e005 | | Load 0x0,0x5
0063 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0064 840f | | Call 0x2,0xf
0065 840e | | Call 0x2,0xe
0066 8410 | | Call 0x2,0x10
0067 840c | | Call 0x2,0xc
0068 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0069 TRAP_0018:
0069 e406 | | Load 0x2,0x6
006a 010f | | Execute Exception,Equal
006b 6823 |h# | Jump_Zero 0x8f
006c e404 | | Load 0x2,0x4
006d 0a01 | | Execute_Immediate Plus,0x1
006e c404 | | Store 0x2,0x4
006f e004 | | Load 0x0,0x4
0070 180e | | Execute Package,Field_Execute,Field_Number 0xe
0071 4807 |H | Short_Literal 0x7
0072 0092 02d5 | | Action Push_String_Extended,0x2d5 ; "Error: Current context is "
0074 e407 | | Load 0x2,0x7
0075 01cc | | Execute Vector,Catenate
0076 0092 02d6 | | Action Push_String_Extended,0x2d6 ; ", which is not of the format "
0078 01cc | | Execute Vector,Catenate
0079 e408 | | Load 0x2,0x8
007a 01cc | | Execute Vector,Catenate
007b 0092 02d7 | | Action Push_String_Extended,0x2d7 ; "X_Y_Z, where \x22X_Y\x22 is the release number "
007d 01cc | | Execute Vector,Catenate
007e 0092 02d8 | | Action Push_String_Extended,0x2d8 ; "and \x22_Z\x22 is the version"
0080 01cc | | Execute Vector,Catenate
0081 e005 | | Load 0x0,0x5
0082 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0083 e004 | | Load 0x0,0x4
0084 180e | | Execute Package,Field_Execute,Field_Number 0xe
0085 4807 |H | Short_Literal 0x7
0086 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "RCI Installation Completed with Errors"
0088 e005 | | Load 0x0,0x5
0089 1813 | | Execute Package,Field_Execute,Field_Number 0x13
008a 840c | | Call 0x2,0xc
008b e403 | | Load 0x2,0x3
008c 0a01 | | Execute_Immediate Plus,0x1
008d c403 | | Store 0x2,0x3
008e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
008f e404 | | Load 0x2,0x4
0090 0a01 | | Execute_Immediate Plus,0x1
0091 c404 | | Store 0x2,0x4
0092 e004 | | Load 0x0,0x4
0093 180e | | Execute Package,Field_Execute,Field_Number 0xe
0094 4807 |H | Short_Literal 0x7
0095 4800 |H | Short_Literal 0x0
0096 4801 |H | Short_Literal 0x1
0097 e006 | | Load 0x0,0x6
0098 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0099 0092 02da | | Action Push_String_Extended,0x2da ; " raised in Restore_Rci"
009b 01cc | | Execute Vector,Catenate
009c e005 | | Load 0x0,0x5
009d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
009e e004 | | Load 0x0,0x4
009f 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a0 4807 |H | Short_Literal 0x7
00a1 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "RCI Installation Completed with Errors"
00a3 e005 | | Load 0x0,0x5
00a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a5 840c | | Call 0x2,0xc
00a6 e403 | | Load 0x2,0x3
00a7 0a01 | | Execute_Immediate Plus,0x1
00a8 c403 | | Store 0x2,0x3
00a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00aa 0000 0000 | | .XXX[0x2]
00ac 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 e407 | | Load 0x2,0x7
00b4 01db | | Execute Vector,Length
00b5 0c24 | $ | Execute_Immediate Greater_Equal,0x24
00b6 681e |h | Jump_Zero 0xd5
00b7 4801 |H | Short_Literal 0x1
00b8 e407 | | Load 0x2,0x7
00b9 01dd | | Execute Vector,First
00ba e407 | | Load 0x2,0x7
00bb 01dd | | Execute Vector,First
00bc 0a22 | " | Execute_Immediate Plus,0x22
00bd 00d8 | | Load_Top At_Offset_0
00be 00e2 | | Load_Encached Integer_Cache
00bf 0260 | ` | Execute Discrete,In_Type
00c0 7001 |p | Jump_Nonzero 0xc2
00c1 0801 | | Execute_Immediate Raise,0x1
00c2 e407 | | Load 0x2,0x7
00c3 01cf | | Execute Vector,Slice_Read
00c4 e408 | | Load 0x2,0x8
00c5 e007 | | Load 0x0,0x7
00c6 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00c7 680d |h | Jump_Zero 0xd5
00c8 e407 | | Load 0x2,0x7
00c9 01dd | | Execute Vector,First
00ca 0a23 | # | Execute_Immediate Plus,0x23
00cb 00d8 | | Load_Top At_Offset_0
00cc 00e2 | | Load_Encached Integer_Cache
00cd 0260 | ` | Execute Discrete,In_Type
00ce 7001 |p | Jump_Nonzero 0xd0
00cf 0801 | | Execute_Immediate Raise,0x1
00d0 e407 | | Load 0x2,0x7
00d1 01dc | | Execute Vector,Last
00d2 e407 | | Load 0x2,0x7
00d3 01cf | | Execute Vector,Slice_Read
00d4 00ca | | Action Exit_Nullary_Function
00d5 e406 | | Load 0x2,0x6
00d6 0257 | W | Execute Discrete,Raise
00d7 0000 | | .XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00dd | | .CONST 0x00dd ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0002 | | .CONST 0x0002 ; Number of locals
00db INIT_00d8:
00db 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
00dd BODY_00d8:
00dd 4801 |H | Short_Literal 0x1
00de 0092 02db | | Action Push_String_Extended,0x2db ; "<DEFAULT>"
00e0 e5ff | | Load 0x2,-0x1
00e1 e007 | | Load 0x0,0x7
00e2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00e3 6802 |h | Jump_Zero 0xe6
00e4 8602 | | Call 0x3,0x2
00e5 7804 |x | Jump 0xea
00e6 e5ff | | Load 0x2,-0x1
00e7 0335 | 5 | Declare_Variable Array,Duplicate
00e8 00cd | | Action Spare6_Action
00e9 00ca | | Action Exit_Nullary_Function
00ea 0831 | 1 | Execute_Immediate Raise,0x31
00eb 0000 0000 | | .BLANK 0000[0x5]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f5 | | .CONST 0x00f5 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0002 | | .CONST 0x0002 ; Number of locals
00f3 INIT_00f0:
00f3 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call
00f5 BODY_00f0:
00f5 4801 |H | Short_Literal 0x1
00f6 0092 02db | | Action Push_String_Extended,0x2db ; "<DEFAULT>"
00f8 e5fe | | Load 0x2,-0x2
00f9 e007 | | Load 0x0,0x7
00fa 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00fb 6802 |h | Jump_Zero 0xfe
00fc 8602 | | Call 0x3,0x2
00fd 7804 |x | Jump 0x102
00fe e5fe | | Load 0x2,-0x2
00ff 0335 | 5 | Declare_Variable Array,Duplicate
0100 00cd | | Action Spare6_Action
0101 00ca | | Action Exit_Nullary_Function
0102 0831 | 1 | Execute_Immediate Raise,0x31
0103 0000 0000 | | .BLANK 0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b e403 | | Load 0x2,0x3
010c 700a |p | Jump_Nonzero 0x117
010d e404 | | Load 0x2,0x4
010e 7008 |p | Jump_Nonzero 0x117
010f e004 | | Load 0x0,0x4
0110 180e | | Execute Package,Field_Execute,Field_Number 0xe
0111 4803 |H | Short_Literal 0x3
0112 0092 02dc | | Action Push_String_Extended,0x2dc ; "Installation of the RCI has completed successfully."
0114 e005 | | Load 0x0,0x5
0115 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0116 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0117 e403 | | Load 0x2,0x3
0118 0c01 | | Execute_Immediate Greater_Equal,0x1
0119 680f |h | Jump_Zero 0x129
011a e004 | | Load 0x0,0x4
011b 180e | | Execute Package,Field_Execute,Field_Number 0xe
011c 4803 |H | Short_Literal 0x3
011d 0092 02dd | | Action Push_String_Extended,0x2dd ; "Installation of the RCI completed with "
011f e403 | | Load 0x2,0x3
0120 00e0 | | Load_Encached Standard_Cache
0121 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0122 01cc | | Execute Vector,Catenate
0123 0092 02de | | Action Push_String_Extended,0x2de ; " warnings."
0125 01cc | | Execute Vector,Catenate
0126 e005 | | Load 0x0,0x5
0127 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0128 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0129 e004 | | Load 0x0,0x4
012a 180e | | Execute Package,Field_Execute,Field_Number 0xe
012b 4803 |H | Short_Literal 0x3
012c 0092 02dd | | Action Push_String_Extended,0x2dd ; "Installation of the RCI completed with "
012e e404 | | Load 0x2,0x4
012f 00e0 | | Load_Encached Standard_Cache
0130 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0131 01cc | | Execute Vector,Catenate
0132 0092 02df | | Action Push_String_Extended,0x2df ; " errors."
0134 01cc | | Execute Vector,Catenate
0135 e005 | | Load 0x0,0x5
0136 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0137 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013f | ? | .CONST 0x013f ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0003 | | .CONST 0x0003 ; Number of locals
013b INIT_0138:
013b 0092 02e0 | | Action Push_String_Extended,0x2e0 ; "!targets.implementation.rci_user_interface'spec_view.units.@'spec"
013d 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
013f BODY_0138:
013f e004 | | Load 0x0,0x4
0140 180e | | Execute Package,Field_Execute,Field_Number 0xe
0141 4802 |H | Short_Literal 0x2
0142 0092 02e1 | | Action Push_String_Extended,0x2e1 ; "Replacing Links to Rci_User_Interface"
0144 e005 | | Load 0x0,0x5
0145 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0146 8603 | | Call 0x3,0x3
0147 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0172 | r | .CONST 0x0172 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 4801 |H | Short_Literal 0x1
014c e003 | | Load 0x0,0x3
014d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
014f 0092 02e2 | | Action Push_String_Extended,0x2e2 ; "!machine.rci_targets"
0151 e003 | | Load 0x0,0x3
0152 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0153 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0154 e003 | | Load 0x0,0x3
0155 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0156 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0157 7019 |p | Jump_Nonzero 0x171
0158 4801 |H | Short_Literal 0x1
0159 e003 | | Load 0x0,0x3
015a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
015b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
015c 0092 02e3 | | Action Push_String_Extended,0x2e3 ; "!machine.rcf_targets"
015e e003 | | Load 0x0,0x3
015f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0160 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0161 e003 | | Load 0x0,0x3
0162 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0163 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0164 680c |h | Jump_Zero 0x171
0165 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
0167 0092 02e5 | | Action Push_String_Extended,0x2e5 ; "changed_objects,replace"
0169 0092 02e3 | | Action Push_String_Extended,0x2e3 ; "!machine.rcf_targets"
016b 0092 02e2 | | Action Push_String_Extended,0x2e2 ; "!machine.rci_targets"
016d 0092 02e6 | | Action Push_String_Extended,0x2e6 ; "!Machine.Rcf_targets"
016f e008 | | Load 0x0,0x8
0170 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0171 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0172 TRAP_0148:
0172 0007 | | Action Break_Optional
0173 e403 | | Load 0x2,0x3
0174 0a01 | | Execute_Immediate Plus,0x1
0175 c403 | | Store 0x2,0x3
0176 e004 | | Load 0x0,0x4
0177 180e | | Execute Package,Field_Execute,Field_Number 0xe
0178 4806 |H | Short_Literal 0x6
0179 0092 02e7 | | Action Push_String_Extended,0x2e7 ; "Unable to create !Machine.Rci_targets from !Machine.Rcf_targets"
017b e005 | | Load 0x0,0x5
017c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
017e 0000 0000 | | .XXX[0x2]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 01aa | | .CONST 0x01aa ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 4801 |H | Short_Literal 0x1
0184 e003 | | Load 0x0,0x3
0185 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0186 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0187 0092 02e8 | | Action Push_String_Extended,0x2e8 ; "!machine.rci"
0189 e003 | | Load 0x0,0x3
018a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
018b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
018c e003 | | Load 0x0,0x3
018d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
018f 7019 |p | Jump_Nonzero 0x1a9
0190 4801 |H | Short_Literal 0x1
0191 e003 | | Load 0x0,0x3
0192 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0193 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0194 0092 02e9 | | Action Push_String_Extended,0x2e9 ; "!machine.rcf"
0196 e003 | | Load 0x0,0x3
0197 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0198 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0199 e003 | | Load 0x0,0x3
019a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019b 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
019c 680c |h | Jump_Zero 0x1a9
019d 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
019f 0092 02e5 | | Action Push_String_Extended,0x2e5 ; "changed_objects,replace"
01a1 0092 02e9 | | Action Push_String_Extended,0x2e9 ; "!machine.rcf"
01a3 0092 02e8 | | Action Push_String_Extended,0x2e8 ; "!machine.rci"
01a5 0092 02ea | | Action Push_String_Extended,0x2ea ; "!Machine.Rcf"
01a7 e008 | | Load 0x0,0x8
01a8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01aa TRAP_0180:
01aa 0007 | | Action Break_Optional
01ab e403 | | Load 0x2,0x3
01ac 0a01 | | Execute_Immediate Plus,0x1
01ad c403 | | Store 0x2,0x3
01ae e004 | | Load 0x0,0x4
01af 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b0 4806 |H | Short_Literal 0x6
01b1 0092 02eb | | Action Push_String_Extended,0x2eb ; "Unable to create !Machine.Rci from !Machine.Rcf"
01b3 e005 | | Load 0x0,0x5
01b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01b6 0000 0000 | | .XXX[0x2]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bd | | .CONST 0x01bd ; Address of begin
01b9 020a | | .CONST 0x020a ; Address of exception handler
01ba 0002 | | .CONST 0x0002 ; Number of locals
01bb INIT_01b8:
01bb 0092 02ec | | Action Push_String_Extended,0x2ec ; "!machine.initialization"
01bd BODY_01b8:
01bd 4801 |H | Short_Literal 0x1
01be e003 | | Load 0x0,0x3
01bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c1 0092 02ed | | Action Push_String_Extended,0x2ed ; "!machine.initialization.local.rci_configuration"
01c3 e003 | | Load 0x0,0x3
01c4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c5 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01c6 e003 | | Load 0x0,0x3
01c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c8 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01c9 7019 |p | Jump_Nonzero 0x1e3
01ca 4801 |H | Short_Literal 0x1
01cb e003 | | Load 0x0,0x3
01cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ce 0092 02ee | | Action Push_String_Extended,0x2ee ; "!machine.initialization.local.rcf_configuration"
01d0 e003 | | Load 0x0,0x3
01d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d2 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01d3 e003 | | Load 0x0,0x3
01d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d5 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01d6 680c |h | Jump_Zero 0x1e3
01d7 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
01d9 0092 02ef | | Action Push_String_Extended,0x2ef ; "replace, changed_objects"
01db 0092 02ee | | Action Push_String_Extended,0x2ee ; "!machine.initialization.local.rcf_configuration"
01dd 0092 02ed | | Action Push_String_Extended,0x2ed ; "!machine.initialization.local.rci_configuration"
01df 0092 02ee | | Action Push_String_Extended,0x2ee ; "!machine.initialization.local.rcf_configuration"
01e1 e008 | | Load 0x0,0x8
01e2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01e3 4801 |H | Short_Literal 0x1
01e4 e003 | | Load 0x0,0x3
01e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e7 0092 02f0 | | Action Push_String_Extended,0x2f0 ; "!machine.initialization.site.rci_configuration"
01e9 e003 | | Load 0x0,0x3
01ea 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01eb 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01ec e003 | | Load 0x0,0x3
01ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ee 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01ef 7019 |p | Jump_Nonzero 0x209
01f0 4801 |H | Short_Literal 0x1
01f1 e003 | | Load 0x0,0x3
01f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f4 0092 02f1 | | Action Push_String_Extended,0x2f1 ; "!machine.initialization.site.rcf_configuration"
01f6 e003 | | Load 0x0,0x3
01f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f8 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01f9 e003 | | Load 0x0,0x3
01fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fb 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01fc 680c |h | Jump_Zero 0x209
01fd 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
01ff 0092 02ef | | Action Push_String_Extended,0x2ef ; "replace, changed_objects"
0201 0092 02f1 | | Action Push_String_Extended,0x2f1 ; "!machine.initialization.site.rcf_configuration"
0203 0092 02f0 | | Action Push_String_Extended,0x2f0 ; "!machine.initialization.site.rci_configuration"
0205 0092 02f1 | | Action Push_String_Extended,0x2f1 ; "!machine.initialization.site.rcf_configuration"
0207 e008 | | Load 0x0,0x8
0208 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0209 4501 |E | Exit_Suprogram New_Top_Offset 0x1
020a TRAP_01b8:
020a 0007 | | Action Break_Optional
020b e403 | | Load 0x2,0x3
020c 0a01 | | Execute_Immediate Plus,0x1
020d c403 | | Store 0x2,0x3
020e e004 | | Load 0x0,0x4
020f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0210 4806 |H | Short_Literal 0x6
0211 0092 02f2 | | Action Push_String_Extended,0x2f2 ; "Unable to copy Rcf initialization configuration info"
0213 e005 | | Load 0x0,0x5
0214 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0215 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0216 0000 0000 | | .XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0231 | 1 | .CONST 0x0231 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
021d 0092 02f3 | | Action Push_String_Extended,0x2f3 ; "!targets.implementation.rci_release"
021f 840a | | Call 0x2,0xa
0220 01cc | | Execute Vector,Catenate
0221 840b | | Call 0x2,0xb
0222 01cc | | Execute Vector,Catenate
0223 0092 02f4 | | Action Push_String_Extended,0x2f4 ; ".activity_archive"
0225 01cc | | Execute Vector,Catenate
0226 0092 02f5 | | Action Push_String_Extended,0x2f5 ; "R1000"
0228 0092 02f6 | | Action Push_String_Extended,0x2f6 ; "*"
022a 0092 02f6 | | Action Push_String_Extended,0x2f6 ; "*"
022c 0092 02f7 | | Action Push_String_Extended,0x2f7 ; "?"
022e e008 | | Load 0x0,0x8
022f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0230 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0231 TRAP_0218:
0231 0007 | | Action Break_Optional
0232 e403 | | Load 0x2,0x3
0233 0a01 | | Execute_Immediate Plus,0x1
0234 c403 | | Store 0x2,0x3
0235 e004 | | Load 0x0,0x4
0236 180e | | Execute Package,Field_Execute,Field_Number 0xe
0237 4806 |H | Short_Literal 0x6
0238 0092 02f8 | | Action Push_String_Extended,0x2f8 ; "Unable to restore the RCI Activity from!targets.implementation.rci_release"
023a 840a | | Call 0x2,0xa
023b 01cc | | Execute Vector,Catenate
023c 840b | | Call 0x2,0xb
023d 01cc | | Execute Vector,Catenate
023e 0092 02f4 | | Action Push_String_Extended,0x2f4 ; ".activity_archive"
0240 01cc | | Execute Vector,Catenate
0241 e005 | | Load 0x0,0x5
0242 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0243 4800 |H | Short_Literal 0x0
0244 a405 | | Store_Unchecked 0x2,0x5
0245 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0246 0000 0000 | | .XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0262 | b | .CONST 0x0262 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
024d 0092 02f9 | | Action Push_String_Extended,0x2f9 ; "!machine.release.current.activity"
024f 4801 |H | Short_Literal 0x1
0250 0092 02f7 | | Action Push_String_Extended,0x2f7 ; "?"
0252 0092 02f7 | | Action Push_String_Extended,0x2f7 ; "?"
0254 0092 02f7 | | Action Push_String_Extended,0x2f7 ; "?"
0256 0092 02f3 | | Action Push_String_Extended,0x2f3 ; "!targets.implementation.rci_release"
0258 840a | | Call 0x2,0xa
0259 01cc | | Execute Vector,Catenate
025a 840b | | Call 0x2,0xb
025b 01cc | | Execute Vector,Catenate
025c 0092 02fa | | Action Push_String_Extended,0x2fa ; ".install_activity"
025e 01cc | | Execute Vector,Catenate
025f e009 | | Load 0x0,0x9
0260 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0261 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0262 TRAP_0248:
0262 0007 | | Action Break_Optional
0263 e403 | | Load 0x2,0x3
0264 0a01 | | Execute_Immediate Plus,0x1
0265 c403 | | Store 0x2,0x3
0266 e004 | | Load 0x0,0x4
0267 180e | | Execute Package,Field_Execute,Field_Number 0xe
0268 4806 |H | Short_Literal 0x6
0269 0092 02fb | | Action Push_String_Extended,0x2fb ; "Unable to merge RCI activity, !targets.implementation.rci_release"
026b 840a | | Call 0x2,0xa
026c 01cc | | Execute Vector,Catenate
026d 840b | | Call 0x2,0xb
026e 01cc | | Execute Vector,Catenate
026f 0092 02fc | | Action Push_String_Extended,0x2fc ; ".activity_file, with "
0271 01cc | | Execute Vector,Catenate
0272 0092 02f9 | | Action Push_String_Extended,0x2f9 ; "!machine.release.current.activity"
0274 01cc | | Execute Vector,Catenate
0275 e005 | | Load 0x0,0x5
0276 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0277 4800 |H | Short_Literal 0x0
0278 a405 | | Store_Unchecked 0x2,0x5
0279 4501 |E | Exit_Suprogram New_Top_Offset 0x1
027a 0000 0000 | | .BLANK 0000[0x6]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 028a | | .CONST 0x028a ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0003 | | .CONST 0x0003 ; Number of locals
0283 INIT_0280:
0283 8409 | | Call 0x2,0x9
0284 4801 |H | Short_Literal 0x1
0285 00d9 | | Load_Top At_Offset_1
0286 0092 02fd | | Action Push_String_Extended,0x2fd ; "_"
0288 e007 | | Load 0x0,0x7
0289 181f | | Execute Package,Field_Execute,Field_Number 0x1f
028a BODY_0280:
028a 00d8 | | Load_Top At_Offset_0
028b 00da | | Load_Top At_Offset_2
028c 01dd | | Execute Vector,First
028d 027d | } | Execute Discrete,Greater
028e 680d |h | Jump_Zero 0x29c
028f 00d9 | | Load_Top At_Offset_1
0290 01dd | | Execute Vector,First
0291 00d9 | | Load_Top At_Offset_1
0292 0aff | | Execute_Immediate Plus,-0x1
0293 00d8 | | Load_Top At_Offset_0
0294 00e2 | | Load_Encached Integer_Cache
0295 0260 | ` | Execute Discrete,In_Type
0296 7001 |p | Jump_Nonzero 0x298
0297 0801 | | Execute_Immediate Raise,0x1
0298 00db | | Load_Top At_Offset_3
0299 01cf | | Execute Vector,Slice_Read
029a 00cb | | Action Pop_Block_With_Result
029b 00ca | | Action Exit_Nullary_Function
029c e406 | | Load 0x2,0x6
029d 0257 | W | Execute Discrete,Raise
029e 0000 0000 | | .XXX[0x2]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02aa | | .CONST 0x02aa ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 8409 | | Call 0x2,0x9
02a4 4801 |H | Short_Literal 0x1
02a5 00d9 | | Load_Top At_Offset_1
02a6 0092 02fd | | Action Push_String_Extended,0x2fd ; "_"
02a8 e007 | | Load 0x0,0x7
02a9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
02aa BODY_02a0:
02aa 00d8 | | Load_Top At_Offset_0
02ab 00da | | Load_Top At_Offset_2
02ac 01dd | | Execute Vector,First
02ad 027d | } | Execute Discrete,Greater
02ae 6807 |h | Jump_Zero 0x2b6
02af 00d8 | | Load_Top At_Offset_0
02b0 00da | | Load_Top At_Offset_2
02b1 01dc | | Execute Vector,Last
02b2 00db | | Load_Top At_Offset_3
02b3 01cf | | Execute Vector,Slice_Read
02b4 00cb | | Action Pop_Block_With_Result
02b5 00ca | | Action Exit_Nullary_Function
02b6 e406 | | Load 0x2,0x6
02b7 0257 | W | Execute Discrete,Raise
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 02c5 | | .CONST 0x02c5 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "<PROFILE>"
02bd 0092 02fe | | Action Push_String_Extended,0x2fe ; "!machine.release.current.commands"
02bf 0092 02ff | | Action Push_String_Extended,0x2ff ; "#"
02c1 e602 | | Load 0x3,0x2
02c2 e00a | | Load 0x0,0xa
02c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02c5 TRAP_02b8:
02c5 0007 | | Action Break_Optional
02c6 e403 | | Load 0x2,0x3
02c7 0a01 | | Execute_Immediate Plus,0x1
02c8 c403 | | Store 0x2,0x3
02c9 e004 | | Load 0x0,0x4
02ca 180e | | Execute Package,Field_Execute,Field_Number 0xe
02cb 4806 |H | Short_Literal 0x6
02cc 0092 0300 | | Action Push_String_Extended,0x300 ; "Unable to define links to !targets.implementation.rci_user_interface'spec_view.units.@'spec"
02ce e005 | | Load 0x0,0x5
02cf 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02d1 ; --------------------------------------------------------------------------------------
02d1 ; STRING TABLE
02d1 ; --------------------------------------------------------------------------------------
02d1 0062 | b | .STRTAB 0x0062->0x0302 ; "!Targets.Implementation.Rci_Release"
02d2 0083 | | .STRTAB 0x0083->0x0313 ; "Installing Customizable RCI."
02d3 009d | | .STRTAB 0x009d->0x0321 ; "Successfully Restored Links "
02d4 00b7 | | .STRTAB 0x00b7->0x032f ; "Unable to restore Links to all RCI commands. "
02d5 00e2 | | .STRTAB 0x00e2->0x0346 ; "Error: Current context is "
02d6 00fa | | .STRTAB 0x00fa->0x0353 ; ", which is not of the format "
02d7 0116 | | .STRTAB 0x0116->0x0362 ; "X_Y_Z, where \x22X_Y\x22 is the release number "
02d8 013d | = | .STRTAB 0x013d->0x0376 ; "and \x22_Z\x22 is the version"
02d9 0152 | R | .STRTAB 0x0152->0x0382 ; "RCI Installation Completed with Errors"
02da 0176 | v | .STRTAB 0x0176->0x0395 ; " raised in Restore_Rci"
02db 018a | | .STRTAB 0x018a->0x03a0 ; "<DEFAULT>"
02dc 0191 | | .STRTAB 0x0191->0x03a4 ; "Installation of the RCI has completed successfully."
02dd 01c2 | | .STRTAB 0x01c2->0x03be ; "Installation of the RCI completed with "
02de 01e7 | | .STRTAB 0x01e7->0x03d1 ; " warnings."
02df 01ef | | .STRTAB 0x01ef->0x03d6 ; " errors."
02e0 01f5 | | .STRTAB 0x01f5->0x03da ; "!targets.implementation.rci_user_interface'spec_view.units.@'spec"
02e1 0234 | 4 | .STRTAB 0x0234->0x03fb ; "Replacing Links to Rci_User_Interface"
02e2 0257 | W | .STRTAB 0x0257->0x040d ; "!machine.rci_targets"
02e3 0269 | i | .STRTAB 0x0269->0x0417 ; "!machine.rcf_targets"
02e4 027b | { | .STRTAB 0x027b->0x0421 ; "<PROFILE>"
02e5 0282 | | .STRTAB 0x0282->0x0426 ; "changed_objects,replace"
02e6 0297 | | .STRTAB 0x0297->0x0431 ; "!Machine.Rcf_targets"
02e7 02a9 | | .STRTAB 0x02a9->0x043b ; "Unable to create !Machine.Rci_targets from !Machine.Rcf_targets"
02e8 02e6 | | .STRTAB 0x02e6->0x045b ; "!machine.rci"
02e9 02f0 | | .STRTAB 0x02f0->0x0461 ; "!machine.rcf"
02ea 02fa | | .STRTAB 0x02fa->0x0467 ; "!Machine.Rcf"
02eb 0304 | | .STRTAB 0x0304->0x046d ; "Unable to create !Machine.Rci from !Machine.Rcf"
02ec 0331 | 1 | .STRTAB 0x0331->0x0484 ; "!machine.initialization"
02ed 0346 | F | .STRTAB 0x0346->0x0490 ; "!machine.initialization.local.rci_configuration"
02ee 0373 | s | .STRTAB 0x0373->0x04a7 ; "!machine.initialization.local.rcf_configuration"
02ef 03a0 | | .STRTAB 0x03a0->0x04bf ; "replace, changed_objects"
02f0 03b6 | | .STRTAB 0x03b6->0x04cb ; "!machine.initialization.site.rci_configuration"
02f1 03e2 | | .STRTAB 0x03e2->0x04e2 ; "!machine.initialization.site.rcf_configuration"
02f2 040e | | .STRTAB 0x040e->0x04f9 ; "Unable to copy Rcf initialization configuration info"
02f3 0440 | @ | .STRTAB 0x0440->0x0513 ; "!targets.implementation.rci_release"
02f4 0461 | a | .STRTAB 0x0461->0x0524 ; ".activity_archive"
02f5 0470 | p | .STRTAB 0x0470->0x052d ; "R1000"
02f6 0473 | s | .STRTAB 0x0473->0x052f ; "*"
02f7 0472 | r | .STRTAB 0x0472->0x0530 ; "?"
02f8 0471 | q | .STRTAB 0x0471->0x0530 ; "Unable to restore the RCI Activity from!targets.implementation.rci_release"
02f9 04b9 | | .STRTAB 0x04b9->0x0555 ; "!machine.release.current.activity"
02fa 04d8 | | .STRTAB 0x04d8->0x0566 ; ".install_activity"
02fb 04e7 | | .STRTAB 0x04e7->0x056e ; "Unable to merge RCI activity, !targets.implementation.rci_release"
02fc 0526 | & | .STRTAB 0x0526->0x058f ; ".activity_file, with "
02fd 0539 | 9 | .STRTAB 0x0539->0x0599 ; "_"
02fe 0538 | 8 | .STRTAB 0x0538->0x059a ; "!machine.release.current.commands"
02ff 0557 | W | .STRTAB 0x0557->0x05aa ; "#"
0300 0556 | V | .STRTAB 0x0556->0x05ab ; "Unable to define links to !targets.implementation.rci_user_interface'spec_view.units.@'spec"
0301 05af | | .STREND 0x05af->0x05d8
0302 2154 6172 |!Tar| .STRTAB_STRINGS
05d9 0000 0000 | | .BLANK 0000[0x7]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; Debug Table
05e0 ; --------------------------------------------------------------------------------------
05e0 0004 000f | | .DEBUG4 0x0004,0x000f,0x0274,0x0000,0x0001,0x0000
05e6 0000 0000 | | .BLANK 0000[0x1a]