|
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: 6144 (0x1800) Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0768 | h | .CONST 0x0768 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 005a | Z | .CONST 0x005a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0027 | ' | .CONST 0x0027 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x0872,0xc000,0x0000,0x0037,0x0264,0x0000,0x000b ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xd,0xfffd 000f 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xf,0xfffc 0011 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x11,0xfffb 0013 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa 0015 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x15,0xfff9 0017 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x17,0xfff8 0019 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x19,0xfff7 001b 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1b,0xfff6 001d 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1d,0xfff5 001f 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x1f,0xfff4 0021 00bf | | Action Accept_Activation 0022 e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x0022,0x088c,0xc000,0x0000,0x0037,0x0294,0x0000,0x0013 ; Debug Table 0x1.0x0 = 0x22,0xffff 0023 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0024 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x24,0xfffe 0025 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x25,0xfffd 0026 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x26,0xfffc 0027 029d 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call ; Debug Table 0x1.0x4 = 0x27,0xfffb 0029 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x29,0xfffa 002a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 002b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 002c e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x6 = 0x2c,0xfff9 002d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 002e 191e | | Execute Package,Field_Reference,Field_Number 0x1e 002f 0007 | | Action Break_Optional 0030 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x7 = 0x30,0xfff8 0031 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0032 191d | | Execute Package,Field_Reference,Field_Number 0x1d 0033 0007 | | Action Break_Optional 0034 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x8 = 0x34,0xfff7 0035 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0036 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 0037 0007 | | Action Break_Optional 0038 029d 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call ; Debug Table 0x1.0x9 = 0x38,0xfff6 003a 029d 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call ; Debug Table 0x1.0xa = 0x3a,0xfff5 003c 029d 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call ; Debug Table 0x1.0xb = 0x3c,0xfff4 003e 029d 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call ; Debug Table 0x1.0xc = 0x3e,0xfff3 0040 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call ; Debug Table 0x1.0xd = 0x40,0xfff2 0042 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call ; Debug Table 0x1.0xe = 0x42,0xfff1 0044 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call ; Debug Table 0x1.0xf = 0x44,0xfff0 0046 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x10 = 0x46,0xffef 0047 00c7 | | Action Elaborate_Subprogram 0048 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x11 = 0x48,0xffee 0049 00c7 | | Action Elaborate_Subprogram 004a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x12 = 0x4a,0xffed 004b 00c7 | | Action Elaborate_Subprogram 004c 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x13 = 0x4c,0xffec 004d 00c7 | | Action Elaborate_Subprogram 004e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x14 = 0x4e,0xffeb 004f 00c7 | | Action Elaborate_Subprogram 0050 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x15 = 0x50,0xffea 0051 00c7 | | Action Elaborate_Subprogram 0052 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x16 = 0x52,0xffe9 0053 00c7 | | Action Elaborate_Subprogram 0054 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x17 = 0x54,0xffe8 0055 00c7 | | Action Elaborate_Subprogram 0056 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x18 = 0x56,0xffe7 0057 00c7 | | Action Elaborate_Subprogram 0058 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x19 = 0x58,0xffe6 0059 00c7 | | Action Elaborate_Subprogram 005a BODY_0008: 005a 00bc | | Action Signal_Activated 005b 00bb | | Action Signal_Completion 005c 0000 0000 | | .BLANK 0000[0x4] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 006b | k | .CONST 0x006b ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0004 | | .CONST 0x0004 ; Number of locals 0063 INIT_0060: 0063 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x0063,0x08c2,0x1001,0x0000,0x0037,0x0264,0x0000,0x0049 ; Debug Table 0x2.0x0 = 0x63,0xffff 0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0065 0322 | " | Declare_Variable Record 0066 00d8 | | Load_Top At_Offset_0 0067 1c00 | | Execute_Immediate Run_Utility,0x0 0068 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x1 = 0x68,0xfffe 0069 029f 03fb | | Declare_Subprogram INIT_03f8,For_Call 006b BODY_0060: 006b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x2 = 0x6b,0x1 006c 00db | | Load_Top At_Offset_3 006d e5f2 | | Load 0x2,-0xe 006e e5f3 | | Load 0x2,-0xd 006f e5f4 | | Load 0x2,-0xc 0070 e5f5 | | Load 0x2,-0xb 0071 e5f6 | | Load 0x2,-0xa 0072 e003 | | Load 0x0,0x3 0073 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0074 e5f9 | | Load 0x2,-0x7 0075 e003 | | Load 0x0,0x3 0076 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0077 e5fa | | Load 0x2,-0x6 0078 e003 | | Load 0x0,0x3 0079 1819 | | Execute Package,Field_Execute,Field_Number 0x19 007a e5fb | | Load 0x2,-0x5 007b e5fc | | Load 0x2,-0x4 007c e5fd | | Load 0x2,-0x3 007d e004 | | Load 0x0,0x4 007e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 007f 00d1 | | Pop_Control Pop_Count_1 0080 005a | Z | Store_Top Discrete,At_Offset_2 0081 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x3 = 0x81,0x2 0082 6801 |h | Jump_Zero 0x84 0083 8404 | | Call 0x2,0x4 ; Debug Table 0x2.0x4 = 0x83,0x3 0084 450f |E | Exit_Suprogram New_Top_Offset 0xf 0085 0000 0000 | | .XXX[0x3] 0087 0000 | | 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 0093 | | .CONST 0x0093 ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0004 | | .CONST 0x0004 ; Number of locals 008b INIT_0088: 008b e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x008b,0x08ce,0x1001,0x0000,0x0037,0x0264,0x0000,0x00b3 ; Debug Table 0x3.0x0 = 0x8b,0xffff 008c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008d 0322 | " | Declare_Variable Record 008e 00d8 | | Load_Top At_Offset_0 008f 1c00 | | Execute_Immediate Run_Utility,0x0 0090 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x1 = 0x90,0xfffe 0091 029f 0423 | #| Declare_Subprogram INIT_0420,For_Call 0093 BODY_0088: 0093 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x2 = 0x93,0x1 0094 00db | | Load_Top At_Offset_3 0095 e5f2 | | Load 0x2,-0xe 0096 e5f3 | | Load 0x2,-0xd 0097 e5f4 | | Load 0x2,-0xc 0098 e5f5 | | Load 0x2,-0xb 0099 e5f6 | | Load 0x2,-0xa 009a e003 | | Load 0x0,0x3 009b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 009c e5f9 | | Load 0x2,-0x7 009d e003 | | Load 0x0,0x3 009e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 009f e5fa | | Load 0x2,-0x6 00a0 e003 | | Load 0x0,0x3 00a1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00a2 e5fb | | Load 0x2,-0x5 00a3 e5fc | | Load 0x2,-0x4 00a4 e5fd | | Load 0x2,-0x3 00a5 e004 | | Load 0x0,0x4 00a6 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 00a7 00d1 | | Pop_Control Pop_Count_1 00a8 005a | Z | Store_Top Discrete,At_Offset_2 00a9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x3 = 0xa9,0x2 00aa 6801 |h | Jump_Zero 0xac 00ab 8404 | | Call 0x2,0x4 ; Debug Table 0x3.0x4 = 0xab,0x3 00ac 450f |E | Exit_Suprogram New_Top_Offset 0xf 00ad 0000 0000 | | .XXX[0x3] 00af 0000 | | 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b3 | | .CONST 0x00b3 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0001 | | .CONST 0x0001 ; Number of locals 00b3 BODY_00b0: 00b3 INIT_00b0: 00b3 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4 = .DEBUG 0x00b3,0x08da,0x1001,0x0000,0x0037,0x0264,0x0000,0x011d ; Debug Table 0x4.0x0 = 0xb3,0x1 00b4 4800 |H | Short_Literal 0x0 00b5 e5fb | | Load 0x2,-0x5 00b6 e004 | | Load 0x0,0x4 00b7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00b8 0229 | ) | Execute Access,All_Read 00b9 00d8 | | Load_Top At_Offset_0 00ba e5fa | | Load 0x2,-0x6 00bb e5fb | | Load 0x2,-0x5 00bc e5fc | | Load 0x2,-0x4 00bd e5fd | | Load 0x2,-0x3 00be e5fe | | Load 0x2,-0x2 00bf e5ff | | Load 0x2,-0x1 00c0 8223 | # | Call 0x1,0x23 00c1 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00c2 0000 0000 | | .BLANK 0000[0x6] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x5 = .DEBUG 0x00cb,0x08de,0x1001,0x0000,0x0037,0x0264,0x0000,0x0149 ; Debug Table 0x5.0x0 = 0xcb,0x1 00cc 4800 |H | Short_Literal 0x0 00cd e5fb | | Load 0x2,-0x5 00ce e004 | | Load 0x0,0x4 00cf 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00d0 0229 | ) | Execute Access,All_Read 00d1 00d8 | | Load_Top At_Offset_0 00d2 e5fa | | Load 0x2,-0x6 00d3 e5fb | | Load 0x2,-0x5 00d4 e5fc | | Load 0x2,-0x4 00d5 e5fd | | Load 0x2,-0x3 00d6 e5fe | | Load 0x2,-0x2 00d7 e5ff | | Load 0x2,-0x1 00d8 8224 | $ | Call 0x1,0x24 00d9 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00da 0000 0000 | | .BLANK 0000[0x6] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00eb | | .CONST 0x00eb ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0004 | | .CONST 0x0004 ; Number of locals 00e3 INIT_00e0: 00e3 e001 | | Load 0x0,0x1 ; Debug Table 0x6 = .DEBUG 0x00e3,0x08e2,0x1001,0x0000,0x0037,0x0264,0x0000,0x0175 ; Debug Table 0x6.0x0 = 0xe3,0xffff 00e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e5 0322 | " | Declare_Variable Record 00e6 00d8 | | Load_Top At_Offset_0 00e7 1c00 | | Execute_Immediate Run_Utility,0x0 00e8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x1 = 0xe8,0xfffe 00e9 029f 044b | K| Declare_Subprogram INIT_0448,For_Call 00eb BODY_00e0: 00eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x2 = 0xeb,0x1 00ec 00db | | Load_Top At_Offset_3 00ed e5f1 | | Load 0x2,-0xf 00ee e5f2 | | Load 0x2,-0xe 00ef e5f3 | | Load 0x2,-0xd 00f0 e5f4 | | Load 0x2,-0xc 00f1 e5f5 | | Load 0x2,-0xb 00f2 e003 | | Load 0x0,0x3 00f3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00f4 e5f8 | | Load 0x2,-0x8 00f5 e003 | | Load 0x0,0x3 00f6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00f7 e5f9 | | Load 0x2,-0x7 00f8 e003 | | Load 0x0,0x3 00f9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00fa e5fa | | Load 0x2,-0x6 00fb e5fb | | Load 0x2,-0x5 00fc e5fc | | Load 0x2,-0x4 00fd e004 | | Load 0x0,0x4 00fe 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 00ff 00d1 | | Pop_Control Pop_Count_1 0100 005a | Z | Store_Top Discrete,At_Offset_2 0101 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x3 = 0x101,0x2 0102 6801 |h | Jump_Zero 0x104 0103 8404 | | Call 0x2,0x4 ; Debug Table 0x6.0x4 = 0x103,0x3 0104 4510 |E | Exit_Suprogram New_Top_Offset 0x10 0105 0000 0000 | | .XXX[0x3] 0107 0000 | | 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 0113 | | .CONST 0x0113 ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0004 | | .CONST 0x0004 ; Number of locals 010b INIT_0108: 010b e001 | | Load 0x0,0x1 ; Debug Table 0x7 = .DEBUG 0x010b,0x08ee,0x1001,0x0000,0x0037,0x0264,0x0000,0x01e6 ; Debug Table 0x7.0x0 = 0x10b,0xffff 010c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 010d 0322 | " | Declare_Variable Record 010e 00d8 | | Load_Top At_Offset_0 010f 1c00 | | Execute_Immediate Run_Utility,0x0 0110 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x1 = 0x110,0xfffe 0111 029f 047b | {| Declare_Subprogram INIT_0478,For_Call 0113 BODY_0108: 0113 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x2 = 0x113,0x1 0114 00db | | Load_Top At_Offset_3 0115 e5f1 | | Load 0x2,-0xf 0116 e5f2 | | Load 0x2,-0xe 0117 e5f3 | | Load 0x2,-0xd 0118 e5f4 | | Load 0x2,-0xc 0119 e5f5 | | Load 0x2,-0xb 011a e003 | | Load 0x0,0x3 011b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 011c e5f8 | | Load 0x2,-0x8 011d e003 | | Load 0x0,0x3 011e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 011f e5f9 | | Load 0x2,-0x7 0120 e003 | | Load 0x0,0x3 0121 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0122 e5fa | | Load 0x2,-0x6 0123 e5fb | | Load 0x2,-0x5 0124 e5fc | | Load 0x2,-0x4 0125 e004 | | Load 0x0,0x4 0126 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0127 00d1 | | Pop_Control Pop_Count_1 0128 005a | Z | Store_Top Discrete,At_Offset_2 0129 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x3 = 0x129,0x2 012a 6801 |h | Jump_Zero 0x12c 012b 8404 | | Call 0x2,0x4 ; Debug Table 0x7.0x4 = 0x12b,0x3 012c 4510 |E | Exit_Suprogram New_Top_Offset 0x10 012d 0000 0000 | | .XXX[0x3] 012f 0000 | | 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 013b | ; | .CONST 0x013b ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0004 | | .CONST 0x0004 ; Number of locals 0133 INIT_0130: 0133 e001 | | Load 0x0,0x1 ; Debug Table 0x8 = .DEBUG 0x0133,0x08fa,0x1001,0x0000,0x0037,0x0264,0x0000,0x0257 ; Debug Table 0x8.0x0 = 0x133,0xffff 0134 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0135 0322 | " | Declare_Variable Record 0136 00d8 | | Load_Top At_Offset_0 0137 1c00 | | Execute_Immediate Run_Utility,0x0 0138 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x1 = 0x138,0xfffe 0139 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call 013b BODY_0130: 013b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x2 = 0x13b,0x1 013c 00db | | Load_Top At_Offset_3 013d e5f1 | | Load 0x2,-0xf 013e e5f2 | | Load 0x2,-0xe 013f e5f3 | | Load 0x2,-0xd 0140 e5f4 | | Load 0x2,-0xc 0141 e5f5 | | Load 0x2,-0xb 0142 e003 | | Load 0x0,0x3 0143 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0144 e5f8 | | Load 0x2,-0x8 0145 e003 | | Load 0x0,0x3 0146 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0147 e5f9 | | Load 0x2,-0x7 0148 e003 | | Load 0x0,0x3 0149 1819 | | Execute Package,Field_Execute,Field_Number 0x19 014a e5fa | | Load 0x2,-0x6 014b e5fb | | Load 0x2,-0x5 014c e5fc | | Load 0x2,-0x4 014d e004 | | Load 0x0,0x4 014e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 014f 00d1 | | Pop_Control Pop_Count_1 0150 005a | Z | Store_Top Discrete,At_Offset_2 0151 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x3 = 0x151,0x2 0152 6801 |h | Jump_Zero 0x154 0153 8404 | | Call 0x2,0x4 ; Debug Table 0x8.0x4 = 0x153,0x3 0154 4510 |E | Exit_Suprogram New_Top_Offset 0x10 0155 0000 0000 | | .XXX[0x3] 0157 0000 | | 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x9 = .DEBUG 0x015b,0x0906,0x1001,0x0000,0x0037,0x0264,0x0000,0x02c8 ; Debug Table 0x9.0x0 = 0x15b,0x1 015c 4800 |H | Short_Literal 0x0 015d e5fa | | Load 0x2,-0x6 015e e004 | | Load 0x0,0x4 015f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0160 0229 | ) | Execute Access,All_Read 0161 00d8 | | Load_Top At_Offset_0 0162 e5f9 | | Load 0x2,-0x7 0163 e5fa | | Load 0x2,-0x6 0164 e5fb | | Load 0x2,-0x5 0165 e5fc | | Load 0x2,-0x4 0166 e5fd | | Load 0x2,-0x3 0167 e5fe | | Load 0x2,-0x2 0168 e5ff | | Load 0x2,-0x1 0169 8225 | % | Call 0x1,0x25 016a 4508 |E | Exit_Suprogram New_Top_Offset 0x8 016b 0000 0000 | | .BLANK 0000[0x5] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xa = .DEBUG 0x0173,0x090a,0x1001,0x0000,0x0037,0x0264,0x0000,0x02fb ; Debug Table 0xa.0x0 = 0x173,0x1 0174 4800 |H | Short_Literal 0x0 0175 e5fa | | Load 0x2,-0x6 0176 e004 | | Load 0x0,0x4 0177 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0178 0229 | ) | Execute Access,All_Read 0179 00d8 | | Load_Top At_Offset_0 017a e5f9 | | Load 0x2,-0x7 017b e5fa | | Load 0x2,-0x6 017c e5fb | | Load 0x2,-0x5 017d e5fc | | Load 0x2,-0x4 017e e5fd | | Load 0x2,-0x3 017f e5fe | | Load 0x2,-0x2 0180 e5ff | | Load 0x2,-0x1 0181 8226 | & | Call 0x1,0x26 0182 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0183 0000 0000 | | .BLANK 0000[0x5] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xb = .DEBUG 0x018b,0x090e,0x1001,0x0000,0x0037,0x0264,0x0000,0x032e ; Debug Table 0xb.0x0 = 0x18b,0x1 018c 4800 |H | Short_Literal 0x0 018d e5fa | | Load 0x2,-0x6 018e e004 | | Load 0x0,0x4 018f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0190 0229 | ) | Execute Access,All_Read 0191 00d8 | | Load_Top At_Offset_0 0192 e5f9 | | Load 0x2,-0x7 0193 e5fa | | Load 0x2,-0x6 0194 e5fb | | Load 0x2,-0x5 0195 e5fc | | Load 0x2,-0x4 0196 e5fd | | Load 0x2,-0x3 0197 e5fe | | Load 0x2,-0x2 0198 e5ff | | Load 0x2,-0x1 0199 8227 | ' | Call 0x1,0x27 019a 4508 |E | Exit_Suprogram New_Top_Offset 0x8 019b 0000 0000 | | .BLANK 0000[0x5] 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 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x01a3,0x0912,0x1007,0x0000,0x0037,0x0294,0x0000,0x0000 01a4 e002 | | Load 0x0,0x2 01a5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01a7 025e | ^ | Execute Discrete,Convert 01a8 1c01 | | Execute_Immediate Run_Utility,0x1 01a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01aa 0000 0000 | | .BLANK 0000[0x6] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b6 | | .CONST 0x01b6 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0002 | | .CONST 0x0002 ; Number of locals 01b3 INIT_01b0: 01b3 e002 | | Load 0x0,0x2 ; Debug Table 0xd = .DEBUG 0x01b3,0x0914,0x1001,0x0000,0x0037,0x0294,0x0000,0x0099 ; Debug Table 0xd.0x0 = 0x1b3,0xffff 01b4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01b6 BODY_01b0: 01b6 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x1 = 0x1b6,0x1 01b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01b9 e5fd | | Load 0x2,-0x3 01ba 62b9 |b | Indirect_Literal Discrete,0x474,{0x00000000, 0x00004000} 01bb e005 | | Load 0x0,0x5 01bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01bd e006 | | Load 0x0,0x6 01be 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01bf e007 | | Load 0x0,0x7 01c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01c1 4801 |H | Short_Literal 0x1 01c2 4800 |H | Short_Literal 0x0 01c3 e006 | | Load 0x0,0x6 01c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01c5 e002 | | Load 0x0,0x2 01c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01c7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01c8 e5ff | | Load 0x2,-0x1 01c9 e002 | | Load 0x0,0x2 01ca 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01cb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01cc c5fd | | Store 0x2,-0x3 01cd 0059 | Y | Store_Top Discrete,At_Offset_1 01ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x2 = 0x1ce,0x2 01cf 7003 |p | Jump_Nonzero 0x1d3 01d0 e5fd | | Load 0x2,-0x3 01d1 821e | | Call 0x1,0x1e 01d2 6812 |h | Jump_Zero 0x1e5 01d3 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x3 = 0x1d3,0x3 01d4 4807 |H | Short_Literal 0x7 01d5 4822 |H" | Short_Literal 0x22 01d6 e5ff | | Load 0x2,-0x1 01d7 01ca | | Execute Vector,Prepend 01d8 0092 0620 | | Action Push_String_Extended,0x620 ; "\x22 cannot be resolved (" 01da 01cc | | Execute Vector,Catenate 01db 00db | | Load_Top At_Offset_3 01dc 821c | | Call 0x1,0x1c 01dd 01cc | | Execute Vector,Catenate 01de 0092 0621 | !| Action Push_String_Extended,0x621 ; ")." 01e0 01cc | | Execute Vector,Catenate 01e1 e008 | | Load 0x0,0x8 01e2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01e3 4920 |I | Short_Literal 0x120 ; Debug Table 0xd.0x4 = 0x1e3,0x4 01e4 0257 | W | Execute Discrete,Raise 01e5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e6 0000 0000 | | .XXX[0x2] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01f3 | | .CONST 0x01f3 ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0003 | | .CONST 0x0003 ; Number of locals 01eb INIT_01e8: 01eb e002 | | Load 0x0,0x2 ; Debug Table 0xe = .DEBUG 0x01eb,0x0920,0x1002,0x0000,0x0037,0x0294,0x0000,0x00f9 ; Debug Table 0xe.0x0 = 0x1eb,0xffff 01ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ed 02c7 | | Declare_Variable Any 01ee 00d8 | | Load_Top At_Offset_0 01ef 1c00 | | Execute_Immediate Run_Utility,0x0 01f0 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x1 = 0x1f0,0xfffe 01f1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01f3 BODY_01e8: 01f3 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x2 = 0x1f3,0x1 01f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01f6 00da | | Load_Top At_Offset_2 01f7 0120 | | Execute Any,Is_Value 01f8 6803 |h | Jump_Zero 0x1fc 01f9 e002 | | Load 0x0,0x2 01fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01fb 7801 |x | Jump 0x1fd 01fc 00da | | Load_Top At_Offset_2 01fd 6276 |bv | Indirect_Literal Discrete,0x474,{0x00000000, 0x00004000} 01fe e005 | | Load 0x0,0x5 01ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0200 e006 | | Load 0x0,0x6 0201 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0202 e002 | | Load 0x0,0x2 0203 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0204 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0205 e5ff | | Load 0x2,-0x1 0206 e002 | | Load 0x0,0x2 0207 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0208 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0209 c402 | | Store 0x2,0x2 020a 0059 | Y | Store_Top Discrete,At_Offset_1 020b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x3 = 0x20b,0x2 020c 6812 |h | Jump_Zero 0x21f 020d e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0x4 = 0x20d,0x3 020e 4807 |H | Short_Literal 0x7 020f 4822 |H" | Short_Literal 0x22 0210 e5ff | | Load 0x2,-0x1 0211 01ca | | Execute Vector,Prepend 0212 0092 0620 | | Action Push_String_Extended,0x620 ; "\x22 cannot be resolved (" 0214 01cc | | Execute Vector,Catenate 0215 00db | | Load_Top At_Offset_3 0216 821c | | Call 0x1,0x1c 0217 01cc | | Execute Vector,Catenate 0218 0092 0621 | !| Action Push_String_Extended,0x621 ; ")." 021a 01cc | | Execute Vector,Catenate 021b e008 | | Load 0x0,0x8 021c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 021d 4920 |I | Short_Literal 0x120 ; Debug Table 0xe.0x5 = 0x21d,0x4 021e 0257 | W | Execute Discrete,Raise 021f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x6 = 0x21f,0x5 0220 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0221 0000 0000 | | .BLANK 0000[0x7] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 023a | : | .CONST 0x023a ; Address of begin 0229 024a | J | .CONST 0x024a ; Address of exception handler 022a 0003 | | .CONST 0x0003 ; Number of locals 022b INIT_0228: 022b 0092 0622 | "| Action Push_String_Extended,0x622 ; "Ftp.Store (\x22" ; Debug Table 0xf = .DEBUG 0x022b,0x0930,0x1001,0x0000,0x0037,0x0294,0x0000,0x015b ; Debug Table 0xf.0x0 = 0x22b,0xffff 022d 00db | | Load_Top At_Offset_3 022e 01cc | | Execute Vector,Catenate 022f 0092 0623 | #| Action Push_String_Extended,0x623 ; "\x22, \x22" 0231 01cc | | Execute Vector,Catenate 0232 e5fe | | Load 0x2,-0x2 0233 01cc | | Execute Vector,Catenate 0234 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 0236 01cc | | Execute Vector,Catenate 0237 0007 | | Action Break_Optional 0238 029f 04cb | | Declare_Subprogram INIT_04c8,For_Call ; Debug Table 0xf.0x1 = 0x238,0xfffe 023a BODY_0228: 023a e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x2 = 0x23a,0x1 023b 01db | | Execute Vector,Length 023c 7009 |p | Jump_Nonzero 0x246 023d e5fd | | Load 0x2,-0x3 ; Debug Table 0xf.0x3 = 0x23d,0x2 023e 00ea | | Load_Encached Null_String_Cache 023f 0092 0625 | %| Action Push_String_Extended,0x625 ; "$" 0241 e5ff | | Load 0x2,-0x1 0242 820f | | Call 0x1,0xf 0243 e5ff | | Load 0x2,-0x1 0244 8403 | | Call 0x2,0x3 0245 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0246 e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x4 = 0x246,0x3 0247 e5ff | | Load 0x2,-0x1 0248 8403 | | Call 0x2,0x3 0249 4507 |E | Exit_Suprogram New_Top_Offset 0x7 024a TRAP_0228: 024a 0007 | | Action Break_Optional 024b e5fb | | Load 0x2,-0x5 ; Debug Table 0xf.0x5 = 0x24b,0x4 024c 4805 |H | Short_Literal 0x5 024d e402 | | Load 0x2,0x2 024e 0092 0626 | &| Action Push_String_Extended,0x626 ; " failed." 0250 01cc | | Execute Vector,Catenate 0251 e008 | | Load 0x0,0x8 0252 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0253 e5fb | | Load 0x2,-0x5 ; Debug Table 0xf.0x6 = 0x253,0x5 0254 e009 | | Load 0x0,0x9 0255 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0256 6802 |h | Jump_Zero 0x259 0257 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x7 = 0x257,0x6 0258 0101 | | Execute Exception,Reraise 0259 4507 |E | Exit_Suprogram New_Top_Offset 0x7 025a 0000 0000 | | .BLANK 0000[0x6] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0272 | r | .CONST 0x0272 ; Address of begin 0261 0280 | | .CONST 0x0280 ; Address of exception handler 0262 0003 | | .CONST 0x0003 ; Number of locals 0263 INIT_0260: 0263 0092 0627 | '| Action Push_String_Extended,0x627 ; "Ftp.Retrieve (\x22" ; Debug Table 0x10 = .DEBUG 0x0263,0x0942,0x1001,0x0000,0x0037,0x0294,0x0000,0x02c4 ; Debug Table 0x10.0x0 = 0x263,0xffff 0265 00db | | Load_Top At_Offset_3 0266 01cc | | Execute Vector,Catenate 0267 0092 0623 | #| Action Push_String_Extended,0x623 ; "\x22, \x22" 0269 01cc | | Execute Vector,Catenate 026a e5fe | | Load 0x2,-0x2 026b 01cc | | Execute Vector,Catenate 026c 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 026e 01cc | | Execute Vector,Catenate 026f 0007 | | Action Break_Optional 0270 029f 0523 | #| Declare_Subprogram INIT_0520,For_Call ; Debug Table 0x10.0x1 = 0x270,0xfffe 0272 BODY_0260: 0272 e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0x2 = 0x272,0x1 0273 01db | | Execute Vector,Length 0274 7008 |p | Jump_Nonzero 0x27d 0275 e5fd | | Load 0x2,-0x3 ; Debug Table 0x10.0x3 = 0x275,0x2 0276 00ea | | Load_Encached Null_String_Cache 0277 0092 0625 | %| Action Push_String_Extended,0x625 ; "$" 0279 e5ff | | Load 0x2,-0x1 027a 8210 | | Call 0x1,0x10 027b 8403 | | Call 0x2,0x3 027c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 027d e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0x4 = 0x27d,0x3 027e 8403 | | Call 0x2,0x3 027f 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0280 TRAP_0260: 0280 0007 | | Action Break_Optional 0281 e5fb | | Load 0x2,-0x5 ; Debug Table 0x10.0x5 = 0x281,0x4 0282 4805 |H | Short_Literal 0x5 0283 e402 | | Load 0x2,0x2 0284 0092 0626 | &| Action Push_String_Extended,0x626 ; " failed." 0286 01cc | | Execute Vector,Catenate 0287 e008 | | Load 0x0,0x8 0288 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0289 e5fb | | Load 0x2,-0x5 ; Debug Table 0x10.0x6 = 0x289,0x5 028a e009 | | Load 0x0,0x9 028b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 028c 6802 |h | Jump_Zero 0x28f 028d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x7 = 0x28d,0x6 028e 0101 | | Execute Exception,Reraise 028f 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 02a4 | | .CONST 0x02a4 ; Address of begin 0291 02dc | | .CONST 0x02dc ; Address of exception handler 0292 0006 | | .CONST 0x0006 ; Number of locals 0293 INIT_0290: 0293 e21d | | Load 0x1,0x1d ; Debug Table 0x11 = .DEBUG 0x0293,0x0954,0x1001,0x0000,0x0037,0x0294,0x0000,0x03e0 ; Debug Table 0x11.0x0 = 0x293,0xffff 0294 02c7 | | Declare_Variable Any 0295 00d8 | | Load_Top At_Offset_0 0296 1c00 | | Execute_Immediate Run_Utility,0x0 0297 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x11.0x1 = 0x297,0xfffe 0298 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0299 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x11.0x2 = 0x299,0xfffd 029a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 029b 0092 0628 | (| Action Push_String_Extended,0x628 ; "Ftp.Store_Set (\x22" ; Debug Table 0x11.0x3 = 0x29b,0xfffc 029d e5ff | | Load 0x2,-0x1 029e 01cc | | Execute Vector,Catenate 029f 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 02a1 01cc | | Execute Vector,Catenate 02a2 029f 055b | [| Declare_Subprogram INIT_0558,For_Call 02a4 BODY_0290: 02a4 e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0x4 = 0x2a4,0x1 02a5 e5f8 | | Load 0x2,-0x8 02a6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 02a7 e004 | | Load 0x0,0x4 02a8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02a9 682a |h* | Jump_Zero 0x2d4 02aa e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x5 = 0x2aa,0x2 02ab e5fa | | Load 0x2,-0x6 02ac e5ff | | Load 0x2,-0x1 02ad 8221 | ! | Call 0x1,0x21 02ae c402 | | Store 0x2,0x2 02af e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0x6 = 0x2af,0x3 02b0 00da | | Load_Top At_Offset_2 02b1 e004 | | Load 0x0,0x4 02b2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02b3 00cf | | Action Mark_Auxiliary 02b4 781b |x | Jump 0x2d0 02b5 e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0x7 = 0x2b5,0x5 02b6 e5f8 | | Load 0x2,-0x8 02b7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 02b8 e004 | | Load 0x0,0x4 02b9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02ba 6818 |h | Jump_Zero 0x2d3 02bb 8406 | | Call 0x2,0x6 ; Debug Table 0x11.0x8 = 0x2bb,0x6 02bc e5f8 | | Load 0x2,-0x8 ; Debug Table 0x11.0x9 = 0x2bc,0x7 02bd 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 02be e004 | | Load 0x0,0x4 02bf 181f | | Execute Package,Field_Execute,Field_Number 0x1f 02c0 6804 |h | Jump_Zero 0x2c5 02c1 e403 | | Load 0x2,0x3 ; Debug Table 0x11.0xa = 0x2c1,0x8 02c2 0a01 | | Execute_Immediate Plus,0x1 02c3 c403 | | Store 0x2,0x3 02c4 7807 |x | Jump 0x2cc 02c5 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0xb = 0x2c5,0x9 02c6 0a01 | | Execute_Immediate Plus,0x1 02c7 c404 | | Store 0x2,0x4 02c8 e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0xc = 0x2c8,0xa 02c9 e009 | | Load 0x0,0x9 02ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02cb 6807 |h | Jump_Zero 0x2d3 02cc e402 | | Load 0x2,0x2 ; Debug Table 0x11.0xd = 0x2cc,0xb 02cd 821f | | Call 0x1,0x1f 02ce c402 | | Store 0x2,0x2 02cf 00c9 | | Action Pop_Auxiliary_Loop 02d0 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0xe = 0x2d0,0x4 02d1 821e | | Call 0x1,0x1e 02d2 6fe2 |o | Jump_Zero 0x2b5 02d3 00ce | | Action Pop_Auxiliary 02d4 e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0xf = 0x2d4,0xc 02d5 00db | | Load_Top At_Offset_3 02d6 e403 | | Load 0x2,0x3 02d7 0092 0629 | )| Action Push_String_Extended,0x629 ; "stored" 02d9 e004 | | Load 0x0,0x4 02da 1820 | | Execute Package,Field_Execute,Field_Number 0x20 02db 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02dc TRAP_0290: 02dc 0007 | | Action Break_Optional 02dd e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0x10 = 0x2dd,0xd 02de 4805 |H | Short_Literal 0x5 02df e405 | | Load 0x2,0x5 02e0 0092 0626 | &| Action Push_String_Extended,0x626 ; " failed." 02e2 01cc | | Execute Vector,Catenate 02e3 e008 | | Load 0x0,0x8 02e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02e5 e5fa | | Load 0x2,-0x6 ; Debug Table 0x11.0x11 = 0x2e5,0xe 02e6 e009 | | Load 0x0,0x9 02e7 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02e8 6802 |h | Jump_Zero 0x2eb 02e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x12 = 0x2e9,0xf 02ea 0101 | | Execute Exception,Reraise 02eb 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02ec 0000 0000 | | .BLANK 0000[0x4] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 0308 | | .CONST 0x0308 ; Address of begin 02f1 0374 | t | .CONST 0x0374 ; Address of exception handler 02f2 0007 | | .CONST 0x0007 ; Number of locals 02f3 INIT_02f0: 02f3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x12 = .DEBUG 0x02f3,0x097c,0x1001,0x0000,0x0037,0x0294,0x0000,0x04f2 ; Debug Table 0x12.0x0 = 0x2f3,0xffff 02f4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02f5 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x12.0x1 = 0x2f5,0xfffe 02f6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02f7 e00a | | Load 0x0,0xa ; Debug Table 0x12.0x2 = 0x2f7,0xfffd 02f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02f9 02c7 | | Declare_Variable Any 02fa 00d8 | | Load_Top At_Offset_0 02fb 1c00 | | Execute_Immediate Run_Utility,0x0 02fc e00b | | Load 0x0,0xb ; Debug Table 0x12.0x3 = 0x2fc,0xfffc 02fd 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02fe 0092 062a | *| Action Push_String_Extended,0x62a ; "Ftp.Retrieve_Set (\x22" ; Debug Table 0x12.0x4 = 0x2fe,0xfffb 0300 e5ff | | Load 0x2,-0x1 0301 01cc | | Execute Vector,Catenate 0302 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 0304 01cc | | Execute Vector,Catenate 0305 0007 | | Action Break_Optional 0306 029f 0573 | s| Declare_Subprogram INIT_0570,For_Call ; Debug Table 0x12.0x5 = 0x306,0xfffa 0308 BODY_02f0: 0308 e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x6 = 0x308,0x1 0309 e5f8 | | Load 0x2,-0x8 030a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 030b e004 | | Load 0x0,0x4 030c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 030d 685e |h^ | Jump_Zero 0x36c 030e e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x7 = 0x30e,0x2 030f 00da | | Load_Top At_Offset_2 0310 e004 | | Load 0x0,0x4 0311 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0312 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x12.0x8 = 0x312,0x3 0313 e5fa | | Load 0x2,-0x6 0314 e004 | | Load 0x0,0x4 0315 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0316 00d1 | | Pop_Control Pop_Count_1 0317 e00b | | Load 0x0,0xb ; Debug Table 0x12.0x9 = 0x317,0x4 0318 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0319 e404 | | Load 0x2,0x4 031a e5fa | | Load 0x2,-0x6 031b e004 | | Load 0x0,0x4 031c 180e | | Execute Package,Field_Execute,Field_Number 0xe 031d e003 | | Load 0x0,0x3 031e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 031f e5f9 | | Load 0x2,-0x7 0320 4800 |H | Short_Literal 0x0 0321 e5ff | | Load 0x2,-0x1 0322 e5f8 | | Load 0x2,-0x8 0323 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0324 e004 | | Load 0x0,0x4 0325 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0326 c404 | | Store 0x2,0x4 0327 005b | [ | Store_Top Discrete,At_Offset_3 0328 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0xa = 0x328,0x5 0329 e004 | | Load 0x0,0x4 032a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 032b 7008 |p | Jump_Nonzero 0x334 032c e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0xb = 0x32c,0x6 032d 4807 |H | Short_Literal 0x7 032e 0092 062b | +| Action Push_String_Extended,0x62b ; "Could not get directory listing." 0330 e008 | | Load 0x0,0x8 0331 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0332 4920 |I | Short_Literal 0x120 ; Debug Table 0x12.0xc = 0x332,0x7 0333 0257 | W | Execute Discrete,Raise 0334 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0xd = 0x334,0x8 0335 e00a | | Load 0x0,0xa 0336 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0337 680e |h | Jump_Zero 0x346 0338 e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0xe = 0x338,0x9 0339 4807 |H | Short_Literal 0x7 033a 4822 |H" | Short_Literal 0x22 033b 4822 |H" | Short_Literal 0x22 033c e5ff | | Load 0x2,-0x1 033d 01ca | | Execute Vector,Prepend 033e 01cb | | Execute Vector,Append 033f 0092 062c | ,| Action Push_String_Extended,0x62c ; " cannot be resolved." 0341 01cc | | Execute Vector,Catenate 0342 e008 | | Load 0x0,0x8 0343 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0344 4920 |I | Short_Literal 0x120 ; Debug Table 0x12.0xf = 0x344,0xa 0345 0257 | W | Execute Discrete,Raise 0346 00cf | | Action Mark_Auxiliary 0347 781b |x | Jump 0x363 0348 e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x10 = 0x348,0xc 0349 e5f8 | | Load 0x2,-0x8 034a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 034b e004 | | Load 0x0,0x4 034c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 034d 6819 |h | Jump_Zero 0x367 034e e404 | | Load 0x2,0x4 ; Debug Table 0x12.0x11 = 0x34e,0xd 034f e00a | | Load 0x0,0xa 0350 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 0351 8407 | | Call 0x2,0x7 0352 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x12.0x12 = 0x352,0xe 0353 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0354 e004 | | Load 0x0,0x4 0355 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0356 6804 |h | Jump_Zero 0x35b 0357 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0x13 = 0x357,0xf 0358 0a01 | | Execute_Immediate Plus,0x1 0359 c402 | | Store 0x2,0x2 035a 7807 |x | Jump 0x362 035b e403 | | Load 0x2,0x3 ; Debug Table 0x12.0x14 = 0x35b,0x10 035c 0a01 | | Execute_Immediate Plus,0x1 035d c403 | | Store 0x2,0x3 035e e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x15 = 0x35e,0x11 035f e009 | | Load 0x0,0x9 0360 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0361 6805 |h | Jump_Zero 0x367 0362 00c9 | | Action Pop_Auxiliary_Loop 0363 e404 | | Load 0x2,0x4 ; Debug Table 0x12.0x16 = 0x363,0xb 0364 e00a | | Load 0x0,0xa 0365 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0366 6fe1 |o | Jump_Zero 0x348 0367 00ce | | Action Pop_Auxiliary 0368 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x17 = 0x368,0x12 0369 e00a | | Load 0x0,0xa 036a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 036b c404 | | Store 0x2,0x4 036c e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x18 = 0x36c,0x13 036d e403 | | Load 0x2,0x3 036e e402 | | Load 0x2,0x2 036f 0092 062d | -| Action Push_String_Extended,0x62d ; "retrieved" 0371 e004 | | Load 0x0,0x4 0372 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0373 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0374 TRAP_02f0: 0374 0007 | | Action Break_Optional 0375 e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x19 = 0x375,0x14 0376 4805 |H | Short_Literal 0x5 0377 e406 | | Load 0x2,0x6 0378 0092 0626 | &| Action Push_String_Extended,0x626 ; " failed." 037a 01cc | | Execute Vector,Catenate 037b e008 | | Load 0x0,0x8 037c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 037d e5fa | | Load 0x2,-0x6 ; Debug Table 0x12.0x1a = 0x37d,0x15 037e e009 | | Load 0x0,0x9 037f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0380 6802 |h | Jump_Zero 0x383 0381 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x1b = 0x381,0x16 0382 0101 | | Execute Exception,Reraise 0383 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0384 0000 0000 | | .BLANK 0000[0x4] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 03a5 | | .CONST 0x03a5 ; Address of begin 0389 03df | | .CONST 0x03df ; Address of exception handler 038a 0008 | | .CONST 0x0008 ; Number of locals 038b INIT_0388: 038b e00a | | Load 0x0,0xa ; Debug Table 0x13 = .DEBUG 0x038b,0x09b6,0x1001,0x0000,0x0037,0x0294,0x0000,0x06ee ; Debug Table 0x13.0x0 = 0x38b,0xffff 038c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 038d 02c7 | | Declare_Variable Any 038e 00d8 | | Load_Top At_Offset_0 038f 1c00 | | Execute_Immediate Run_Utility,0x0 0390 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x13.0x1 = 0x390,0xfffe 0391 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0392 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x13.0x2 = 0x392,0xfffd 0393 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0394 0092 062e | .| Action Push_String_Extended,0x62e ; "Ftp.Retrieve_List (\x22" ; Debug Table 0x13.0x3 = 0x394,0xfffc 0396 e5ff | | Load 0x2,-0x1 0397 01cc | | Execute Vector,Catenate 0398 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 039a 01cc | | Execute Vector,Catenate 039b 0007 | | Action Break_Optional 039c e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x4 = 0x39c,0xfffb 039d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 039e 02c7 | | Declare_Variable Any 039f 00d8 | | Load_Top At_Offset_0 03a0 1c00 | | Execute_Immediate Run_Utility,0x0 03a1 029f 05b3 | | Declare_Subprogram INIT_05b0,For_Call 03a3 029f 05d3 | | Declare_Subprogram INIT_05d0,For_Call 03a5 BODY_0388: 03a5 e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x5 = 0x3a5,0x1 03a6 e5ff | | Load 0x2,-0x1 03a7 8222 | " | Call 0x1,0x22 03a8 c406 | | Store 0x2,0x6 03a9 e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x6 = 0x3a9,0x2 03aa e5f8 | | Load 0x2,-0x8 03ab 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03ac e004 | | Load 0x0,0x4 03ad 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03ae 6828 |h( | Jump_Zero 0x3d7 03af e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x7 = 0x3af,0x3 03b0 e405 | | Load 0x2,0x5 03b1 e004 | | Load 0x0,0x4 03b2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03b3 8407 | | Call 0x2,0x7 ; Debug Table 0x13.0x8 = 0x3b3,0x4 03b4 00cf | | Action Mark_Auxiliary 03b5 7818 |x | Jump 0x3ce 03b6 e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x9 = 0x3b6,0x6 03b7 e5f8 | | Load 0x2,-0x8 03b8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03b9 e004 | | Load 0x0,0x4 03ba 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03bb 6816 |h | Jump_Zero 0x3d2 03bc 8408 | | Call 0x2,0x8 ; Debug Table 0x13.0xa = 0x3bc,0x7 03bd e5f8 | | Load 0x2,-0x8 ; Debug Table 0x13.0xb = 0x3bd,0x8 03be 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03bf e004 | | Load 0x0,0x4 03c0 181f | | Execute Package,Field_Execute,Field_Number 0x1f 03c1 6804 |h | Jump_Zero 0x3c6 03c2 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0xc = 0x3c2,0x9 03c3 0a01 | | Execute_Immediate Plus,0x1 03c4 c403 | | Store 0x2,0x3 03c5 7807 |x | Jump 0x3cd 03c6 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0xd = 0x3c6,0xa 03c7 0a01 | | Execute_Immediate Plus,0x1 03c8 c404 | | Store 0x2,0x4 03c9 e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0xe = 0x3c9,0xb 03ca e009 | | Load 0x0,0x9 03cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03cc 6805 |h | Jump_Zero 0x3d2 03cd 00c9 | | Action Pop_Auxiliary_Loop 03ce e402 | | Load 0x2,0x2 ; Debug Table 0x13.0xf = 0x3ce,0x5 03cf e00a | | Load 0x0,0xa 03d0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 03d1 6fe4 |o | Jump_Zero 0x3b6 03d2 00ce | | Action Pop_Auxiliary 03d3 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x10 = 0x3d3,0xc 03d4 e00a | | Load 0x0,0xa 03d5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03d6 c402 | | Store 0x2,0x2 03d7 e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x11 = 0x3d7,0xd 03d8 e404 | | Load 0x2,0x4 03d9 e403 | | Load 0x2,0x3 03da 0092 062d | -| Action Push_String_Extended,0x62d ; "retrieved" 03dc e004 | | Load 0x0,0x4 03dd 1820 | | Execute Package,Field_Execute,Field_Number 0x20 03de 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03df TRAP_0388: 03df 6090 |` | Indirect_Literal Discrete,0x470,{0x00000000, 0x37023401} 03e0 010f | | Execute Exception,Equal 03e1 6802 |h | Jump_Zero 0x3e4 03e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x12 = 0x3e2,0xe 03e3 0101 | | Execute Exception,Reraise 03e4 e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x13 = 0x3e4,0xf 03e5 4808 |H | Short_Literal 0x8 03e6 e405 | | Load 0x2,0x5 03e7 0092 062f | /| Action Push_String_Extended,0x62f ; " failed with an exception." 03e9 01cc | | Execute Vector,Catenate 03ea e008 | | Load 0x0,0x8 03eb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03ec e5fa | | Load 0x2,-0x6 ; Debug Table 0x13.0x14 = 0x3ec,0x10 03ed e009 | | Load 0x0,0x9 03ee 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03ef 6802 |h | Jump_Zero 0x3f2 03f0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x15 = 0x3f0,0x11 03f1 0101 | | Execute Exception,Reraise 03f2 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03f3 0000 0000 | | .BLANK 0000[0x5] 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 03fb | | .CONST 0x03fb ; Address of begin 03f9 0409 | | .CONST 0x0409 ; Address of exception handler 03fa 0001 | | .CONST 0x0001 ; Number of locals 03fb BODY_03f8: 03fb INIT_03f8: 03fb e402 | | Load 0x2,0x2 ; Debug Table 0x14 = .DEBUG 0x03fb,0x09e4,0x1004,0x0000,0x0037,0x0294,0x0000,0x0aca ; Debug Table 0x14.0x0 = 0x3fb,0x1 03fc e5fa | | Load 0x2,-0x6 03fd e5f2 | | Load 0x2,-0xe 03fe e5f7 | | Load 0x2,-0x9 03ff e5f8 | | Load 0x2,-0x8 0400 e5fe | | Load 0x2,-0x2 0401 e5ff | | Load 0x2,-0x1 0402 8223 | # | Call 0x1,0x23 0403 00d1 | | Pop_Control Pop_Count_1 0404 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x1 = 0x404,0x2 0405 e5f2 | | Load 0x2,-0xe 0406 e004 | | Load 0x0,0x4 0407 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0408 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0409 TRAP_03f8: 0409 0007 | | Action Break_Optional 040a e5f2 | | Load 0x2,-0xe ; Debug Table 0x14.0x2 = 0x40a,0x3 040b 4805 |H | Short_Literal 0x5 040c 0092 0630 | 0| Action Push_String_Extended,0x630 ; "Ftp.Put aborted." 040e e008 | | Load 0x0,0x8 040f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0410 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x3 = 0x410,0x4 0411 e5f2 | | Load 0x2,-0xe 0412 e004 | | Load 0x0,0x4 0413 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0414 00d1 | | Pop_Control Pop_Count_1 0415 e5f2 | | Load 0x2,-0xe ; Debug Table 0x14.0x4 = 0x415,0x5 0416 e009 | | Load 0x0,0x9 0417 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0418 6802 |h | Jump_Zero 0x41b 0419 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x5 = 0x419,0x6 041a 0101 | | Execute Exception,Reraise 041b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 041c 0000 0000 | | .BLANK 0000[0x4] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0423 | # | .CONST 0x0423 ; Address of begin 0421 0431 | 1 | .CONST 0x0431 ; Address of exception handler 0422 0001 | | .CONST 0x0001 ; Number of locals 0423 BODY_0420: 0423 INIT_0420: 0423 e402 | | Load 0x2,0x2 ; Debug Table 0x15 = .DEBUG 0x0423,0x09f2,0x1004,0x0000,0x0037,0x0294,0x0000,0x0bc2 ; Debug Table 0x15.0x0 = 0x423,0x1 0424 e5fa | | Load 0x2,-0x6 0425 e5f2 | | Load 0x2,-0xe 0426 e5f7 | | Load 0x2,-0x9 0427 e5f8 | | Load 0x2,-0x8 0428 e5fe | | Load 0x2,-0x2 0429 e5ff | | Load 0x2,-0x1 042a 8224 | $ | Call 0x1,0x24 042b 00d1 | | Pop_Control Pop_Count_1 042c e402 | | Load 0x2,0x2 ; Debug Table 0x15.0x1 = 0x42c,0x2 042d e5f2 | | Load 0x2,-0xe 042e e004 | | Load 0x0,0x4 042f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0430 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0431 TRAP_0420: 0431 0007 | | Action Break_Optional 0432 e5f2 | | Load 0x2,-0xe ; Debug Table 0x15.0x2 = 0x432,0x3 0433 4805 |H | Short_Literal 0x5 0434 0092 0631 | 1| Action Push_String_Extended,0x631 ; "Ftp.Get aborted." 0436 e008 | | Load 0x0,0x8 0437 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0438 e402 | | Load 0x2,0x2 ; Debug Table 0x15.0x3 = 0x438,0x4 0439 e5f2 | | Load 0x2,-0xe 043a e004 | | Load 0x0,0x4 043b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 043c 00d1 | | Pop_Control Pop_Count_1 043d e5f2 | | Load 0x2,-0xe ; Debug Table 0x15.0x4 = 0x43d,0x5 043e e009 | | Load 0x0,0x9 043f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0440 6802 |h | Jump_Zero 0x443 0441 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x5 = 0x441,0x6 0442 0101 | | Execute Exception,Reraise 0443 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0444 0000 0000 | | .BLANK 0000[0x4] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 045b | [ | .CONST 0x045b ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b e402 | | Load 0x2,0x2 ; Debug Table 0x16 = .DEBUG 0x044b,0x0a00,0x1004,0x0000,0x0037,0x0294,0x0000,0x0cc1 ; Debug Table 0x16.0x0 = 0x44b,0x1 044c e003 | | Load 0x0,0x3 044d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 044e e5f1 | | Load 0x2,-0xf 044f e5f6 | | Load 0x2,-0xa 0450 e5f7 | | Load 0x2,-0x9 0451 e5fd | | Load 0x2,-0x3 0452 e5fe | | Load 0x2,-0x2 0453 e5ff | | Load 0x2,-0x1 0454 8225 | % | Call 0x1,0x25 0455 00d1 | | Pop_Control Pop_Count_1 0456 e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x1 = 0x456,0x2 0457 e5f1 | | Load 0x2,-0xf 0458 e004 | | Load 0x0,0x4 0459 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 045a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 045b TRAP_0448: 045b 0007 | | Action Break_Optional 045c e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x2 = 0x45c,0x3 045d 4805 |H | Short_Literal 0x5 045e 0092 0632 | 2| Action Push_String_Extended,0x632 ; "Ftp.Put_Set aborted." 0460 e008 | | Load 0x0,0x8 0461 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0462 e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x3 = 0x462,0x4 0463 e5f1 | | Load 0x2,-0xf 0464 e004 | | Load 0x0,0x4 0465 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0466 00d1 | | Pop_Control Pop_Count_1 0467 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x4 = 0x467,0x5 0468 e009 | | Load 0x0,0x9 0469 1819 | | Execute Package,Field_Execute,Field_Number 0x19 046a 6802 |h | Jump_Zero 0x46d 046b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x5 = 0x46b,0x6 046c 0101 | | Execute Exception,Reraise 046d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 046e 0000 0000 | | .XXX[0x2] 0470 0000 0000 | | .LITERAL {0x00000000, 0x37023401} 0474 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 048a | | .CONST 0x048a ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b e402 | | Load 0x2,0x2 ; Debug Table 0x17 = .DEBUG 0x047b,0x0a0e,0x1004,0x0000,0x0037,0x0294,0x0000,0x0dc3 ; Debug Table 0x17.0x0 = 0x47b,0x1 047c e5f9 | | Load 0x2,-0x7 047d e5f1 | | Load 0x2,-0xf 047e e5f6 | | Load 0x2,-0xa 047f e5f7 | | Load 0x2,-0x9 0480 e5fd | | Load 0x2,-0x3 0481 e5fe | | Load 0x2,-0x2 0482 e5ff | | Load 0x2,-0x1 0483 8226 | & | Call 0x1,0x26 0484 00d1 | | Pop_Control Pop_Count_1 0485 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x1 = 0x485,0x2 0486 e5f1 | | Load 0x2,-0xf 0487 e004 | | Load 0x0,0x4 0488 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0489 4501 |E | Exit_Suprogram New_Top_Offset 0x1 048a TRAP_0478: 048a 0007 | | Action Break_Optional 048b e5f1 | | Load 0x2,-0xf ; Debug Table 0x17.0x2 = 0x48b,0x3 048c 4805 |H | Short_Literal 0x5 048d 0092 0633 | 3| Action Push_String_Extended,0x633 ; "Ftp.Get_Set aborted." 048f e008 | | Load 0x0,0x8 0490 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0491 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x3 = 0x491,0x4 0492 e5f1 | | Load 0x2,-0xf 0493 e004 | | Load 0x0,0x4 0494 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0495 00d1 | | Pop_Control Pop_Count_1 0496 e5f1 | | Load 0x2,-0xf ; Debug Table 0x17.0x4 = 0x496,0x5 0497 e009 | | Load 0x0,0x9 0498 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0499 6802 |h | Jump_Zero 0x49c 049a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x5 = 0x49a,0x6 049b 0101 | | Execute Exception,Reraise 049c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 049d 0000 0000 | | .XXX[0x3] 049f 0000 | | 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 04b3 | | .CONST 0x04b3 ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 e402 | | Load 0x2,0x2 ; Debug Table 0x18 = .DEBUG 0x04a3,0x0a1c,0x1004,0x0000,0x0037,0x0294,0x0000,0x0ec2 ; Debug Table 0x18.0x0 = 0x4a3,0x1 04a4 e003 | | Load 0x0,0x3 04a5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04a6 e5f1 | | Load 0x2,-0xf 04a7 e5f6 | | Load 0x2,-0xa 04a8 e5f7 | | Load 0x2,-0x9 04a9 e5fd | | Load 0x2,-0x3 04aa e5fe | | Load 0x2,-0x2 04ab e5ff | | Load 0x2,-0x1 04ac 8227 | ' | Call 0x1,0x27 04ad 00d1 | | Pop_Control Pop_Count_1 04ae e402 | | Load 0x2,0x2 ; Debug Table 0x18.0x1 = 0x4ae,0x2 04af e5f1 | | Load 0x2,-0xf 04b0 e004 | | Load 0x0,0x4 04b1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 04b2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04b3 TRAP_04a0: 04b3 0007 | | Action Break_Optional 04b4 e5f1 | | Load 0x2,-0xf ; Debug Table 0x18.0x2 = 0x4b4,0x3 04b5 4805 |H | Short_Literal 0x5 04b6 0092 0634 | 4| Action Push_String_Extended,0x634 ; "Ftp.Get_List aborted." 04b8 e008 | | Load 0x0,0x8 04b9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04ba e402 | | Load 0x2,0x2 ; Debug Table 0x18.0x3 = 0x4ba,0x4 04bb e5f1 | | Load 0x2,-0xf 04bc e004 | | Load 0x0,0x4 04bd 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 04be 00d1 | | Pop_Control Pop_Count_1 04bf e5f1 | | Load 0x2,-0xf ; Debug Table 0x18.0x4 = 0x4bf,0x5 04c0 e009 | | Load 0x0,0x9 04c1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04c2 6802 |h | Jump_Zero 0x4c5 04c3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x5 = 0x4c3,0x6 04c4 0101 | | Execute Exception,Reraise 04c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04c6 0000 0000 | | .XXX[0x2] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04e1 | | .CONST 0x04e1 ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0004 | | .CONST 0x0004 ; Number of locals 04cb INIT_04c8: 04cb 0092 0622 | "| Action Push_String_Extended,0x622 ; "Ftp.Store (\x22" ; Debug Table 0x19 = .DEBUG 0x04cb,0x0a2a,0x1001,0x0000,0x0037,0x0294,0x0000,0x019f ; Debug Table 0x19.0x0 = 0x4cb,0xffff 04cd 00db | | Load_Top At_Offset_3 04ce 01cc | | Execute Vector,Catenate 04cf 0092 0623 | #| Action Push_String_Extended,0x623 ; "\x22, \x22" 04d1 01cc | | Execute Vector,Catenate 04d2 e7fe | | Load 0x3,-0x2 04d3 01cc | | Execute Vector,Catenate 04d4 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 04d6 01cc | | Execute Vector,Catenate 04d7 0007 | | Action Break_Optional 04d8 e002 | | Load 0x0,0x2 ; Debug Table 0x19.0x1 = 0x4d8,0xfffe 04d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04da 02c7 | | Declare_Variable Any 04db e5fb | | Load 0x2,-0x5 04dc e7ff | | Load 0x3,-0x1 04dd 8222 | " | Call 0x1,0x22 04de c603 | | Store 0x3,0x3 04df 029f 05eb | | Declare_Subprogram INIT_05e8,For_Call ; Debug Table 0x19.0x2 = 0x4df,0xfffd 04e1 BODY_04c8: 04e1 e5fb | | Load 0x2,-0x5 ; Debug Table 0x19.0x3 = 0x4e1,0x1 04e2 e5f9 | | Load 0x2,-0x7 04e3 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 04e4 e004 | | Load 0x0,0x4 04e5 1817 | | Execute Package,Field_Execute,Field_Number 0x17 04e6 6831 |h1 | Jump_Zero 0x518 04e7 e5fb | | Load 0x2,-0x5 ; Debug Table 0x19.0x4 = 0x4e7,0x2 04e8 00db | | Load_Top At_Offset_3 04e9 e004 | | Load 0x0,0x4 04ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04eb e5fc | | Load 0x2,-0x4 ; Debug Table 0x19.0x5 = 0x4eb,0x3 04ec 7011 |p | Jump_Nonzero 0x4fe 04ed e5fd | | Load 0x2,-0x3 04ee e00c | | Load 0x0,0xc 04ef 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04f0 0092 0635 | 5| Action Push_String_Extended,0x635 ; "AOS" 04f2 01df | | Execute Vector,Equal 04f3 680a |h | Jump_Zero 0x4fe 04f4 e5fb | | Load 0x2,-0x5 ; Debug Table 0x19.0x6 = 0x4f4,0x4 04f5 e004 | | Load 0x0,0x4 04f6 180f | | Execute Package,Field_Execute,Field_Number 0xf 04f7 e004 | | Load 0x0,0x4 04f8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04f9 e7fe | | Load 0x3,-0x2 04fa e5f9 | | Load 0x2,-0x7 04fb 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 04fc e004 | | Load 0x0,0x4 04fd 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04fe e5fd | | Load 0x2,-0x3 ; Debug Table 0x19.0x7 = 0x4fe,0x5 04ff e00c | | Load 0x0,0xc 0500 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0501 0092 0636 | 6| Action Push_String_Extended,0x636 ; "MACINTOSH" 0503 01df | | Execute Vector,Equal 0504 e5f9 | | Load 0x2,-0x7 0505 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0506 e00d | | Load 0x0,0xd 0507 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0508 8604 | | Call 0x3,0x4 ; Debug Table 0x19.0x8 = 0x508,0x6 0509 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x19.0x9 = 0x509,0x7 050a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 050b e00d | | Load 0x0,0xd 050c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 050d 0f03 | | Execute_Immediate Equal,0x3 050e 6809 |h | Jump_Zero 0x518 050f e5fb | | Load 0x2,-0x5 ; Debug Table 0x19.0xa = 0x50f,0x8 0510 e003 | | Load 0x0,0x3 0511 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0512 e5fa | | Load 0x2,-0x6 0513 e5f9 | | Load 0x2,-0x7 0514 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0515 e004 | | Load 0x0,0x4 0516 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0517 8604 | | Call 0x3,0x4 ; Debug Table 0x19.0xb = 0x517,0x9 0518 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0519 0000 0000 | | .BLANK 0000[0x7] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0532 | 2 | .CONST 0x0532 ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0003 | | .CONST 0x0003 ; Number of locals 0523 INIT_0520: 0523 0092 0627 | '| Action Push_String_Extended,0x627 ; "Ftp.Retrieve (\x22" ; Debug Table 0x1a = .DEBUG 0x0523,0x0a44,0x1001,0x0000,0x0037,0x0294,0x0000,0x0308 ; Debug Table 0x1a.0x0 = 0x523,0xffff 0525 e5ff | | Load 0x2,-0x1 0526 01cc | | Execute Vector,Catenate 0527 0092 0623 | #| Action Push_String_Extended,0x623 ; "\x22, \x22" 0529 01cc | | Execute Vector,Catenate 052a 00db | | Load_Top At_Offset_3 052b 01cc | | Execute Vector,Catenate 052c 0092 0624 | $| Action Push_String_Extended,0x624 ; "\x22)" 052e 01cc | | Execute Vector,Catenate 052f 0007 | | Action Break_Optional 0530 029f 060b | | Declare_Subprogram INIT_0608,For_Call ; Debug Table 0x1a.0x1 = 0x530,0xfffe 0532 BODY_0520: 0532 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1a.0x2 = 0x532,0x1 0533 e5f9 | | Load 0x2,-0x7 0534 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0535 e004 | | Load 0x0,0x4 0536 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0537 6819 |h | Jump_Zero 0x551 0538 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1a.0x3 = 0x538,0x2 0539 00da | | Load_Top At_Offset_2 053a e004 | | Load 0x0,0x4 053b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 053c 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x4 = 0x53c,0x3 053d e5f9 | | Load 0x2,-0x7 053e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 053f e00d | | Load 0x0,0xd 0540 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0541 8603 | | Call 0x3,0x3 ; Debug Table 0x1a.0x5 = 0x541,0x4 0542 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x1a.0x6 = 0x542,0x5 0543 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0544 e00d | | Load 0x0,0xd 0545 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0546 0f03 | | Execute_Immediate Equal,0x3 0547 6809 |h | Jump_Zero 0x551 0548 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1a.0x7 = 0x548,0x6 0549 e003 | | Load 0x0,0x3 054a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 054b e5fa | | Load 0x2,-0x6 054c e5f9 | | Load 0x2,-0x7 054d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 054e e004 | | Load 0x0,0x4 054f 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0550 8603 | | Call 0x3,0x3 ; Debug Table 0x1a.0x8 = 0x550,0x7 0551 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0552 0000 0000 | | .BLANK 0000[0x6] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 0562 | b | .CONST 0x0562 ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0003 | | .CONST 0x0003 ; Number of locals 055b INIT_0558: 055b e402 | | Load 0x2,0x2 ; Debug Table 0x1b = .DEBUG 0x055b,0x0a58,0x1004,0x0000,0x0037,0x0294,0x0000,0x049a ; Debug Table 0x1b.0x0 = 0x55b,0xffff 055c 8220 | | Call 0x1,0x20 055d e5fc | | Load 0x2,-0x4 ; Debug Table 0x1b.0x1 = 0x55d,0xfffe 055e e5fd | | Load 0x2,-0x3 055f e5fe | | Load 0x2,-0x2 0560 00db | | Load_Top At_Offset_3 0561 820f | | Call 0x1,0xf 0562 BODY_0558: 0562 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x1b.0x2 = 0x562,0x1 0563 e5f9 | | Load 0x2,-0x7 0564 e5fa | | Load 0x2,-0x6 0565 e004 | | Load 0x0,0x4 0566 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0567 e5fb | | Load 0x2,-0x5 0568 e5fc | | Load 0x2,-0x4 0569 e603 | | Load 0x3,0x3 056a e602 | | Load 0x3,0x2 056b 8223 | # | Call 0x1,0x23 056c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 056d 0000 0000 | | .XXX[0x3] 056f 0000 | | 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 0578 | x | .CONST 0x0578 ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0002 | | .CONST 0x0002 ; Number of locals 0573 INIT_0570: 0573 e5fc | | Load 0x2,-0x4 ; Debug Table 0x1c = .DEBUG 0x0573,0x0a60,0x1001,0x0000,0x0037,0x0294,0x0000,0x054c ; Debug Table 0x1c.0x0 = 0x573,0xffff 0574 e5fd | | Load 0x2,-0x3 0575 e5fe | | Load 0x2,-0x2 0576 e7ff | | Load 0x3,-0x1 0577 8210 | | Call 0x1,0x10 0578 BODY_0570: 0578 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x1c.0x1 = 0x578,0x1 0579 e5f9 | | Load 0x2,-0x7 057a e5fa | | Load 0x2,-0x6 057b e004 | | Load 0x0,0x4 057c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 057d e5fb | | Load 0x2,-0x5 057e e5fc | | Load 0x2,-0x4 057f e602 | | Load 0x3,0x2 0580 e7ff | | Load 0x3,-0x1 0581 8224 | $ | Call 0x1,0x24 0582 00d1 | | Pop_Control Pop_Count_1 0583 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x1c.0x2 = 0x583,0x2 0584 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0585 e00d | | Load 0x0,0xd 0586 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 0587 0f07 | | Execute_Immediate Equal,0x7 0588 6825 |h% | Jump_Zero 0x5ae 0589 e5fc | | Load 0x2,-0x4 058a e00e | | Load 0x0,0xe 058b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 058c 01df | | Execute Vector,Equal 058d 6820 |h | Jump_Zero 0x5ae 058e e5fd | | Load 0x2,-0x3 ; Debug Table 0x1c.0x3 = 0x58e,0x3 058f 01db | | Execute Vector,Length 0590 7007 |p | Jump_Nonzero 0x598 0591 e5fa | | Load 0x2,-0x6 ; Debug Table 0x1c.0x4 = 0x591,0x4 0592 4807 |H | Short_Literal 0x7 0593 0092 0637 | 7| Action Push_String_Extended,0x637 ; "REMOTE_FILE_UNAVAILABLE: you might be able to work around this problem by specifying Remote_Roof => the name of the directory containing the files you want to retrieve." 0595 e008 | | Load 0x0,0x8 0596 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0597 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0598 e5fa | | Load 0x2,-0x6 ; Debug Table 0x1c.0x5 = 0x598,0x5 0599 4802 |H | Short_Literal 0x2 059a 0092 0638 | 8| Action Push_String_Extended,0x638 ; "REMOTE_FILE_UNAVAILABLE: will attempt to prefix remote file name with Remote_Roof." 059c e008 | | Load 0x0,0x8 059d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 059e e5f8 | | Load 0x2,-0x8 ; Debug Table 0x1c.0x6 = 0x59e,0x6 059f e5f9 | | Load 0x2,-0x7 05a0 e5fa | | Load 0x2,-0x6 05a1 e004 | | Load 0x0,0x4 05a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05a3 e5fb | | Load 0x2,-0x5 05a4 e5fc | | Load 0x2,-0x4 05a5 e602 | | Load 0x3,0x2 05a6 e5fd | | Load 0x2,-0x3 05a7 0092 0639 | 9| Action Push_String_Extended,0x639 ; ":" 05a9 01cc | | Execute Vector,Catenate 05aa e7ff | | Load 0x3,-0x1 05ab 01cc | | Execute Vector,Catenate 05ac 8224 | $ | Call 0x1,0x24 05ad 00d1 | | Pop_Control Pop_Count_1 05ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05af 0000 | | .XXX[0x1] 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b3 | | .CONST 0x05b3 ; Address of begin 05b1 05bb | | .CONST 0x05bb ; Address of exception handler 05b2 0001 | | .CONST 0x0001 ; Number of locals 05b3 BODY_05b0: 05b3 INIT_05b0: 05b3 e402 | | Load 0x2,0x2 ; Debug Table 0x1d = .DEBUG 0x05b3,0x0a70,0x1004,0x0000,0x0037,0x0294,0x0000,0x078a ; Debug Table 0x1d.0x0 = 0x5b3,0x1 05b4 00ea | | Load_Encached Null_String_Cache 05b5 e5ff | | Load 0x2,-0x1 05b6 4800 |H | Short_Literal 0x0 05b7 e00a | | Load 0x0,0xa 05b8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05b9 c402 | | Store 0x2,0x2 05ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05bb TRAP_05b0: 05bb 0007 | | Action Break_Optional 05bc e5fa | | Load 0x2,-0x6 ; Debug Table 0x1d.0x1 = 0x5bc,0x2 05bd 4807 |H | Short_Literal 0x7 05be 0092 063a | :| Action Push_String_Extended,0x63a ; "Could not open \x22" 05c0 e5ff | | Load 0x2,-0x1 05c1 01cc | | Execute Vector,Catenate 05c2 0092 063b | ;| Action Push_String_Extended,0x63b ; "\x22 for input." 05c4 01cc | | Execute Vector,Catenate 05c5 e008 | | Load 0x0,0x8 05c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05c7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x2 = 0x5c7,0x3 05c8 0101 | | Execute Exception,Reraise 05c9 0000 0000 | | .BLANK 0000[0x7] 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05db | | .CONST 0x05db ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0003 | | .CONST 0x0003 ; Number of locals 05d3 INIT_05d0: 05d3 e402 | | Load 0x2,0x2 ; Debug Table 0x1e = .DEBUG 0x05d3,0x0a78,0x1004,0x0000,0x0037,0x0294,0x0000,0x07df ; Debug Table 0x1e.0x0 = 0x5d3,0xffff 05d4 e00a | | Load 0x0,0xa 05d5 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 05d6 e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0x1 = 0x5d6,0xfffe 05d7 e5fd | | Load 0x2,-0x3 05d8 e5fe | | Load 0x2,-0x2 05d9 00db | | Load_Top At_Offset_3 05da 8210 | | Call 0x1,0x10 05db BODY_05d0: 05db e5f8 | | Load 0x2,-0x8 ; Debug Table 0x1e.0x2 = 0x5db,0x1 05dc e5f9 | | Load 0x2,-0x7 05dd e5fa | | Load 0x2,-0x6 05de e004 | | Load 0x0,0x4 05df 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05e0 e5fb | | Load 0x2,-0x5 05e1 e5fc | | Load 0x2,-0x4 05e2 e603 | | Load 0x3,0x3 05e3 e602 | | Load 0x3,0x2 05e4 8224 | $ | Call 0x1,0x24 05e5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05e6 0000 0000 | | .XXX[0x2] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05eb | | .CONST 0x05eb ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0001 | | .CONST 0x0001 ; Number of locals 05eb BODY_05e8: 05eb INIT_05e8: 05eb e5f9 | | Load 0x2,-0x7 ; Debug Table 0x1f = .DEBUG 0x05eb,0x0a80,0x1001,0x0000,0x0037,0x0294,0x0000,0x01c9 ; Debug Table 0x1f.0x0 = 0x5eb,0x1 05ec e5fb | | Load 0x2,-0x5 05ed e004 | | Load 0x0,0x4 05ee 1819 | | Execute Package,Field_Execute,Field_Number 0x19 05ef 00d1 | | Pop_Control Pop_Count_1 05f0 e5fc | | Load 0x2,-0x4 ; Debug Table 0x1f.0x1 = 0x5f0,0x2 05f1 e7fe | | Load 0x3,-0x2 05f2 e7ff | | Load 0x3,-0x1 05f3 e5f9 | | Load 0x2,-0x7 05f4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 05f5 e00d | | Load 0x0,0xd 05f6 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 05f7 0092 0629 | )| Action Push_String_Extended,0x629 ; "stored" ; Debug Table 0x1f.0x2 = 0x5f7,0x3 05f9 e603 | | Load 0x3,0x3 05fa e002 | | Load 0x0,0x2 05fb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05fc 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 05fd e5fb | | Load 0x2,-0x5 05fe e5f9 | | Load 0x2,-0x7 05ff 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0600 e004 | | Load 0x0,0x4 0601 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0602 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0603 0000 0000 | | .BLANK 0000[0x5] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 060b | | .CONST 0x060b ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0001 | | .CONST 0x0001 ; Number of locals 060b BODY_0608: 060b INIT_0608: 060b e5f9 | | Load 0x2,-0x7 ; Debug Table 0x20 = .DEBUG 0x060b,0x0a88,0x1001,0x0000,0x0037,0x0294,0x0000,0x0325 ; Debug Table 0x20.0x0 = 0x60b,0x1 060c e5fb | | Load 0x2,-0x5 060d e004 | | Load 0x0,0x4 060e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 060f 00d1 | | Pop_Control Pop_Count_1 0610 e5fc | | Load 0x2,-0x4 ; Debug Table 0x20.0x1 = 0x610,0x2 0611 e5ff | | Load 0x2,-0x1 0612 e7ff | | Load 0x3,-0x1 0613 e5f9 | | Load 0x2,-0x7 0614 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0615 e00d | | Load 0x0,0xd 0616 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0617 0092 062d | -| Action Push_String_Extended,0x62d ; "retrieved" ; Debug Table 0x20.0x2 = 0x617,0x3 0619 e5ff | | Load 0x2,-0x1 061a e5fb | | Load 0x2,-0x5 061b e5f9 | | Load 0x2,-0x7 061c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 061d e004 | | Load 0x0,0x4 061e 181e | | Execute Package,Field_Execute,Field_Number 0x1e 061f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0620 ; -------------------------------------------------------------------------------------- 0620 ; STRING TABLE 0620 ; -------------------------------------------------------------------------------------- 0620 003a | : | .STRTAB 0x003a->0x063d ; "\x22 cannot be resolved (" 0621 004e | N | .STRTAB 0x004e->0x0648 ; ")." 0622 004e | N | .STRTAB 0x004e->0x0649 ; "Ftp.Store (\x22" 0623 0058 | X | .STRTAB 0x0058->0x064f ; "\x22, \x22" 0624 005a | Z | .STRTAB 0x005a->0x0651 ; "\x22)" 0625 005a | Z | .STRTAB 0x005a->0x0652 ; "$" 0626 0059 | Y | .STRTAB 0x0059->0x0652 ; " failed." 0627 005f | _ | .STRTAB 0x005f->0x0656 ; "Ftp.Retrieve (\x22" 0628 006c | l | .STRTAB 0x006c->0x065e ; "Ftp.Store_Set (\x22" 0629 007a | z | .STRTAB 0x007a->0x0666 ; "stored" 062a 007e | ~ | .STRTAB 0x007e->0x0669 ; "Ftp.Retrieve_Set (\x22" 062b 008f | | .STRTAB 0x008f->0x0672 ; "Could not get directory listing." 062c 00ad | | .STRTAB 0x00ad->0x0682 ; " cannot be resolved." 062d 00bf | | .STRTAB 0x00bf->0x068c ; "retrieved" 062e 00c6 | | .STRTAB 0x00c6->0x0691 ; "Ftp.Retrieve_List (\x22" 062f 00d8 | | .STRTAB 0x00d8->0x069b ; " failed with an exception." 0630 00f0 | | .STRTAB 0x00f0->0x06a8 ; "Ftp.Put aborted." 0631 00fe | | .STRTAB 0x00fe->0x06b0 ; "Ftp.Get aborted." 0632 010c | | .STRTAB 0x010c->0x06b8 ; "Ftp.Put_Set aborted." 0633 011e | | .STRTAB 0x011e->0x06c2 ; "Ftp.Get_Set aborted." 0634 0130 | 0 | .STRTAB 0x0130->0x06cc ; "Ftp.Get_List aborted." 0635 0143 | C | .STRTAB 0x0143->0x06d6 ; "AOS" 0636 0144 | D | .STRTAB 0x0144->0x06d8 ; "MACINTOSH" 0637 014b | K | .STRTAB 0x014b->0x06dc ; "REMOTE_FILE_UNAVAILABLE: you might be able to work around this problem by specifying Remote_Roof => the name of the directory containing the files you want to retrieve." 0638 01f1 | | .STRTAB 0x01f1->0x0730 ; "REMOTE_FILE_UNAVAILABLE: will attempt to prefix remote file name with Remote_Roof." 0639 0241 | A | .STRTAB 0x0241->0x0759 ; ":" 063a 0240 | @ | .STRTAB 0x0240->0x075a ; "Could not open \x22" 063b 024e | N | .STRTAB 0x024e->0x0762 ; "\x22 for input." 063c 0258 | X | .STREND 0x0258->0x0768 063d 2220 6361 |" ca| .STRTAB_STRINGS 0768 ; -------------------------------------------------------------------------------------- 0768 ; Debug Table 0768 ; -------------------------------------------------------------------------------------- 0768 0003 0021 | !| .CONST 0x0003,0x0021 076a 000b 0872 | r| .DEBUG 0x000b,0x0872,0xc000,0x0000,0x0037,0x0264,0x0000,0x000b 0772 0022 088c | " | .DEBUG 0x0022,0x088c,0xc000,0x0000,0x0037,0x0294,0x0000,0x0013 077a 0063 08c2 | c | .DEBUG 0x0063,0x08c2,0x1001,0x0000,0x0037,0x0264,0x0000,0x0049 0782 008b 08ce | | .DEBUG 0x008b,0x08ce,0x1001,0x0000,0x0037,0x0264,0x0000,0x00b3 078a 00b3 08da | | .DEBUG 0x00b3,0x08da,0x1001,0x0000,0x0037,0x0264,0x0000,0x011d 0792 00cb 08de | | .DEBUG 0x00cb,0x08de,0x1001,0x0000,0x0037,0x0264,0x0000,0x0149 079a 00e3 08e2 | | .DEBUG 0x00e3,0x08e2,0x1001,0x0000,0x0037,0x0264,0x0000,0x0175 07a2 010b 08ee | | .DEBUG 0x010b,0x08ee,0x1001,0x0000,0x0037,0x0264,0x0000,0x01e6 07aa 0133 08fa | 3 | .DEBUG 0x0133,0x08fa,0x1001,0x0000,0x0037,0x0264,0x0000,0x0257 07b2 015b 0906 | [ | .DEBUG 0x015b,0x0906,0x1001,0x0000,0x0037,0x0264,0x0000,0x02c8 07ba 0173 090a | s | .DEBUG 0x0173,0x090a,0x1001,0x0000,0x0037,0x0264,0x0000,0x02fb 07c2 018b 090e | | .DEBUG 0x018b,0x090e,0x1001,0x0000,0x0037,0x0264,0x0000,0x032e 07ca 01a3 0912 | | .DEBUG 0x01a3,0x0912,0x1007,0x0000,0x0037,0x0294,0x0000,0x0000 07d2 01b3 0914 | | .DEBUG 0x01b3,0x0914,0x1001,0x0000,0x0037,0x0294,0x0000,0x0099 07da 01eb 0920 | | .DEBUG 0x01eb,0x0920,0x1002,0x0000,0x0037,0x0294,0x0000,0x00f9 07e2 022b 0930 | + 0| .DEBUG 0x022b,0x0930,0x1001,0x0000,0x0037,0x0294,0x0000,0x015b 07ea 0263 0942 | c B| .DEBUG 0x0263,0x0942,0x1001,0x0000,0x0037,0x0294,0x0000,0x02c4 07f2 0293 0954 | T| .DEBUG 0x0293,0x0954,0x1001,0x0000,0x0037,0x0294,0x0000,0x03e0 07fa 02f3 097c | || .DEBUG 0x02f3,0x097c,0x1001,0x0000,0x0037,0x0294,0x0000,0x04f2 0802 038b 09b6 | | .DEBUG 0x038b,0x09b6,0x1001,0x0000,0x0037,0x0294,0x0000,0x06ee 080a 03fb 09e4 | | .DEBUG 0x03fb,0x09e4,0x1004,0x0000,0x0037,0x0294,0x0000,0x0aca 0812 0423 09f2 | # | .DEBUG 0x0423,0x09f2,0x1004,0x0000,0x0037,0x0294,0x0000,0x0bc2 081a 044b 0a00 | K | .DEBUG 0x044b,0x0a00,0x1004,0x0000,0x0037,0x0294,0x0000,0x0cc1 0822 047b 0a0e | { | .DEBUG 0x047b,0x0a0e,0x1004,0x0000,0x0037,0x0294,0x0000,0x0dc3 082a 04a3 0a1c | | .DEBUG 0x04a3,0x0a1c,0x1004,0x0000,0x0037,0x0294,0x0000,0x0ec2 0832 04cb 0a2a | *| .DEBUG 0x04cb,0x0a2a,0x1001,0x0000,0x0037,0x0294,0x0000,0x019f 083a 0523 0a44 | # D| .DEBUG 0x0523,0x0a44,0x1001,0x0000,0x0037,0x0294,0x0000,0x0308 0842 055b 0a58 | [ X| .DEBUG 0x055b,0x0a58,0x1004,0x0000,0x0037,0x0294,0x0000,0x049a 084a 0573 0a60 | s `| .DEBUG 0x0573,0x0a60,0x1001,0x0000,0x0037,0x0294,0x0000,0x054c 0852 05b3 0a70 | p| .DEBUG 0x05b3,0x0a70,0x1004,0x0000,0x0037,0x0294,0x0000,0x078a 085a 05d3 0a78 | x| .DEBUG 0x05d3,0x0a78,0x1004,0x0000,0x0037,0x0294,0x0000,0x07df 0862 05eb 0a80 | | .DEBUG 0x05eb,0x0a80,0x1001,0x0000,0x0037,0x0294,0x0000,0x01c9 086a 060b 0a88 | | .DEBUG 0x060b,0x0a88,0x1001,0x0000,0x0037,0x0294,0x0000,0x0325 0872 ; -------------------------------------------------------------------------------------- 0872 ; Debug3 Subtable 0x0 0872 ; -------------------------------------------------------------------------------------- 0872 000c 0000 | | .DBG3TAB 0x000c,0x0000 0874 000b ffff | | .CONST 0x000b,0xffff 0876 000c fffe | | .CONST 0x000c,0xfffe 0878 000d fffd | | .CONST 0x000d,0xfffd 087a 000f fffc | | .CONST 0x000f,0xfffc 087c 0011 fffb | | .CONST 0x0011,0xfffb 087e 0013 fffa | | .CONST 0x0013,0xfffa 0880 0015 fff9 | | .CONST 0x0015,0xfff9 0882 0017 fff8 | | .CONST 0x0017,0xfff8 0884 0019 fff7 | | .CONST 0x0019,0xfff7 0886 001b fff6 | | .CONST 0x001b,0xfff6 0888 001d fff5 | | .CONST 0x001d,0xfff5 088a 001f fff4 | | .CONST 0x001f,0xfff4 088c ; -------------------------------------------------------------------------------------- 088c ; Debug3 Subtable 0x1 088c ; -------------------------------------------------------------------------------------- 088c 001a 0000 | | .DBG3TAB 0x001a,0x0000 088e 0022 ffff | " | .CONST 0x0022,0xffff 0890 0024 fffe | $ | .CONST 0x0024,0xfffe 0892 0025 fffd | % | .CONST 0x0025,0xfffd 0894 0026 fffc | & | .CONST 0x0026,0xfffc 0896 0027 fffb | ' | .CONST 0x0027,0xfffb 0898 0029 fffa | ) | .CONST 0x0029,0xfffa 089a 002c fff9 | , | .CONST 0x002c,0xfff9 089c 0030 fff8 | 0 | .CONST 0x0030,0xfff8 089e 0034 fff7 | 4 | .CONST 0x0034,0xfff7 08a0 0038 fff6 | 8 | .CONST 0x0038,0xfff6 08a2 003a fff5 | : | .CONST 0x003a,0xfff5 08a4 003c fff4 | < | .CONST 0x003c,0xfff4 08a6 003e fff3 | > | .CONST 0x003e,0xfff3 08a8 0040 fff2 | @ | .CONST 0x0040,0xfff2 08aa 0042 fff1 | B | .CONST 0x0042,0xfff1 08ac 0044 fff0 | D | .CONST 0x0044,0xfff0 08ae 0046 ffef | F | .CONST 0x0046,0xffef 08b0 0048 ffee | H | .CONST 0x0048,0xffee 08b2 004a ffed | J | .CONST 0x004a,0xffed 08b4 004c ffec | L | .CONST 0x004c,0xffec 08b6 004e ffeb | N | .CONST 0x004e,0xffeb 08b8 0050 ffea | P | .CONST 0x0050,0xffea 08ba 0052 ffe9 | R | .CONST 0x0052,0xffe9 08bc 0054 ffe8 | T | .CONST 0x0054,0xffe8 08be 0056 ffe7 | V | .CONST 0x0056,0xffe7 08c0 0058 ffe6 | X | .CONST 0x0058,0xffe6 08c2 ; -------------------------------------------------------------------------------------- 08c2 ; Debug3 Subtable 0x2 08c2 ; -------------------------------------------------------------------------------------- 08c2 0002 0003 | | .DBG3TAB 0x0002,0x0003 08c4 0063 ffff | c | .CONST 0x0063,0xffff 08c6 0068 fffe | h | .CONST 0x0068,0xfffe 08c8 006b 0001 | k | .CONST 0x006b,0x0001 08ca 0081 0002 | | .CONST 0x0081,0x0002 08cc 0083 0003 | | .CONST 0x0083,0x0003 08ce ; -------------------------------------------------------------------------------------- 08ce ; Debug3 Subtable 0x3 08ce ; -------------------------------------------------------------------------------------- 08ce 0002 0003 | | .DBG3TAB 0x0002,0x0003 08d0 008b ffff | | .CONST 0x008b,0xffff 08d2 0090 fffe | | .CONST 0x0090,0xfffe 08d4 0093 0001 | | .CONST 0x0093,0x0001 08d6 00a9 0002 | | .CONST 0x00a9,0x0002 08d8 00ab 0003 | | .CONST 0x00ab,0x0003 08da ; -------------------------------------------------------------------------------------- 08da ; Debug3 Subtable 0x4 08da ; -------------------------------------------------------------------------------------- 08da 0000 0001 | | .DBG3TAB 0x0000,0x0001 08dc 00b3 0001 | | .CONST 0x00b3,0x0001 08de ; -------------------------------------------------------------------------------------- 08de ; Debug3 Subtable 0x5 08de ; -------------------------------------------------------------------------------------- 08de 0000 0001 | | .DBG3TAB 0x0000,0x0001 08e0 00cb 0001 | | .CONST 0x00cb,0x0001 08e2 ; -------------------------------------------------------------------------------------- 08e2 ; Debug3 Subtable 0x6 08e2 ; -------------------------------------------------------------------------------------- 08e2 0002 0003 | | .DBG3TAB 0x0002,0x0003 08e4 00e3 ffff | | .CONST 0x00e3,0xffff 08e6 00e8 fffe | | .CONST 0x00e8,0xfffe 08e8 00eb 0001 | | .CONST 0x00eb,0x0001 08ea 0101 0002 | | .CONST 0x0101,0x0002 08ec 0103 0003 | | .CONST 0x0103,0x0003 08ee ; -------------------------------------------------------------------------------------- 08ee ; Debug3 Subtable 0x7 08ee ; -------------------------------------------------------------------------------------- 08ee 0002 0003 | | .DBG3TAB 0x0002,0x0003 08f0 010b ffff | | .CONST 0x010b,0xffff 08f2 0110 fffe | | .CONST 0x0110,0xfffe 08f4 0113 0001 | | .CONST 0x0113,0x0001 08f6 0129 0002 | ) | .CONST 0x0129,0x0002 08f8 012b 0003 | + | .CONST 0x012b,0x0003 08fa ; -------------------------------------------------------------------------------------- 08fa ; Debug3 Subtable 0x8 08fa ; -------------------------------------------------------------------------------------- 08fa 0002 0003 | | .DBG3TAB 0x0002,0x0003 08fc 0133 ffff | 3 | .CONST 0x0133,0xffff 08fe 0138 fffe | 8 | .CONST 0x0138,0xfffe 0900 013b 0001 | ; | .CONST 0x013b,0x0001 0902 0151 0002 | Q | .CONST 0x0151,0x0002 0904 0153 0003 | S | .CONST 0x0153,0x0003 0906 ; -------------------------------------------------------------------------------------- 0906 ; Debug3 Subtable 0x9 0906 ; -------------------------------------------------------------------------------------- 0906 0000 0001 | | .DBG3TAB 0x0000,0x0001 0908 015b 0001 | [ | .CONST 0x015b,0x0001 090a ; -------------------------------------------------------------------------------------- 090a ; Debug3 Subtable 0xa 090a ; -------------------------------------------------------------------------------------- 090a 0000 0001 | | .DBG3TAB 0x0000,0x0001 090c 0173 0001 | s | .CONST 0x0173,0x0001 090e ; -------------------------------------------------------------------------------------- 090e ; Debug3 Subtable 0xb 090e ; -------------------------------------------------------------------------------------- 090e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0910 018b 0001 | | .CONST 0x018b,0x0001 0912 ; -------------------------------------------------------------------------------------- 0912 ; Debug3 Subtable 0xc 0912 ; -------------------------------------------------------------------------------------- 0912 0000 0000 | | .DBG3TAB 0x0000,0x0000 0914 ; -------------------------------------------------------------------------------------- 0914 ; Debug3 Subtable 0xd 0914 ; -------------------------------------------------------------------------------------- 0914 0001 0004 | | .DBG3TAB 0x0001,0x0004 0916 01b3 ffff | | .CONST 0x01b3,0xffff 0918 01b6 0001 | | .CONST 0x01b6,0x0001 091a 01ce 0002 | | .CONST 0x01ce,0x0002 091c 01d3 0003 | | .CONST 0x01d3,0x0003 091e 01e3 0004 | | .CONST 0x01e3,0x0004 0920 ; -------------------------------------------------------------------------------------- 0920 ; Debug3 Subtable 0xe 0920 ; -------------------------------------------------------------------------------------- 0920 0002 0005 | | .DBG3TAB 0x0002,0x0005 0922 01eb ffff | | .CONST 0x01eb,0xffff 0924 01f0 fffe | | .CONST 0x01f0,0xfffe 0926 01f3 0001 | | .CONST 0x01f3,0x0001 0928 020b 0002 | | .CONST 0x020b,0x0002 092a 020d 0003 | | .CONST 0x020d,0x0003 092c 021d 0004 | | .CONST 0x021d,0x0004 092e 021f 0005 | | .CONST 0x021f,0x0005 0930 ; -------------------------------------------------------------------------------------- 0930 ; Debug3 Subtable 0xf 0930 ; -------------------------------------------------------------------------------------- 0930 0002 0006 | | .DBG3TAB 0x0002,0x0006 0932 022b ffff | + | .CONST 0x022b,0xffff 0934 0238 fffe | 8 | .CONST 0x0238,0xfffe 0936 023a 0001 | : | .CONST 0x023a,0x0001 0938 023d 0002 | = | .CONST 0x023d,0x0002 093a 0246 0003 | F | .CONST 0x0246,0x0003 093c 024b 0004 | K | .CONST 0x024b,0x0004 093e 0253 0005 | S | .CONST 0x0253,0x0005 0940 0257 0006 | W | .CONST 0x0257,0x0006 0942 ; -------------------------------------------------------------------------------------- 0942 ; Debug3 Subtable 0x10 0942 ; -------------------------------------------------------------------------------------- 0942 0002 0006 | | .DBG3TAB 0x0002,0x0006 0944 0263 ffff | c | .CONST 0x0263,0xffff 0946 0270 fffe | p | .CONST 0x0270,0xfffe 0948 0272 0001 | r | .CONST 0x0272,0x0001 094a 0275 0002 | u | .CONST 0x0275,0x0002 094c 027d 0003 | } | .CONST 0x027d,0x0003 094e 0281 0004 | | .CONST 0x0281,0x0004 0950 0289 0005 | | .CONST 0x0289,0x0005 0952 028d 0006 | | .CONST 0x028d,0x0006 0954 ; -------------------------------------------------------------------------------------- 0954 ; Debug3 Subtable 0x11 0954 ; -------------------------------------------------------------------------------------- 0954 0004 000f | | .DBG3TAB 0x0004,0x000f 0956 0293 ffff | | .CONST 0x0293,0xffff 0958 0297 fffe | | .CONST 0x0297,0xfffe 095a 0299 fffd | | .CONST 0x0299,0xfffd 095c 029b fffc | | .CONST 0x029b,0xfffc 095e 02a4 0001 | | .CONST 0x02a4,0x0001 0960 02aa 0002 | | .CONST 0x02aa,0x0002 0962 02af 0003 | | .CONST 0x02af,0x0003 0964 02b5 0005 | | .CONST 0x02b5,0x0005 0966 02bb 0006 | | .CONST 0x02bb,0x0006 0968 02bc 0007 | | .CONST 0x02bc,0x0007 096a 02c1 0008 | | .CONST 0x02c1,0x0008 096c 02c5 0009 | | .CONST 0x02c5,0x0009 096e 02c8 000a | | .CONST 0x02c8,0x000a 0970 02cc 000b | | .CONST 0x02cc,0x000b 0972 02d0 0004 | | .CONST 0x02d0,0x0004 0974 02d4 000c | | .CONST 0x02d4,0x000c 0976 02dd 000d | | .CONST 0x02dd,0x000d 0978 02e5 000e | | .CONST 0x02e5,0x000e 097a 02e9 000f | | .CONST 0x02e9,0x000f 097c ; -------------------------------------------------------------------------------------- 097c ; Debug3 Subtable 0x12 097c ; -------------------------------------------------------------------------------------- 097c 0006 0016 | | .DBG3TAB 0x0006,0x0016 097e 02f3 ffff | | .CONST 0x02f3,0xffff 0980 02f5 fffe | | .CONST 0x02f5,0xfffe 0982 02f7 fffd | | .CONST 0x02f7,0xfffd 0984 02fc fffc | | .CONST 0x02fc,0xfffc 0986 02fe fffb | | .CONST 0x02fe,0xfffb 0988 0306 fffa | | .CONST 0x0306,0xfffa 098a 0308 0001 | | .CONST 0x0308,0x0001 098c 030e 0002 | | .CONST 0x030e,0x0002 098e 0312 0003 | | .CONST 0x0312,0x0003 0990 0317 0004 | | .CONST 0x0317,0x0004 0992 0328 0005 | ( | .CONST 0x0328,0x0005 0994 032c 0006 | , | .CONST 0x032c,0x0006 0996 0332 0007 | 2 | .CONST 0x0332,0x0007 0998 0334 0008 | 4 | .CONST 0x0334,0x0008 099a 0338 0009 | 8 | .CONST 0x0338,0x0009 099c 0344 000a | D | .CONST 0x0344,0x000a 099e 0348 000c | H | .CONST 0x0348,0x000c 09a0 034e 000d | N | .CONST 0x034e,0x000d 09a2 0352 000e | R | .CONST 0x0352,0x000e 09a4 0357 000f | W | .CONST 0x0357,0x000f 09a6 035b 0010 | [ | .CONST 0x035b,0x0010 09a8 035e 0011 | ^ | .CONST 0x035e,0x0011 09aa 0363 000b | c | .CONST 0x0363,0x000b 09ac 0368 0012 | h | .CONST 0x0368,0x0012 09ae 036c 0013 | l | .CONST 0x036c,0x0013 09b0 0375 0014 | u | .CONST 0x0375,0x0014 09b2 037d 0015 | } | .CONST 0x037d,0x0015 09b4 0381 0016 | | .CONST 0x0381,0x0016 09b6 ; -------------------------------------------------------------------------------------- 09b6 ; Debug3 Subtable 0x13 09b6 ; -------------------------------------------------------------------------------------- 09b6 0005 0011 | | .DBG3TAB 0x0005,0x0011 09b8 038b ffff | | .CONST 0x038b,0xffff 09ba 0390 fffe | | .CONST 0x0390,0xfffe 09bc 0392 fffd | | .CONST 0x0392,0xfffd 09be 0394 fffc | | .CONST 0x0394,0xfffc 09c0 039c fffb | | .CONST 0x039c,0xfffb 09c2 03a5 0001 | | .CONST 0x03a5,0x0001 09c4 03a9 0002 | | .CONST 0x03a9,0x0002 09c6 03af 0003 | | .CONST 0x03af,0x0003 09c8 03b3 0004 | | .CONST 0x03b3,0x0004 09ca 03b6 0006 | | .CONST 0x03b6,0x0006 09cc 03bc 0007 | | .CONST 0x03bc,0x0007 09ce 03bd 0008 | | .CONST 0x03bd,0x0008 09d0 03c2 0009 | | .CONST 0x03c2,0x0009 09d2 03c6 000a | | .CONST 0x03c6,0x000a 09d4 03c9 000b | | .CONST 0x03c9,0x000b 09d6 03ce 0005 | | .CONST 0x03ce,0x0005 09d8 03d3 000c | | .CONST 0x03d3,0x000c 09da 03d7 000d | | .CONST 0x03d7,0x000d 09dc 03e2 000e | | .CONST 0x03e2,0x000e 09de 03e4 000f | | .CONST 0x03e4,0x000f 09e0 03ec 0010 | | .CONST 0x03ec,0x0010 09e2 03f0 0011 | | .CONST 0x03f0,0x0011 09e4 ; -------------------------------------------------------------------------------------- 09e4 ; Debug3 Subtable 0x14 09e4 ; -------------------------------------------------------------------------------------- 09e4 0000 0006 | | .DBG3TAB 0x0000,0x0006 09e6 03fb 0001 | | .CONST 0x03fb,0x0001 09e8 0404 0002 | | .CONST 0x0404,0x0002 09ea 040a 0003 | | .CONST 0x040a,0x0003 09ec 0410 0004 | | .CONST 0x0410,0x0004 09ee 0415 0005 | | .CONST 0x0415,0x0005 09f0 0419 0006 | | .CONST 0x0419,0x0006 09f2 ; -------------------------------------------------------------------------------------- 09f2 ; Debug3 Subtable 0x15 09f2 ; -------------------------------------------------------------------------------------- 09f2 0000 0006 | | .DBG3TAB 0x0000,0x0006 09f4 0423 0001 | # | .CONST 0x0423,0x0001 09f6 042c 0002 | , | .CONST 0x042c,0x0002 09f8 0432 0003 | 2 | .CONST 0x0432,0x0003 09fa 0438 0004 | 8 | .CONST 0x0438,0x0004 09fc 043d 0005 | = | .CONST 0x043d,0x0005 09fe 0441 0006 | A | .CONST 0x0441,0x0006 0a00 ; -------------------------------------------------------------------------------------- 0a00 ; Debug3 Subtable 0x16 0a00 ; -------------------------------------------------------------------------------------- 0a00 0000 0006 | | .DBG3TAB 0x0000,0x0006 0a02 044b 0001 | K | .CONST 0x044b,0x0001 0a04 0456 0002 | V | .CONST 0x0456,0x0002 0a06 045c 0003 | \ | .CONST 0x045c,0x0003 0a08 0462 0004 | b | .CONST 0x0462,0x0004 0a0a 0467 0005 | g | .CONST 0x0467,0x0005 0a0c 046b 0006 | k | .CONST 0x046b,0x0006 0a0e ; -------------------------------------------------------------------------------------- 0a0e ; Debug3 Subtable 0x17 0a0e ; -------------------------------------------------------------------------------------- 0a0e 0000 0006 | | .DBG3TAB 0x0000,0x0006 0a10 047b 0001 | { | .CONST 0x047b,0x0001 0a12 0485 0002 | | .CONST 0x0485,0x0002 0a14 048b 0003 | | .CONST 0x048b,0x0003 0a16 0491 0004 | | .CONST 0x0491,0x0004 0a18 0496 0005 | | .CONST 0x0496,0x0005 0a1a 049a 0006 | | .CONST 0x049a,0x0006 0a1c ; -------------------------------------------------------------------------------------- 0a1c ; Debug3 Subtable 0x18 0a1c ; -------------------------------------------------------------------------------------- 0a1c 0000 0006 | | .DBG3TAB 0x0000,0x0006 0a1e 04a3 0001 | | .CONST 0x04a3,0x0001 0a20 04ae 0002 | | .CONST 0x04ae,0x0002 0a22 04b4 0003 | | .CONST 0x04b4,0x0003 0a24 04ba 0004 | | .CONST 0x04ba,0x0004 0a26 04bf 0005 | | .CONST 0x04bf,0x0005 0a28 04c3 0006 | | .CONST 0x04c3,0x0006 0a2a ; -------------------------------------------------------------------------------------- 0a2a ; Debug3 Subtable 0x19 0a2a ; -------------------------------------------------------------------------------------- 0a2a 0003 0009 | | .DBG3TAB 0x0003,0x0009 0a2c 04cb ffff | | .CONST 0x04cb,0xffff 0a2e 04d8 fffe | | .CONST 0x04d8,0xfffe 0a30 04df fffd | | .CONST 0x04df,0xfffd 0a32 04e1 0001 | | .CONST 0x04e1,0x0001 0a34 04e7 0002 | | .CONST 0x04e7,0x0002 0a36 04eb 0003 | | .CONST 0x04eb,0x0003 0a38 04f4 0004 | | .CONST 0x04f4,0x0004 0a3a 04fe 0005 | | .CONST 0x04fe,0x0005 0a3c 0508 0006 | | .CONST 0x0508,0x0006 0a3e 0509 0007 | | .CONST 0x0509,0x0007 0a40 050f 0008 | | .CONST 0x050f,0x0008 0a42 0517 0009 | | .CONST 0x0517,0x0009 0a44 ; -------------------------------------------------------------------------------------- 0a44 ; Debug3 Subtable 0x1a 0a44 ; -------------------------------------------------------------------------------------- 0a44 0002 0007 | | .DBG3TAB 0x0002,0x0007 0a46 0523 ffff | # | .CONST 0x0523,0xffff 0a48 0530 fffe | 0 | .CONST 0x0530,0xfffe 0a4a 0532 0001 | 2 | .CONST 0x0532,0x0001 0a4c 0538 0002 | 8 | .CONST 0x0538,0x0002 0a4e 053c 0003 | < | .CONST 0x053c,0x0003 0a50 0541 0004 | A | .CONST 0x0541,0x0004 0a52 0542 0005 | B | .CONST 0x0542,0x0005 0a54 0548 0006 | H | .CONST 0x0548,0x0006 0a56 0550 0007 | P | .CONST 0x0550,0x0007 0a58 ; -------------------------------------------------------------------------------------- 0a58 ; Debug3 Subtable 0x1b 0a58 ; -------------------------------------------------------------------------------------- 0a58 0002 0001 | | .DBG3TAB 0x0002,0x0001 0a5a 055b ffff | [ | .CONST 0x055b,0xffff 0a5c 055d fffe | ] | .CONST 0x055d,0xfffe 0a5e 0562 0001 | b | .CONST 0x0562,0x0001 0a60 ; -------------------------------------------------------------------------------------- 0a60 ; Debug3 Subtable 0x1c 0a60 ; -------------------------------------------------------------------------------------- 0a60 0001 0006 | | .DBG3TAB 0x0001,0x0006 0a62 0573 ffff | s | .CONST 0x0573,0xffff 0a64 0578 0001 | x | .CONST 0x0578,0x0001 0a66 0583 0002 | | .CONST 0x0583,0x0002 0a68 058e 0003 | | .CONST 0x058e,0x0003 0a6a 0591 0004 | | .CONST 0x0591,0x0004 0a6c 0598 0005 | | .CONST 0x0598,0x0005 0a6e 059e 0006 | | .CONST 0x059e,0x0006 0a70 ; -------------------------------------------------------------------------------------- 0a70 ; Debug3 Subtable 0x1d 0a70 ; -------------------------------------------------------------------------------------- 0a70 0000 0003 | | .DBG3TAB 0x0000,0x0003 0a72 05b3 0001 | | .CONST 0x05b3,0x0001 0a74 05bc 0002 | | .CONST 0x05bc,0x0002 0a76 05c7 0003 | | .CONST 0x05c7,0x0003 0a78 ; -------------------------------------------------------------------------------------- 0a78 ; Debug3 Subtable 0x1e 0a78 ; -------------------------------------------------------------------------------------- 0a78 0002 0001 | | .DBG3TAB 0x0002,0x0001 0a7a 05d3 ffff | | .CONST 0x05d3,0xffff 0a7c 05d6 fffe | | .CONST 0x05d6,0xfffe 0a7e 05db 0001 | | .CONST 0x05db,0x0001 0a80 ; -------------------------------------------------------------------------------------- 0a80 ; Debug3 Subtable 0x1f 0a80 ; -------------------------------------------------------------------------------------- 0a80 0000 0003 | | .DBG3TAB 0x0000,0x0003 0a82 05eb 0001 | | .CONST 0x05eb,0x0001 0a84 05f0 0002 | | .CONST 0x05f0,0x0002 0a86 05f7 0003 | | .CONST 0x05f7,0x0003 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; Debug3 Subtable 0x20 0a88 ; -------------------------------------------------------------------------------------- 0a88 0000 0003 | | .DBG3TAB 0x0000,0x0003 0a8a 060b 0001 | | .CONST 0x060b,0x0001 0a8c 0610 0002 | | .CONST 0x0610,0x0002 0a8e 0617 0003 | | .CONST 0x0617,0x0003 0a90 0000 0000 | | .BLANK 0000[0x170]