|
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_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 07d0 | | .CONST 0x07d0 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0031 | 1 | .CONST 0x0031 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0016 | | .CONST 0x0016 ; Number of locals 000b INIT_0008: 000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 000d 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 000f 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 0011 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0013 4800 |H | Short_Literal 0x0 0014 4802 |H | Short_Literal 0x2 0015 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call 0017 03fe | | Declare_Type Discrete,Defined,Visible 0018 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated 001a 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated 001c 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated 001e 00bf | | Action Accept_Activation 001f 0092 0608 | | Action Push_String_Extended,0x608 ; "Rci_Cmvc." 0021 0092 0609 | | Action Push_String_Extended,0x609 ; " * RCI_CMVC * " 0023 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0024 00c7 | | Action Elaborate_Subprogram 0025 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0026 00c7 | | Action Elaborate_Subprogram 0027 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0028 00c7 | | Action Elaborate_Subprogram 0029 1d12 | | Execute_Immediate Reference_Lex_1,0x12 002a 00c7 | | Action Elaborate_Subprogram 002b 1d13 | | Execute_Immediate Reference_Lex_1,0x13 002c 00c7 | | Action Elaborate_Subprogram 002d 1d0e | | Execute_Immediate Reference_Lex_1,0xe 002e 00c7 | | Action Elaborate_Subprogram 002f 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0030 00c7 | | Action Elaborate_Subprogram 0031 BODY_0008: 0031 00bc | | Action Signal_Activated 0032 00bb | | Action Signal_Completion 0033 0000 0000 | | .BLANK 0000[0x5] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 004a | J | .CONST 0x004a ; Address of begin 0039 00c9 | | .CONST 0x00c9 ; Address of exception handler 003a 0004 | | .CONST 0x0004 ; Number of locals 003b INIT_0038: 003b 0092 060a | | Action Push_String_Extended,0x60a ; "Release" 003d e001 | | Load 0x0,0x1 003e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003f 02c7 | | Declare_Variable Any 0040 e5f3 | | Load 0x2,-0xd 0041 e001 | | Load 0x0,0x1 0042 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0043 a403 | | Store_Unchecked 0x2,0x3 0044 e001 | | Load 0x0,0x1 0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0046 02c7 | | Declare_Variable Any 0047 e001 | | Load 0x0,0x1 0048 180e | | Execute Package,Field_Execute,Field_Number 0xe 0049 a404 | | Store_Unchecked 0x2,0x4 004a BODY_0038: 004a 00d9 | | Load_Top At_Offset_1 004b e001 | | Load 0x0,0x1 004c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 004d 00d9 | | Load_Top At_Offset_1 004e e215 | | Load 0x1,0x15 004f 0092 060b | | Action Push_String_Extended,0x60b ; "From_Working_View" 0051 e5ff | | Load 0x2,-0x1 0052 e002 | | Load 0x0,0x2 0053 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0054 01cc | | Execute Vector,Catenate 0055 0092 060c | | Action Push_String_Extended,0x60c ; "Release_Name" 0057 01cc | | Execute Vector,Catenate 0058 e5fe | | Load 0x2,-0x2 0059 e002 | | Load 0x0,0x2 005a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 005b 01cc | | Execute Vector,Catenate 005c 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 005e 01cc | | Execute Vector,Catenate 005f e5fc | | Load 0x2,-0x4 0060 e002 | | Load 0x0,0x2 0061 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0062 01cc | | Execute Vector,Catenate 0063 0092 060e | | Action Push_String_Extended,0x60e ; "Level =>" 0065 01cc | | Execute Vector,Catenate 0066 e5fb | | Load 0x2,-0x5 0067 00e0 | | Load_Encached Standard_Cache 0068 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0069 01cc | | Execute Vector,Catenate 006a 0092 060f | | Action Push_String_Extended,0x60f ; ", Views_To_Import" 006c 01cc | | Execute Vector,Catenate 006d e5fa | | Load 0x2,-0x6 006e e002 | | Load 0x0,0x2 006f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0070 01cc | | Execute Vector,Catenate 0071 0092 0610 | | Action Push_String_Extended,0x610 ; "Create_Configuration_Only => " 0073 01cc | | Execute Vector,Catenate 0074 e5f9 | | Load 0x2,-0x7 0075 00e1 | | Load_Encached Boolean_Cache 0076 011c | | Execute Any,Convert_Unchecked 0077 1c01 | | Execute_Immediate Run_Utility,0x1 0078 01cc | | Execute Vector,Catenate 0079 0092 0611 | | Action Push_String_Extended,0x611 ; ", Compile_The_View => " 007b 01cc | | Execute Vector,Catenate 007c e5f8 | | Load 0x2,-0x8 007d 00e1 | | Load_Encached Boolean_Cache 007e 011c | | Execute Any,Convert_Unchecked 007f 1c01 | | Execute_Immediate Run_Utility,0x1 0080 01cc | | Execute Vector,Catenate 0081 0092 0612 | | Action Push_String_Extended,0x612 ; ", Goal => " 0083 01cc | | Execute Vector,Catenate 0084 e5f7 | | Load 0x2,-0x9 0085 e003 | | Load 0x0,0x3 0086 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0087 011c | | Execute Any,Convert_Unchecked 0088 1c01 | | Execute_Immediate Run_Utility,0x1 0089 01cc | | Execute Vector,Catenate 008a 0092 0613 | | Action Push_String_Extended,0x613 ; ", Comments" 008c 01cc | | Execute Vector,Catenate 008d e5f6 | | Load 0x2,-0xa 008e e002 | | Load 0x0,0x2 008f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0090 01cc | | Execute Vector,Catenate 0091 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 0093 01cc | | Execute Vector,Catenate 0094 e5f5 | | Load 0x2,-0xb 0095 e002 | | Load 0x0,0x2 0096 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0097 01cc | | Execute Vector,Catenate 0098 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 009a 01cc | | Execute Vector,Catenate 009b e5f4 | | Load 0x2,-0xc 009c 00e0 | | Load_Encached Standard_Cache 009d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 009e 01cc | | Execute Vector,Catenate 009f 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 00a1 01cc | | Execute Vector,Catenate 00a2 e5f3 | | Load 0x2,-0xd 00a3 e002 | | Load 0x0,0x2 00a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00a5 01cc | | Execute Vector,Catenate 00a6 e402 | | Load 0x2,0x2 00a7 e002 | | Load 0x0,0x2 00a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a9 e216 | | Load 0x1,0x16 00aa 00ea | | Load_Encached Null_String_Cache 00ab e5fd | | Load 0x2,-0x3 00ac e5fc | | Load 0x2,-0x4 00ad 00ea | | Load_Encached Null_String_Cache 00ae e004 | | Load 0x0,0x4 00af 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00b0 e5f3 | | Load 0x2,-0xd 00b1 e5f4 | | Load 0x2,-0xc 00b2 e5f5 | | Load 0x2,-0xb 00b3 e5f6 | | Load 0x2,-0xa 00b4 e5f7 | | Load 0x2,-0x9 00b5 e5f8 | | Load 0x2,-0x8 00b6 e5f9 | | Load 0x2,-0x7 00b7 e5fa | | Load 0x2,-0x6 00b8 e5fb | | Load 0x2,-0x5 00b9 e5fe | | Load 0x2,-0x2 00ba e5ff | | Load 0x2,-0x1 00bb e005 | | Load 0x0,0x5 00bc 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00bd e004 | | Load 0x0,0x4 00be 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00bf 00d9 | | Load_Top At_Offset_1 00c0 e215 | | Load 0x1,0x15 00c1 e402 | | Load 0x2,0x2 00c2 4800 |H | Short_Literal 0x0 00c3 e002 | | Load 0x0,0x2 00c4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00c5 00d8 | | Load_Top At_Offset_0 00c6 e001 | | Load 0x0,0x1 00c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00c8 450e |E | Exit_Suprogram New_Top_Offset 0xe 00c9 TRAP_0038: 00c9 e006 | | Load 0x0,0x6 00ca 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00cb 010f | | Execute Exception,Equal 00cc 680a |h | Jump_Zero 0xd7 00cd 00da | | Load_Top At_Offset_2 00ce e215 | | Load 0x1,0x15 00cf e402 | | Load 0x2,0x2 00d0 4800 |H | Short_Literal 0x0 00d1 e002 | | Load 0x0,0x2 00d2 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00d3 00d9 | | Load_Top At_Offset_1 00d4 e001 | | Load 0x0,0x1 00d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00d6 450e |E | Exit_Suprogram New_Top_Offset 0xe 00d7 e006 | | Load 0x0,0x6 00d8 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00d9 010f | | Execute Exception,Equal 00da 680b |h | Jump_Zero 0xe6 00db 00da | | Load_Top At_Offset_2 00dc e215 | | Load 0x1,0x15 00dd e402 | | Load 0x2,0x2 00de 4800 |H | Short_Literal 0x0 00df e002 | | Load 0x0,0x2 00e0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00e1 00d9 | | Load_Top At_Offset_1 00e2 e001 | | Load 0x0,0x1 00e3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00e4 00d8 | | Load_Top At_Offset_0 00e5 0101 | | Execute Exception,Reraise 00e6 e001 | | Load 0x0,0x1 00e7 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 00e8 010f | | Execute Exception,Equal 00e9 6802 |h | Jump_Zero 0xec 00ea 00d8 | | Load_Top At_Offset_0 00eb 0101 | | Execute Exception,Reraise 00ec 00da | | Load_Top At_Offset_2 00ed e215 | | Load 0x1,0x15 00ee e402 | | Load 0x2,0x2 00ef 4800 |H | Short_Literal 0x0 00f0 e002 | | Load 0x0,0x2 00f1 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00f2 00d9 | | Load_Top At_Offset_1 00f3 e001 | | Load 0x0,0x1 00f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00f5 450e |E | Exit_Suprogram New_Top_Offset 0xe 00f6 0000 0000 | | .XXX[0x2] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 010a | | .CONST 0x010a ; Address of begin 00f9 01d5 | | .CONST 0x01d5 ; Address of exception handler 00fa 0004 | | .CONST 0x0004 ; Number of locals 00fb INIT_00f8: 00fb 0092 0617 | | Action Push_String_Extended,0x617 ; "Copy" 00fd e001 | | Load 0x0,0x1 00fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ff 02c7 | | Declare_Variable Any 0100 e5eb | | Load 0x2,-0x15 0101 e001 | | Load 0x0,0x1 0102 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0103 a403 | | Store_Unchecked 0x2,0x3 0104 e001 | | Load 0x0,0x1 0105 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0106 02c7 | | Declare_Variable Any 0107 e001 | | Load 0x0,0x1 0108 180e | | Execute Package,Field_Execute,Field_Number 0xe 0109 a404 | | Store_Unchecked 0x2,0x4 010a BODY_00f8: 010a 00d9 | | Load_Top At_Offset_1 010b e001 | | Load 0x0,0x1 010c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 010d 00d9 | | Load_Top At_Offset_1 010e e215 | | Load 0x1,0x15 010f 0092 0618 | | Action Push_String_Extended,0x618 ; "From_View" 0111 e5ff | | Load 0x2,-0x1 0112 e002 | | Load 0x0,0x2 0113 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0114 01cc | | Execute Vector,Catenate 0115 0092 0619 | | Action Push_String_Extended,0x619 ; "New_Working_View" 0117 01cc | | Execute Vector,Catenate 0118 e5fe | | Load 0x2,-0x2 0119 e002 | | Load 0x0,0x2 011a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 011b 01cc | | Execute Vector,Catenate 011c 0092 061a | | Action Push_String_Extended,0x61a ; "Remote_Machine" 011e 01cc | | Execute Vector,Catenate 011f e5fd | | Load 0x2,-0x3 0120 e002 | | Load 0x0,0x2 0121 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0122 01cc | | Execute Vector,Catenate 0123 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 0125 01cc | | Execute Vector,Catenate 0126 e5fc | | Load 0x2,-0x4 0127 e002 | | Load 0x0,0x2 0128 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0129 01cc | | Execute Vector,Catenate 012a 0092 061b | | Action Push_String_Extended,0x61b ; "View_To_Modify" 012c 01cc | | Execute Vector,Catenate 012d e5fb | | Load 0x2,-0x5 012e e002 | | Load 0x0,0x2 012f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0130 01cc | | Execute Vector,Catenate 0131 0092 061c | | Action Push_String_Extended,0x61c ; "View_To_Import" 0133 01cc | | Execute Vector,Catenate 0134 e5fa | | Load 0x2,-0x6 0135 e002 | | Load 0x0,0x2 0136 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0137 01cc | | Execute Vector,Catenate 0138 0092 061d | | Action Push_String_Extended,0x61d ; "Only_Change_Imports => " 013a 01cc | | Execute Vector,Catenate 013b e5f9 | | Load 0x2,-0x7 013c 00e1 | | Load_Encached Boolean_Cache 013d 011c | | Execute Any,Convert_Unchecked 013e 1c01 | | Execute_Immediate Run_Utility,0x1 013f 01cc | | Execute Vector,Catenate 0140 0092 061e | | Action Push_String_Extended,0x61e ; ", Join_Views => " 0142 01cc | | Execute Vector,Catenate 0143 e5f8 | | Load 0x2,-0x8 0144 00e1 | | Load_Encached Boolean_Cache 0145 011c | | Execute Any,Convert_Unchecked 0146 1c01 | | Execute_Immediate Run_Utility,0x1 0147 01cc | | Execute Vector,Catenate 0148 0092 061f | | Action Push_String_Extended,0x61f ; ", Reservation_Token_Name" 014a 01cc | | Execute Vector,Catenate 014b e5f7 | | Load 0x2,-0x9 014c e002 | | Load 0x0,0x2 014d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 014e 01cc | | Execute Vector,Catenate 014f 0092 0620 | | Action Push_String_Extended,0x620 ; "Construct_Subpath_Name => " 0151 01cc | | Execute Vector,Catenate 0152 e5f6 | | Load 0x2,-0xa 0153 00e1 | | Load_Encached Boolean_Cache 0154 011c | | Execute Any,Convert_Unchecked 0155 1c01 | | Execute_Immediate Run_Utility,0x1 0156 01cc | | Execute Vector,Catenate 0157 0092 0621 | !| Action Push_String_Extended,0x621 ; ", Create_Spec_View => " 0159 01cc | | Execute Vector,Catenate 015a e5f5 | | Load 0x2,-0xb 015b 00e1 | | Load_Encached Boolean_Cache 015c 011c | | Execute Any,Convert_Unchecked 015d 1c01 | | Execute_Immediate Run_Utility,0x1 015e 01cc | | Execute Vector,Catenate 015f 0092 0622 | "| Action Push_String_Extended,0x622 ; ", Create_Load_View => " 0161 01cc | | Execute Vector,Catenate 0162 e5f4 | | Load 0x2,-0xc 0163 00e1 | | Load_Encached Boolean_Cache 0164 011c | | Execute Any,Convert_Unchecked 0165 1c01 | | Execute_Immediate Run_Utility,0x1 0166 01cc | | Execute Vector,Catenate 0167 0092 0623 | #| Action Push_String_Extended,0x623 ; ", Create_Combined_View => " 0169 01cc | | Execute Vector,Catenate 016a e5f3 | | Load 0x2,-0xd 016b 00e1 | | Load_Encached Boolean_Cache 016c 011c | | Execute Any,Convert_Unchecked 016d 1c01 | | Execute_Immediate Run_Utility,0x1 016e 01cc | | Execute Vector,Catenate 016f 0092 0624 | $| Action Push_String_Extended,0x624 ; ", Level_For_Spec_View =>" 0171 01cc | | Execute Vector,Catenate 0172 e5f2 | | Load 0x2,-0xe 0173 00e0 | | Load_Encached Standard_Cache 0174 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0175 01cc | | Execute Vector,Catenate 0176 0092 0625 | %| Action Push_String_Extended,0x625 ; ", Model" 0178 01cc | | Execute Vector,Catenate 0179 e5f1 | | Load 0x2,-0xf 017a e002 | | Load 0x0,0x2 017b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 017c 01cc | | Execute Vector,Catenate 017d 0092 0626 | &| Action Push_String_Extended,0x626 ; "Remake_Demoted_Units => " 017f 01cc | | Execute Vector,Catenate 0180 e5f0 | | Load 0x2,-0x10 0181 00e1 | | Load_Encached Boolean_Cache 0182 011c | | Execute Any,Convert_Unchecked 0183 1c01 | | Execute_Immediate Run_Utility,0x1 0184 01cc | | Execute Vector,Catenate 0185 0092 0612 | | Action Push_String_Extended,0x612 ; ", Goal => " 0187 01cc | | Execute Vector,Catenate 0188 e5ef | | Load 0x2,-0x11 0189 e003 | | Load 0x0,0x3 018a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 018b 011c | | Execute Any,Convert_Unchecked 018c 1c01 | | Execute_Immediate Run_Utility,0x1 018d 01cc | | Execute Vector,Catenate 018e 0092 0613 | | Action Push_String_Extended,0x613 ; ", Comments" 0190 01cc | | Execute Vector,Catenate 0191 e5ee | | Load 0x2,-0x12 0192 e002 | | Load 0x0,0x2 0193 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0194 01cc | | Execute Vector,Catenate 0195 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 0197 01cc | | Execute Vector,Catenate 0198 e5ed | | Load 0x2,-0x13 0199 e002 | | Load 0x0,0x2 019a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 019b 01cc | | Execute Vector,Catenate 019c 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 019e 01cc | | Execute Vector,Catenate 019f e5ec | | Load 0x2,-0x14 01a0 00e0 | | Load_Encached Standard_Cache 01a1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01a2 01cc | | Execute Vector,Catenate 01a3 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 01a5 01cc | | Execute Vector,Catenate 01a6 e5eb | | Load 0x2,-0x15 01a7 e002 | | Load 0x0,0x2 01a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01a9 01cc | | Execute Vector,Catenate 01aa e402 | | Load 0x2,0x2 01ab e002 | | Load 0x0,0x2 01ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01ad e216 | | Load 0x1,0x16 01ae 00ea | | Load_Encached Null_String_Cache 01af e5fd | | Load 0x2,-0x3 01b0 e5fc | | Load 0x2,-0x4 01b1 00ea | | Load_Encached Null_String_Cache 01b2 e004 | | Load 0x0,0x4 01b3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01b4 e5eb | | Load 0x2,-0x15 01b5 e5ec | | Load 0x2,-0x14 01b6 e5ed | | Load 0x2,-0x13 01b7 e5ee | | Load 0x2,-0x12 01b8 e5ef | | Load 0x2,-0x11 01b9 e5f0 | | Load 0x2,-0x10 01ba e5f1 | | Load 0x2,-0xf 01bb e5f2 | | Load 0x2,-0xe 01bc e5f3 | | Load 0x2,-0xd 01bd e5f4 | | Load 0x2,-0xc 01be e5f5 | | Load 0x2,-0xb 01bf e5f6 | | Load 0x2,-0xa 01c0 e5f7 | | Load 0x2,-0x9 01c1 e5f8 | | Load 0x2,-0x8 01c2 e5f9 | | Load 0x2,-0x7 01c3 e5fa | | Load 0x2,-0x6 01c4 e5fb | | Load 0x2,-0x5 01c5 e5fe | | Load 0x2,-0x2 01c6 e5ff | | Load 0x2,-0x1 01c7 e005 | | Load 0x0,0x5 01c8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01c9 e004 | | Load 0x0,0x4 01ca 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01cb 00d9 | | Load_Top At_Offset_1 01cc e215 | | Load 0x1,0x15 01cd e402 | | Load 0x2,0x2 01ce 4800 |H | Short_Literal 0x0 01cf e002 | | Load 0x0,0x2 01d0 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01d1 00d8 | | Load_Top At_Offset_0 01d2 e001 | | Load 0x0,0x1 01d3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d4 4516 |E | Exit_Suprogram New_Top_Offset 0x16 01d5 TRAP_00f8: 01d5 e006 | | Load 0x0,0x6 01d6 1b17 | | Execute Package,Field_Read,Field_Number 0x17 01d7 010f | | Execute Exception,Equal 01d8 680a |h | Jump_Zero 0x1e3 01d9 00da | | Load_Top At_Offset_2 01da e215 | | Load 0x1,0x15 01db e402 | | Load 0x2,0x2 01dc 4800 |H | Short_Literal 0x0 01dd e002 | | Load 0x0,0x2 01de 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01df 00d9 | | Load_Top At_Offset_1 01e0 e001 | | Load 0x0,0x1 01e1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01e2 4516 |E | Exit_Suprogram New_Top_Offset 0x16 01e3 e006 | | Load 0x0,0x6 01e4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01e5 010f | | Execute Exception,Equal 01e6 680b |h | Jump_Zero 0x1f2 01e7 00da | | Load_Top At_Offset_2 01e8 e215 | | Load 0x1,0x15 01e9 e402 | | Load 0x2,0x2 01ea 4800 |H | Short_Literal 0x0 01eb e002 | | Load 0x0,0x2 01ec 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01ed 00d9 | | Load_Top At_Offset_1 01ee e001 | | Load 0x0,0x1 01ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01f0 00d8 | | Load_Top At_Offset_0 01f1 0101 | | Execute Exception,Reraise 01f2 e001 | | Load 0x0,0x1 01f3 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 01f4 010f | | Execute Exception,Equal 01f5 6802 |h | Jump_Zero 0x1f8 01f6 00d8 | | Load_Top At_Offset_0 01f7 0101 | | Execute Exception,Reraise 01f8 00da | | Load_Top At_Offset_2 01f9 e215 | | Load 0x1,0x15 01fa e402 | | Load 0x2,0x2 01fb 4800 |H | Short_Literal 0x0 01fc e002 | | Load 0x0,0x2 01fd 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01fe 00d9 | | Load_Top At_Offset_1 01ff e001 | | Load 0x0,0x1 0200 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0201 4516 |E | Exit_Suprogram New_Top_Offset 0x16 0202 0000 0000 | | .BLANK 0000[0x6] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 021a | | .CONST 0x021a ; Address of begin 0209 02b3 | | .CONST 0x02b3 ; Address of exception handler 020a 0004 | | .CONST 0x0004 ; Number of locals 020b INIT_0208: 020b 0092 0627 | '| Action Push_String_Extended,0x627 ; "Make_Path" 020d e001 | | Load 0x0,0x1 020e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 020f 02c7 | | Declare_Variable Any 0210 e5f1 | | Load 0x2,-0xf 0211 e001 | | Load 0x0,0x1 0212 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0213 a403 | | Store_Unchecked 0x2,0x3 0214 e001 | | Load 0x0,0x1 0215 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0216 02c7 | | Declare_Variable Any 0217 e001 | | Load 0x0,0x1 0218 180e | | Execute Package,Field_Execute,Field_Number 0xe 0219 a404 | | Store_Unchecked 0x2,0x4 021a BODY_0208: 021a 00d9 | | Load_Top At_Offset_1 021b e001 | | Load 0x0,0x1 021c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 021d 00d9 | | Load_Top At_Offset_1 021e e215 | | Load 0x1,0x15 021f 0092 0628 | (| Action Push_String_Extended,0x628 ; "From_Path" 0221 e5ff | | Load 0x2,-0x1 0222 e002 | | Load 0x0,0x2 0223 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0224 01cc | | Execute Vector,Catenate 0225 0092 0629 | )| Action Push_String_Extended,0x629 ; "New_Path_Name" 0227 01cc | | Execute Vector,Catenate 0228 e5fe | | Load 0x2,-0x2 0229 e002 | | Load 0x0,0x2 022a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 022b 01cc | | Execute Vector,Catenate 022c 0092 061a | | Action Push_String_Extended,0x61a ; "Remote_Machine" 022e 01cc | | Execute Vector,Catenate 022f e5fd | | Load 0x2,-0x3 0230 e002 | | Load 0x0,0x2 0231 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0232 01cc | | Execute Vector,Catenate 0233 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 0235 01cc | | Execute Vector,Catenate 0236 e5fc | | Load 0x2,-0x4 0237 e002 | | Load 0x0,0x2 0238 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0239 01cc | | Execute Vector,Catenate 023a 0092 061b | | Action Push_String_Extended,0x61b ; "View_To_Modify" 023c 01cc | | Execute Vector,Catenate 023d e5fb | | Load 0x2,-0x5 023e e002 | | Load 0x0,0x2 023f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0240 01cc | | Execute Vector,Catenate 0241 0092 061c | | Action Push_String_Extended,0x61c ; "View_To_Import" 0243 01cc | | Execute Vector,Catenate 0244 e5fa | | Load 0x2,-0x6 0245 e002 | | Load 0x0,0x2 0246 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0247 01cc | | Execute Vector,Catenate 0248 0092 061d | | Action Push_String_Extended,0x61d ; "Only_Change_Imports => " 024a 01cc | | Execute Vector,Catenate 024b e5f9 | | Load 0x2,-0x7 024c 00e1 | | Load_Encached Boolean_Cache 024d 011c | | Execute Any,Convert_Unchecked 024e 1c01 | | Execute_Immediate Run_Utility,0x1 024f 01cc | | Execute Vector,Catenate 0250 0092 0625 | %| Action Push_String_Extended,0x625 ; ", Model" 0252 01cc | | Execute Vector,Catenate 0253 e5f8 | | Load 0x2,-0x8 0254 e002 | | Load 0x0,0x2 0255 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0256 01cc | | Execute Vector,Catenate 0257 0092 062a | *| Action Push_String_Extended,0x62a ; "Join_Paths => " 0259 01cc | | Execute Vector,Catenate 025a e5f7 | | Load 0x2,-0x9 025b 00e1 | | Load_Encached Boolean_Cache 025c 011c | | Execute Any,Convert_Unchecked 025d 1c01 | | Execute_Immediate Run_Utility,0x1 025e 01cc | | Execute Vector,Catenate 025f 0092 062b | +| Action Push_String_Extended,0x62b ; ", Remake_Demoted_Units => " 0261 01cc | | Execute Vector,Catenate 0262 e5f6 | | Load 0x2,-0xa 0263 00e1 | | Load_Encached Boolean_Cache 0264 011c | | Execute Any,Convert_Unchecked 0265 1c01 | | Execute_Immediate Run_Utility,0x1 0266 01cc | | Execute Vector,Catenate 0267 0092 0612 | | Action Push_String_Extended,0x612 ; ", Goal => " 0269 01cc | | Execute Vector,Catenate 026a e5f5 | | Load 0x2,-0xb 026b e003 | | Load 0x0,0x3 026c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 026d 011c | | Execute Any,Convert_Unchecked 026e 1c01 | | Execute_Immediate Run_Utility,0x1 026f 01cc | | Execute Vector,Catenate 0270 0092 0613 | | Action Push_String_Extended,0x613 ; ", Comments" 0272 01cc | | Execute Vector,Catenate 0273 e5f4 | | Load 0x2,-0xc 0274 e002 | | Load 0x0,0x2 0275 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0276 01cc | | Execute Vector,Catenate 0277 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 0279 01cc | | Execute Vector,Catenate 027a e5f3 | | Load 0x2,-0xd 027b e002 | | Load 0x0,0x2 027c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 027d 01cc | | Execute Vector,Catenate 027e 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 0280 01cc | | Execute Vector,Catenate 0281 e5f2 | | Load 0x2,-0xe 0282 00e0 | | Load_Encached Standard_Cache 0283 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0284 01cc | | Execute Vector,Catenate 0285 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 0287 01cc | | Execute Vector,Catenate 0288 e5f1 | | Load 0x2,-0xf 0289 e002 | | Load 0x0,0x2 028a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 028b 01cc | | Execute Vector,Catenate 028c e402 | | Load 0x2,0x2 028d e002 | | Load 0x0,0x2 028e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 028f e216 | | Load 0x1,0x16 0290 00ea | | Load_Encached Null_String_Cache 0291 e5fd | | Load 0x2,-0x3 0292 e5fc | | Load 0x2,-0x4 0293 00ea | | Load_Encached Null_String_Cache 0294 e004 | | Load 0x0,0x4 0295 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0296 e5f1 | | Load 0x2,-0xf 0297 e5f2 | | Load 0x2,-0xe 0298 e5f3 | | Load 0x2,-0xd 0299 e5f4 | | Load 0x2,-0xc 029a e5f5 | | Load 0x2,-0xb 029b e5f6 | | Load 0x2,-0xa 029c e5f7 | | Load 0x2,-0x9 029d e5f8 | | Load 0x2,-0x8 029e 4801 |H | Short_Literal 0x1 029f 4800 |H | Short_Literal 0x0 02a0 e5f9 | | Load 0x2,-0x7 02a1 e5fa | | Load 0x2,-0x6 02a2 e5fb | | Load 0x2,-0x5 02a3 e5fe | | Load 0x2,-0x2 02a4 e5ff | | Load 0x2,-0x1 02a5 e005 | | Load 0x0,0x5 02a6 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02a7 e004 | | Load 0x0,0x4 02a8 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02a9 00d9 | | Load_Top At_Offset_1 02aa e215 | | Load 0x1,0x15 02ab e402 | | Load 0x2,0x2 02ac 4800 |H | Short_Literal 0x0 02ad e002 | | Load 0x0,0x2 02ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02af 00d8 | | Load_Top At_Offset_0 02b0 e001 | | Load 0x0,0x1 02b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02b2 4510 |E | Exit_Suprogram New_Top_Offset 0x10 02b3 TRAP_0208: 02b3 e006 | | Load 0x0,0x6 02b4 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02b5 010f | | Execute Exception,Equal 02b6 680a |h | Jump_Zero 0x2c1 02b7 00da | | Load_Top At_Offset_2 02b8 e215 | | Load 0x1,0x15 02b9 e402 | | Load 0x2,0x2 02ba 4800 |H | Short_Literal 0x0 02bb e002 | | Load 0x0,0x2 02bc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02bd 00d9 | | Load_Top At_Offset_1 02be e001 | | Load 0x0,0x1 02bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02c0 4510 |E | Exit_Suprogram New_Top_Offset 0x10 02c1 e006 | | Load 0x0,0x6 02c2 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02c3 010f | | Execute Exception,Equal 02c4 680b |h | Jump_Zero 0x2d0 02c5 00da | | Load_Top At_Offset_2 02c6 e215 | | Load 0x1,0x15 02c7 e402 | | Load 0x2,0x2 02c8 4800 |H | Short_Literal 0x0 02c9 e002 | | Load 0x0,0x2 02ca 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02cb 00d9 | | Load_Top At_Offset_1 02cc e001 | | Load 0x0,0x1 02cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02ce 00d8 | | Load_Top At_Offset_0 02cf 0101 | | Execute Exception,Reraise 02d0 e001 | | Load 0x0,0x1 02d1 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 02d2 010f | | Execute Exception,Equal 02d3 6802 |h | Jump_Zero 0x2d6 02d4 00d8 | | Load_Top At_Offset_0 02d5 0101 | | Execute Exception,Reraise 02d6 00da | | Load_Top At_Offset_2 02d7 e215 | | Load 0x1,0x15 02d8 e402 | | Load 0x2,0x2 02d9 4800 |H | Short_Literal 0x0 02da e002 | | Load 0x0,0x2 02db 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02dc 00d9 | | Load_Top At_Offset_1 02dd e001 | | Load 0x0,0x1 02de 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02df 4510 |E | Exit_Suprogram New_Top_Offset 0x10 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02f2 | | .CONST 0x02f2 ; Address of begin 02e1 0371 | q | .CONST 0x0371 ; Address of exception handler 02e2 0004 | | .CONST 0x0004 ; Number of locals 02e3 INIT_02e0: 02e3 0092 062c | ,| Action Push_String_Extended,0x62c ; "Make_Subpath" 02e5 e001 | | Load 0x0,0x1 02e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02e7 02c7 | | Declare_Variable Any 02e8 e5f3 | | Load 0x2,-0xd 02e9 e001 | | Load 0x0,0x1 02ea 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 02eb a403 | | Store_Unchecked 0x2,0x3 02ec e001 | | Load 0x0,0x1 02ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ee 02c7 | | Declare_Variable Any 02ef e001 | | Load 0x0,0x1 02f0 180e | | Execute Package,Field_Execute,Field_Number 0xe 02f1 a404 | | Store_Unchecked 0x2,0x4 02f2 BODY_02e0: 02f2 00d9 | | Load_Top At_Offset_1 02f3 e001 | | Load 0x0,0x1 02f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02f5 00d9 | | Load_Top At_Offset_1 02f6 e215 | | Load 0x1,0x15 02f7 0092 0628 | (| Action Push_String_Extended,0x628 ; "From_Path" 02f9 e5ff | | Load 0x2,-0x1 02fa e002 | | Load 0x0,0x2 02fb 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02fc 01cc | | Execute Vector,Catenate 02fd 0092 062d | -| Action Push_String_Extended,0x62d ; "New_Subpath_Extension" 02ff 01cc | | Execute Vector,Catenate 0300 e5fe | | Load 0x2,-0x2 0301 e002 | | Load 0x0,0x2 0302 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0303 01cc | | Execute Vector,Catenate 0304 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 0306 01cc | | Execute Vector,Catenate 0307 e5fc | | Load 0x2,-0x4 0308 e002 | | Load 0x0,0x2 0309 1812 | | Execute Package,Field_Execute,Field_Number 0x12 030a 01cc | | Execute Vector,Catenate 030b 0092 061b | | Action Push_String_Extended,0x61b ; "View_To_Modify" 030d 01cc | | Execute Vector,Catenate 030e e5fb | | Load 0x2,-0x5 030f e002 | | Load 0x0,0x2 0310 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0311 01cc | | Execute Vector,Catenate 0312 0092 061c | | Action Push_String_Extended,0x61c ; "View_To_Import" 0314 01cc | | Execute Vector,Catenate 0315 e5fa | | Load 0x2,-0x6 0316 e002 | | Load 0x0,0x2 0317 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0318 01cc | | Execute Vector,Catenate 0319 0092 061d | | Action Push_String_Extended,0x61d ; "Only_Change_Imports => " 031b 01cc | | Execute Vector,Catenate 031c e5f9 | | Load 0x2,-0x7 031d 00e1 | | Load_Encached Boolean_Cache 031e 011c | | Execute Any,Convert_Unchecked 031f 1c01 | | Execute_Immediate Run_Utility,0x1 0320 01cc | | Execute Vector,Catenate 0321 0092 062b | +| Action Push_String_Extended,0x62b ; ", Remake_Demoted_Units => " 0323 01cc | | Execute Vector,Catenate 0324 e5f8 | | Load 0x2,-0x8 0325 00e1 | | Load_Encached Boolean_Cache 0326 011c | | Execute Any,Convert_Unchecked 0327 1c01 | | Execute_Immediate Run_Utility,0x1 0328 01cc | | Execute Vector,Catenate 0329 0092 0612 | | Action Push_String_Extended,0x612 ; ", Goal => " 032b 01cc | | Execute Vector,Catenate 032c e5f7 | | Load 0x2,-0x9 032d e003 | | Load 0x0,0x3 032e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 032f 011c | | Execute Any,Convert_Unchecked 0330 1c01 | | Execute_Immediate Run_Utility,0x1 0331 01cc | | Execute Vector,Catenate 0332 0092 0613 | | Action Push_String_Extended,0x613 ; ", Comments" 0334 01cc | | Execute Vector,Catenate 0335 e5f6 | | Load 0x2,-0xa 0336 e002 | | Load 0x0,0x2 0337 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0338 01cc | | Execute Vector,Catenate 0339 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 033b 01cc | | Execute Vector,Catenate 033c e5f5 | | Load 0x2,-0xb 033d e002 | | Load 0x0,0x2 033e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 033f 01cc | | Execute Vector,Catenate 0340 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 0342 01cc | | Execute Vector,Catenate 0343 e5f4 | | Load 0x2,-0xc 0344 00e0 | | Load_Encached Standard_Cache 0345 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0346 01cc | | Execute Vector,Catenate 0347 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 0349 01cc | | Execute Vector,Catenate 034a e5f3 | | Load 0x2,-0xd 034b e002 | | Load 0x0,0x2 034c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 034d 01cc | | Execute Vector,Catenate 034e e402 | | Load 0x2,0x2 034f e002 | | Load 0x0,0x2 0350 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0351 e216 | | Load 0x1,0x16 0352 00ea | | Load_Encached Null_String_Cache 0353 e5fd | | Load 0x2,-0x3 0354 e5fc | | Load 0x2,-0x4 0355 00ea | | Load_Encached Null_String_Cache 0356 e004 | | Load 0x0,0x4 0357 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0358 e5f3 | | Load 0x2,-0xd 0359 e5f4 | | Load 0x2,-0xc 035a e5f5 | | Load 0x2,-0xb 035b e5f6 | | Load 0x2,-0xa 035c e5f7 | | Load 0x2,-0x9 035d e5f8 | | Load 0x2,-0x8 035e e5f9 | | Load 0x2,-0x7 035f e5fa | | Load 0x2,-0x6 0360 e5fb | | Load 0x2,-0x5 0361 e5fe | | Load 0x2,-0x2 0362 e5ff | | Load 0x2,-0x1 0363 e005 | | Load 0x0,0x5 0364 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0365 e004 | | Load 0x0,0x4 0366 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0367 00d9 | | Load_Top At_Offset_1 0368 e215 | | Load 0x1,0x15 0369 e402 | | Load 0x2,0x2 036a 4800 |H | Short_Literal 0x0 036b e002 | | Load 0x0,0x2 036c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 036d 00d8 | | Load_Top At_Offset_0 036e e001 | | Load 0x0,0x1 036f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0370 450e |E | Exit_Suprogram New_Top_Offset 0xe 0371 TRAP_02e0: 0371 e006 | | Load 0x0,0x6 0372 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0373 010f | | Execute Exception,Equal 0374 680a |h | Jump_Zero 0x37f 0375 00da | | Load_Top At_Offset_2 0376 e215 | | Load 0x1,0x15 0377 e402 | | Load 0x2,0x2 0378 4800 |H | Short_Literal 0x0 0379 e002 | | Load 0x0,0x2 037a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 037b 00d9 | | Load_Top At_Offset_1 037c e001 | | Load 0x0,0x1 037d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 037e 450e |E | Exit_Suprogram New_Top_Offset 0xe 037f e006 | | Load 0x0,0x6 0380 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0381 010f | | Execute Exception,Equal 0382 680b |h | Jump_Zero 0x38e 0383 00da | | Load_Top At_Offset_2 0384 e215 | | Load 0x1,0x15 0385 e402 | | Load 0x2,0x2 0386 4800 |H | Short_Literal 0x0 0387 e002 | | Load 0x0,0x2 0388 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0389 00d9 | | Load_Top At_Offset_1 038a e001 | | Load 0x0,0x1 038b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 038c 00d8 | | Load_Top At_Offset_0 038d 0101 | | Execute Exception,Reraise 038e e001 | | Load 0x0,0x1 038f 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0390 010f | | Execute Exception,Equal 0391 6802 |h | Jump_Zero 0x394 0392 00d8 | | Load_Top At_Offset_0 0393 0101 | | Execute Exception,Reraise 0394 00da | | Load_Top At_Offset_2 0395 e215 | | Load 0x1,0x15 0396 e402 | | Load 0x2,0x2 0397 4800 |H | Short_Literal 0x0 0398 e002 | | Load 0x0,0x2 0399 1816 | | Execute Package,Field_Execute,Field_Number 0x16 039a 00d9 | | Load_Top At_Offset_1 039b e001 | | Load 0x0,0x1 039c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 039d 450e |E | Exit_Suprogram New_Top_Offset 0xe 039e 0000 0000 | | .XXX[0x2] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a3 | | .CONST 0x03a3 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0001 | | .CONST 0x0001 ; Number of locals 03a3 BODY_03a0: 03a3 INIT_03a0: 03a3 4607 |F | Jump_Case 0x8 03a4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 03a5 7806 |x | Jump 0x3ac ; case 0x1 03a6 7809 |x | Jump 0x3b0 ; case 0x2 03a7 780d |x | Jump 0x3b5 ; case 0x3 03a8 7810 |x | Jump 0x3b9 ; case 0x4 03a9 7811 |x | Jump 0x3bb ; case 0x5 03aa 7812 |x | Jump 0x3bd ; case 0x6 03ab 7815 |x | Jump 0x3c1 ; case 0x7 03ac 00da | | Load_Top At_Offset_2 03ad 0091 0605 | | Action Push_String_Extended_Indexed,0x605 ; "SPEC_LOAD_SUBSYSTEM" 03af 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03b0 00db | | Load_Top At_Offset_3 03b1 00db | | Load_Top At_Offset_3 03b2 00e0 | | Load_Encached Standard_Cache 03b3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03b5 00da | | Load_Top At_Offset_2 03b6 00e0 | | Load_Encached Standard_Cache 03b7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03b8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03b9 00db | | Load_Top At_Offset_3 03ba 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03bb 00db | | Load_Top At_Offset_3 03bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03bd e211 | | Load 0x1,0x11 03be 00dc | | Load_Top At_Offset_4 03bf 0267 | g | Execute Discrete,Predecessor 03c0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c1 e211 | | Load 0x1,0x11 03c2 00dc | | Load_Top At_Offset_4 03c3 0268 | h | Execute Discrete,Successor 03c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c5 0000 0000 | | .XXX[0x3] 03c7 0000 | | 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03da | | .CONST 0x03da ; Address of begin 03c9 044f | O | .CONST 0x044f ; Address of exception handler 03ca 0004 | | .CONST 0x0004 ; Number of locals 03cb INIT_03c8: 03cb 0092 062e | .| Action Push_String_Extended,0x62e ; "Initial" 03cd e001 | | Load 0x0,0x1 03ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03cf 02c7 | | Declare_Variable Any 03d0 e5f5 | | Load 0x2,-0xb 03d1 e001 | | Load 0x0,0x1 03d2 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 03d3 a403 | | Store_Unchecked 0x2,0x3 03d4 e001 | | Load 0x0,0x1 03d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03d6 02c7 | | Declare_Variable Any 03d7 e001 | | Load 0x0,0x1 03d8 180e | | Execute Package,Field_Execute,Field_Number 0xe 03d9 a404 | | Store_Unchecked 0x2,0x4 03da BODY_03c8: 03da 00d9 | | Load_Top At_Offset_1 03db e001 | | Load 0x0,0x1 03dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03dd 00d9 | | Load_Top At_Offset_1 03de e215 | | Load 0x1,0x15 03df 0092 062f | /| Action Push_String_Extended,0x62f ; "Subsystem" 03e1 e5ff | | Load 0x2,-0x1 03e2 e002 | | Load 0x0,0x2 03e3 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03e4 01cc | | Execute Vector,Catenate 03e5 0092 0630 | 0| Action Push_String_Extended,0x630 ; "Working_View_Base_Name" 03e7 01cc | | Execute Vector,Catenate 03e8 e5fe | | Load 0x2,-0x2 03e9 e002 | | Load 0x0,0x2 03ea 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03eb 01cc | | Execute Vector,Catenate 03ec 0092 061a | | Action Push_String_Extended,0x61a ; "Remote_Machine" 03ee 01cc | | Execute Vector,Catenate 03ef e5fd | | Load 0x2,-0x3 03f0 e002 | | Load 0x0,0x2 03f1 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03f2 01cc | | Execute Vector,Catenate 03f3 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 03f5 01cc | | Execute Vector,Catenate 03f6 e5fc | | Load 0x2,-0x4 03f7 e002 | | Load 0x0,0x2 03f8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03f9 01cc | | Execute Vector,Catenate 03fa 0092 0631 | 1| Action Push_String_Extended,0x631 ; "Subsystem_Type => " 03fc 01cc | | Execute Vector,Catenate 03fd e5fb | | Load 0x2,-0x5 03fe e005 | | Load 0x0,0x5 03ff 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0400 011c | | Execute Any,Convert_Unchecked 0401 1c01 | | Execute_Immediate Run_Utility,0x1 0402 01cc | | Execute Vector,Catenate 0403 0092 0632 | 2| Action Push_String_Extended,0x632 ; ", View_To_Import" 0405 01cc | | Execute Vector,Catenate 0406 e5fa | | Load 0x2,-0x6 0407 e002 | | Load 0x0,0x2 0408 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0409 01cc | | Execute Vector,Catenate 040a 0092 0633 | 3| Action Push_String_Extended,0x633 ; "Model" 040c 01cc | | Execute Vector,Catenate 040d e5f9 | | Load 0x2,-0x7 040e e002 | | Load 0x0,0x2 040f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0410 01cc | | Execute Vector,Catenate 0411 0092 0634 | 4| Action Push_String_Extended,0x634 ; "Comments" 0413 01cc | | Execute Vector,Catenate 0414 e5f8 | | Load 0x2,-0x8 0415 e002 | | Load 0x0,0x2 0416 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0417 01cc | | Execute Vector,Catenate 0418 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 041a 01cc | | Execute Vector,Catenate 041b e5f7 | | Load 0x2,-0x9 041c e002 | | Load 0x0,0x2 041d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 041e 01cc | | Execute Vector,Catenate 041f 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 0421 01cc | | Execute Vector,Catenate 0422 e5f6 | | Load 0x2,-0xa 0423 00e0 | | Load_Encached Standard_Cache 0424 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0425 01cc | | Execute Vector,Catenate 0426 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 0428 01cc | | Execute Vector,Catenate 0429 e5f5 | | Load 0x2,-0xb 042a e002 | | Load 0x0,0x2 042b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 042c 01cc | | Execute Vector,Catenate 042d e402 | | Load 0x2,0x2 042e e002 | | Load 0x0,0x2 042f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0430 e216 | | Load 0x1,0x16 0431 00ea | | Load_Encached Null_String_Cache 0432 e5fd | | Load 0x2,-0x3 0433 e5fc | | Load 0x2,-0x4 0434 00ea | | Load_Encached Null_String_Cache 0435 e004 | | Load 0x0,0x4 0436 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0437 e5f5 | | Load 0x2,-0xb 0438 e5f6 | | Load 0x2,-0xa 0439 e5f7 | | Load 0x2,-0x9 043a e5f8 | | Load 0x2,-0x8 043b e5f9 | | Load 0x2,-0x7 043c 4800 |H | Short_Literal 0x0 043d e5fa | | Load 0x2,-0x6 043e e5fb | | Load 0x2,-0x5 043f e5fe | | Load 0x2,-0x2 0440 e5ff | | Load 0x2,-0x1 0441 e005 | | Load 0x0,0x5 0442 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0443 e004 | | Load 0x0,0x4 0444 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0445 00d9 | | Load_Top At_Offset_1 0446 e215 | | Load 0x1,0x15 0447 e402 | | Load 0x2,0x2 0448 4800 |H | Short_Literal 0x0 0449 e002 | | Load 0x0,0x2 044a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 044b 00d8 | | Load_Top At_Offset_0 044c e001 | | Load 0x0,0x1 044d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 044e 450c |E | Exit_Suprogram New_Top_Offset 0xc 044f TRAP_03c8: 044f e006 | | Load 0x0,0x6 0450 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0451 010f | | Execute Exception,Equal 0452 680a |h | Jump_Zero 0x45d 0453 00da | | Load_Top At_Offset_2 0454 e215 | | Load 0x1,0x15 0455 e402 | | Load 0x2,0x2 0456 4800 |H | Short_Literal 0x0 0457 e002 | | Load 0x0,0x2 0458 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0459 00d9 | | Load_Top At_Offset_1 045a e001 | | Load 0x0,0x1 045b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 045c 450c |E | Exit_Suprogram New_Top_Offset 0xc 045d e006 | | Load 0x0,0x6 045e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 045f 010f | | Execute Exception,Equal 0460 680b |h | Jump_Zero 0x46c 0461 00da | | Load_Top At_Offset_2 0462 e215 | | Load 0x1,0x15 0463 e402 | | Load 0x2,0x2 0464 4800 |H | Short_Literal 0x0 0465 e002 | | Load 0x0,0x2 0466 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0467 00d9 | | Load_Top At_Offset_1 0468 e001 | | Load 0x0,0x1 0469 1810 | | Execute Package,Field_Execute,Field_Number 0x10 046a 00d8 | | Load_Top At_Offset_0 046b 0101 | | Execute Exception,Reraise 046c e001 | | Load 0x0,0x1 046d 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 046e 010f | | Execute Exception,Equal 046f 6802 |h | Jump_Zero 0x472 0470 00d8 | | Load_Top At_Offset_0 0471 0101 | | Execute Exception,Reraise 0472 00da | | Load_Top At_Offset_2 0473 e215 | | Load 0x1,0x15 0474 e402 | | Load 0x2,0x2 0475 4800 |H | Short_Literal 0x0 0476 e002 | | Load 0x0,0x2 0477 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0478 00d9 | | Load_Top At_Offset_1 0479 e001 | | Load 0x0,0x1 047a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 047b 450c |E | Exit_Suprogram New_Top_Offset 0xc 047c 0000 0000 | | .BLANK 0000[0x4] 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0492 | | .CONST 0x0492 ; Address of begin 0481 0506 | | .CONST 0x0506 ; Address of exception handler 0482 0004 | | .CONST 0x0004 ; Number of locals 0483 INIT_0480: 0483 0092 0635 | 5| Action Push_String_Extended,0x635 ; "Build" 0485 e001 | | Load 0x0,0x1 0486 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0487 02c7 | | Declare_Variable Any 0488 e5f5 | | Load 0x2,-0xb 0489 e001 | | Load 0x0,0x1 048a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 048b a403 | | Store_Unchecked 0x2,0x3 048c e001 | | Load 0x0,0x1 048d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 048e 02c7 | | Declare_Variable Any 048f e001 | | Load 0x0,0x1 0490 180e | | Execute Package,Field_Execute,Field_Number 0xe 0491 a404 | | Store_Unchecked 0x2,0x4 0492 BODY_0480: 0492 00d9 | | Load_Top At_Offset_1 0493 e001 | | Load 0x0,0x1 0494 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0495 00d9 | | Load_Top At_Offset_1 0496 e215 | | Load 0x1,0x15 0497 0092 0636 | 6| Action Push_String_Extended,0x636 ; "Configuration" 0499 e5ff | | Load 0x2,-0x1 049a e002 | | Load 0x0,0x2 049b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 049c 01cc | | Execute Vector,Catenate 049d 0092 061a | | Action Push_String_Extended,0x61a ; "Remote_Machine" 049f 01cc | | Execute Vector,Catenate 04a0 e5fe | | Load 0x2,-0x2 04a1 e002 | | Load 0x0,0x2 04a2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04a3 01cc | | Execute Vector,Catenate 04a4 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 04a6 01cc | | Execute Vector,Catenate 04a7 e5fd | | Load 0x2,-0x3 04a8 e002 | | Load 0x0,0x2 04a9 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04aa 01cc | | Execute Vector,Catenate 04ab 0092 061c | | Action Push_String_Extended,0x61c ; "View_To_Import" 04ad 01cc | | Execute Vector,Catenate 04ae e5fc | | Load 0x2,-0x4 04af e002 | | Load 0x0,0x2 04b0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04b1 01cc | | Execute Vector,Catenate 04b2 0092 0633 | 3| Action Push_String_Extended,0x633 ; "Model" 04b4 01cc | | Execute Vector,Catenate 04b5 e5fb | | Load 0x2,-0x5 04b6 e002 | | Load 0x0,0x2 04b7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04b8 01cc | | Execute Vector,Catenate 04b9 0092 0637 | 7| Action Push_String_Extended,0x637 ; "Goal => " 04bb 01cc | | Execute Vector,Catenate 04bc e5fa | | Load 0x2,-0x6 04bd e003 | | Load 0x0,0x3 04be 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04bf 011c | | Execute Any,Convert_Unchecked 04c0 1c01 | | Execute_Immediate Run_Utility,0x1 04c1 01cc | | Execute Vector,Catenate 04c2 0092 0638 | 8| Action Push_String_Extended,0x638 ; ", Limit" 04c4 01cc | | Execute Vector,Catenate 04c5 e5f9 | | Load 0x2,-0x7 04c6 e002 | | Load 0x0,0x2 04c7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04c8 01cc | | Execute Vector,Catenate 04c9 0092 0634 | 4| Action Push_String_Extended,0x634 ; "Comments" 04cb 01cc | | Execute Vector,Catenate 04cc e5f8 | | Load 0x2,-0x8 04cd e002 | | Load 0x0,0x2 04ce 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04cf 01cc | | Execute Vector,Catenate 04d0 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 04d2 01cc | | Execute Vector,Catenate 04d3 e5f7 | | Load 0x2,-0x9 04d4 e002 | | Load 0x0,0x2 04d5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04d6 01cc | | Execute Vector,Catenate 04d7 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 04d9 01cc | | Execute Vector,Catenate 04da e5f6 | | Load 0x2,-0xa 04db 00e0 | | Load_Encached Standard_Cache 04dc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04dd 01cc | | Execute Vector,Catenate 04de 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 04e0 01cc | | Execute Vector,Catenate 04e1 e5f5 | | Load 0x2,-0xb 04e2 e002 | | Load 0x0,0x2 04e3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04e4 01cc | | Execute Vector,Catenate 04e5 e402 | | Load 0x2,0x2 04e6 e002 | | Load 0x0,0x2 04e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04e8 e216 | | Load 0x1,0x16 04e9 00ea | | Load_Encached Null_String_Cache 04ea e5fe | | Load 0x2,-0x2 04eb e5fd | | Load 0x2,-0x3 04ec 00ea | | Load_Encached Null_String_Cache 04ed e004 | | Load 0x0,0x4 04ee 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04ef e5f5 | | Load 0x2,-0xb 04f0 e5f6 | | Load 0x2,-0xa 04f1 e5f7 | | Load 0x2,-0x9 04f2 e5f8 | | Load 0x2,-0x8 04f3 e5f9 | | Load 0x2,-0x7 04f4 e5fa | | Load 0x2,-0x6 04f5 e5fb | | Load 0x2,-0x5 04f6 e5fc | | Load 0x2,-0x4 04f7 e5ff | | Load 0x2,-0x1 04f8 e005 | | Load 0x0,0x5 04f9 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 04fa e004 | | Load 0x0,0x4 04fb 181a | | Execute Package,Field_Execute,Field_Number 0x1a 04fc 00d9 | | Load_Top At_Offset_1 04fd e215 | | Load 0x1,0x15 04fe e402 | | Load 0x2,0x2 04ff 4800 |H | Short_Literal 0x0 0500 e002 | | Load 0x0,0x2 0501 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0502 00d8 | | Load_Top At_Offset_0 0503 e001 | | Load 0x0,0x1 0504 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0505 450c |E | Exit_Suprogram New_Top_Offset 0xc 0506 TRAP_0480: 0506 e006 | | Load 0x0,0x6 0507 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0508 010f | | Execute Exception,Equal 0509 680a |h | Jump_Zero 0x514 050a 00da | | Load_Top At_Offset_2 050b e215 | | Load 0x1,0x15 050c e402 | | Load 0x2,0x2 050d 4800 |H | Short_Literal 0x0 050e e002 | | Load 0x0,0x2 050f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0510 00d9 | | Load_Top At_Offset_1 0511 e001 | | Load 0x0,0x1 0512 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0513 450c |E | Exit_Suprogram New_Top_Offset 0xc 0514 e006 | | Load 0x0,0x6 0515 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0516 010f | | Execute Exception,Equal 0517 680b |h | Jump_Zero 0x523 0518 00da | | Load_Top At_Offset_2 0519 e215 | | Load 0x1,0x15 051a e402 | | Load 0x2,0x2 051b 4800 |H | Short_Literal 0x0 051c e002 | | Load 0x0,0x2 051d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 051e 00d9 | | Load_Top At_Offset_1 051f e001 | | Load 0x0,0x1 0520 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0521 00d8 | | Load_Top At_Offset_0 0522 0101 | | Execute Exception,Reraise 0523 e001 | | Load 0x0,0x1 0524 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0525 010f | | Execute Exception,Equal 0526 6802 |h | Jump_Zero 0x529 0527 00d8 | | Load_Top At_Offset_0 0528 0101 | | Execute Exception,Reraise 0529 00da | | Load_Top At_Offset_2 052a e215 | | Load 0x1,0x15 052b e402 | | Load 0x2,0x2 052c 4800 |H | Short_Literal 0x0 052d e002 | | Load 0x0,0x2 052e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 052f 00d9 | | Load_Top At_Offset_1 0530 e001 | | Load 0x0,0x1 0531 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0532 450c |E | Exit_Suprogram New_Top_Offset 0xc 0533 0000 0000 | | .BLANK 0000[0x5] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 054a | J | .CONST 0x054a ; Address of begin 0539 05d8 | | .CONST 0x05d8 ; Address of exception handler 053a 0004 | | .CONST 0x0004 ; Number of locals 053b INIT_0538: 053b 0092 0639 | 9| Action Push_String_Extended,0x639 ; "Make_Spec_View" 053d e001 | | Load 0x0,0x1 053e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 053f 02c7 | | Declare_Variable Any 0540 e5f2 | | Load 0x2,-0xe 0541 e001 | | Load 0x0,0x1 0542 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0543 a403 | | Store_Unchecked 0x2,0x3 0544 e001 | | Load 0x0,0x1 0545 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0546 02c7 | | Declare_Variable Any 0547 e001 | | Load 0x0,0x1 0548 180e | | Execute Package,Field_Execute,Field_Number 0xe 0549 a404 | | Store_Unchecked 0x2,0x4 054a BODY_0538: 054a 00d9 | | Load_Top At_Offset_1 054b e001 | | Load 0x0,0x1 054c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 054d 00d9 | | Load_Top At_Offset_1 054e e215 | | Load 0x1,0x15 054f 0092 0628 | (| Action Push_String_Extended,0x628 ; "From_Path" 0551 e5ff | | Load 0x2,-0x1 0552 e002 | | Load 0x0,0x2 0553 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0554 01cc | | Execute Vector,Catenate 0555 0092 063a | :| Action Push_String_Extended,0x63a ; "Spec_View_Prefix" 0557 01cc | | Execute Vector,Catenate 0558 e5fe | | Load 0x2,-0x2 0559 e002 | | Load 0x0,0x2 055a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 055b 01cc | | Execute Vector,Catenate 055c 0092 060e | | Action Push_String_Extended,0x60e ; "Level =>" 055e 01cc | | Execute Vector,Catenate 055f e5fd | | Load 0x2,-0x3 0560 00e0 | | Load_Encached Standard_Cache 0561 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0562 01cc | | Execute Vector,Catenate 0563 0092 063b | ;| Action Push_String_Extended,0x63b ; ", Remote_Machine" 0565 01cc | | Execute Vector,Catenate 0566 e5fc | | Load 0x2,-0x4 0567 e002 | | Load 0x0,0x2 0568 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0569 01cc | | Execute Vector,Catenate 056a 0092 060d | | Action Push_String_Extended,0x60d ; "Remote_Directory" 056c 01cc | | Execute Vector,Catenate 056d e5fb | | Load 0x2,-0x5 056e e002 | | Load 0x0,0x2 056f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0570 01cc | | Execute Vector,Catenate 0571 0092 061b | | Action Push_String_Extended,0x61b ; "View_To_Modify" 0573 01cc | | Execute Vector,Catenate 0574 e5fa | | Load 0x2,-0x6 0575 e002 | | Load 0x0,0x2 0576 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0577 01cc | | Execute Vector,Catenate 0578 0092 061c | | Action Push_String_Extended,0x61c ; "View_To_Import" 057a 01cc | | Execute Vector,Catenate 057b e5f9 | | Load 0x2,-0x7 057c e002 | | Load 0x0,0x2 057d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 057e 01cc | | Execute Vector,Catenate 057f 0092 061d | | Action Push_String_Extended,0x61d ; "Only_Change_Imports => " 0581 01cc | | Execute Vector,Catenate 0582 e5f8 | | Load 0x2,-0x8 0583 00e1 | | Load_Encached Boolean_Cache 0584 011c | | Execute Any,Convert_Unchecked 0585 1c01 | | Execute_Immediate Run_Utility,0x1 0586 01cc | | Execute Vector,Catenate 0587 0092 062b | +| Action Push_String_Extended,0x62b ; ", Remake_Demoted_Units => " 0589 01cc | | Execute Vector,Catenate 058a e5f7 | | Load 0x2,-0x9 058b 00e1 | | Load_Encached Boolean_Cache 058c 011c | | Execute Any,Convert_Unchecked 058d 1c01 | | Execute_Immediate Run_Utility,0x1 058e 01cc | | Execute Vector,Catenate 058f 0092 0612 | | Action Push_String_Extended,0x612 ; ", Goal => " 0591 01cc | | Execute Vector,Catenate 0592 e5f6 | | Load 0x2,-0xa 0593 e003 | | Load 0x0,0x3 0594 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0595 011c | | Execute Any,Convert_Unchecked 0596 1c01 | | Execute_Immediate Run_Utility,0x1 0597 01cc | | Execute Vector,Catenate 0598 0092 0613 | | Action Push_String_Extended,0x613 ; ", Comments" 059a 01cc | | Execute Vector,Catenate 059b e5f5 | | Load 0x2,-0xb 059c e002 | | Load 0x0,0x2 059d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 059e 01cc | | Execute Vector,Catenate 059f 0092 0614 | | Action Push_String_Extended,0x614 ; "Work_Order" 05a1 01cc | | Execute Vector,Catenate 05a2 e5f4 | | Load 0x2,-0xc 05a3 e002 | | Load 0x0,0x2 05a4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05a5 01cc | | Execute Vector,Catenate 05a6 0092 0615 | | Action Push_String_Extended,0x615 ; "Volume =>" 05a8 01cc | | Execute Vector,Catenate 05a9 e5f3 | | Load 0x2,-0xd 05aa 00e0 | | Load_Encached Standard_Cache 05ab 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05ac 01cc | | Execute Vector,Catenate 05ad 0092 0616 | | Action Push_String_Extended,0x616 ; ", Response" 05af 01cc | | Execute Vector,Catenate 05b0 e5f2 | | Load 0x2,-0xe 05b1 e002 | | Load 0x0,0x2 05b2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05b3 01cc | | Execute Vector,Catenate 05b4 e402 | | Load 0x2,0x2 05b5 e002 | | Load 0x0,0x2 05b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05b7 e216 | | Load 0x1,0x16 05b8 00ea | | Load_Encached Null_String_Cache 05b9 e5fc | | Load 0x2,-0x4 05ba e5fb | | Load 0x2,-0x5 05bb 00ea | | Load_Encached Null_String_Cache 05bc e004 | | Load 0x0,0x4 05bd 1819 | | Execute Package,Field_Execute,Field_Number 0x19 05be e5f2 | | Load 0x2,-0xe 05bf e5f3 | | Load 0x2,-0xd 05c0 e5f4 | | Load 0x2,-0xc 05c1 e5f5 | | Load 0x2,-0xb 05c2 e5f6 | | Load 0x2,-0xa 05c3 e5f7 | | Load 0x2,-0x9 05c4 e5f8 | | Load 0x2,-0x8 05c5 e5fa | | Load 0x2,-0x6 05c6 00d8 | | Load_Top At_Offset_0 05c7 e5fd | | Load 0x2,-0x3 05c8 e5fe | | Load 0x2,-0x2 05c9 e5ff | | Load 0x2,-0x1 05ca e005 | | Load 0x0,0x5 05cb 1820 | | Execute Package,Field_Execute,Field_Number 0x20 05cc e004 | | Load 0x0,0x4 05cd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 05ce 00d9 | | Load_Top At_Offset_1 05cf e215 | | Load 0x1,0x15 05d0 e402 | | Load 0x2,0x2 05d1 4800 |H | Short_Literal 0x0 05d2 e002 | | Load 0x0,0x2 05d3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05d4 00d8 | | Load_Top At_Offset_0 05d5 e001 | | Load 0x0,0x1 05d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05d7 450f |E | Exit_Suprogram New_Top_Offset 0xf 05d8 TRAP_0538: 05d8 e006 | | Load 0x0,0x6 05d9 1b17 | | Execute Package,Field_Read,Field_Number 0x17 05da 010f | | Execute Exception,Equal 05db 680a |h | Jump_Zero 0x5e6 05dc 00da | | Load_Top At_Offset_2 05dd e215 | | Load 0x1,0x15 05de e402 | | Load 0x2,0x2 05df 4800 |H | Short_Literal 0x0 05e0 e002 | | Load 0x0,0x2 05e1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05e2 00d9 | | Load_Top At_Offset_1 05e3 e001 | | Load 0x0,0x1 05e4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05e5 450f |E | Exit_Suprogram New_Top_Offset 0xf 05e6 e006 | | Load 0x0,0x6 05e7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05e8 010f | | Execute Exception,Equal 05e9 680b |h | Jump_Zero 0x5f5 05ea 00da | | Load_Top At_Offset_2 05eb e215 | | Load 0x1,0x15 05ec e402 | | Load 0x2,0x2 05ed 4800 |H | Short_Literal 0x0 05ee e002 | | Load 0x0,0x2 05ef 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05f0 00d9 | | Load_Top At_Offset_1 05f1 e001 | | Load 0x0,0x1 05f2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05f3 00d8 | | Load_Top At_Offset_0 05f4 0101 | | Execute Exception,Reraise 05f5 e001 | | Load 0x0,0x1 05f6 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 05f7 010f | | Execute Exception,Equal 05f8 6802 |h | Jump_Zero 0x5fb 05f9 00d8 | | Load_Top At_Offset_0 05fa 0101 | | Execute Exception,Reraise 05fb 00da | | Load_Top At_Offset_2 05fc e215 | | Load 0x1,0x15 05fd e402 | | Load 0x2,0x2 05fe 4800 |H | Short_Literal 0x0 05ff e002 | | Load 0x0,0x2 0600 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0601 00d9 | | Load_Top At_Offset_1 0602 e001 | | Load 0x0,0x1 0603 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0604 450f |E | Exit_Suprogram New_Top_Offset 0xf 0605 ; -------------------------------------------------------------------------------------- 0605 ; STRING TABLE 0605 ; -------------------------------------------------------------------------------------- 0605 0070 | p | .STRTAB 0x0070->0x063d ; "SPEC_LOAD_SUBSYSTEM" 0606 0081 | | .STRTAB 0x0081->0x0646 ; "COMBINED_SUBSYSTEM" 0607 0091 | | .STRTAB 0x0091->0x064f ; "SYSTEM" 0608 0095 | | .STRTAB 0x0095->0x0652 ; "Rci_Cmvc." 0609 009c | | .STRTAB 0x009c->0x0657 ; " * RCI_CMVC * " 060a 00a8 | | .STRTAB 0x00a8->0x065e ; "Release" 060b 00ad | | .STRTAB 0x00ad->0x0661 ; "From_Working_View" 060c 00bc | | .STRTAB 0x00bc->0x066a ; "Release_Name" 060d 00c6 | | .STRTAB 0x00c6->0x0670 ; "Remote_Directory" 060e 00d4 | | .STRTAB 0x00d4->0x0678 ; "Level =>" 060f 00da | | .STRTAB 0x00da->0x067c ; ", Views_To_Import" 0610 00e9 | | .STRTAB 0x00e9->0x0684 ; "Create_Configuration_Only => " 0611 0104 | | .STRTAB 0x0104->0x0693 ; ", Compile_The_View => " 0612 0118 | | .STRTAB 0x0118->0x069e ; ", Goal => " 0613 0120 | | .STRTAB 0x0120->0x06a3 ; ", Comments" 0614 0128 | ( | .STRTAB 0x0128->0x06a8 ; "Work_Order" 0615 0130 | 0 | .STRTAB 0x0130->0x06ad ; "Volume =>" 0616 0137 | 7 | .STRTAB 0x0137->0x06b1 ; ", Response" 0617 013f | ? | .STRTAB 0x013f->0x06b6 ; "Copy" 0618 0141 | A | .STRTAB 0x0141->0x06b8 ; "From_View" 0619 0148 | H | .STRTAB 0x0148->0x06bd ; "New_Working_View" 061a 0156 | V | .STRTAB 0x0156->0x06c5 ; "Remote_Machine" 061b 0162 | b | .STRTAB 0x0162->0x06cc ; "View_To_Modify" 061c 016e | n | .STRTAB 0x016e->0x06d3 ; "View_To_Import" 061d 017a | z | .STRTAB 0x017a->0x06da ; "Only_Change_Imports => " 061e 018f | | .STRTAB 0x018f->0x06e5 ; ", Join_Views => " 061f 019d | | .STRTAB 0x019d->0x06ed ; ", Reservation_Token_Name" 0620 01b3 | | .STRTAB 0x01b3->0x06f9 ; "Construct_Subpath_Name => " 0621 01cb | | .STRTAB 0x01cb->0x0706 ; ", Create_Spec_View => " 0622 01df | | .STRTAB 0x01df->0x0711 ; ", Create_Load_View => " 0623 01f3 | | .STRTAB 0x01f3->0x071c ; ", Create_Combined_View => " 0624 020b | | .STRTAB 0x020b->0x0729 ; ", Level_For_Spec_View =>" 0625 0221 | ! | .STRTAB 0x0221->0x0735 ; ", Model" 0626 0226 | & | .STRTAB 0x0226->0x0739 ; "Remake_Demoted_Units => " 0627 023c | < | .STRTAB 0x023c->0x0745 ; "Make_Path" 0628 0243 | C | .STRTAB 0x0243->0x0749 ; "From_Path" 0629 024a | J | .STRTAB 0x024a->0x074e ; "New_Path_Name" 062a 0255 | U | .STRTAB 0x0255->0x0754 ; "Join_Paths => " 062b 0261 | a | .STRTAB 0x0261->0x075b ; ", Remake_Demoted_Units => " 062c 0279 | y | .STRTAB 0x0279->0x0768 ; "Make_Subpath" 062d 0283 | | .STRTAB 0x0283->0x076e ; "New_Subpath_Extension" 062e 0296 | | .STRTAB 0x0296->0x0779 ; "Initial" 062f 029b | | .STRTAB 0x029b->0x077c ; "Subsystem" 0630 02a2 | | .STRTAB 0x02a2->0x0781 ; "Working_View_Base_Name" 0631 02b6 | | .STRTAB 0x02b6->0x078c ; "Subsystem_Type => " 0632 02c6 | | .STRTAB 0x02c6->0x0795 ; ", View_To_Import" 0633 02d4 | | .STRTAB 0x02d4->0x079d ; "Model" 0634 02d7 | | .STRTAB 0x02d7->0x079f ; "Comments" 0635 02dd | | .STRTAB 0x02dd->0x07a3 ; "Build" 0636 02e0 | | .STRTAB 0x02e0->0x07a6 ; "Configuration" 0637 02eb | | .STRTAB 0x02eb->0x07ac ; "Goal => " 0638 02f1 | | .STRTAB 0x02f1->0x07b0 ; ", Limit" 0639 02f6 | | .STRTAB 0x02f6->0x07b4 ; "Make_Spec_View" 063a 0302 | | .STRTAB 0x0302->0x07bb ; "Spec_View_Prefix" 063b 0310 | | .STRTAB 0x0310->0x07c3 ; ", Remote_Machine" 063c 031e | | .STREND 0x031e->0x07cb 063d 5350 4543 |SPEC| .STRTAB_STRINGS 07cb 0000 0000 | | .BLANK 0000[0x5] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; Debug Table 07d0 ; -------------------------------------------------------------------------------------- 07d0 0004 000f | | .DEBUG4 0x0004,0x000f,0x41ca,0x0000,0x0001,0x0000 07d6 0036 d814 | 6 | .XXX[0x6] 07d8 0e2e f485 | . | 07da 8002 3426 | 4&| 07dc 0000 0000 | | .BLANK 0000[0x4] 07e0 0008 c886 | | .XXX[0x8] 07e2 000c 7958 | yX| 07e4 0717 7a42 | zB| 07e6 c001 19d3 | | 07e8 0000 0000 | | .BLANK 0000[0x4] 07ec 0004 6473 | ds| .XXX[0x14] 07ee 4006 3cdc |@ < | 07f0 438b bd21 |C !| 07f2 6000 cc45 |` E| 07f4 a000 0000 | | 07f6 0000 0000 | | 07f8 0002 5632 | V2| 07fa c003 4e3a | N:| 07fc e1c5 de90 | | 07fe b000 6612 | f |