|
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_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 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 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 | | push_full_address 0x0 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 INIT_0068,For_Call 0027 029f 0093 | | Declare_Subprogram INIT_0090,For_Call 0029 029f 00ab | | Declare_Subprogram INIT_00a8,For_Call 002b 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 002d 029f 00db | | Declare_Subprogram INIT_00d8,For_Call 002f 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 0031 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call 0033 029f 015b | [| Declare_Subprogram INIT_0158,For_Call 0035 029f 019b | | Declare_Subprogram INIT_0198,For_Call 0037 BODY_0018: 0037 840a | | Call 0x2,0xa 0038 840b | | Call 0x2,0xb 0039 840c | | Call 0x2,0xc 003a 4504 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_01d0,For_Call 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 INIT_0218,For_Call 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 INIT_0260,For_Call 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 " 027a 0075 | u | .STRTAB 0x0075->0x02b4 ; " due to unhandled exception " 027b 008f | | .STRTAB 0x008f->0x02c2 ; "<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>" 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]