|
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_a218da
└─⟦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 0400 | | .CONST 0x0400 ; 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 0032 | 2 | .CONST 0x0032 ; Address of begin
0019 0036 | 6 | .CONST 0x0036 ; Address of exception handler
001a 000c | | .CONST 0x000c ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
001d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
001e 0092 0270 | p| Action Push_String_Extended,0x270 ; "!Targets.Implementation.Release"
0020 029f 0063 | c| Declare_Subprogram For_Call,INIT_0060
0022 029f 008b | | Declare_Subprogram For_Call,INIT_0088
0024 029f 00a3 | | Declare_Subprogram For_Call,INIT_00a0
0026 029f 00bb | | Declare_Subprogram For_Call,INIT_00b8
0028 029f 00d3 | | Declare_Subprogram For_Call,INIT_00d0
002a 029f 00e3 | | Declare_Subprogram For_Call,INIT_00e0
002c 029f 011b | | Declare_Subprogram For_Call,INIT_0118
002e 029f 0153 | S| Declare_Subprogram For_Call,INIT_0150
0030 029f 0193 | | Declare_Subprogram For_Call,INIT_0190
0032 BODY_0018:
0032 8409 | | Call 0x2,0x9
0033 840a | | Call 0x2,0xa
0034 840b | | Call 0x2,0xb
0035 4504 |E | Exit_Subprogram 0x4
0036 TRAP_0018:
0036 e002 | | Load 0x0,0x2
0037 010f | | Execute Exception,Equal
0038 6812 |h | Jump_Zero 0x4b
0039 e003 | | Load 0x0,0x3
003a 180e | | Execute Package,Field_Execute,Field_Number 0xe
003b 4805 |H | Short_Literal 0x5
003c 0092 0271 | q| Action Push_String_Extended,0x271 ; "Unable to install "
003e e5ff | | Load 0x2,-0x1
003f 01cc | | Execute Vector,Catenate
0040 0092 0272 | r| Action Push_String_Extended,0x272 ; " due to unhandled exception "
0042 01cc | | Execute Vector,Catenate
0043 4800 |H | Short_Literal 0x0
0044 4801 |H | Short_Literal 0x1
0045 e004 | | Load 0x0,0x4
0046 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0047 01cc | | Execute Vector,Catenate
0048 e005 | | Load 0x0,0x5
0049 1813 | | Execute Package,Field_Execute,Field_Number 0x13
004a 4504 |E | Exit_Subprogram 0x4
004b e003 | | Load 0x0,0x3
004c 180e | | Execute Package,Field_Execute,Field_Number 0xe
004d 4805 |H | Short_Literal 0x5
004e 0092 0271 | q| Action Push_String_Extended,0x271 ; "Unable to install "
0050 8405 | | Call 0x2,0x5
0051 01cc | | Execute Vector,Catenate
0052 0092 0272 | r| Action Push_String_Extended,0x272 ; " due to unhandled exception "
0054 01cc | | Execute Vector,Catenate
0055 4800 |H | Short_Literal 0x0
0056 4801 |H | Short_Literal 0x1
0057 e004 | | Load 0x0,0x4
0058 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0059 01cc | | Execute Vector,Catenate
005a e005 | | Load 0x0,0x5
005b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005c 4504 |E | Exit_Subprogram 0x4
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e402 | | Load 0x2,0x2
0064 01db | | Execute Vector,Length
0065 0c20 | | Execute_Immediate Greater_Equal,0x20
0066 681e |h | Jump_Zero 0x85
0067 4801 |H | Short_Literal 0x1
0068 e402 | | Load 0x2,0x2
0069 01dd | | Execute Vector,First
006a e402 | | Load 0x2,0x2
006b 01dd | | Execute Vector,First
006c 0a1e | | Execute_Immediate Plus,0x1e
006d 00d8 | | Load_Top At_Offset_0
006e 00e2 | | Load_Encached Integer_Cache
006f 0260 | ` | Execute Discrete,In_Type
0070 7001 |p | Jump_Nonzero 0x72
0071 0801 | | Execute_Immediate Raise,0x1
0072 e402 | | Load 0x2,0x2
0073 01cf | | Execute Vector,Slice_Read
0074 e403 | | Load 0x2,0x3
0075 e006 | | Load 0x0,0x6
0076 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0077 680d |h | Jump_Zero 0x85
0078 e402 | | Load 0x2,0x2
0079 01dd | | Execute Vector,First
007a 0a1f | | Execute_Immediate Plus,0x1f
007b 00d8 | | Load_Top At_Offset_0
007c 00e2 | | Load_Encached Integer_Cache
007d 0260 | ` | Execute Discrete,In_Type
007e 7001 |p | Jump_Nonzero 0x80
007f 0801 | | Execute_Immediate Raise,0x1
0080 e402 | | Load 0x2,0x2
0081 01dc | | Execute Vector,Last
0082 e402 | | Load 0x2,0x2
0083 01cf | | Execute Vector,Slice_Read
0084 00ca | | Action Exit_Nullary_Function
0085 e002 | | Load 0x0,0x2
0086 0257 | W | Execute Discrete,Raise
0087 0000 | | .XXX[0x1]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008d | | .CONST 0x008d ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0002 | | .CONST 0x0002 ; Number of locals
008b INIT_0088:
008b 029f 01cb | | Declare_Subprogram For_Call,INIT_01c8
008d BODY_0088:
008d 4801 |H | Short_Literal 0x1
008e 0092 0273 | s| Action Push_String_Extended,0x273 ; "<DEFAULT>"
0090 e5fe | | Load 0x2,-0x2
0091 e006 | | Load 0x0,0x6
0092 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0093 6802 |h | Jump_Zero 0x96
0094 8602 | | Call 0x3,0x2
0095 7804 |x | Jump 0x9a
0096 e5fe | | Load 0x2,-0x2
0097 0335 | 5 | Declare_Variable Array,Duplicate
0098 00cd | | Action Spare6_Action
0099 00ca | | Action Exit_Nullary_Function
009a 0831 | 1 | Execute_Immediate Raise,0x31
009b 0000 0000 | | .BLANK 0000[0x5]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a5 | | .CONST 0x00a5 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0002 | | .CONST 0x0002 ; Number of locals
00a3 INIT_00a0:
00a3 029f 0213 | | Declare_Subprogram For_Call,INIT_0210
00a5 BODY_00a0:
00a5 4801 |H | Short_Literal 0x1
00a6 0092 0273 | s| Action Push_String_Extended,0x273 ; "<DEFAULT>"
00a8 e5fe | | Load 0x2,-0x2
00a9 e006 | | Load 0x0,0x6
00aa 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00ab 6802 |h | Jump_Zero 0xae
00ac 8602 | | Call 0x3,0x2
00ad 7804 |x | Jump 0xb2
00ae e5fe | | Load 0x2,-0x2
00af 0335 | 5 | Declare_Variable Array,Duplicate
00b0 00cd | | Action Spare6_Action
00b1 00ca | | Action Exit_Nullary_Function
00b2 0831 | 1 | Execute_Immediate Raise,0x31
00b3 0000 0000 | | .BLANK 0000[0x5]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bd | | .CONST 0x00bd ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0002 | | .CONST 0x0002 ; Number of locals
00bb INIT_00b8:
00bb 029f 025b | [| Declare_Subprogram For_Call,INIT_0258
00bd BODY_00b8:
00bd 4801 |H | Short_Literal 0x1
00be 0092 0273 | s| Action Push_String_Extended,0x273 ; "<DEFAULT>"
00c0 e5fd | | Load 0x2,-0x3
00c1 e006 | | Load 0x0,0x6
00c2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00c3 6802 |h | Jump_Zero 0xc6
00c4 8602 | | Call 0x3,0x2
00c5 7804 |x | Jump 0xca
00c6 e5fd | | Load 0x2,-0x3
00c7 0335 | 5 | Declare_Variable Array,Duplicate
00c8 00cd | | Action Spare6_Action
00c9 00ca | | Action Exit_Nullary_Function
00ca 0831 | 1 | Execute_Immediate Raise,0x31
00cb 0000 0000 | | .BLANK 0000[0x5]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 0092 0274 | t| Action Push_String_Extended,0x274 ; "!targets.implementation.release_"
00d5 8405 | | Call 0x2,0x5
00d6 01cc | | Execute Vector,Catenate
00d7 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
00d9 01cc | | Execute Vector,Catenate
00da 8406 | | Call 0x2,0x6
00db 01cc | | Execute Vector,Catenate
00dc 8407 | | Call 0x2,0x7
00dd 01cc | | Execute Vector,Catenate
00de 00ca | | Action Exit_Nullary_Function
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0107 | | .CONST 0x0107 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 e003 | | Load 0x0,0x3
00e4 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e5 4802 |H | Short_Literal 0x2
00e6 0092 0276 | v| Action Push_String_Extended,0x276 ; "Restoring predefined world"
00e8 e005 | | Load 0x0,0x5
00e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ea 0092 0277 | w| Action Push_String_Extended,0x277 ; "<PROFILE>"
00ec 8408 | | Call 0x2,0x8
00ed 0092 0278 | x| Action Push_String_Extended,0x278 ; ".predefined_archive"
00ef 01cc | | Execute Vector,Catenate
00f0 0092 0279 | y| Action Push_String_Extended,0x279 ; "changed_objects replace"
00f2 0092 027a | z| Action Push_String_Extended,0x27a ; "*"
00f4 0092 027a | z| Action Push_String_Extended,0x27a ; "*"
00f6 0092 027b | {| Action Push_String_Extended,0x27b ; "[?,~!Targets."
00f8 8405 | | Call 0x2,0x5
00f9 01cc | | Execute Vector,Catenate
00fa 0092 027c | || Action Push_String_Extended,0x27c ; "]"
00fc 01cc | | Execute Vector,Catenate
00fd e007 | | Load 0x0,0x7
00fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ff e003 | | Load 0x0,0x3
0100 180e | | Execute Package,Field_Execute,Field_Number 0xe
0101 4802 |H | Short_Literal 0x2
0102 0092 027d | }| Action Push_String_Extended,0x27d ; "Successfully restored predefined world"
0104 e005 | | Load 0x0,0x5
0105 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0106 4501 |E | Exit_Subprogram 0x1
0107 TRAP_00e0:
0107 0007 | | Action Break_Optional
0108 e003 | | Load 0x0,0x3
0109 180e | | Execute Package,Field_Execute,Field_Number 0xe
010a 4807 |H | Short_Literal 0x7
010b 4800 |H | Short_Literal 0x0
010c 4801 |H | Short_Literal 0x1
010d e004 | | Load 0x0,0x4
010e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
010f 0092 027e | ~| Action Push_String_Extended,0x27e ; " raised in Restore_Predefined"
0111 01cc | | Execute Vector,Catenate
0112 e005 | | Load 0x0,0x5
0113 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0114 00d8 | | Load_Top At_Offset_0
0115 0101 | | Execute Exception,Reraise
0116 0000 0000 | | .XXX[0x2]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b | | .CONST 0x011b ; Address of begin
0119 0140 | @ | .CONST 0x0140 ; Address of exception handler
011a 0001 | | .CONST 0x0001 ; Number of locals
011b BODY_0118:
011b INIT_0118:
011b e003 | | Load 0x0,0x3
011c 180e | | Execute Package,Field_Execute,Field_Number 0xe
011d 4802 |H | Short_Literal 0x2
011e 0092 027f | | Action Push_String_Extended,0x27f ; "Merging "
0120 8408 | | Call 0x2,0x8
0121 01cc | | Execute Vector,Catenate
0122 0092 0280 | | Action Push_String_Extended,0x280 ; ".install_activity into !machine.release.current.activity"
0124 01cc | | Execute Vector,Catenate
0125 e005 | | Load 0x0,0x5
0126 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0127 0092 0277 | w| Action Push_String_Extended,0x277 ; "<PROFILE>"
0129 0092 0281 | | Action Push_String_Extended,0x281 ; "!machine.release.current.activity"
012b 4801 |H | Short_Literal 0x1
012c 0092 0282 | | Action Push_String_Extended,0x282 ; "?"
012e 0092 0282 | | Action Push_String_Extended,0x282 ; "?"
0130 0092 0282 | | Action Push_String_Extended,0x282 ; "?"
0132 8408 | | Call 0x2,0x8
0133 0092 0283 | | Action Push_String_Extended,0x283 ; ".install_activity"
0135 01cc | | Execute Vector,Catenate
0136 e008 | | Load 0x0,0x8
0137 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0138 e003 | | Load 0x0,0x3
0139 180e | | Execute Package,Field_Execute,Field_Number 0xe
013a 4802 |H | Short_Literal 0x2
013b 0092 0284 | | Action Push_String_Extended,0x284 ; "Successfully merged activities"
013d e005 | | Load 0x0,0x5
013e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
013f 4501 |E | Exit_Subprogram 0x1
0140 TRAP_0118:
0140 0007 | | Action Break_Optional
0141 e003 | | Load 0x0,0x3
0142 180e | | Execute Package,Field_Execute,Field_Number 0xe
0143 4807 |H | Short_Literal 0x7
0144 4800 |H | Short_Literal 0x0
0145 4801 |H | Short_Literal 0x1
0146 e004 | | Load 0x0,0x4
0147 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0148 0092 0285 | | Action Push_String_Extended,0x285 ; " raised in Merge_Activities"
014a 01cc | | Execute Vector,Catenate
014b e005 | | Load 0x0,0x5
014c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
014d 00d8 | | Load_Top At_Offset_0
014e 0101 | | Execute Exception,Reraise
014f 0000 | | .XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0154 | T | .CONST 0x0154 ; Address of begin
0151 0176 | v | .CONST 0x0176 ; Address of exception handler
0152 0002 | | .CONST 0x0002 ; Number of locals
0153 INIT_0150:
0153 8405 | | Call 0x2,0x5
0154 BODY_0150:
0154 e003 | | Load 0x0,0x3
0155 180e | | Execute Package,Field_Execute,Field_Number 0xe
0156 4802 |H | Short_Literal 0x2
0157 0092 0286 | | Action Push_String_Extended,0x286 ; "Replacing link to "
0159 00db | | Load_Top At_Offset_3
015a 01cc | | Execute Vector,Catenate
015b e005 | | Load 0x0,0x5
015c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
015d 0092 0277 | w| Action Push_String_Extended,0x277 ; "<PROFILE>"
015f 0092 0287 | | Action Push_String_Extended,0x287 ; "!machine.release.current.commands"
0161 0092 0288 | | Action Push_String_Extended,0x288 ; "#"
0163 0092 0289 | | Action Push_String_Extended,0x289 ; "!targets.implementation.Rcf_customization."
0165 e602 | | Load 0x3,0x2
0166 01cc | | Execute Vector,Catenate
0167 0092 028a | | Action Push_String_Extended,0x28a ; "'spec_view.units."
0169 01cc | | Execute Vector,Catenate
016a e602 | | Load 0x3,0x2
016b 01cc | | Execute Vector,Catenate
016c e009 | | Load 0x0,0x9
016d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
016e e003 | | Load 0x0,0x3
016f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0170 4802 |H | Short_Literal 0x2
0171 0092 028b | | Action Push_String_Extended,0x28b ; "Successfully replaced link"
0173 e005 | | Load 0x0,0x5
0174 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0175 4501 |E | Exit_Subprogram 0x1
0176 TRAP_0150:
0176 0007 | | Action Break_Optional
0177 e003 | | Load 0x0,0x3
0178 180e | | Execute Package,Field_Execute,Field_Number 0xe
0179 4806 |H | Short_Literal 0x6
017a 0092 028c | | Action Push_String_Extended,0x28c ; "Unable to define link to "
017c e602 | | Load 0x3,0x2
017d 01cc | | Execute Vector,Catenate
017e e005 | | Load 0x0,0x5
017f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0180 e003 | | Load 0x0,0x3
0181 180e | | Execute Package,Field_Execute,Field_Number 0xe
0182 4802 |H | Short_Literal 0x2
0183 4800 |H | Short_Literal 0x0
0184 4801 |H | Short_Literal 0x1
0185 e004 | | Load 0x0,0x4
0186 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0187 0092 028d | | Action Push_String_Extended,0x28d ; " raised in Replace_Links"
0189 01cc | | Execute Vector,Catenate
018a e005 | | Load 0x0,0x5
018b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
018c 4501 |E | Exit_Subprogram 0x1
018d 0000 0000 | | .XXX[0x3]
018f 0000 | |
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0194 | | .CONST 0x0194 ; Address of begin
0191 01b4 | | .CONST 0x01b4 ; Address of exception handler
0192 0002 | | .CONST 0x0002 ; Number of locals
0193 INIT_0190:
0193 8405 | | Call 0x2,0x5
0194 BODY_0190:
0194 e003 | | Load 0x0,0x3
0195 180e | | Execute Package,Field_Execute,Field_Number 0xe
0196 4802 |H | Short_Literal 0x2
0197 0092 028e | | Action Push_String_Extended,0x28e ; "Registering target "
0199 00db | | Load_Top At_Offset_3
019a 01cc | | Execute Vector,Catenate
019b e005 | | Load 0x0,0x5
019c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
019d 0092 0277 | w| Action Push_String_Extended,0x277 ; "<PROFILE>"
019f 00ea | | Load_Encached Null_String_Cache
01a0 4800 |H | Short_Literal 0x0
01a1 0092 028f | | Action Push_String_Extended,0x28f ; "$"
01a3 4800 |H | Short_Literal 0x0
01a4 e602 | | Load 0x3,0x2
01a5 0092 0290 | | Action Push_String_Extended,0x290 ; ".register"
01a7 01cc | | Execute Vector,Catenate
01a8 e00a | | Load 0x0,0xa
01a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01aa e003 | | Load 0x0,0x3
01ab 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ac 4802 |H | Short_Literal 0x2
01ad 0092 0291 | | Action Push_String_Extended,0x291 ; "Successfully registered target "
01af 00db | | Load_Top At_Offset_3
01b0 01cc | | Execute Vector,Catenate
01b1 e005 | | Load 0x0,0x5
01b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b3 4501 |E | Exit_Subprogram 0x1
01b4 TRAP_0190:
01b4 0007 | | Action Break_Optional
01b5 e003 | | Load 0x0,0x3
01b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b7 4802 |H | Short_Literal 0x2
01b8 4800 |H | Short_Literal 0x0
01b9 4801 |H | Short_Literal 0x1
01ba e004 | | Load 0x0,0x4
01bb 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01bc 0092 0292 | | Action Push_String_Extended,0x292 ; " raised in Register_Target"
01be 01cc | | Execute Vector,Catenate
01bf e005 | | Load 0x0,0x5
01c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c1 00d8 | | Load_Top At_Offset_0
01c2 0101 | | Execute Exception,Reraise
01c3 0000 0000 | | .BLANK 0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01f2 | | .CONST 0x01f2 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0005 | | .CONST 0x0005 ; Number of locals
01cb INIT_01c8:
01cb 8404 | | Call 0x2,0x4
01cc 4801 |H | Short_Literal 0x1
01cd 00d9 | | Load_Top At_Offset_1
01ce 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
01d0 e006 | | Load 0x0,0x6
01d1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01d2 4801 |H | Short_Literal 0x1
01d3 00da | | Load_Top At_Offset_2
01d4 01dd | | Execute Vector,First
01d5 00da | | Load_Top At_Offset_2
01d6 0aff | | Execute_Immediate Plus,-0x1
01d7 00d8 | | Load_Top At_Offset_0
01d8 00e2 | | Load_Encached Integer_Cache
01d9 0260 | ` | Execute Discrete,In_Type
01da 7001 |p | Jump_Nonzero 0x1dc
01db 0801 | | Execute_Immediate Raise,0x1
01dc e802 | | Load 0x4,0x2
01dd 01cf | | Execute Vector,Slice_Read
01de 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
01e0 e006 | | Load 0x0,0x6
01e1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01e2 4801 |H | Short_Literal 0x1
01e3 00db | | Load_Top At_Offset_3
01e4 01dd | | Execute Vector,First
01e5 00da | | Load_Top At_Offset_2
01e6 0aff | | Execute_Immediate Plus,-0x1
01e7 00d8 | | Load_Top At_Offset_0
01e8 00e2 | | Load_Encached Integer_Cache
01e9 0260 | ` | Execute Discrete,In_Type
01ea 7001 |p | Jump_Nonzero 0x1ec
01eb 0801 | | Execute_Immediate Raise,0x1
01ec e802 | | Load 0x4,0x2
01ed 01cf | | Execute Vector,Slice_Read
01ee 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
01f0 e006 | | Load 0x0,0x6
01f1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01f2 BODY_01c8:
01f2 00d8 | | Load_Top At_Offset_0
01f3 e802 | | Load 0x4,0x2
01f4 01dd | | Execute Vector,First
01f5 027d | } | Execute Discrete,Greater
01f6 6813 |h | Jump_Zero 0x20a
01f7 00db | | Load_Top At_Offset_3
01f8 01dd | | Execute Vector,First
01f9 0a01 | | Execute_Immediate Plus,0x1
01fa 00d8 | | Load_Top At_Offset_0
01fb 00e2 | | Load_Encached Integer_Cache
01fc 0260 | ` | Execute Discrete,In_Type
01fd 7001 |p | Jump_Nonzero 0x1ff
01fe 0801 | | Execute_Immediate Raise,0x1
01ff 00d9 | | Load_Top At_Offset_1
0200 0aff | | Execute_Immediate Plus,-0x1
0201 00d8 | | Load_Top At_Offset_0
0202 00e2 | | Load_Encached Integer_Cache
0203 0260 | ` | Execute Discrete,In_Type
0204 7001 |p | Jump_Nonzero 0x206
0205 0801 | | Execute_Immediate Raise,0x1
0206 e802 | | Load 0x4,0x2
0207 01cf | | Execute Vector,Slice_Read
0208 00cb | | Action Pop_Block_With_Result
0209 00ca | | Action Exit_Nullary_Function
020a e002 | | Load 0x0,0x2
020b 0257 | W | Execute Discrete,Raise
020c 0000 0000 | | .BLANK 0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 023a | : | .CONST 0x023a ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0005 | | .CONST 0x0005 ; Number of locals
0213 INIT_0210:
0213 8404 | | Call 0x2,0x4
0214 4801 |H | Short_Literal 0x1
0215 00d9 | | Load_Top At_Offset_1
0216 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
0218 e006 | | Load 0x0,0x6
0219 181f | | Execute Package,Field_Execute,Field_Number 0x1f
021a 4801 |H | Short_Literal 0x1
021b 00da | | Load_Top At_Offset_2
021c 01dd | | Execute Vector,First
021d 00da | | Load_Top At_Offset_2
021e 0aff | | Execute_Immediate Plus,-0x1
021f 00d8 | | Load_Top At_Offset_0
0220 00e2 | | Load_Encached Integer_Cache
0221 0260 | ` | Execute Discrete,In_Type
0222 7001 |p | Jump_Nonzero 0x224
0223 0801 | | Execute_Immediate Raise,0x1
0224 e802 | | Load 0x4,0x2
0225 01cf | | Execute Vector,Slice_Read
0226 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
0228 e006 | | Load 0x0,0x6
0229 181f | | Execute Package,Field_Execute,Field_Number 0x1f
022a 4801 |H | Short_Literal 0x1
022b 00db | | Load_Top At_Offset_3
022c 01dd | | Execute Vector,First
022d 00da | | Load_Top At_Offset_2
022e 0aff | | Execute_Immediate Plus,-0x1
022f 00d8 | | Load_Top At_Offset_0
0230 00e2 | | Load_Encached Integer_Cache
0231 0260 | ` | Execute Discrete,In_Type
0232 7001 |p | Jump_Nonzero 0x234
0233 0801 | | Execute_Immediate Raise,0x1
0234 e802 | | Load 0x4,0x2
0235 01cf | | Execute Vector,Slice_Read
0236 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
0238 e006 | | Load 0x0,0x6
0239 181f | | Execute Package,Field_Execute,Field_Number 0x1f
023a BODY_0210:
023a 00d8 | | Load_Top At_Offset_0
023b e802 | | Load 0x4,0x2
023c 01dd | | Execute Vector,First
023d 027d | } | Execute Discrete,Greater
023e 6812 |h | Jump_Zero 0x251
023f 00d8 | | Load_Top At_Offset_0
0240 0a01 | | Execute_Immediate Plus,0x1
0241 00d8 | | Load_Top At_Offset_0
0242 00e2 | | Load_Encached Integer_Cache
0243 0260 | ` | Execute Discrete,In_Type
0244 7001 |p | Jump_Nonzero 0x246
0245 0801 | | Execute_Immediate Raise,0x1
0246 00db | | Load_Top At_Offset_3
0247 0aff | | Execute_Immediate Plus,-0x1
0248 00d8 | | Load_Top At_Offset_0
0249 00e2 | | Load_Encached Integer_Cache
024a 0260 | ` | Execute Discrete,In_Type
024b 7001 |p | Jump_Nonzero 0x24d
024c 0801 | | Execute_Immediate Raise,0x1
024d e802 | | Load 0x4,0x2
024e 01cf | | Execute Vector,Slice_Read
024f 00cb | | Action Pop_Block_With_Result
0250 00ca | | Action Exit_Nullary_Function
0251 e002 | | Load 0x0,0x2
0252 0257 | W | Execute Discrete,Raise
0253 0000 0000 | | .BLANK 0000[0x5]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0262 | b | .CONST 0x0262 ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0003 | | .CONST 0x0003 ; Number of locals
025b INIT_0258:
025b 8404 | | Call 0x2,0x4
025c 4801 |H | Short_Literal 0x1
025d 00d9 | | Load_Top At_Offset_1
025e 0092 0275 | u| Action Push_String_Extended,0x275 ; "_"
0260 e006 | | Load 0x0,0x6
0261 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0262 BODY_0258:
0262 00d8 | | Load_Top At_Offset_0
0263 00da | | Load_Top At_Offset_2
0264 01dd | | Execute Vector,First
0265 027d | } | Execute Discrete,Greater
0266 6807 |h | Jump_Zero 0x26e
0267 00d8 | | Load_Top At_Offset_0
0268 00da | | Load_Top At_Offset_2
0269 01dc | | Execute Vector,Last
026a 00db | | Load_Top At_Offset_3
026b 01cf | | Execute Vector,Slice_Read
026c 00cb | | Action Pop_Block_With_Result
026d 00ca | | Action Exit_Nullary_Function
026e e002 | | Load 0x0,0x2
026f 0257 | W | Execute Discrete,Raise
0270 ; --------------------------------------------------------------------------------------
0270 ; STRING TABLE
0270 ; --------------------------------------------------------------------------------------
0270 0048 | H | .STRTAB 0x0048->0x0294 ; "!Targets.Implementation.Release"
0271 0065 | e | .STRTAB 0x0065->0x02a3 ; "Unable to install "
; "Unable to install "
0272 0075 | u | .STRTAB 0x0075->0x02ac ; " due to unhandled exception "
; " due to unhandled exception "
0273 008f | | .STRTAB 0x008f->0x02ba ; "<DEFAULT>"
; "<DEFAULT>"
; "<DEFAULT>"
0274 0096 | | .STRTAB 0x0096->0x02bf ; "!targets.implementation.release_"
0275 00b4 | | .STRTAB 0x00b4->0x02cf ; "_"
; "_"
; "_"
; "_"
; "_"
; "_"
; "_"
; "_"
0276 00b3 | | .STRTAB 0x00b3->0x02cf ; "Restoring predefined world"
0277 00cb | | .STRTAB 0x00cb->0x02dc ; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
; "<PROFILE>"
0278 00d2 | | .STRTAB 0x00d2->0x02e1 ; ".predefined_archive"
0279 00e3 | | .STRTAB 0x00e3->0x02ea ; "changed_objects replace"
027a 00f8 | | .STRTAB 0x00f8->0x02f6 ; "*"
; "*"
027b 00f7 | | .STRTAB 0x00f7->0x02f6 ; "[?,~!Targets."
027c 0102 | | .STRTAB 0x0102->0x02fd ; "]"
027d 0101 | | .STRTAB 0x0101->0x02fd ; "Successfully restored predefined world"
027e 0125 | % | .STRTAB 0x0125->0x0310 ; " raised in Restore_Predefined"
027f 0140 | @ | .STRTAB 0x0140->0x031f ; "Merging "
0280 0146 | F | .STRTAB 0x0146->0x0323 ; ".install_activity into !machine.release.current.activity"
0281 017c | | | .STRTAB 0x017c->0x033f ; "!machine.release.current.activity"
0282 019b | | .STRTAB 0x019b->0x034f ; "?"
; "?"
; "?"
0283 019a | | .STRTAB 0x019a->0x0350 ; ".install_activity"
0284 01a9 | | .STRTAB 0x01a9->0x0358 ; "Successfully merged activities"
0285 01c5 | | .STRTAB 0x01c5->0x0367 ; " raised in Merge_Activities"
0286 01de | | .STRTAB 0x01de->0x0375 ; "Replacing link to "
0287 01ee | | .STRTAB 0x01ee->0x037e ; "!machine.release.current.commands"
0288 020d | | .STRTAB 0x020d->0x038e ; "#"
0289 020c | | .STRTAB 0x020c->0x038f ; "!targets.implementation.Rcf_customization."
028a 0234 | 4 | .STRTAB 0x0234->0x03a4 ; "'spec_view.units."
028b 0243 | C | .STRTAB 0x0243->0x03ac ; "Successfully replaced link"
028c 025b | [ | .STRTAB 0x025b->0x03b9 ; "Unable to define link to "
028d 0272 | r | .STRTAB 0x0272->0x03c6 ; " raised in Replace_Links"
028e 0288 | | .STRTAB 0x0288->0x03d2 ; "Registering target "
028f 0299 | | .STRTAB 0x0299->0x03db ; "$"
0290 0298 | | .STRTAB 0x0298->0x03dc ; ".register"
0291 029f | | .STRTAB 0x029f->0x03e0 ; "Successfully registered target "
0292 02bc | | .STRTAB 0x02bc->0x03f0 ; " raised in Register_Target"
0293 02d4 | | .STREND 0x02d4->0x03fd
0294 2154 6172 |!Tar| .STRTAB_STRINGS
03fd 0000 0000 | | .XXX[0x3]
03ff 0000 | |
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug Table
0400 ; --------------------------------------------------------------------------------------
0400 0004 0001 | | .DEBUG4 0x0004,0x0001,0x2f29,0x0000,0x0001,0x000e
0406 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
040a 001b 043e | >| .DBG4T 0x001b,0x043e,0x8001,0x8000
040e 0063 045b | c [| .DBG4T 0x0063,0x045b,0x0002,0x0000
0412 008b 0460 | `| .DBG4T 0x008b,0x0460,0x0002,0x0000
0416 00a3 0465 | e| .DBG4T 0x00a3,0x0465,0x0002,0x0000
041a 00bb 046a | j| .DBG4T 0x00bb,0x046a,0x0002,0x0000
041e 00d3 046f | o| .DBG4T 0x00d3,0x046f,0x0002,0x0000
0422 00e3 0472 | r| .DBG4T 0x00e3,0x0472,0x0001,0x0000
0426 011b 0479 | y| .DBG4T 0x011b,0x0479,0x0001,0x0000
042a 0153 0480 | S | .DBG4T 0x0153,0x0480,0x0001,0x0000
042e 0193 0488 | | .DBG4T 0x0193,0x0488,0x0001,0x0000
0432 01cb 0490 | | .DBG4T 0x01cb,0x0490,0x0004,0x0000
0436 0213 0499 | | .DBG4T 0x0213,0x0499,0x0004,0x0000
043a 025b 04a2 | [ | .DBG4T 0x025b,0x04a2,0x0004,0x0000
043e ; --------------------------------------------------------------------------------------
043e ; Debug chain
043e ; --------------------------------------------------------------------------------------
043e 000b 0005 | | .DBGLEN 0x000b,0x0005
0440 001b 001e | | .DBGLNO 0x001b,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0033,0x0034,0x0039,0x004b
0450 0002 0003 | | .XXX[0xb]
0452 0004 0005 | |
0454 0006 0007 | |
0456 0008 0009 | |
0458 000a 000b | |
045a 000c | |
045b ; --------------------------------------------------------------------------------------
045b ; Debug chain
045b ; --------------------------------------------------------------------------------------
045b 0000 0003 | | .DBGLEN 0x0000,0x0003
045d 0063 0078 | c x| .DBGLNO 0x0063,0x0078,0x0085
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug chain
0460 ; --------------------------------------------------------------------------------------
0460 0000 0003 | | .DBGLEN 0x0000,0x0003
0462 008d 0094 | | .DBGLNO 0x008d,0x0094,0x0096
0465 ; --------------------------------------------------------------------------------------
0465 ; Debug chain
0465 ; --------------------------------------------------------------------------------------
0465 0000 0003 | | .DBGLEN 0x0000,0x0003
0467 00a5 00ac | | .DBGLNO 0x00a5,0x00ac,0x00ae
046a ; --------------------------------------------------------------------------------------
046a ; Debug chain
046a ; --------------------------------------------------------------------------------------
046a 0000 0003 | | .DBGLEN 0x0000,0x0003
046c 00bd 00c4 | | .DBGLNO 0x00bd,0x00c4,0x00c6
046f ; --------------------------------------------------------------------------------------
046f ; Debug chain
046f ; --------------------------------------------------------------------------------------
046f 0000 0001 | | .DBGLEN 0x0000,0x0001
0471 00d3 | | .DBGLNO 0x00d3
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug chain
0472 ; --------------------------------------------------------------------------------------
0472 0000 0005 | | .DBGLEN 0x0000,0x0005
0474 00e3 00ea | | .DBGLNO 0x00e3,0x00ea,0x00ff,0x0108,0x0114
0479 ; --------------------------------------------------------------------------------------
0479 ; Debug chain
0479 ; --------------------------------------------------------------------------------------
0479 0000 0005 | | .DBGLEN 0x0000,0x0005
047b 011b 0127 | '| .DBGLNO 0x011b,0x0127,0x0138,0x0141,0x014d
0480 ; --------------------------------------------------------------------------------------
0480 ; Debug chain
0480 ; --------------------------------------------------------------------------------------
0480 0001 0005 | | .DBGLEN 0x0001,0x0005
0482 0153 0154 | S T| .DBGLNO 0x0153,0x0154,0x015d,0x016e,0x0177,0x0180
0488 ; --------------------------------------------------------------------------------------
0488 ; Debug chain
0488 ; --------------------------------------------------------------------------------------
0488 0001 0005 | | .DBGLEN 0x0001,0x0005
048a 0193 0194 | | .DBGLNO 0x0193,0x0194,0x019d,0x01aa,0x01b5,0x01c1
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug chain
0490 ; --------------------------------------------------------------------------------------
0490 0004 0003 | | .DBGLEN 0x0004,0x0003
0492 01cb 01cc | | .DBGLNO 0x01cb,0x01cc,0x01d2,0x01e2,0x01f2,0x01f7,0x020a
0499 ; --------------------------------------------------------------------------------------
0499 ; Debug chain
0499 ; --------------------------------------------------------------------------------------
0499 0004 0003 | | .DBGLEN 0x0004,0x0003
049b 0213 0214 | | .DBGLNO 0x0213,0x0214,0x021a,0x022a,0x023a,0x023f,0x0251
04a2 ; --------------------------------------------------------------------------------------
04a2 ; Debug chain
04a2 ; --------------------------------------------------------------------------------------
04a2 0002 0003 | | .DBGLEN 0x0002,0x0003
04a4 025b 025c | [ \| .DBGLNO 0x025b,0x025c,0x0262,0x0267,0x026e
04a9 0000 0000 | | .BLANK 0000[0x157]