|
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: 10240 (0x2800) 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 0ce8 | | .CONST 0x0ce8 ; 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 0009 | | .CONST 0x0009 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00c0 | | .CONST 0x00c0 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0041 | A | .CONST 0x0041 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x0eba,0x8000,0x0000,0x0037,0x0234,0x0000,0x000f ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xc,0xfffe 000e 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xe,0xfffd 0010 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x10,0xfffc 0012 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x12,0xfffb 0014 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x5 = 0x14,0xfffa 0015 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0016 0129 | ) | Execute Any,Make_Visible 0017 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x6 = 0x17,0xfff9 0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0019 0129 | ) | Execute Any,Make_Visible 001a 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1a,0xfff8 001c 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1c,0xfff7 001e e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x9 = 0x1e,0xfff6 001f 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36 0020 0129 | ) | Execute Any,Make_Visible 0021 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x21,0xfff5 0023 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x23,0xfff4 0025 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x25,0xfff3 0027 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x27,0xfff2 0029 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x29,0xfff1 002b 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x2b,0xfff0 002d 0092 0987 | | Action Push_String_Extended,0x987 ; "Ftp command" ; Debug Table 0x0.0x10 = 0x2d,0xffef 002f 0129 | ) | Execute Any,Make_Visible 0030 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x30,0xffee 0032 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x32,0xffed 0034 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x34,0xffec 0036 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x14 = 0x36,0xffeb 0038 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x15 = 0x38,0xffea 003a 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x16 = 0x3a,0xffe9 003c 029a 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x17 = 0x3c,0xffe8 003e 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x18 = 0x3e,0xffe7 0040 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x19 = 0x40,0xffe6 0042 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1a = 0x42,0xffe5 0044 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1b = 0x44,0xffe4 0046 029a 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1c = 0x46,0xffe3 0048 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1d = 0x48,0xffe2 004a 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1e = 0x4a,0xffe1 004c 029a 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1f = 0x4c,0xffe0 004e 029a 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x20 = 0x4e,0xffdf 0050 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x21 = 0x50,0xffde 0052 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x22 = 0x52,0xffdd 0054 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x23 = 0x54,0xffdc 0056 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x24 = 0x56,0xffdb 0058 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x25 = 0x58,0xffda 005a 00bf | | Action Accept_Activation 005b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x005b,0x0f08,0x8000,0x0000,0x0037,0x0244,0x0000,0x001b ; Debug Table 0x1.0x0 = 0x5b,0xffff 005c 029d 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call ; Debug Table 0x1.0x1 = 0x5c,0xfffe 005e 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call ; Debug Table 0x1.0x2 = 0x5e,0xfffd 0060 029d 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call ; Debug Table 0x1.0x3 = 0x60,0xfffc 0062 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x4 = 0x62,0xfffb 0063 00c7 | | Action Elaborate_Subprogram 0064 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x5 = 0x64,0xfffa 0065 00c7 | | Action Elaborate_Subprogram 0066 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x6 = 0x66,0xfff9 0067 00c7 | | Action Elaborate_Subprogram 0068 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x7 = 0x68,0xfff8 0069 00c7 | | Action Elaborate_Subprogram 006a 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x8 = 0x6a,0xfff7 006b 00c7 | | Action Elaborate_Subprogram 006c 029d 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call ; Debug Table 0x1.0x9 = 0x6c,0xfff6 006e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xa = 0x6e,0xfff5 006f 00c7 | | Action Elaborate_Subprogram 0070 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xb = 0x70,0xfff4 0071 00c7 | | Action Elaborate_Subprogram 0072 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xc = 0x72,0xfff3 0073 00c7 | | Action Elaborate_Subprogram 0074 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xd = 0x74,0xfff2 0075 1937 | 7 | Execute Package,Field_Reference,Field_Number 0x37 0076 0007 | | Action Break_Optional 0077 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xe = 0x77,0xfff1 0078 1938 | 8 | Execute Package,Field_Reference,Field_Number 0x38 0079 0007 | | Action Break_Optional 007a 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xf = 0x7a,0xfff0 007b 00c7 | | Action Elaborate_Subprogram 007c 029d 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call ; Debug Table 0x1.0x10 = 0x7c,0xffef 007e 029d 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call ; Debug Table 0x1.0x11 = 0x7e,0xffee 0080 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x12 = 0x80,0xffed 0081 00c7 | | Action Elaborate_Subprogram 0082 029d 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call ; Debug Table 0x1.0x13 = 0x82,0xffec 0084 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 ; Debug Table 0x1.0x14 = 0x84,0xffeb 0085 00c7 | | Action Elaborate_Subprogram 0086 029d 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call ; Debug Table 0x1.0x15 = 0x86,0xffea 0088 029d 0703 | | Declare_Subprogram INIT_0700,For_Outer_Call ; Debug Table 0x1.0x16 = 0x88,0xffe9 008a 029d 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call ; Debug Table 0x1.0x17 = 0x8a,0xffe8 008c 029d 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call ; Debug Table 0x1.0x18 = 0x8c,0xffe7 008e 029d 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call ; Debug Table 0x1.0x19 = 0x8e,0xffe6 0090 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call ; Debug Table 0x1.0x1a = 0x90,0xffe5 0092 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 ; Debug Table 0x1.0x1b = 0x92,0xffe4 0093 00c7 | | Action Elaborate_Subprogram 0094 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 ; Debug Table 0x1.0x1c = 0x94,0xffe3 0095 00c7 | | Action Elaborate_Subprogram 0096 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 ; Debug Table 0x1.0x1d = 0x96,0xffe2 0097 00c7 | | Action Elaborate_Subprogram 0098 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 ; Debug Table 0x1.0x1e = 0x98,0xffe1 0099 00c7 | | Action Elaborate_Subprogram 009a 029d 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call ; Debug Table 0x1.0x1f = 0x9a,0xffe0 009c 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x20 = 0x9c,0xffdf 009d 00c7 | | Action Elaborate_Subprogram 009e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x21 = 0x9e,0xffde 009f 00c7 | | Action Elaborate_Subprogram 00a0 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0x22 = 0xa0,0xffdd 00a1 00c7 | | Action Elaborate_Subprogram 00a2 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x23 = 0xa2,0xffdc 00a3 00c7 | | Action Elaborate_Subprogram 00a4 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x24 = 0xa4,0xffdb 00a5 00c7 | | Action Elaborate_Subprogram 00a6 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x25 = 0xa6,0xffda 00a7 00c7 | | Action Elaborate_Subprogram 00a8 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x26 = 0xa8,0xffd9 00a9 00c7 | | Action Elaborate_Subprogram 00aa 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0x27 = 0xaa,0xffd8 00ab 00c7 | | Action Elaborate_Subprogram 00ac 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 ; Debug Table 0x1.0x28 = 0xac,0xffd7 00ad 00c7 | | Action Elaborate_Subprogram 00ae 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 ; Debug Table 0x1.0x29 = 0xae,0xffd6 00af 00c7 | | Action Elaborate_Subprogram 00b0 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 ; Debug Table 0x1.0x2a = 0xb0,0xffd5 00b1 00c7 | | Action Elaborate_Subprogram 00b2 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a ; Debug Table 0x1.0x2b = 0xb2,0xffd4 00b3 00c7 | | Action Elaborate_Subprogram 00b4 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b ; Debug Table 0x1.0x2c = 0xb4,0xffd3 00b5 00c7 | | Action Elaborate_Subprogram 00b6 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 ; Debug Table 0x1.0x2d = 0xb6,0xffd2 00b7 00c7 | | Action Elaborate_Subprogram 00b8 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c ; Debug Table 0x1.0x2e = 0xb8,0xffd1 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d ; Debug Table 0x1.0x2f = 0xba,0xffd0 00bb 00c7 | | Action Elaborate_Subprogram 00bc 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e ; Debug Table 0x1.0x30 = 0xbc,0xffcf 00bd 00c7 | | Action Elaborate_Subprogram 00be 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f ; Debug Table 0x1.0x31 = 0xbe,0xffce 00bf 00c7 | | Action Elaborate_Subprogram 00c0 BODY_0008: 00c0 00bc | | Action Signal_Activated 00c1 00bb | | Action Signal_Completion 00c2 0000 0000 | | .BLANK 0000[0x6] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d3 | | .CONST 0x00d3 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0002 | | .CONST 0x0002 ; Number of locals 00cb INIT_00c8: 00cb e003 | | Load 0x0,0x3 ; Debug Table 0x2 = .DEBUG 0x00cb,0x0f6e,0x0002,0x0000,0x0037,0x0234,0x0000,0x0013 ; Debug Table 0x2.0x0 = 0xcb,0xffff 00cc 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 00cd 0337 | 7 | Declare_Variable Array 00ce 00db | | Load_Top At_Offset_3 00cf e003 | | Load 0x0,0x3 00d0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 00d1 00d9 | | Load_Top At_Offset_1 00d2 01d4 | | Execute Vector,Structure_Write 00d3 BODY_00c8: 00d3 4802 |H | Short_Literal 0x2 ; Debug Table 0x2.0x1 = 0xd3,0x1 00d4 00d9 | | Load_Top At_Offset_1 00d5 01d7 | | Execute Vector,Field_Read 00d6 7004 |p | Jump_Nonzero 0xdb 00d7 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x2 = 0xd7,0x2 00d8 4803 |H | Short_Literal 0x3 00d9 00da | | Load_Top At_Offset_2 00da 01d6 | | Execute Vector,Field_Write 00db e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x3 = 0xdb,0x3 00dc 180e | | Execute Package,Field_Execute,Field_Number 0xe 00dd e003 | | Load 0x0,0x3 00de 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 00df e003 | | Load 0x0,0x3 00e0 180e | | Execute Package,Field_Execute,Field_Number 0xe 00e1 e003 | | Load 0x0,0x3 00e2 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 00e3 e5ff | | Load 0x2,-0x1 00e4 e003 | | Load 0x0,0x3 00e5 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 00e6 e5ff | | Load 0x2,-0x1 00e7 e003 | | Load 0x0,0x3 00e8 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00e9 e402 | | Load 0x2,0x2 00ea e5ff | | Load 0x2,-0x1 00eb e003 | | Load 0x0,0x3 00ec 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00ed e003 | | Load 0x0,0x3 00ee 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 00ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00fb | | .CONST 0x00fb ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0002 | | .CONST 0x0002 ; Number of locals 00f3 INIT_00f0: 00f3 e003 | | Load 0x0,0x3 ; Debug Table 0x3 = .DEBUG 0x00f3,0x0f78,0x0002,0x0000,0x0037,0x0234,0x0000,0x0020 ; Debug Table 0x3.0x0 = 0xf3,0xffff 00f4 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 00f5 0337 | 7 | Declare_Variable Array 00f6 00db | | Load_Top At_Offset_3 00f7 e003 | | Load 0x0,0x3 00f8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 00f9 00d9 | | Load_Top At_Offset_1 00fa 01d4 | | Execute Vector,Structure_Write 00fb BODY_00f0: 00fb 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x1 = 0xfb,0x1 00fc 4803 |H | Short_Literal 0x3 00fd 00da | | Load_Top At_Offset_2 00fe 01d6 | | Execute Vector,Field_Write 00ff e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x2 = 0xff,0x2 0100 180e | | Execute Package,Field_Execute,Field_Number 0xe 0101 e003 | | Load 0x0,0x3 0102 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0103 e003 | | Load 0x0,0x3 0104 180e | | Execute Package,Field_Execute,Field_Number 0xe 0105 e003 | | Load 0x0,0x3 0106 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0107 e5ff | | Load 0x2,-0x1 0108 e003 | | Load 0x0,0x3 0109 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 010a e5ff | | Load 0x2,-0x1 010b e003 | | Load 0x0,0x3 010c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 010d e402 | | Load 0x2,0x2 010e e5ff | | Load 0x2,-0x1 010f e003 | | Load 0x0,0x3 0110 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0111 e003 | | Load 0x0,0x3 0112 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0113 8210 | | Call 0x1,0x10 0114 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0115 0000 0000 | | .XXX[0x3] 0117 0000 | | 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 012a | * | .CONST 0x012a ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0002 | | .CONST 0x0002 ; Number of locals 011b INIT_0118: 011b e003 | | Load 0x0,0x3 ; Debug Table 0x4 = .DEBUG 0x011b,0x0f80,0x0002,0x0000,0x0037,0x0234,0x0000,0x002d ; Debug Table 0x4.0x0 = 0x11b,0xffff 011c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 011d 0337 | 7 | Declare_Variable Array 011e e003 | | Load 0x0,0x3 011f 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0120 0337 | 7 | Declare_Variable Array 0121 480b |H | Short_Literal 0xb 0122 4800 |H | Short_Literal 0x0 0123 4800 |H | Short_Literal 0x0 0124 00d9 | | Load_Top At_Offset_1 0125 e403 | | Load 0x2,0x3 0126 01d6 | | Execute Vector,Field_Write 0127 3ffb |? | Loop_Increasing 0x123 0128 00d9 | | Load_Top At_Offset_1 0129 01d4 | | Execute Vector,Structure_Write 012a BODY_0118: 012a e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x1 = 0x12a,0x1 012b 180e | | Execute Package,Field_Execute,Field_Number 0xe 012c e003 | | Load 0x0,0x3 012d 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 012e e003 | | Load 0x0,0x3 012f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0130 e003 | | Load 0x0,0x3 0131 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0132 e5ff | | Load 0x2,-0x1 0133 e003 | | Load 0x0,0x3 0134 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0135 e5ff | | Load 0x2,-0x1 0136 e003 | | Load 0x0,0x3 0137 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0138 e402 | | Load 0x2,0x2 0139 e5ff | | Load 0x2,-0x1 013a e003 | | Load 0x0,0x3 013b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 013c e003 | | Load 0x0,0x3 013d 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 013e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 013f 0000 | | .XXX[0x1] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0149 | I | .CONST 0x0149 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0002 | | .CONST 0x0002 ; Number of locals 0143 INIT_0140: 0143 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x0143,0x0f86,0x0002,0x0000,0x0037,0x0234,0x0000,0x003a ; Debug Table 0x5.0x0 = 0x143,0xffff 0144 e003 | | Load 0x0,0x3 0145 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0146 e003 | | Load 0x0,0x3 0147 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0148 03f1 | | Declare_Variable Discrete,With_Value 0149 BODY_0140: 0149 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0x149,0x1 014a 4603 |F | Jump_Case 0x4 014b 7808 |x | Jump 0x154 ; case 0x0 014c 7802 |x | Jump 0x14f ; case 0x1 014d 7806 |x | Jump 0x154 ; case 0x2 014e 7803 |x | Jump 0x152 ; case 0x3 014f 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x2 = 0x14f,0x2 0150 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0151 7802 |x | Jump 0x154 0152 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0x3 = 0x152,0x3 0153 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0154 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x4 = 0x154,0x5 0155 180e | | Execute Package,Field_Execute,Field_Number 0xe 0156 e003 | | Load 0x0,0x3 0157 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0158 e003 | | Load 0x0,0x3 0159 180e | | Execute Package,Field_Execute,Field_Number 0xe 015a e003 | | Load 0x0,0x3 015b 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 015c e5ff | | Load 0x2,-0x1 015d e003 | | Load 0x0,0x3 015e 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 015f e5ff | | Load 0x2,-0x1 0160 e003 | | Load 0x0,0x3 0161 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0162 e5ff | | Load 0x2,-0x1 0163 e003 | | Load 0x0,0x3 0164 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0165 e402 | | Load 0x2,0x2 0166 e003 | | Load 0x0,0x3 0167 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0168 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0169 0000 0000 | | .BLANK 0000[0x7] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0183 | | .CONST 0x0183 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x0173,0x0f92,0x0002,0x0000,0x0037,0x0234,0x0000,0x0053 ; Debug Table 0x6.0x0 = 0x173,0x1 0174 6809 |h | Jump_Zero 0x17e 0175 e004 | | Load 0x0,0x4 ; Debug Table 0x6.0x1 = 0x175,0x2 0176 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0177 e5fd | | Load 0x2,-0x3 0178 e005 | | Load 0x0,0x5 0179 180d | | Execute Package,Field_Execute,Field_Number 0xd 017a e5ff | | Load 0x2,-0x1 017b e001 | | Load 0x0,0x1 017c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 017d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 017e 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x2 = 0x17e,0x3 017f 00db | | Load_Top At_Offset_3 0180 e001 | | Load 0x0,0x1 0181 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0182 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0183 TRAP_0170: 0183 e005 | | Load 0x0,0x5 0184 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0185 010f | | Execute Exception,Equal 0186 680d |h | Jump_Zero 0x194 0187 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x3 = 0x187,0x4 0188 4807 |H | Short_Literal 0x7 0189 0092 0988 | | Action Push_String_Extended,0x988 ; "The machine name \x22" 018b e5fd | | Load 0x2,-0x3 018c 01cc | | Execute Vector,Catenate 018d 0092 0989 | | Action Push_String_Extended,0x989 ; "\x22 is undefined (Transport_Name.Undefined)." 018f 01cc | | Execute Vector,Catenate 0190 e006 | | Load 0x0,0x6 0191 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0192 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x4 = 0x192,0x5 0193 0101 | | Execute Exception,Reraise 0194 e001 | | Load 0x0,0x1 0195 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0196 010f | | Execute Exception,Equal 0197 6808 |h | Jump_Zero 0x1a0 0198 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x5 = 0x198,0x6 0199 4808 |H | Short_Literal 0x8 019a 0092 098a | | Action Push_String_Extended,0x98a ; "FTP_STATE_MAP.NO_LOCAL_RESOURCES: Unable to obtain the resources needed to establish an Ftp connection. A likely reason is that all transport connections are in use." 019c e006 | | Load 0x0,0x6 019d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 019e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x6 = 0x19e,0x7 019f 0101 | | Execute Exception,Reraise 01a0 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x7 = 0x1a0,0x8 01a1 4808 |H | Short_Literal 0x8 01a2 e007 | | Load 0x0,0x7 01a3 180d | | Execute Package,Field_Execute,Field_Number 0xd 01a4 0092 098b | | Action Push_String_Extended,0x98b ; " was raised in Ftp_Guts.Get_State." 01a6 01cc | | Execute Vector,Catenate 01a7 e006 | | Load 0x0,0x6 01a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x8 = 0x1a9,0x9 01aa 0101 | | Execute Exception,Reraise 01ab 0000 0000 | | .BLANK 0000[0x5] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 01bc | | .CONST 0x01bc ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x01b3,0x0fa6,0x0002,0x0000,0x0037,0x0234,0x0000,0x0068 ; Debug Table 0x7.0x0 = 0x1b3,0x1 01b4 e002 | | Load 0x0,0x2 01b5 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 01b6 00db | | Load_Top At_Offset_3 01b7 e002 | | Load 0x0,0x2 01b8 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 01b9 e005 | | Load 0x0,0x5 01ba 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bc TRAP_01b0: 01bc 0007 | | Action Break_Optional 01bd 0092 098c | | Action Push_String_Extended,0x98c ; "an unknown host" ; Debug Table 0x7.0x1 = 0x1bd,0x2 01bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x01c3,0x0fac,0x0002,0x0000,0x0037,0x0234,0x0000,0x0082 ; Debug Table 0x8.0x0 = 0x1c3,0x1 01c4 8215 | | Call 0x1,0x15 01c5 7003 |p | Jump_Nonzero 0x1c9 01c6 0092 098d | | Action Push_String_Extended,0x98d ; "not open" ; Debug Table 0x8.0x1 = 0x1c6,0x2 01c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c9 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x2 = 0x1c9,0x3 01ca 8236 | 6 | Call 0x1,0x36 01cb 7003 |p | Jump_Nonzero 0x1cf 01cc 0092 098e | | Action Push_String_Extended,0x98e ; "open but not connected" ; Debug Table 0x8.0x3 = 0x1cc,0x4 01ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cf 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x4 = 0x1cf,0x5 01d0 8237 | 7 | Call 0x1,0x37 01d1 6810 |h | Jump_Zero 0x1e2 01d2 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x5 = 0x1d2,0x6 01d3 e002 | | Load 0x0,0x2 01d4 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 01d5 6806 |h | Jump_Zero 0x1dc 01d6 0092 098f | | Action Push_String_Extended,0x98f ; "connected, logged in, and transferring data with " ; Debug Table 0x8.0x6 = 0x1d6,0x7 01d8 00db | | Load_Top At_Offset_3 01d9 8214 | | Call 0x1,0x14 01da 01cc | | Execute Vector,Catenate 01db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01dc 0092 0990 | | Action Push_String_Extended,0x990 ; "connected and logged in to " ; Debug Table 0x8.0x7 = 0x1dc,0x8 01de 00db | | Load_Top At_Offset_3 01df 8214 | | Call 0x1,0x14 01e0 01cc | | Execute Vector,Catenate 01e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e2 0092 0991 | | Action Push_String_Extended,0x991 ; "connected to " ; Debug Table 0x8.0x8 = 0x1e2,0x9 01e4 00db | | Load_Top At_Offset_3 01e5 8214 | | Call 0x1,0x14 01e6 01cc | | Execute Vector,Catenate 01e7 0092 0992 | | Action Push_String_Extended,0x992 ; " but not logged in" 01e9 01cc | | Execute Vector,Catenate 01ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01eb 0000 0000 | | .BLANK 0000[0x5] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f4 | | .CONST 0x01f4 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0002 | | .CONST 0x0002 ; Number of locals 01f3 INIT_01f0: 01f3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9 = .DEBUG 0x01f3,0x0fc0,0x0002,0x0000,0x0037,0x0234,0x0000,0x008d ; Debug Table 0x9.0x0 = 0x1f3,0xffff 01f4 BODY_01f0: 01f4 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x1 = 0x1f4,0x1 01f5 e5ff | | Load 0x2,-0x1 01f6 8238 | 8 | Call 0x1,0x38 01f7 7002 |p | Jump_Nonzero 0x1fa 01f8 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x2 = 0x1f8,0x2 01f9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01fa 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x3 = 0x1fa,0x3 01fb 8237 | 7 | Call 0x1,0x37 01fc 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 01fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x4 = 0x1fd,0x4 01fe 7004 |p | Jump_Nonzero 0x203 01ff e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x5 = 0x1ff,0x5 0200 0092 0993 | | Action Push_String_Extended,0x993 ; "Command failed: your FTP connection is not logged in." 0202 8234 | 4 | Call 0x1,0x34 0203 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x203,0x6 0204 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0205 0000 0000 | | .XXX[0x3] 0207 0000 | | 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 00db | | Load_Top At_Offset_3 ; Debug Table 0xa = .DEBUG 0x020b,0x0fd0,0x0001,0x0000,0x0037,0x0234,0x0000,0x009e ; Debug Table 0xa.0x0 = 0x20b,0x1 020c 4802 |H | Short_Literal 0x2 020d e5ff | | Load 0x2,-0x1 020e e006 | | Load 0x0,0x6 020f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0210 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0211 0000 0000 | | .BLANK 0000[0x7] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021e | | .CONST 0x021e ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0002 | | .CONST 0x0002 ; Number of locals 021b INIT_0218: 021b 00db | | Load_Top At_Offset_3 ; Debug Table 0xb = .DEBUG 0x021b,0x0fd4,0x0001,0x0000,0x0037,0x0234,0x0000,0x00ac ; Debug Table 0xb.0x0 = 0x21b,0xffff 021c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 021d 0007 | | Action Break_Optional 021e BODY_0218: 021e e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x1 = 0x21e,0x1 021f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0220 6812 |h | Jump_Zero 0x233 0221 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x2 = 0x221,0x2 0222 0092 0994 | | Action Push_String_Extended,0x994 ; "Sending data port information to remote server" 0224 8218 | | Call 0x1,0x18 0225 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x3 = 0x225,0x3 0226 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0227 e004 | | Load 0x0,0x4 0228 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0229 00da | | Load_Top At_Offset_2 022a e002 | | Load 0x0,0x2 022b 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 022c 0092 0995 | | Action Push_String_Extended,0x995 ; "Ftp.Send_Data_Port" ; Debug Table 0xb.0x4 = 0x22c,0x4 022e 4803 |H | Short_Literal 0x3 022f e5ff | | Load 0x2,-0x1 0230 820e | | Call 0x1,0xe 0231 00db | | Load_Top At_Offset_3 0232 821d | | Call 0x1,0x1d 0233 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0234 0000 0000 | | .BLANK 0000[0x4] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x023b,0x0fe0,0x0002,0x0000,0x0037,0x0234,0x0000,0x00ba ; Debug Table 0xc.0x0 = 0x23b,0x1 023c 4801 |H | Short_Literal 0x1 023d 4806 |H | Short_Literal 0x6 023e 0262 | b | Execute Discrete,In_Range 023f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x0243,0x0fe4,0x0002,0x0000,0x0037,0x0234,0x0000,0x00c5 ; Debug Table 0xd.0x0 = 0x243,0x1 0244 0f01 | | Execute_Immediate Equal,0x1 0245 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0246 0000 0000 | | .XXX[0x2] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 0252 | R | .CONST 0x0252 ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0004 | | .CONST 0x0004 ; Number of locals 024b INIT_0248: 024b 4801 |H | Short_Literal 0x1 ; Debug Table 0xe = .DEBUG 0x024b,0x0fe8,0x0001,0x0000,0x0037,0x0234,0x0000,0x00d6 ; Debug Table 0xe.0x0 = 0x24b,0xffff 024c 4900 |I | Short_Literal 0x100 024d 00e9 | | Load_Encached String_Cache 024e 0334 | 4 | Declare_Variable Array,With_Constraint 024f 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xe.0x1 = 0x24f,0xfffe 0250 e008 | | Load 0x0,0x8 ; Debug Table 0xe.0x2 = 0x250,0xfffd 0251 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0252 BODY_0248: 0252 00cf | | Action Mark_Auxiliary ; Debug Table 0xe.0x3 = 0x252,0xfffc 0253 7813 |x | Jump 0x267 0254 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xe.0x4 = 0x254,0x2 0255 e402 | | Load 0x2,0x2 0256 e5ff | | Load 0x2,-0x1 0257 e002 | | Load 0x0,0x2 0258 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0259 00d1 | | Pop_Control Pop_Count_1 025a 005b | [ | Store_Top Discrete,At_Offset_3 025b e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0x5 = 0x25b,0x3 025c e5ff | | Load 0x2,-0x1 025d e002 | | Load 0x0,0x2 025e 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 025f 8241 | A | Call 0x1,0x41 0260 4801 |H | Short_Literal 0x1 0261 e403 | | Load 0x2,0x3 0262 e402 | | Load 0x2,0x2 0263 01cf | | Execute Vector,Slice_Read 0264 e006 | | Load 0x0,0x6 0265 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0266 00c9 | | Action Pop_Auxiliary_Loop 0267 e5ff | | Load 0x2,-0x1 ; Debug Table 0xe.0x6 = 0x267,0x1 0268 e002 | | Load 0x0,0x2 0269 1817 | | Execute Package,Field_Execute,Field_Number 0x17 026a 6fe9 |o | Jump_Zero 0x254 026b 00ce | | Action Pop_Auxiliary 026c e008 | | Load 0x0,0x8 ; Debug Table 0xe.0x7 = 0x26c,0x4 026d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 026e e5ff | | Load 0x2,-0x1 026f e002 | | Load 0x0,0x2 0270 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0271 0059 | Y | Store_Top Discrete,At_Offset_1 0272 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x8 = 0x272,0x5 0273 821a | | Call 0x1,0x1a 0274 6812 |h | Jump_Zero 0x287 0275 e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0x9 = 0x275,0x6 0276 e5fd | | Load 0x2,-0x3 0277 e5fc | | Load 0x2,-0x4 0278 0092 0996 | | Action Push_String_Extended,0x996 ; " completed successfully (" 027a 01cc | | Execute Vector,Catenate 027b 00db | | Load_Top At_Offset_3 027c e008 | | Load 0x0,0x8 027d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 027e 025e | ^ | Execute Discrete,Convert 027f 1c01 | | Execute_Immediate Run_Utility,0x1 0280 01cc | | Execute Vector,Catenate 0281 0092 0997 | | Action Push_String_Extended,0x997 ; ")." 0283 01cc | | Execute Vector,Catenate 0284 e006 | | Load 0x0,0x6 0285 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0286 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0287 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xa = 0x287,0x7 0288 0b13 | | Execute_Immediate Case_Compare,0x13 0289 7014 |p | Jump_Nonzero 0x29e 028a 0b07 | | Execute_Immediate Case_Compare,0x7 028b 7012 |p | Jump_Nonzero 0x29e 028c e5fc | | Load 0x2,-0x4 ; Debug Table 0xe.0xb = 0x28c,0x9 028d e21c | | Load 0x1,0x1c 028e 01de | | Execute Vector,Not_Equal 028f 680e |h | Jump_Zero 0x29e 0290 e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0xc = 0x290,0xa 0291 4805 |H | Short_Literal 0x5 0292 e5fc | | Load 0x2,-0x4 0293 0092 0998 | | Action Push_String_Extended,0x998 ; " failed with status = " 0295 01cc | | Execute Vector,Catenate 0296 e404 | | Load 0x2,0x4 0297 e008 | | Load 0x0,0x8 0298 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0299 025e | ^ | Execute Discrete,Convert 029a 1c01 | | Execute_Immediate Run_Utility,0x1 029b 01cc | | Execute Vector,Catenate 029c e006 | | Load 0x0,0x6 029d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 029e 00d1 | | Pop_Control Pop_Count_1 029f e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0xd = 0x29f,0xb 02a0 8233 | 3 | Call 0x1,0x33 02a1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02a2 0000 0000 | | .BLANK 0000[0x6] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ae | | .CONST 0x02ae ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0002 | | .CONST 0x0002 ; Number of locals 02ab INIT_02a8: 02ab e008 | | Load 0x0,0x8 ; Debug Table 0xf = .DEBUG 0x02ab,0x1006,0x0001,0x0000,0x0037,0x0234,0x0000,0x00f4 ; Debug Table 0xf.0x0 = 0x2ab,0xffff 02ac 1b18 | | Execute Package,Field_Read,Field_Number 0x18 02ad 0007 | | Action Break_Optional ; Debug Table 0xf.0x1 = 0x2ad,0xfffe 02ae BODY_02a8: 02ae 0092 0999 | | Action Push_String_Extended,0x999 ; "File transfer" ; Debug Table 0xf.0x2 = 0x2ae,0x1 02b0 4802 |H | Short_Literal 0x2 02b1 e5fe | | Load 0x2,-0x2 02b2 8210 | | Call 0x1,0x10 02b3 e5ff | | Load 0x2,-0x1 02b4 821d | | Call 0x1,0x1d 02b5 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x3 = 0x2b5,0x2 02b6 e002 | | Load 0x0,0x2 02b7 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 02b8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02b9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x4 = 0x2b9,0x3 02ba 821b | | Call 0x1,0x1b 02bb 6822 |h" | Jump_Zero 0x2de 02bc e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x5 = 0x2bc,0x4 02bd 4803 |H | Short_Literal 0x3 02be e5fd | | Load 0x2,-0x3 02bf 0092 099a | | Action Push_String_Extended,0x99a ; " was " 02c1 01cc | | Execute Vector,Catenate 02c2 e5fc | | Load 0x2,-0x4 02c3 01cc | | Execute Vector,Catenate 02c4 e006 | | Load 0x0,0x6 02c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02c6 e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x6 = 0x2c6,0x5 02c7 4800 |H | Short_Literal 0x0 02c8 e5ff | | Load 0x2,-0x1 02c9 e002 | | Load 0x0,0x2 02ca 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 02cb 00e0 | | Load_Encached Standard_Cache 02cc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02cd 0092 099b | | Action Push_String_Extended,0x99b ; " bytes " 02cf 01cc | | Execute Vector,Catenate 02d0 e5fc | | Load 0x2,-0x4 02d1 01cc | | Execute Vector,Catenate 02d2 0092 099c | | Action Push_String_Extended,0x99c ; " in " 02d4 01cc | | Execute Vector,Catenate 02d5 e5ff | | Load 0x2,-0x1 02d6 e002 | | Load 0x0,0x2 02d7 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 02d8 e009 | | Load 0x0,0x9 02d9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 02da 01cc | | Execute Vector,Catenate 02db e006 | | Load 0x0,0x6 02dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02dd 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02de 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x7 = 0x2de,0x6 02df 0f0d | | Execute_Immediate Equal,0xd 02e0 700c |p | Jump_Nonzero 0x2ed 02e1 e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x8 = 0x2e1,0x7 02e2 4807 |H | Short_Literal 0x7 02e3 0092 099d | | Action Push_String_Extended,0x99d ; "File transfer failed with status = " 02e5 00db | | Load_Top At_Offset_3 02e6 e008 | | Load 0x0,0x8 02e7 1b18 | | Execute Package,Field_Read,Field_Number 0x18 02e8 025e | ^ | Execute Discrete,Convert 02e9 1c01 | | Execute_Immediate Run_Utility,0x1 02ea 01cc | | Execute Vector,Catenate 02eb e006 | | Load 0x0,0x6 02ec 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ed e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x9 = 0x2ed,0x8 02ee e5fd | | Load 0x2,-0x3 02ef 0092 099e | | Action Push_String_Extended,0x99e ; " was not " 02f1 01cc | | Execute Vector,Catenate 02f2 e5fc | | Load 0x2,-0x4 02f3 01cc | | Execute Vector,Catenate 02f4 8234 | 4 | Call 0x1,0x34 02f5 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02f6 0000 0000 | | .XXX[0x2] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fb | | .CONST 0x02fb ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0001 | | .CONST 0x0001 ; Number of locals 02fb BODY_02f8: 02fb INIT_02f8: 02fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x02fb,0x101c,0x0002,0x0000,0x0037,0x0234,0x0000,0x010c ; Debug Table 0x10.0x0 = 0x2fb,0x1 02fc e002 | | Load 0x0,0x2 02fd 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 02fe 821b | | Call 0x1,0x1b 02ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0305 | | .CONST 0x0305 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0002 | | .CONST 0x0002 ; Number of locals 0303 INIT_0300: 0303 029f 07d3 | | Declare_Subprogram INIT_07d0,For_Call ; Debug Table 0x11 = .DEBUG 0x0303,0x1020,0x0001,0x0000,0x0037,0x0234,0x0000,0x0117 ; Debug Table 0x11.0x0 = 0x303,0xffff 0305 BODY_0300: 0305 e5fc | | Load 0x2,-0x4 ; Debug Table 0x11.0x1 = 0x305,0x1 0306 4800 |H | Short_Literal 0x0 0307 e5fe | | Load 0x2,-0x2 0308 8402 | | Call 0x2,0x2 0309 e5ff | | Load 0x2,-0x1 030a 01cc | | Execute Vector,Catenate 030b e006 | | Load 0x0,0x6 030c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 030d e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0x2 = 0x30d,0x2 030e 0c01 | | Execute_Immediate Greater_Equal,0x1 030f 680d |h | Jump_Zero 0x31d 0310 e5fc | | Load 0x2,-0x4 ; Debug Table 0x11.0x3 = 0x310,0x3 0311 4800 |H | Short_Literal 0x0 0312 e5fd | | Load 0x2,-0x3 0313 8402 | | Call 0x2,0x2 0314 0092 099f | | Action Push_String_Extended,0x99f ; "not " 0316 01cc | | Execute Vector,Catenate 0317 e5ff | | Load 0x2,-0x1 0318 01cc | | Execute Vector,Catenate 0319 e006 | | Load 0x0,0x6 031a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 031b e5fc | | Load 0x2,-0x4 ; Debug Table 0x11.0x4 = 0x31b,0x4 031c 8233 | 3 | Call 0x1,0x33 031d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 031e 0000 0000 | | .XXX[0x2] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0323 | # | .CONST 0x0323 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0001 | | .CONST 0x0001 ; Number of locals 0323 BODY_0320: 0323 INIT_0320: 0323 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12 = .DEBUG 0x0323,0x102c,0x0001,0x0000,0x0037,0x0234,0x0000,0x012b ; Debug Table 0x12.0x0 = 0x323,0x1 0324 0092 09a0 | | Action Push_String_Extended,0x9a0 ; "Delete remote file \x22" 0326 e5fe | | Load 0x2,-0x2 0327 01cc | | Execute Vector,Catenate 0328 0092 09a1 | | Action Push_String_Extended,0x9a1 ; "\x22" 032a 01cc | | Execute Vector,Catenate 032b 8218 | | Call 0x1,0x18 032c 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x1 = 0x32c,0x2 032d 00db | | Load_Top At_Offset_3 032e e002 | | Load 0x0,0x2 032f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0330 0092 09a2 | | Action Push_String_Extended,0x9a2 ; "Ftp.Delete" ; Debug Table 0x12.0x2 = 0x330,0x3 0332 4803 |H | Short_Literal 0x3 0333 e5fd | | Load 0x2,-0x3 0334 e5ff | | Load 0x2,-0x1 0335 821d | | Call 0x1,0x1d 0336 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0337 0000 | | .XXX[0x1] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 0351 | Q | .CONST 0x0351 ; Address of begin 0339 0377 | w | .CONST 0x0377 ; Address of exception handler 033a 000a | | .CONST 0x000a ; Number of locals 033b INIT_0338: 033b e008 | | Load 0x0,0x8 ; Debug Table 0x13 = .DEBUG 0x033b,0x1034,0x0001,0x0000,0x0037,0x0234,0x0000,0x013f ; Debug Table 0x13.0x0 = 0x33b,0xffff 033c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 033d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x13.0x1 = 0x33d,0xfffe 033e 03e9 | | Declare_Variable Discrete,Duplicate 033f 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x2 = 0x33f,0xfffd 0340 4880 |H | Short_Literal 0x80 0341 00e9 | | Load_Encached String_Cache 0342 0334 | 4 | Declare_Variable Array,With_Constraint 0343 e008 | | Load 0x0,0x8 ; Debug Table 0x13.0x3 = 0x343,0xfffc 0344 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0345 e5ff | | Load 0x2,-0x1 ; Debug Table 0x13.0x4 = 0x345,0xfffb 0346 e002 | | Load 0x0,0x2 0347 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0348 e008 | | Load 0x0,0x8 0349 1b12 | | Execute Package,Field_Read,Field_Number 0x12 034a 03f1 | | Declare_Variable Discrete,With_Value 034b 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call ; Debug Table 0x13.0x5 = 0x34b,0xfffa 034d 029f 07fb | | Declare_Subprogram INIT_07f8,For_Call ; Debug Table 0x13.0x6 = 0x34d,0xfff9 034f 029f 080b | | Declare_Subprogram INIT_0808,For_Call 0351 BODY_0338: 0351 e5ff | | Load 0x2,-0x1 ; Debug Table 0x13.0x7 = 0x351,0x1 0352 e002 | | Load 0x0,0x2 0353 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0354 a402 | | Store_Unchecked 0x2,0x2 0355 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x8 = 0x355,0x2 0356 00d8 | | Load_Top At_Offset_0 0357 0229 | ) | Execute Access,All_Read 0358 e00a | | Load 0x0,0xa 0359 1b0e | | Execute Package,Field_Read,Field_Number 0xe 035a e00b | | Load 0x0,0xb 035b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 035c e00b | | Load 0x0,0xb 035d 181e | | Execute Package,Field_Execute,Field_Number 0x1e 035e 00ea | | Load_Encached Null_String_Cache 035f 00ea | | Load_Encached Null_String_Cache 0360 4801 |H | Short_Literal 0x1 0361 e00c | | Load 0x0,0xc 0362 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0363 00d9 | | Load_Top At_Offset_1 0364 0228 | ( | Execute Access,All_Write 0365 00d1 | | Pop_Control Pop_Count_1 0366 840a | | Call 0x2,0xa ; Debug Table 0x13.0x9 = 0x366,0x3 0367 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0xa = 0x367,0x4 0368 00d8 | | Load_Top At_Offset_0 0369 0229 | ) | Execute Access,All_Read 036a e00c | | Load 0x0,0xc 036b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 036c 00d9 | | Load_Top At_Offset_1 036d 0228 | ( | Execute Access,All_Write 036e 00d1 | | Pop_Control Pop_Count_1 036f e5f9 | | Load 0x2,-0x7 ; Debug Table 0x13.0xb = 0x36f,0x5 0370 4800 |H | Short_Literal 0x0 0371 e00d | | Load 0x0,0xd 0372 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0373 c5f9 | | Store 0x2,-0x7 0374 e406 | | Load 0x2,0x6 ; Debug Table 0x13.0xc = 0x374,0x6 0375 a5f8 | | Store_Unchecked 0x2,-0x8 0376 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0377 TRAP_0338: 0377 0007 | | Action Break_Optional 0378 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x13.0xd = 0x378,0x7 0379 00ea | | Load_Encached Null_String_Cache 037a 00ea | | Load_Encached Null_String_Cache 037b 4801 |H | Short_Literal 0x1 037c e00d | | Load 0x0,0xd 037d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 037e c5f9 | | Store 0x2,-0x7 037f e5f9 | | Load 0x2,-0x7 ; Debug Table 0x13.0xe = 0x37f,0x8 0380 4800 |H | Short_Literal 0x0 0381 e00d | | Load 0x0,0xd 0382 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0383 c5f9 | | Store 0x2,-0x7 0384 4807 |H | Short_Literal 0x7 ; Debug Table 0x13.0xf = 0x384,0x9 0385 a5f8 | | Store_Unchecked 0x2,-0x8 0386 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0387 0000 | | .XXX[0x1] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 038d | | .CONST 0x038d ; Address of begin 0389 03d9 | | .CONST 0x03d9 ; Address of exception handler 038a 0002 | | .CONST 0x0002 ; Number of locals 038b INIT_0388: 038b 029f 0873 | s| Declare_Subprogram INIT_0870,For_Call ; Debug Table 0x14 = .DEBUG 0x038b,0x1056,0x0001,0x0000,0x0037,0x0234,0x0000,0x016b 038d BODY_0388: 038d 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x0 = 0x38d,0x1 038e a5f1 | | Store_Unchecked 0x2,-0xf 038f e5f2 | | Load 0x2,-0xe ; Debug Table 0x14.0x1 = 0x38f,0x2 0390 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0391 8236 | 6 | Call 0x1,0x36 0392 683b |h; | Jump_Zero 0x3ce 0393 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x2 = 0x393,0x3 0394 823a | : | Call 0x1,0x3a 0395 e5f2 | | Load 0x2,-0xe 0396 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0397 8214 | | Call 0x1,0x14 0398 823a | : | Call 0x1,0x3a 0399 01de | | Execute Vector,Not_Equal 039a 6809 |h | Jump_Zero 0x3a4 039b e5f3 | | Load 0x2,-0xd ; Debug Table 0x14.0x3 = 0x39b,0x4 039c 0092 09a3 | | Action Push_String_Extended,0x9a3 ; "Command failed: your FTP connection is already " 039e e5f2 | | Load 0x2,-0xe 039f 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03a0 8216 | | Call 0x1,0x16 03a1 01cc | | Execute Vector,Catenate 03a2 8234 | 4 | Call 0x1,0x34 03a3 450e |E | Exit_Suprogram New_Top_Offset 0xe ; Debug Table 0x14.0x4 = 0x3a3,0x5 03a4 e5f2 | | Load 0x2,-0xe ; Debug Table 0x14.0x5 = 0x3a4,0x6 03a5 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03a6 8237 | 7 | Call 0x1,0x37 03a7 6811 |h | Jump_Zero 0x3b9 03a8 e5f2 | | Load 0x2,-0xe ; Debug Table 0x14.0x6 = 0x3a8,0x7 03a9 e5f3 | | Load 0x2,-0xd 03aa 820e | | Call 0x1,0xe 03ab 8235 | 5 | Call 0x1,0x35 03ac e5fa | | Load 0x2,-0x6 03ad e5fb | | Load 0x2,-0x5 03ae e5f4 | | Load 0x2,-0xc 03af e5f5 | | Load 0x2,-0xb 03b0 e5f6 | | Load 0x2,-0xa 03b1 e5f7 | | Load 0x2,-0x9 03b2 e00e | | Load 0x0,0xe 03b3 1b10 | | Execute Package,Field_Read,Field_Number 0x10 03b4 e5f8 | | Load 0x2,-0x8 03b5 e5f9 | | Load 0x2,-0x7 03b6 823c | < | Call 0x1,0x3c 03b7 00d1 | | Pop_Control Pop_Count_1 03b8 7816 |x | Jump 0x3cf 03b9 e5f2 | | Load 0x2,-0xe ; Debug Table 0x14.0x7 = 0x3b9,0x8 03ba e5f3 | | Load 0x2,-0xd 03bb 820e | | Call 0x1,0xe 03bc 8235 | 5 | Call 0x1,0x35 03bd e5f4 | | Load 0x2,-0xc 03be e5f5 | | Load 0x2,-0xb 03bf e5f6 | | Load 0x2,-0xa 03c0 e5f7 | | Load 0x2,-0x9 03c1 e00e | | Load 0x0,0xe 03c2 1b10 | | Execute Package,Field_Read,Field_Number 0x10 03c3 e5f8 | | Load 0x2,-0x8 03c4 e5f9 | | Load 0x2,-0x7 03c5 e5fa | | Load 0x2,-0x6 03c6 e5fb | | Load 0x2,-0x5 03c7 e5fc | | Load 0x2,-0x4 03c8 e5fd | | Load 0x2,-0x3 03c9 e5fe | | Load 0x2,-0x2 03ca e5ff | | Load 0x2,-0x1 03cb 8226 | & | Call 0x1,0x26 03cc 00d1 | | Pop_Control Pop_Count_1 03cd 7801 |x | Jump 0x3cf 03ce 8402 | | Call 0x2,0x2 ; Debug Table 0x14.0x8 = 0x3ce,0x9 03cf e5f3 | | Load 0x2,-0xd ; Debug Table 0x14.0x9 = 0x3cf,0xa 03d0 e5f2 | | Load 0x2,-0xe 03d1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03d2 8217 | | Call 0x1,0x17 03d3 7002 |p | Jump_Nonzero 0x3d6 03d4 62a7 |b | Indirect_Literal Discrete,0x67c,{0x00000000, 0x37023401} ; Debug Table 0x14.0xa = 0x3d4,0xb 03d5 0257 | W | Execute Discrete,Raise 03d6 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0xb = 0x3d6,0xc 03d7 a5f1 | | Store_Unchecked 0x2,-0xf 03d8 450e |E | Exit_Suprogram New_Top_Offset 0xe 03d9 TRAP_0388: 03d9 0007 | | Action Break_Optional 03da e5f3 | | Load 0x2,-0xd ; Debug Table 0x14.0xc = 0x3da,0xd 03db 8233 | 3 | Call 0x1,0x33 03dc 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0xd = 0x3dc,0xe 03dd a5f1 | | Store_Unchecked 0x2,-0xf 03de 450e |E | Exit_Suprogram New_Top_Offset 0xe 03df 0000 | | .XXX[0x1] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 00db | | Load_Top At_Offset_3 ; Debug Table 0x15 = .DEBUG 0x03e3,0x1074,0x0001,0x0000,0x0037,0x0234,0x0000,0x01b3 ; Debug Table 0x15.0x0 = 0x3e3,0x1 03e4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03e5 8236 | 6 | Call 0x1,0x36 03e6 6807 |h | Jump_Zero 0x3ee 03e7 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0x1 = 0x3e7,0x2 03e8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03e9 00db | | Load_Top At_Offset_3 03ea 820e | | Call 0x1,0xe 03eb 8227 | ' | Call 0x1,0x27 03ec 00d1 | | Pop_Control Pop_Count_1 03ed 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03ee 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0x2 = 0x3ee,0x3 03ef 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03f0 00db | | Load_Top At_Offset_3 03f1 820e | | Call 0x1,0xe 03f2 8228 | ( | Call 0x1,0x28 03f3 00d1 | | Pop_Control Pop_Count_1 03f4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03f5 0000 0000 | | .XXX[0x3] 03f7 0000 | | 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 0406 | | .CONST 0x0406 ; Address of begin 03f9 049d | | .CONST 0x049d ; Address of exception handler 03fa 0003 | | .CONST 0x0003 ; Number of locals 03fb INIT_03f8: 03fb 0092 09a4 | | Action Push_String_Extended,0x9a4 ; "Ftp.Connect (\x22" ; Debug Table 0x16 = .DEBUG 0x03fb,0x107c,0x0001,0x0000,0x0037,0x0234,0x0000,0x01c4 ; Debug Table 0x16.0x0 = 0x3fb,0xffff 03fd 00db | | Load_Top At_Offset_3 03fe 01cc | | Execute Vector,Catenate 03ff 0092 09a5 | | Action Push_String_Extended,0x9a5 ; "\x22)" 0401 01cc | | Execute Vector,Catenate 0402 0007 | | Action Break_Optional 0403 e004 | | Load 0x0,0x4 ; Debug Table 0x16.0x1 = 0x403,0xfffe 0404 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0405 0007 | | Action Break_Optional ; Debug Table 0x16.0x2 = 0x405,0xfffd 0406 BODY_03f8: 0406 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x3 = 0x406,0x1 0407 00da | | Load_Top At_Offset_2 0408 8218 | | Call 0x1,0x18 0409 e00f | | Load 0x0,0xf ; Debug Table 0x16.0x4 = 0x409,0x2 040a 180d | | Execute Package,Field_Execute,Field_Number 0xd 040b 7009 |p | Jump_Nonzero 0x415 040c e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x5 = 0x40c,0x3 040d 4805 |H | Short_Literal 0x5 040e 0092 09a6 | | Action Push_String_Extended,0x9a6 ; "The FTP product is not installed on this machine." 0410 e006 | | Load 0x0,0x6 0411 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0412 e00f | | Load 0x0,0xf ; Debug Table 0x16.0x6 = 0x412,0x4 0413 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0414 0257 | W | Execute Discrete,Raise 0415 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x7 = 0x415,0x5 0416 e5f0 | | Load 0x2,-0x10 0417 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0418 8239 | 9 | Call 0x1,0x39 0419 7002 |p | Jump_Nonzero 0x41c 041a 6261 |ba | Indirect_Literal Discrete,0x67c,{0x00000000, 0x37023401} ; Debug Table 0x16.0x8 = 0x41a,0x6 041b 0257 | W | Execute Discrete,Raise 041c e5f0 | | Load 0x2,-0x10 ; Debug Table 0x16.0x9 = 0x41c,0x7 041d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 041e 8215 | | Call 0x1,0x15 041f 7038 |p8 | Jump_Nonzero 0x458 0420 00cf | | Action Mark_Auxiliary 0421 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0xa = 0x421,0x8 0422 4800 |H | Short_Literal 0x0 0423 0007 | | Action Break_Optional 0424 e004 | | Load 0x0,0x4 ; Debug Table 0x16.0xb = 0x424,0x9 0425 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0426 e5f0 | | Load 0x2,-0x10 0427 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0428 e004 | | Load 0x0,0x4 0429 1b16 | | Execute Package,Field_Read,Field_Number 0x16 042a e5ff | | Load 0x2,-0x1 042b e005 | | Load 0x0,0x5 042c 180d | | Execute Package,Field_Execute,Field_Number 0xd 042d e002 | | Load 0x0,0x2 042e 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 042f 00d1 | | Pop_Control Pop_Count_1 0430 c403 | | Store 0x2,0x3 0431 00db | | Load_Top At_Offset_3 ; Debug Table 0x16.0xc = 0x431,0xa 0432 7002 |p | Jump_Nonzero 0x435 0433 00d2 | | Pop_Control Pop_Count_2 0434 781e |x | Jump 0x453 0435 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0xd = 0x435,0xb 0436 0d01 | | Execute_Immediate Less,0x1 0437 680b |h | Jump_Zero 0x443 0438 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0xe = 0x438,0xc 0439 4806 |H | Short_Literal 0x6 043a 0092 09a7 | | Action Push_String_Extended,0x9a7 ; "File_Transfer.Open returned status " 043c e403 | | Load 0x2,0x3 043d e004 | | Load 0x0,0x4 043e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 043f 01cc | | Execute Vector,Catenate 0440 e006 | | Load 0x0,0x6 0441 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0442 780a |x | Jump 0x44d 0443 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0xf = 0x443,0xd 0444 4807 |H | Short_Literal 0x7 0445 0092 09a7 | | Action Push_String_Extended,0x9a7 ; "File_Transfer.Open returned status " 0447 e403 | | Load 0x2,0x3 0448 e004 | | Load 0x0,0x4 0449 181a | | Execute Package,Field_Execute,Field_Number 0x1a 044a 01cc | | Execute Vector,Catenate 044b e006 | | Load 0x0,0x6 044c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 044d e5f0 | | Load 0x2,-0x10 ; Debug Table 0x16.0x10 = 0x44d,0xe 044e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 044f e002 | | Load 0x0,0x2 0450 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0451 00c8 | | Action Pop_Auxiliary_Range 0452 3fd1 |? | Loop_Increasing 0x424 0453 00ce | | Action Pop_Auxiliary 0454 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x11 = 0x454,0xf 0455 6802 |h | Jump_Zero 0x458 0456 6225 |b% | Indirect_Literal Discrete,0x67c,{0x00000000, 0x37023401} ; Debug Table 0x16.0x12 = 0x456,0x10 0457 0257 | W | Execute Discrete,Raise 0458 00cf | | Action Mark_Auxiliary 0459 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x13 = 0x459,0x11 045a 4800 |H | Short_Literal 0x0 045b 0007 | | Action Break_Optional 045c e002 | | Load 0x0,0x2 ; Debug Table 0x16.0x14 = 0x45c,0x12 045d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 045e e5ff | | Load 0x2,-0x1 045f e005 | | Load 0x0,0x5 0460 180e | | Execute Package,Field_Execute,Field_Number 0xe 0461 e5f0 | | Load 0x2,-0x10 0462 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0463 e002 | | Load 0x0,0x2 0464 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0465 e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x15 = 0x465,0x13 0466 4803 |H | Short_Literal 0x3 0467 e5f1 | | Load 0x2,-0xf 0468 8210 | | Call 0x1,0x10 0469 e5f0 | | Load 0x2,-0x10 046a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 046b 821d | | Call 0x1,0x1d 046c e5f0 | | Load 0x2,-0x10 ; Debug Table 0x16.0x16 = 0x46c,0x14 046d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 046e 8236 | 6 | Call 0x1,0x36 046f 6802 |h | Jump_Zero 0x472 0470 00d2 | | Pop_Control Pop_Count_2 0471 7812 |x | Jump 0x484 0472 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x17 = 0x472,0x15 0473 0d01 | | Execute_Immediate Less,0x1 0474 680b |h | Jump_Zero 0x480 0475 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x18 = 0x475,0x16 0476 4802 |H | Short_Literal 0x2 0477 e402 | | Load 0x2,0x2 0478 0092 09a8 | | Action Push_String_Extended,0x9a8 ; ": will try again in 10 sec." 047a 01cc | | Execute Vector,Catenate 047b e006 | | Load 0x0,0x6 047c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 047d 61fa |a | Indirect_Literal Discrete,0x678,{0x00000000, 0x00050000} ; Debug Table 0x16.0x19 = 0x47d,0x17 047e 00ba | | Action Initiate_Delay 047f 7802 |x | Jump 0x482 0480 61fb |a | Indirect_Literal Discrete,0x67c,{0x00000000, 0x37023401} ; Debug Table 0x16.0x1a = 0x480,0x18 0481 0257 | W | Execute Discrete,Raise 0482 00c8 | | Action Pop_Auxiliary_Range 0483 3fd8 |? | Loop_Increasing 0x45c 0484 00ce | | Action Pop_Auxiliary 0485 e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x1b = 0x485,0x19 0486 6815 |h | Jump_Zero 0x49c 0487 e5f0 | | Load 0x2,-0x10 0488 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0489 8236 | 6 | Call 0x1,0x36 048a 6811 |h | Jump_Zero 0x49c 048b e5f0 | | Load 0x2,-0x10 ; Debug Table 0x16.0x1c = 0x48b,0x1a 048c e5f1 | | Load 0x2,-0xf 048d e5f2 | | Load 0x2,-0xe 048e e5f3 | | Load 0x2,-0xd 048f e5f4 | | Load 0x2,-0xc 0490 e5f5 | | Load 0x2,-0xb 0491 e5f6 | | Load 0x2,-0xa 0492 e5f7 | | Load 0x2,-0x9 0493 e5f8 | | Load 0x2,-0x8 0494 e5f9 | | Load 0x2,-0x7 0495 e5fa | | Load 0x2,-0x6 0496 e5fb | | Load 0x2,-0x5 0497 e5fc | | Load 0x2,-0x4 0498 e5fd | | Load 0x2,-0x3 0499 e5ff | | Load 0x2,-0x1 049a 8226 | & | Call 0x1,0x26 049b 00d1 | | Pop_Control Pop_Count_1 049c 4510 |E | Exit_Suprogram New_Top_Offset 0x10 049d TRAP_03f8: 049d e005 | | Load 0x0,0x5 049e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 049f 010f | | Execute Exception,Equal 04a0 681a |h | Jump_Zero 0x4bb 04a1 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x1d = 0x4a1,0x1b 04a2 4807 |H | Short_Literal 0x7 04a3 0092 0988 | | Action Push_String_Extended,0x988 ; "The machine name \x22" 04a5 e5ff | | Load 0x2,-0x1 04a6 01cc | | Execute Vector,Catenate 04a7 0092 0989 | | Action Push_String_Extended,0x989 ; "\x22 is undefined (Transport_Name.Undefined)." 04a9 01cc | | Execute Vector,Catenate 04aa e006 | | Load 0x0,0x6 04ab 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04ac e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x1e = 0x4ac,0x1c 04ad 4805 |H | Short_Literal 0x5 04ae e402 | | Load 0x2,0x2 04af 0092 09a9 | | Action Push_String_Extended,0x9a9 ; " failed." 04b1 01cc | | Execute Vector,Catenate 04b2 e006 | | Load 0x0,0x6 04b3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04b4 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x1f = 0x4b4,0x1d 04b5 e003 | | Load 0x0,0x3 04b6 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04b7 6802 |h | Jump_Zero 0x4ba 04b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x20 = 0x4b8,0x1e 04b9 0101 | | Execute Exception,Reraise 04ba 4510 |E | Exit_Suprogram New_Top_Offset 0x10 04bb 61c0 |a | Indirect_Literal Discrete,0x67c,{0x00000000, 0x37023401} 04bc 010f | | Execute Exception,Equal 04bd 680f |h | Jump_Zero 0x4cd 04be e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x21 = 0x4be,0x1f 04bf 4805 |H | Short_Literal 0x5 04c0 e402 | | Load 0x2,0x2 04c1 0092 09a9 | | Action Push_String_Extended,0x9a9 ; " failed." 04c3 01cc | | Execute Vector,Catenate 04c4 e006 | | Load 0x0,0x6 04c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04c6 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x22 = 0x4c6,0x20 04c7 e003 | | Load 0x0,0x3 04c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04c9 6802 |h | Jump_Zero 0x4cc 04ca 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x23 = 0x4ca,0x21 04cb 0101 | | Execute Exception,Reraise 04cc 4510 |E | Exit_Suprogram New_Top_Offset 0x10 04cd e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x24 = 0x4cd,0x22 04ce 4808 |H | Short_Literal 0x8 04cf e007 | | Load 0x0,0x7 04d0 180d | | Execute Package,Field_Execute,Field_Number 0xd 04d1 0092 09aa | | Action Push_String_Extended,0x9aa ; " was raised in " 04d3 01cc | | Execute Vector,Catenate 04d4 e402 | | Load 0x2,0x2 04d5 01cc | | Execute Vector,Catenate 04d6 e006 | | Load 0x0,0x6 04d7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04d8 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x25 = 0x4d8,0x23 04d9 4805 |H | Short_Literal 0x5 04da e402 | | Load 0x2,0x2 04db 0092 09a9 | | Action Push_String_Extended,0x9a9 ; " failed." 04dd 01cc | | Execute Vector,Catenate 04de e006 | | Load 0x0,0x6 04df 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04e0 e5f1 | | Load 0x2,-0xf ; Debug Table 0x16.0x26 = 0x4e0,0x24 04e1 e003 | | Load 0x0,0x3 04e2 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04e3 6802 |h | Jump_Zero 0x4e6 04e4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x27 = 0x4e4,0x25 04e5 0101 | | Execute Exception,Reraise 04e6 4510 |E | Exit_Suprogram New_Top_Offset 0x10 04e7 0000 | | .XXX[0x1] 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; SUBPROGRAM 04e8 ; -------------------------------------------------------------------------------------- 04e8 04ed | | .CONST 0x04ed ; Address of begin 04e9 0004 | | .CONST 0x0004 ; Address of exception handler 04ea 0002 | | .CONST 0x0002 ; Number of locals 04eb INIT_04e8: 04eb 029f 0893 | | Declare_Subprogram INIT_0890,For_Call ; Debug Table 0x17 = .DEBUG 0x04eb,0x10ce,0x0001,0x0000,0x0037,0x0234,0x0000,0x0212 04ed BODY_04e8: 04ed e5f2 | | Load 0x2,-0xe ; Debug Table 0x17.0x0 = 0x4ed,0x1 04ee 0092 09ab | | Action Push_String_Extended,0x9ab ; "Starting Login" 04f0 8218 | | Call 0x1,0x18 04f1 e5f2 | | Load 0x2,-0xe ; Debug Table 0x17.0x1 = 0x4f1,0x2 04f2 e5f1 | | Load 0x2,-0xf 04f3 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 04f4 8238 | 8 | Call 0x1,0x38 04f5 6817 |h | Jump_Zero 0x50d 04f6 8402 | | Call 0x2,0x2 ; Debug Table 0x17.0x2 = 0x4f6,0x3 04f7 e5f1 | | Load 0x2,-0xf ; Debug Table 0x17.0x3 = 0x4f7,0x4 04f8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 04f9 8237 | 7 | Call 0x1,0x37 04fa 680e |h | Jump_Zero 0x509 04fb e5f1 | | Load 0x2,-0xf ; Debug Table 0x17.0x4 = 0x4fb,0x5 04fc e5f2 | | Load 0x2,-0xe 04fd e5fa | | Load 0x2,-0x6 04fe e5fb | | Load 0x2,-0x5 04ff e5f3 | | Load 0x2,-0xd 0500 e5f4 | | Load 0x2,-0xc 0501 e5f5 | | Load 0x2,-0xb 0502 e5f6 | | Load 0x2,-0xa 0503 e5f7 | | Load 0x2,-0x9 0504 e5f8 | | Load 0x2,-0x8 0505 e5f9 | | Load 0x2,-0x7 0506 823c | < | Call 0x1,0x3c 0507 00d1 | | Pop_Control Pop_Count_1 0508 450f |E | Exit_Suprogram New_Top_Offset 0xf 0509 e5f2 | | Load 0x2,-0xe ; Debug Table 0x17.0x5 = 0x509,0x6 050a 0092 09ac | | Action Push_String_Extended,0x9ac ; "login failed." 050c 8234 | 4 | Call 0x1,0x34 050d 450f |E | Exit_Suprogram New_Top_Offset 0xf 050e 0000 0000 | | .XXX[0x2] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 0513 | | .CONST 0x0513 ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0001 | | .CONST 0x0001 ; Number of locals 0513 BODY_0510: 0513 INIT_0510: 0513 00da | | Load_Top At_Offset_2 ; Debug Table 0x18 = .DEBUG 0x0513,0x10dc,0x0001,0x0000,0x0037,0x0234,0x0000,0x025c ; Debug Table 0x18.0x0 = 0x513,0x1 0514 0092 09ad | | Action Push_String_Extended,0x9ad ; "Disconnecting Ftp connection" 0516 8218 | | Call 0x1,0x18 0517 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x1 = 0x517,0x2 0518 e5fe | | Load 0x2,-0x2 0519 8238 | 8 | Call 0x1,0x38 051a 6809 |h | Jump_Zero 0x524 051b 00db | | Load_Top At_Offset_3 ; Debug Table 0x18.0x2 = 0x51b,0x3 051c e002 | | Load 0x0,0x2 051d 181d | | Execute Package,Field_Execute,Field_Number 0x1d 051e 0092 09ae | | Action Push_String_Extended,0x9ae ; "Ftp.Disconnect" ; Debug Table 0x18.0x3 = 0x51e,0x4 0520 4803 |H | Short_Literal 0x3 0521 e5ff | | Load 0x2,-0x1 0522 e5fe | | Load 0x2,-0x2 0523 821d | | Call 0x1,0x1d 0524 00db | | Load_Top At_Offset_3 ; Debug Table 0x18.0x4 = 0x524,0x5 0525 e002 | | Load 0x0,0x2 0526 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0527 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 052b | + | .CONST 0x052b ; Address of begin 0529 0004 | | .CONST 0x0004 ; Address of exception handler 052a 0001 | | .CONST 0x0001 ; Number of locals 052b BODY_0528: 052b INIT_0528: 052b 00da | | Load_Top At_Offset_2 ; Debug Table 0x19 = .DEBUG 0x052b,0x10e8,0x0001,0x0000,0x0037,0x0234,0x0000,0x026c ; Debug Table 0x19.0x0 = 0x52b,0x1 052c 0092 09af | | Action Push_String_Extended,0x9af ; "Abandoning Ftp Connection" 052e 8218 | | Call 0x1,0x18 052f 00db | | Load_Top At_Offset_3 ; Debug Table 0x19.0x1 = 0x52f,0x2 0530 e002 | | Load 0x0,0x2 0531 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0532 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0533 0000 0000 | | .BLANK 0000[0x5] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053b | ; | .CONST 0x053b ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0001 | | .CONST 0x0001 ; Number of locals 053b BODY_0538: 053b INIT_0538: 053b 00db | | Load_Top At_Offset_3 ; Debug Table 0x1a = .DEBUG 0x053b,0x10ee,0x0001,0x0000,0x0037,0x0234,0x0000,0x027c ; Debug Table 0x1a.0x0 = 0x53b,0x1 053c 4803 |H | Short_Literal 0x3 053d 0092 09b0 | | Action Push_String_Extended,0x9b0 ; "Send_Port => " 053f e5ff | | Load 0x2,-0x1 0540 00e1 | | Load_Encached Boolean_Cache 0541 025e | ^ | Execute Discrete,Convert 0542 1c01 | | Execute_Immediate Run_Utility,0x1 0543 01cc | | Execute Vector,Catenate 0544 e006 | | Load 0x0,0x6 0545 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0546 00da | | Load_Top At_Offset_2 ; Debug Table 0x1a.0x1 = 0x546,0x2 0547 e5fd | | Load 0x2,-0x3 0548 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0549 4503 |E | Exit_Suprogram New_Top_Offset 0x3 054a 0000 0000 | | .BLANK 0000[0x6] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 0563 | c | .CONST 0x0563 ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x0553,0x10f4,0x0001,0x0000,0x0037,0x0234,0x0000,0x028e ; Debug Table 0x1b.0x0 = 0x553,0x1 0554 e010 | | Load 0x0,0x10 0555 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0556 e5fd | | Load 0x2,-0x3 0557 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0558 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x1 = 0x558,0x2 0559 4803 |H | Short_Literal 0x3 055a 4822 |H" | Short_Literal 0x22 055b 0092 09b1 | | Action Push_String_Extended,0x9b1 ; "Remote_Type => \x22" 055d e5ff | | Load 0x2,-0x1 055e 01cc | | Execute Vector,Catenate 055f 01cb | | Execute Vector,Append 0560 e006 | | Load 0x0,0x6 0561 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0562 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0563 TRAP_0550: 0563 0007 | | Action Break_Optional 0564 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1b.0x2 = 0x564,0x3 0565 4807 |H | Short_Literal 0x7 0566 0092 09b2 | | Action Push_String_Extended,0x9b2 ; "Remote Machine_Type \x22" 0568 e5ff | | Load 0x2,-0x1 0569 01cc | | Execute Vector,Catenate 056a 0092 09b3 | | Action Push_String_Extended,0x9b3 ; "\x22 is not supported." 056c 01cc | | Execute Vector,Catenate 056d e006 | | Load 0x0,0x6 056e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 056f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1b.0x3 = 0x56f,0x4 0570 0101 | | Execute Exception,Reraise 0571 0000 0000 | | .BLANK 0000[0x7] 0578 ; -------------------------------------------------------------------------------------- 0578 ; SUBPROGRAM 0578 ; -------------------------------------------------------------------------------------- 0578 057b | { | .CONST 0x057b ; Address of begin 0579 0004 | | .CONST 0x0004 ; Address of exception handler 057a 0001 | | .CONST 0x0001 ; Number of locals 057b BODY_0578: 057b INIT_0578: 057b e5fd | | Load 0x2,-0x3 ; Debug Table 0x1c = .DEBUG 0x057b,0x10fe,0x0001,0x0000,0x0037,0x0234,0x0000,0x02a2 ; Debug Table 0x1c.0x0 = 0x57b,0x1 057c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 057d 00db | | Load_Top At_Offset_3 057e e011 | | Load 0x0,0x11 057f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0580 00d1 | | Pop_Control Pop_Count_1 0581 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x1 = 0x581,0x2 0582 4803 |H | Short_Literal 0x3 0583 0092 09b4 | | Action Push_String_Extended,0x9b4 ; "Remote_Roof => \x22" 0585 e5ff | | Load 0x2,-0x1 0586 01cc | | Execute Vector,Catenate 0587 0092 09a1 | | Action Push_String_Extended,0x9a1 ; "\x22" 0589 01cc | | Execute Vector,Catenate 058a e006 | | Load 0x0,0x6 058b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 058c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 058d 0000 0000 | | .XXX[0x3] 058f 0000 | | 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1d = .DEBUG 0x0593,0x1104,0x0001,0x0000,0x0037,0x0234,0x0000,0x02b4 ; Debug Table 0x1d.0x0 = 0x593,0x1 0594 0092 09b5 | | Action Push_String_Extended,0x9b5 ; "Transfer_Type => " 0596 e5fe | | Load 0x2,-0x2 0597 e008 | | Load 0x0,0x8 0598 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0599 025e | ^ | Execute Discrete,Convert 059a 1c01 | | Execute_Immediate Run_Utility,0x1 059b 01cc | | Execute Vector,Catenate 059c 8218 | | Call 0x1,0x18 059d 00db | | Load_Top At_Offset_3 ; Debug Table 0x1d.0x1 = 0x59d,0x2 059e 00db | | Load_Top At_Offset_3 059f e002 | | Load 0x0,0x2 05a0 181e | | Execute Package,Field_Execute,Field_Number 0x1e 05a1 0092 09b6 | | Action Push_String_Extended,0x9b6 ; "Ftp.Use_Type" ; Debug Table 0x1d.0x2 = 0x5a1,0x3 05a3 4803 |H | Short_Literal 0x3 05a4 e5fb | | Load 0x2,-0x5 05a5 e5ff | | Load 0x2,-0x1 05a6 821d | | Call 0x1,0x1d 05a7 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1d.0x3 = 0x5a7,0x4 05a8 e5fc | | Load 0x2,-0x4 05a9 e5fd | | Load 0x2,-0x3 05aa e5ff | | Load 0x2,-0x1 05ab 8231 | 1 | Call 0x1,0x31 05ac 4506 |E | Exit_Suprogram New_Top_Offset 0x6 05ad 0000 0000 | | .XXX[0x3] 05af 0000 | | 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b3 | | .CONST 0x05b3 ; Address of begin 05b1 0004 | | .CONST 0x0004 ; Address of exception handler 05b2 0001 | | .CONST 0x0001 ; Number of locals 05b3 BODY_05b0: 05b3 INIT_05b0: 05b3 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1e = .DEBUG 0x05b3,0x110e,0x0001,0x0000,0x0037,0x0234,0x0000,0x02d2 ; Debug Table 0x1e.0x0 = 0x5b3,0x1 05b4 0092 09b7 | | Action Push_String_Extended,0x9b7 ; "Transfer_Mode => " 05b6 e5fe | | Load 0x2,-0x2 05b7 e008 | | Load 0x0,0x8 05b8 1b10 | | Execute Package,Field_Read,Field_Number 0x10 05b9 025e | ^ | Execute Discrete,Convert 05ba 1c01 | | Execute_Immediate Run_Utility,0x1 05bb 01cc | | Execute Vector,Catenate 05bc 8218 | | Call 0x1,0x18 05bd 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x1 = 0x5bd,0x2 05be 00db | | Load_Top At_Offset_3 05bf e002 | | Load 0x0,0x2 05c0 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05c1 0092 09b8 | | Action Push_String_Extended,0x9b8 ; "Ftp.Use_Mode" ; Debug Table 0x1e.0x2 = 0x5c1,0x3 05c3 4803 |H | Short_Literal 0x3 05c4 e5fb | | Load 0x2,-0x5 05c5 e5ff | | Load 0x2,-0x1 05c6 821d | | Call 0x1,0x1d 05c7 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1e.0x3 = 0x5c7,0x4 05c8 e5fc | | Load 0x2,-0x4 05c9 e5fd | | Load 0x2,-0x3 05ca e5ff | | Load 0x2,-0x1 05cb 8231 | 1 | Call 0x1,0x31 05cc 4506 |E | Exit_Suprogram New_Top_Offset 0x6 05cd 0000 0000 | | .XXX[0x3] 05cf 0000 | | 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d3 | | .CONST 0x05d3 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0001 | | .CONST 0x0001 ; Number of locals 05d3 BODY_05d0: 05d3 INIT_05d0: 05d3 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1f = .DEBUG 0x05d3,0x1118,0x0001,0x0000,0x0037,0x0234,0x0000,0x02f0 ; Debug Table 0x1f.0x0 = 0x5d3,0x1 05d4 0092 09b9 | | Action Push_String_Extended,0x9b9 ; "Transfer_Structure => " 05d6 e5fe | | Load 0x2,-0x2 05d7 e008 | | Load 0x0,0x8 05d8 1b11 | | Execute Package,Field_Read,Field_Number 0x11 05d9 025e | ^ | Execute Discrete,Convert 05da 1c01 | | Execute_Immediate Run_Utility,0x1 05db 01cc | | Execute Vector,Catenate 05dc 8218 | | Call 0x1,0x18 05dd 00db | | Load_Top At_Offset_3 ; Debug Table 0x1f.0x1 = 0x5dd,0x2 05de 00db | | Load_Top At_Offset_3 05df e002 | | Load 0x0,0x2 05e0 1820 | | Execute Package,Field_Execute,Field_Number 0x20 05e1 0092 09ba | | Action Push_String_Extended,0x9ba ; "Ftp.Use_Structure" ; Debug Table 0x1f.0x2 = 0x5e1,0x3 05e3 4803 |H | Short_Literal 0x3 05e4 e5fb | | Load 0x2,-0x5 05e5 e5ff | | Load 0x2,-0x1 05e6 821d | | Call 0x1,0x1d 05e7 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1f.0x3 = 0x5e7,0x4 05e8 e5fc | | Load 0x2,-0x4 05e9 e5fd | | Load 0x2,-0x3 05ea e5ff | | Load 0x2,-0x1 05eb 8231 | 1 | Call 0x1,0x31 05ec 4506 |E | Exit_Suprogram New_Top_Offset 0x6 05ed 0000 0000 | | .XXX[0x3] 05ef 0000 | | 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05fb | | .CONST 0x05fb ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0002 | | .CONST 0x0002 ; Number of locals 05f3 INIT_05f0: 05f3 0092 09bb | | Action Push_String_Extended,0x9bb ; "Ftp.Change_Working_Directory (\x22" ; Debug Table 0x20 = .DEBUG 0x05f3,0x1122,0x0001,0x0000,0x0037,0x0234,0x0000,0x030e ; Debug Table 0x20.0x0 = 0x5f3,0xffff 05f5 e5fe | | Load 0x2,-0x2 05f6 01cc | | Execute Vector,Catenate 05f7 0092 09a5 | | Action Push_String_Extended,0x9a5 ; "\x22)" 05f9 01cc | | Execute Vector,Catenate 05fa 0007 | | Action Break_Optional 05fb BODY_05f0: 05fb e5fb | | Load 0x2,-0x5 ; Debug Table 0x20.0x1 = 0x5fb,0x1 05fc 00d9 | | Load_Top At_Offset_1 05fd 8218 | | Call 0x1,0x18 05fe e5fe | | Load 0x2,-0x2 ; Debug Table 0x20.0x2 = 0x5fe,0x2 05ff e5ff | | Load 0x2,-0x1 0600 e002 | | Load 0x0,0x2 0601 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0602 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x20.0x3 = 0x602,0x3 0603 4803 |H | Short_Literal 0x3 0604 e5fb | | Load 0x2,-0x5 0605 e5ff | | Load 0x2,-0x1 0606 821d | | Call 0x1,0x1d 0607 e5fb | | Load 0x2,-0x5 ; Debug Table 0x20.0x4 = 0x607,0x4 0608 e5fc | | Load 0x2,-0x4 0609 e5fd | | Load 0x2,-0x3 060a e5ff | | Load 0x2,-0x1 060b 8231 | 1 | Call 0x1,0x31 060c 4506 |E | Exit_Suprogram New_Top_Offset 0x6 060d 0000 0000 | | .XXX[0x3] 060f 0000 | | 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0619 | | .CONST 0x0619 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0002 | | .CONST 0x0002 ; Number of locals 0613 INIT_0610: 0613 e5fc | | Load 0x2,-0x4 ; Debug Table 0x21 = .DEBUG 0x0613,0x112e,0x0001,0x0000,0x0037,0x0234,0x0000,0x032a ; Debug Table 0x21.0x0 = 0x613,0xffff 0614 e5fd | | Load 0x2,-0x3 0615 e5fe | | Load 0x2,-0x2 0616 e5ff | | Load 0x2,-0x1 0617 8214 | | Call 0x1,0x14 0618 8240 | @ | Call 0x1,0x40 0619 BODY_0610: 0619 e5fc | | Load 0x2,-0x4 ; Debug Table 0x21.0x1 = 0x619,0x1 061a 4822 |H" | Short_Literal 0x22 061b 0092 09bc | | Action Push_String_Extended,0x9bc ; "Account => \x22" 061d 00db | | Load_Top At_Offset_3 061e 01cc | | Execute Vector,Catenate 061f 01cb | | Execute Vector,Append 0620 8218 | | Call 0x1,0x18 0621 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0x2 = 0x621,0x2 0622 e5ff | | Load 0x2,-0x1 0623 e002 | | Load 0x0,0x2 0624 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0625 0092 09bd | | Action Push_String_Extended,0x9bd ; "Ftp.Use_Account" ; Debug Table 0x21.0x3 = 0x625,0x3 0627 4803 |H | Short_Literal 0x3 0628 e5fc | | Load 0x2,-0x4 0629 e5ff | | Load 0x2,-0x1 062a 821d | | Call 0x1,0x1d 062b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 062c 0000 0000 | | .BLANK 0000[0x4] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 00da | | Load_Top At_Offset_2 ; Debug Table 0x22 = .DEBUG 0x0633,0x1138,0x0001,0x0000,0x0037,0x0234,0x0000,0x0342 ; Debug Table 0x22.0x0 = 0x633,0x1 0634 e002 | | Load 0x0,0x2 0635 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0636 0b03 | | Execute_Immediate Case_Compare,0x3 0637 7001 |p | Jump_Nonzero 0x639 0638 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x22.0x1 = 0x638,0x3 0639 e5fc | | Load 0x2,-0x4 ; Debug Table 0x22.0x2 = 0x639,0x2 063a 820e | | Call 0x1,0xe 063b e5fd | | Load 0x2,-0x3 063c e5fe | | Load 0x2,-0x2 063d e5ff | | Load 0x2,-0x1 063e 8230 | 0 | Call 0x1,0x30 063f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 0655 | U | .CONST 0x0655 ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0006 | | .CONST 0x0006 ; Number of locals 0643 INIT_0640: 0643 0007 | | Action Break_Optional ; Debug Table 0x23 = .DEBUG 0x0643,0x1140,0x0002,0x0000,0x0037,0x0244,0x0000,0x0022 ; Debug Table 0x23.0x0 = 0x643,0xffff 0644 029f 090b | | Declare_Subprogram INIT_0908,For_Call ; Debug Table 0x23.0x1 = 0x644,0xfffe 0646 e012 | | Load 0x0,0x12 ; Debug Table 0x23.0x2 = 0x646,0xfffd 0647 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0648 02c7 | | Declare_Variable Any 0649 00d8 | | Load_Top At_Offset_0 064a 1c00 | | Execute_Immediate Run_Utility,0x0 064b e012 | | Load 0x0,0x12 ; Debug Table 0x23.0x3 = 0x64b,0xfffc 064c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 064d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 064e 02c7 | | Declare_Variable Any 064f 00d8 | | Load_Top At_Offset_0 0650 1c00 | | Execute_Immediate Run_Utility,0x0 0651 e012 | | Load 0x0,0x12 ; Debug Table 0x23.0x4 = 0x651,0xfffb 0652 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0653 029f 0953 | S| Declare_Subprogram INIT_0950,For_Call 0655 BODY_0640: 0655 00db | | Load_Top At_Offset_3 ; Debug Table 0x23.0x5 = 0x655,0x1 0656 00ea | | Load_Encached Null_String_Cache 0657 e5fe | | Load 0x2,-0x2 0658 4801 |H | Short_Literal 0x1 0659 e012 | | Load 0x0,0x12 065a 180f | | Execute Package,Field_Execute,Field_Number 0xf 065b c403 | | Store 0x2,0x3 065c 4800 |H | Short_Literal 0x0 ; Debug Table 0x23.0x6 = 0x65c,0x2 065d e012 | | Load 0x0,0x12 065e 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 065f e5ff | | Load 0x2,-0x1 0660 e403 | | Load 0x2,0x3 0661 e012 | | Load 0x0,0x12 0662 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0663 4800 |H | Short_Literal 0x0 ; Debug Table 0x23.0x7 = 0x663,0x3 0664 e5ff | | Load 0x2,-0x1 0665 01db | | Execute Vector,Length 0666 0a01 | | Execute_Immediate Plus,0x1 0667 00e4 | | Load_Encached Positive_Cache 0668 025b | [ | Execute Discrete,Check_In_Type 0669 4801 |H | Short_Literal 0x1 066a e403 | | Load 0x2,0x3 066b e012 | | Load 0x0,0x12 066c 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 066d 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x8 = 0x66d,0x4 066e e012 | | Load 0x0,0x12 066f 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0670 180e | | Execute Package,Field_Execute,Field_Number 0xe 0671 c404 | | Store 0x2,0x4 0672 8406 | | Call 0x2,0x6 ; Debug Table 0x23.0x9 = 0x672,0x5 0673 4831 |H1 | Short_Literal 0x31 0674 0257 | W | Execute Discrete,Raise 0675 0000 0000 | | .XXX[0x3] 0677 0000 | | 0678 0000 0000 | | .LITERAL {0x00000000, 0x00050000} 067c 0000 0000 | | .LITERAL {0x00000000, 0x37023401} 0680 ; -------------------------------------------------------------------------------------- 0680 ; SUBPROGRAM 0680 ; -------------------------------------------------------------------------------------- 0680 0683 | | .CONST 0x0683 ; Address of begin 0681 0004 | | .CONST 0x0004 ; Address of exception handler 0682 0001 | | .CONST 0x0001 ; Number of locals 0683 BODY_0680: 0683 INIT_0680: 0683 00da | | Load_Top At_Offset_2 ; Debug Table 0x24 = .DEBUG 0x0683,0x1156,0x0001,0x0000,0x0037,0x0244,0x0000,0x010a ; Debug Table 0x24.0x0 = 0x683,0x1 0684 e003 | | Load 0x0,0x3 0685 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0686 6802 |h | Jump_Zero 0x689 0687 67f4 |g | Indirect_Literal Discrete,0x67c,{0x00000000, 0x37023401} ; Debug Table 0x24.0x1 = 0x687,0x2 0688 0257 | W | Execute Discrete,Raise 0689 4502 |E | Exit_Suprogram New_Top_Offset 0x2 068a 0000 0000 | | .BLANK 0000[0x6] 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 0693 | | .CONST 0x0693 ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0001 | | .CONST 0x0001 ; Number of locals 0693 BODY_0690: 0693 INIT_0690: 0693 00db | | Load_Top At_Offset_3 ; Debug Table 0x25 = .DEBUG 0x0693,0x115c,0x0001,0x0000,0x0037,0x0244,0x0000,0x0123 ; Debug Table 0x25.0x0 = 0x693,0x1 0694 4805 |H | Short_Literal 0x5 0695 e5ff | | Load 0x2,-0x1 0696 e006 | | Load 0x0,0x6 0697 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0698 00db | | Load_Top At_Offset_3 ; Debug Table 0x25.0x1 = 0x698,0x2 0699 8233 | 3 | Call 0x1,0x33 069a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 069b 0000 0000 | | .BLANK 0000[0x5] 06a0 ; -------------------------------------------------------------------------------------- 06a0 ; SUBPROGRAM 06a0 ; -------------------------------------------------------------------------------------- 06a0 06a3 | | .CONST 0x06a3 ; Address of begin 06a1 0004 | | .CONST 0x0004 ; Address of exception handler 06a2 0001 | | .CONST 0x0001 ; Number of locals 06a3 BODY_06a0: 06a3 INIT_06a0: 06a3 e003 | | Load 0x0,0x3 ; Debug Table 0x26 = .DEBUG 0x06a3,0x1162,0x0002,0x0000,0x0037,0x0244,0x0000,0x0251 ; Debug Table 0x26.0x0 = 0x6a3,0x1 06a4 180e | | Execute Package,Field_Execute,Field_Number 0xe 06a5 e003 | | Load 0x0,0x3 06a6 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 06a7 e003 | | Load 0x0,0x3 06a8 180e | | Execute Package,Field_Execute,Field_Number 0xe 06a9 e003 | | Load 0x0,0x3 06aa 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 06ab e5ff | | Load 0x2,-0x1 06ac e003 | | Load 0x0,0x3 06ad 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 06ae e5ff | | Load 0x2,-0x1 06af e003 | | Load 0x0,0x3 06b0 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 06b1 e5ff | | Load 0x2,-0x1 06b2 e003 | | Load 0x0,0x3 06b3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06b4 4803 |H | Short_Literal 0x3 06b5 e003 | | Load 0x0,0x3 06b6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 06b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06bc | | .CONST 0x06bc ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0002 | | .CONST 0x0002 ; Number of locals 06bb INIT_06b8: 06bb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x27 = .DEBUG 0x06bb,0x1166,0x0002,0x0000,0x0037,0x0244,0x0000,0x03fd ; Debug Table 0x27.0x0 = 0x6bb,0xffff 06bc BODY_06b8: 06bc 00db | | Load_Top At_Offset_3 ; Debug Table 0x27.0x1 = 0x6bc,0x1 06bd 8236 | 6 | Call 0x1,0x36 06be 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06bf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x27.0x2 = 0x6bf,0x2 06c0 7004 |p | Jump_Nonzero 0x6c5 06c1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x27.0x3 = 0x6c1,0x3 06c2 0092 09be | | Action Push_String_Extended,0x9be ; "Command failed: your FTP connection is not connected." 06c4 8234 | 4 | Call 0x1,0x34 06c5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x27.0x4 = 0x6c5,0x4 06c6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06c7 0000 | | .XXX[0x1] 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06cc | | .CONST 0x06cc ; Address of begin 06c9 0004 | | .CONST 0x0004 ; Address of exception handler 06ca 0002 | | .CONST 0x0002 ; Number of locals 06cb INIT_06c8: 06cb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x28 = .DEBUG 0x06cb,0x1172,0x0002,0x0000,0x0037,0x0244,0x0000,0x042b ; Debug Table 0x28.0x0 = 0x6cb,0xffff 06cc BODY_06c8: 06cc 00db | | Load_Top At_Offset_3 ; Debug Table 0x28.0x1 = 0x6cc,0x1 06cd 8236 | 6 | Call 0x1,0x36 06ce 0f00 | | Execute_Immediate Equal,0x0 06cf 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06d0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x28.0x2 = 0x6d0,0x2 06d1 7007 |p | Jump_Nonzero 0x6d9 06d2 e5fe | | Load 0x2,-0x2 ; Debug Table 0x28.0x3 = 0x6d2,0x3 06d3 0092 09a3 | | Action Push_String_Extended,0x9a3 ; "Command failed: your FTP connection is already " 06d5 e5ff | | Load 0x2,-0x1 06d6 8216 | | Call 0x1,0x16 06d7 01cc | | Execute Vector,Catenate 06d8 8234 | 4 | Call 0x1,0x34 06d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x28.0x4 = 0x6d9,0x4 06da 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06db 0000 0000 | | .BLANK 0000[0x5] 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e3 | | .CONST 0x06e3 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0001 | | .CONST 0x0001 ; Number of locals 06e3 BODY_06e0: 06e3 INIT_06e0: 06e3 4820 |H | Short_Literal 0x20 ; Debug Table 0x29 = .DEBUG 0x06e3,0x117e,0x0002,0x0000,0x0037,0x0244,0x0000,0x04a0 ; Debug Table 0x29.0x0 = 0x6e3,0x1 06e4 00db | | Load_Top At_Offset_3 06e5 e013 | | Load 0x0,0x13 06e6 181c | | Execute Package,Field_Execute,Field_Number 0x1c 06e7 e013 | | Load 0x0,0x13 06e8 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06ea 0000 0000 | | .BLANK 0000[0x6] 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f5 | | .CONST 0x06f5 ; Address of begin 06f1 0004 | | .CONST 0x0004 ; Address of exception handler 06f2 0002 | | .CONST 0x0002 ; Number of locals 06f3 INIT_06f0: 06f3 e008 | | Load 0x0,0x8 ; Debug Table 0x2a = .DEBUG 0x06f3,0x1182,0x0002,0x0000,0x0037,0x0244,0x0000,0x04f2 ; Debug Table 0x2a.0x0 = 0x6f3,0xffff 06f4 1b17 | | Execute Package,Field_Read,Field_Number 0x17 06f5 BODY_06f0: 06f5 e008 | | Load 0x0,0x8 ; Debug Table 0x2a.0x1 = 0x6f5,0x1 06f6 1b17 | | Execute Package,Field_Read,Field_Number 0x17 06f7 e5ff | | Load 0x2,-0x1 06f8 e002 | | Load 0x0,0x2 06f9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06fa 0059 | Y | Store_Top Discrete,At_Offset_1 06fb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2a.0x2 = 0x6fb,0x2 06fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06fd 0000 0000 | | .XXX[0x3] 06ff 0000 | | 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0703 | | .CONST 0x0703 ; Address of begin 0701 0004 | | .CONST 0x0004 ; Address of exception handler 0702 0001 | | .CONST 0x0001 ; Number of locals 0703 BODY_0700: 0703 INIT_0700: 0703 e5fc | | Load 0x2,-0x4 ; Debug Table 0x2b = .DEBUG 0x0703,0x118a,0x0001,0x0000,0x0037,0x0244,0x0000,0x0513 ; Debug Table 0x2b.0x0 = 0x703,0x1 0704 e5f5 | | Load 0x2,-0xb 0705 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0706 e002 | | Load 0x0,0x2 0707 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0708 027e | ~ | Execute Discrete,Not_Equal 0709 6808 |h | Jump_Zero 0x712 070a e5f6 | | Load 0x2,-0xa ; Debug Table 0x2b.0x1 = 0x70a,0x2 070b 820d | | Call 0x1,0xd 070c e5f7 | | Load 0x2,-0x9 070d e5f8 | | Load 0x2,-0x8 070e e5fc | | Load 0x2,-0x4 070f e5f5 | | Load 0x2,-0xb 0710 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0711 822c | , | Call 0x1,0x2c 0712 e5fb | | Load 0x2,-0x5 ; Debug Table 0x2b.0x2 = 0x712,0x3 0713 e5f5 | | Load 0x2,-0xb 0714 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0715 e002 | | Load 0x0,0x2 0716 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0717 027e | ~ | Execute Discrete,Not_Equal 0718 6808 |h | Jump_Zero 0x721 0719 e5f6 | | Load 0x2,-0xa ; Debug Table 0x2b.0x3 = 0x719,0x4 071a 820d | | Call 0x1,0xd 071b e5f7 | | Load 0x2,-0x9 071c e5f8 | | Load 0x2,-0x8 071d e5fb | | Load 0x2,-0x5 071e e5f5 | | Load 0x2,-0xb 071f 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0720 822d | - | Call 0x1,0x2d 0721 e5fa | | Load 0x2,-0x6 ; Debug Table 0x2b.0x4 = 0x721,0x5 0722 e5f5 | | Load 0x2,-0xb 0723 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0724 e002 | | Load 0x0,0x2 0725 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0726 027e | ~ | Execute Discrete,Not_Equal 0727 6808 |h | Jump_Zero 0x730 0728 e5f6 | | Load 0x2,-0xa ; Debug Table 0x2b.0x5 = 0x728,0x6 0729 820d | | Call 0x1,0xd 072a e5f7 | | Load 0x2,-0x9 072b e5f8 | | Load 0x2,-0x8 072c e5fa | | Load 0x2,-0x6 072d e5f5 | | Load 0x2,-0xb 072e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 072f 822e | . | Call 0x1,0x2e 0730 00da | | Load_Top At_Offset_2 ; Debug Table 0x2b.0x6 = 0x730,0x7 0731 01db | | Execute Vector,Length 0732 6808 |h | Jump_Zero 0x73b 0733 e5f6 | | Load 0x2,-0xa ; Debug Table 0x2b.0x7 = 0x733,0x8 0734 820d | | Call 0x1,0xd 0735 e5f7 | | Load 0x2,-0x9 0736 e5f8 | | Load 0x2,-0x8 0737 e5ff | | Load 0x2,-0x1 0738 e5f5 | | Load 0x2,-0xb 0739 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 073a 822f | / | Call 0x1,0x2f 073b e5f5 | | Load 0x2,-0xb ; Debug Table 0x2b.0x8 = 0x73b,0x9 073c e5f6 | | Load 0x2,-0xa 073d 820d | | Call 0x1,0xd 073e e5f9 | | Load 0x2,-0x7 073f 8229 | ) | Call 0x1,0x29 0740 00d1 | | Pop_Control Pop_Count_1 0741 e5f5 | | Load 0x2,-0xb ; Debug Table 0x2b.0x9 = 0x741,0xa 0742 e5f6 | | Load 0x2,-0xa 0743 820d | | Call 0x1,0xd 0744 e5fe | | Load 0x2,-0x2 0745 822b | + | Call 0x1,0x2b 0746 00d1 | | Pop_Control Pop_Count_1 0747 e5f5 | | Load 0x2,-0xb ; Debug Table 0x2b.0xa = 0x747,0xb 0748 e5f6 | | Load 0x2,-0xa 0749 820d | | Call 0x1,0xd 074a e5fd | | Load 0x2,-0x3 074b 822a | * | Call 0x1,0x2a 074c 450b |E | Exit_Suprogram New_Top_Offset 0xb 074d 0000 0000 | | .XXX[0x3] 074f 0000 | | 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 00db | | Load_Top At_Offset_3 ; Debug Table 0x2c = .DEBUG 0x0753,0x11a2,0x0002,0x0000,0x0037,0x0244,0x0000,0x05dd ; Debug Table 0x2c.0x0 = 0x753,0x1 0754 01db | | Execute Vector,Length 0755 7005 |p | Jump_Nonzero 0x75b 0756 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2c.0x1 = 0x756,0x2 0757 00db | | Load_Top At_Offset_3 0758 e014 | | Load 0x0,0x14 0759 1810 | | Execute Package,Field_Execute,Field_Number 0x10 075a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 075b 00db | | Load_Top At_Offset_3 ; Debug Table 0x2c.0x2 = 0x75b,0x3 075c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 075d 0000 0000 | | .XXX[0x3] 075f 0000 | | 0760 ; -------------------------------------------------------------------------------------- 0760 ; SUBPROGRAM 0760 ; -------------------------------------------------------------------------------------- 0760 0763 | c | .CONST 0x0763 ; Address of begin 0761 0004 | | .CONST 0x0004 ; Address of exception handler 0762 0001 | | .CONST 0x0001 ; Number of locals 0763 BODY_0760: 0763 INIT_0760: 0763 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2d = .DEBUG 0x0763,0x11aa,0x0002,0x0000,0x0037,0x0244,0x0000,0x0608 ; Debug Table 0x2d.0x0 = 0x763,0x1 0764 01db | | Execute Vector,Length 0765 7017 |p | Jump_Nonzero 0x77d 0766 e5fc | | Load 0x2,-0x4 ; Debug Table 0x2d.0x1 = 0x766,0x2 0767 6810 |h | Jump_Zero 0x778 0768 0092 09bf | | Action Push_String_Extended,0x9bf ; "FTP password" ; Debug Table 0x2d.0x2 = 0x768,0x3 076a 0092 09c0 | | Action Push_String_Extended,0x9c0 ; "please enter FTP password for machine " 076c e5ff | | Load 0x2,-0x1 076d 01cc | | Execute Vector,Catenate 076e 0092 09c1 | | Action Push_String_Extended,0x9c1 ; ", username " 0770 01cc | | Execute Vector,Catenate 0771 e5fe | | Load 0x2,-0x2 0772 01cc | | Execute Vector,Catenate 0773 0092 09c2 | | Action Push_String_Extended,0x9c2 ; ": " 0775 01cc | | Execute Vector,Catenate 0776 8232 | 2 | Call 0x1,0x32 0777 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0778 e5fb | | Load 0x2,-0x5 ; Debug Table 0x2d.0x3 = 0x778,0x4 0779 00db | | Load_Top At_Offset_3 077a e014 | | Load 0x0,0x14 077b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 077c 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 077d e5fd | | Load 0x2,-0x3 ; Debug Table 0x2d.0x4 = 0x77d,0x5 077e 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 077f 0000 | | .XXX[0x1] 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0783 | | .CONST 0x0783 ; Address of begin 0781 0004 | | .CONST 0x0004 ; Address of exception handler 0782 0001 | | .CONST 0x0001 ; Number of locals 0783 BODY_0780: 0783 INIT_0780: 0783 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2e = .DEBUG 0x0783,0x11b6,0x0002,0x0000,0x0037,0x0244,0x0000,0x0659 ; Debug Table 0x2e.0x0 = 0x783,0x1 0784 01db | | Execute Vector,Length 0785 7017 |p | Jump_Nonzero 0x79d 0786 e5fc | | Load 0x2,-0x4 ; Debug Table 0x2e.0x1 = 0x786,0x2 0787 6810 |h | Jump_Zero 0x798 0788 0092 09c3 | | Action Push_String_Extended,0x9c3 ; "FTP account" ; Debug Table 0x2e.0x2 = 0x788,0x3 078a 0092 09c4 | | Action Push_String_Extended,0x9c4 ; "please enter FTP account for machine " 078c e5ff | | Load 0x2,-0x1 078d 01cc | | Execute Vector,Catenate 078e 0092 09c1 | | Action Push_String_Extended,0x9c1 ; ", username " 0790 01cc | | Execute Vector,Catenate 0791 e5fe | | Load 0x2,-0x2 0792 01cc | | Execute Vector,Catenate 0793 0092 09c2 | | Action Push_String_Extended,0x9c2 ; ": " 0795 01cc | | Execute Vector,Catenate 0796 8232 | 2 | Call 0x1,0x32 0797 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0798 e5fb | | Load 0x2,-0x5 ; Debug Table 0x2e.0x3 = 0x798,0x4 0799 00db | | Load_Top At_Offset_3 079a e014 | | Load 0x0,0x14 079b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 079c 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 079d e5fd | | Load 0x2,-0x3 ; Debug Table 0x2e.0x4 = 0x79d,0x5 079e 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 079f 0000 | | .XXX[0x1] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 00db | | Load_Top At_Offset_3 ; Debug Table 0x2f = .DEBUG 0x07a3,0x11c2,0x0002,0x0000,0x0037,0x0244,0x0000,0x06aa ; Debug Table 0x2f.0x0 = 0x7a3,0x1 07a4 01db | | Execute Vector,Length 07a5 7012 |p | Jump_Nonzero 0x7b8 07a6 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2f.0x1 = 0x7a6,0x2 07a7 680b |h | Jump_Zero 0x7b3 07a8 0092 09c3 | | Action Push_String_Extended,0x9c3 ; "FTP account" ; Debug Table 0x2f.0x2 = 0x7a8,0x3 07aa 0092 09c4 | | Action Push_String_Extended,0x9c4 ; "please enter FTP account for machine " 07ac e5ff | | Load 0x2,-0x1 07ad 01cc | | Execute Vector,Catenate 07ae 0092 09c2 | | Action Push_String_Extended,0x9c2 ; ": " 07b0 01cc | | Execute Vector,Catenate 07b1 8232 | 2 | Call 0x1,0x32 07b2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 07b3 e5fc | | Load 0x2,-0x4 ; Debug Table 0x2f.0x3 = 0x7b3,0x4 07b4 00db | | Load_Top At_Offset_3 07b5 e014 | | Load 0x0,0x14 07b6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 07b7 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 07b8 00db | | Load_Top At_Offset_3 ; Debug Table 0x2f.0x4 = 0x7b8,0x5 07b9 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 07ba 0000 0000 | | .BLANK 0000[0x6] 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 00da | | Load_Top At_Offset_2 ; Debug Table 0x30 = .DEBUG 0x07c3,0x11ce,0x0002,0x0000,0x0037,0x0244,0x0000,0x0bf0 ; Debug Table 0x30.0x0 = 0x7c3,0x1 07c4 4864 |Hd | Short_Literal 0x64 07c5 0270 | p | Execute Discrete,Divide 07c6 0b04 | | Execute_Immediate Case_Compare,0x4 07c7 7004 |p | Jump_Nonzero 0x7cc 07c8 0b05 | | Execute_Immediate Case_Compare,0x5 07c9 7002 |p | Jump_Nonzero 0x7cc 07ca 4802 |H | Short_Literal 0x2 ; Debug Table 0x30.0x1 = 0x7ca,0x3 07cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07cc 4807 |H | Short_Literal 0x7 ; Debug Table 0x30.0x2 = 0x7cc,0x2 07cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ce 0000 0000 | | .XXX[0x2] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 00da | | Load_Top At_Offset_2 ; Debug Table 0x31 = .DEBUG 0x07d3,0x11d6,0x0002,0x0000,0x0037,0x0244,0x0000,0x1012 ; Debug Table 0x31.0x0 = 0x7d3,0x1 07d4 0f01 | | Execute_Immediate Equal,0x1 07d5 6807 |h | Jump_Zero 0x7dd 07d6 00da | | Load_Top At_Offset_2 ; Debug Table 0x31.0x1 = 0x7d6,0x2 07d7 00e0 | | Load_Encached Standard_Cache 07d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07d9 0092 09c5 | | Action Push_String_Extended,0x9c5 ; " file was " 07db 01cc | | Execute Vector,Catenate 07dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07dd 00da | | Load_Top At_Offset_2 ; Debug Table 0x31.0x2 = 0x7dd,0x3 07de 00e0 | | Load_Encached Standard_Cache 07df 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07e0 0092 09c6 | | Action Push_String_Extended,0x9c6 ; " files were " 07e2 01cc | | Execute Vector,Catenate 07e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e4 0000 0000 | | .BLANK 0000[0x4] 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07eb | | .CONST 0x07eb ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0001 | | .CONST 0x0001 ; Number of locals 07eb BODY_07e8: 07eb INIT_07e8: 07eb e407 | | Load 0x2,0x7 ; Debug Table 0x32 = .DEBUG 0x07eb,0x11de,0x0001,0x0000,0x0037,0x0244,0x0000,0x0e8f ; Debug Table 0x32.0x0 = 0x7eb,0x1 07ec 6808 |h | Jump_Zero 0x7f5 07ed e5fa | | Load 0x2,-0x6 ; Debug Table 0x32.0x1 = 0x7ed,0x2 07ee 820e | | Call 0x1,0xe 07ef 8235 | 5 | Call 0x1,0x35 07f0 e5fb | | Load 0x2,-0x5 07f1 e5fc | | Load 0x2,-0x4 07f2 4800 |H | Short_Literal 0x0 07f3 e5ff | | Load 0x2,-0x1 07f4 822c | , | Call 0x1,0x2c 07f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07f6 0000 0000 | | .XXX[0x2] 07f8 ; -------------------------------------------------------------------------------------- 07f8 ; SUBPROGRAM 07f8 ; -------------------------------------------------------------------------------------- 07f8 07fb | | .CONST 0x07fb ; Address of begin 07f9 0805 | | .CONST 0x0805 ; Address of exception handler 07fa 0001 | | .CONST 0x0001 ; Number of locals 07fb BODY_07f8: 07fb INIT_07f8: 07fb e407 | | Load 0x2,0x7 ; Debug Table 0x33 = .DEBUG 0x07fb,0x11e4,0x0001,0x0000,0x0037,0x0244,0x0000,0x0eb1 ; Debug Table 0x33.0x0 = 0x7fb,0x1 07fc 6807 |h | Jump_Zero 0x804 07fd e5fa | | Load 0x2,-0x6 ; Debug Table 0x33.0x1 = 0x7fd,0x2 07fe 820e | | Call 0x1,0xe 07ff e5fb | | Load 0x2,-0x5 0800 e5fc | | Load 0x2,-0x4 0801 e407 | | Load 0x2,0x7 0802 e5ff | | Load 0x2,-0x1 0803 822c | , | Call 0x1,0x2c 0804 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0805 TRAP_07f8: 0805 0007 | | Action Break_Optional 0806 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x33.0x2 = 0x806,0x3 0807 0000 | | .XXX[0x1] 0808 ; -------------------------------------------------------------------------------------- 0808 ; SUBPROGRAM 0808 ; -------------------------------------------------------------------------------------- 0808 080d | | .CONST 0x080d ; Address of begin 0809 085c | \ | .CONST 0x085c ; Address of exception handler 080a 0002 | | .CONST 0x0002 ; Number of locals 080b INIT_0808: 080b 029f 096b | k| Declare_Subprogram INIT_0968,For_Call ; Debug Table 0x34 = .DEBUG 0x080b,0x11ec,0x0004,0x0000,0x0037,0x0244,0x0000,0x0fb3 080d BODY_0808: 080d 8408 | | Call 0x2,0x8 ; Debug Table 0x34.0x0 = 0x80d,0x1 080e 8602 | | Call 0x3,0x2 ; Debug Table 0x34.0x1 = 0x80e,0x2 080f e402 | | Load 0x2,0x2 ; Debug Table 0x34.0x2 = 0x80f,0x3 0810 00d8 | | Load_Top At_Offset_0 0811 0229 | ) | Execute Access,All_Read 0812 4800 |H | Short_Literal 0x0 0813 e00c | | Load 0x0,0xc 0814 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0815 00d9 | | Load_Top At_Offset_1 0816 0228 | ( | Execute Access,All_Write 0817 00d1 | | Pop_Control Pop_Count_1 0818 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x34.0x3 = 0x818,0x4 0819 00ea | | Load_Encached Null_String_Cache 081a 00ea | | Load_Encached Null_String_Cache 081b 4801 |H | Short_Literal 0x1 081c e00d | | Load 0x0,0xd 081d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 081e c5f9 | | Store 0x2,-0x7 081f e406 | | Load 0x2,0x6 ; Debug Table 0x34.0x4 = 0x81f,0x5 0820 4801 |H | Short_Literal 0x1 0821 4806 |H | Short_Literal 0x6 0822 0262 | b | Execute Discrete,In_Range 0823 6837 |h7 | Jump_Zero 0x85b 0824 00cf | | Action Mark_Auxiliary 0825 782f |x/ | Jump 0x855 0826 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x34.0x5 = 0x826,0x7 0827 e405 | | Load 0x2,0x5 0828 e402 | | Load 0x2,0x2 0829 0229 | ) | Execute Access,All_Read 082a e00c | | Load 0x0,0xc 082b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 082c 00d1 | | Pop_Control Pop_Count_1 082d c403 | | Store 0x2,0x3 082e 4801 |H | Short_Literal 0x1 ; Debug Table 0x34.0x6 = 0x82e,0x8 082f a404 | | Store_Unchecked 0x2,0x4 0830 00cf | | Action Mark_Auxiliary 0831 e403 | | Load 0x2,0x3 ; Debug Table 0x34.0x7 = 0x831,0x9 0832 4801 |H | Short_Literal 0x1 0833 0263 | c | Execute Discrete,Above_Bound 0834 7013 |p | Jump_Nonzero 0x848 0835 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x34.0x8 = 0x835,0xa 0836 e405 | | Load 0x2,0x5 0837 01d7 | | Execute Vector,Field_Read 0838 0f0a | | Execute_Immediate Equal,0xa 0839 680c |h | Jump_Zero 0x846 083a e404 | | Load 0x2,0x4 ; Debug Table 0x34.0x9 = 0x83a,0xb 083b 00d9 | | Load_Top At_Offset_1 083c 0aff | | Execute_Immediate Plus,-0x1 083d 0248 | H | Execute Discrete,Check_In_Integer 083e e405 | | Load 0x2,0x5 083f 01cf | | Execute Vector,Slice_Read 0840 e5f9 | | Load 0x2,-0x7 0841 e00d | | Load 0x0,0xd 0842 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0843 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x34.0xa = 0x843,0xc 0844 0a01 | | Execute_Immediate Plus,0x1 0845 c404 | | Store 0x2,0x4 0846 00c8 | | Action Pop_Auxiliary_Range 0847 3fed |? | Loop_Increasing 0x835 0848 00ce | | Action Pop_Auxiliary 0849 e404 | | Load 0x2,0x4 ; Debug Table 0x34.0xb = 0x849,0xd 084a e403 | | Load 0x2,0x3 084b 027a | z | Execute Discrete,Less_Equal 084c 6807 |h | Jump_Zero 0x854 084d e404 | | Load 0x2,0x4 ; Debug Table 0x34.0xc = 0x84d,0xe 084e e403 | | Load 0x2,0x3 084f e405 | | Load 0x2,0x5 0850 01cf | | Execute Vector,Slice_Read 0851 e5f9 | | Load 0x2,-0x7 0852 e00d | | Load 0x0,0xd 0853 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0854 00c9 | | Action Pop_Auxiliary_Loop 0855 e402 | | Load 0x2,0x2 ; Debug Table 0x34.0xd = 0x855,0x6 0856 0229 | ) | Execute Access,All_Read 0857 e00c | | Load 0x0,0xc 0858 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0859 6fcc |o | Jump_Zero 0x826 085a 00ce | | Action Pop_Auxiliary 085b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 085c TRAP_0808: 085c 0007 | | Action Break_Optional 085d e402 | | Load 0x2,0x2 ; Debug Table 0x34.0xe = 0x85d,0xf 085e 00d8 | | Load_Top At_Offset_0 085f 0229 | ) | Execute Access,All_Read 0860 e00c | | Load 0x0,0xc 0861 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0862 00d9 | | Load_Top At_Offset_1 0863 0228 | ( | Execute Access,All_Write 0864 00d1 | | Pop_Control Pop_Count_1 0865 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x34.0xf = 0x865,0x10 0866 4800 |H | Short_Literal 0x0 0867 e00d | | Load 0x0,0xd 0868 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0869 c5f9 | | Store 0x2,-0x7 086a 4807 |H | Short_Literal 0x7 ; Debug Table 0x34.0x10 = 0x86a,0x11 086b a5f8 | | Store_Unchecked 0x2,-0x8 086c 00cc | | Action Pop_Block ; Debug Table 0x34.0x11 = 0x86c,0x12 086d 4507 |E | Exit_Suprogram New_Top_Offset 0x7 086e 0000 0000 | | .XXX[0x2] 0870 ; -------------------------------------------------------------------------------------- 0870 ; SUBPROGRAM 0870 ; -------------------------------------------------------------------------------------- 0870 0873 | s | .CONST 0x0873 ; Address of begin 0871 0888 | | .CONST 0x0888 ; Address of exception handler 0872 0001 | | .CONST 0x0001 ; Number of locals 0873 BODY_0870: 0873 INIT_0870: 0873 e5f2 | | Load 0x2,-0xe ; Debug Table 0x35 = .DEBUG 0x0873,0x1212,0x0004,0x0000,0x0037,0x0244,0x0000,0x0b97 ; Debug Table 0x35.0x0 = 0x873,0x1 0874 e5f3 | | Load 0x2,-0xd 0875 820e | | Call 0x1,0xe 0876 8235 | 5 | Call 0x1,0x35 0877 e5f4 | | Load 0x2,-0xc 0878 e5f5 | | Load 0x2,-0xb 0879 e5f6 | | Load 0x2,-0xa 087a e5f7 | | Load 0x2,-0x9 087b e00e | | Load 0x0,0xe 087c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 087d e5f8 | | Load 0x2,-0x8 087e e5f9 | | Load 0x2,-0x7 087f e5fa | | Load 0x2,-0x6 0880 e5fb | | Load 0x2,-0x5 0881 e5fc | | Load 0x2,-0x4 0882 e5fd | | Load 0x2,-0x3 0883 e5fe | | Load 0x2,-0x2 0884 4801 |H | Short_Literal 0x1 0885 e5ff | | Load 0x2,-0x1 0886 8225 | % | Call 0x1,0x25 0887 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0888 TRAP_0870: 0888 0007 | | Action Break_Optional 0889 e5f2 | | Load 0x2,-0xe ; Debug Table 0x35.0x1 = 0x889,0x2 088a e5f3 | | Load 0x2,-0xd 088b 8224 | $ | Call 0x1,0x24 088c 00d1 | | Pop_Control Pop_Count_1 088d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x35.0x2 = 0x88d,0x3 088e 0101 | | Execute Exception,Reraise 088f 0000 | | .XXX[0x1] 0890 ; -------------------------------------------------------------------------------------- 0890 ; SUBPROGRAM 0890 ; -------------------------------------------------------------------------------------- 0890 0897 | | .CONST 0x0897 ; Address of begin 0891 0004 | | .CONST 0x0004 ; Address of exception handler 0892 0002 | | .CONST 0x0002 ; Number of locals 0893 INIT_0890: 0893 e5f2 | | Load 0x2,-0xe ; Debug Table 0x36 = .DEBUG 0x0893,0x121a,0x0004,0x0000,0x0037,0x0244,0x0000,0x0823 ; Debug Table 0x36.0x0 = 0x893,0xffff 0894 e5fe | | Load 0x2,-0x2 0895 e5ff | | Load 0x2,-0x1 0896 823d | = | Call 0x1,0x3d 0897 BODY_0890: 0897 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x36.0x1 = 0x897,0x1 0898 e5f1 | | Load 0x2,-0xf 0899 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 089a e002 | | Load 0x0,0x2 089b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 089c 0092 09c7 | | Action Push_String_Extended,0x9c7 ; "Send_Username" ; Debug Table 0x36.0x2 = 0x89c,0x2 089e 4802 |H | Short_Literal 0x2 089f e5f2 | | Load 0x2,-0xe 08a0 e5f1 | | Load 0x2,-0xf 08a1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08a2 821d | | Call 0x1,0x1d 08a3 e5f1 | | Load 0x2,-0xf ; Debug Table 0x36.0x3 = 0x8a3,0x3 08a4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08a5 823b | ; | Call 0x1,0x3b 08a6 0b01 | | Execute_Immediate Case_Compare,0x1 08a7 7009 |p | Jump_Nonzero 0x8b1 08a8 0b02 | | Execute_Immediate Case_Compare,0x2 08a9 700e |p | Jump_Nonzero 0x8b8 08aa e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0x4 = 0x8aa,0xf 08ab 4807 |H | Short_Literal 0x7 08ac 0092 09c8 | | Action Push_String_Extended,0x9c8 ; "Login failed on username." 08ae e006 | | Load 0x0,0x6 08af 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08b1 e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0x5 = 0x8b1,0x4 08b2 4803 |H | Short_Literal 0x3 08b3 0092 09c9 | | Action Push_String_Extended,0x9c9 ; "Login succeeded." 08b5 e006 | | Load 0x0,0x6 08b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08b8 e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0x6 = 0x8b8,0x5 08b9 e5fc | | Load 0x2,-0x4 08ba e5fd | | Load 0x2,-0x3 08bb e602 | | Load 0x3,0x2 08bc e5ff | | Load 0x2,-0x1 08bd 823e | > | Call 0x1,0x3e 08be e5f1 | | Load 0x2,-0xf 08bf 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08c0 e002 | | Load 0x0,0x2 08c1 181b | | Execute Package,Field_Execute,Field_Number 0x1b 08c2 0092 09ca | | Action Push_String_Extended,0x9ca ; "Send_Password" ; Debug Table 0x36.0x7 = 0x8c2,0x6 08c4 4802 |H | Short_Literal 0x2 08c5 e5f2 | | Load 0x2,-0xe 08c6 e5f1 | | Load 0x2,-0xf 08c7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08c8 821d | | Call 0x1,0x1d 08c9 e5f1 | | Load 0x2,-0xf ; Debug Table 0x36.0x8 = 0x8c9,0x7 08ca 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08cb 823b | ; | Call 0x1,0x3b 08cc 0b01 | | Execute_Immediate Case_Compare,0x1 08cd 7009 |p | Jump_Nonzero 0x8d7 08ce 0b03 | | Execute_Immediate Case_Compare,0x3 08cf 700e |p | Jump_Nonzero 0x8de 08d0 e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0x9 = 0x8d0,0xe 08d1 4807 |H | Short_Literal 0x7 08d2 0092 09cb | | Action Push_String_Extended,0x9cb ; "Login failed on password." 08d4 e006 | | Load 0x0,0x6 08d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08d6 782b |x+ | Jump 0x902 08d7 e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0xa = 0x8d7,0x8 08d8 4803 |H | Short_Literal 0x3 08d9 0092 09c9 | | Action Push_String_Extended,0x9c9 ; "Login succeeded." 08db e006 | | Load 0x0,0x6 08dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08dd 7824 |x$ | Jump 0x902 08de e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0xb = 0x8de,0x9 08df e5fa | | Load 0x2,-0x6 08e0 e5fb | | Load 0x2,-0x5 08e1 e602 | | Load 0x3,0x2 08e2 e5ff | | Load 0x2,-0x1 08e3 823f | ? | Call 0x1,0x3f 08e4 e5f1 | | Load 0x2,-0xf 08e5 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08e6 e002 | | Load 0x0,0x2 08e7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 08e8 0092 09cc | | Action Push_String_Extended,0x9cc ; "Send_Account" ; Debug Table 0x36.0xc = 0x8e8,0xa 08ea 4802 |H | Short_Literal 0x2 08eb e5f2 | | Load 0x2,-0xe 08ec e5f1 | | Load 0x2,-0xf 08ed 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08ee 821d | | Call 0x1,0x1d 08ef e5f1 | | Load 0x2,-0xf ; Debug Table 0x36.0xd = 0x8ef,0xb 08f0 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08f1 823b | ; | Call 0x1,0x3b 08f2 0b01 | | Execute_Immediate Case_Compare,0x1 08f3 7007 |p | Jump_Nonzero 0x8fb 08f4 e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0xe = 0x8f4,0xd 08f5 4807 |H | Short_Literal 0x7 08f6 0092 09cd | | Action Push_String_Extended,0x9cd ; "Login failed on account." 08f8 e006 | | Load 0x0,0x6 08f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08fa 7806 |x | Jump 0x901 08fb e5f2 | | Load 0x2,-0xe ; Debug Table 0x36.0xf = 0x8fb,0xc 08fc 4803 |H | Short_Literal 0x3 08fd 0092 09c9 | | Action Push_String_Extended,0x9c9 ; "Login succeeded." 08ff e006 | | Load 0x0,0x6 0900 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0901 00d1 | | Pop_Control Pop_Count_1 0902 00d1 | | Pop_Control Pop_Count_1 0903 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0904 0000 0000 | | .BLANK 0000[0x4] 0908 ; -------------------------------------------------------------------------------------- 0908 ; SUBPROGRAM 0908 ; -------------------------------------------------------------------------------------- 0908 0915 | | .CONST 0x0915 ; Address of begin 0909 0945 | E | .CONST 0x0945 ; Address of exception handler 090a 0005 | | .CONST 0x0005 ; Number of locals 090b INIT_0908: 090b e012 | | Load 0x0,0x12 ; Debug Table 0x37 = .DEBUG 0x090b,0x123c,0x0002,0x0000,0x0037,0x0244,0x0000,0x0035 ; Debug Table 0x37.0x0 = 0x90b,0xffff 090c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 090d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 090e 00e8 | | Load_Encached Character_Cache ; Debug Table 0x37.0x1 = 0x90e,0xfffe 090f 4801 |H | Short_Literal 0x1 ; Debug Table 0x37.0x2 = 0x90f,0xfffd 0910 4900 |I | Short_Literal 0x100 0911 00e9 | | Load_Encached String_Cache 0912 0334 | 4 | Declare_Variable Array,With_Constraint 0913 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x37.0x3 = 0x913,0xfffc 0914 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0915 BODY_0908: 0915 00cf | | Action Mark_Auxiliary 0916 0007 | | Action Break_Optional ; Debug Table 0x37.0x4 = 0x916,0x1 0917 e012 | | Load 0x0,0x12 ; Debug Table 0x37.0x5 = 0x917,0x2 0918 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0919 1b11 | | Execute Package,Field_Read,Field_Number 0x11 091a e7ff | | Load 0x3,-0x1 091b e012 | | Load 0x0,0x12 091c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 091d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 091e c602 | | Store 0x3,0x2 091f e602 | | Load 0x3,0x2 ; Debug Table 0x37.0x6 = 0x91f,0x3 0920 e012 | | Load 0x0,0x12 0921 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0922 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0923 025b | [ | Execute Discrete,Check_In_Type 0924 e012 | | Load 0x0,0x12 0925 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0926 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0927 a603 | | Store_Unchecked 0x3,0x3 0928 00db | | Load_Top At_Offset_3 ; Debug Table 0x37.0x7 = 0x928,0x4 0929 4800 |H | Short_Literal 0x0 092a 481f |H | Short_Literal 0x1f 092b 0262 | b | Execute Discrete,In_Range 092c 7012 |p | Jump_Nonzero 0x93f 092d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x37.0x8 = 0x92d,0x5 092e 0a01 | | Execute_Immediate Plus,0x1 092f 005a | Z | Store_Top Discrete,At_Offset_2 0930 00db | | Load_Top At_Offset_3 ; Debug Table 0x37.0x9 = 0x930,0x6 0931 00da | | Load_Top At_Offset_2 0932 e604 | | Load 0x3,0x4 0933 01d6 | | Execute Vector,Field_Write 0934 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x37.0xa = 0x934,0x7 0935 4900 |I | Short_Literal 0x100 0936 027f | | Execute Discrete,Equal 0937 6805 |h | Jump_Zero 0x93d 0938 00da | | Load_Top At_Offset_2 ; Debug Table 0x37.0xb = 0x938,0x8 0939 e7ff | | Load 0x3,-0x1 093a 8402 | | Call 0x2,0x2 093b 01cc | | Execute Vector,Catenate 093c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 093d 00c9 | | Action Pop_Auxiliary_Loop 093e 7fd8 | | Jump 0x917 093f 00ce | | Action Pop_Auxiliary 0940 4801 |H | Short_Literal 0x1 ; Debug Table 0x37.0xc = 0x940,0x9 0941 00d9 | | Load_Top At_Offset_1 0942 00db | | Load_Top At_Offset_3 0943 01cf | | Execute Vector,Slice_Read 0944 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0945 TRAP_0908: 0945 010e | | Execute Exception,Is_Constraint_Error 0946 6805 |h | Jump_Zero 0x94c 0947 4801 |H | Short_Literal 0x1 ; Debug Table 0x37.0xd = 0x947,0xa 0948 00da | | Load_Top At_Offset_2 0949 e604 | | Load 0x3,0x4 094a 01cf | | Execute Vector,Slice_Read 094b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 094c 0100 | | Execute Exception,Raise 094d 0000 0000 | | .XXX[0x3] 094f 0000 | | 0950 ; -------------------------------------------------------------------------------------- 0950 ; SUBPROGRAM 0950 ; -------------------------------------------------------------------------------------- 0950 0955 | U | .CONST 0x0955 ; Address of begin 0951 0004 | | .CONST 0x0004 ; Address of exception handler 0952 0002 | | .CONST 0x0002 ; Number of locals 0953 INIT_0950: 0953 e404 | | Load 0x2,0x4 ; Debug Table 0x38 = .DEBUG 0x0953,0x125a,0x0004,0x0000,0x0037,0x0244,0x0000,0x0105 ; Debug Table 0x38.0x0 = 0x953,0xffff 0954 8402 | | Call 0x2,0x2 0955 BODY_0950: 0955 e404 | | Load 0x2,0x4 ; Debug Table 0x38.0x1 = 0x955,0x1 0956 4800 |H | Short_Literal 0x0 0957 e012 | | Load 0x0,0x12 0958 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0959 180f | | Execute Package,Field_Execute,Field_Number 0xf 095a c404 | | Store 0x2,0x4 095b e403 | | Load 0x2,0x3 ; Debug Table 0x38.0x2 = 0x95b,0x2 095c 8405 | | Call 0x2,0x5 095d c403 | | Store 0x2,0x3 095e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x38.0x3 = 0x95e,0x3 095f 00cb | | Action Pop_Block_With_Result 0960 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0961 0000 0000 | | .BLANK 0000[0x7] 0968 ; -------------------------------------------------------------------------------------- 0968 ; SUBPROGRAM 0968 ; -------------------------------------------------------------------------------------- 0968 096b | k | .CONST 0x096b ; Address of begin 0969 0983 | | .CONST 0x0983 ; Address of exception handler 096a 0001 | | .CONST 0x0001 ; Number of locals 096b BODY_0968: 096b INIT_0968: 096b 4800 |H | Short_Literal 0x0 ; Debug Table 0x39 = .DEBUG 0x096b,0x1264,0x0004,0x0000,0x0037,0x0244,0x0000,0x0f1e ; Debug Table 0x39.0x0 = 0x96b,0x1 096c e5ff | | Load 0x2,-0x1 096d e002 | | Load 0x0,0x2 096e 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 096f e5fd | | Load 0x2,-0x3 ; Debug Table 0x39.0x1 = 0x96f,0x2 0970 e5fe | | Load 0x2,-0x2 0971 e5ff | | Load 0x2,-0x1 0972 e002 | | Load 0x0,0x2 0973 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0974 0092 09ce | | Action Push_String_Extended,0x9ce ; "retrieved" ; Debug Table 0x39.0x2 = 0x974,0x3 0976 0092 09cf | | Action Push_String_Extended,0x9cf ; "Directory listing" 0978 e5fa | | Load 0x2,-0x6 0979 e5ff | | Load 0x2,-0x1 097a 821e | | Call 0x1,0x1e 097b e008 | | Load 0x0,0x8 ; Debug Table 0x39.0x3 = 0x97b,0x4 097c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 097d e5ff | | Load 0x2,-0x1 097e e002 | | Load 0x0,0x2 097f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0980 c406 | | Store 0x2,0x6 0981 8409 | | Call 0x2,0x9 ; Debug Table 0x39.0x4 = 0x981,0x5 0982 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0983 TRAP_0968: 0983 0007 | | Action Break_Optional 0984 8409 | | Call 0x2,0x9 ; Debug Table 0x39.0x5 = 0x984,0x6 0985 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x39.0x6 = 0x985,0x7 0986 0101 | | Execute Exception,Reraise 0987 ; -------------------------------------------------------------------------------------- 0987 ; STRING TABLE 0987 ; -------------------------------------------------------------------------------------- 0987 0094 | | .STRTAB 0x0094->0x09d1 ; "Ftp command" 0988 009d | | .STRTAB 0x009d->0x09d6 ; "The machine name \x22" 0989 00ad | | .STRTAB 0x00ad->0x09df ; "\x22 is undefined (Transport_Name.Undefined)." 098a 00d5 | | .STRTAB 0x00d5->0x09f4 ; "FTP_STATE_MAP.NO_LOCAL_RESOURCES: Unable to obtain the resources needed to establish an Ftp connection. A likely reason is that all transport connections are in use." 098b 0179 | y | .STRTAB 0x0179->0x0a47 ; " was raised in Ftp_Guts.Get_State." 098c 0199 | | .STRTAB 0x0199->0x0a58 ; "an unknown host" 098d 01a6 | | .STRTAB 0x01a6->0x0a60 ; "not open" 098e 01ac | | .STRTAB 0x01ac->0x0a64 ; "open but not connected" 098f 01c0 | | .STRTAB 0x01c0->0x0a6f ; "connected, logged in, and transferring data with " 0990 01ef | | .STRTAB 0x01ef->0x0a87 ; "connected and logged in to " 0991 0208 | | .STRTAB 0x0208->0x0a95 ; "connected to " 0992 0213 | | .STRTAB 0x0213->0x0a9b ; " but not logged in" 0993 0223 | # | .STRTAB 0x0223->0x0aa4 ; "Command failed: your FTP connection is not logged in." 0994 0256 | V | .STRTAB 0x0256->0x0abf ; "Sending data port information to remote server" 0995 0282 | | .STRTAB 0x0282->0x0ad6 ; "Ftp.Send_Data_Port" 0996 0292 | | .STRTAB 0x0292->0x0adf ; " completed successfully (" 0997 02a9 | | .STRTAB 0x02a9->0x0aeb ; ")." 0998 02a9 | | .STRTAB 0x02a9->0x0aec ; " failed with status = " 0999 02bd | | .STRTAB 0x02bd->0x0af7 ; "File transfer" 099a 02c8 | | .STRTAB 0x02c8->0x0afe ; " was " 099b 02cb | | .STRTAB 0x02cb->0x0b00 ; " bytes " 099c 02d0 | | .STRTAB 0x02d0->0x0b04 ; " in " 099d 02d2 | | .STRTAB 0x02d2->0x0b06 ; "File transfer failed with status = " 099e 02f3 | | .STRTAB 0x02f3->0x0b17 ; " was not " 099f 02fa | | .STRTAB 0x02fa->0x0b1c ; "not " 09a0 02fc | | .STRTAB 0x02fc->0x0b1e ; "Delete remote file \x22" 09a1 030e | | .STRTAB 0x030e->0x0b28 ; "\x22" 09a2 030d | | .STRTAB 0x030d->0x0b28 ; "Ftp.Delete" 09a3 0315 | | .STRTAB 0x0315->0x0b2d ; "Command failed: your FTP connection is already " 09a4 0342 | B | .STRTAB 0x0342->0x0b45 ; "Ftp.Connect (\x22" 09a5 034e | N | .STRTAB 0x034e->0x0b4c ; "\x22)" 09a6 034e | N | .STRTAB 0x034e->0x0b4d ; "The FTP product is not installed on this machine." 09a7 037d | } | .STRTAB 0x037d->0x0b65 ; "File_Transfer.Open returned status " 09a8 039e | | .STRTAB 0x039e->0x0b77 ; ": will try again in 10 sec." 09a9 03b7 | | .STRTAB 0x03b7->0x0b84 ; " failed." 09aa 03bd | | .STRTAB 0x03bd->0x0b88 ; " was raised in " 09ab 03ca | | .STRTAB 0x03ca->0x0b90 ; "Starting Login" 09ac 03d6 | | .STRTAB 0x03d6->0x0b97 ; "login failed." 09ad 03e1 | | .STRTAB 0x03e1->0x0b9d ; "Disconnecting Ftp connection" 09ae 03fb | | .STRTAB 0x03fb->0x0bab ; "Ftp.Disconnect" 09af 0407 | | .STRTAB 0x0407->0x0bb2 ; "Abandoning Ftp Connection" 09b0 041e | | .STRTAB 0x041e->0x0bbf ; "Send_Port => " 09b1 0429 | ) | .STRTAB 0x0429->0x0bc5 ; "Remote_Type => \x22" 09b2 0437 | 7 | .STRTAB 0x0437->0x0bcd ; "Remote Machine_Type \x22" 09b3 044a | J | .STRTAB 0x044a->0x0bd8 ; "\x22 is not supported." 09b4 045b | [ | .STRTAB 0x045b->0x0be1 ; "Remote_Roof => \x22" 09b5 0469 | i | .STRTAB 0x0469->0x0be9 ; "Transfer_Type => " 09b6 0478 | x | .STRTAB 0x0478->0x0bf2 ; "Ftp.Use_Type" 09b7 0482 | | .STRTAB 0x0482->0x0bf8 ; "Transfer_Mode => " 09b8 0491 | | .STRTAB 0x0491->0x0c00 ; "Ftp.Use_Mode" 09b9 049b | | .STRTAB 0x049b->0x0c06 ; "Transfer_Structure => " 09ba 04af | | .STRTAB 0x04af->0x0c11 ; "Ftp.Use_Structure" 09bb 04be | | .STRTAB 0x04be->0x0c1a ; "Ftp.Change_Working_Directory (\x22" 09bc 04db | | .STRTAB 0x04db->0x0c29 ; "Account => \x22" 09bd 04e5 | | .STRTAB 0x04e5->0x0c2f ; "Ftp.Use_Account" 09be 04f2 | | .STRTAB 0x04f2->0x0c37 ; "Command failed: your FTP connection is not connected." 09bf 0525 | % | .STRTAB 0x0525->0x0c51 ; "FTP password" 09c0 052f | / | .STRTAB 0x052f->0x0c57 ; "please enter FTP password for machine " 09c1 0553 | S | .STRTAB 0x0553->0x0c6a ; ", username " 09c2 055c | \ | .STRTAB 0x055c->0x0c70 ; ": " 09c3 055c | \ | .STRTAB 0x055c->0x0c71 ; "FTP account" 09c4 0565 | e | .STRTAB 0x0565->0x0c76 ; "please enter FTP account for machine " 09c5 0588 | | .STRTAB 0x0588->0x0c89 ; " file was " 09c6 0590 | | .STRTAB 0x0590->0x0c8e ; " files were " 09c7 059a | | .STRTAB 0x059a->0x0c94 ; "Send_Username" 09c8 05a5 | | .STRTAB 0x05a5->0x0c9a ; "Login failed on username." 09c9 05bc | | .STRTAB 0x05bc->0x0ca7 ; "Login succeeded." 09ca 05ca | | .STRTAB 0x05ca->0x0caf ; "Send_Password" 09cb 05d5 | | .STRTAB 0x05d5->0x0cb5 ; "Login failed on password." 09cc 05ec | | .STRTAB 0x05ec->0x0cc2 ; "Send_Account" 09cd 05f6 | | .STRTAB 0x05f6->0x0cc8 ; "Login failed on account." 09ce 060c | | .STRTAB 0x060c->0x0cd4 ; "retrieved" 09cf 0613 | | .STRTAB 0x0613->0x0cd8 ; "Directory listing" 09d0 0622 | " | .STREND 0x0622->0x0ce1 09d1 4674 7020 |Ftp | .STRTAB_STRINGS 0ce1 0000 0000 | | .BLANK 0000[0x7] 0ce8 ; -------------------------------------------------------------------------------------- 0ce8 ; Debug Table 0ce8 ; -------------------------------------------------------------------------------------- 0ce8 0003 003a | :| .CONST 0x0003,0x003a 0cea 000b 0eba | | .DEBUG 0x000b,0x0eba,0x8000,0x0000,0x0037,0x0234,0x0000,0x000f 0cf2 005b 0f08 | [ | .DEBUG 0x005b,0x0f08,0x8000,0x0000,0x0037,0x0244,0x0000,0x001b 0cfa 00cb 0f6e | n| .DEBUG 0x00cb,0x0f6e,0x0002,0x0000,0x0037,0x0234,0x0000,0x0013 0d02 00f3 0f78 | x| .DEBUG 0x00f3,0x0f78,0x0002,0x0000,0x0037,0x0234,0x0000,0x0020 0d0a 011b 0f80 | | .DEBUG 0x011b,0x0f80,0x0002,0x0000,0x0037,0x0234,0x0000,0x002d 0d12 0143 0f86 | C | .DEBUG 0x0143,0x0f86,0x0002,0x0000,0x0037,0x0234,0x0000,0x003a 0d1a 0173 0f92 | s | .DEBUG 0x0173,0x0f92,0x0002,0x0000,0x0037,0x0234,0x0000,0x0053 0d22 01b3 0fa6 | | .DEBUG 0x01b3,0x0fa6,0x0002,0x0000,0x0037,0x0234,0x0000,0x0068 0d2a 01c3 0fac | | .DEBUG 0x01c3,0x0fac,0x0002,0x0000,0x0037,0x0234,0x0000,0x0082 0d32 01f3 0fc0 | | .DEBUG 0x01f3,0x0fc0,0x0002,0x0000,0x0037,0x0234,0x0000,0x008d 0d3a 020b 0fd0 | | .DEBUG 0x020b,0x0fd0,0x0001,0x0000,0x0037,0x0234,0x0000,0x009e 0d42 021b 0fd4 | | .DEBUG 0x021b,0x0fd4,0x0001,0x0000,0x0037,0x0234,0x0000,0x00ac 0d4a 023b 0fe0 | ; | .DEBUG 0x023b,0x0fe0,0x0002,0x0000,0x0037,0x0234,0x0000,0x00ba 0d52 0243 0fe4 | C | .DEBUG 0x0243,0x0fe4,0x0002,0x0000,0x0037,0x0234,0x0000,0x00c5 0d5a 024b 0fe8 | K | .DEBUG 0x024b,0x0fe8,0x0001,0x0000,0x0037,0x0234,0x0000,0x00d6 0d62 02ab 1006 | | .DEBUG 0x02ab,0x1006,0x0001,0x0000,0x0037,0x0234,0x0000,0x00f4 0d6a 02fb 101c | | .DEBUG 0x02fb,0x101c,0x0002,0x0000,0x0037,0x0234,0x0000,0x010c 0d72 0303 1020 | | .DEBUG 0x0303,0x1020,0x0001,0x0000,0x0037,0x0234,0x0000,0x0117 0d7a 0323 102c | # ,| .DEBUG 0x0323,0x102c,0x0001,0x0000,0x0037,0x0234,0x0000,0x012b 0d82 033b 1034 | ; 4| .DEBUG 0x033b,0x1034,0x0001,0x0000,0x0037,0x0234,0x0000,0x013f 0d8a 038b 1056 | V| .DEBUG 0x038b,0x1056,0x0001,0x0000,0x0037,0x0234,0x0000,0x016b 0d92 03e3 1074 | t| .DEBUG 0x03e3,0x1074,0x0001,0x0000,0x0037,0x0234,0x0000,0x01b3 0d9a 03fb 107c | || .DEBUG 0x03fb,0x107c,0x0001,0x0000,0x0037,0x0234,0x0000,0x01c4 0da2 04eb 10ce | | .DEBUG 0x04eb,0x10ce,0x0001,0x0000,0x0037,0x0234,0x0000,0x0212 0daa 0513 10dc | | .DEBUG 0x0513,0x10dc,0x0001,0x0000,0x0037,0x0234,0x0000,0x025c 0db2 052b 10e8 | + | .DEBUG 0x052b,0x10e8,0x0001,0x0000,0x0037,0x0234,0x0000,0x026c 0dba 053b 10ee | ; | .DEBUG 0x053b,0x10ee,0x0001,0x0000,0x0037,0x0234,0x0000,0x027c 0dc2 0553 10f4 | S | .DEBUG 0x0553,0x10f4,0x0001,0x0000,0x0037,0x0234,0x0000,0x028e 0dca 057b 10fe | { | .DEBUG 0x057b,0x10fe,0x0001,0x0000,0x0037,0x0234,0x0000,0x02a2 0dd2 0593 1104 | | .DEBUG 0x0593,0x1104,0x0001,0x0000,0x0037,0x0234,0x0000,0x02b4 0dda 05b3 110e | | .DEBUG 0x05b3,0x110e,0x0001,0x0000,0x0037,0x0234,0x0000,0x02d2 0de2 05d3 1118 | | .DEBUG 0x05d3,0x1118,0x0001,0x0000,0x0037,0x0234,0x0000,0x02f0 0dea 05f3 1122 | "| .DEBUG 0x05f3,0x1122,0x0001,0x0000,0x0037,0x0234,0x0000,0x030e 0df2 0613 112e | .| .DEBUG 0x0613,0x112e,0x0001,0x0000,0x0037,0x0234,0x0000,0x032a 0dfa 0633 1138 | 3 8| .DEBUG 0x0633,0x1138,0x0001,0x0000,0x0037,0x0234,0x0000,0x0342 0e02 0643 1140 | C @| .DEBUG 0x0643,0x1140,0x0002,0x0000,0x0037,0x0244,0x0000,0x0022 0e0a 0683 1156 | V| .DEBUG 0x0683,0x1156,0x0001,0x0000,0x0037,0x0244,0x0000,0x010a 0e12 0693 115c | \| .DEBUG 0x0693,0x115c,0x0001,0x0000,0x0037,0x0244,0x0000,0x0123 0e1a 06a3 1162 | b| .DEBUG 0x06a3,0x1162,0x0002,0x0000,0x0037,0x0244,0x0000,0x0251 0e22 06bb 1166 | f| .DEBUG 0x06bb,0x1166,0x0002,0x0000,0x0037,0x0244,0x0000,0x03fd 0e2a 06cb 1172 | r| .DEBUG 0x06cb,0x1172,0x0002,0x0000,0x0037,0x0244,0x0000,0x042b 0e32 06e3 117e | ~| .DEBUG 0x06e3,0x117e,0x0002,0x0000,0x0037,0x0244,0x0000,0x04a0 0e3a 06f3 1182 | | .DEBUG 0x06f3,0x1182,0x0002,0x0000,0x0037,0x0244,0x0000,0x04f2 0e42 0703 118a | | .DEBUG 0x0703,0x118a,0x0001,0x0000,0x0037,0x0244,0x0000,0x0513 0e4a 0753 11a2 | S | .DEBUG 0x0753,0x11a2,0x0002,0x0000,0x0037,0x0244,0x0000,0x05dd 0e52 0763 11aa | c | .DEBUG 0x0763,0x11aa,0x0002,0x0000,0x0037,0x0244,0x0000,0x0608 0e5a 0783 11b6 | | .DEBUG 0x0783,0x11b6,0x0002,0x0000,0x0037,0x0244,0x0000,0x0659 0e62 07a3 11c2 | | .DEBUG 0x07a3,0x11c2,0x0002,0x0000,0x0037,0x0244,0x0000,0x06aa 0e6a 07c3 11ce | | .DEBUG 0x07c3,0x11ce,0x0002,0x0000,0x0037,0x0244,0x0000,0x0bf0 0e72 07d3 11d6 | | .DEBUG 0x07d3,0x11d6,0x0002,0x0000,0x0037,0x0244,0x0000,0x1012 0e7a 07eb 11de | | .DEBUG 0x07eb,0x11de,0x0001,0x0000,0x0037,0x0244,0x0000,0x0e8f 0e82 07fb 11e4 | | .DEBUG 0x07fb,0x11e4,0x0001,0x0000,0x0037,0x0244,0x0000,0x0eb1 0e8a 080b 11ec | | .DEBUG 0x080b,0x11ec,0x0004,0x0000,0x0037,0x0244,0x0000,0x0fb3 0e92 0873 1212 | s | .DEBUG 0x0873,0x1212,0x0004,0x0000,0x0037,0x0244,0x0000,0x0b97 0e9a 0893 121a | | .DEBUG 0x0893,0x121a,0x0004,0x0000,0x0037,0x0244,0x0000,0x0823 0ea2 090b 123c | <| .DEBUG 0x090b,0x123c,0x0002,0x0000,0x0037,0x0244,0x0000,0x0035 0eaa 0953 125a | S Z| .DEBUG 0x0953,0x125a,0x0004,0x0000,0x0037,0x0244,0x0000,0x0105 0eb2 096b 1264 | k d| .DEBUG 0x096b,0x1264,0x0004,0x0000,0x0037,0x0244,0x0000,0x0f1e 0eba ; -------------------------------------------------------------------------------------- 0eba ; Debug3 Subtable 0x0 0eba ; -------------------------------------------------------------------------------------- 0eba 0026 0000 | & | .DBG3TAB 0x0026,0x0000 0ebc 000b ffff | | .CONST 0x000b,0xffff 0ebe 000c fffe | | .CONST 0x000c,0xfffe 0ec0 000e fffd | | .CONST 0x000e,0xfffd 0ec2 0010 fffc | | .CONST 0x0010,0xfffc 0ec4 0012 fffb | | .CONST 0x0012,0xfffb 0ec6 0014 fffa | | .CONST 0x0014,0xfffa 0ec8 0017 fff9 | | .CONST 0x0017,0xfff9 0eca 001a fff8 | | .CONST 0x001a,0xfff8 0ecc 001c fff7 | | .CONST 0x001c,0xfff7 0ece 001e fff6 | | .CONST 0x001e,0xfff6 0ed0 0021 fff5 | ! | .CONST 0x0021,0xfff5 0ed2 0023 fff4 | # | .CONST 0x0023,0xfff4 0ed4 0025 fff3 | % | .CONST 0x0025,0xfff3 0ed6 0027 fff2 | ' | .CONST 0x0027,0xfff2 0ed8 0029 fff1 | ) | .CONST 0x0029,0xfff1 0eda 002b fff0 | + | .CONST 0x002b,0xfff0 0edc 002d ffef | - | .CONST 0x002d,0xffef 0ede 0030 ffee | 0 | .CONST 0x0030,0xffee 0ee0 0032 ffed | 2 | .CONST 0x0032,0xffed 0ee2 0034 ffec | 4 | .CONST 0x0034,0xffec 0ee4 0036 ffeb | 6 | .CONST 0x0036,0xffeb 0ee6 0038 ffea | 8 | .CONST 0x0038,0xffea 0ee8 003a ffe9 | : | .CONST 0x003a,0xffe9 0eea 003c ffe8 | < | .CONST 0x003c,0xffe8 0eec 003e ffe7 | > | .CONST 0x003e,0xffe7 0eee 0040 ffe6 | @ | .CONST 0x0040,0xffe6 0ef0 0042 ffe5 | B | .CONST 0x0042,0xffe5 0ef2 0044 ffe4 | D | .CONST 0x0044,0xffe4 0ef4 0046 ffe3 | F | .CONST 0x0046,0xffe3 0ef6 0048 ffe2 | H | .CONST 0x0048,0xffe2 0ef8 004a ffe1 | J | .CONST 0x004a,0xffe1 0efa 004c ffe0 | L | .CONST 0x004c,0xffe0 0efc 004e ffdf | N | .CONST 0x004e,0xffdf 0efe 0050 ffde | P | .CONST 0x0050,0xffde 0f00 0052 ffdd | R | .CONST 0x0052,0xffdd 0f02 0054 ffdc | T | .CONST 0x0054,0xffdc 0f04 0056 ffdb | V | .CONST 0x0056,0xffdb 0f06 0058 ffda | X | .CONST 0x0058,0xffda 0f08 ; -------------------------------------------------------------------------------------- 0f08 ; Debug3 Subtable 0x1 0f08 ; -------------------------------------------------------------------------------------- 0f08 0032 0000 | 2 | .DBG3TAB 0x0032,0x0000 0f0a 005b ffff | [ | .CONST 0x005b,0xffff 0f0c 005c fffe | \ | .CONST 0x005c,0xfffe 0f0e 005e fffd | ^ | .CONST 0x005e,0xfffd 0f10 0060 fffc | ` | .CONST 0x0060,0xfffc 0f12 0062 fffb | b | .CONST 0x0062,0xfffb 0f14 0064 fffa | d | .CONST 0x0064,0xfffa 0f16 0066 fff9 | f | .CONST 0x0066,0xfff9 0f18 0068 fff8 | h | .CONST 0x0068,0xfff8 0f1a 006a fff7 | j | .CONST 0x006a,0xfff7 0f1c 006c fff6 | l | .CONST 0x006c,0xfff6 0f1e 006e fff5 | n | .CONST 0x006e,0xfff5 0f20 0070 fff4 | p | .CONST 0x0070,0xfff4 0f22 0072 fff3 | r | .CONST 0x0072,0xfff3 0f24 0074 fff2 | t | .CONST 0x0074,0xfff2 0f26 0077 fff1 | w | .CONST 0x0077,0xfff1 0f28 007a fff0 | z | .CONST 0x007a,0xfff0 0f2a 007c ffef | | | .CONST 0x007c,0xffef 0f2c 007e ffee | ~ | .CONST 0x007e,0xffee 0f2e 0080 ffed | | .CONST 0x0080,0xffed 0f30 0082 ffec | | .CONST 0x0082,0xffec 0f32 0084 ffeb | | .CONST 0x0084,0xffeb 0f34 0086 ffea | | .CONST 0x0086,0xffea 0f36 0088 ffe9 | | .CONST 0x0088,0xffe9 0f38 008a ffe8 | | .CONST 0x008a,0xffe8 0f3a 008c ffe7 | | .CONST 0x008c,0xffe7 0f3c 008e ffe6 | | .CONST 0x008e,0xffe6 0f3e 0090 ffe5 | | .CONST 0x0090,0xffe5 0f40 0092 ffe4 | | .CONST 0x0092,0xffe4 0f42 0094 ffe3 | | .CONST 0x0094,0xffe3 0f44 0096 ffe2 | | .CONST 0x0096,0xffe2 0f46 0098 ffe1 | | .CONST 0x0098,0xffe1 0f48 009a ffe0 | | .CONST 0x009a,0xffe0 0f4a 009c ffdf | | .CONST 0x009c,0xffdf 0f4c 009e ffde | | .CONST 0x009e,0xffde 0f4e 00a0 ffdd | | .CONST 0x00a0,0xffdd 0f50 00a2 ffdc | | .CONST 0x00a2,0xffdc 0f52 00a4 ffdb | | .CONST 0x00a4,0xffdb 0f54 00a6 ffda | | .CONST 0x00a6,0xffda 0f56 00a8 ffd9 | | .CONST 0x00a8,0xffd9 0f58 00aa ffd8 | | .CONST 0x00aa,0xffd8 0f5a 00ac ffd7 | | .CONST 0x00ac,0xffd7 0f5c 00ae ffd6 | | .CONST 0x00ae,0xffd6 0f5e 00b0 ffd5 | | .CONST 0x00b0,0xffd5 0f60 00b2 ffd4 | | .CONST 0x00b2,0xffd4 0f62 00b4 ffd3 | | .CONST 0x00b4,0xffd3 0f64 00b6 ffd2 | | .CONST 0x00b6,0xffd2 0f66 00b8 ffd1 | | .CONST 0x00b8,0xffd1 0f68 00ba ffd0 | | .CONST 0x00ba,0xffd0 0f6a 00bc ffcf | | .CONST 0x00bc,0xffcf 0f6c 00be ffce | | .CONST 0x00be,0xffce 0f6e ; -------------------------------------------------------------------------------------- 0f6e ; Debug3 Subtable 0x2 0f6e ; -------------------------------------------------------------------------------------- 0f6e 0001 0003 | | .DBG3TAB 0x0001,0x0003 0f70 00cb ffff | | .CONST 0x00cb,0xffff 0f72 00d3 0001 | | .CONST 0x00d3,0x0001 0f74 00d7 0002 | | .CONST 0x00d7,0x0002 0f76 00db 0003 | | .CONST 0x00db,0x0003 0f78 ; -------------------------------------------------------------------------------------- 0f78 ; Debug3 Subtable 0x3 0f78 ; -------------------------------------------------------------------------------------- 0f78 0001 0002 | | .DBG3TAB 0x0001,0x0002 0f7a 00f3 ffff | | .CONST 0x00f3,0xffff 0f7c 00fb 0001 | | .CONST 0x00fb,0x0001 0f7e 00ff 0002 | | .CONST 0x00ff,0x0002 0f80 ; -------------------------------------------------------------------------------------- 0f80 ; Debug3 Subtable 0x4 0f80 ; -------------------------------------------------------------------------------------- 0f80 0001 0001 | | .DBG3TAB 0x0001,0x0001 0f82 011b ffff | | .CONST 0x011b,0xffff 0f84 012a 0001 | * | .CONST 0x012a,0x0001 0f86 ; -------------------------------------------------------------------------------------- 0f86 ; Debug3 Subtable 0x5 0f86 ; -------------------------------------------------------------------------------------- 0f86 0001 0004 | | .DBG3TAB 0x0001,0x0004 0f88 0143 ffff | C | .CONST 0x0143,0xffff 0f8a 0149 0001 | I | .CONST 0x0149,0x0001 0f8c 014f 0002 | O | .CONST 0x014f,0x0002 0f8e 0152 0003 | R | .CONST 0x0152,0x0003 0f90 0154 0005 | T | .CONST 0x0154,0x0005 0f92 ; -------------------------------------------------------------------------------------- 0f92 ; Debug3 Subtable 0x6 0f92 ; -------------------------------------------------------------------------------------- 0f92 0000 0009 | | .DBG3TAB 0x0000,0x0009 0f94 0173 0001 | s | .CONST 0x0173,0x0001 0f96 0175 0002 | u | .CONST 0x0175,0x0002 0f98 017e 0003 | ~ | .CONST 0x017e,0x0003 0f9a 0187 0004 | | .CONST 0x0187,0x0004 0f9c 0192 0005 | | .CONST 0x0192,0x0005 0f9e 0198 0006 | | .CONST 0x0198,0x0006 0fa0 019e 0007 | | .CONST 0x019e,0x0007 0fa2 01a0 0008 | | .CONST 0x01a0,0x0008 0fa4 01a9 0009 | | .CONST 0x01a9,0x0009 0fa6 ; -------------------------------------------------------------------------------------- 0fa6 ; Debug3 Subtable 0x7 0fa6 ; -------------------------------------------------------------------------------------- 0fa6 0000 0002 | | .DBG3TAB 0x0000,0x0002 0fa8 01b3 0001 | | .CONST 0x01b3,0x0001 0faa 01bd 0002 | | .CONST 0x01bd,0x0002 0fac ; -------------------------------------------------------------------------------------- 0fac ; Debug3 Subtable 0x8 0fac ; -------------------------------------------------------------------------------------- 0fac 0000 0009 | | .DBG3TAB 0x0000,0x0009 0fae 01c3 0001 | | .CONST 0x01c3,0x0001 0fb0 01c6 0002 | | .CONST 0x01c6,0x0002 0fb2 01c9 0003 | | .CONST 0x01c9,0x0003 0fb4 01cc 0004 | | .CONST 0x01cc,0x0004 0fb6 01cf 0005 | | .CONST 0x01cf,0x0005 0fb8 01d2 0006 | | .CONST 0x01d2,0x0006 0fba 01d6 0007 | | .CONST 0x01d6,0x0007 0fbc 01dc 0008 | | .CONST 0x01dc,0x0008 0fbe 01e2 0009 | | .CONST 0x01e2,0x0009 0fc0 ; -------------------------------------------------------------------------------------- 0fc0 ; Debug3 Subtable 0x9 0fc0 ; -------------------------------------------------------------------------------------- 0fc0 0001 0006 | | .DBG3TAB 0x0001,0x0006 0fc2 01f3 ffff | | .CONST 0x01f3,0xffff 0fc4 01f4 0001 | | .CONST 0x01f4,0x0001 0fc6 01f8 0002 | | .CONST 0x01f8,0x0002 0fc8 01fa 0003 | | .CONST 0x01fa,0x0003 0fca 01fd 0004 | | .CONST 0x01fd,0x0004 0fcc 01ff 0005 | | .CONST 0x01ff,0x0005 0fce 0203 0006 | | .CONST 0x0203,0x0006 0fd0 ; -------------------------------------------------------------------------------------- 0fd0 ; Debug3 Subtable 0xa 0fd0 ; -------------------------------------------------------------------------------------- 0fd0 0000 0001 | | .DBG3TAB 0x0000,0x0001 0fd2 020b 0001 | | .CONST 0x020b,0x0001 0fd4 ; -------------------------------------------------------------------------------------- 0fd4 ; Debug3 Subtable 0xb 0fd4 ; -------------------------------------------------------------------------------------- 0fd4 0001 0004 | | .DBG3TAB 0x0001,0x0004 0fd6 021b ffff | | .CONST 0x021b,0xffff 0fd8 021e 0001 | | .CONST 0x021e,0x0001 0fda 0221 0002 | ! | .CONST 0x0221,0x0002 0fdc 0225 0003 | % | .CONST 0x0225,0x0003 0fde 022c 0004 | , | .CONST 0x022c,0x0004 0fe0 ; -------------------------------------------------------------------------------------- 0fe0 ; Debug3 Subtable 0xc 0fe0 ; -------------------------------------------------------------------------------------- 0fe0 0000 0001 | | .DBG3TAB 0x0000,0x0001 0fe2 023b 0001 | ; | .CONST 0x023b,0x0001 0fe4 ; -------------------------------------------------------------------------------------- 0fe4 ; Debug3 Subtable 0xd 0fe4 ; -------------------------------------------------------------------------------------- 0fe4 0000 0001 | | .DBG3TAB 0x0000,0x0001 0fe6 0243 0001 | C | .CONST 0x0243,0x0001 0fe8 ; -------------------------------------------------------------------------------------- 0fe8 ; Debug3 Subtable 0xe 0fe8 ; -------------------------------------------------------------------------------------- 0fe8 0004 000a | | .DBG3TAB 0x0004,0x000a 0fea 024b ffff | K | .CONST 0x024b,0xffff 0fec 024f fffe | O | .CONST 0x024f,0xfffe 0fee 0250 fffd | P | .CONST 0x0250,0xfffd 0ff0 0252 fffc | R | .CONST 0x0252,0xfffc 0ff2 0254 0002 | T | .CONST 0x0254,0x0002 0ff4 025b 0003 | [ | .CONST 0x025b,0x0003 0ff6 0267 0001 | g | .CONST 0x0267,0x0001 0ff8 026c 0004 | l | .CONST 0x026c,0x0004 0ffa 0272 0005 | r | .CONST 0x0272,0x0005 0ffc 0275 0006 | u | .CONST 0x0275,0x0006 0ffe 0287 0007 | | .CONST 0x0287,0x0007 1000 028c 0009 | | .CONST 0x028c,0x0009 1002 0290 000a | | .CONST 0x0290,0x000a 1004 029f 000b | | .CONST 0x029f,0x000b 1006 ; -------------------------------------------------------------------------------------- 1006 ; Debug3 Subtable 0xf 1006 ; -------------------------------------------------------------------------------------- 1006 0002 0008 | | .DBG3TAB 0x0002,0x0008 1008 02ab ffff | | .CONST 0x02ab,0xffff 100a 02ad fffe | | .CONST 0x02ad,0xfffe 100c 02ae 0001 | | .CONST 0x02ae,0x0001 100e 02b5 0002 | | .CONST 0x02b5,0x0002 1010 02b9 0003 | | .CONST 0x02b9,0x0003 1012 02bc 0004 | | .CONST 0x02bc,0x0004 1014 02c6 0005 | | .CONST 0x02c6,0x0005 1016 02de 0006 | | .CONST 0x02de,0x0006 1018 02e1 0007 | | .CONST 0x02e1,0x0007 101a 02ed 0008 | | .CONST 0x02ed,0x0008 101c ; -------------------------------------------------------------------------------------- 101c ; Debug3 Subtable 0x10 101c ; -------------------------------------------------------------------------------------- 101c 0000 0001 | | .DBG3TAB 0x0000,0x0001 101e 02fb 0001 | | .CONST 0x02fb,0x0001 1020 ; -------------------------------------------------------------------------------------- 1020 ; Debug3 Subtable 0x11 1020 ; -------------------------------------------------------------------------------------- 1020 0001 0004 | | .DBG3TAB 0x0001,0x0004 1022 0303 ffff | | .CONST 0x0303,0xffff 1024 0305 0001 | | .CONST 0x0305,0x0001 1026 030d 0002 | | .CONST 0x030d,0x0002 1028 0310 0003 | | .CONST 0x0310,0x0003 102a 031b 0004 | | .CONST 0x031b,0x0004 102c ; -------------------------------------------------------------------------------------- 102c ; Debug3 Subtable 0x12 102c ; -------------------------------------------------------------------------------------- 102c 0000 0003 | | .DBG3TAB 0x0000,0x0003 102e 0323 0001 | # | .CONST 0x0323,0x0001 1030 032c 0002 | , | .CONST 0x032c,0x0002 1032 0330 0003 | 0 | .CONST 0x0330,0x0003 1034 ; -------------------------------------------------------------------------------------- 1034 ; Debug3 Subtable 0x13 1034 ; -------------------------------------------------------------------------------------- 1034 0007 0009 | | .DBG3TAB 0x0007,0x0009 1036 033b ffff | ; | .CONST 0x033b,0xffff 1038 033d fffe | = | .CONST 0x033d,0xfffe 103a 033f fffd | ? | .CONST 0x033f,0xfffd 103c 0343 fffc | C | .CONST 0x0343,0xfffc 103e 0345 fffb | E | .CONST 0x0345,0xfffb 1040 034b fffa | K | .CONST 0x034b,0xfffa 1042 034d fff9 | M | .CONST 0x034d,0xfff9 1044 0351 0001 | Q | .CONST 0x0351,0x0001 1046 0355 0002 | U | .CONST 0x0355,0x0002 1048 0366 0003 | f | .CONST 0x0366,0x0003 104a 0367 0004 | g | .CONST 0x0367,0x0004 104c 036f 0005 | o | .CONST 0x036f,0x0005 104e 0374 0006 | t | .CONST 0x0374,0x0006 1050 0378 0007 | x | .CONST 0x0378,0x0007 1052 037f 0008 | | .CONST 0x037f,0x0008 1054 0384 0009 | | .CONST 0x0384,0x0009 1056 ; -------------------------------------------------------------------------------------- 1056 ; Debug3 Subtable 0x14 1056 ; -------------------------------------------------------------------------------------- 1056 0000 000e | | .DBG3TAB 0x0000,0x000e 1058 038d 0001 | | .CONST 0x038d,0x0001 105a 038f 0002 | | .CONST 0x038f,0x0002 105c 0393 0003 | | .CONST 0x0393,0x0003 105e 039b 0004 | | .CONST 0x039b,0x0004 1060 03a3 0005 | | .CONST 0x03a3,0x0005 1062 03a4 0006 | | .CONST 0x03a4,0x0006 1064 03a8 0007 | | .CONST 0x03a8,0x0007 1066 03b9 0008 | | .CONST 0x03b9,0x0008 1068 03ce 0009 | | .CONST 0x03ce,0x0009 106a 03cf 000a | | .CONST 0x03cf,0x000a 106c 03d4 000b | | .CONST 0x03d4,0x000b 106e 03d6 000c | | .CONST 0x03d6,0x000c 1070 03da 000d | | .CONST 0x03da,0x000d 1072 03dc 000e | | .CONST 0x03dc,0x000e 1074 ; -------------------------------------------------------------------------------------- 1074 ; Debug3 Subtable 0x15 1074 ; -------------------------------------------------------------------------------------- 1074 0000 0003 | | .DBG3TAB 0x0000,0x0003 1076 03e3 0001 | | .CONST 0x03e3,0x0001 1078 03e7 0002 | | .CONST 0x03e7,0x0002 107a 03ee 0003 | | .CONST 0x03ee,0x0003 107c ; -------------------------------------------------------------------------------------- 107c ; Debug3 Subtable 0x16 107c ; -------------------------------------------------------------------------------------- 107c 0003 0025 | %| .DBG3TAB 0x0003,0x0025 107e 03fb ffff | | .CONST 0x03fb,0xffff 1080 0403 fffe | | .CONST 0x0403,0xfffe 1082 0405 fffd | | .CONST 0x0405,0xfffd 1084 0406 0001 | | .CONST 0x0406,0x0001 1086 0409 0002 | | .CONST 0x0409,0x0002 1088 040c 0003 | | .CONST 0x040c,0x0003 108a 0412 0004 | | .CONST 0x0412,0x0004 108c 0415 0005 | | .CONST 0x0415,0x0005 108e 041a 0006 | | .CONST 0x041a,0x0006 1090 041c 0007 | | .CONST 0x041c,0x0007 1092 0421 0008 | ! | .CONST 0x0421,0x0008 1094 0424 0009 | $ | .CONST 0x0424,0x0009 1096 0431 000a | 1 | .CONST 0x0431,0x000a 1098 0435 000b | 5 | .CONST 0x0435,0x000b 109a 0438 000c | 8 | .CONST 0x0438,0x000c 109c 0443 000d | C | .CONST 0x0443,0x000d 109e 044d 000e | M | .CONST 0x044d,0x000e 10a0 0454 000f | T | .CONST 0x0454,0x000f 10a2 0456 0010 | V | .CONST 0x0456,0x0010 10a4 0459 0011 | Y | .CONST 0x0459,0x0011 10a6 045c 0012 | \ | .CONST 0x045c,0x0012 10a8 0465 0013 | e | .CONST 0x0465,0x0013 10aa 046c 0014 | l | .CONST 0x046c,0x0014 10ac 0472 0015 | r | .CONST 0x0472,0x0015 10ae 0475 0016 | u | .CONST 0x0475,0x0016 10b0 047d 0017 | } | .CONST 0x047d,0x0017 10b2 0480 0018 | | .CONST 0x0480,0x0018 10b4 0485 0019 | | .CONST 0x0485,0x0019 10b6 048b 001a | | .CONST 0x048b,0x001a 10b8 04a1 001b | | .CONST 0x04a1,0x001b 10ba 04ac 001c | | .CONST 0x04ac,0x001c 10bc 04b4 001d | | .CONST 0x04b4,0x001d 10be 04b8 001e | | .CONST 0x04b8,0x001e 10c0 04be 001f | | .CONST 0x04be,0x001f 10c2 04c6 0020 | | .CONST 0x04c6,0x0020 10c4 04ca 0021 | !| .CONST 0x04ca,0x0021 10c6 04cd 0022 | "| .CONST 0x04cd,0x0022 10c8 04d8 0023 | #| .CONST 0x04d8,0x0023 10ca 04e0 0024 | $| .CONST 0x04e0,0x0024 10cc 04e4 0025 | %| .CONST 0x04e4,0x0025 10ce ; -------------------------------------------------------------------------------------- 10ce ; Debug3 Subtable 0x17 10ce ; -------------------------------------------------------------------------------------- 10ce 0000 0006 | | .DBG3TAB 0x0000,0x0006 10d0 04ed 0001 | | .CONST 0x04ed,0x0001 10d2 04f1 0002 | | .CONST 0x04f1,0x0002 10d4 04f6 0003 | | .CONST 0x04f6,0x0003 10d6 04f7 0004 | | .CONST 0x04f7,0x0004 10d8 04fb 0005 | | .CONST 0x04fb,0x0005 10da 0509 0006 | | .CONST 0x0509,0x0006 10dc ; -------------------------------------------------------------------------------------- 10dc ; Debug3 Subtable 0x18 10dc ; -------------------------------------------------------------------------------------- 10dc 0000 0005 | | .DBG3TAB 0x0000,0x0005 10de 0513 0001 | | .CONST 0x0513,0x0001 10e0 0517 0002 | | .CONST 0x0517,0x0002 10e2 051b 0003 | | .CONST 0x051b,0x0003 10e4 051e 0004 | | .CONST 0x051e,0x0004 10e6 0524 0005 | $ | .CONST 0x0524,0x0005 10e8 ; -------------------------------------------------------------------------------------- 10e8 ; Debug3 Subtable 0x19 10e8 ; -------------------------------------------------------------------------------------- 10e8 0000 0002 | | .DBG3TAB 0x0000,0x0002 10ea 052b 0001 | + | .CONST 0x052b,0x0001 10ec 052f 0002 | / | .CONST 0x052f,0x0002 10ee ; -------------------------------------------------------------------------------------- 10ee ; Debug3 Subtable 0x1a 10ee ; -------------------------------------------------------------------------------------- 10ee 0000 0002 | | .DBG3TAB 0x0000,0x0002 10f0 053b 0001 | ; | .CONST 0x053b,0x0001 10f2 0546 0002 | F | .CONST 0x0546,0x0002 10f4 ; -------------------------------------------------------------------------------------- 10f4 ; Debug3 Subtable 0x1b 10f4 ; -------------------------------------------------------------------------------------- 10f4 0000 0004 | | .DBG3TAB 0x0000,0x0004 10f6 0553 0001 | S | .CONST 0x0553,0x0001 10f8 0558 0002 | X | .CONST 0x0558,0x0002 10fa 0564 0003 | d | .CONST 0x0564,0x0003 10fc 056f 0004 | o | .CONST 0x056f,0x0004 10fe ; -------------------------------------------------------------------------------------- 10fe ; Debug3 Subtable 0x1c 10fe ; -------------------------------------------------------------------------------------- 10fe 0000 0002 | | .DBG3TAB 0x0000,0x0002 1100 057b 0001 | { | .CONST 0x057b,0x0001 1102 0581 0002 | | .CONST 0x0581,0x0002 1104 ; -------------------------------------------------------------------------------------- 1104 ; Debug3 Subtable 0x1d 1104 ; -------------------------------------------------------------------------------------- 1104 0000 0004 | | .DBG3TAB 0x0000,0x0004 1106 0593 0001 | | .CONST 0x0593,0x0001 1108 059d 0002 | | .CONST 0x059d,0x0002 110a 05a1 0003 | | .CONST 0x05a1,0x0003 110c 05a7 0004 | | .CONST 0x05a7,0x0004 110e ; -------------------------------------------------------------------------------------- 110e ; Debug3 Subtable 0x1e 110e ; -------------------------------------------------------------------------------------- 110e 0000 0004 | | .DBG3TAB 0x0000,0x0004 1110 05b3 0001 | | .CONST 0x05b3,0x0001 1112 05bd 0002 | | .CONST 0x05bd,0x0002 1114 05c1 0003 | | .CONST 0x05c1,0x0003 1116 05c7 0004 | | .CONST 0x05c7,0x0004 1118 ; -------------------------------------------------------------------------------------- 1118 ; Debug3 Subtable 0x1f 1118 ; -------------------------------------------------------------------------------------- 1118 0000 0004 | | .DBG3TAB 0x0000,0x0004 111a 05d3 0001 | | .CONST 0x05d3,0x0001 111c 05dd 0002 | | .CONST 0x05dd,0x0002 111e 05e1 0003 | | .CONST 0x05e1,0x0003 1120 05e7 0004 | | .CONST 0x05e7,0x0004 1122 ; -------------------------------------------------------------------------------------- 1122 ; Debug3 Subtable 0x20 1122 ; -------------------------------------------------------------------------------------- 1122 0001 0004 | | .DBG3TAB 0x0001,0x0004 1124 05f3 ffff | | .CONST 0x05f3,0xffff 1126 05fb 0001 | | .CONST 0x05fb,0x0001 1128 05fe 0002 | | .CONST 0x05fe,0x0002 112a 0602 0003 | | .CONST 0x0602,0x0003 112c 0607 0004 | | .CONST 0x0607,0x0004 112e ; -------------------------------------------------------------------------------------- 112e ; Debug3 Subtable 0x21 112e ; -------------------------------------------------------------------------------------- 112e 0001 0003 | | .DBG3TAB 0x0001,0x0003 1130 0613 ffff | | .CONST 0x0613,0xffff 1132 0619 0001 | | .CONST 0x0619,0x0001 1134 0621 0002 | ! | .CONST 0x0621,0x0002 1136 0625 0003 | % | .CONST 0x0625,0x0003 1138 ; -------------------------------------------------------------------------------------- 1138 ; Debug3 Subtable 0x22 1138 ; -------------------------------------------------------------------------------------- 1138 0000 0003 | | .DBG3TAB 0x0000,0x0003 113a 0633 0001 | 3 | .CONST 0x0633,0x0001 113c 0638 0003 | 8 | .CONST 0x0638,0x0003 113e 0639 0002 | 9 | .CONST 0x0639,0x0002 1140 ; -------------------------------------------------------------------------------------- 1140 ; Debug3 Subtable 0x23 1140 ; -------------------------------------------------------------------------------------- 1140 0005 0005 | | .DBG3TAB 0x0005,0x0005 1142 0643 ffff | C | .CONST 0x0643,0xffff 1144 0644 fffe | D | .CONST 0x0644,0xfffe 1146 0646 fffd | F | .CONST 0x0646,0xfffd 1148 064b fffc | K | .CONST 0x064b,0xfffc 114a 0651 fffb | Q | .CONST 0x0651,0xfffb 114c 0655 0001 | U | .CONST 0x0655,0x0001 114e 065c 0002 | \ | .CONST 0x065c,0x0002 1150 0663 0003 | c | .CONST 0x0663,0x0003 1152 066d 0004 | m | .CONST 0x066d,0x0004 1154 0672 0005 | r | .CONST 0x0672,0x0005 1156 ; -------------------------------------------------------------------------------------- 1156 ; Debug3 Subtable 0x24 1156 ; -------------------------------------------------------------------------------------- 1156 0000 0002 | | .DBG3TAB 0x0000,0x0002 1158 0683 0001 | | .CONST 0x0683,0x0001 115a 0687 0002 | | .CONST 0x0687,0x0002 115c ; -------------------------------------------------------------------------------------- 115c ; Debug3 Subtable 0x25 115c ; -------------------------------------------------------------------------------------- 115c 0000 0002 | | .DBG3TAB 0x0000,0x0002 115e 0693 0001 | | .CONST 0x0693,0x0001 1160 0698 0002 | | .CONST 0x0698,0x0002 1162 ; -------------------------------------------------------------------------------------- 1162 ; Debug3 Subtable 0x26 1162 ; -------------------------------------------------------------------------------------- 1162 0000 0001 | | .DBG3TAB 0x0000,0x0001 1164 06a3 0001 | | .CONST 0x06a3,0x0001 1166 ; -------------------------------------------------------------------------------------- 1166 ; Debug3 Subtable 0x27 1166 ; -------------------------------------------------------------------------------------- 1166 0001 0004 | | .DBG3TAB 0x0001,0x0004 1168 06bb ffff | | .CONST 0x06bb,0xffff 116a 06bc 0001 | | .CONST 0x06bc,0x0001 116c 06bf 0002 | | .CONST 0x06bf,0x0002 116e 06c1 0003 | | .CONST 0x06c1,0x0003 1170 06c5 0004 | | .CONST 0x06c5,0x0004 1172 ; -------------------------------------------------------------------------------------- 1172 ; Debug3 Subtable 0x28 1172 ; -------------------------------------------------------------------------------------- 1172 0001 0004 | | .DBG3TAB 0x0001,0x0004 1174 06cb ffff | | .CONST 0x06cb,0xffff 1176 06cc 0001 | | .CONST 0x06cc,0x0001 1178 06d0 0002 | | .CONST 0x06d0,0x0002 117a 06d2 0003 | | .CONST 0x06d2,0x0003 117c 06d9 0004 | | .CONST 0x06d9,0x0004 117e ; -------------------------------------------------------------------------------------- 117e ; Debug3 Subtable 0x29 117e ; -------------------------------------------------------------------------------------- 117e 0000 0001 | | .DBG3TAB 0x0000,0x0001 1180 06e3 0001 | | .CONST 0x06e3,0x0001 1182 ; -------------------------------------------------------------------------------------- 1182 ; Debug3 Subtable 0x2a 1182 ; -------------------------------------------------------------------------------------- 1182 0001 0002 | | .DBG3TAB 0x0001,0x0002 1184 06f3 ffff | | .CONST 0x06f3,0xffff 1186 06f5 0001 | | .CONST 0x06f5,0x0001 1188 06fb 0002 | | .CONST 0x06fb,0x0002 118a ; -------------------------------------------------------------------------------------- 118a ; Debug3 Subtable 0x2b 118a ; -------------------------------------------------------------------------------------- 118a 0000 000b | | .DBG3TAB 0x0000,0x000b 118c 0703 0001 | | .CONST 0x0703,0x0001 118e 070a 0002 | | .CONST 0x070a,0x0002 1190 0712 0003 | | .CONST 0x0712,0x0003 1192 0719 0004 | | .CONST 0x0719,0x0004 1194 0721 0005 | ! | .CONST 0x0721,0x0005 1196 0728 0006 | ( | .CONST 0x0728,0x0006 1198 0730 0007 | 0 | .CONST 0x0730,0x0007 119a 0733 0008 | 3 | .CONST 0x0733,0x0008 119c 073b 0009 | ; | .CONST 0x073b,0x0009 119e 0741 000a | A | .CONST 0x0741,0x000a 11a0 0747 000b | G | .CONST 0x0747,0x000b 11a2 ; -------------------------------------------------------------------------------------- 11a2 ; Debug3 Subtable 0x2c 11a2 ; -------------------------------------------------------------------------------------- 11a2 0000 0003 | | .DBG3TAB 0x0000,0x0003 11a4 0753 0001 | S | .CONST 0x0753,0x0001 11a6 0756 0002 | V | .CONST 0x0756,0x0002 11a8 075b 0003 | [ | .CONST 0x075b,0x0003 11aa ; -------------------------------------------------------------------------------------- 11aa ; Debug3 Subtable 0x2d 11aa ; -------------------------------------------------------------------------------------- 11aa 0000 0005 | | .DBG3TAB 0x0000,0x0005 11ac 0763 0001 | c | .CONST 0x0763,0x0001 11ae 0766 0002 | f | .CONST 0x0766,0x0002 11b0 0768 0003 | h | .CONST 0x0768,0x0003 11b2 0778 0004 | x | .CONST 0x0778,0x0004 11b4 077d 0005 | } | .CONST 0x077d,0x0005 11b6 ; -------------------------------------------------------------------------------------- 11b6 ; Debug3 Subtable 0x2e 11b6 ; -------------------------------------------------------------------------------------- 11b6 0000 0005 | | .DBG3TAB 0x0000,0x0005 11b8 0783 0001 | | .CONST 0x0783,0x0001 11ba 0786 0002 | | .CONST 0x0786,0x0002 11bc 0788 0003 | | .CONST 0x0788,0x0003 11be 0798 0004 | | .CONST 0x0798,0x0004 11c0 079d 0005 | | .CONST 0x079d,0x0005 11c2 ; -------------------------------------------------------------------------------------- 11c2 ; Debug3 Subtable 0x2f 11c2 ; -------------------------------------------------------------------------------------- 11c2 0000 0005 | | .DBG3TAB 0x0000,0x0005 11c4 07a3 0001 | | .CONST 0x07a3,0x0001 11c6 07a6 0002 | | .CONST 0x07a6,0x0002 11c8 07a8 0003 | | .CONST 0x07a8,0x0003 11ca 07b3 0004 | | .CONST 0x07b3,0x0004 11cc 07b8 0005 | | .CONST 0x07b8,0x0005 11ce ; -------------------------------------------------------------------------------------- 11ce ; Debug3 Subtable 0x30 11ce ; -------------------------------------------------------------------------------------- 11ce 0000 0003 | | .DBG3TAB 0x0000,0x0003 11d0 07c3 0001 | | .CONST 0x07c3,0x0001 11d2 07ca 0003 | | .CONST 0x07ca,0x0003 11d4 07cc 0002 | | .CONST 0x07cc,0x0002 11d6 ; -------------------------------------------------------------------------------------- 11d6 ; Debug3 Subtable 0x31 11d6 ; -------------------------------------------------------------------------------------- 11d6 0000 0003 | | .DBG3TAB 0x0000,0x0003 11d8 07d3 0001 | | .CONST 0x07d3,0x0001 11da 07d6 0002 | | .CONST 0x07d6,0x0002 11dc 07dd 0003 | | .CONST 0x07dd,0x0003 11de ; -------------------------------------------------------------------------------------- 11de ; Debug3 Subtable 0x32 11de ; -------------------------------------------------------------------------------------- 11de 0000 0002 | | .DBG3TAB 0x0000,0x0002 11e0 07eb 0001 | | .CONST 0x07eb,0x0001 11e2 07ed 0002 | | .CONST 0x07ed,0x0002 11e4 ; -------------------------------------------------------------------------------------- 11e4 ; Debug3 Subtable 0x33 11e4 ; -------------------------------------------------------------------------------------- 11e4 0000 0003 | | .DBG3TAB 0x0000,0x0003 11e6 07fb 0001 | | .CONST 0x07fb,0x0001 11e8 07fd 0002 | | .CONST 0x07fd,0x0002 11ea 0806 0003 | | .CONST 0x0806,0x0003 11ec ; -------------------------------------------------------------------------------------- 11ec ; Debug3 Subtable 0x34 11ec ; -------------------------------------------------------------------------------------- 11ec 0000 0012 | | .DBG3TAB 0x0000,0x0012 11ee 080d 0001 | | .CONST 0x080d,0x0001 11f0 080e 0002 | | .CONST 0x080e,0x0002 11f2 080f 0003 | | .CONST 0x080f,0x0003 11f4 0818 0004 | | .CONST 0x0818,0x0004 11f6 081f 0005 | | .CONST 0x081f,0x0005 11f8 0826 0007 | & | .CONST 0x0826,0x0007 11fa 082e 0008 | . | .CONST 0x082e,0x0008 11fc 0831 0009 | 1 | .CONST 0x0831,0x0009 11fe 0835 000a | 5 | .CONST 0x0835,0x000a 1200 083a 000b | : | .CONST 0x083a,0x000b 1202 0843 000c | C | .CONST 0x0843,0x000c 1204 0849 000d | I | .CONST 0x0849,0x000d 1206 084d 000e | M | .CONST 0x084d,0x000e 1208 0855 0006 | U | .CONST 0x0855,0x0006 120a 085d 000f | ] | .CONST 0x085d,0x000f 120c 0865 0010 | e | .CONST 0x0865,0x0010 120e 086a 0011 | j | .CONST 0x086a,0x0011 1210 086c 0012 | l | .CONST 0x086c,0x0012 1212 ; -------------------------------------------------------------------------------------- 1212 ; Debug3 Subtable 0x35 1212 ; -------------------------------------------------------------------------------------- 1212 0000 0003 | | .DBG3TAB 0x0000,0x0003 1214 0873 0001 | s | .CONST 0x0873,0x0001 1216 0889 0002 | | .CONST 0x0889,0x0002 1218 088d 0003 | | .CONST 0x088d,0x0003 121a ; -------------------------------------------------------------------------------------- 121a ; Debug3 Subtable 0x36 121a ; -------------------------------------------------------------------------------------- 121a 0001 000f | | .DBG3TAB 0x0001,0x000f 121c 0893 ffff | | .CONST 0x0893,0xffff 121e 0897 0001 | | .CONST 0x0897,0x0001 1220 089c 0002 | | .CONST 0x089c,0x0002 1222 08a3 0003 | | .CONST 0x08a3,0x0003 1224 08aa 000f | | .CONST 0x08aa,0x000f 1226 08b1 0004 | | .CONST 0x08b1,0x0004 1228 08b8 0005 | | .CONST 0x08b8,0x0005 122a 08c2 0006 | | .CONST 0x08c2,0x0006 122c 08c9 0007 | | .CONST 0x08c9,0x0007 122e 08d0 000e | | .CONST 0x08d0,0x000e 1230 08d7 0008 | | .CONST 0x08d7,0x0008 1232 08de 0009 | | .CONST 0x08de,0x0009 1234 08e8 000a | | .CONST 0x08e8,0x000a 1236 08ef 000b | | .CONST 0x08ef,0x000b 1238 08f4 000d | | .CONST 0x08f4,0x000d 123a 08fb 000c | | .CONST 0x08fb,0x000c 123c ; -------------------------------------------------------------------------------------- 123c ; Debug3 Subtable 0x37 123c ; -------------------------------------------------------------------------------------- 123c 0004 000a | | .DBG3TAB 0x0004,0x000a 123e 090b ffff | | .CONST 0x090b,0xffff 1240 090e fffe | | .CONST 0x090e,0xfffe 1242 090f fffd | | .CONST 0x090f,0xfffd 1244 0913 fffc | | .CONST 0x0913,0xfffc 1246 0916 0001 | | .CONST 0x0916,0x0001 1248 0917 0002 | | .CONST 0x0917,0x0002 124a 091f 0003 | | .CONST 0x091f,0x0003 124c 0928 0004 | ( | .CONST 0x0928,0x0004 124e 092d 0005 | - | .CONST 0x092d,0x0005 1250 0930 0006 | 0 | .CONST 0x0930,0x0006 1252 0934 0007 | 4 | .CONST 0x0934,0x0007 1254 0938 0008 | 8 | .CONST 0x0938,0x0008 1256 0940 0009 | @ | .CONST 0x0940,0x0009 1258 0947 000a | G | .CONST 0x0947,0x000a 125a ; -------------------------------------------------------------------------------------- 125a ; Debug3 Subtable 0x38 125a ; -------------------------------------------------------------------------------------- 125a 0001 0003 | | .DBG3TAB 0x0001,0x0003 125c 0953 ffff | S | .CONST 0x0953,0xffff 125e 0955 0001 | U | .CONST 0x0955,0x0001 1260 095b 0002 | [ | .CONST 0x095b,0x0002 1262 095e 0003 | ^ | .CONST 0x095e,0x0003 1264 ; -------------------------------------------------------------------------------------- 1264 ; Debug3 Subtable 0x39 1264 ; -------------------------------------------------------------------------------------- 1264 0000 0007 | | .DBG3TAB 0x0000,0x0007 1266 096b 0001 | k | .CONST 0x096b,0x0001 1268 096f 0002 | o | .CONST 0x096f,0x0002 126a 0974 0003 | t | .CONST 0x0974,0x0003 126c 097b 0004 | { | .CONST 0x097b,0x0004 126e 0981 0005 | | .CONST 0x0981,0x0005 1270 0984 0006 | | .CONST 0x0984,0x0006 1272 0985 0007 | | .CONST 0x0985,0x0007 1274 0000 0000 | | .BLANK 0000[0x18c]