|
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_0a7cf5
└─⟦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 06b0 | | .CONST 0x06b0 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0058 | X | .CONST 0x0058 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0025 | % | .CONST 0x0025 ; Number of locals 000b INIT_0008: 000b 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 001c c215 | | Store 0x1,0x15 001d 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated 001f c21a | | Store 0x1,0x1a 0020 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 0022 c21b | | Store 0x1,0x1b 0023 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 0025 c21c | | Store 0x1,0x1c 0026 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated 0028 c21d | | Store 0x1,0x1d 0029 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 002b c214 | | Store 0x1,0x14 002c 00bf | | Action Accept_Activation 002d e001 | | Load 0x0,0x1 002e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002f 02c7 | | Declare_Variable Any 0030 00d8 | | Load_Top At_Offset_0 0031 1c00 | | Execute_Immediate Run_Utility,0x0 0032 e001 | | Load 0x0,0x1 0033 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0034 02c7 | | Declare_Variable Any 0035 00d8 | | Load_Top At_Offset_0 0036 1c00 | | Execute_Immediate Run_Utility,0x0 0037 e002 | | Load 0x0,0x2 0038 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0039 02c7 | | Declare_Variable Any 003a 00d8 | | Load_Top At_Offset_0 003b 1c00 | | Execute_Immediate Run_Utility,0x0 003c e003 | | Load 0x0,0x3 003d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003e 02c7 | | Declare_Variable Any 003f e003 | | Load 0x0,0x3 0040 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0041 a221 | ! | Store_Unchecked 0x1,0x21 0042 029d 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call 0044 029d 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call 0046 029d 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call 0048 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call 004a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 004b 00c7 | | Action Elaborate_Subprogram 004c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 004d 00c7 | | Action Elaborate_Subprogram 004e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 004f 00c7 | | Action Elaborate_Subprogram 0050 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0051 00c7 | | Action Elaborate_Subprogram 0052 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0053 00c7 | | Action Elaborate_Subprogram 0054 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0055 00c7 | | Action Elaborate_Subprogram 0056 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0057 00c7 | | Action Elaborate_Subprogram 0058 BODY_0008: 0058 00be | | Action Activate_Tasks 0059 00bc | | Action Signal_Activated 005a 00bb | | Action Signal_Completion 005b 0000 0000 | | .BLANK 0000[0x5] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0065 | e | .CONST 0x0065 ; Address of begin 0061 0088 | | .CONST 0x0088 ; Address of exception handler 0062 0002 | | .CONST 0x0002 ; Number of locals 0063 INIT_0060: 0063 e004 | | Load 0x0,0x4 0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0065 BODY_0060: 0065 00db | | Load_Top At_Offset_3 0066 c220 | | Store 0x1,0x20 0067 e005 | | Load 0x0,0x5 0068 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0069 e5fe | | Load 0x2,-0x2 006a e21e | | Load 0x1,0x1e 006b 4801 |H | Short_Literal 0x1 006c 601f |` | Indirect_Literal Discrete,0x8c,{0x00000000, 0x00028000} 006d e003 | | Load 0x0,0x3 006e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 006f 4800 |H | Short_Literal 0x0 0070 e005 | | Load 0x0,0x5 0071 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0072 c21e | | Store 0x1,0x1e 0073 c5fe | | Store 0x2,-0x2 0074 0059 | Y | Store_Top Discrete,At_Offset_1 0075 e005 | | Load 0x0,0x5 0076 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0077 e21f | | Load 0x1,0x1f 0078 4801 |H | Short_Literal 0x1 0079 6012 |` | Indirect_Literal Discrete,0x8c,{0x00000000, 0x00028000} 007a e003 | | Load 0x0,0x3 007b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007c e006 | | Load 0x0,0x6 007d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 007e e005 | | Load 0x0,0x5 007f 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0080 4800 |H | Short_Literal 0x0 0081 8224 | $ | Call 0x1,0x24 0082 4800 |H | Short_Literal 0x0 0083 e005 | | Load 0x0,0x5 0084 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0085 c21f | | Store 0x1,0x1f 0086 0059 | Y | Store_Top Discrete,At_Offset_1 0087 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0088 TRAP_0060: 0088 0007 | | Action Break_Optional 0089 4502 |E | Exit_Suprogram New_Top_Offset 0x2 008a 0000 0000 | | .XXX[0x2] 008c 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 009a | | .CONST 0x009a ; Address of begin 0091 00bd | | .CONST 0x00bd ; Address of exception handler 0092 0003 | | .CONST 0x0003 ; Number of locals 0093 INIT_0090: 0093 e007 | | Load 0x0,0x7 0094 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0095 02c7 | | Declare_Variable Any 0096 00d8 | | Load_Top At_Offset_0 0097 1c00 | | Execute_Immediate Run_Utility,0x0 0098 e004 | | Load 0x0,0x4 0099 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009a BODY_0090: 009a 00d9 | | Load_Top At_Offset_1 009b e220 | | Load 0x1,0x20 009c 0120 | | Execute Any,Is_Value 009d 6803 |h | Jump_Zero 0xa1 009e e002 | | Load 0x0,0x2 009f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a0 7801 |x | Jump 0xa2 00a1 e220 | | Load 0x1,0x20 00a2 0092 02d8 | | Action Push_String_Extended,0x2d8 ; " " 00a4 e002 | | Load 0x0,0x2 00a5 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 00a6 c220 | | Store 0x1,0x20 00a7 c402 | | Store 0x2,0x2 00a8 e5ff | | Load 0x2,-0x1 00a9 c221 | ! | Store 0x1,0x21 00aa e005 | | Load 0x0,0x5 00ab 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00ac e21f | | Load 0x1,0x1f 00ad 4801 |H | Short_Literal 0x1 00ae 67dd |g | Indirect_Literal Discrete,0x8c,{0x00000000, 0x00028000} 00af e003 | | Load 0x0,0x3 00b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b1 e006 | | Load 0x0,0x6 00b2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00b3 e005 | | Load 0x0,0x5 00b4 181f | | Execute Package,Field_Execute,Field_Number 0x1f 00b5 4800 |H | Short_Literal 0x0 00b6 8224 | $ | Call 0x1,0x24 00b7 4800 |H | Short_Literal 0x0 00b8 e005 | | Load 0x0,0x5 00b9 1820 | | Execute Package,Field_Execute,Field_Number 0x20 00ba c21f | | Store 0x1,0x1f 00bb 0059 | Y | Store_Top Discrete,At_Offset_1 00bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00bd TRAP_0090: 00bd 0007 | | Action Break_Optional 00be 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00bf 0000 | | .XXX[0x1] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c7 | | .CONST 0x00c7 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0003 | | .CONST 0x0003 ; Number of locals 00c3 INIT_00c0: 00c3 029f 0203 | | Declare_Subprogram INIT_0200,For_Call 00c5 029f 021b | | Declare_Subprogram INIT_0218,For_Call 00c7 BODY_00c0: 00c7 e5ff | | Load 0x2,-0x1 00c8 01db | | Execute Vector,Length 00c9 6813 |h | Jump_Zero 0xdd 00ca 4801 |H | Short_Literal 0x1 00cb 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "<default>" 00cd e5ff | | Load 0x2,-0x1 00ce e008 | | Load 0x0,0x8 00cf 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00d0 700c |p | Jump_Nonzero 0xdd 00d1 0092 02da | | Action Push_String_Extended,0x2da ; "Remote_Machine has been specified in the command" 00d3 8222 | " | Call 0x1,0x22 00d4 0092 02db | | Action Push_String_Extended,0x2db ; "Remote_Machine =>" 00d6 e5ff | | Load 0x2,-0x1 00d7 01cc | | Execute Vector,Catenate 00d8 8222 | " | Call 0x1,0x22 00d9 e5ff | | Load 0x2,-0x1 00da 0335 | 5 | Declare_Variable Array,Duplicate 00db 00cd | | Action Spare6_Action 00dc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 00dd e5fe | | Load 0x2,-0x2 00de 6803 |h | Jump_Zero 0xe2 00df 0092 02dc | | Action Push_String_Extended,0x2dc ; "Remote_Machine has not been specified in the command." 00e1 8222 | " | Call 0x1,0x22 00e2 8402 | | Call 0x2,0x2 00e3 0092 02dd | | Action Push_String_Extended,0x2dd ; "Unable to obtain Remote_Machine from the library switches" 00e5 8222 | " | Call 0x1,0x22 00e6 8403 | | Call 0x2,0x3 00e7 0092 02de | | Action Push_String_Extended,0x2de ; "Unable to obtain Remote_Machine from the Session_Switches" 00e9 8222 | " | Call 0x1,0x22 00ea 00ea | | Load_Encached Null_String_Cache 00eb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 00ec 0000 0000 | | .BLANK 0000[0x4] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f9 | | .CONST 0x00f9 ; Address of begin 00f1 011c | | .CONST 0x011c ; Address of exception handler 00f2 0004 | | .CONST 0x0004 ; Number of locals 00f3 INIT_00f0: 00f3 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call 00f5 029f 024b | K| Declare_Subprogram INIT_0248,For_Call 00f7 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 00f9 BODY_00f0: 00f9 e5ff | | Load 0x2,-0x1 00fa 01db | | Execute Vector,Length 00fb 6813 |h | Jump_Zero 0x10f 00fc 4801 |H | Short_Literal 0x1 00fd 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "<default>" 00ff e5ff | | Load 0x2,-0x1 0100 e008 | | Load 0x0,0x8 0101 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0102 700c |p | Jump_Nonzero 0x10f 0103 0092 02df | | Action Push_String_Extended,0x2df ; "Remote_Username has been specified in the command" 0105 8222 | " | Call 0x1,0x22 0106 0092 02e0 | | Action Push_String_Extended,0x2e0 ; "Remote_Username =>" 0108 e5ff | | Load 0x2,-0x1 0109 01cc | | Execute Vector,Catenate 010a 8222 | " | Call 0x1,0x22 010b e5ff | | Load 0x2,-0x1 010c 0335 | 5 | Declare_Variable Array,Duplicate 010d 00cd | | Action Spare6_Action 010e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 010f 0092 02e1 | | Action Push_String_Extended,0x2e1 ; "Remote_Username has not been specified in the command." 0111 8222 | " | Call 0x1,0x22 0112 8402 | | Call 0x2,0x2 0113 0092 02e2 | | Action Push_String_Extended,0x2e2 ; "Unable to obtain Remote_Username from the library switches" 0115 8222 | " | Call 0x1,0x22 0116 8403 | | Call 0x2,0x3 0117 0092 02e3 | | Action Push_String_Extended,0x2e3 ; "Unable to obtain Remote_Username using Rpc_Access_Utiliites" 0119 8222 | " | Call 0x1,0x22 011a 8404 | | Call 0x2,0x4 011b 0831 | 1 | Execute_Immediate Raise,0x31 011c TRAP_00f0: 011c 0007 | | Action Break_Optional 011d 00ea | | Load_Encached Null_String_Cache 011e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 011f 0000 | | .XXX[0x1] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0127 | ' | .CONST 0x0127 ; Address of begin 0121 014f | O | .CONST 0x014f ; Address of exception handler 0122 0003 | | .CONST 0x0003 ; Number of locals 0123 INIT_0120: 0123 029f 027b | {| Declare_Subprogram INIT_0278,For_Call 0125 029f 0293 | | Declare_Subprogram INIT_0290,For_Call 0127 BODY_0120: 0127 e5ff | | Load 0x2,-0x1 0128 01db | | Execute Vector,Length 0129 6813 |h | Jump_Zero 0x13d 012a 4801 |H | Short_Literal 0x1 012b 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "<default>" 012d e5ff | | Load 0x2,-0x1 012e e008 | | Load 0x0,0x8 012f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0130 700c |p | Jump_Nonzero 0x13d 0131 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "Remote_Password has been specified in the command" 0133 8222 | " | Call 0x1,0x22 0134 0092 02e5 | | Action Push_String_Extended,0x2e5 ; "Remote_Password =>" 0136 e5ff | | Load 0x2,-0x1 0137 01cc | | Execute Vector,Catenate 0138 8222 | " | Call 0x1,0x22 0139 e5ff | | Load 0x2,-0x1 013a 0335 | 5 | Declare_Variable Array,Duplicate 013b 00cd | | Action Spare6_Action 013c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 013d e5fd | | Load 0x2,-0x3 013e 6803 |h | Jump_Zero 0x142 013f 0092 02e6 | | Action Push_String_Extended,0x2e6 ; "Remote_Password has not been specified in the command." 0141 8222 | " | Call 0x1,0x22 0142 8402 | | Call 0x2,0x2 0143 0092 02e7 | | Action Push_String_Extended,0x2e7 ; "Unable to obtain Remotes_Password from the library switches" 0145 8222 | " | Call 0x1,0x22 0146 8403 | | Call 0x2,0x3 0147 0092 02e8 | | Action Push_String_Extended,0x2e8 ; "Unable to obtain Remote_Password using Rpc_Access_Utiliites" 0149 8222 | " | Call 0x1,0x22 014a 0092 02e9 | | Action Push_String_Extended,0x2e9 ; "Remote_Password is assumed to be the null string" 014c 8222 | " | Call 0x1,0x22 014d 00ea | | Load_Encached Null_String_Cache 014e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 014f TRAP_0120: 014f 0007 | | Action Break_Optional 0150 00ea | | Load_Encached Null_String_Cache 0151 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0152 0000 0000 | | .BLANK 0000[0x6] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015f | _ | .CONST 0x015f ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0003 | | .CONST 0x0003 ; Number of locals 015b INIT_0158: 015b 029f 02ab | | Declare_Subprogram INIT_02a8,For_Call 015d 029f 02c3 | | Declare_Subprogram INIT_02c0,For_Call 015f BODY_0158: 015f e5ff | | Load 0x2,-0x1 0160 01db | | Execute Vector,Length 0161 6813 |h | Jump_Zero 0x175 0162 4801 |H | Short_Literal 0x1 0163 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "<default>" 0165 e5ff | | Load 0x2,-0x1 0166 e008 | | Load 0x0,0x8 0167 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0168 700c |p | Jump_Nonzero 0x175 0169 0092 02ea | | Action Push_String_Extended,0x2ea ; "Remote_Directory has been specified in the command" 016b 8222 | " | Call 0x1,0x22 016c 0092 02eb | | Action Push_String_Extended,0x2eb ; "Remote_Directory =>" 016e e5ff | | Load 0x2,-0x1 016f 01cc | | Execute Vector,Catenate 0170 8222 | " | Call 0x1,0x22 0171 e5ff | | Load 0x2,-0x1 0172 0335 | 5 | Declare_Variable Array,Duplicate 0173 00cd | | Action Spare6_Action 0174 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0175 e5fe | | Load 0x2,-0x2 0176 6803 |h | Jump_Zero 0x17a 0177 0092 02ec | | Action Push_String_Extended,0x2ec ; "Remote_Directory has not been specified in the command." 0179 8222 | " | Call 0x1,0x22 017a 8402 | | Call 0x2,0x2 017b 0092 02ed | | Action Push_String_Extended,0x2ed ; "Unable to obtain Remote_Directory from the library switches" 017d 8222 | " | Call 0x1,0x22 017e 8403 | | Call 0x2,0x3 017f 0092 02ee | | Action Push_String_Extended,0x2ee ; "Unable to obtain Remote_Directory from the Session_Switches" 0181 8222 | " | Call 0x1,0x22 0182 0092 02ef | | Action Push_String_Extended,0x2ef ; "Remote_Directory will default to the remote user's home directory on the remote machine" 0184 8222 | " | Call 0x1,0x22 0185 00ea | | Load_Encached Null_String_Cache 0186 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0187 0000 | | .XXX[0x1] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018d | | .CONST 0x018d ; Address of begin 0189 019c | | .CONST 0x019c ; Address of exception handler 018a 0002 | | .CONST 0x0002 ; Number of locals 018b INIT_0188: 018b e004 | | Load 0x0,0x4 018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018d BODY_0188: 018d e005 | | Load 0x0,0x5 018e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 018f e21e | | Load 0x1,0x1e 0190 e005 | | Load 0x0,0x5 0191 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0192 c21e | | Store 0x1,0x1e 0193 0059 | Y | Store_Top Discrete,At_Offset_1 0194 e005 | | Load 0x0,0x5 0195 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0196 e21f | | Load 0x1,0x1f 0197 e005 | | Load 0x0,0x5 0198 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0199 c21f | | Store 0x1,0x1f 019a 0059 | Y | Store_Top Discrete,At_Offset_1 019b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019c TRAP_0188: 019c 0007 | | Action Break_Optional 019d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019e 0000 0000 | | .XXX[0x2] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a3 | | .CONST 0x01a3 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0001 | | .CONST 0x0001 ; Number of locals 01a3 BODY_01a0: 01a3 INIT_01a0: 01a3 e220 | | Load 0x1,0x20 01a4 00db | | Load_Top At_Offset_3 01a5 820f | | Call 0x1,0xf 01a6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01a7 0000 | | .XXX[0x1] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab 00da | | Load_Top At_Offset_2 01ac 01db | | Execute Vector,Length 01ad 0d10 | | Execute_Immediate Less,0x10 01ae 6802 |h | Jump_Zero 0x1b1 01af 00da | | Load_Top At_Offset_2 01b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b1 00da | | Load_Top At_Offset_2 01b2 01dd | | Execute Vector,First 01b3 00db | | Load_Top At_Offset_3 01b4 01dd | | Execute Vector,First 01b5 0a0e | | Execute_Immediate Plus,0xe 01b6 00d8 | | Load_Top At_Offset_0 01b7 00e2 | | Load_Encached Integer_Cache 01b8 0260 | ` | Execute Discrete,In_Type 01b9 7001 |p | Jump_Nonzero 0x1bb 01ba 0801 | | Execute_Immediate Raise,0x1 01bb e5ff | | Load 0x2,-0x1 01bc 01cf | | Execute Vector,Slice_Read 01bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01be 0000 0000 | | .XXX[0x2] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 e009 | | Load 0x0,0x9 01c4 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01c5 e009 | | Load 0x0,0x9 01c6 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01c7 e004 | | Load 0x0,0x4 01c8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01c9 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 01ca 0092 02f0 | | Action Push_String_Extended,0x2f0 ; "_SWITCHES" 01cc 01cc | | Execute Vector,Catenate 01cd 00ca | | Action Exit_Nullary_Function 01ce 0000 0000 | | .XXX[0x2] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 01f3 | | .CONST 0x01f3 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00da | | Load_Top At_Offset_2 01d4 e005 | | Load 0x0,0x5 01d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01d6 6810 |h | Jump_Zero 0x1e7 01d7 6020 |` | Indirect_Literal Discrete,0x1f8,{0x00000000, 0x00028000} 01d8 e221 | ! | Load 0x1,0x21 01d9 e5fe | | Load 0x2,-0x2 01da e5fd | | Load 0x2,-0x3 01db e001 | | Load 0x0,0x1 01dc 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 01dd 6807 |h | Jump_Zero 0x1e5 01de 6019 |` | Indirect_Literal Discrete,0x1f8,{0x00000000, 0x00028000} 01df e221 | ! | Load 0x1,0x21 01e0 e5fe | | Load 0x2,-0x2 01e1 e5fd | | Load 0x2,-0x3 01e2 e001 | | Load 0x0,0x1 01e3 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 01e4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01e5 00ea | | Load_Encached Null_String_Cache 01e6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01e7 00db | | Load_Top At_Offset_3 01e8 00db | | Load_Top At_Offset_3 01e9 e001 | | Load 0x0,0x1 01ea 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 01eb 6805 |h | Jump_Zero 0x1f1 01ec 00db | | Load_Top At_Offset_3 01ed 00db | | Load_Top At_Offset_3 01ee e001 | | Load 0x0,0x1 01ef 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 01f0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01f1 00ea | | Load_Encached Null_String_Cache 01f2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01f3 TRAP_01d0: 01f3 0007 | | Action Break_Optional 01f4 00ea | | Load_Encached Null_String_Cache 01f5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01f6 0000 0000 | | .XXX[0x2] 01f8 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 01fc 0000 0000 | | .BLANK 0000[0x4] 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 0208 | | .CONST 0x0208 ; Address of begin 0201 0004 | | .CONST 0x0004 ; Address of exception handler 0202 0002 | | .CONST 0x0002 ; Number of locals 0203 INIT_0200: 0203 e5fd | | Load 0x2,-0x3 0204 0092 02f1 | | Action Push_String_Extended,0x2f1 ; "Ftp.Remote_Machine" 0206 e21e | | Load 0x1,0x1e 0207 8225 | % | Call 0x1,0x25 0208 BODY_0200: 0208 00d8 | | Load_Top At_Offset_0 0209 01db | | Execute Vector,Length 020a 680b |h | Jump_Zero 0x216 020b 0092 02f2 | | Action Push_String_Extended,0x2f2 ; "Remote_Machine obtained from the library switch Ftp.Remote_Machine" 020d 8222 | " | Call 0x1,0x22 020e 0092 02f3 | | Action Push_String_Extended,0x2f3 ; "Remote_Machine => " 0210 00d9 | | Load_Top At_Offset_1 0211 01cc | | Execute Vector,Catenate 0212 8222 | " | Call 0x1,0x22 0213 00d8 | | Load_Top At_Offset_0 0214 00cb | | Action Pop_Block_With_Result 0215 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0216 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0217 0000 | | .XXX[0x1] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0221 | ! | .CONST 0x0221 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0002 | | .CONST 0x0002 ; Number of locals 021b INIT_0218: 021b e004 | | Load 0x0,0x4 021c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 021d 0092 02f4 | | Action Push_String_Extended,0x2f4 ; "Session_Ftp.Remote_Machine" 021f e21f | | Load 0x1,0x1f 0220 8225 | % | Call 0x1,0x25 0221 BODY_0218: 0221 00d8 | | Load_Top At_Offset_0 0222 01db | | Execute Vector,Length 0223 680b |h | Jump_Zero 0x22f 0224 0092 02f5 | | Action Push_String_Extended,0x2f5 ; "Remote_Machine obtained from the session switch Session_Ftp.Remote_Machine" 0226 8222 | " | Call 0x1,0x22 0227 0092 02f3 | | Action Push_String_Extended,0x2f3 ; "Remote_Machine => " 0229 00d9 | | Load_Top At_Offset_1 022a 01cc | | Execute Vector,Catenate 022b 8222 | " | Call 0x1,0x22 022c 00d8 | | Load_Top At_Offset_0 022d 00cb | | Action Pop_Block_With_Result 022e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 022f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0238 | 8 | .CONST 0x0238 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0002 | | .CONST 0x0002 ; Number of locals 0233 INIT_0230: 0233 e5fc | | Load 0x2,-0x4 0234 0092 02f6 | | Action Push_String_Extended,0x2f6 ; "Ftp.Username" 0236 e21e | | Load 0x1,0x1e 0237 8225 | % | Call 0x1,0x25 0238 BODY_0230: 0238 00d8 | | Load_Top At_Offset_0 0239 01db | | Execute Vector,Length 023a 680b |h | Jump_Zero 0x246 023b 0092 02f7 | | Action Push_String_Extended,0x2f7 ; "Remote_Username obtained from the library switch Ftp.Username" 023d 8222 | " | Call 0x1,0x22 023e 0092 02f8 | | Action Push_String_Extended,0x2f8 ; "Remote_Username => " 0240 00d9 | | Load_Top At_Offset_1 0241 01cc | | Execute Vector,Catenate 0242 8222 | " | Call 0x1,0x22 0243 00d8 | | Load_Top At_Offset_0 0244 00cb | | Action Pop_Block_With_Result 0245 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0246 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0247 0000 | | .XXX[0x1] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024f | O | .CONST 0x024f ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0002 | | .CONST 0x0002 ; Number of locals 024b INIT_0248: 024b e220 | | Load 0x1,0x20 024c e5fe | | Load 0x2,-0x2 024d e00a | | Load 0x0,0xa 024e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 024f BODY_0248: 024f 00d8 | | Load_Top At_Offset_0 0250 01db | | Execute Vector,Length 0251 680b |h | Jump_Zero 0x25d 0252 0092 02f9 | | Action Push_String_Extended,0x2f9 ; "Remote_Username obtained using Rpc_Access_Utilities" 0254 8222 | " | Call 0x1,0x22 0255 0092 02f8 | | Action Push_String_Extended,0x2f8 ; "Remote_Username => " 0257 00d9 | | Load_Top At_Offset_1 0258 01cc | | Execute Vector,Catenate 0259 8222 | " | Call 0x1,0x22 025a 00d8 | | Load_Top At_Offset_0 025b 00cb | | Action Pop_Block_With_Result 025c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 025d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 025e 0000 0000 | | .XXX[0x2] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 026a | j | .CONST 0x026a ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0002 | | .CONST 0x0002 ; Number of locals 0263 INIT_0260: 0263 e009 | | Load 0x0,0x9 0264 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0265 e009 | | Load 0x0,0x9 0266 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0267 e008 | | Load 0x0,0x8 0268 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0269 8223 | # | Call 0x1,0x23 026a BODY_0260: 026a 0092 02fa | | Action Push_String_Extended,0x2fa ; "Remote_Username is assumed to be the same as Local_Username" 026c 8222 | " | Call 0x1,0x22 026d 0092 02f8 | | Action Push_String_Extended,0x2f8 ; "Remote_Username => " 026f 00d9 | | Load_Top At_Offset_1 0270 01cc | | Execute Vector,Catenate 0271 8222 | " | Call 0x1,0x22 0272 00d8 | | Load_Top At_Offset_0 0273 00cb | | Action Pop_Block_With_Result 0274 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0275 0000 0000 | | .XXX[0x3] 0277 0000 | | 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 0280 | | .CONST 0x0280 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0002 | | .CONST 0x0002 ; Number of locals 027b INIT_0278: 027b e5fc | | Load 0x2,-0x4 027c 0092 02fb | | Action Push_String_Extended,0x2fb ; "Ftp.Password" 027e e21e | | Load 0x1,0x1e 027f 8225 | % | Call 0x1,0x25 0280 BODY_0278: 0280 00d8 | | Load_Top At_Offset_0 0281 01db | | Execute Vector,Length 0282 680b |h | Jump_Zero 0x28e 0283 0092 02fc | | Action Push_String_Extended,0x2fc ; "Remote_Password obtained from the library switch Ftp.Password" 0285 8222 | " | Call 0x1,0x22 0286 0092 02fd | | Action Push_String_Extended,0x2fd ; "Remote_Password => " 0288 00d9 | | Load_Top At_Offset_1 0289 01cc | | Execute Vector,Catenate 028a 8222 | " | Call 0x1,0x22 028b 00d8 | | Load_Top At_Offset_0 028c 00cb | | Action Pop_Block_With_Result 028d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 028e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 028f 0000 | | .XXX[0x1] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0297 | | .CONST 0x0297 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0002 | | .CONST 0x0002 ; Number of locals 0293 INIT_0290: 0293 e220 | | Load 0x1,0x20 0294 e5fe | | Load 0x2,-0x2 0295 e00a | | Load 0x0,0xa 0296 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0297 BODY_0290: 0297 00d8 | | Load_Top At_Offset_0 0298 01db | | Execute Vector,Length 0299 680b |h | Jump_Zero 0x2a5 029a 0092 02fe | | Action Push_String_Extended,0x2fe ; "Remote_Password obtained using Rpc_Access_Utilities" 029c 8222 | " | Call 0x1,0x22 029d 0092 02fd | | Action Push_String_Extended,0x2fd ; "Remote_Password => " 029f 00d9 | | Load_Top At_Offset_1 02a0 01cc | | Execute Vector,Catenate 02a1 8222 | " | Call 0x1,0x22 02a2 00d8 | | Load_Top At_Offset_0 02a3 00cb | | Action Pop_Block_With_Result 02a4 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 02a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02a6 0000 0000 | | .XXX[0x2] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02b0 | | .CONST 0x02b0 ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0002 | | .CONST 0x0002 ; Number of locals 02ab INIT_02a8: 02ab e5fd | | Load 0x2,-0x3 02ac 0092 02ff | | Action Push_String_Extended,0x2ff ; "Ftp.Remote_Directory" 02ae e21e | | Load 0x1,0x1e 02af 8225 | % | Call 0x1,0x25 02b0 BODY_02a8: 02b0 00d8 | | Load_Top At_Offset_0 02b1 01db | | Execute Vector,Length 02b2 680b |h | Jump_Zero 0x2be 02b3 0092 0300 | | Action Push_String_Extended,0x300 ; "Remote_Directory obtained from the library switch Ftp.Remote_Directory" 02b5 8222 | " | Call 0x1,0x22 02b6 0092 0301 | | Action Push_String_Extended,0x301 ; "Remote_Directory => " 02b8 00d9 | | Load_Top At_Offset_1 02b9 01cc | | Execute Vector,Catenate 02ba 8222 | " | Call 0x1,0x22 02bb 00d8 | | Load_Top At_Offset_0 02bc 00cb | | Action Pop_Block_With_Result 02bd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 02be 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02bf 0000 | | .XXX[0x1] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c9 | | .CONST 0x02c9 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0002 | | .CONST 0x0002 ; Number of locals 02c3 INIT_02c0: 02c3 e004 | | Load 0x0,0x4 02c4 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02c5 0092 0302 | | Action Push_String_Extended,0x302 ; "Session_Ftp.Remote_Directory" 02c7 e21f | | Load 0x1,0x1f 02c8 8225 | % | Call 0x1,0x25 02c9 BODY_02c0: 02c9 00d8 | | Load_Top At_Offset_0 02ca 01db | | Execute Vector,Length 02cb 680b |h | Jump_Zero 0x2d7 02cc 0092 0303 | | Action Push_String_Extended,0x303 ; "Remote_Directory obtained from the session switch Session_Ftp.Remote_Directory" 02ce 8222 | " | Call 0x1,0x22 02cf 0092 0301 | | Action Push_String_Extended,0x301 ; "Remote_Directory => " 02d1 00d9 | | Load_Top At_Offset_1 02d2 01cc | | Execute Vector,Catenate 02d3 8222 | " | Call 0x1,0x22 02d4 00d8 | | Load_Top At_Offset_0 02d5 00cb | | Action Pop_Block_With_Result 02d6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 02d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; STRING TABLE 02d8 ; -------------------------------------------------------------------------------------- 02d8 005a | Z | .STRTAB 0x005a->0x0305 ; " " 02d9 0059 | Y | .STRTAB 0x0059->0x0305 ; "<default>" 02da 0060 | ` | .STRTAB 0x0060->0x030a ; "Remote_Machine has been specified in the command" 02db 008e | | .STRTAB 0x008e->0x0322 ; "Remote_Machine =>" 02dc 009d | | .STRTAB 0x009d->0x032a ; "Remote_Machine has not been specified in the command." 02dd 00d0 | | .STRTAB 0x00d0->0x0345 ; "Unable to obtain Remote_Machine from the library switches" 02de 0107 | | .STRTAB 0x0107->0x0361 ; "Unable to obtain Remote_Machine from the Session_Switches" 02df 013e | > | .STRTAB 0x013e->0x037e ; "Remote_Username has been specified in the command" 02e0 016d | m | .STRTAB 0x016d->0x0396 ; "Remote_Username =>" 02e1 017d | } | .STRTAB 0x017d->0x039f ; "Remote_Username has not been specified in the command." 02e2 01b1 | | .STRTAB 0x01b1->0x03ba ; "Unable to obtain Remote_Username from the library switches" 02e3 01e9 | | .STRTAB 0x01e9->0x03d7 ; "Unable to obtain Remote_Username using Rpc_Access_Utiliites" 02e4 0222 | " | .STRTAB 0x0222->0x03f5 ; "Remote_Password has been specified in the command" 02e5 0251 | Q | .STRTAB 0x0251->0x040d ; "Remote_Password =>" 02e6 0261 | a | .STRTAB 0x0261->0x0416 ; "Remote_Password has not been specified in the command." 02e7 0295 | | .STRTAB 0x0295->0x0431 ; "Unable to obtain Remotes_Password from the library switches" 02e8 02ce | | .STRTAB 0x02ce->0x044f ; "Unable to obtain Remote_Password using Rpc_Access_Utiliites" 02e9 0307 | | .STRTAB 0x0307->0x046c ; "Remote_Password is assumed to be the null string" 02ea 0335 | 5 | .STRTAB 0x0335->0x0484 ; "Remote_Directory has been specified in the command" 02eb 0365 | e | .STRTAB 0x0365->0x049d ; "Remote_Directory =>" 02ec 0376 | v | .STRTAB 0x0376->0x04a7 ; "Remote_Directory has not been specified in the command." 02ed 03ab | | .STRTAB 0x03ab->0x04c2 ; "Unable to obtain Remote_Directory from the library switches" 02ee 03e4 | | .STRTAB 0x03e4->0x04e0 ; "Unable to obtain Remote_Directory from the Session_Switches" 02ef 041d | | .STRTAB 0x041d->0x04fd ; "Remote_Directory will default to the remote user's home directory on the remote machine" 02f0 0472 | r | .STRTAB 0x0472->0x0529 ; "_SWITCHES" 02f1 0479 | y | .STRTAB 0x0479->0x052d ; "Ftp.Remote_Machine" 02f2 0489 | | .STRTAB 0x0489->0x0536 ; "Remote_Machine obtained from the library switch Ftp.Remote_Machine" 02f3 04c9 | | .STRTAB 0x04c9->0x0557 ; "Remote_Machine => " 02f4 04d9 | | .STRTAB 0x04d9->0x0560 ; "Session_Ftp.Remote_Machine" 02f5 04f1 | | .STRTAB 0x04f1->0x056d ; "Remote_Machine obtained from the session switch Session_Ftp.Remote_Machine" 02f6 0539 | 9 | .STRTAB 0x0539->0x0592 ; "Ftp.Username" 02f7 0543 | C | .STRTAB 0x0543->0x0598 ; "Remote_Username obtained from the library switch Ftp.Username" 02f8 057e | ~ | .STRTAB 0x057e->0x05b7 ; "Remote_Username => " 02f9 058f | | .STRTAB 0x058f->0x05c0 ; "Remote_Username obtained using Rpc_Access_Utilities" 02fa 05c0 | | .STRTAB 0x05c0->0x05da ; "Remote_Username is assumed to be the same as Local_Username" 02fb 05f9 | | .STRTAB 0x05f9->0x05f7 ; "Ftp.Password" 02fc 0603 | | .STRTAB 0x0603->0x05fd ; "Remote_Password obtained from the library switch Ftp.Password" 02fd 063e | > | .STRTAB 0x063e->0x061c ; "Remote_Password => " 02fe 064f | O | .STRTAB 0x064f->0x0625 ; "Remote_Password obtained using Rpc_Access_Utilities" 02ff 0680 | | .STRTAB 0x0680->0x063f ; "Ftp.Remote_Directory" 0300 0692 | | .STRTAB 0x0692->0x0649 ; "Remote_Directory obtained from the library switch Ftp.Remote_Directory" 0301 06d6 | | .STRTAB 0x06d6->0x066c ; "Remote_Directory => " 0302 06e8 | | .STRTAB 0x06e8->0x0676 ; "Session_Ftp.Remote_Directory" 0303 0702 | | .STRTAB 0x0702->0x0684 ; "Remote_Directory obtained from the session switch Session_Ftp.Remote_Directory" 0304 074e | N | .STREND 0x074e->0x06ab 0305 203c 6465 | <de| .STRTAB_STRINGS 06ab 0000 0000 | | .BLANK 0000[0x5] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; Debug Table 06b0 ; -------------------------------------------------------------------------------------- 06b0 0004 000d | | .DEBUG4 0x0004,0x000d,0xde4d,0x0000,0x0001,0x0000 06b6 3630 f9fc |60 | .XXX[0x14a] 06b8 8625 c003 | % | 06ba b4ac 0002 | | 06bc c001 9c14 | | 06be 4802 d400 |H | 06c0 01ac f601 | | 06c2 0ca1 561d | V | 06c4 8223 041b | # | 06c6 4154 3cc5 |AT< | 06c8 cd89 7c0b | | | 06ca 55bf a432 |U 2| 06cc a801 205b | [| 06ce 84bd 0d8c | | 06d0 5801 c003 |X | 06d2 9810 0800 | | 06d4 014c 6cc7 | Ll | 06d6 4157 3da6 |AW= | 06d8 c07f 9945 | E| 06da 05a7 5924 | Y$| 06dc cc1c 0c02 | | 06de 461f 50a1 |F P | 06e0 9e3a 2c28 | :,(| 06e2 0c01 ea00 | | 06e4 1dc9 d61c | | 06e6 a013 ed06 | | 06e8 6529 9e38 |e) 8| 06ea 4024 0c03 |@$ | 06ec 90c1 fe39 | 9| 06ee c003 f42d | -| 06f0 fe1c 5800 | X | 06f2 7cf5 60e8 || ` | 06f4 2806 2238 |( "8| 06f6 6432 1a1e |d2 | 06f8 8588 6dc9 | m | 06fa 81a5 ca00 | | 06fc 0806 ac03 | | 06fe 852a 1846 | * F| 0700 2239 7c0c |"9| | 0702 0c03 39e6 | 9 | 0704 4a1f f5aa |J | 0706 c040 4802 | @H | 0708 f400 4daa | M | 070a f813 8c0a | | 070c c003 fc35 | 5| 070e 563a 796c |V:yl| 0710 814b 5001 | KP | 0712 d822 a801 | " | 0714 3c25 963b |<% ;| 0716 9d8a 223a | ":| 0718 e8a9 b23a | :| 071a d400 c606 | | 071c c07f 2189 | ! | 071e e406 2238 | "8| 0720 7050 90c6 |pP | 0722 223a 8c2f |": /| 0724 50ea 2239 |P "9| 0726 5454 4a23 |TTJ#| 0728 5188 cd8e |Q | 072a 763a d401 |v: | 072c 1604 0407 | | 072e 6d89 9a23 |m #| 0730 e429 563a | )V:| 0732 94ea 7d6f | }o| 0734 5019 c003 |P | 0736 5003 ec1a |P | 0738 ac01 3846 | 8F| 073a b239 e9ca | 9 | 073c 2238 642e |"8d.| 073e 0189 7909 | y | 0740 563b 45e4 |V;E | 0742 1807 461d | F | 0744 8806 223a | ":| 0746 0c17 561e | V | 0748 2e39 c400 |.9 | 074a 3437 661f |47f | 074c 7e3b 7423 |~;t#| 074e 721e 45a6 |r E | 0750 de1f 821d | | 0752 c803 ed8a | | 0754 a929 c800 | ) | 0756 c1ce 9873 | s| 0758 8e1e c128 | (| 075a ad28 4802 | (H | 075c d801 aa1c | | 075e 1805 8d0a | | 0760 cc06 c001 | | 0762 500b ca3b |P ;| 0764 263a 9e3b |&: ;| 0766 8c92 ac03 | | 0768 b033 4638 | 3F8| 076a 9a22 2239 | ""9| 076c 0c1c 0403 | | 076e 5638 88a3 |V8 | 0770 ca39 bda5 | 9 | 0772 f447 4837 | GH7| 0774 c006 2239 | "9| 0776 d82e e239 | . 9| 0778 c400 903a | :| 077a ee39 c800 | 9 | 077c d052 fa3b | R ;| 077e 761c 5221 |v R!| 0780 4e07 c11a |N | 0782 dc01 152a | *| 0784 c07e 900b | ~ | 0786 de38 400b | 8@ | 0788 4157 658b |AWe | 078a 512b 5001 |Q+P | 078c 7822 ac00 |x" | 078e 9020 023c | <| 0790 7604 0000 |v | 0792 5801 c801 |X | 0794 d898 0402 | | 0796 0e39 b23a | 9 :| 0798 dc02 b9c8 | | 079a f223 2408 | #$ | 079c a63d d01e | = | 079e d508 a63d | =| 07a0 9832 0d48 | 2 H| 07a2 a63f 482f | ?H/| 07a4 896f 4157 | oAW| 07a6 65aa c07f |e | 07a8 4de7 de39 |M 9| 07aa ccc9 9939 | 9| 07ac 31e9 898d |1 | 07ae 0e23 a873 | # s| 07b0 4004 2800 |@ ( | 07b2 dc02 5605 | V | 07b4 2621 6d71 |&!mq| 07b6 4a20 9006 |J | 07b8 c001 3009 | 0 | 07ba 223e 6a05 |">j | 07bc 9221 592e | !Y.| 07be c000 fd0c | | 07c0 dc02 7a05 | z | 07c2 6221 7e21 |b!~!| 07c4 3a3e 45ac |:>E | 07c6 dc02 9205 | | 07c8 4e3e cc05 |N> | 07ca 84c3 140c | | 07cc dc02 a205 | | 07ce 663e aa05 |f> | 07d0 8406 c402 | | 07d2 0550 c401 | P | 07d4 65eb e00a |e | 07d6 dcc1 ba22 | "| 07d8 e206 2c46 | ,F| 07da 523a ee04 |R: | 07dc 0404 a63f | ?| 07de 6491 95ea |d | 07e0 d552 dd50 | R P| 07e2 dc25 550f | %U | 07e4 1953 b552 | S R| 07e6 392f c8c8 |9/ | 07e8 a63d bc53 | = S| 07ea 1553 0953 | S S| 07ec 14c7 4152 | AR| 07ee 5d2c bca7 |], | 07f0 3d52 7439 |=Rt9| 07f2 850d 2000 | | 07f4 2441 c003 |$A | 07f6 3cc7 4153 |< AS| 07f8 e1ac a63c | <| 07fa e81a 4220 | B | 07fc a63e d824 | > $| 07fe f8ed 3801 | 8 |