|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_2950e5
└─⟦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 0408 | | .CONST 0x0408 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0018
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0037 | 7 | .CONST 0x0037 ; Address of begin
0019 003b | ; | .CONST 0x003b ; Address of exception handler
001a 000d | | .CONST 0x000d ; Number of locals
001b INIT_0018:
001b 0093 0000 | | PushFullAddress InMicrocode
001d 6046 |`F | Indirect_Literal Discrete,0x64,{0x80000000, 0x00010000}
001e 0273 | s | Execute Discrete,Plus
001f 0007 | | Action Break_Optional
0020 e002 | | Load 0x0,0x2
0021 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0022 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0023 0092 0278 | x| Action Push_String_Extended,0x278 ; "!Targets.Implementation.Release"
0025 029f 006b | k| Declare_Subprogram For_Call,INIT_0068
0027 029f 0093 | | Declare_Subprogram For_Call,INIT_0090
0029 029f 00ab | | Declare_Subprogram For_Call,INIT_00a8
002b 029f 00c3 | | Declare_Subprogram For_Call,INIT_00c0
002d 029f 00db | | Declare_Subprogram For_Call,INIT_00d8
002f 029f 00eb | | Declare_Subprogram For_Call,INIT_00e8
0031 029f 0123 | #| Declare_Subprogram For_Call,INIT_0120
0033 029f 015b | [| Declare_Subprogram For_Call,INIT_0158
0035 029f 019b | | Declare_Subprogram For_Call,INIT_0198
0037 BODY_0018:
0037 840a | | Call 0x2,0xa
0038 840b | | Call 0x2,0xb
0039 840c | | Call 0x2,0xc
003a 4504 |E | Exit_Subprogram 0x4
003b TRAP_0018:
003b e402 | | Load 0x2,0x2
003c 010f | | Execute Exception,Equal
003d 6812 |h | Jump_Zero 0x50
003e e003 | | Load 0x0,0x3
003f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0040 4805 |H | Short_Literal 0x5
0041 0092 0279 | y| Action Push_String_Extended,0x279 ; "Unable to install "
0043 e5ff | | Load 0x2,-0x1
0044 01cc | | Execute Vector,Catenate
0045 0092 027a | z| Action Push_String_Extended,0x27a ; " due to unhandled exception "
0047 01cc | | Execute Vector,Catenate
0048 4800 |H | Short_Literal 0x0
0049 4801 |H | Short_Literal 0x1
004a e004 | | Load 0x0,0x4
004b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
004c 01cc | | Execute Vector,Catenate
004d e005 | | Load 0x0,0x5
004e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
004f 4504 |E | Exit_Subprogram 0x4
0050 e003 | | Load 0x0,0x3
0051 180e | | Execute Package,Field_Execute,Field_Number 0xe
0052 4805 |H | Short_Literal 0x5
0053 0092 0279 | y| Action Push_String_Extended,0x279 ; "Unable to install "
0055 8406 | | Call 0x2,0x6
0056 01cc | | Execute Vector,Catenate
0057 0092 027a | z| Action Push_String_Extended,0x27a ; " due to unhandled exception "
0059 01cc | | Execute Vector,Catenate
005a 4800 |H | Short_Literal 0x0
005b 4801 |H | Short_Literal 0x1
005c e004 | | Load 0x0,0x4
005d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
005e 01cc | | Execute Vector,Catenate
005f e005 | | Load 0x0,0x5
0060 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0061 4504 |E | Exit_Subprogram 0x4
0062 0000 0000 | | .XXX[0x2]
0064 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b e403 | | Load 0x2,0x3
006c 01db | | Execute Vector,Length
006d 0c20 | | Execute_Immediate Greater_Equal,0x20
006e 681e |h | Jump_Zero 0x8d
006f 4801 |H | Short_Literal 0x1
0070 e403 | | Load 0x2,0x3
0071 01dd | | Execute Vector,First
0072 e403 | | Load 0x2,0x3
0073 01dd | | Execute Vector,First
0074 0a1e | | Execute_Immediate Plus,0x1e
0075 00d8 | | Load_Top At_Offset_0
0076 00e2 | | Load_Encached Integer_Cache
0077 0260 | ` | Execute Discrete,In_Type
0078 7001 |p | Jump_Nonzero 0x7a
0079 0801 | | Execute_Immediate Raise,0x1
007a e403 | | Load 0x2,0x3
007b 01cf | | Execute Vector,Slice_Read
007c e404 | | Load 0x2,0x4
007d e006 | | Load 0x0,0x6
007e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
007f 680d |h | Jump_Zero 0x8d
0080 e403 | | Load 0x2,0x3
0081 01dd | | Execute Vector,First
0082 0a1f | | Execute_Immediate Plus,0x1f
0083 00d8 | | Load_Top At_Offset_0
0084 00e2 | | Load_Encached Integer_Cache
0085 0260 | ` | Execute Discrete,In_Type
0086 7001 |p | Jump_Nonzero 0x88
0087 0801 | | Execute_Immediate Raise,0x1
0088 e403 | | Load 0x2,0x3
0089 01dc | | Execute Vector,Last
008a e403 | | Load 0x2,0x3
008b 01cf | | Execute Vector,Slice_Read
008c 00ca | | Action Exit_Nullary_Function
008d e402 | | Load 0x2,0x2
008e 0257 | W | Execute Discrete,Raise
008f 0000 | | .XXX[0x1]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0095 | | .CONST 0x0095 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0002 | | .CONST 0x0002 ; Number of locals
0093 INIT_0090:
0093 029f 01d3 | | Declare_Subprogram For_Call,INIT_01d0
0095 BODY_0090:
0095 4801 |H | Short_Literal 0x1
0096 0092 027b | {| Action Push_String_Extended,0x27b ; "<DEFAULT>"
0098 e5fe | | Load 0x2,-0x2
0099 e006 | | Load 0x0,0x6
009a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
009b 6802 |h | Jump_Zero 0x9e
009c 8602 | | Call 0x3,0x2
009d 7804 |x | Jump 0xa2
009e e5fe | | Load 0x2,-0x2
009f 0335 | 5 | Declare_Variable Array,Duplicate
00a0 00cd | | Action Spare6_Action
00a1 00ca | | Action Exit_Nullary_Function
00a2 0831 | 1 | Execute_Immediate Raise,0x31
00a3 0000 0000 | | .BLANK 0000[0x5]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ad | | .CONST 0x00ad ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab 029f 021b | | Declare_Subprogram For_Call,INIT_0218
00ad BODY_00a8:
00ad 4801 |H | Short_Literal 0x1
00ae 0092 027b | {| Action Push_String_Extended,0x27b ; "<DEFAULT>"
00b0 e5fe | | Load 0x2,-0x2
00b1 e006 | | Load 0x0,0x6
00b2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00b3 6802 |h | Jump_Zero 0xb6
00b4 8602 | | Call 0x3,0x2
00b5 7804 |x | Jump 0xba
00b6 e5fe | | Load 0x2,-0x2
00b7 0335 | 5 | Declare_Variable Array,Duplicate
00b8 00cd | | Action Spare6_Action
00b9 00ca | | Action Exit_Nullary_Function
00ba 0831 | 1 | Execute_Immediate Raise,0x31
00bb 0000 0000 | | .BLANK 0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c5 | | .CONST 0x00c5 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0002 | | .CONST 0x0002 ; Number of locals
00c3 INIT_00c0:
00c3 029f 0263 | c| Declare_Subprogram For_Call,INIT_0260
00c5 BODY_00c0:
00c5 4801 |H | Short_Literal 0x1
00c6 0092 027b | {| Action Push_String_Extended,0x27b ; "<DEFAULT>"
00c8 e5fd | | Load 0x2,-0x3
00c9 e006 | | Load 0x0,0x6
00ca 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00cb 6802 |h | Jump_Zero 0xce
00cc 8602 | | Call 0x3,0x2
00cd 7804 |x | Jump 0xd2
00ce e5fd | | Load 0x2,-0x3
00cf 0335 | 5 | Declare_Variable Array,Duplicate
00d0 00cd | | Action Spare6_Action
00d1 00ca | | Action Exit_Nullary_Function
00d2 0831 | 1 | Execute_Immediate Raise,0x31
00d3 0000 0000 | | .BLANK 0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 0092 027c | || Action Push_String_Extended,0x27c ; "!targets.implementation.release_"
00dd 8406 | | Call 0x2,0x6
00de 01cc | | Execute Vector,Catenate
00df 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
00e1 01cc | | Execute Vector,Catenate
00e2 8407 | | Call 0x2,0x7
00e3 01cc | | Execute Vector,Catenate
00e4 8408 | | Call 0x2,0x8
00e5 01cc | | Execute Vector,Catenate
00e6 00ca | | Action Exit_Nullary_Function
00e7 0000 | | .XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 010f | | .CONST 0x010f ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb e003 | | Load 0x0,0x3
00ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ed 4802 |H | Short_Literal 0x2
00ee 0092 027e | ~| Action Push_String_Extended,0x27e ; "Restoring predefined world"
00f0 e005 | | Load 0x0,0x5
00f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00f2 0092 027f | | Action Push_String_Extended,0x27f ; "<PROFILE>"
00f4 8409 | | Call 0x2,0x9
00f5 0092 0280 | | Action Push_String_Extended,0x280 ; ".predefined_archive"
00f7 01cc | | Execute Vector,Catenate
00f8 0092 0281 | | Action Push_String_Extended,0x281 ; "changed_objects replace"
00fa 0092 0282 | | Action Push_String_Extended,0x282 ; "*"
00fc 0092 0282 | | Action Push_String_Extended,0x282 ; "*"
00fe 0092 0283 | | Action Push_String_Extended,0x283 ; "[?,~!Targets."
0100 8406 | | Call 0x2,0x6
0101 01cc | | Execute Vector,Catenate
0102 0092 0284 | | Action Push_String_Extended,0x284 ; "]"
0104 01cc | | Execute Vector,Catenate
0105 e007 | | Load 0x0,0x7
0106 180e | | Execute Package,Field_Execute,Field_Number 0xe
0107 e003 | | Load 0x0,0x3
0108 180e | | Execute Package,Field_Execute,Field_Number 0xe
0109 4802 |H | Short_Literal 0x2
010a 0092 0285 | | Action Push_String_Extended,0x285 ; "Successfully restored predefined world"
010c e005 | | Load 0x0,0x5
010d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
010e 4501 |E | Exit_Subprogram 0x1
010f TRAP_00e8:
010f 0007 | | Action Break_Optional
0110 e003 | | Load 0x0,0x3
0111 180e | | Execute Package,Field_Execute,Field_Number 0xe
0112 4807 |H | Short_Literal 0x7
0113 4800 |H | Short_Literal 0x0
0114 4801 |H | Short_Literal 0x1
0115 e004 | | Load 0x0,0x4
0116 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0117 0092 0286 | | Action Push_String_Extended,0x286 ; " raised in Restore_Predefined"
0119 01cc | | Execute Vector,Catenate
011a e005 | | Load 0x0,0x5
011b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
011c 00d8 | | Load_Top At_Offset_0
011d 0101 | | Execute Exception,Reraise
011e 0000 0000 | | .XXX[0x2]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0148 | H | .CONST 0x0148 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 e003 | | Load 0x0,0x3
0124 180e | | Execute Package,Field_Execute,Field_Number 0xe
0125 4802 |H | Short_Literal 0x2
0126 0092 0287 | | Action Push_String_Extended,0x287 ; "Merging "
0128 8409 | | Call 0x2,0x9
0129 01cc | | Execute Vector,Catenate
012a 0092 0288 | | Action Push_String_Extended,0x288 ; ".install_activity into !machine.release.current.activity"
012c 01cc | | Execute Vector,Catenate
012d e005 | | Load 0x0,0x5
012e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
012f 0092 027f | | Action Push_String_Extended,0x27f ; "<PROFILE>"
0131 0092 0289 | | Action Push_String_Extended,0x289 ; "!machine.release.current.activity"
0133 4801 |H | Short_Literal 0x1
0134 0092 028a | | Action Push_String_Extended,0x28a ; "?"
0136 0092 028a | | Action Push_String_Extended,0x28a ; "?"
0138 0092 028a | | Action Push_String_Extended,0x28a ; "?"
013a 8409 | | Call 0x2,0x9
013b 0092 028b | | Action Push_String_Extended,0x28b ; ".install_activity"
013d 01cc | | Execute Vector,Catenate
013e e008 | | Load 0x0,0x8
013f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0140 e003 | | Load 0x0,0x3
0141 180e | | Execute Package,Field_Execute,Field_Number 0xe
0142 4802 |H | Short_Literal 0x2
0143 0092 028c | | Action Push_String_Extended,0x28c ; "Successfully merged activities"
0145 e005 | | Load 0x0,0x5
0146 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0147 4501 |E | Exit_Subprogram 0x1
0148 TRAP_0120:
0148 0007 | | Action Break_Optional
0149 e003 | | Load 0x0,0x3
014a 180e | | Execute Package,Field_Execute,Field_Number 0xe
014b 4807 |H | Short_Literal 0x7
014c 4800 |H | Short_Literal 0x0
014d 4801 |H | Short_Literal 0x1
014e e004 | | Load 0x0,0x4
014f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0150 0092 028d | | Action Push_String_Extended,0x28d ; " raised in Merge_Activities"
0152 01cc | | Execute Vector,Catenate
0153 e005 | | Load 0x0,0x5
0154 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0155 00d8 | | Load_Top At_Offset_0
0156 0101 | | Execute Exception,Reraise
0157 0000 | | .XXX[0x1]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015c | \ | .CONST 0x015c ; Address of begin
0159 017e | ~ | .CONST 0x017e ; Address of exception handler
015a 0002 | | .CONST 0x0002 ; Number of locals
015b INIT_0158:
015b 8406 | | Call 0x2,0x6
015c BODY_0158:
015c e003 | | Load 0x0,0x3
015d 180e | | Execute Package,Field_Execute,Field_Number 0xe
015e 4802 |H | Short_Literal 0x2
015f 0092 028e | | Action Push_String_Extended,0x28e ; "Replacing link to "
0161 00db | | Load_Top At_Offset_3
0162 01cc | | Execute Vector,Catenate
0163 e005 | | Load 0x0,0x5
0164 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0165 0092 027f | | Action Push_String_Extended,0x27f ; "<PROFILE>"
0167 0092 028f | | Action Push_String_Extended,0x28f ; "!machine.release.current.commands"
0169 0092 0290 | | Action Push_String_Extended,0x290 ; "#"
016b 0092 0291 | | Action Push_String_Extended,0x291 ; "!targets.implementation.Rcf_customization."
016d e602 | | Load 0x3,0x2
016e 01cc | | Execute Vector,Catenate
016f 0092 0292 | | Action Push_String_Extended,0x292 ; "'spec_view.units."
0171 01cc | | Execute Vector,Catenate
0172 e602 | | Load 0x3,0x2
0173 01cc | | Execute Vector,Catenate
0174 e009 | | Load 0x0,0x9
0175 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0176 e003 | | Load 0x0,0x3
0177 180e | | Execute Package,Field_Execute,Field_Number 0xe
0178 4802 |H | Short_Literal 0x2
0179 0092 0293 | | Action Push_String_Extended,0x293 ; "Successfully replaced link"
017b e005 | | Load 0x0,0x5
017c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017d 4501 |E | Exit_Subprogram 0x1
017e TRAP_0158:
017e 0007 | | Action Break_Optional
017f e003 | | Load 0x0,0x3
0180 180e | | Execute Package,Field_Execute,Field_Number 0xe
0181 4806 |H | Short_Literal 0x6
0182 0092 0294 | | Action Push_String_Extended,0x294 ; "Unable to define link to "
0184 e602 | | Load 0x3,0x2
0185 01cc | | Execute Vector,Catenate
0186 e005 | | Load 0x0,0x5
0187 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0188 e003 | | Load 0x0,0x3
0189 180e | | Execute Package,Field_Execute,Field_Number 0xe
018a 4802 |H | Short_Literal 0x2
018b 4800 |H | Short_Literal 0x0
018c 4801 |H | Short_Literal 0x1
018d e004 | | Load 0x0,0x4
018e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
018f 0092 0295 | | Action Push_String_Extended,0x295 ; " raised in Replace_Links"
0191 01cc | | Execute Vector,Catenate
0192 e005 | | Load 0x0,0x5
0193 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0194 4501 |E | Exit_Subprogram 0x1
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019c | | .CONST 0x019c ; Address of begin
0199 01bc | | .CONST 0x01bc ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b 8406 | | Call 0x2,0x6
019c BODY_0198:
019c e003 | | Load 0x0,0x3
019d 180e | | Execute Package,Field_Execute,Field_Number 0xe
019e 4802 |H | Short_Literal 0x2
019f 0092 0296 | | Action Push_String_Extended,0x296 ; "Registering target "
01a1 00db | | Load_Top At_Offset_3
01a2 01cc | | Execute Vector,Catenate
01a3 e005 | | Load 0x0,0x5
01a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a5 0092 027f | | Action Push_String_Extended,0x27f ; "<PROFILE>"
01a7 00ea | | Load_Encached Null_String_Cache
01a8 4800 |H | Short_Literal 0x0
01a9 0092 0297 | | Action Push_String_Extended,0x297 ; "$"
01ab 4800 |H | Short_Literal 0x0
01ac e602 | | Load 0x3,0x2
01ad 0092 0298 | | Action Push_String_Extended,0x298 ; ".register"
01af 01cc | | Execute Vector,Catenate
01b0 e00a | | Load 0x0,0xa
01b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b2 e003 | | Load 0x0,0x3
01b3 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b4 4802 |H | Short_Literal 0x2
01b5 0092 0299 | | Action Push_String_Extended,0x299 ; "Successfully registered target "
01b7 00db | | Load_Top At_Offset_3
01b8 01cc | | Execute Vector,Catenate
01b9 e005 | | Load 0x0,0x5
01ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01bb 4501 |E | Exit_Subprogram 0x1
01bc TRAP_0198:
01bc 0007 | | Action Break_Optional
01bd e003 | | Load 0x0,0x3
01be 180e | | Execute Package,Field_Execute,Field_Number 0xe
01bf 4802 |H | Short_Literal 0x2
01c0 4800 |H | Short_Literal 0x0
01c1 4801 |H | Short_Literal 0x1
01c2 e004 | | Load 0x0,0x4
01c3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01c4 0092 029a | | Action Push_String_Extended,0x29a ; " raised in Register_Target"
01c6 01cc | | Execute Vector,Catenate
01c7 e005 | | Load 0x0,0x5
01c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c9 00d8 | | Load_Top At_Offset_0
01ca 0101 | | Execute Exception,Reraise
01cb 0000 0000 | | .BLANK 0000[0x5]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01fa | | .CONST 0x01fa ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0005 | | .CONST 0x0005 ; Number of locals
01d3 INIT_01d0:
01d3 8405 | | Call 0x2,0x5
01d4 4801 |H | Short_Literal 0x1
01d5 00d9 | | Load_Top At_Offset_1
01d6 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
01d8 e006 | | Load 0x0,0x6
01d9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01da 4801 |H | Short_Literal 0x1
01db 00da | | Load_Top At_Offset_2
01dc 01dd | | Execute Vector,First
01dd 00da | | Load_Top At_Offset_2
01de 0aff | | Execute_Immediate Plus,-0x1
01df 00d8 | | Load_Top At_Offset_0
01e0 00e2 | | Load_Encached Integer_Cache
01e1 0260 | ` | Execute Discrete,In_Type
01e2 7001 |p | Jump_Nonzero 0x1e4
01e3 0801 | | Execute_Immediate Raise,0x1
01e4 e802 | | Load 0x4,0x2
01e5 01cf | | Execute Vector,Slice_Read
01e6 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
01e8 e006 | | Load 0x0,0x6
01e9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01ea 4801 |H | Short_Literal 0x1
01eb 00db | | Load_Top At_Offset_3
01ec 01dd | | Execute Vector,First
01ed 00da | | Load_Top At_Offset_2
01ee 0aff | | Execute_Immediate Plus,-0x1
01ef 00d8 | | Load_Top At_Offset_0
01f0 00e2 | | Load_Encached Integer_Cache
01f1 0260 | ` | Execute Discrete,In_Type
01f2 7001 |p | Jump_Nonzero 0x1f4
01f3 0801 | | Execute_Immediate Raise,0x1
01f4 e802 | | Load 0x4,0x2
01f5 01cf | | Execute Vector,Slice_Read
01f6 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
01f8 e006 | | Load 0x0,0x6
01f9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01fa BODY_01d0:
01fa 00d8 | | Load_Top At_Offset_0
01fb e802 | | Load 0x4,0x2
01fc 01dd | | Execute Vector,First
01fd 027d | } | Execute Discrete,Greater
01fe 6813 |h | Jump_Zero 0x212
01ff 00db | | Load_Top At_Offset_3
0200 01dd | | Execute Vector,First
0201 0a01 | | Execute_Immediate Plus,0x1
0202 00d8 | | Load_Top At_Offset_0
0203 00e2 | | Load_Encached Integer_Cache
0204 0260 | ` | Execute Discrete,In_Type
0205 7001 |p | Jump_Nonzero 0x207
0206 0801 | | Execute_Immediate Raise,0x1
0207 00d9 | | Load_Top At_Offset_1
0208 0aff | | Execute_Immediate Plus,-0x1
0209 00d8 | | Load_Top At_Offset_0
020a 00e2 | | Load_Encached Integer_Cache
020b 0260 | ` | Execute Discrete,In_Type
020c 7001 |p | Jump_Nonzero 0x20e
020d 0801 | | Execute_Immediate Raise,0x1
020e e802 | | Load 0x4,0x2
020f 01cf | | Execute Vector,Slice_Read
0210 00cb | | Action Pop_Block_With_Result
0211 00ca | | Action Exit_Nullary_Function
0212 e402 | | Load 0x2,0x2
0213 0257 | W | Execute Discrete,Raise
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0242 | B | .CONST 0x0242 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0005 | | .CONST 0x0005 ; Number of locals
021b INIT_0218:
021b 8405 | | Call 0x2,0x5
021c 4801 |H | Short_Literal 0x1
021d 00d9 | | Load_Top At_Offset_1
021e 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
0220 e006 | | Load 0x0,0x6
0221 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0222 4801 |H | Short_Literal 0x1
0223 00da | | Load_Top At_Offset_2
0224 01dd | | Execute Vector,First
0225 00da | | Load_Top At_Offset_2
0226 0aff | | Execute_Immediate Plus,-0x1
0227 00d8 | | Load_Top At_Offset_0
0228 00e2 | | Load_Encached Integer_Cache
0229 0260 | ` | Execute Discrete,In_Type
022a 7001 |p | Jump_Nonzero 0x22c
022b 0801 | | Execute_Immediate Raise,0x1
022c e802 | | Load 0x4,0x2
022d 01cf | | Execute Vector,Slice_Read
022e 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
0230 e006 | | Load 0x0,0x6
0231 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0232 4801 |H | Short_Literal 0x1
0233 00db | | Load_Top At_Offset_3
0234 01dd | | Execute Vector,First
0235 00da | | Load_Top At_Offset_2
0236 0aff | | Execute_Immediate Plus,-0x1
0237 00d8 | | Load_Top At_Offset_0
0238 00e2 | | Load_Encached Integer_Cache
0239 0260 | ` | Execute Discrete,In_Type
023a 7001 |p | Jump_Nonzero 0x23c
023b 0801 | | Execute_Immediate Raise,0x1
023c e802 | | Load 0x4,0x2
023d 01cf | | Execute Vector,Slice_Read
023e 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
0240 e006 | | Load 0x0,0x6
0241 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0242 BODY_0218:
0242 00d8 | | Load_Top At_Offset_0
0243 e802 | | Load 0x4,0x2
0244 01dd | | Execute Vector,First
0245 027d | } | Execute Discrete,Greater
0246 6812 |h | Jump_Zero 0x259
0247 00d8 | | Load_Top At_Offset_0
0248 0a01 | | Execute_Immediate Plus,0x1
0249 00d8 | | Load_Top At_Offset_0
024a 00e2 | | Load_Encached Integer_Cache
024b 0260 | ` | Execute Discrete,In_Type
024c 7001 |p | Jump_Nonzero 0x24e
024d 0801 | | Execute_Immediate Raise,0x1
024e 00db | | Load_Top At_Offset_3
024f 0aff | | Execute_Immediate Plus,-0x1
0250 00d8 | | Load_Top At_Offset_0
0251 00e2 | | Load_Encached Integer_Cache
0252 0260 | ` | Execute Discrete,In_Type
0253 7001 |p | Jump_Nonzero 0x255
0254 0801 | | Execute_Immediate Raise,0x1
0255 e802 | | Load 0x4,0x2
0256 01cf | | Execute Vector,Slice_Read
0257 00cb | | Action Pop_Block_With_Result
0258 00ca | | Action Exit_Nullary_Function
0259 e402 | | Load 0x2,0x2
025a 0257 | W | Execute Discrete,Raise
025b 0000 0000 | | .BLANK 0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 026a | j | .CONST 0x026a ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0003 | | .CONST 0x0003 ; Number of locals
0263 INIT_0260:
0263 8405 | | Call 0x2,0x5
0264 4801 |H | Short_Literal 0x1
0265 00d9 | | Load_Top At_Offset_1
0266 0092 027d | }| Action Push_String_Extended,0x27d ; "_"
0268 e006 | | Load 0x0,0x6
0269 181f | | Execute Package,Field_Execute,Field_Number 0x1f
026a BODY_0260:
026a 00d8 | | Load_Top At_Offset_0
026b 00da | | Load_Top At_Offset_2
026c 01dd | | Execute Vector,First
026d 027d | } | Execute Discrete,Greater
026e 6807 |h | Jump_Zero 0x276
026f 00d8 | | Load_Top At_Offset_0
0270 00da | | Load_Top At_Offset_2
0271 01dc | | Execute Vector,Last
0272 00db | | Load_Top At_Offset_3
0273 01cf | | Execute Vector,Slice_Read
0274 00cb | | Action Pop_Block_With_Result
0275 00ca | | Action Exit_Nullary_Function
0276 e402 | | Load 0x2,0x2
0277 0257 | W | Execute Discrete,Raise
0278 ; --------------------------------------------------------------------------------------
0278 ; STRING TABLE
0278 ; --------------------------------------------------------------------------------------
0278 0048 | H | .STRTAB 0x0048->0x029c ; "!Targets.Implementation.Release"
0279 0065 | e | .STRTAB 0x0065->0x02ab ; "Unable to install "
; "Unable to install "
027a 0075 | u | .STRTAB 0x0075->0x02b4 ; " due to unhandled exception "
; " due to unhandled exception "
027b 008f | | .STRTAB 0x008f->0x02c2 ; "<DEFAULT>"
; "<DEFAULT>"
; "<DEFAULT>"
027c 0096 | | .STRTAB 0x0096->0x02c7 ; "!targets.implementation.release_"
027d 00b4 | | .STRTAB 0x00b4->0x02d7 ; "_"
; "_"
; "_"
; "_"
; "_"
; "_"
; "_"
; "_"
027e 00b3 | | .STRTAB 0x00b3->0x02d7 ; "Restoring predefined world"
027f 00cb | | .STRTAB 0x00cb->0x02e4 ; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
0280 00d2 | | .STRTAB 0x00d2->0x02e9 ; ".predefined_archive"
0281 00e3 | | .STRTAB 0x00e3->0x02f2 ; "changed_objects replace"
0282 00f8 | | .STRTAB 0x00f8->0x02fe ; "*"
; "*"
0283 00f7 | | .STRTAB 0x00f7->0x02fe ; "[?,~!Targets."
0284 0102 | | .STRTAB 0x0102->0x0305 ; "]"
0285 0101 | | .STRTAB 0x0101->0x0305 ; "Successfully restored predefined world"
0286 0125 | % | .STRTAB 0x0125->0x0318 ; " raised in Restore_Predefined"
0287 0140 | @ | .STRTAB 0x0140->0x0327 ; "Merging "
0288 0146 | F | .STRTAB 0x0146->0x032b ; ".install_activity into !machine.release.current.activity"
0289 017c | | | .STRTAB 0x017c->0x0347 ; "!machine.release.current.activity"
028a 019b | | .STRTAB 0x019b->0x0357 ; "?"
; "?"
; "?"
028b 019a | | .STRTAB 0x019a->0x0358 ; ".install_activity"
028c 01a9 | | .STRTAB 0x01a9->0x0360 ; "Successfully merged activities"
028d 01c5 | | .STRTAB 0x01c5->0x036f ; " raised in Merge_Activities"
028e 01de | | .STRTAB 0x01de->0x037d ; "Replacing link to "
028f 01ee | | .STRTAB 0x01ee->0x0386 ; "!machine.release.current.commands"
0290 020d | | .STRTAB 0x020d->0x0396 ; "#"
0291 020c | | .STRTAB 0x020c->0x0397 ; "!targets.implementation.Rcf_customization."
0292 0234 | 4 | .STRTAB 0x0234->0x03ac ; "'spec_view.units."
0293 0243 | C | .STRTAB 0x0243->0x03b4 ; "Successfully replaced link"
0294 025b | [ | .STRTAB 0x025b->0x03c1 ; "Unable to define link to "
0295 0272 | r | .STRTAB 0x0272->0x03ce ; " raised in Replace_Links"
0296 0288 | | .STRTAB 0x0288->0x03da ; "Registering target "
0297 0299 | | .STRTAB 0x0299->0x03e3 ; "$"
0298 0298 | | .STRTAB 0x0298->0x03e4 ; ".register"
0299 029f | | .STRTAB 0x029f->0x03e8 ; "Successfully registered target "
029a 02bc | | .STRTAB 0x02bc->0x03f8 ; " raised in Register_Target"
029b 02d4 | | .STREND 0x02d4->0x0405
029c 2154 6172 |!Tar| .STRTAB_STRINGS
0405 0000 0000 | | .XXX[0x3]
0407 0000 | |
0408 ; --------------------------------------------------------------------------------------
0408 ; Debug Table
0408 ; --------------------------------------------------------------------------------------
0408 0004 0002 | | .DEBUG4 0x0004,0x0002,0x1965,0x0000,0x0001,0x000e
040e 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
0412 001b 0446 | F| .DBG4T 0x001b,0x0446,0x8001,0x0000
0416 006b 0459 | k Y| .DBG4T 0x006b,0x0459,0x0002,0x0000
041a 0093 045e | ^| .DBG4T 0x0093,0x045e,0x0002,0x0000
041e 00ab 0463 | c| .DBG4T 0x00ab,0x0463,0x0002,0x0000
0422 00c3 0468 | h| .DBG4T 0x00c3,0x0468,0x0002,0x0000
0426 00db 046d | m| .DBG4T 0x00db,0x046d,0x0002,0x0000
042a 00eb 0470 | p| .DBG4T 0x00eb,0x0470,0x0001,0x0000
042e 0123 0477 | # w| .DBG4T 0x0123,0x0477,0x0001,0x0000
0432 015b 047e | [ ~| .DBG4T 0x015b,0x047e,0x0001,0x0000
0436 019b 0486 | | .DBG4T 0x019b,0x0486,0x0001,0x0000
043a 01d3 048e | | .DBG4T 0x01d3,0x048e,0x0004,0x0000
043e 021b 0497 | | .DBG4T 0x021b,0x0497,0x0004,0x0000
0442 0263 04a0 | c | .DBG4T 0x0263,0x04a0,0x0004,0x0000
0446 ; --------------------------------------------------------------------------------------
0446 ; Debug chain
0446 ; --------------------------------------------------------------------------------------
0446 000c 0005 | | .DBGLEN 0x000c,0x0005
0448 001b 0020 | | .DBGLNO 0x001b,0x0020,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0038,0x0039,0x003e,0x0050
0459 ; --------------------------------------------------------------------------------------
0459 ; Debug chain
0459 ; --------------------------------------------------------------------------------------
0459 0000 0003 | | .DBGLEN 0x0000,0x0003
045b 006b 0080 | k | .DBGLNO 0x006b,0x0080,0x008d
045e ; --------------------------------------------------------------------------------------
045e ; Debug chain
045e ; --------------------------------------------------------------------------------------
045e 0000 0003 | | .DBGLEN 0x0000,0x0003
0460 0095 009c | | .DBGLNO 0x0095,0x009c,0x009e
0463 ; --------------------------------------------------------------------------------------
0463 ; Debug chain
0463 ; --------------------------------------------------------------------------------------
0463 0000 0003 | | .DBGLEN 0x0000,0x0003
0465 00ad 00b4 | | .DBGLNO 0x00ad,0x00b4,0x00b6
0468 ; --------------------------------------------------------------------------------------
0468 ; Debug chain
0468 ; --------------------------------------------------------------------------------------
0468 0000 0003 | | .DBGLEN 0x0000,0x0003
046a 00c5 00cc | | .DBGLNO 0x00c5,0x00cc,0x00ce
046d ; --------------------------------------------------------------------------------------
046d ; Debug chain
046d ; --------------------------------------------------------------------------------------
046d 0000 0001 | | .DBGLEN 0x0000,0x0001
046f 00db | | .DBGLNO 0x00db
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug chain
0470 ; --------------------------------------------------------------------------------------
0470 0000 0005 | | .DBGLEN 0x0000,0x0005
0472 00eb 00f2 | | .DBGLNO 0x00eb,0x00f2,0x0107,0x0110,0x011c
0477 ; --------------------------------------------------------------------------------------
0477 ; Debug chain
0477 ; --------------------------------------------------------------------------------------
0477 0000 0005 | | .DBGLEN 0x0000,0x0005
0479 0123 012f | # /| .DBGLNO 0x0123,0x012f,0x0140,0x0149,0x0155
047e ; --------------------------------------------------------------------------------------
047e ; Debug chain
047e ; --------------------------------------------------------------------------------------
047e 0001 0005 | | .DBGLEN 0x0001,0x0005
0480 015b 015c | [ \| .DBGLNO 0x015b,0x015c,0x0165,0x0176,0x017f,0x0188
0486 ; --------------------------------------------------------------------------------------
0486 ; Debug chain
0486 ; --------------------------------------------------------------------------------------
0486 0001 0005 | | .DBGLEN 0x0001,0x0005
0488 019b 019c | | .DBGLNO 0x019b,0x019c,0x01a5,0x01b2,0x01bd,0x01c9
048e ; --------------------------------------------------------------------------------------
048e ; Debug chain
048e ; --------------------------------------------------------------------------------------
048e 0004 0003 | | .DBGLEN 0x0004,0x0003
0490 01d3 01d4 | | .DBGLNO 0x01d3,0x01d4,0x01da,0x01ea,0x01fa,0x01ff,0x0212
0497 ; --------------------------------------------------------------------------------------
0497 ; Debug chain
0497 ; --------------------------------------------------------------------------------------
0497 0004 0003 | | .DBGLEN 0x0004,0x0003
0499 021b 021c | | .DBGLNO 0x021b,0x021c,0x0222,0x0232,0x0242,0x0247,0x0259
04a0 ; --------------------------------------------------------------------------------------
04a0 ; Debug chain
04a0 ; --------------------------------------------------------------------------------------
04a0 0002 0003 | | .DBGLEN 0x0002,0x0003
04a2 0263 0264 | c d| .DBGLNO 0x0263,0x0264,0x026a,0x026f,0x0276
04a7 0000 0000 | | .BLANK 0000[0x159]