|
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: 5120 (0x1400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 0998 | | .CONST 0x0998 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 001e | | .CONST 0x001e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated
000d 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
000f 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
0011 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call
0016 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0017 00c7 | | Action Elaborate_Subprogram
0018 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0019 00c7 | | Action Elaborate_Subprogram
001a 1d0f | | Execute_Immediate Reference_Lex_1,0xf
001b 00c7 | | Action Elaborate_Subprogram
001c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
001d 00c7 | | Action Elaborate_Subprogram
001e BODY_0008:
001e 00bc | | Action Signal_Activated
001f 00bb | | Action Signal_Completion
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0034 | 4 | .CONST 0x0034 ; Address of begin
0021 00a0 | | .CONST 0x00a0 ; Address of exception handler
0022 0007 | | .CONST 0x0007 ; Number of locals
0023 INIT_0020:
0023 0092 0834 | 4| Action Push_String_Extended,0x834 ; "Initial"
0025 e001 | | Load 0x0,0x1
0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0027 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0028 e002 | | Load 0x0,0x2
0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002a 02c7 | | Declare_Variable Any
002b e5f5 | | Load 0x2,-0xb
002c e002 | | Load 0x0,0x2
002d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
002e a404 | | Store_Unchecked 0x2,0x4
002f 00ea | | Load_Encached Null_String_Cache
0030 029f 02c3 | | Declare_Subprogram INIT_02c0,For_Call
0032 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call
0034 BODY_0020:
0034 00db | | Load_Top At_Offset_3
0035 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
0037 0092 0836 | 6| Action Push_String_Extended,0x836 ; "Subsystem"
0039 e5ff | | Load 0x2,-0x1
003a e003 | | Load 0x0,0x3
003b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
003c 01cc | | Execute Vector,Catenate
003d 0092 0837 | 7| Action Push_String_Extended,0x837 ; "Working_View_Base_Name"
003f 01cc | | Execute Vector,Catenate
0040 e5fe | | Load 0x2,-0x2
0041 e003 | | Load 0x0,0x3
0042 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0043 01cc | | Execute Vector,Catenate
0044 0092 0838 | 8| Action Push_String_Extended,0x838 ; "Remote_Machine"
0046 01cc | | Execute Vector,Catenate
0047 e5fd | | Load 0x2,-0x3
0048 e003 | | Load 0x0,0x3
0049 1812 | | Execute Package,Field_Execute,Field_Number 0x12
004a 01cc | | Execute Vector,Catenate
004b 0092 0839 | 9| Action Push_String_Extended,0x839 ; "Remote_Directory"
004d 01cc | | Execute Vector,Catenate
004e e5fc | | Load 0x2,-0x4
004f e003 | | Load 0x0,0x3
0050 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0051 01cc | | Execute Vector,Catenate
0052 0092 083a | :| Action Push_String_Extended,0x83a ; "Subsystem_Type => "
0054 01cc | | Execute Vector,Catenate
0055 e5fb | | Load 0x2,-0x5
0056 e004 | | Load 0x0,0x4
0057 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0058 011c | | Execute Any,Convert_Unchecked
0059 1c01 | | Execute_Immediate Run_Utility,0x1
005a 01cc | | Execute Vector,Catenate
005b 0092 083b | ;| Action Push_String_Extended,0x83b ; ", View_To_Import"
005d 01cc | | Execute Vector,Catenate
005e e5fa | | Load 0x2,-0x6
005f e003 | | Load 0x0,0x3
0060 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0061 01cc | | Execute Vector,Catenate
0062 0092 083c | <| Action Push_String_Extended,0x83c ; "Model"
0064 01cc | | Execute Vector,Catenate
0065 e5f9 | | Load 0x2,-0x7
0066 e003 | | Load 0x0,0x3
0067 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0068 01cc | | Execute Vector,Catenate
0069 0092 083d | =| Action Push_String_Extended,0x83d ; "Comments"
006b 01cc | | Execute Vector,Catenate
006c e5f8 | | Load 0x2,-0x8
006d e003 | | Load 0x0,0x3
006e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
006f 01cc | | Execute Vector,Catenate
0070 0092 083e | >| Action Push_String_Extended,0x83e ; "Work_Order"
0072 01cc | | Execute Vector,Catenate
0073 e5f7 | | Load 0x2,-0x9
0074 e003 | | Load 0x0,0x3
0075 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0076 01cc | | Execute Vector,Catenate
0077 0092 083f | ?| Action Push_String_Extended,0x83f ; "Volume => "
0079 01cc | | Execute Vector,Catenate
007a e5f6 | | Load 0x2,-0xa
007b 00e0 | | Load_Encached Standard_Cache
007c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
007d 01cc | | Execute Vector,Catenate
007e 0092 0840 | @| Action Push_String_Extended,0x840 ; ", Response"
0080 01cc | | Execute Vector,Catenate
0081 e5f5 | | Load 0x2,-0xb
0082 e003 | | Load 0x0,0x3
0083 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0084 01cc | | Execute Vector,Catenate
0085 e402 | | Load 0x2,0x2
0086 e003 | | Load 0x0,0x3
0087 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0088 8406 | | Call 0x2,0x6
0089 e403 | | Load 0x2,0x3
008a e5f5 | | Load 0x2,-0xb
008b e5f6 | | Load 0x2,-0xa
008c e5f7 | | Load 0x2,-0x9
008d e5f8 | | Load 0x2,-0x8
008e e5f9 | | Load 0x2,-0x7
008f e5fa | | Load 0x2,-0x6
0090 e5fb | | Load 0x2,-0x5
0091 e405 | | Load 0x2,0x5
0092 e5fc | | Load 0x2,-0x4
0093 e5fd | | Load 0x2,-0x3
0094 e5fe | | Load 0x2,-0x2
0095 e5ff | | Load 0x2,-0x1
0096 8407 | | Call 0x2,0x7
0097 c403 | | Store 0x2,0x3
0098 00db | | Load_Top At_Offset_3
0099 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
009b e402 | | Load 0x2,0x2
009c e403 | | Load 0x2,0x3
009d e003 | | Load 0x0,0x3
009e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
009f 450c |E | Exit_Suprogram New_Top_Offset 0xc
00a0 TRAP_0020:
00a0 e001 | | Load 0x0,0x1
00a1 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00a2 010f | | Execute Exception,Equal
00a3 6808 |h | Jump_Zero 0xac
00a4 e404 | | Load 0x2,0x4
00a5 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
00a7 e402 | | Load 0x2,0x2
00a8 e403 | | Load 0x2,0x3
00a9 e003 | | Load 0x0,0x3
00aa 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00ab 450c |E | Exit_Suprogram New_Top_Offset 0xc
00ac 4884 |H | Short_Literal 0x84
00ad 010f | | Execute Exception,Equal
00ae 6808 |h | Jump_Zero 0xb7
00af e404 | | Load 0x2,0x4
00b0 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
00b2 e402 | | Load 0x2,0x2
00b3 e403 | | Load 0x2,0x3
00b4 e003 | | Load 0x0,0x3
00b5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b6 450c |E | Exit_Suprogram New_Top_Offset 0xc
00b7 e404 | | Load 0x2,0x4
00b8 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
00ba e402 | | Load 0x2,0x2
00bb e403 | | Load 0x2,0x3
00bc e003 | | Load 0x0,0x3
00bd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00be 450c |E | Exit_Suprogram New_Top_Offset 0xc
00bf 0000 | | .XXX[0x1]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00d4 | | .CONST 0x00d4 ; Address of begin
00c1 0163 | c | .CONST 0x0163 ; Address of exception handler
00c2 0007 | | .CONST 0x0007 ; Number of locals
00c3 INIT_00c0:
00c3 0092 0841 | A| Action Push_String_Extended,0x841 ; "Make_Path"
00c5 e001 | | Load 0x0,0x1
00c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00c8 e002 | | Load 0x0,0x2
00c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ca 02c7 | | Declare_Variable Any
00cb e5f1 | | Load 0x2,-0xf
00cc e002 | | Load 0x0,0x2
00cd 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00ce a404 | | Store_Unchecked 0x2,0x4
00cf 00ea | | Load_Encached Null_String_Cache
00d0 029f 0333 | 3| Declare_Subprogram INIT_0330,For_Call
00d2 029f 035b | [| Declare_Subprogram INIT_0358,For_Call
00d4 BODY_00c0:
00d4 00db | | Load_Top At_Offset_3
00d5 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
00d7 0092 0842 | B| Action Push_String_Extended,0x842 ; "From_Path"
00d9 e5ff | | Load 0x2,-0x1
00da e003 | | Load 0x0,0x3
00db 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00dc 01cc | | Execute Vector,Catenate
00dd 0092 0843 | C| Action Push_String_Extended,0x843 ; "New_Path_Name"
00df 01cc | | Execute Vector,Catenate
00e0 e5fe | | Load 0x2,-0x2
00e1 e003 | | Load 0x0,0x3
00e2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00e3 01cc | | Execute Vector,Catenate
00e4 0092 0844 | D| Action Push_String_Extended,0x844 ; "Remote_Machine => "
00e6 01cc | | Execute Vector,Catenate
00e7 e5fd | | Load 0x2,-0x3
00e8 e003 | | Load 0x0,0x3
00e9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00ea 01cc | | Execute Vector,Catenate
00eb 0092 0845 | E| Action Push_String_Extended,0x845 ; "Remote_Directory => "
00ed 01cc | | Execute Vector,Catenate
00ee e5fc | | Load 0x2,-0x4
00ef e003 | | Load 0x0,0x3
00f0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00f1 01cc | | Execute Vector,Catenate
00f2 0092 0846 | F| Action Push_String_Extended,0x846 ; "View_To_Modify"
00f4 01cc | | Execute Vector,Catenate
00f5 e5fb | | Load 0x2,-0x5
00f6 e003 | | Load 0x0,0x3
00f7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00f8 01cc | | Execute Vector,Catenate
00f9 0092 0847 | G| Action Push_String_Extended,0x847 ; "View_To_Import"
00fb 01cc | | Execute Vector,Catenate
00fc e5fa | | Load 0x2,-0x6
00fd e003 | | Load 0x0,0x3
00fe 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00ff 01cc | | Execute Vector,Catenate
0100 0092 0848 | H| Action Push_String_Extended,0x848 ; "Only_Change_Imports => "
0102 01cc | | Execute Vector,Catenate
0103 e5f9 | | Load 0x2,-0x7
0104 00e1 | | Load_Encached Boolean_Cache
0105 011c | | Execute Any,Convert_Unchecked
0106 1c01 | | Execute_Immediate Run_Utility,0x1
0107 01cc | | Execute Vector,Catenate
0108 0092 0849 | I| Action Push_String_Extended,0x849 ; ", Model"
010a 01cc | | Execute Vector,Catenate
010b e5f8 | | Load 0x2,-0x8
010c e003 | | Load 0x0,0x3
010d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
010e 01cc | | Execute Vector,Catenate
010f 0092 084a | J| Action Push_String_Extended,0x84a ; "Join_Paths => "
0111 01cc | | Execute Vector,Catenate
0112 e5f7 | | Load 0x2,-0x9
0113 00e1 | | Load_Encached Boolean_Cache
0114 011c | | Execute Any,Convert_Unchecked
0115 1c01 | | Execute_Immediate Run_Utility,0x1
0116 01cc | | Execute Vector,Catenate
0117 0092 084b | K| Action Push_String_Extended,0x84b ; ", Remake_Demoted_Units => "
0119 01cc | | Execute Vector,Catenate
011a e5f6 | | Load 0x2,-0xa
011b 00e1 | | Load_Encached Boolean_Cache
011c 011c | | Execute Any,Convert_Unchecked
011d 1c01 | | Execute_Immediate Run_Utility,0x1
011e 01cc | | Execute Vector,Catenate
011f 0092 084c | L| Action Push_String_Extended,0x84c ; ", Goal => "
0121 01cc | | Execute Vector,Catenate
0122 e5f5 | | Load 0x2,-0xb
0123 e005 | | Load 0x0,0x5
0124 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0125 011c | | Execute Any,Convert_Unchecked
0126 1c01 | | Execute_Immediate Run_Utility,0x1
0127 01cc | | Execute Vector,Catenate
0128 0092 084d | M| Action Push_String_Extended,0x84d ; ", Comments"
012a 01cc | | Execute Vector,Catenate
012b e5f4 | | Load 0x2,-0xc
012c e003 | | Load 0x0,0x3
012d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
012e 01cc | | Execute Vector,Catenate
012f 0092 083e | >| Action Push_String_Extended,0x83e ; "Work_Order"
0131 01cc | | Execute Vector,Catenate
0132 e5f3 | | Load 0x2,-0xd
0133 e003 | | Load 0x0,0x3
0134 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0135 01cc | | Execute Vector,Catenate
0136 0092 084e | N| Action Push_String_Extended,0x84e ; "Volume =>"
0138 01cc | | Execute Vector,Catenate
0139 e5f2 | | Load 0x2,-0xe
013a 00e0 | | Load_Encached Standard_Cache
013b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
013c 01cc | | Execute Vector,Catenate
013d 0092 0840 | @| Action Push_String_Extended,0x840 ; ", Response"
013f 01cc | | Execute Vector,Catenate
0140 e5f1 | | Load 0x2,-0xf
0141 e003 | | Load 0x0,0x3
0142 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0143 01cc | | Execute Vector,Catenate
0144 e402 | | Load 0x2,0x2
0145 e003 | | Load 0x0,0x3
0146 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0147 8406 | | Call 0x2,0x6
0148 e403 | | Load 0x2,0x3
0149 e5f1 | | Load 0x2,-0xf
014a e5f2 | | Load 0x2,-0xe
014b e5f3 | | Load 0x2,-0xd
014c e5f4 | | Load 0x2,-0xc
014d e5f5 | | Load 0x2,-0xb
014e e5f6 | | Load 0x2,-0xa
014f e5f7 | | Load 0x2,-0x9
0150 e5f8 | | Load 0x2,-0x8
0151 e5f9 | | Load 0x2,-0x7
0152 e405 | | Load 0x2,0x5
0153 e5fc | | Load 0x2,-0x4
0154 e5fd | | Load 0x2,-0x3
0155 e5fa | | Load 0x2,-0x6
0156 e5fb | | Load 0x2,-0x5
0157 e5fe | | Load 0x2,-0x2
0158 e5ff | | Load 0x2,-0x1
0159 8407 | | Call 0x2,0x7
015a c403 | | Store 0x2,0x3
015b 00db | | Load_Top At_Offset_3
015c 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
015e e402 | | Load 0x2,0x2
015f e403 | | Load 0x2,0x3
0160 e003 | | Load 0x0,0x3
0161 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0162 4510 |E | Exit_Suprogram New_Top_Offset 0x10
0163 TRAP_00c0:
0163 e001 | | Load 0x0,0x1
0164 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0165 010f | | Execute Exception,Equal
0166 6808 |h | Jump_Zero 0x16f
0167 e404 | | Load 0x2,0x4
0168 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
016a e402 | | Load 0x2,0x2
016b e403 | | Load 0x2,0x3
016c e003 | | Load 0x0,0x3
016d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
016e 4510 |E | Exit_Suprogram New_Top_Offset 0x10
016f 4884 |H | Short_Literal 0x84
0170 010f | | Execute Exception,Equal
0171 6808 |h | Jump_Zero 0x17a
0172 e404 | | Load 0x2,0x4
0173 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
0175 e402 | | Load 0x2,0x2
0176 e403 | | Load 0x2,0x3
0177 e003 | | Load 0x0,0x3
0178 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0179 4510 |E | Exit_Suprogram New_Top_Offset 0x10
017a e404 | | Load 0x2,0x4
017b 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
017d e402 | | Load 0x2,0x2
017e e403 | | Load 0x2,0x3
017f e003 | | Load 0x0,0x3
0180 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0181 4510 |E | Exit_Suprogram New_Top_Offset 0x10
0182 0000 0000 | | .BLANK 0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 01a1 | | .CONST 0x01a1 ; Address of begin
0189 0217 | | .CONST 0x0217 ; Address of exception handler
018a 0008 | | .CONST 0x0008 ; Number of locals
018b INIT_0188:
018b 0092 084f | O| Action Push_String_Extended,0x84f ; "Make_Subpath"
018d e001 | | Load 0x0,0x1
018e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0190 e002 | | Load 0x0,0x2
0191 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0192 02c7 | | Declare_Variable Any
0193 e5f4 | | Load 0x2,-0xc
0194 e002 | | Load 0x0,0x2
0195 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0196 a404 | | Store_Unchecked 0x2,0x4
0197 00ea | | Load_Encached Null_String_Cache
0198 e006 | | Load 0x0,0x6
0199 1b0f | | Execute Package,Field_Read,Field_Number 0xf
019a 02c7 | | Declare_Variable Any
019b 00d8 | | Load_Top At_Offset_0
019c 1c00 | | Execute_Immediate Run_Utility,0x0
019d 029f 0393 | | Declare_Subprogram INIT_0390,For_Call
019f 029f 03c3 | | Declare_Subprogram INIT_03c0,For_Call
01a1 BODY_0188:
01a1 e404 | | Load 0x2,0x4
01a2 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
01a4 0092 0842 | B| Action Push_String_Extended,0x842 ; "From_Path"
01a6 e5ff | | Load 0x2,-0x1
01a7 e003 | | Load 0x0,0x3
01a8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01a9 01cc | | Execute Vector,Catenate
01aa 0092 0850 | P| Action Push_String_Extended,0x850 ; "New_Subpath_Extension"
01ac 01cc | | Execute Vector,Catenate
01ad e5fe | | Load 0x2,-0x2
01ae e003 | | Load 0x0,0x3
01af 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01b0 01cc | | Execute Vector,Catenate
01b1 0092 0839 | 9| Action Push_String_Extended,0x839 ; "Remote_Directory"
01b3 01cc | | Execute Vector,Catenate
01b4 e5fd | | Load 0x2,-0x3
01b5 e003 | | Load 0x0,0x3
01b6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01b7 01cc | | Execute Vector,Catenate
01b8 0092 0846 | F| Action Push_String_Extended,0x846 ; "View_To_Modify"
01ba 01cc | | Execute Vector,Catenate
01bb e5fc | | Load 0x2,-0x4
01bc e003 | | Load 0x0,0x3
01bd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01be 01cc | | Execute Vector,Catenate
01bf 0092 0847 | G| Action Push_String_Extended,0x847 ; "View_To_Import"
01c1 01cc | | Execute Vector,Catenate
01c2 e5fb | | Load 0x2,-0x5
01c3 e003 | | Load 0x0,0x3
01c4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01c5 01cc | | Execute Vector,Catenate
01c6 0092 0848 | H| Action Push_String_Extended,0x848 ; "Only_Change_Imports => "
01c8 01cc | | Execute Vector,Catenate
01c9 e5fa | | Load 0x2,-0x6
01ca 00e1 | | Load_Encached Boolean_Cache
01cb 011c | | Execute Any,Convert_Unchecked
01cc 1c01 | | Execute_Immediate Run_Utility,0x1
01cd 01cc | | Execute Vector,Catenate
01ce 0092 084b | K| Action Push_String_Extended,0x84b ; ", Remake_Demoted_Units => "
01d0 01cc | | Execute Vector,Catenate
01d1 e5f9 | | Load 0x2,-0x7
01d2 00e1 | | Load_Encached Boolean_Cache
01d3 011c | | Execute Any,Convert_Unchecked
01d4 1c01 | | Execute_Immediate Run_Utility,0x1
01d5 01cc | | Execute Vector,Catenate
01d6 0092 084c | L| Action Push_String_Extended,0x84c ; ", Goal => "
01d8 01cc | | Execute Vector,Catenate
01d9 e5f8 | | Load 0x2,-0x8
01da e005 | | Load 0x0,0x5
01db 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01dc 011c | | Execute Any,Convert_Unchecked
01dd 1c01 | | Execute_Immediate Run_Utility,0x1
01de 01cc | | Execute Vector,Catenate
01df 0092 084d | M| Action Push_String_Extended,0x84d ; ", Comments"
01e1 01cc | | Execute Vector,Catenate
01e2 e5f7 | | Load 0x2,-0x9
01e3 e003 | | Load 0x0,0x3
01e4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01e5 01cc | | Execute Vector,Catenate
01e6 0092 083e | >| Action Push_String_Extended,0x83e ; "Work_Order"
01e8 01cc | | Execute Vector,Catenate
01e9 e5f6 | | Load 0x2,-0xa
01ea e003 | | Load 0x0,0x3
01eb 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ec 01cc | | Execute Vector,Catenate
01ed 0092 084e | N| Action Push_String_Extended,0x84e ; "Volume =>"
01ef 01cc | | Execute Vector,Catenate
01f0 e5f5 | | Load 0x2,-0xb
01f1 00e0 | | Load_Encached Standard_Cache
01f2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01f3 01cc | | Execute Vector,Catenate
01f4 0092 0840 | @| Action Push_String_Extended,0x840 ; ", Response"
01f6 01cc | | Execute Vector,Catenate
01f7 e5f4 | | Load 0x2,-0xc
01f8 e003 | | Load 0x0,0x3
01f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01fa 01cc | | Execute Vector,Catenate
01fb e402 | | Load 0x2,0x2
01fc e003 | | Load 0x0,0x3
01fd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01fe 8407 | | Call 0x2,0x7
01ff e403 | | Load 0x2,0x3
0200 e5f4 | | Load 0x2,-0xc
0201 e5f5 | | Load 0x2,-0xb
0202 e5f6 | | Load 0x2,-0xa
0203 e5f7 | | Load 0x2,-0x9
0204 e5f8 | | Load 0x2,-0x8
0205 e5f9 | | Load 0x2,-0x7
0206 e5fa | | Load 0x2,-0x6
0207 e405 | | Load 0x2,0x5
0208 e5fd | | Load 0x2,-0x3
0209 e5fb | | Load 0x2,-0x5
020a e5fc | | Load 0x2,-0x4
020b e5fe | | Load 0x2,-0x2
020c e5ff | | Load 0x2,-0x1
020d 8408 | | Call 0x2,0x8
020e c403 | | Store 0x2,0x3
020f e404 | | Load 0x2,0x4
0210 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
0212 e402 | | Load 0x2,0x2
0213 e403 | | Load 0x2,0x3
0214 e003 | | Load 0x0,0x3
0215 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0216 450d |E | Exit_Suprogram New_Top_Offset 0xd
0217 TRAP_0188:
0217 e001 | | Load 0x0,0x1
0218 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0219 010f | | Execute Exception,Equal
021a 6808 |h | Jump_Zero 0x223
021b e404 | | Load 0x2,0x4
021c 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
021e e402 | | Load 0x2,0x2
021f e403 | | Load 0x2,0x3
0220 e003 | | Load 0x0,0x3
0221 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0222 450d |E | Exit_Suprogram New_Top_Offset 0xd
0223 4884 |H | Short_Literal 0x84
0224 010f | | Execute Exception,Equal
0225 6808 |h | Jump_Zero 0x22e
0226 e404 | | Load 0x2,0x4
0227 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
0229 e402 | | Load 0x2,0x2
022a e403 | | Load 0x2,0x3
022b e003 | | Load 0x0,0x3
022c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
022d 450d |E | Exit_Suprogram New_Top_Offset 0xd
022e e404 | | Load 0x2,0x4
022f 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
0231 e402 | | Load 0x2,0x2
0232 e403 | | Load 0x2,0x3
0233 e003 | | Load 0x0,0x3
0234 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0235 450d |E | Exit_Suprogram New_Top_Offset 0xd
0236 0000 0000 | | .XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0249 | I | .CONST 0x0249 ; Address of begin
0239 028f | | .CONST 0x028f ; Address of exception handler
023a 0005 | | .CONST 0x0005 ; Number of locals
023b INIT_0238:
023b 0092 0851 | Q| Action Push_String_Extended,0x851 ; "Destroy_View"
023d e001 | | Load 0x0,0x1
023e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0240 e002 | | Load 0x0,0x2
0241 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0242 02c7 | | Declare_Variable Any
0243 e5f9 | | Load 0x2,-0x7
0244 e002 | | Load 0x0,0x2
0245 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0246 a404 | | Store_Unchecked 0x2,0x4
0247 029f 042b | +| Declare_Subprogram INIT_0428,For_Call
0249 BODY_0238:
0249 00d9 | | Load_Top At_Offset_1
024a 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
024c 0092 0852 | R| Action Push_String_Extended,0x852 ; "What_View"
024e e5ff | | Load 0x2,-0x1
024f e003 | | Load 0x0,0x3
0250 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0251 01cc | | Execute Vector,Catenate
0252 0092 0853 | S| Action Push_String_Extended,0x853 ; "Demote_Clients => "
0254 01cc | | Execute Vector,Catenate
0255 e5fe | | Load 0x2,-0x2
0256 00e1 | | Load_Encached Boolean_Cache
0257 011c | | Execute Any,Convert_Unchecked
0258 1c01 | | Execute_Immediate Run_Utility,0x1
0259 01cc | | Execute Vector,Catenate
025a 0092 0854 | T| Action Push_String_Extended,0x854 ; ", Destroy_Configuration_Also => "
025c 01cc | | Execute Vector,Catenate
025d e5fd | | Load 0x2,-0x3
025e 00e1 | | Load_Encached Boolean_Cache
025f 011c | | Execute Any,Convert_Unchecked
0260 1c01 | | Execute_Immediate Run_Utility,0x1
0261 01cc | | Execute Vector,Catenate
0262 0092 084d | M| Action Push_String_Extended,0x84d ; ", Comments"
0264 01cc | | Execute Vector,Catenate
0265 e5fb | | Load 0x2,-0x5
0266 e003 | | Load 0x0,0x3
0267 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0268 01cc | | Execute Vector,Catenate
0269 0092 083e | >| Action Push_String_Extended,0x83e ; "Work_Order"
026b 01cc | | Execute Vector,Catenate
026c e5fa | | Load 0x2,-0x6
026d e003 | | Load 0x0,0x3
026e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
026f 01cc | | Execute Vector,Catenate
0270 0092 0855 | U| Action Push_String_Extended,0x855 ; "Response"
0272 01cc | | Execute Vector,Catenate
0273 e5f9 | | Load 0x2,-0x7
0274 e003 | | Load 0x0,0x3
0275 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0276 01cc | | Execute Vector,Catenate
0277 e402 | | Load 0x2,0x2
0278 e003 | | Load 0x0,0x3
0279 1813 | | Execute Package,Field_Execute,Field_Number 0x13
027a 00d9 | | Load_Top At_Offset_1
027b e007 | | Load 0x0,0x7
027c 180f | | Execute Package,Field_Execute,Field_Number 0xf
027d 00da | | Load_Top At_Offset_2
027e e5f9 | | Load 0x2,-0x7
027f e5fa | | Load 0x2,-0x6
0280 e5fb | | Load 0x2,-0x5
0281 e5fc | | Load 0x2,-0x4
0282 e5fd | | Load 0x2,-0x3
0283 e5fe | | Load 0x2,-0x2
0284 e5ff | | Load 0x2,-0x1
0285 8405 | | Call 0x2,0x5
0286 005b | [ | Store_Top Discrete,At_Offset_3
0287 00d9 | | Load_Top At_Offset_1
0288 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
028a e402 | | Load 0x2,0x2
028b e403 | | Load 0x2,0x3
028c e003 | | Load 0x0,0x3
028d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
028e 4508 |E | Exit_Suprogram New_Top_Offset 0x8
028f TRAP_0238:
028f e001 | | Load 0x0,0x1
0290 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0291 010f | | Execute Exception,Equal
0292 6808 |h | Jump_Zero 0x29b
0293 00da | | Load_Top At_Offset_2
0294 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
0296 e402 | | Load 0x2,0x2
0297 e403 | | Load 0x2,0x3
0298 e003 | | Load 0x0,0x3
0299 1814 | | Execute Package,Field_Execute,Field_Number 0x14
029a 4508 |E | Exit_Suprogram New_Top_Offset 0x8
029b 4884 |H | Short_Literal 0x84
029c 010f | | Execute Exception,Equal
029d 6808 |h | Jump_Zero 0x2a6
029e 00da | | Load_Top At_Offset_2
029f 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
02a1 e402 | | Load 0x2,0x2
02a2 e403 | | Load 0x2,0x3
02a3 e003 | | Load 0x0,0x3
02a4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02a5 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02a6 00da | | Load_Top At_Offset_2
02a7 0092 0835 | 5| Action Push_String_Extended,0x835 ; "Rcf_Cmvc."
02a9 e402 | | Load 0x2,0x2
02aa e403 | | Load 0x2,0x3
02ab e003 | | Load 0x0,0x3
02ac 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02ad 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02ae 0000 0000 | | .XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 e5fd | | Load 0x2,-0x3
02b4 4800 |H | Short_Literal 0x0
02b5 e5ff | | Load 0x2,-0x1
02b6 e008 | | Load 0x0,0x8
02b7 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
02b8 e5fd | | Load 0x2,-0x3
02b9 4800 |H | Short_Literal 0x0
02ba e5ff | | Load 0x2,-0x1
02bb e5fe | | Load 0x2,-0x2
02bc e008 | | Load 0x0,0x8
02bd 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
02be 012f | / | Execute Any,Equal
02bf 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 e404 | | Load 0x2,0x4
02c4 e007 | | Load 0x0,0x7
02c5 180f | | Execute Package,Field_Execute,Field_Number 0xf
02c6 e404 | | Load 0x2,0x4
02c7 0092 0836 | 6| Action Push_String_Extended,0x836 ; "Subsystem"
02c9 e5ff | | Load 0x2,-0x1
02ca e007 | | Load 0x0,0x7
02cb 180e | | Execute Package,Field_Execute,Field_Number 0xe
02cc e404 | | Load 0x2,0x4
02cd 0092 0837 | 7| Action Push_String_Extended,0x837 ; "Working_View_Base_Name"
02cf e5fe | | Load 0x2,-0x2
02d0 e007 | | Load 0x0,0x7
02d1 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d2 e404 | | Load 0x2,0x4
02d3 0092 083c | <| Action Push_String_Extended,0x83c ; "Model"
02d5 4801 |H | Short_Literal 0x1
02d6 e5f9 | | Load 0x2,-0x7
02d7 e007 | | Load 0x0,0x7
02d8 180d | | Execute Package,Field_Execute,Field_Number 0xd
02d9 e404 | | Load 0x2,0x4
02da 4800 |H | Short_Literal 0x0
02db e5ff | | Load 0x2,-0x1
02dc e007 | | Load 0x0,0x7
02dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02de e404 | | Load 0x2,0x4
02df e5fe | | Load 0x2,-0x2
02e0 e5ff | | Load 0x2,-0x1
02e1 8009 | | Call 0x0,0x9
02e2 e007 | | Load 0x0,0x7
02e3 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02e4 e404 | | Load 0x2,0x4
02e5 e006 | | Load 0x0,0x6
02e6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02e7 e5f9 | | Load 0x2,-0x7
02e8 e007 | | Load 0x0,0x7
02e9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02eb 0000 0000 | | .BLANK 0000[0x5]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 0318 | | .CONST 0x0318 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0007 | | .CONST 0x0007 ; Number of locals
02f3 INIT_02f0:
02f3 e002 | | Load 0x0,0x2
02f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f5 02c7 | | Declare_Variable Any
02f6 e7f4 | | Load 0x3,-0xc
02f7 e002 | | Load 0x0,0x2
02f8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
02f9 a602 | | Store_Unchecked 0x3,0x2
02fa e006 | | Load 0x0,0x6
02fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fc 02c7 | | Declare_Variable Any
02fd 00d8 | | Load_Top At_Offset_0
02fe 1c00 | | Execute_Immediate Run_Utility,0x0
02ff e006 | | Load 0x0,0x6
0300 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0301 02c7 | | Declare_Variable Any
0302 00da | | Load_Top At_Offset_2
0303 4801 |H | Short_Literal 0x1
0304 e006 | | Load 0x0,0x6
0305 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0306 e7f8 | | Load 0x3,-0x8
0307 e008 | | Load 0x0,0x8
0308 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0309 a604 | | Store_Unchecked 0x3,0x4
030a e006 | | Load 0x0,0x6
030b 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
030c 0322 | " | Declare_Variable Record
030d 00db | | Load_Top At_Offset_3
030e 00da | | Load_Top At_Offset_2
030f e008 | | Load 0x0,0x8
0310 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0311 00d9 | | Load_Top At_Offset_1
0312 017d | } | Execute Record,Structure_Write
0313 e7fe | | Load 0x3,-0x2
0314 e7ff | | Load 0x3,-0x1
0315 8009 | | Call 0x0,0x9
0316 029f 04cb | | Declare_Subprogram INIT_04c8,For_Call
0318 BODY_02f0:
0318 8607 | | Call 0x3,0x7
0319 e602 | | Load 0x3,0x2
031a 4801 |H | Short_Literal 0x1
031b 00db | | Load_Top At_Offset_3
031c e008 | | Load 0x0,0x8
031d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
031e c603 | | Store 0x3,0x3
031f e7f3 | | Load 0x3,-0xd
0320 e602 | | Load 0x3,0x2
0321 4800 |H | Short_Literal 0x0
0322 4801 |H | Short_Literal 0x1
0323 e605 | | Load 0x3,0x5
0324 4801 |H | Short_Literal 0x1
0325 e7fb | | Load 0x3,-0x5
0326 e7fc | | Load 0x3,-0x4
0327 e7fd | | Load 0x3,-0x3
0328 e603 | | Load 0x3,0x3
0329 800a | | Call 0x0,0xa
032a c7f3 | | Store 0x3,-0xd
032b 450d |E | Exit_Suprogram New_Top_Offset 0xd
032c 0000 0000 | | .BLANK 0000[0x4]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 e404 | | Load 0x2,0x4
0334 e007 | | Load 0x0,0x7
0335 180f | | Execute Package,Field_Execute,Field_Number 0xf
0336 e404 | | Load 0x2,0x4
0337 0092 0843 | C| Action Push_String_Extended,0x843 ; "New_Path_Name"
0339 4801 |H | Short_Literal 0x1
033a e5fe | | Load 0x2,-0x2
033b e007 | | Load 0x0,0x7
033c 180d | | Execute Package,Field_Execute,Field_Number 0xd
033d e404 | | Load 0x2,0x4
033e 0092 0842 | B| Action Push_String_Extended,0x842 ; "From_Path"
0340 e5ff | | Load 0x2,-0x1
0341 e007 | | Load 0x0,0x7
0342 180e | | Execute Package,Field_Execute,Field_Number 0xe
0343 e404 | | Load 0x2,0x4
0344 00d8 | | Load_Top At_Offset_0
0345 4801 |H | Short_Literal 0x1
0346 e5ff | | Load 0x2,-0x1
0347 e008 | | Load 0x0,0x8
0348 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0349 e5f8 | | Load 0x2,-0x8
034a e007 | | Load 0x0,0x7
034b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
034c e404 | | Load 0x2,0x4
034d e5fe | | Load 0x2,-0x2
034e e5ff | | Load 0x2,-0x1
034f 800b | | Call 0x0,0xb
0350 e007 | | Load 0x0,0x7
0351 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0352 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0353 0000 0000 | | .BLANK 0000[0x5]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 036c | l | .CONST 0x036c ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0006 | | .CONST 0x0006 ; Number of locals
035b INIT_0358:
035b e002 | | Load 0x0,0x2
035c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
035d 02c7 | | Declare_Variable Any
035e e7f0 | | Load 0x3,-0x10
035f e002 | | Load 0x0,0x2
0360 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0361 a602 | | Store_Unchecked 0x3,0x2
0362 e7fe | | Load 0x3,-0x2
0363 e7ff | | Load 0x3,-0x1
0364 800b | | Call 0x0,0xb
0365 e005 | | Load 0x0,0x5
0366 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0367 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
0368 029f 0503 | | Declare_Subprogram INIT_0500,For_Call
036a 029f 056b | k| Declare_Subprogram INIT_0568,For_Call
036c BODY_0358:
036c e7f8 | | Load 0x3,-0x8
036d 6814 |h | Jump_Zero 0x382
036e e602 | | Load 0x3,0x2
036f 4801 |H | Short_Literal 0x1
0370 4801 |H | Short_Literal 0x1
0371 e00c | | Load 0x0,0xc
0372 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0373 035b | [ | Declare_Type Array,Constrained
0374 0337 | 7 | Declare_Variable Array
0375 0092 0856 | V| Action Push_String_Extended,0x856 ; "Only_Change_Imports"
0377 e00c | | Load 0x0,0xc
0378 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0379 e00c | | Load 0x0,0xc
037a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
037b 0119 | | Execute Any,Check_In_Formal_Type
037c 4801 |H | Short_Literal 0x1
037d 00da | | Load_Top At_Offset_2
037e 01d6 | | Execute Vector,Field_Write
037f 600c |` | Indirect_Literal Discrete,0x38c,{0x00000000, 0x0000884a}
0380 e001 | | Load 0x0,0x1
0381 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0382 e7f5 | | Load 0x3,-0xb
0383 7003 |p | Jump_Nonzero 0x387
0384 4801 |H | Short_Literal 0x1
0385 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0386 7802 |x | Jump 0x389
0387 e7f4 | | Load 0x3,-0xc
0388 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0389 8605 | | Call 0x3,0x5
038a 8606 | | Call 0x3,0x6
038b 4511 |E | Exit_Suprogram New_Top_Offset 0x11
038c 0000 0000 | | .LITERAL {0x00000000, 0x0000884a}
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 e404 | | Load 0x2,0x4
0394 e007 | | Load 0x0,0x7
0395 180f | | Execute Package,Field_Execute,Field_Number 0xf
0396 e404 | | Load 0x2,0x4
0397 0092 0850 | P| Action Push_String_Extended,0x850 ; "New_Subpath_Extension"
0399 4801 |H | Short_Literal 0x1
039a e5fe | | Load 0x2,-0x2
039b e007 | | Load 0x0,0x7
039c 180d | | Execute Package,Field_Execute,Field_Number 0xd
039d e404 | | Load 0x2,0x4
039e 0092 0842 | B| Action Push_String_Extended,0x842 ; "From_Path"
03a0 e5ff | | Load 0x2,-0x1
03a1 e007 | | Load 0x0,0x7
03a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
03a3 e404 | | Load 0x2,0x4
03a4 4801 |H | Short_Literal 0x1
03a5 e5ff | | Load 0x2,-0x1
03a6 e008 | | Load 0x0,0x8
03a7 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03a8 c406 | | Store 0x2,0x6
03a9 e404 | | Load 0x2,0x4
03aa e406 | | Load 0x2,0x6
03ab e007 | | Load 0x0,0x7
03ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ad e404 | | Load 0x2,0x4
03ae e406 | | Load 0x2,0x6
03af e007 | | Load 0x0,0x7
03b0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03b1 e404 | | Load 0x2,0x4
03b2 00d8 | | Load_Top At_Offset_0
03b3 e5fe | | Load 0x2,-0x2
03b4 e5ff | | Load 0x2,-0x1
03b5 800d | | Call 0x0,0xd
03b6 e007 | | Load 0x0,0x7
03b7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03b8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03b9 0000 0000 | | .BLANK 0000[0x7]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03ea | | .CONST 0x03ea ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0008 | | .CONST 0x0008 ; Number of locals
03c3 INIT_03c0:
03c3 e002 | | Load 0x0,0x2
03c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c5 02c7 | | Declare_Variable Any
03c6 e7f3 | | Load 0x3,-0xd
03c7 e002 | | Load 0x0,0x2
03c8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03c9 a602 | | Store_Unchecked 0x3,0x2
03ca 00d8 | | Load_Top At_Offset_0
03cb e7fe | | Load 0x3,-0x2
03cc e7ff | | Load 0x3,-0x1
03cd 800d | | Call 0x0,0xd
03ce e005 | | Load 0x0,0x5
03cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d0 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
03d1 e006 | | Load 0x0,0x6
03d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d3 02c7 | | Declare_Variable Any
03d4 00d8 | | Load_Top At_Offset_0
03d5 1c00 | | Execute_Immediate Run_Utility,0x0
03d6 e006 | | Load 0x0,0x6
03d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d8 02c7 | | Declare_Variable Any
03d9 e602 | | Load 0x3,0x2
03da 4801 |H | Short_Literal 0x1
03db e7ff | | Load 0x3,-0x1
03dc e008 | | Load 0x0,0x8
03dd 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03de a606 | | Store_Unchecked 0x3,0x6
03df e006 | | Load 0x0,0x6
03e0 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
03e1 0322 | " | Declare_Variable Record
03e2 e602 | | Load 0x3,0x2
03e3 00da | | Load_Top At_Offset_2
03e4 e008 | | Load 0x0,0x8
03e5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
03e6 00d9 | | Load_Top At_Offset_1
03e7 017d | } | Execute Record,Structure_Write
03e8 029f 0593 | | Declare_Subprogram INIT_0590,For_Call
03ea BODY_03c0:
03ea e7f8 | | Load 0x3,-0x8
03eb 7003 |p | Jump_Nonzero 0x3ef
03ec 4801 |H | Short_Literal 0x1
03ed a604 | | Store_Unchecked 0x3,0x4
03ee 7802 |x | Jump 0x3f1
03ef e7f7 | | Load 0x3,-0x9
03f0 a604 | | Store_Unchecked 0x3,0x4
03f1 e7f9 | | Load 0x3,-0x7
03f2 6814 |h | Jump_Zero 0x407
03f3 e602 | | Load 0x3,0x2
03f4 4801 |H | Short_Literal 0x1
03f5 4801 |H | Short_Literal 0x1
03f6 e00c | | Load 0x0,0xc
03f7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03f8 035b | [ | Declare_Type Array,Constrained
03f9 0337 | 7 | Declare_Variable Array
03fa 0092 0856 | V| Action Push_String_Extended,0x856 ; "Only_Change_Imports"
03fc e00c | | Load 0x0,0xc
03fd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03fe e00c | | Load 0x0,0xc
03ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0400 0119 | | Execute Any,Check_In_Formal_Type
0401 4801 |H | Short_Literal 0x1
0402 00da | | Load_Top At_Offset_2
0403 01d6 | | Execute Vector,Field_Write
0404 601b |` | Indirect_Literal Discrete,0x420,{0x00000000, 0x0000884a}
0405 e001 | | Load 0x0,0x1
0406 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0407 8608 | | Call 0x3,0x8
0408 e602 | | Load 0x3,0x2
0409 4801 |H | Short_Literal 0x1
040a e603 | | Load 0x3,0x3
040b e008 | | Load 0x0,0x8
040c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
040d c605 | | Store 0x3,0x5
040e e7f2 | | Load 0x3,-0xe
040f e602 | | Load 0x3,0x2
0410 4800 |H | Short_Literal 0x0
0411 e604 | | Load 0x3,0x4
0412 e607 | | Load 0x3,0x7
0413 4801 |H | Short_Literal 0x1
0414 e7fa | | Load 0x3,-0x6
0415 e7fb | | Load 0x3,-0x5
0416 e602 | | Load 0x3,0x2
0417 e606 | | Load 0x3,0x6
0418 800e | | Call 0x0,0xe
0419 e605 | | Load 0x3,0x5
041a 800a | | Call 0x0,0xa
041b c7f2 | | Store 0x3,-0xe
041c 450e |E | Exit_Suprogram New_Top_Offset 0xe
041d 0000 0000 | | .XXX[0x3]
041f 0000 | |
0420 0000 0000 | | .LITERAL {0x00000000, 0x0000884a}
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0453 | S | .CONST 0x0453 ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 000e | | .CONST 0x000e ; Number of locals
042b INIT_0428:
042b e002 | | Load 0x0,0x2
042c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042d 02c7 | | Declare_Variable Any
042e e7f9 | | Load 0x3,-0x7
042f e002 | | Load 0x0,0x2
0430 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0431 a602 | | Store_Unchecked 0x3,0x2
0432 e001 | | Load 0x0,0x1
0433 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0434 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0435 e006 | | Load 0x0,0x6
0436 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0437 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0438 02c7 | | Declare_Variable Any
0439 00d8 | | Load_Top At_Offset_0
043a 1c00 | | Execute_Immediate Run_Utility,0x0
043b 00e1 | | Load_Encached Boolean_Cache
043c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
043d e006 | | Load 0x0,0x6
043e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
043f 00e1 | | Load_Encached Boolean_Cache
0440 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0441 e006 | | Load 0x0,0x6
0442 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0443 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0444 02c7 | | Declare_Variable Any
0445 00d8 | | Load_Top At_Offset_0
0446 1c00 | | Execute_Immediate Run_Utility,0x0
0447 029f 0623 | #| Declare_Subprogram INIT_0620,For_Call
0449 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call
044b 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call
044d 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call
044f 029f 0683 | | Declare_Subprogram INIT_0680,For_Call
0451 029f 07bb | | Declare_Subprogram INIT_07b8,For_Call
0453 BODY_0428:
0453 e608 | | Load 0x3,0x8
0454 0120 | | Execute Any,Is_Value
0455 6804 |h | Jump_Zero 0x45a
0456 e006 | | Load 0x0,0x6
0457 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0458 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0459 7801 |x | Jump 0x45b
045a e608 | | Load 0x3,0x8
045b e00f | | Load 0x0,0xf
045c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
045d e010 | | Load 0x0,0x10
045e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
045f e006 | | Load 0x0,0x6
0460 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0461 180f | | Execute Package,Field_Execute,Field_Number 0xf
0462 c608 | | Store 0x3,0x8
0463 e602 | | Load 0x3,0x2
0464 4801 |H | Short_Literal 0x1
0465 e7ff | | Load 0x3,-0x1
0466 e008 | | Load 0x0,0x8
0467 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0468 c604 | | Store 0x3,0x4
0469 e602 | | Load 0x3,0x2
046a e00c | | Load 0x0,0xc
046b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
046c 6057 |`W | Indirect_Literal Discrete,0x4c4,{0x00000000, 0x00008875}
046d e001 | | Load 0x0,0x1
046e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
046f 00cf | | Action Mark_Auxiliary
0470 781d |x | Jump 0x48e
0471 e602 | | Load 0x3,0x2
0472 4801 |H | Short_Literal 0x1
0473 4801 |H | Short_Literal 0x1
0474 e00c | | Load 0x0,0xc
0475 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0476 035b | [ | Declare_Type Array,Constrained
0477 0337 | 7 | Declare_Variable Array
0478 e602 | | Load 0x3,0x2
0479 4801 |H | Short_Literal 0x1
047a e604 | | Load 0x3,0x4
047b e008 | | Load 0x0,0x8
047c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
047d e00c | | Load 0x0,0xc
047e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
047f e00c | | Load 0x0,0xc
0480 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0481 0119 | | Execute Any,Check_In_Formal_Type
0482 4801 |H | Short_Literal 0x1
0483 00da | | Load_Top At_Offset_2
0484 01d6 | | Execute Vector,Field_Write
0485 603a |`: | Indirect_Literal Discrete,0x4c0,{0x00000000, 0x00008876}
0486 e001 | | Load 0x0,0x1
0487 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0488 e604 | | Load 0x3,0x4
0489 e006 | | Load 0x0,0x6
048a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
048b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
048c c604 | | Store 0x3,0x4
048d 00c9 | | Action Pop_Auxiliary_Loop
048e e604 | | Load 0x3,0x4
048f e006 | | Load 0x0,0x6
0490 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0491 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0492 6fde |o | Jump_Zero 0x471
0493 00ce | | Action Pop_Auxiliary
0494 e602 | | Load 0x3,0x2
0495 4801 |H | Short_Literal 0x1
0496 4801 |H | Short_Literal 0x1
0497 e00c | | Load 0x0,0xc
0498 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0499 035b | [ | Declare_Type Array,Constrained
049a 0337 | 7 | Declare_Variable Array
049b 00ea | | Load_Encached Null_String_Cache
049c e00c | | Load 0x0,0xc
049d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
049e e00c | | Load 0x0,0xc
049f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04a0 0119 | | Execute Any,Check_In_Formal_Type
04a1 4801 |H | Short_Literal 0x1
04a2 00da | | Load_Top At_Offset_2
04a3 01d6 | | Execute Vector,Field_Write
04a4 601b |` | Indirect_Literal Discrete,0x4c0,{0x00000000, 0x00008876}
04a5 e001 | | Load 0x0,0x1
04a6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04a7 e604 | | Load 0x3,0x4
04a8 e006 | | Load 0x0,0x6
04a9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04aa 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04ab c604 | | Store 0x3,0x4
04ac 00cf | | Action Mark_Auxiliary
04ad 7807 |x | Jump 0x4b5
04ae 860d | | Call 0x3,0xd
04af e604 | | Load 0x3,0x4
04b0 e006 | | Load 0x0,0x6
04b1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04b3 c604 | | Store 0x3,0x4
04b4 00c9 | | Action Pop_Auxiliary_Loop
04b5 e604 | | Load 0x3,0x4
04b6 e006 | | Load 0x0,0x6
04b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04b9 6ff4 |o | Jump_Zero 0x4ae
04ba 00ce | | Action Pop_Auxiliary
04bb 860e | | Call 0x3,0xe
04bc 4508 |E | Exit_Suprogram New_Top_Offset 0x8
04bd 0000 0000 | | .XXX[0x3]
04bf 0000 | |
04c0 0000 0000 | | .LITERAL {0x00000000, 0x00008876}
04c4 0000 0000 | | .LITERAL {0x00000000, 0x00008875}
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 04e0 | | .CONST 0x04e0 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 4801 |H | Short_Literal 0x1
04cc 4801 |H | Short_Literal 0x1
04cd 4800 |H | Short_Literal 0x0
04ce 4801 |H | Short_Literal 0x1
04cf e7f4 | | Load 0x3,-0xc
04d0 e008 | | Load 0x0,0x8
04d1 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
04d2 e7f5 | | Load 0x3,-0xb
04d3 e7f6 | | Load 0x3,-0xa
04d4 e7f7 | | Load 0x3,-0x9
04d5 e604 | | Load 0x3,0x4
04d6 e008 | | Load 0x0,0x8
04d7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04d8 4800 |H | Short_Literal 0x0
04d9 e7f9 | | Load 0x3,-0x7
04da e7fa | | Load 0x3,-0x6
04db e7fe | | Load 0x3,-0x2
04dc e7ff | | Load 0x3,-0x1
04dd e004 | | Load 0x0,0x4
04de 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
04df 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04e0 TRAP_04c8:
04e0 0007 | | Action Break_Optional
04e1 e602 | | Load 0x3,0x2
04e2 4801 |H | Short_Literal 0x1
04e3 4801 |H | Short_Literal 0x1
04e4 e00c | | Load 0x0,0xc
04e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04e6 035b | [ | Declare_Type Array,Constrained
04e7 0337 | 7 | Declare_Variable Array
04e8 0092 0857 | W| Action Push_String_Extended,0x857 ; "Cmvc.Initial"
04ea e00c | | Load 0x0,0xc
04eb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04ec e00c | | Load 0x0,0xc
04ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04ee 0119 | | Execute Any,Check_In_Formal_Type
04ef 4801 |H | Short_Literal 0x1
04f0 00da | | Load_Top At_Offset_2
04f1 01d6 | | Execute Vector,Field_Write
04f2 6005 |` | Indirect_Literal Discrete,0x4f8,{0x00000000, 0x0000881f}
04f3 e001 | | Load 0x0,0x1
04f4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04f5 e001 | | Load 0x0,0x1
04f6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
04f7 0257 | W | Execute Discrete,Raise
04f8 0000 0000 | | .LITERAL {0x00000000, 0x0000881f}
04fc 0000 0000 | | .BLANK 0000[0x4]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 050e | | .CONST 0x050e ; Address of begin
0501 0555 | U | .CONST 0x0555 ; Address of exception handler
0502 0003 | | .CONST 0x0003 ; Number of locals
0503 INIT_0500:
0503 e006 | | Load 0x0,0x6
0504 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0505 02c7 | | Declare_Variable Any
0506 e602 | | Load 0x3,0x2
0507 4801 |H | Short_Literal 0x1
0508 e7ff | | Load 0x3,-0x1
0509 e008 | | Load 0x0,0x8
050a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
050b a802 | | Store_Unchecked 0x4,0x2
050c 029f 07d3 | | Declare_Subprogram INIT_07d0,For_Call
050e BODY_0500:
050e e602 | | Load 0x3,0x2
050f 4801 |H | Short_Literal 0x1
0510 4801 |H | Short_Literal 0x1
0511 e00c | | Load 0x0,0xc
0512 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0513 035b | [ | Declare_Type Array,Constrained
0514 0337 | 7 | Declare_Variable Array
0515 0092 0858 | X| Action Push_String_Extended,0x858 ; "New Path is "
0517 e603 | | Load 0x3,0x3
0518 01cc | | Execute Vector,Catenate
0519 e00c | | Load 0x0,0xc
051a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
051b e00c | | Load 0x0,0xc
051c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051d 0119 | | Execute Any,Check_In_Formal_Type
051e 4801 |H | Short_Literal 0x1
051f 00da | | Load_Top At_Offset_2
0520 01d6 | | Execute Vector,Field_Write
0521 6042 |`B | Indirect_Literal Discrete,0x564,{0x00000000, 0x00008876}
0522 e001 | | Load 0x0,0x1
0523 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0524 e001 | | Load 0x0,0x1
0525 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0526 4800 |H | Short_Literal 0x0
0527 e602 | | Load 0x3,0x2
0528 e7ff | | Load 0x3,-0x1
0529 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
052b 01cc | | Execute Vector,Catenate
052c e011 | | Load 0x0,0x11
052d 188c | | Execute Package,Field_Execute,Field_Number 0x8c
052e c7ef | | Store 0x3,-0x11
052f 4800 |H | Short_Literal 0x0
0530 e7ef | | Load 0x3,-0x11
0531 e001 | | Load 0x0,0x1
0532 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0533 7003 |p | Jump_Nonzero 0x537
0534 e001 | | Load 0x0,0x1
0535 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0536 0257 | W | Execute Discrete,Raise
0537 8803 | | Call 0x4,0x3
0538 e001 | | Load 0x0,0x1
0539 1b0d | | Execute Package,Field_Read,Field_Number 0xd
053a e602 | | Load 0x3,0x2
053b e603 | | Load 0x3,0x3
053c 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
053e 01cc | | Execute Vector,Catenate
053f e011 | | Load 0x0,0x11
0540 1883 | | Execute Package,Field_Execute,Field_Number 0x83
0541 c7ef | | Store 0x3,-0x11
0542 4800 |H | Short_Literal 0x0
0543 e7ef | | Load 0x3,-0x11
0544 e001 | | Load 0x0,0x1
0545 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0546 7003 |p | Jump_Nonzero 0x54a
0547 e001 | | Load 0x0,0x1
0548 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0549 0257 | W | Execute Discrete,Raise
054a e001 | | Load 0x0,0x1
054b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
054c e602 | | Load 0x3,0x2
054d e7ff | | Load 0x3,-0x1
054e 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
0550 01cc | | Execute Vector,Catenate
0551 e011 | | Load 0x0,0x11
0552 1884 | | Execute Package,Field_Execute,Field_Number 0x84
0553 c7ef | | Store 0x3,-0x11
0554 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0555 TRAP_0500:
0555 0007 | | Action Break_Optional
0556 e001 | | Load 0x0,0x1
0557 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0558 e602 | | Load 0x3,0x2
0559 e7ff | | Load 0x3,-0x1
055a 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
055c 01cc | | Execute Vector,Catenate
055d e011 | | Load 0x0,0x11
055e 1884 | | Execute Package,Field_Execute,Field_Number 0x84
055f c7ef | | Store 0x3,-0x11
0560 e001 | | Load 0x0,0x1
0561 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0562 0257 | W | Execute Discrete,Raise
0563 0000 | | .XXX[0x1]
0564 0000 0000 | | .LITERAL {0x00000000, 0x00008876}
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 057d | } | .CONST 0x057d ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0003 | | .CONST 0x0003 ; Number of locals
056b INIT_0568:
056b e006 | | Load 0x0,0x6
056c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
056d 02c7 | | Declare_Variable Any
056e e602 | | Load 0x3,0x2
056f 4801 |H | Short_Literal 0x1
0570 e603 | | Load 0x3,0x3
0571 e008 | | Load 0x0,0x8
0572 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0573 a802 | | Store_Unchecked 0x4,0x2
0574 e006 | | Load 0x0,0x6
0575 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0576 0322 | " | Declare_Variable Record
0577 e602 | | Load 0x3,0x2
0578 00da | | Load_Top At_Offset_2
0579 e008 | | Load 0x0,0x8
057a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
057b 00d9 | | Load_Top At_Offset_1
057c 017d | } | Execute Record,Structure_Write
057d BODY_0568:
057d e7ef | | Load 0x3,-0x11
057e e602 | | Load 0x3,0x2
057f 4800 |H | Short_Literal 0x0
0580 e604 | | Load 0x3,0x4
0581 e803 | | Load 0x4,0x3
0582 4801 |H | Short_Literal 0x1
0583 e7f9 | | Load 0x3,-0x7
0584 e7fa | | Load 0x3,-0x6
0585 e7fb | | Load 0x3,-0x5
0586 e802 | | Load 0x4,0x2
0587 800a | | Call 0x0,0xa
0588 c7ef | | Store 0x3,-0x11
0589 4501 |E | Exit_Suprogram New_Top_Offset 0x1
058a 0000 0000 | | .BLANK 0000[0x6]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593 | | .CONST 0x0593 ; Address of begin
0591 05f4 | | .CONST 0x05f4 ; Address of exception handler
0592 0001 | | .CONST 0x0001 ; Number of locals
0593 BODY_0590:
0593 INIT_0590:
0593 e602 | | Load 0x3,0x2
0594 4801 |H | Short_Literal 0x1
0595 4801 |H | Short_Literal 0x1
0596 e00c | | Load 0x0,0xc
0597 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0598 035b | [ | Declare_Type Array,Constrained
0599 0337 | 7 | Declare_Variable Array
059a 0092 085a | Z| Action Push_String_Extended,0x85a ; "New Subpath is "
059c e603 | | Load 0x3,0x3
059d 01cc | | Execute Vector,Catenate
059e e00c | | Load 0x0,0xc
059f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05a0 e00c | | Load 0x0,0xc
05a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a2 0119 | | Execute Any,Check_In_Formal_Type
05a3 4801 |H | Short_Literal 0x1
05a4 00da | | Load_Top At_Offset_2
05a5 01d6 | | Execute Vector,Field_Write
05a6 6075 |`u | Indirect_Literal Discrete,0x61c,{0x00000000, 0x00008876}
05a7 e001 | | Load 0x0,0x1
05a8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05a9 e001 | | Load 0x0,0x1
05aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ab 4800 |H | Short_Literal 0x0
05ac e602 | | Load 0x3,0x2
05ad e7ff | | Load 0x3,-0x1
05ae 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
05b0 01cc | | Execute Vector,Catenate
05b1 e011 | | Load 0x0,0x11
05b2 188c | | Execute Package,Field_Execute,Field_Number 0x8c
05b3 c7f2 | | Store 0x3,-0xe
05b4 4800 |H | Short_Literal 0x0
05b5 e7f2 | | Load 0x3,-0xe
05b6 e001 | | Load 0x0,0x1
05b7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
05b8 7003 |p | Jump_Nonzero 0x5bc
05b9 e001 | | Load 0x0,0x1
05ba 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05bb 0257 | W | Execute Discrete,Raise
05bc 4801 |H | Short_Literal 0x1
05bd 4801 |H | Short_Literal 0x1
05be 4800 |H | Short_Literal 0x0
05bf 4801 |H | Short_Literal 0x1
05c0 e7f3 | | Load 0x3,-0xd
05c1 e008 | | Load 0x0,0x8
05c2 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
05c3 e7f4 | | Load 0x3,-0xc
05c4 e7f5 | | Load 0x3,-0xb
05c5 e7f6 | | Load 0x3,-0xa
05c6 4801 |H | Short_Literal 0x1
05c7 e7f8 | | Load 0x3,-0x8
05c8 e7f9 | | Load 0x3,-0x7
05c9 e7fc | | Load 0x3,-0x4
05ca e7fd | | Load 0x3,-0x3
05cb e7fe | | Load 0x3,-0x2
05cc e7ff | | Load 0x3,-0x1
05cd e004 | | Load 0x0,0x4
05ce 181f | | Execute Package,Field_Execute,Field_Number 0x1f
05cf e001 | | Load 0x0,0x1
05d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d1 e602 | | Load 0x3,0x2
05d2 e603 | | Load 0x3,0x3
05d3 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
05d5 01cc | | Execute Vector,Catenate
05d6 e011 | | Load 0x0,0x11
05d7 1883 | | Execute Package,Field_Execute,Field_Number 0x83
05d8 c7f2 | | Store 0x3,-0xe
05d9 4800 |H | Short_Literal 0x0
05da e7f2 | | Load 0x3,-0xe
05db e001 | | Load 0x0,0x1
05dc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
05dd 7003 |p | Jump_Nonzero 0x5e1
05de e001 | | Load 0x0,0x1
05df 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05e0 0257 | W | Execute Discrete,Raise
05e1 e001 | | Load 0x0,0x1
05e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e3 e602 | | Load 0x3,0x2
05e4 e7ff | | Load 0x3,-0x1
05e5 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
05e7 01cc | | Execute Vector,Catenate
05e8 e011 | | Load 0x0,0x11
05e9 1884 | | Execute Package,Field_Execute,Field_Number 0x84
05ea c7f2 | | Store 0x3,-0xe
05eb 4800 |H | Short_Literal 0x0
05ec e7f2 | | Load 0x3,-0xe
05ed e001 | | Load 0x0,0x1
05ee 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
05ef 7003 |p | Jump_Nonzero 0x5f3
05f0 e001 | | Load 0x0,0x1
05f1 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05f2 0257 | W | Execute Discrete,Raise
05f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05f4 TRAP_0590:
05f4 0007 | | Action Break_Optional
05f5 e602 | | Load 0x3,0x2
05f6 4801 |H | Short_Literal 0x1
05f7 4801 |H | Short_Literal 0x1
05f8 e00c | | Load 0x0,0xc
05f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05fa 035b | [ | Declare_Type Array,Constrained
05fb 0337 | 7 | Declare_Variable Array
05fc 0092 085b | [| Action Push_String_Extended,0x85b ; "Cmvc.Make_Subpath"
05fe e00c | | Load 0x0,0xc
05ff 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0600 e00c | | Load 0x0,0xc
0601 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0602 0119 | | Execute Any,Check_In_Formal_Type
0603 4801 |H | Short_Literal 0x1
0604 00da | | Load_Top At_Offset_2
0605 01d6 | | Execute Vector,Field_Write
0606 6011 |` | Indirect_Literal Discrete,0x618,{0x00000000, 0x0000881f}
0607 e001 | | Load 0x0,0x1
0608 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0609 e001 | | Load 0x0,0x1
060a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060b e602 | | Load 0x3,0x2
060c e7ff | | Load 0x3,-0x1
060d 0092 0859 | Y| Action Push_String_Extended,0x859 ; ".units"
060f 01cc | | Execute Vector,Catenate
0610 e011 | | Load 0x0,0x11
0611 1884 | | Execute Package,Field_Execute,Field_Number 0x84
0612 c7f2 | | Store 0x3,-0xe
0613 e001 | | Load 0x0,0x1
0614 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0615 0257 | W | Execute Discrete,Raise
0616 0000 0000 | | .XXX[0x2]
0618 0000 0000 | | .LITERAL {0x00000000, 0x0000881f}
061c 0000 0000 | | .LITERAL {0x00000000, 0x00008876}
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623 | # | .CONST 0x0623 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0001 | | .CONST 0x0001 ; Number of locals
0623 BODY_0620:
0623 INIT_0620:
0623 00da | | Load_Top At_Offset_2
0624 6803 |h | Jump_Zero 0x628
0625 0092 085c | \| Action Push_String_Extended,0x85c ; "<ALL_WORLDS>"
0627 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0628 0092 085d | ]| Action Push_String_Extended,0x85d ; "<WORLDS>"
062a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
062b 0000 0000 | | .BLANK 0000[0x5]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633 | 3 | .CONST 0x0633 ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0001 | | .CONST 0x0001 ; Number of locals
0633 BODY_0630:
0633 INIT_0630:
0633 e605 | | Load 0x3,0x5
0634 6805 |h | Jump_Zero 0x63a
0635 00db | | Load_Top At_Offset_3
0636 00db | | Load_Top At_Offset_3
0637 e012 | | Load 0x0,0x12
0638 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0639 a605 | | Store_Unchecked 0x3,0x5
063a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
063b 0000 0000 | | .BLANK 0000[0x5]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643 | C | .CONST 0x0643 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0001 | | .CONST 0x0001 ; Number of locals
0643 BODY_0640:
0643 INIT_0640:
0643 00da | | Load_Top At_Offset_2
0644 e608 | | Load 0x3,0x8
0645 e006 | | Load 0x0,0x6
0646 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0647 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0648 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0649 0000 0000 | | .BLANK 0000[0x7]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 065b | [ | .CONST 0x065b ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0003 | | .CONST 0x0003 ; Number of locals
0653 INIT_0650:
0653 e006 | | Load 0x0,0x6
0654 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0655 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0656 02c7 | | Declare_Variable Any
0657 00d8 | | Load_Top At_Offset_0
0658 1c00 | | Execute_Immediate Run_Utility,0x0
0659 029f 0813 | | Declare_Subprogram INIT_0810,For_Call
065b BODY_0650:
065b 00d9 | | Load_Top At_Offset_1
065c 0120 | | Execute Any,Is_Value
065d 6804 |h | Jump_Zero 0x662
065e e006 | | Load 0x0,0x6
065f 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0660 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0661 7801 |x | Jump 0x663
0662 00d9 | | Load_Top At_Offset_1
0663 e00f | | Load 0x0,0xf
0664 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0665 e010 | | Load 0x0,0x10
0666 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0667 e9ff | | Load 0x4,-0x1
0668 e006 | | Load 0x0,0x6
0669 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
066a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
066b c802 | | Store 0x4,0x2
066c 00d9 | | Load_Top At_Offset_1
066d e006 | | Load 0x0,0x6
066e 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
066f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0670 6802 |h | Jump_Zero 0x673
0671 00ea | | Load_Encached Null_String_Cache
0672 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0673 0092 085e | ^| Action Push_String_Extended,0x85e ; "["
0675 8803 | | Call 0x4,0x3
0676 01cc | | Execute Vector,Catenate
0677 0092 085f | _| Action Push_String_Extended,0x85f ; "]"
0679 01cc | | Execute Vector,Catenate
067a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
067b 0000 0000 | | .BLANK 0000[0x5]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0698 | | .CONST 0x0698 ; Address of begin
0681 075d | ] | .CONST 0x075d ; Address of exception handler
0682 0004 | | .CONST 0x0004 ; Number of locals
0683 INIT_0680:
0683 e006 | | Load 0x0,0x6
0684 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0685 02c7 | | Declare_Variable Any
0686 e602 | | Load 0x3,0x2
0687 4801 |H | Short_Literal 0x1
0688 e604 | | Load 0x3,0x4
0689 e008 | | Load 0x0,0x8
068a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
068b a802 | | Store_Unchecked 0x4,0x2
068c 00d8 | | Load_Top At_Offset_0
068d e008 | | Load 0x0,0x8
068e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
068f e006 | | Load 0x0,0x6
0690 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0691 0322 | " | Declare_Variable Record
0692 e602 | | Load 0x3,0x2
0693 00db | | Load_Top At_Offset_3
0694 e008 | | Load 0x0,0x8
0695 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0696 00d9 | | Load_Top At_Offset_1
0697 017d | } | Execute Record,Structure_Write
0698 BODY_0680:
0698 e602 | | Load 0x3,0x2
0699 4801 |H | Short_Literal 0x1
069a 4801 |H | Short_Literal 0x1
069b e00c | | Load 0x0,0xc
069c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
069d 035b | [ | Declare_Type Array,Constrained
069e 0337 | 7 | Declare_Variable Array
069f e802 | | Load 0x4,0x2
06a0 e00c | | Load 0x0,0xc
06a1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06a2 e00c | | Load 0x0,0xc
06a3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06a4 0119 | | Execute Any,Check_In_Formal_Type
06a5 4801 |H | Short_Literal 0x1
06a6 00da | | Load_Top At_Offset_2
06a7 01d6 | | Execute Vector,Field_Write
06a8 610b |a | Indirect_Literal Discrete,0x7b4,{0x00000000, 0x00008874}
06a9 e001 | | Load 0x0,0x1
06aa 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
06ab e602 | | Load 0x3,0x2
06ac 00db | | Load_Top At_Offset_3
06ad e007 | | Load 0x0,0x7
06ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06af e7fc | | Load 0x3,-0x4
06b0 6808 |h | Jump_Zero 0x6b9
06b1 00d8 | | Load_Top At_Offset_0
06b2 00db | | Load_Top At_Offset_3
06b3 e006 | | Load 0x0,0x6
06b4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06b5 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
06b6 e012 | | Load 0x0,0x12
06b7 181f | | Execute Package,Field_Execute,Field_Number 0x1f
06b8 a605 | | Store_Unchecked 0x3,0x5
06b9 00da | | Load_Top At_Offset_2
06ba e008 | | Load 0x0,0x8
06bb 180e | | Execute Package,Field_Execute,Field_Number 0xe
06bc 7016 |p | Jump_Nonzero 0x6d3
06bd e602 | | Load 0x3,0x2
06be 4801 |H | Short_Literal 0x1
06bf 4801 |H | Short_Literal 0x1
06c0 e00c | | Load 0x0,0xc
06c1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06c2 035b | [ | Declare_Type Array,Constrained
06c3 0337 | 7 | Declare_Variable Array
06c4 e802 | | Load 0x4,0x2
06c5 e00c | | Load 0x0,0xc
06c6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06c7 e00c | | Load 0x0,0xc
06c8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06c9 0119 | | Execute Any,Check_In_Formal_Type
06ca 4801 |H | Short_Literal 0x1
06cb 00da | | Load_Top At_Offset_2
06cc 01d6 | | Execute Vector,Field_Write
06cd 60e2 |` | Indirect_Literal Discrete,0x7b0,{0x00000000, 0x0000882d}
06ce e001 | | Load 0x0,0x1
06cf 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
06d0 e001 | | Load 0x0,0x1
06d1 1b17 | | Execute Package,Field_Read,Field_Number 0x17
06d2 0257 | W | Execute Discrete,Raise
06d3 00da | | Load_Top At_Offset_2
06d4 860b | | Call 0x3,0xb
06d5 e602 | | Load 0x3,0x2
06d6 00db | | Load_Top At_Offset_3
06d7 e008 | | Load 0x0,0x8
06d8 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
06d9 e008 | | Load 0x0,0x8
06da 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
06db 701a |p | Jump_Nonzero 0x6f6
06dc e602 | | Load 0x3,0x2
06dd e00c | | Load 0x0,0xc
06de 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06df 60cc |` | Indirect_Literal Discrete,0x7ac,{0x00000000, 0x00008833}
06e0 e001 | | Load 0x0,0x1
06e1 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
06e2 e7f9 | | Load 0x3,-0x7
06e3 e002 | | Load 0x0,0x2
06e4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
06e5 e00c | | Load 0x0,0xc
06e6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06e7 60c0 |` | Indirect_Literal Discrete,0x7a8,{0x00000000, 0x00008822}
06e8 e001 | | Load 0x0,0x1
06e9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
06ea 4801 |H | Short_Literal 0x1
06eb 4801 |H | Short_Literal 0x1
06ec 4800 |H | Short_Literal 0x0
06ed 4801 |H | Short_Literal 0x1
06ee e602 | | Load 0x3,0x2
06ef e008 | | Load 0x0,0x8
06f0 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
06f1 4800 |H | Short_Literal 0x0
06f2 e802 | | Load 0x4,0x2
06f3 e013 | | Load 0x0,0x13
06f4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06f6 00d8 | | Load_Top At_Offset_0
06f7 00db | | Load_Top At_Offset_3
06f8 e008 | | Load 0x0,0x8
06f9 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
06fa 7027 |p' | Jump_Nonzero 0x722
06fb e602 | | Load 0x3,0x2
06fc 4801 |H | Short_Literal 0x1
06fd 4801 |H | Short_Literal 0x1
06fe e00c | | Load 0x0,0xc
06ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0700 035b | [ | Declare_Type Array,Constrained
0701 0337 | 7 | Declare_Variable Array
0702 e802 | | Load 0x4,0x2
0703 e00c | | Load 0x0,0xc
0704 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0705 e00c | | Load 0x0,0xc
0706 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0707 0119 | | Execute Any,Check_In_Formal_Type
0708 4801 |H | Short_Literal 0x1
0709 00da | | Load_Top At_Offset_2
070a 01d6 | | Execute Vector,Field_Write
070b 6098 |` | Indirect_Literal Discrete,0x7a4,{0x00000000, 0x0000882a}
070c e001 | | Load 0x0,0x1
070d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
070e e7f9 | | Load 0x3,-0x7
070f e002 | | Load 0x0,0x2
0710 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0711 e00c | | Load 0x0,0xc
0712 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0713 6094 |` | Indirect_Literal Discrete,0x7a8,{0x00000000, 0x00008822}
0714 e001 | | Load 0x0,0x1
0715 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0716 4801 |H | Short_Literal 0x1
0717 4801 |H | Short_Literal 0x1
0718 4800 |H | Short_Literal 0x0
0719 4801 |H | Short_Literal 0x1
071a e602 | | Load 0x3,0x2
071b e008 | | Load 0x0,0x8
071c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
071d 4800 |H | Short_Literal 0x0
071e e802 | | Load 0x4,0x2
071f e013 | | Load 0x0,0x13
0720 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0721 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0722 e006 | | Load 0x0,0x6
0723 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0724 00e1 | | Load_Encached Boolean_Cache
0725 607a |`z | Indirect_Literal Discrete,0x7a0,{0x00000000, 0x00004000}
0726 e014 | | Load 0x0,0x14
0727 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0728 e802 | | Load 0x4,0x2
0729 e006 | | Load 0x0,0x6
072a 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
072b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
072c c607 | | Store 0x3,0x7
072d c606 | | Store 0x3,0x6
072e e607 | | Load 0x3,0x7
072f 680e |h | Jump_Zero 0x73e
0730 4800 |H | Short_Literal 0x0
0731 4800 |H | Short_Literal 0x0
0732 4800 |H | Short_Literal 0x0
0733 4801 |H | Short_Literal 0x1
0734 e7f9 | | Load 0x3,-0x7
0735 e008 | | Load 0x0,0x8
0736 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0737 4801 |H | Short_Literal 0x1
0738 e802 | | Load 0x4,0x2
0739 e006 | | Load 0x0,0x6
073a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
073b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
073c e015 | | Load 0x0,0x15
073d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
073e 4801 |H | Short_Literal 0x1
073f 4801 |H | Short_Literal 0x1
0740 4800 |H | Short_Literal 0x0
0741 4801 |H | Short_Literal 0x1
0742 e7f9 | | Load 0x3,-0x7
0743 e008 | | Load 0x0,0x8
0744 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0745 4800 |H | Short_Literal 0x0
0746 e7fe | | Load 0x3,-0x2
0747 8609 | | Call 0x3,0x9
0748 4801 |H | Short_Literal 0x1
0749 e803 | | Load 0x4,0x3
074a e005 | | Load 0x0,0x5
074b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
074c e001 | | Load 0x0,0x1
074d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
074e e602 | | Load 0x3,0x2
074f 0092 0860 | `| Action Push_String_Extended,0x860 ; "<DEFAULT>"
0751 0092 0860 | `| Action Push_String_Extended,0x860 ; "<DEFAULT>"
0753 0092 0860 | `| Action Push_String_Extended,0x860 ; "<DEFAULT>"
0755 e804 | | Load 0x4,0x4
0756 e802 | | Load 0x4,0x2
0757 e016 | | Load 0x0,0x16
0758 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0759 c603 | | Store 0x3,0x3
075a 4800 |H | Short_Literal 0x0
075b a603 | | Store_Unchecked 0x3,0x3
075c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
075d TRAP_0680:
075d e001 | | Load 0x0,0x1
075e 1b17 | | Execute Package,Field_Read,Field_Number 0x17
075f 010f | | Execute Exception,Equal
0760 6801 |h | Jump_Zero 0x762
0761 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0762 4884 |H | Short_Literal 0x84
0763 010f | | Execute Exception,Equal
0764 681a |h | Jump_Zero 0x77f
0765 e602 | | Load 0x3,0x2
0766 e00c | | Load 0x0,0xc
0767 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0768 6043 |`C | Indirect_Literal Discrete,0x7ac,{0x00000000, 0x00008833}
0769 e001 | | Load 0x0,0x1
076a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
076b e7f9 | | Load 0x3,-0x7
076c e002 | | Load 0x0,0x2
076d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
076e e00c | | Load 0x0,0xc
076f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0770 6037 |`7 | Indirect_Literal Discrete,0x7a8,{0x00000000, 0x00008822}
0771 e001 | | Load 0x0,0x1
0772 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0773 4801 |H | Short_Literal 0x1
0774 4801 |H | Short_Literal 0x1
0775 4800 |H | Short_Literal 0x0
0776 4801 |H | Short_Literal 0x1
0777 e602 | | Load 0x3,0x2
0778 e008 | | Load 0x0,0x8
0779 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
077a 4800 |H | Short_Literal 0x0
077b e802 | | Load 0x4,0x2
077c e013 | | Load 0x0,0x13
077d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
077e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
077f e002 | | Load 0x0,0x2
0780 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0781 010f | | Execute Exception,Equal
0782 6815 |h | Jump_Zero 0x798
0783 e602 | | Load 0x3,0x2
0784 4801 |H | Short_Literal 0x1
0785 4801 |H | Short_Literal 0x1
0786 e00c | | Load 0x0,0xc
0787 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0788 035b | [ | Declare_Type Array,Constrained
0789 0337 | 7 | Declare_Variable Array
078a 0092 0861 | a| Action Push_String_Extended,0x861 ; "Cmvc.Destroy_View"
078c e00c | | Load 0x0,0xc
078d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
078e e00c | | Load 0x0,0xc
078f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0790 0119 | | Execute Any,Check_In_Formal_Type
0791 4801 |H | Short_Literal 0x1
0792 00da | | Load_Top At_Offset_2
0793 01d6 | | Execute Vector,Field_Write
0794 6007 |` | Indirect_Literal Discrete,0x79c,{0x00000000, 0x0000881f}
0795 e001 | | Load 0x0,0x1
0796 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0797 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0798 0100 | | Execute Exception,Raise
0799 0000 0000 | | .XXX[0x3]
079b 0000 | |
079c 0000 0000 | | .LITERAL {0x00000000, 0x0000881f}
07a0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
07a4 0000 0000 | | .LITERAL {0x00000000, 0x0000882a}
07a8 0000 0000 | | .LITERAL {0x00000000, 0x00008822}
07ac 0000 0000 | | .LITERAL {0x00000000, 0x00008833}
07b0 0000 0000 | | .LITERAL {0x00000000, 0x0000882d}
07b4 0000 0000 | | .LITERAL {0x00000000, 0x00008874}
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bd | | .CONST 0x07bd ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0002 | | .CONST 0x0002 ; Number of locals
07bb INIT_07b8:
07bb e608 | | Load 0x3,0x8
07bc 860c | | Call 0x3,0xc
07bd BODY_07b8:
07bd 4801 |H | Short_Literal 0x1
07be 4801 |H | Short_Literal 0x1
07bf 4800 |H | Short_Literal 0x0
07c0 4801 |H | Short_Literal 0x1
07c1 e7f9 | | Load 0x3,-0x7
07c2 e008 | | Load 0x0,0x8
07c3 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
07c4 e7fa | | Load 0x3,-0x6
07c5 e7fb | | Load 0x3,-0x5
07c6 e7fd | | Load 0x3,-0x3
07c7 e7fe | | Load 0x3,-0x2
07c8 e802 | | Load 0x4,0x2
07c9 e004 | | Load 0x0,0x4
07ca 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
07cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07cc 0000 0000 | | .BLANK 0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 07ee | | .CONST 0x07ee ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 4801 |H | Short_Literal 0x1
07d4 4801 |H | Short_Literal 0x1
07d5 4800 |H | Short_Literal 0x0
07d6 4801 |H | Short_Literal 0x1
07d7 e7f0 | | Load 0x3,-0x10
07d8 e008 | | Load 0x0,0x8
07d9 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
07da e7f1 | | Load 0x3,-0xf
07db e7f2 | | Load 0x3,-0xe
07dc e7f3 | | Load 0x3,-0xd
07dd 4801 |H | Short_Literal 0x1
07de e7f5 | | Load 0x3,-0xb
07df e7f6 | | Load 0x3,-0xa
07e0 e7f7 | | Load 0x3,-0x9
07e1 4801 |H | Short_Literal 0x1
07e2 4800 |H | Short_Literal 0x0
07e3 e602 | | Load 0x3,0x2
07e4 e7f7 | | Load 0x3,-0x9
07e5 e802 | | Load 0x4,0x2
07e6 8211 | | Call 0x1,0x11
07e7 e7fc | | Load 0x3,-0x4
07e8 e7fd | | Load 0x3,-0x3
07e9 e7fe | | Load 0x3,-0x2
07ea e7ff | | Load 0x3,-0x1
07eb e004 | | Load 0x0,0x4
07ec 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07ee TRAP_07d0:
07ee 0007 | | Action Break_Optional
07ef e602 | | Load 0x3,0x2
07f0 4801 |H | Short_Literal 0x1
07f1 4801 |H | Short_Literal 0x1
07f2 e00c | | Load 0x0,0xc
07f3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07f4 035b | [ | Declare_Type Array,Constrained
07f5 0337 | 7 | Declare_Variable Array
07f6 0092 0862 | b| Action Push_String_Extended,0x862 ; "Cmvc.Make_Path"
07f8 e00c | | Load 0x0,0xc
07f9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07fa e00c | | Load 0x0,0xc
07fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07fc 0119 | | Execute Any,Check_In_Formal_Type
07fd 4801 |H | Short_Literal 0x1
07fe 00da | | Load_Top At_Offset_2
07ff 01d6 | | Execute Vector,Field_Write
0800 6007 |` | Indirect_Literal Discrete,0x808,{0x00000000, 0x0000881f}
0801 e001 | | Load 0x0,0x1
0802 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0803 e001 | | Load 0x0,0x1
0804 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0805 0257 | W | Execute Discrete,Raise
0806 0000 0000 | | .XXX[0x2]
0808 0000 0000 | | .LITERAL {0x00000000, 0x0000881f}
080c 0000 0000 | | .BLANK 0000[0x4]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 081b | | .CONST 0x081b ; Address of begin
0811 0004 | | .CONST 0x0004 ; Address of exception handler
0812 0002 | | .CONST 0x0002 ; Number of locals
0813 INIT_0810:
0813 e006 | | Load 0x0,0x6
0814 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0815 02c7 | | Declare_Variable Any
0816 e802 | | Load 0x4,0x2
0817 e006 | | Load 0x0,0x6
0818 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0819 181a | | Execute Package,Field_Execute,Field_Number 0x1a
081a aa02 | | Store_Unchecked 0x5,0x2
081b BODY_0810:
081b e802 | | Load 0x4,0x2
081c e006 | | Load 0x0,0x6
081d 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
081e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
081f c802 | | Store 0x4,0x2
0820 e802 | | Load 0x4,0x2
0821 e006 | | Load 0x0,0x6
0822 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0823 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0824 6805 |h | Jump_Zero 0x82a
0825 00d8 | | Load_Top At_Offset_0
0826 e006 | | Load 0x0,0x6
0827 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0828 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0829 00ca | | Action Exit_Nullary_Function
082a 00d8 | | Load_Top At_Offset_0
082b e006 | | Load 0x0,0x6
082c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
082d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
082e 0092 0863 | c| Action Push_String_Extended,0x863 ; ","
0830 01cc | | Execute Vector,Catenate
0831 8803 | | Call 0x4,0x3
0832 01cc | | Execute Vector,Catenate
0833 00ca | | Action Exit_Nullary_Function
0834 ; --------------------------------------------------------------------------------------
0834 ; STRING TABLE
0834 ; --------------------------------------------------------------------------------------
0834 0062 | b | .STRTAB 0x0062->0x0865 ; "Initial"
0835 0067 | g | .STRTAB 0x0067->0x0868 ; "Rcf_Cmvc."
0836 006e | n | .STRTAB 0x006e->0x086d ; "Subsystem"
0837 0075 | u | .STRTAB 0x0075->0x0871 ; "Working_View_Base_Name"
0838 0089 | | .STRTAB 0x0089->0x087c ; "Remote_Machine"
0839 0095 | | .STRTAB 0x0095->0x0883 ; "Remote_Directory"
083a 00a3 | | .STRTAB 0x00a3->0x088b ; "Subsystem_Type => "
083b 00b3 | | .STRTAB 0x00b3->0x0894 ; ", View_To_Import"
083c 00c1 | | .STRTAB 0x00c1->0x089c ; "Model"
083d 00c4 | | .STRTAB 0x00c4->0x089f ; "Comments"
083e 00ca | | .STRTAB 0x00ca->0x08a3 ; "Work_Order"
083f 00d2 | | .STRTAB 0x00d2->0x08a8 ; "Volume => "
0840 00da | | .STRTAB 0x00da->0x08ad ; ", Response"
0841 00e2 | | .STRTAB 0x00e2->0x08b2 ; "Make_Path"
0842 00e9 | | .STRTAB 0x00e9->0x08b6 ; "From_Path"
0843 00f0 | | .STRTAB 0x00f0->0x08bb ; "New_Path_Name"
0844 00fb | | .STRTAB 0x00fb->0x08c1 ; "Remote_Machine => "
0845 010b | | .STRTAB 0x010b->0x08ca ; "Remote_Directory => "
0846 011d | | .STRTAB 0x011d->0x08d4 ; "View_To_Modify"
0847 0129 | ) | .STRTAB 0x0129->0x08db ; "View_To_Import"
0848 0135 | 5 | .STRTAB 0x0135->0x08e2 ; "Only_Change_Imports => "
0849 014a | J | .STRTAB 0x014a->0x08ee ; ", Model"
084a 014f | O | .STRTAB 0x014f->0x08f1 ; "Join_Paths => "
084b 015b | [ | .STRTAB 0x015b->0x08f8 ; ", Remake_Demoted_Units => "
084c 0173 | s | .STRTAB 0x0173->0x0905 ; ", Goal => "
084d 017b | { | .STRTAB 0x017b->0x090a ; ", Comments"
084e 0183 | | .STRTAB 0x0183->0x090f ; "Volume =>"
084f 018a | | .STRTAB 0x018a->0x0914 ; "Make_Subpath"
0850 0194 | | .STRTAB 0x0194->0x091a ; "New_Subpath_Extension"
0851 01a7 | | .STRTAB 0x01a7->0x0924 ; "Destroy_View"
0852 01b1 | | .STRTAB 0x01b1->0x092a ; "What_View"
0853 01b8 | | .STRTAB 0x01b8->0x092f ; "Demote_Clients => "
0854 01c8 | | .STRTAB 0x01c8->0x0938 ; ", Destroy_Configuration_Also => "
0855 01e6 | | .STRTAB 0x01e6->0x0948 ; "Response"
0856 01ec | | .STRTAB 0x01ec->0x094c ; "Only_Change_Imports"
0857 01fd | | .STRTAB 0x01fd->0x0955 ; "Cmvc.Initial"
0858 0207 | | .STRTAB 0x0207->0x095b ; "New Path is "
0859 0211 | | .STRTAB 0x0211->0x0961 ; ".units"
085a 0215 | | .STRTAB 0x0215->0x0964 ; "New Subpath is "
085b 0222 | " | .STRTAB 0x0222->0x096c ; "Cmvc.Make_Subpath"
085c 0231 | 1 | .STRTAB 0x0231->0x0974 ; "<ALL_WORLDS>"
085d 023b | ; | .STRTAB 0x023b->0x097a ; "<WORLDS>"
085e 0241 | A | .STRTAB 0x0241->0x097e ; "["
085f 0240 | @ | .STRTAB 0x0240->0x097f ; "]"
0860 023f | ? | .STRTAB 0x023f->0x097f ; "<DEFAULT>"
0861 0246 | F | .STRTAB 0x0246->0x0984 ; "Cmvc.Destroy_View"
0862 0255 | U | .STRTAB 0x0255->0x098c ; "Cmvc.Make_Path"
0863 0261 | a | .STRTAB 0x0261->0x0993 ; ","
0864 0260 | ` | .STREND 0x0260->0x0994
0865 496e 6974 |Init| .STRTAB_STRINGS
0994 0000 0000 | | .BLANK 0000[0x4]
0998 ; --------------------------------------------------------------------------------------
0998 ; Debug Table
0998 ; --------------------------------------------------------------------------------------
0998 0004 000d | | .DEBUG4 0x0004,0x000d,0x50d5,0x0000,0x0001,0x0000
099e 0000 0000 | | .BLANK 0000[0x2f]
09cd 012d 8700 | - | .XXX[0x2]
09cf 0000 0000 | | .BLANK 0000[0x31]