|
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: 4096 (0x1000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a70f4
└─⟦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 0708 | | .CONST 0x0708 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 009b | | .CONST 0x009b ; Address of begin 0019 01df | | .CONST 0x01df ; Address of exception handler 001a 001b | | .CONST 0x001b ; Number of locals 001b INIT_0018: 001b 00e1 | | Load_Encached Boolean_Cache 001c 00e1 | | Load_Encached Boolean_Cache 001d 4800 |H | Short_Literal 0x0 001e 0093 038b | | push_full_address INIT_0388 0020 02a0 | | Declare_Subprogram Null_Subprogram 0021 038e | | Declare_Type Package,Defined 0022 e001 | | Load 0x0,0x1 0023 e002 | | Load 0x0,0x2 0024 e003 | | Load 0x0,0x3 0025 4803 |H | Short_Literal 0x3 0026 e404 | | Load 0x2,0x4 0027 020e | | Execute Module,Augment_Imports 0028 0387 | | Declare_Variable Package 0029 482e |H. | Short_Literal 0x2e 002a e004 | | Load 0x0,0x4 002b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 002c 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 002d 01cb | | Execute Vector,Append 002e e5ff | | Load 0x2,-0x1 002f e005 | | Load 0x0,0x5 0030 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0031 01cc | | Execute Vector,Catenate 0032 0007 | | Action Break_Optional 0033 e5ff | | Load 0x2,-0x1 0034 01db | | Execute Vector,Length 0035 680b |h | Jump_Zero 0x41 0036 00d8 | | Load_Top At_Offset_0 0037 482e |H. | Short_Literal 0x2e 0038 e004 | | Load 0x0,0x4 0039 1b0f | | Execute Package,Field_Read,Field_Number 0xf 003a 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 003b 01cb | | Execute Vector,Append 003c 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "<NONE>" 003e 01cc | | Execute Vector,Catenate 003f 01de | | Execute Vector,Not_Equal 0040 7802 |x | Jump 0x43 0041 4800 |H | Short_Literal 0x0 0042 0007 | | Action Break_Optional 0043 00d9 | | Load_Top At_Offset_1 0044 0092 03d1 | | Action Push_String_Extended,0x3d1 ; "_PROBLEMS" 0046 01cc | | Execute Vector,Catenate 0047 0007 | | Action Break_Optional 0048 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "Convert_Product_To_Delta2" 004a 0092 03d3 | | Action Push_String_Extended,0x3d3 ; "[Convert_Product_To_Delta2 (Log_File => \x22" 004c e405 | | Load 0x2,0x5 004d 01cc | | Execute Vector,Catenate 004e 0092 03d4 | | Action Push_String_Extended,0x3d4 ; "\x22, Options => \x22" 0050 01cc | | Execute Vector,Catenate 0051 e5fe | | Load 0x2,-0x2 0052 01cc | | Execute Vector,Catenate 0053 0092 03d5 | | Action Push_String_Extended,0x3d5 ; "\x22, Response => \x22" 0055 01cc | | Execute Vector,Catenate 0056 e5fd | | Load 0x2,-0x3 0057 01cc | | Execute Vector,Catenate 0058 0092 03d6 | | Action Push_String_Extended,0x3d6 ; "\x22);" 005a 01cc | | Execute Vector,Catenate 005b 0007 | | Action Break_Optional 005c e006 | | Load 0x0,0x6 005d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 005e 0092 03d7 | | Action Push_String_Extended,0x3d7 ; "TEMP.CONVERT_PRODUCT_ACTIVITY" 0060 00e1 | | Load_Encached Boolean_Cache 0061 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0062 e004 | | Load 0x0,0x4 0063 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0064 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0065 0092 03d8 | | Action Push_String_Extended,0x3d8 ; ".TEMP.CONV_FREEZE_FILE" 0067 01cc | | Execute Vector,Catenate 0068 0007 | | Action Break_Optional 0069 e004 | | Load 0x0,0x4 006a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 006b 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 006c 0092 03d9 | | Action Push_String_Extended,0x3d9 ; ".TEMP.CONV_CODE_FILE" 006e 01cc | | Execute Vector,Catenate 006f 0007 | | Action Break_Optional 0070 e004 | | Load 0x0,0x4 0071 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0072 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0073 0092 03da | | Action Push_String_Extended,0x3da ; ".TEMP.CONV_DEMOTE_FILE" 0075 01cc | | Execute Vector,Catenate 0076 0007 | | Action Break_Optional 0077 e004 | | Load 0x0,0x4 0078 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0079 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 007a 0092 03db | | Action Push_String_Extended,0x3db ; ".TEMP.CONV_INSTALL_FILE" 007c 01cc | | Execute Vector,Catenate 007d 0007 | | Action Break_Optional 007e 0092 03dc | | Action Push_String_Extended,0x3dc ; "!MACHINE.RELEASE.CURRENT.ACTIVITY" 0080 e004 | | Load 0x0,0x4 0081 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0082 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0083 0092 03dd | | Action Push_String_Extended,0x3dd ; ".ACTIVITY" 0085 01cc | | Execute Vector,Catenate 0086 0007 | | Action Break_Optional 0087 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call 0089 029f 022b | +| Declare_Subprogram INIT_0228,For_Call 008b 029f 024b | K| Declare_Subprogram INIT_0248,For_Call 008d 029f 025b | [| Declare_Subprogram INIT_0258,For_Call 008f 029f 0283 | | Declare_Subprogram INIT_0280,For_Call 0091 029f 0293 | | Declare_Subprogram INIT_0290,For_Call 0093 029f 02ab | | Declare_Subprogram INIT_02a8,For_Call 0095 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call 0097 029f 0303 | | Declare_Subprogram INIT_0300,For_Call 0099 e404 | | Load 0x2,0x4 009a 020f | | Execute Module,Activate 009b BODY_0018: 009b e5fd | | Load 0x2,-0x3 009c e409 | | Load 0x2,0x9 009d e007 | | Load 0x0,0x7 009e 180e | | Execute Package,Field_Execute,Field_Number 0xe 009f e406 | | Load 0x2,0x6 00a0 6809 |h | Jump_Zero 0xaa 00a1 e405 | | Load 0x2,0x5 00a2 e008 | | Load 0x0,0x8 00a3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00a4 e009 | | Load 0x0,0x9 00a5 180e | | Execute Package,Field_Execute,Field_Number 0xe 00a6 4800 |H | Short_Literal 0x0 00a7 e409 | | Load 0x2,0x9 00a8 e008 | | Load 0x0,0x8 00a9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00aa 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 00ac e004 | | Load 0x0,0x4 00ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ae 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 00af e00a | | Load 0x0,0xa 00b0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00b1 e402 | | Load 0x2,0x2 00b2 7027 |p' | Jump_Nonzero 0xda 00b3 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 00b5 4802 |H | Short_Literal 0x2 00b6 e40a | | Load 0x2,0xa 00b7 e40b | | Load 0x2,0xb 00b8 e006 | | Load 0x0,0x6 00b9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00ba 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 00bc e40b | | Load 0x2,0xb 00bd e006 | | Load 0x0,0x6 00be 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00bf 0092 03df | | Action Push_String_Extended,0x3df ; "Current job Activity is now TEMP.CONVERT_PRODUCT_ACTIVITY" 00c1 e007 | | Load 0x0,0x7 00c2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00c3 8413 | | Call 0x2,0x13 00c4 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "Enabling Operator privileges." 00c6 e007 | | Load 0x0,0x7 00c7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00c8 4801 |H | Short_Literal 0x1 00c9 e00b | | Load 0x0,0xb 00ca 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00cb e00b | | Load 0x0,0xb 00cc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00cd 6805 |h | Jump_Zero 0xd3 00ce 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "Operator Privileges Enabled." 00d0 e007 | | Load 0x0,0x7 00d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00d2 7807 |x | Jump 0xda 00d3 0092 03e2 | | Action Push_String_Extended,0x3e2 ; "Unable to enable Operator privileges. Be sure you are logged in as OPERATOR or other privileged username." 00d5 e007 | | Load 0x0,0x7 00d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00d7 e009 | | Load 0x0,0x9 00d8 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 00d9 0257 | W | Execute Discrete,Raise 00da e004 | | Load 0x0,0x4 00db 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00dc 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 00dd e007 | | Load 0x0,0x7 00de 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00df 6806 |h | Jump_Zero 0xe6 00e0 e004 | | Load 0x0,0x4 00e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00e2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 00e3 e007 | | Load 0x0,0x7 00e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00e5 700b |p | Jump_Nonzero 0xf1 00e6 e004 | | Load 0x0,0x4 00e7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00e8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 00e9 0092 03e3 | | Action Push_String_Extended,0x3e3 ; "/Code does not exist. Please re-install the product first." 00eb 01cc | | Execute Vector,Catenate 00ec e007 | | Load 0x0,0x7 00ed 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00ee e009 | | Load 0x0,0x9 00ef 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 00f0 0257 | W | Execute Discrete,Raise 00f1 e004 | | Load 0x0,0x4 00f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00f3 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 00f4 e007 | | Load 0x0,0x7 00f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f6 700b |p | Jump_Nonzero 0x102 00f7 e004 | | Load 0x0,0x4 00f8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00f9 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 00fa 0092 03e4 | | Action Push_String_Extended,0x3e4 ; "/Working does not exist. Please re-install the product first." 00fc 01cc | | Execute Vector,Catenate 00fd e007 | | Load 0x0,0x7 00fe 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00ff e009 | | Load 0x0,0x9 0100 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0101 0257 | W | Execute Discrete,Raise 0102 e004 | | Load 0x0,0x4 0103 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0104 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0105 e007 | | Load 0x0,0x7 0106 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0107 700b |p | Jump_Nonzero 0x113 0108 e004 | | Load 0x0,0x4 0109 1b0f | | Execute Package,Field_Read,Field_Number 0xf 010a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 010b 0092 03e4 | | Action Push_String_Extended,0x3e4 ; "/Working does not exist. Please re-install the product first." 010d 01cc | | Execute Vector,Catenate 010e e007 | | Load 0x0,0x7 010f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0110 e009 | | Load 0x0,0x9 0111 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0112 0257 | W | Execute Discrete,Raise 0113 e402 | | Load 0x2,0x2 0114 7005 |p | Jump_Nonzero 0x11a 0115 0092 03e5 | | Action Push_String_Extended,0x3e5 ; "Recording Xlib dependents." 0117 e007 | | Load 0x0,0x7 0118 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0119 8418 | | Call 0x2,0x18 011a 0092 03e6 | | Action Push_String_Extended,0x3e6 ; "Demote libraries so we can change the code-generation switches." 011c e007 | | Load 0x0,0x7 011d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 011e 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0120 4800 |H | Short_Literal 0x0 0121 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "<WORLDS>" 0123 4801 |H | Short_Literal 0x1 0124 e004 | | Load 0x0,0x4 0125 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0126 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0127 8415 | | Call 0x2,0x15 0128 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "'c(Ada)" 012a 01cc | | Execute Vector,Catenate 012b e00c | | Load 0x0,0xc 012c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 012d 8419 | | Call 0x2,0x19 012e 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "Import D2 X_R1000_Support into the new X_Library." 0130 e007 | | Load 0x0,0x7 0131 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0132 841a | | Call 0x2,0x1a 0133 e402 | | Load 0x2,0x2 0134 6812 |h | Jump_Zero 0x147 0135 e004 | | Load 0x0,0x4 0136 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0137 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0138 e007 | | Load 0x0,0x7 0139 1813 | | Execute Package,Field_Execute,Field_Number 0x13 013a 680c |h | Jump_Zero 0x147 013b 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 013d 0092 03ea | | Action Push_String_Extended,0x3ea ; "<DEFAULT>" 013f 00ea | | Load_Encached Null_String_Cache 0140 4801 |H | Short_Literal 0x1 0141 4801 |H | Short_Literal 0x1 0142 e004 | | Load 0x0,0x4 0143 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0144 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0145 e00d | | Load 0x0,0xd 0146 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0147 e402 | | Load 0x2,0x2 0148 707d |p} | Jump_Nonzero 0x1c6 0149 0092 03eb | | Action Push_String_Extended,0x3eb ; "Create release activity." 014b e007 | | Load 0x0,0x7 014c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 014d 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 014f 4801 |H | Short_Literal 0x1 0150 e006 | | Load 0x0,0x6 0151 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0152 e412 | | Load 0x2,0x12 0153 e006 | | Load 0x0,0x6 0154 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0155 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0157 4801 |H | Short_Literal 0x1 0158 e412 | | Load 0x2,0x12 0159 e004 | | Load 0x0,0x4 015a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 015b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 015c e004 | | Load 0x0,0x4 015d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 015e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 015f e004 | | Load 0x0,0x4 0160 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0161 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0162 e006 | | Load 0x0,0x6 0163 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0164 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0166 e40b | | Load 0x2,0xb 0167 4801 |H | Short_Literal 0x1 0168 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 016a 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 016c 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 016e e412 | | Load 0x2,0x12 016f e006 | | Load 0x0,0x6 0170 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0171 841b | | Call 0x2,0x1b 0172 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0174 e40b | | Load 0x2,0xb 0175 4801 |H | Short_Literal 0x1 0176 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 0178 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 017a 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 017c e412 | | Load 0x2,0x12 017d e006 | | Load 0x0,0x6 017e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 017f e403 | | Load 0x2,0x3 0180 6812 |h | Jump_Zero 0x193 0181 0092 03ed | | Action Push_String_Extended,0x3ed ; "Updating system wide activity file." 0183 e007 | | Load 0x0,0x7 0184 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0185 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0187 e411 | | Load 0x2,0x11 0188 4801 |H | Short_Literal 0x1 0189 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 018b 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 018d 0092 03ec | | Action Push_String_Extended,0x3ec ; "?" 018f e412 | | Load 0x2,0x12 0190 e006 | | Load 0x0,0x6 0191 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0192 7804 |x | Jump 0x197 0193 0092 03ee | | Action Push_String_Extended,0x3ee ; "System wide activity file is not being updated." 0195 e007 | | Load 0x0,0x7 0196 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0197 0092 03ef | | Action Push_String_Extended,0x3ef ; "Restore affected units to Installed." 0199 e007 | | Load 0x0,0x7 019a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 019b e410 | | Load 0x2,0x10 019c 8415 | | Call 0x2,0x15 019d e007 | | Load 0x0,0x7 019e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 019f 680b |h | Jump_Zero 0x1ab 01a0 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 01a2 4800 |H | Short_Literal 0x0 01a3 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "<WORLDS>" 01a5 4802 |H | Short_Literal 0x2 01a6 4802 |H | Short_Literal 0x2 01a7 e410 | | Load 0x2,0x10 01a8 8415 | | Call 0x2,0x15 01a9 e00c | | Load 0x0,0xc 01aa 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01ab 0092 03f0 | | Action Push_String_Extended,0x3f0 ; "Restore affected units to Coded." 01ad e007 | | Load 0x0,0x7 01ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01af e40e | | Load 0x2,0xe 01b0 8415 | | Call 0x2,0x15 01b1 e007 | | Load 0x0,0x7 01b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01b3 680b |h | Jump_Zero 0x1bf 01b4 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 01b6 4800 |H | Short_Literal 0x0 01b7 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "<WORLDS>" 01b9 4803 |H | Short_Literal 0x3 01ba 4803 |H | Short_Literal 0x3 01bb e40e | | Load 0x2,0xe 01bc 8415 | | Call 0x2,0x15 01bd e00c | | Load 0x0,0xc 01be 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01bf e40c | | Load 0x2,0xc 01c0 6805 |h | Jump_Zero 0x1c6 01c1 0092 03f1 | | Action Push_String_Extended,0x3f1 ; "Refreeze objects dependent upon updated objects." 01c3 e007 | | Load 0x0,0x7 01c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01c5 8417 | | Call 0x2,0x17 01c6 0092 03f2 | | Action Push_String_Extended,0x3f2 ; "[Convert_Product_To_Delta2 has completed.]" 01c8 e007 | | Load 0x0,0x7 01c9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01ca 0092 03f3 | | Action Push_String_Extended,0x3f3 ; "Refer to the Installation Guide to complete the conversion." 01cc e007 | | Load 0x0,0x7 01cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01ce 8414 | | Call 0x2,0x14 01cf e406 | | Load 0x2,0x6 01d0 6808 |h | Jump_Zero 0x1d9 01d1 0092 03f2 | | Action Push_String_Extended,0x3f2 ; "[Convert_Product_To_Delta2 has completed.]" 01d3 e007 | | Load 0x0,0x7 01d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01d5 0092 03f3 | | Action Push_String_Extended,0x3f3 ; "Refer to the Installation Guide to complete the conversion." 01d7 e007 | | Load 0x0,0x7 01d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d9 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 01db e40a | | Load 0x2,0xa 01dc e006 | | Load 0x0,0x6 01dd 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01de 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01df TRAP_0018: 01df e009 | | Load 0x0,0x9 01e0 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 01e1 010f | | Execute Exception,Equal 01e2 6806 |h | Jump_Zero 0x1e9 01e3 0092 03f4 | | Action Push_String_Extended,0x3f4 ; "[Convert_Product_To_Delta2 has failed with errors]" 01e5 e007 | | Load 0x0,0x7 01e6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01e7 8414 | | Call 0x2,0x14 01e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01e9 0092 03f5 | | Action Push_String_Extended,0x3f5 ; "[Convert_Product_To_Delta2 has failed with exception: " 01eb 4801 |H | Short_Literal 0x1 01ec 4801 |H | Short_Literal 0x1 01ed e00e | | Load 0x0,0xe 01ee 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01ef 01cc | | Execute Vector,Catenate 01f0 0092 03f6 | | Action Push_String_Extended,0x3f6 ; "]" 01f2 01cc | | Execute Vector,Catenate 01f3 e007 | | Load 0x0,0x7 01f4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01f5 8414 | | Call 0x2,0x14 01f6 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01f7 0000 | | .XXX[0x1] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01ff | | .CONST 0x01ff ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0003 | | .CONST 0x0003 ; Number of locals 01fb INIT_01f8: 01fb e404 | | Load 0x2,0x4 01fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01fd 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 01fe 00e1 | | Load_Encached Boolean_Cache 01ff BODY_01f8: 01ff 00e1 | | Load_Encached Boolean_Cache 0200 e404 | | Load 0x2,0x4 0201 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0202 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 0203 e5fe | | Load 0x2,-0x2 0204 e404 | | Load 0x2,0x4 0205 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0206 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0207 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0208 0059 | Y | Store_Top Discrete,At_Offset_1 0209 00d8 | | Load_Top At_Offset_0 020a 700d |p | Jump_Nonzero 0x218 020b 0092 03f7 | | Action Push_String_Extended,0x3f7 ; "Bad Options string: " 020d 4800 |H | Short_Literal 0x0 020e 00db | | Load_Top At_Offset_3 020f e404 | | Load 0x2,0x4 0210 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0211 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0212 01cc | | Execute Vector,Catenate 0213 e007 | | Load 0x0,0x7 0214 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0215 e009 | | Load 0x0,0x9 0216 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0217 0257 | W | Execute Discrete,Raise 0218 4800 |H | Short_Literal 0x0 0219 4801 |H | Short_Literal 0x1 021a 00db | | Load_Top At_Offset_3 021b e404 | | Load 0x2,0x4 021c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 021d 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 021e a402 | | Store_Unchecked 0x2,0x2 021f 4800 |H | Short_Literal 0x0 0220 4802 |H | Short_Literal 0x2 0221 00db | | Load_Top At_Offset_3 0222 e404 | | Load 0x2,0x4 0223 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0224 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0225 a403 | | Store_Unchecked 0x2,0x3 0226 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0227 0000 | | .XXX[0x1] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b e406 | | Load 0x2,0x6 022c 681a |h | Jump_Zero 0x247 022d e008 | | Load 0x0,0x8 022e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 022f 4822 |H" | Short_Literal 0x22 0230 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "Produce Conversion Problems Log \x22" 0232 e407 | | Load 0x2,0x7 0233 01cc | | Execute Vector,Catenate 0234 01cb | | Execute Vector,Append 0235 e007 | | Load 0x0,0x7 0236 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0237 4800 |H | Short_Literal 0x0 0238 4800 |H | Short_Literal 0x0 0239 4800 |H | Short_Literal 0x0 023a 4801 |H | Short_Literal 0x1 023b 4801 |H | Short_Literal 0x1 023c 4801 |H | Short_Literal 0x1 023d 4800 |H | Short_Literal 0x0 023e 4801 |H | Short_Literal 0x1 023f 4800 |H | Short_Literal 0x0 0240 4800 |H | Short_Literal 0x0 0241 4801 |H | Short_Literal 0x1 0242 4800 |H | Short_Literal 0x0 0243 e407 | | Load 0x2,0x7 0244 e405 | | Load 0x2,0x5 0245 e008 | | Load 0x0,0x8 0246 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0247 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 485d |H] | Short_Literal 0x5d 024c 0092 03f9 | | Action Push_String_Extended,0x3f9 ; "[_" 024e e7ff | | Load 0x3,-0x1 024f 01cc | | Execute Vector,Catenate 0250 01cb | | Execute Vector,Append 0251 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0252 0000 0000 | | .BLANK 0000[0x6] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 0269 | i | .CONST 0x0269 ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0002 | | .CONST 0x0002 ; Number of locals 025b INIT_0258: 025b e00f | | Load 0x0,0xf 025c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 025d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 025e 02c7 | | Declare_Variable Any 025f 4801 |H | Short_Literal 0x1 0260 e00f | | Load 0x0,0xf 0261 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0262 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0263 e40d | | Load 0x2,0xd 0264 8415 | | Call 0x2,0x15 0265 e00f | | Load 0x0,0xf 0266 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0267 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0268 a602 | | Store_Unchecked 0x3,0x2 0269 BODY_0258: 0269 00d8 | | Load_Top At_Offset_0 026a e00f | | Load 0x0,0xf 026b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 026c 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 026d 6801 |h | Jump_Zero 0x26f 026e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 026f 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0271 4800 |H | Short_Literal 0x0 0272 e40d | | Load 0x2,0xd 0273 8415 | | Call 0x2,0x15 0274 e00a | | Load 0x0,0xa 0275 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0276 4801 |H | Short_Literal 0x1 0277 a40c | | Store_Unchecked 0x2,0xc 0278 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0279 0000 0000 | | .BLANK 0000[0x7] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 0285 4800 |H | Short_Literal 0x0 0286 e40d | | Load 0x2,0xd 0287 8415 | | Call 0x2,0x15 0288 e00a | | Load 0x0,0xa 0289 181e | | Execute Package,Field_Execute,Field_Number 0x1e 028a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 028b 0000 0000 | | .BLANK 0000[0x5] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 02a2 | | .CONST 0x02a2 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 e40d | | Load 0x2,0xd 0294 e40e | | Load 0x2,0xe 0295 e410 | | Load 0x2,0x10 0296 e40f | | Load 0x2,0xf 0297 e004 | | Load 0x0,0x4 0298 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0299 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 029a 8415 | | Call 0x2,0x15 029b 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "'c(Ada)" 029d 01cc | | Execute Vector,Catenate 029e e010 | | Load 0x0,0x10 029f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02a0 8416 | | Call 0x2,0x16 02a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02a2 TRAP_0290: 02a2 0007 | | Action Break_Optional 02a3 0092 03fa | | Action Push_String_Extended,0x3fa ; "No dependents were found" 02a5 e007 | | Load 0x0,0x7 02a6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ad | | .CONST 0x02ad ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0002 | | .CONST 0x0002 ; Number of locals 02ab INIT_02a8: 02ab 029f 032b | +| Declare_Subprogram INIT_0328,For_Call 02ad BODY_02a8: 02ad e004 | | Load 0x0,0x4 02ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02af 180d | | Execute Package,Field_Execute,Field_Number 0xd 02b0 8602 | | Call 0x3,0x2 02b1 e004 | | Load 0x0,0x4 02b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02b3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 02b4 8602 | | Call 0x3,0x2 02b5 e004 | | Load 0x0,0x4 02b6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02b7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 02b8 8602 | | Call 0x3,0x2 02b9 e004 | | Load 0x0,0x4 02ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02bb 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 02bc 8602 | | Call 0x3,0x2 02bd e004 | | Load 0x0,0x4 02be 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02bf 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02c0 8602 | | Call 0x3,0x2 02c1 e004 | | Load 0x0,0x4 02c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02c3 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 02c4 8602 | | Call 0x3,0x2 02c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02c6 0000 0000 | | .XXX[0x2] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cd | | .CONST 0x02cd ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0002 | | .CONST 0x0002 ; Number of locals 02cb INIT_02c8: 02cb 029f 034b | K| Declare_Subprogram INIT_0348,For_Call 02cd BODY_02c8: 02cd 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 02cf 0092 03ea | | Action Push_String_Extended,0x3ea ; "<DEFAULT>" 02d1 00ea | | Load_Encached Null_String_Cache 02d2 4801 |H | Short_Literal 0x1 02d3 4800 |H | Short_Literal 0x0 02d4 4800 |H | Short_Literal 0x0 02d5 4801 |H | Short_Literal 0x1 02d6 0092 03fb | | Action Push_String_Extended,0x3fb ; "[" 02d8 e004 | | Load 0x0,0x4 02d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02da 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 02db 8602 | | Call 0x3,0x2 02dc 01cc | | Execute Vector,Catenate 02dd e004 | | Load 0x0,0x4 02de 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02df 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 02e0 8602 | | Call 0x3,0x2 02e1 01cc | | Execute Vector,Catenate 02e2 e004 | | Load 0x0,0x4 02e3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02e4 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 02e5 8602 | | Call 0x3,0x2 02e6 01cc | | Execute Vector,Catenate 02e7 e004 | | Load 0x0,0x4 02e8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02e9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02ea 8602 | | Call 0x3,0x2 02eb 01cc | | Execute Vector,Catenate 02ec e004 | | Load 0x0,0x4 02ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02ee 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 02ef 8602 | | Call 0x3,0x2 02f0 01cc | | Execute Vector,Catenate 02f1 0092 03f6 | | Action Push_String_Extended,0x3f6 ; "]" 02f3 01cc | | Execute Vector,Catenate 02f4 e004 | | Load 0x0,0x4 02f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02f6 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02f7 e00d | | Load 0x0,0xd 02f8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 02f9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02fa 0000 0000 | | .BLANK 0000[0x6] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0305 | | .CONST 0x0305 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0002 | | .CONST 0x0002 ; Number of locals 0303 INIT_0300: 0303 029f 035b | [| Declare_Subprogram INIT_0358,For_Call 0305 BODY_0300: 0305 00ea | | Load_Encached Null_String_Cache 0306 e004 | | Load 0x0,0x4 0307 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0308 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0309 8602 | | Call 0x3,0x2 030a 00ea | | Load_Encached Null_String_Cache 030b e004 | | Load 0x0,0x4 030c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 030d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 030e 8602 | | Call 0x3,0x2 030f 00ea | | Load_Encached Null_String_Cache 0310 e004 | | Load 0x0,0x4 0311 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0312 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0313 8602 | | Call 0x3,0x2 0314 00ea | | Load_Encached Null_String_Cache 0315 e004 | | Load 0x0,0x4 0316 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0317 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0318 8602 | | Call 0x3,0x2 0319 00ea | | Load_Encached Null_String_Cache 031a e004 | | Load 0x0,0x4 031b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 031c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 031d 8602 | | Call 0x3,0x2 031e 00ea | | Load_Encached Null_String_Cache 031f e004 | | Load 0x0,0x4 0320 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0321 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0322 8602 | | Call 0x3,0x2 0323 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0324 0000 0000 | | .BLANK 0000[0x4] 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 0330 | 0 | .CONST 0x0330 ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0003 | | .CONST 0x0003 ; Number of locals 032b INIT_0328: 032b 00da | | Load_Top At_Offset_2 032c e011 | | Load 0x0,0x11 032d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 032e 029f 037b | {| Declare_Subprogram INIT_0378,For_Call 0330 BODY_0328: 0330 e9ff | | Load 0x4,-0x1 0331 e007 | | Load 0x0,0x7 0332 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0333 7001 |p | Jump_Nonzero 0x335 0334 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0335 0092 03fc | | Action Push_String_Extended,0x3fc ; "Set switches for " 0337 e9ff | | Load 0x4,-0x1 0338 01cc | | Execute Vector,Catenate 0339 e007 | | Load 0x0,0x7 033a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 033b 0092 03fd | | Action Push_String_Extended,0x3fd ; "R1000_Cg.Delta1_Code_View_Compatibility := False" 033d 8803 | | Call 0x4,0x3 033e 0092 03fe | | Action Push_String_Extended,0x3fe ; "R1000_Cg.Retain_Delta1_Compatibility := False" 0340 8803 | | Call 0x4,0x3 0341 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0342 0000 0000 | | .BLANK 0000[0x6] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 034b | K | .CONST 0x034b ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0001 | | .CONST 0x0001 ; Number of locals 034b BODY_0348: 034b INIT_0348: 034b 00da | | Load_Top At_Offset_2 034c e007 | | Load 0x0,0x7 034d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 034e 6804 |h | Jump_Zero 0x353 034f 482c |H, | Short_Literal 0x2c 0350 00db | | Load_Top At_Offset_3 0351 01cb | | Execute Vector,Append 0352 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0353 00ea | | Load_Encached Null_String_Cache 0354 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0355 0000 0000 | | .XXX[0x3] 0357 0000 | | 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 035b | [ | .CONST 0x035b ; Address of begin 0359 0004 | | .CONST 0x0004 ; Address of exception handler 035a 0001 | | .CONST 0x0001 ; Number of locals 035b BODY_0358: 035b INIT_0358: 035b 00da | | Load_Top At_Offset_2 035c e007 | | Load 0x0,0x7 035d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 035e 7001 |p | Jump_Nonzero 0x360 035f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0360 0092 03ff | | Action Push_String_Extended,0x3ff ; "Compile view " 0362 00db | | Load_Top At_Offset_3 0363 01cc | | Execute Vector,Catenate 0364 e007 | | Load 0x0,0x7 0365 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0366 0092 0400 | | Action Push_String_Extended,0x400 ; "<PROFILE> ~!!!" 0368 4800 |H | Short_Literal 0x0 0369 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "<WORLDS>" 036b 4803 |H | Short_Literal 0x3 036c 4803 |H | Short_Literal 0x3 036d e9ff | | Load 0x4,-0x1 036e e007 | | Load 0x0,0x7 036f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0370 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0371 0000 0000 | | .BLANK 0000[0x7] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 037b | { | .CONST 0x037b ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0001 | | .CONST 0x0001 ; Number of locals 037b BODY_0378: 037b INIT_0378: 037b 0092 03de | | Action Push_String_Extended,0x3de ; "<PROFILE>" 037d e802 | | Load 0x4,0x2 037e ebff | | Load 0x5,-0x1 037f e011 | | Load 0x0,0x11 0380 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0381 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0382 0000 0000 | | .BLANK 0000[0x6] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 03a2 | | .CONST 0x03a2 ; Address of begin 0389 0004 | | .CONST 0x0004 ; Address of exception handler 038a 000e | | .CONST 0x000e ; Number of locals 038b INIT_0388: 038b 4800 |H | Short_Literal 0x0 038c 4802 |H | Short_Literal 0x2 038d 029f 03ab | | Declare_Subprogram INIT_03a8,For_Call 038f 03fe | | Declare_Type Discrete,Defined,Visible 0390 e001 | | Load 0x0,0x1 0391 e002 | | Load 0x0,0x2 0392 00da | | Load_Top At_Offset_2 0393 4800 |H | Short_Literal 0x0 0394 4801 |H | Short_Literal 0x1 0395 4802 |H | Short_Literal 0x2 0396 0092 0401 | | Action Push_String_Extended,0x401 ; "others => BOOLEAN_VALUED" 0398 0092 0402 | | Action Push_String_Extended,0x402 ; "SUBROUTINE => FALSE, others => TRUE" 039a 00ea | | Load_Encached Null_String_Cache 039b 4801 |H | Short_Literal 0x1 039c 4802 |H | Short_Literal 0x2 039d e003 | | Load 0x0,0x3 039e 0386 | | Declare_Variable Package,Visible 039f 00d8 | | Load_Top At_Offset_0 03a0 020f | | Execute Module,Activate 03a1 00bf | | Action Accept_Activation 03a2 BODY_0388: 03a2 00bc | | Action Signal_Activated 03a3 00bb | | Action Signal_Completion 03a4 0000 0000 | | .BLANK 0000[0x4] 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03ab | | .CONST 0x03ab ; Address of begin 03a9 0004 | | .CONST 0x0004 ; Address of exception handler 03aa 0001 | | .CONST 0x0001 ; Number of locals 03ab BODY_03a8: 03ab INIT_03a8: 03ab 4607 |F | Jump_Case 0x8 03ac 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 03ad 7806 |x | Jump 0x3b4 ; case 0x1 03ae 7809 |x | Jump 0x3b8 ; case 0x2 03af 780d |x | Jump 0x3bd ; case 0x3 03b0 7810 |x | Jump 0x3c1 ; case 0x4 03b1 7811 |x | Jump 0x3c3 ; case 0x5 03b2 7812 |x | Jump 0x3c5 ; case 0x6 03b3 7815 |x | Jump 0x3c9 ; case 0x7 03b4 00da | | Load_Top At_Offset_2 03b5 0091 03cd | | Action Push_String_Extended_Indexed,0x3cd ; "NIL" 03b7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03b8 00db | | Load_Top At_Offset_3 03b9 00db | | Load_Top At_Offset_3 03ba 00e0 | | Load_Encached Standard_Cache 03bb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03bd 00da | | Load_Top At_Offset_2 03be 00e0 | | Load_Encached Standard_Cache 03bf 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03c1 00db | | Load_Top At_Offset_3 03c2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c3 00db | | Load_Top At_Offset_3 03c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c5 e20d | | Load 0x1,0xd 03c6 00dc | | Load_Top At_Offset_4 03c7 0267 | g | Execute Discrete,Predecessor 03c8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c9 e20d | | Load 0x1,0xd 03ca 00dc | | Load_Top At_Offset_4 03cb 0268 | h | Execute Discrete,Successor 03cc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03cd ; -------------------------------------------------------------------------------------- 03cd ; STRING TABLE 03cd ; -------------------------------------------------------------------------------------- 03cd 006e | n | .STRTAB 0x006e->0x0404 ; "NIL" 03ce 006f | o | .STRTAB 0x006f->0x0405 ; "SUBROUTINE" 03cf 0077 | w | .STRTAB 0x0077->0x040a ; "UPDATE_ACTIVITY" 03d0 0084 | | .STRTAB 0x0084->0x0412 ; "<NONE>" 03d1 0088 | | .STRTAB 0x0088->0x0415 ; "_PROBLEMS" 03d2 008f | | .STRTAB 0x008f->0x0419 ; "Convert_Product_To_Delta2" 03d3 00a6 | | .STRTAB 0x00a6->0x0426 ; "[Convert_Product_To_Delta2 (Log_File => \x22" 03d4 00cd | | .STRTAB 0x00cd->0x043a ; "\x22, Options => \x22" 03d5 00da | | .STRTAB 0x00da->0x0442 ; "\x22, Response => \x22" 03d6 00e8 | | .STRTAB 0x00e8->0x044a ; "\x22);" 03d7 00e9 | | .STRTAB 0x00e9->0x044b ; "TEMP.CONVERT_PRODUCT_ACTIVITY" 03d8 0104 | | .STRTAB 0x0104->0x045a ; ".TEMP.CONV_FREEZE_FILE" 03d9 0118 | | .STRTAB 0x0118->0x0465 ; ".TEMP.CONV_CODE_FILE" 03da 012a | * | .STRTAB 0x012a->0x046f ; ".TEMP.CONV_DEMOTE_FILE" 03db 013e | > | .STRTAB 0x013e->0x047a ; ".TEMP.CONV_INSTALL_FILE" 03dc 0153 | S | .STRTAB 0x0153->0x0485 ; "!MACHINE.RELEASE.CURRENT.ACTIVITY" 03dd 0172 | r | .STRTAB 0x0172->0x0496 ; ".ACTIVITY" 03de 0179 | y | .STRTAB 0x0179->0x049a ; "<PROFILE>" 03df 0180 | | .STRTAB 0x0180->0x049f ; "Current job Activity is now TEMP.CONVERT_PRODUCT_ACTIVITY" 03e0 01b7 | | .STRTAB 0x01b7->0x04bb ; "Enabling Operator privileges." 03e1 01d2 | | .STRTAB 0x01d2->0x04ca ; "Operator Privileges Enabled." 03e2 01ec | | .STRTAB 0x01ec->0x04d8 ; "Unable to enable Operator privileges. Be sure you are logged in as OPERATOR or other privileged username." 03e3 0254 | T | .STRTAB 0x0254->0x050d ; "/Code does not exist. Please re-install the product first." 03e4 028d | | .STRTAB 0x028d->0x052a ; "/Working does not exist. Please re-install the product first." 03e5 02c9 | | .STRTAB 0x02c9->0x0549 ; "Recording Xlib dependents." 03e6 02e1 | | .STRTAB 0x02e1->0x0556 ; "Demote libraries so we can change the code-generation switches." 03e7 031e | | .STRTAB 0x031e->0x0576 ; "<WORLDS>" 03e8 0324 | $ | .STRTAB 0x0324->0x057a ; "'c(Ada)" 03e9 0329 | ) | .STRTAB 0x0329->0x057d ; "Import D2 X_R1000_Support into the new X_Library." 03ea 0358 | X | .STRTAB 0x0358->0x0596 ; "<DEFAULT>" 03eb 035f | _ | .STRTAB 0x035f->0x059a ; "Create release activity." 03ec 0375 | u | .STRTAB 0x0375->0x05a6 ; "?" 03ed 0374 | t | .STRTAB 0x0374->0x05a7 ; "Updating system wide activity file." 03ee 0395 | | .STRTAB 0x0395->0x05b8 ; "System wide activity file is not being updated." 03ef 03c2 | | .STRTAB 0x03c2->0x05d0 ; "Restore affected units to Installed." 03f0 03e4 | | .STRTAB 0x03e4->0x05e2 ; "Restore affected units to Coded." 03f1 0402 | | .STRTAB 0x0402->0x05f2 ; "Refreeze objects dependent upon updated objects." 03f2 0430 | 0 | .STRTAB 0x0430->0x060a ; "[Convert_Product_To_Delta2 has completed.]" 03f3 0458 | X | .STRTAB 0x0458->0x061f ; "Refer to the Installation Guide to complete the conversion." 03f4 0491 | | .STRTAB 0x0491->0x063c ; "[Convert_Product_To_Delta2 has failed with errors]" 03f5 04c1 | | .STRTAB 0x04c1->0x0655 ; "[Convert_Product_To_Delta2 has failed with exception: " 03f6 04f5 | | .STRTAB 0x04f5->0x0670 ; "]" 03f7 04f4 | | .STRTAB 0x04f4->0x0671 ; "Bad Options string: " 03f8 0506 | | .STRTAB 0x0506->0x067b ; "Produce Conversion Problems Log \x22" 03f9 0525 | % | .STRTAB 0x0525->0x068b ; "[_" 03fa 0525 | % | .STRTAB 0x0525->0x068c ; "No dependents were found" 03fb 053b | ; | .STRTAB 0x053b->0x0698 ; "[" 03fc 053a | : | .STRTAB 0x053a->0x0699 ; "Set switches for " 03fd 0549 | I | .STRTAB 0x0549->0x06a1 ; "R1000_Cg.Delta1_Code_View_Compatibility := False" 03fe 0577 | w | .STRTAB 0x0577->0x06b9 ; "R1000_Cg.Retain_Delta1_Compatibility := False" 03ff 05a5 | | .STRTAB 0x05a5->0x06d1 ; "Compile view " 0400 05b0 | | .STRTAB 0x05b0->0x06d8 ; "<PROFILE> ~!!!" 0401 05bc | | .STRTAB 0x05bc->0x06df ; "others => BOOLEAN_VALUED" 0402 05d2 | | .STRTAB 0x05d2->0x06eb ; "SUBROUTINE => FALSE, others => TRUE" 0403 05fc | | .STREND 0x05fc->0x0701 0404 4e49 4c53 |NILS| .STRTAB_STRINGS 0701 0000 0000 | | .BLANK 0000[0x7] 0708 ; -------------------------------------------------------------------------------------- 0708 ; Debug Table 0708 ; -------------------------------------------------------------------------------------- 0708 0004 0005 | | .DEBUG4 0x0004,0x0005,0x2053,0x0000,0x0001,0x0000 070e bdc1 e5c9 | | .XXX[0xf2] 0710 a59d a1d0 | | 0712 81b9 bdd1 | | 0714 a58d 94a1 | | 0716 cca4 8185 | | 0718 c1c1 9585 | | 071a c881 a5b8 | | 071c 8185 b1b0 | | 071e 818d bdc1 | | 0720 a595 cc81 | | 0722 85b9 9081 | | 0724 d1a1 85d0 | | 0726 28b4 b481 |( | 0728 89bd d1a0 | | 072a 81d1 a185 | | 072c d081 8dbd | | 072e c1e5 c9a5 | | 0730 9da1 d081 | | 0732 b9bd d1a5 | | 0734 8d94 a1cc | | 0736 a481 85b9 | | 0738 9081 d1a1 | | 073a a5cc 81c1 | | 073c 95c9 b5a5 | | 073e cdcd a5bd | | 0740 b881 b9bd | | 0742 d1a5 8d94 | | 0744 8185 c1c1 | | 0746 9585 c881 | | 0748 a5b8 28b4 | ( | 074a b481 cdd5 | | 074c c1c1 bdc9 | | 074e d1a5 b99c | | 0750 8191 bd8d | | 0752 d5b5 95b9 | | 0754 d185 d1a5 | | 0756 bdb8 b081 | | 0758 85b9 9081 | | 075a d1a1 85d0 | | 075c 81d1 a194 | | 075e 81b9 85b5 | | 0760 9481 bd98 | | 0762 8149 85d1 | I | 0764 a5bd b985 | | 0766 b081 b9bd | | 0768 d081 8994 | | 076a 28b4 b481 |( | 076c d5cd 9590 | | 076e 81a5 b881 | | 0770 8591 d995 | | 0772 c9d1 a5cd | | 0774 a5b9 9c81 | | 0776 bdc8 81c1 | | 0778 d589 b1a5 | | 077a 8da5 d1e4 | | 077c 81c1 95c9 | | 077e d185 a5b9 | | 0780 a5b9 9c81 | | 0782 d1bc 8191 | | 0784 a5cd d1c9 | | 0786 a589 d5d1 | | 0788 a5bd b881 | | 078a bd98 81d1 | | 078c a194 81cd | | 078e bd99 d1dd | | 0790 85c9 9428 | (| 0792 b4b4 81dd | | 0794 a5d1 a1bd | | 0796 d5d0 81cd | | 0798 c195 8da5 | | 079a 99a5 8cb0 | | 079c 81dd c9a5 | | 079e d1d1 95b8 | | 07a0 81c1 c9a5 | | 07a2 bdc8 81c1 | | 07a4 95c9 b5a5 | | 07a6 cdcd a5bd | | 07a8 b8b8 28b4 | ( | 07aa b428 b4b4 | ( | 07ac 8149 85d1 | I | 07ae a5bd b985 | | 07b0 b081 91a5 | | 07b2 cd8d b185 | | 07b4 a5b5 cc81 | | 07b6 85b1 b081 | | 07b8 dd85 c9c9 | | 07ba 85b9 d1a5 | | 07bc 95cc 81dd | | 07be a5d1 a081 | | 07c0 c995 9d85 | | 07c2 c990 81d1 | | 07c4 bc81 d1a1 | | 07c6 a5cc 81cd | | 07c8 bd99 d1dd | | 07ca 85c9 94b0 | | 07cc 28b4 b481 |( | 07ce a5b9 8db1 | | 07d0 d591 a5b9 | | 07d2 9c81 85b1 | | 07d4 b081 a5b5 | | 07d6 c1b1 a595 | | 07d8 9081 dd85 | | 07da c9c9 85b9 | | 07dc d1a5 95cc | | 07de 81bd 9881 | | 07e0 b595 c98d | | 07e2 a185 b9d1 | | 07e4 8589 a5b1 | | 07e6 a5d1 e481 | | 07e8 85b9 9081 | | 07ea 99a5 d1b9 | | 07ec 95cd ccb0 | | 07ee 81a5 b881 | | 07f0 b9bc 28b4 | ( | 07f2 b481 95d9 | | 07f4 95b9 d081 | | 07f6 cda1 85b1 | | 07f8 b081 4985 | I | 07fa d1a5 bdb9 | | 07fc 85b0 8189 | | 07fe 9481 b1a5 | |