|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0388 | | .CONST 0x0388 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0142 | B | .CONST 0x0142 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0036 | 6 | .CONST 0x0036 ; Number of locals
000b INIT_0008:
000b 4801 |H | Short_Literal 0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x0412,0x8000,0x0000,0x004c,0x5986,0x0000,0x0007
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 4802 |H | Short_Literal 0x2
000d e001 | | Load 0x0,0x1
000e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
000f 0333 | 3 | Declare_Variable Array,Visible,With_Constraint
0010 4801 |H | Short_Literal 0x1
0011 4802 |H | Short_Literal 0x2
0012 e001 | | Load 0x0,0x1
0013 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0014 035b | [ | Declare_Type Array,Constrained
0015 0337 | 7 | Declare_Variable Array
0016 4800 |H | Short_Literal 0x0
0017 4801 |H | Short_Literal 0x1
0018 00da | | Load_Top At_Offset_2
0019 01d6 | | Execute Vector,Field_Write
001a 4819 |H | Short_Literal 0x19
001b 4802 |H | Short_Literal 0x2
001c 00da | | Load_Top At_Offset_2
001d 01d6 | | Execute Vector,Field_Write
001e 00d9 | | Load_Top At_Offset_1
001f 01d4 | | Execute Vector,Structure_Write
0020 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1 = 0x20,0xfffe
0021 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0022 0129 | ) | Execute Any,Make_Visible
0023 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0x23,0xfffd
0024 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148 ; Debug Table 0x0.0x3 = 0x24,0xfffc
0026 0007 | | Action Break_Optional ; Debug Table 0x0.0x4 = 0x26,0xfffb
0027 0007 | | Action Break_Optional ; Debug Table 0x0.0x5 = 0x27,0xfffa
0028 0007 | | Action Break_Optional ; Debug Table 0x0.0x6 = 0x28,0xfff9
0029 0007 | | Action Break_Optional ; Debug Table 0x0.0x7 = 0x29,0xfff8
002a 0007 | | Action Break_Optional ; Debug Table 0x0.0x8 = 0x2a,0xfff7
002b 0007 | | Action Break_Optional ; Debug Table 0x0.0x9 = 0x2b,0xfff6
002c 0007 | | Action Break_Optional ; Debug Table 0x0.0xa = 0x2c,0xfff5
002d 0007 | | Action Break_Optional ; Debug Table 0x0.0xb = 0x2d,0xfff4
002e 0007 | | Action Break_Optional ; Debug Table 0x0.0xc = 0x2e,0xfff3
002f 0007 | | Action Break_Optional ; Debug Table 0x0.0xd = 0x2f,0xfff2
0030 0007 | | Action Break_Optional ; Debug Table 0x0.0xe = 0x30,0xfff1
0031 0007 | | Action Break_Optional ; Debug Table 0x0.0xf = 0x31,0xfff0
0032 0007 | | Action Break_Optional ; Debug Table 0x0.0x10 = 0x32,0xffef
0033 0007 | | Action Break_Optional ; Debug Table 0x0.0x11 = 0x33,0xffee
0034 0007 | | Action Break_Optional ; Debug Table 0x0.0x12 = 0x34,0xffed
0035 0007 | | Action Break_Optional ; Debug Table 0x0.0x13 = 0x35,0xffec
0036 0007 | | Action Break_Optional ; Debug Table 0x0.0x14 = 0x36,0xffeb
0037 0007 | | Action Break_Optional ; Debug Table 0x0.0x15 = 0x37,0xffea
0038 0007 | | Action Break_Optional ; Debug Table 0x0.0x16 = 0x38,0xffe9
0039 0007 | | Action Break_Optional ; Debug Table 0x0.0x17 = 0x39,0xffe8
003a 0007 | | Action Break_Optional ; Debug Table 0x0.0x18 = 0x3a,0xffe7
003b 0007 | | Action Break_Optional ; Debug Table 0x0.0x19 = 0x3b,0xffe6
003c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1a = 0x3c,0xffe5
003d 0007 | | Action Break_Optional ; Debug Table 0x0.0x1b = 0x3d,0xffe4
003e 0007 | | Action Break_Optional ; Debug Table 0x0.0x1c = 0x3e,0xffe3
003f 0007 | | Action Break_Optional ; Debug Table 0x0.0x1d = 0x3f,0xffe2
0040 0007 | | Action Break_Optional ; Debug Table 0x0.0x1e = 0x40,0xffe1
0041 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1f = 0x41,0xffe0
0042 4802 |H | Short_Literal 0x2
0043 029f 016b | k| Declare_Subprogram For_Call,INIT_0168
0045 03fe | | Declare_Type Discrete,Defined,Visible
0046 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x20 = 0x46,0xffdf
0047 481a |H | Short_Literal 0x1a
0048 00da | | Load_Top At_Offset_2
0049 02a0 | | Declare_Subprogram Null_Subprogram
004a 4801 |H | Short_Literal 0x1
004b 035e | ^ | Declare_Type Array,Defined,Visible
004c 00d8 | | Load_Top At_Offset_0
004d 0336 | 6 | Declare_Variable Array,Visible
004e 00d8 | | Load_Top At_Offset_0
004f 0337 | 7 | Declare_Variable Array
0050 4800 |H | Short_Literal 0x0
0051 4800 |H | Short_Literal 0x0
0052 00da | | Load_Top At_Offset_2
0053 01d6 | | Execute Vector,Field_Write
0054 4801 |H | Short_Literal 0x1
0055 4801 |H | Short_Literal 0x1
0056 00da | | Load_Top At_Offset_2
0057 01d6 | | Execute Vector,Field_Write
0058 4801 |H | Short_Literal 0x1
0059 4802 |H | Short_Literal 0x2
005a 00da | | Load_Top At_Offset_2
005b 01d6 | | Execute Vector,Field_Write
005c 4801 |H | Short_Literal 0x1
005d 4803 |H | Short_Literal 0x3
005e 00da | | Load_Top At_Offset_2
005f 01d6 | | Execute Vector,Field_Write
0060 4802 |H | Short_Literal 0x2
0061 4804 |H | Short_Literal 0x4
0062 00da | | Load_Top At_Offset_2
0063 01d6 | | Execute Vector,Field_Write
0064 4801 |H | Short_Literal 0x1
0065 4805 |H | Short_Literal 0x5
0066 00da | | Load_Top At_Offset_2
0067 01d6 | | Execute Vector,Field_Write
0068 4801 |H | Short_Literal 0x1
0069 4806 |H | Short_Literal 0x6
006a 00da | | Load_Top At_Offset_2
006b 01d6 | | Execute Vector,Field_Write
006c 4801 |H | Short_Literal 0x1
006d 4807 |H | Short_Literal 0x7
006e 00da | | Load_Top At_Offset_2
006f 01d6 | | Execute Vector,Field_Write
0070 4802 |H | Short_Literal 0x2
0071 4808 |H | Short_Literal 0x8
0072 00da | | Load_Top At_Offset_2
0073 01d6 | | Execute Vector,Field_Write
0074 4801 |H | Short_Literal 0x1
0075 4809 |H | Short_Literal 0x9
0076 00da | | Load_Top At_Offset_2
0077 01d6 | | Execute Vector,Field_Write
0078 4801 |H | Short_Literal 0x1
0079 480a |H | Short_Literal 0xa
007a 00da | | Load_Top At_Offset_2
007b 01d6 | | Execute Vector,Field_Write
007c 4801 |H | Short_Literal 0x1
007d 480b |H | Short_Literal 0xb
007e 00da | | Load_Top At_Offset_2
007f 01d6 | | Execute Vector,Field_Write
0080 4802 |H | Short_Literal 0x2
0081 480c |H | Short_Literal 0xc
0082 00da | | Load_Top At_Offset_2
0083 01d6 | | Execute Vector,Field_Write
0084 4802 |H | Short_Literal 0x2
0085 480d |H | Short_Literal 0xd
0086 00da | | Load_Top At_Offset_2
0087 01d6 | | Execute Vector,Field_Write
0088 4802 |H | Short_Literal 0x2
0089 480e |H | Short_Literal 0xe
008a 00da | | Load_Top At_Offset_2
008b 01d6 | | Execute Vector,Field_Write
008c 4802 |H | Short_Literal 0x2
008d 480f |H | Short_Literal 0xf
008e 00da | | Load_Top At_Offset_2
008f 01d6 | | Execute Vector,Field_Write
0090 4802 |H | Short_Literal 0x2
0091 4810 |H | Short_Literal 0x10
0092 00da | | Load_Top At_Offset_2
0093 01d6 | | Execute Vector,Field_Write
0094 4802 |H | Short_Literal 0x2
0095 4811 |H | Short_Literal 0x11
0096 00da | | Load_Top At_Offset_2
0097 01d6 | | Execute Vector,Field_Write
0098 4801 |H | Short_Literal 0x1
0099 4812 |H | Short_Literal 0x12
009a 00da | | Load_Top At_Offset_2
009b 01d6 | | Execute Vector,Field_Write
009c 4802 |H | Short_Literal 0x2
009d 4813 |H | Short_Literal 0x13
009e 00da | | Load_Top At_Offset_2
009f 01d6 | | Execute Vector,Field_Write
00a0 4802 |H | Short_Literal 0x2
00a1 4814 |H | Short_Literal 0x14
00a2 00da | | Load_Top At_Offset_2
00a3 01d6 | | Execute Vector,Field_Write
00a4 4802 |H | Short_Literal 0x2
00a5 4815 |H | Short_Literal 0x15
00a6 00da | | Load_Top At_Offset_2
00a7 01d6 | | Execute Vector,Field_Write
00a8 4802 |H | Short_Literal 0x2
00a9 4816 |H | Short_Literal 0x16
00aa 00da | | Load_Top At_Offset_2
00ab 01d6 | | Execute Vector,Field_Write
00ac 4802 |H | Short_Literal 0x2
00ad 4817 |H | Short_Literal 0x17
00ae 00da | | Load_Top At_Offset_2
00af 01d6 | | Execute Vector,Field_Write
00b0 4801 |H | Short_Literal 0x1
00b1 4818 |H | Short_Literal 0x18
00b2 00da | | Load_Top At_Offset_2
00b3 01d6 | | Execute Vector,Field_Write
00b4 4802 |H | Short_Literal 0x2
00b5 4819 |H | Short_Literal 0x19
00b6 00da | | Load_Top At_Offset_2
00b7 01d6 | | Execute Vector,Field_Write
00b8 4802 |H | Short_Literal 0x2
00b9 481a |H | Short_Literal 0x1a
00ba 00da | | Load_Top At_Offset_2
00bb 01d6 | | Execute Vector,Field_Write
00bc 00d9 | | Load_Top At_Offset_1
00bd 01d4 | | Execute Vector,Structure_Write
00be 0007 | | Action Break_Optional ; Debug Table 0x0.0x21 = 0xbe,0xffde
00bf 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x22 = 0xbf,0xffdd
00c0 4802 |H | Short_Literal 0x2
00c1 029f 0183 | | Declare_Subprogram For_Call,INIT_0180
00c3 03fe | | Declare_Type Discrete,Defined,Visible
00c4 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198 ; Debug Table 0x0.0x23 = 0xc4,0xffdc
00c6 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0 ; Debug Table 0x0.0x24 = 0xc6,0xffdb
00c8 029a 01d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d0 ; Debug Table 0x0.0x25 = 0xc8,0xffda
00ca 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0x26 = 0xca,0xffd9
00cb 4803 |H | Short_Literal 0x3
00cc 00e9 | | Load_Encached String_Cache
00cd 035c | \ | Declare_Type Array,Constrained,Visible
00ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x27 = 0xce,0xffd8
00cf 0336 | 6 | Declare_Variable Array,Visible
00d0 51eb |Q | Indirect_Literal Any,0x2bc,{0x32313120, 0x20202020}
00d1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x28 = 0xd1,0xffd7
00d2 0336 | 6 | Declare_Variable Array,Visible
00d3 51ec |Q | Indirect_Literal Any,0x2c0,{0x32313420, 0x20202020}
00d4 00da | | Load_Top At_Offset_2 ; Debug Table 0x0.0x29 = 0xd4,0xffd6
00d5 0336 | 6 | Declare_Variable Array,Visible
00d6 51ed |Q | Indirect_Literal Any,0x2c4,{0x32323020, 0x20202020}
00d7 00db | | Load_Top At_Offset_3 ; Debug Table 0x0.0x2a = 0xd7,0xffd5
00d8 0336 | 6 | Declare_Variable Array,Visible
00d9 51ee |Q | Indirect_Literal Any,0x2c8,{0x32323120, 0x20202020}
00da e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x2b = 0xda,0xffd4
00db 0336 | 6 | Declare_Variable Array,Visible
00dc 51ef |Q | Indirect_Literal Any,0x2cc,{0x32353020, 0x20202020}
00dd e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x2c = 0xdd,0xffd3
00de 0336 | 6 | Declare_Variable Array,Visible
00df 51f0 |Q | Indirect_Literal Any,0x2d0,{0x32353120, 0x20202020}
00e0 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x2d = 0xe0,0xffd2
00e1 0336 | 6 | Declare_Variable Array,Visible
00e2 51f1 |Q | Indirect_Literal Any,0x2d4,{0x33353420, 0x20202020}
00e3 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x2e = 0xe3,0xffd1
00e4 0336 | 6 | Declare_Variable Array,Visible
00e5 51f2 |Q | Indirect_Literal Any,0x2d8,{0x34323120, 0x20202020}
00e6 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x2f = 0xe6,0xffd0
00e7 0336 | 6 | Declare_Variable Array,Visible
00e8 51f3 |Q | Indirect_Literal Any,0x2dc,{0x34353020, 0x20202020}
00e9 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x30 = 0xe9,0xffcf
00ea 0336 | 6 | Declare_Variable Array,Visible
00eb 51f4 |Q | Indirect_Literal Any,0x2e0,{0x34353120, 0x20202020}
00ec e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x31 = 0xec,0xffce
00ed 0336 | 6 | Declare_Variable Array,Visible
00ee 51f5 |Q | Indirect_Literal Any,0x2e4,{0x34353220, 0x20202020}
00ef e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x32 = 0xef,0xffcd
00f0 0336 | 6 | Declare_Variable Array,Visible
00f1 51f6 |Q | Indirect_Literal Any,0x2e8,{0x35303020, 0x20202020}
00f2 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x33 = 0xf2,0xffcc
00f3 0336 | 6 | Declare_Variable Array,Visible
00f4 51f7 |Q | Indirect_Literal Any,0x2ec,{0x35303120, 0x20202020}
00f5 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x34 = 0xf5,0xffcb
00f6 0336 | 6 | Declare_Variable Array,Visible
00f7 51f8 |Q | Indirect_Literal Any,0x2f0,{0x35303220, 0x20202020}
00f8 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x35 = 0xf8,0xffca
00f9 0336 | 6 | Declare_Variable Array,Visible
00fa 51f9 |Q | Indirect_Literal Any,0x2f4,{0x35303320, 0x20202020}
00fb e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x36 = 0xfb,0xffc9
00fc 0336 | 6 | Declare_Variable Array,Visible
00fd 51fa |Q | Indirect_Literal Any,0x2f8,{0x35303420, 0x20202020}
00fe e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x37 = 0xfe,0xffc8
00ff 0336 | 6 | Declare_Variable Array,Visible
0100 51fb |Q | Indirect_Literal Any,0x2fc,{0x35353020, 0x20202020}
0101 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x38 = 0x101,0xffc7
0102 0336 | 6 | Declare_Variable Array,Visible
0103 51fc |Q | Indirect_Literal Any,0x300,{0x35353120, 0x20202020}
0104 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x39 = 0x104,0xffc6
0105 0336 | 6 | Declare_Variable Array,Visible
0106 51fd |Q | Indirect_Literal Any,0x304,{0x35353220, 0x20202020}
0107 e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x3a = 0x107,0xffc5
0108 0336 | 6 | Declare_Variable Array,Visible
0109 51fe |Q | Indirect_Literal Any,0x308,{0x35353320, 0x20202020}
010a e217 | | Load 0x1,0x17 ; Debug Table 0x0.0x3b = 0x10a,0xffc4
010b 0336 | 6 | Declare_Variable Array,Visible
010c 51ff |Q | Indirect_Literal Any,0x30c,{0x35353420, 0x20202020}
010d 00e8 | | Load_Encached Character_Cache ; Debug Table 0x0.0x3c = 0x10d,0xffc3
010e 0129 | ) | Execute Any,Make_Visible
010f 0007 | | Action Break_Optional ; Debug Table 0x0.0x3d = 0x10f,0xffc2
0110 0007 | | Action Break_Optional ; Debug Table 0x0.0x3e = 0x110,0xffc1
0111 0007 | | Action Break_Optional ; Debug Table 0x0.0x3f = 0x111,0xffc0
0112 0007 | | Action Break_Optional ; Debug Table 0x0.0x40 = 0x112,0xffbf
0113 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x41 = 0x113,0xffbe
0114 480d |H | Short_Literal 0xd
0115 029f 01e3 | | Declare_Subprogram For_Call,INIT_01e0
0117 03fe | | Declare_Type Discrete,Defined,Visible
0118 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0x42 = 0x118,0xffbd
0119 4804 |H | Short_Literal 0x4
011a 00e9 | | Load_Encached String_Cache
011b 035c | \ | Declare_Type Array,Constrained,Visible
011c 029a 01fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f8 ; Debug Table 0x0.0x43 = 0x11c,0xffbc
011e 029a 020b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0208 ; Debug Table 0x0.0x44 = 0x11e,0xffbb
0120 0007 | | Action Break_Optional ; Debug Table 0x0.0x45 = 0x120,0xffba
0121 029a 021b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0218 ; Debug Table 0x0.0x46 = 0x121,0xffb9
0123 029a 0223 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0220 ; Debug Table 0x0.0x47 = 0x123,0xffb8
0125 029a 0233 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0230 ; Debug Table 0x0.0x48 = 0x125,0xffb7
0127 029a 0243 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0240 ; Debug Table 0x0.0x49 = 0x127,0xffb6
0129 029a 0273 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0270 ; Debug Table 0x0.0x4a = 0x129,0xffb5
012b 00bf | | Action Accept_Activation
012c 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1 = .DEBUG 0x012c,0x04aa,0x8000,0x0000,0x004e,0xd7a5,0x0000,0x000f
; Debug Table 0x1.0x0 = 0x12c,0xffff
012d 00c7 | | Action Elaborate_Subprogram
012e 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x1 = 0x12e,0xfffe
012f 00c7 | | Action Elaborate_Subprogram
0130 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x2 = 0x130,0xfffd
0131 00c7 | | Action Elaborate_Subprogram
0132 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x3 = 0x132,0xfffc
0133 00c7 | | Action Elaborate_Subprogram
0134 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 ; Debug Table 0x1.0x4 = 0x134,0xfffb
0135 00c7 | | Action Elaborate_Subprogram
0136 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 ; Debug Table 0x1.0x5 = 0x136,0xfffa
0137 00c7 | | Action Elaborate_Subprogram
0138 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 ; Debug Table 0x1.0x6 = 0x138,0xfff9
0139 00c7 | | Action Elaborate_Subprogram
013a 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 ; Debug Table 0x1.0x7 = 0x13a,0xfff8
013b 00c7 | | Action Elaborate_Subprogram
013c 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 ; Debug Table 0x1.0x8 = 0x13c,0xfff7
013d 00c7 | | Action Elaborate_Subprogram
013e 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 ; Debug Table 0x1.0x9 = 0x13e,0xfff6
013f 00c7 | | Action Elaborate_Subprogram
0140 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 ; Debug Table 0x1.0xa = 0x140,0xfff5
0141 00c7 | | Action Elaborate_Subprogram
0142 BODY_0008:
0142 00bc | | Action Signal_Activated
0143 00bb | | Action Signal_Completion
0144 0000 0000 | | .BLANK 0000[0x4]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x014b,0x04c2,0x0002,0x0000,0x004c,0x5986,0x0000,0x002c
; Debug Table 0x2.0x0 = 0x14b,0x1
014c 0b17 | | Execute_Immediate Case_Compare,0x17
014d 700a |p | Jump_Nonzero 0x158
014e 0b18 | | Execute_Immediate Case_Compare,0x18
014f 700b |p | Jump_Nonzero 0x15b
0150 0b19 | | Execute_Immediate Case_Compare,0x19
0151 700c |p | Jump_Nonzero 0x15e
0152 0b1a | | Execute_Immediate Case_Compare,0x1a
0153 700d |p | Jump_Nonzero 0x161
0154 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x154,0x6
0155 e001 | | Load 0x0,0x1
0156 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0157 4401 |D | Exit_Subprogram With_Result,0x1
0158 0092 0324 | $| Action Push_String_Extended,0x324 ; "SMTP Not Authorized."
; Debug Table 0x2.0x2 = 0x158,0x2
015a 4401 |D | Exit_Subprogram With_Result,0x1
015b 0092 0325 | %| Action Push_String_Extended,0x325 ; "Remote Server Shutdown."
; Debug Table 0x2.0x3 = 0x15b,0x3
015d 4401 |D | Exit_Subprogram With_Result,0x1
015e 0092 0326 | &| Action Push_String_Extended,0x326 ; "Remote Server Broken."
; Debug Table 0x2.0x4 = 0x15e,0x4
0160 4401 |D | Exit_Subprogram With_Result,0x1
0161 0092 0327 | '| Action Push_String_Extended,0x327 ; "Remote Processing Error."
; Debug Table 0x2.0x5 = 0x161,0x5
0163 4401 |D | Exit_Subprogram With_Result,0x1
0164 0000 0000 | | .BLANK 0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 4603 |F | Jump_Case 0x3 ; Debug Table 0x3 = .DEBUG 0x016b,0x04d0,0x0005,0x0000,0x004c,0x5986,0x0000,0x0105
016c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
016d 7802 |x | Jump 0x170 ; case 0x1
016e 7805 |x | Jump 0x174 ; case 0x2
016f 7809 |x | Jump 0x179 ; case 0x3
0170 00da | | Load_Top At_Offset_2
0171 0091 0310 | | Action Push_String_Extended_Indexed,0x310 ; "READY"
0173 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0174 00db | | Load_Top At_Offset_3
0175 00db | | Load_Top At_Offset_3
0176 00e0 | | Load_Encached Standard_Cache
0177 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0178 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0179 00da | | Load_Top At_Offset_2
017a 00e0 | | Load_Encached Standard_Cache
017b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
017c 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 4603 |F | Jump_Case 0x3 ; Debug Table 0x4 = .DEBUG 0x0183,0x04d2,0x0005,0x0000,0x004c,0x5986,0x0000,0x0189
0184 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0185 7802 |x | Jump 0x188 ; case 0x1
0186 7805 |x | Jump 0x18c ; case 0x2
0187 7809 |x | Jump 0x191 ; case 0x3
0188 00da | | Load_Top At_Offset_2
0189 0091 0313 | | Action Push_String_Extended_Indexed,0x313 ; "UNSET"
018b 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
018c 00db | | Load_Top At_Offset_3
018d 00db | | Load_Top At_Offset_3
018e 00e0 | | Load_Encached Standard_Cache
018f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0190 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0191 00da | | Load_Top At_Offset_2
0192 00e0 | | Load_Encached Standard_Cache
0193 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0194 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d | | .CONST 0x019d ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b 029f 029b | | Declare_Subprogram For_Call,INIT_0298 ; Debug Table 0x5 = .DEBUG 0x019b,0x04d4,0x0002,0x0000,0x004c,0x5986,0x0000,0x0190
; Debug Table 0x5.0x0 = 0x19b,0xffff
019d BODY_0198:
019d 00cf | | Action Mark_Auxiliary
019e 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0x1 = 0x19e,0x1
019f 4801 |H | Short_Literal 0x1
01a0 0007 | | Action Break_Optional
01a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x1a1,0x2
01a2 8402 | | Call 0x2,0x2
01a3 6802 |h | Jump_Zero 0x1a6
01a4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0x1a4,0x3
01a5 4401 |D | Exit_Subprogram With_Result,0x1
01a6 00c8 | | Action Pop_Auxiliary_Range
01a7 3ff9 |? | Loop_Increasing 0x1a1
01a8 00ce | | Action Pop_Auxiliary
01a9 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x4 = 0x1a9,0x4
01aa 4401 |D | Exit_Subprogram With_Result,0x1
01ab 0000 0000 | | .BLANK 0000[0x5]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; 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 0x6 = .DEBUG 0x01b3,0x04e0,0x0002,0x0000,0x004c,0x5986,0x0000,0x0199
; Debug Table 0x6.0x0 = 0x1b3,0x1
01b4 4602 |F | Jump_Case 0x2
01b5 7802 |x | Jump 0x1b8 ; case 0x0
01b6 7803 |x | Jump 0x1ba ; case 0x1
01b7 780f |x | Jump 0x1c7 ; case 0x2
01b8 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x6.0x1 = 0x1b8,0x2
01b9 4401 |D | Exit_Subprogram With_Result,0x1
01ba 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x2 = 0x1ba,0x3
01bb 4802 |H | Short_Literal 0x2
01bc 00e9 | | Load_Encached String_Cache
01bd 0334 | 4 | Declare_Variable Array,With_Constraint
01be 480d |H | Short_Literal 0xd
01bf 4801 |H | Short_Literal 0x1
01c0 00da | | Load_Top At_Offset_2
01c1 01d6 | | Execute Vector,Field_Write
01c2 480a |H | Short_Literal 0xa
01c3 4802 |H | Short_Literal 0x2
01c4 00da | | Load_Top At_Offset_2
01c5 01d6 | | Execute Vector,Field_Write
01c6 4401 |D | Exit_Subprogram With_Result,0x1
01c7 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x3 = 0x1c7,0x4
01c8 4801 |H | Short_Literal 0x1
01c9 00e9 | | Load_Encached String_Cache
01ca 0334 | 4 | Declare_Variable Array,With_Constraint
01cb 480a |H | Short_Literal 0xa
01cc 4801 |H | Short_Literal 0x1
01cd 00da | | Load_Top At_Offset_2
01ce 01d6 | | Execute Vector,Field_Write
01cf 4401 |D | Exit_Subprogram With_Result,0x1
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d5 | | .CONST 0x01d5 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0002 | | .CONST 0x0002 ; Number of locals
01d3 INIT_01d0:
01d3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x01d3,0x04ea,0x0002,0x0000,0x004c,0x5986,0x0000,0x01a3
; Debug Table 0x7.0x0 = 0x1d3,0xffff
01d4 8215 | | Call 0x1,0x15
01d5 BODY_01d0:
01d5 482e |H. | Short_Literal 0x2e ; Debug Table 0x7.0x1 = 0x1d5,0x1
01d6 00d9 | | Load_Top At_Offset_1
01d7 01cb | | Execute Vector,Append
01d8 00d9 | | Load_Top At_Offset_1
01d9 01cc | | Execute Vector,Catenate
01da 4401 |D | Exit_Subprogram With_Result,0x1
01db 0000 0000 | | .BLANK 0000[0x5]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 4603 |F | Jump_Case 0x3 ; Debug Table 0x8 = .DEBUG 0x01e3,0x04f0,0x0005,0x0000,0x004c,0x5986,0x0000,0x024f
01e4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
01e5 7802 |x | Jump 0x1e8 ; case 0x1
01e6 7805 |x | Jump 0x1ec ; case 0x2
01e7 7809 |x | Jump 0x1f1 ; case 0x3
01e8 00da | | Load_Top At_Offset_2
01e9 0091 0316 | | Action Push_String_Extended_Indexed,0x316 ; "HELO"
01eb 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01ec 00db | | Load_Top At_Offset_3
01ed 00db | | Load_Top At_Offset_3
01ee 00e0 | | Load_Encached Standard_Cache
01ef 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01f0 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
01f1 00da | | Load_Top At_Offset_2
01f2 00e0 | | Load_Encached Standard_Cache
01f3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01f4 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01f5 0000 0000 | | .XXX[0x3]
01f7 0000 | |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0200 | | .CONST 0x0200 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x01fb,0x04f2,0x0002,0x0000,0x004c,0x5986,0x0000,0x0269
; Debug Table 0x9.0x0 = 0x1fb,0x1
01fc e22e | . | Load 0x1,0x2e
01fd 00e0 | | Load_Encached Standard_Cache
01fe 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ff 4401 |D | Exit_Subprogram With_Result,0x1
0200 TRAP_01f8:
0200 0007 | | Action Break_Optional
0201 60b6 |` | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x4c598601} ; Debug Table 0x9.0x1 = 0x201,0x2
0202 0257 | W | Execute Discrete,Raise
0203 0000 0000 | | .BLANK 0000[0x5]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x020b,0x04f8,0x0002,0x0000,0x004c,0x5986,0x0000,0x0272
; Debug Table 0xa.0x0 = 0x20b,0x1
020c e22e | . | Load 0x1,0x2e
020d 025e | ^ | Execute Discrete,Convert
020e 1c01 | | Execute_Immediate Run_Utility,0x1
020f e22f | / | Load 0x1,0x2f
0210 01c3 | | Execute Vector,Check_In_Type
0211 4401 |D | Exit_Subprogram With_Result,0x1
0212 0000 0000 | | .BLANK 0000[0x6]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b e002 | | Load 0x0,0x2 ; Debug Table 0xb = .DEBUG 0x021b,0x04fc,0x0002,0x0000,0x004c,0x5986,0x0000,0x027e
; Debug Table 0xb.0x0 = 0x21b,0x1
021c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
021d e002 | | Load 0x0,0x2
021e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
021f 00ca | | Action Exit_Nullary_Function
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xc = .DEBUG 0x0223,0x0500,0x0002,0x0000,0x004c,0x5986,0x0000,0x0283
; Debug Table 0xc.0x0 = 0x223,0x1
0224 608f |` | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x00001e61}
0225 e5ff | | Load 0x2,-0x1
0226 e003 | | Load 0x0,0x3
0227 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0228 4401 |D | Exit_Subprogram With_Result,0x1
0229 0000 0000 | | .BLANK 0000[0x7]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0235 | 5 | .CONST 0x0235 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x0233,0x0504,0x0002,0x0000,0x004c,0x5986,0x0000,0x028c
; Debug Table 0xd.0x0 = 0x233,0xffff
0234 8233 | 3 | Call 0x1,0x33
0235 BODY_0230:
0235 4820 |H | Short_Literal 0x20 ; Debug Table 0xd.0x1 = 0x235,0x1
0236 e5ff | | Load 0x2,-0x1
0237 01cb | | Execute Vector,Append
0238 00d9 | | Load_Top At_Offset_1
0239 01cc | | Execute Vector,Catenate
023a 4401 |D | Exit_Subprogram With_Result,0x1
023b 0000 0000 | | .BLANK 0000[0x5]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 026c | l | .CONST 0x026c ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 00cf | | Action Mark_Auxiliary ; Debug Table 0xe = .DEBUG 0x0243,0x050a,0x0002,0x0000,0x004c,0x5986,0x0000,0x0295
; Debug Table 0xe.0x0 = 0x243,0x1
0244 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x1 = 0x244,0xfbff
0245 e5ff | | Load 0x2,-0x1
0246 4820 |H | Short_Literal 0x20
0247 e004 | | Load 0x0,0x4
0248 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0249 00e3 | | Load_Encached Natural_Cache
024a 03f1 | | Declare_Variable Discrete,With_Value
024b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x2 = 0x24b,0xfbfe
024c 0a01 | | Execute_Immediate Plus,0x1
024d 0248 | H | Execute Discrete,Check_In_Integer
024e e5ff | | Load 0x2,-0x1
024f 01dc | | Execute Vector,Last
0250 e5ff | | Load 0x2,-0x1
0251 01cf | | Execute Vector,Slice_Read
0252 0335 | 5 | Declare_Variable Array,Duplicate
0253 00d0 | | Action Swap_Control
0254 00d1 | | Pop_Control Pop_Count_1
0255 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x3 = 0x255,0x401
0256 e5ff | | Load 0x2,-0x1
0257 01dd | | Execute Vector,First
0258 00db | | Load_Top At_Offset_3
0259 0aff | | Execute_Immediate Plus,-0x1
025a 0248 | H | Execute Discrete,Check_In_Integer
025b e5ff | | Load 0x2,-0x1
025c 01cf | | Execute Vector,Slice_Read
025d 8233 | 3 | Call 0x1,0x33
025e 01df | | Execute Vector,Equal
025f 6809 |h | Jump_Zero 0x269
0260 e5ff | | Load 0x2,-0x1 ; Debug Table 0xe.0x4 = 0x260,0x402
0261 01dd | | Execute Vector,First
0262 00da | | Load_Top At_Offset_2
0263 0aff | | Execute_Immediate Plus,-0x1
0264 0248 | H | Execute Discrete,Check_In_Integer
0265 e5ff | | Load 0x2,-0x1
0266 01cf | | Execute Vector,Slice_Read
0267 0335 | 5 | Declare_Variable Array,Duplicate
0268 4401 |D | Exit_Subprogram With_Result,0x1
0269 e5ff | | Load 0x2,-0x1 ; Debug Table 0xe.0x5 = 0x269,0x403
026a 0335 | 5 | Declare_Variable Array,Duplicate
026b 4401 |D | Exit_Subprogram With_Result,0x1
026c TRAP_0240:
026c 0007 | | Action Break_Optional
026d 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x6 = 0x26d,0x2
026e 0335 | 5 | Declare_Variable Array,Duplicate
026f 4401 |D | Exit_Subprogram With_Result,0x1
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0290 | | .CONST 0x0290 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 00cf | | Action Mark_Auxiliary ; Debug Table 0xf = .DEBUG 0x0273,0x051a,0x0002,0x0000,0x004c,0x5986,0x0000,0x029e
; Debug Table 0xf.0x0 = 0x273,0x1
0274 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0x1 = 0x274,0xfbff
0275 e5ff | | Load 0x2,-0x1
0276 4820 |H | Short_Literal 0x20
0277 e004 | | Load 0x0,0x4
0278 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0279 00e3 | | Load_Encached Natural_Cache
027a 03f1 | | Declare_Variable Discrete,With_Value
027b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x27b,0xfbfe
027c 0a01 | | Execute_Immediate Plus,0x1
027d 0248 | H | Execute Discrete,Check_In_Integer
027e e5ff | | Load 0x2,-0x1
027f 01dc | | Execute Vector,Last
0280 e5ff | | Load 0x2,-0x1
0281 01cf | | Execute Vector,Slice_Read
0282 0335 | 5 | Declare_Variable Array,Duplicate
0283 00d0 | | Action Swap_Control
0284 00d1 | | Pop_Control Pop_Count_1
0285 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x3 = 0x285,0x401
0286 e5ff | | Load 0x2,-0x1
0287 01dd | | Execute Vector,First
0288 00db | | Load_Top At_Offset_3
0289 0aff | | Execute_Immediate Plus,-0x1
028a 0248 | H | Execute Discrete,Check_In_Integer
028b e5ff | | Load 0x2,-0x1
028c 01cf | | Execute Vector,Slice_Read
028d 8233 | 3 | Call 0x1,0x33
028e 01df | | Execute Vector,Equal
028f 4401 |D | Exit_Subprogram With_Result,0x1
0290 TRAP_0270:
0290 0007 | | Action Break_Optional
0291 4800 |H | Short_Literal 0x0 ; Debug Table 0xf.0x4 = 0x291,0x2
0292 4401 |D | Exit_Subprogram With_Result,0x1
0293 0000 0000 | | .BLANK 0000[0x5]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d | | .CONST 0x029d ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0002 | | .CONST 0x0002 ; Number of locals
029b INIT_0298:
029b 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x029b,0x0526,0x0002,0x0000,0x004e,0xd7a5,0x0000,0x004b
; Debug Table 0x10.0x0 = 0x29b,0xffff
029c 8215 | | Call 0x1,0x15
029d BODY_0298:
029d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1 = 0x29d,0x1
029e 01db | | Execute Vector,Length
029f e5ff | | Load 0x2,-0x1
02a0 01db | | Execute Vector,Length
02a1 027a | z | Execute Discrete,Less_Equal
02a2 680e |h | Jump_Zero 0x2b1
02a3 00d8 | | Load_Top At_Offset_0
02a4 e5ff | | Load 0x2,-0x1
02a5 01dc | | Execute Vector,Last
02a6 00da | | Load_Top At_Offset_2
02a7 01db | | Execute Vector,Length
02a8 0272 | r | Execute Discrete,Minus
02a9 0a01 | | Execute_Immediate Plus,0x1
02aa 0248 | H | Execute Discrete,Check_In_Integer
02ab e5ff | | Load 0x2,-0x1
02ac 01dc | | Execute Vector,Last
02ad e5ff | | Load 0x2,-0x1
02ae 01cf | | Execute Vector,Slice_Read
02af 01df | | Execute Vector,Equal
02b0 4401 |D | Exit_Subprogram With_Result,0x1
02b1 4800 |H | Short_Literal 0x0
02b2 4401 |D | Exit_Subprogram With_Result,0x1
02b3 0000 | | .XXX[0x1]
02b4 0000 0000 | | .LITERAL {0x00000000, 0x00001e61}
02b8 0000 0000 | | .LITERAL {0x00000000, 0x4c598601}
02bc 3231 3120 |211 | .LITERAL {0x32313120, 0x20202020}
02c0 3231 3420 |214 | .LITERAL {0x32313420, 0x20202020}
02c4 3232 3020 |220 | .LITERAL {0x32323020, 0x20202020}
02c8 3232 3120 |221 | .LITERAL {0x32323120, 0x20202020}
02cc 3235 3020 |250 | .LITERAL {0x32353020, 0x20202020}
02d0 3235 3120 |251 | .LITERAL {0x32353120, 0x20202020}
02d4 3335 3420 |354 | .LITERAL {0x33353420, 0x20202020}
02d8 3432 3120 |421 | .LITERAL {0x34323120, 0x20202020}
02dc 3435 3020 |450 | .LITERAL {0x34353020, 0x20202020}
02e0 3435 3120 |451 | .LITERAL {0x34353120, 0x20202020}
02e4 3435 3220 |452 | .LITERAL {0x34353220, 0x20202020}
02e8 3530 3020 |500 | .LITERAL {0x35303020, 0x20202020}
02ec 3530 3120 |501 | .LITERAL {0x35303120, 0x20202020}
02f0 3530 3220 |502 | .LITERAL {0x35303220, 0x20202020}
02f4 3530 3320 |503 | .LITERAL {0x35303320, 0x20202020}
02f8 3530 3420 |504 | .LITERAL {0x35303420, 0x20202020}
02fc 3535 3020 |550 | .LITERAL {0x35353020, 0x20202020}
0300 3535 3120 |551 | .LITERAL {0x35353120, 0x20202020}
0304 3535 3220 |552 | .LITERAL {0x35353220, 0x20202020}
0308 3535 3320 |553 | .LITERAL {0x35353320, 0x20202020}
030c 3535 3420 |554 | .LITERAL {0x35353420, 0x20202020}
0310 ; --------------------------------------------------------------------------------------
0310 ; STRING TABLE
0310 ; --------------------------------------------------------------------------------------
0310 0032 | 2 | .STRTAB 0x0032->0x0329 ; "READY"
0311 0035 | 5 | .STRTAB 0x0035->0x032b ; "RETRY"
0312 0038 | 8 | .STRTAB 0x0038->0x032e ; "ERROR"
0313 003b | ; | .STRTAB 0x003b->0x0330 ; "UNSET"
0314 003e | > | .STRTAB 0x003e->0x0333 ; "STANDARD"
0315 0044 | D | .STRTAB 0x0044->0x0337 ; "ALTERNATE"
0316 004b | K | .STRTAB 0x004b->0x033b ; "HELO"
0317 004d | M | .STRTAB 0x004d->0x033d ; "MAIL"
0318 004f | O | .STRTAB 0x004f->0x033f ; "RCPT"
0319 0051 | Q | .STRTAB 0x0051->0x0341 ; "DATA"
031a 0053 | S | .STRTAB 0x0053->0x0343 ; "RSET"
031b 0055 | U | .STRTAB 0x0055->0x0345 ; "SEND"
031c 0057 | W | .STRTAB 0x0057->0x0347 ; "SOML"
031d 0059 | Y | .STRTAB 0x0059->0x0349 ; "SAML"
031e 005b | [ | .STRTAB 0x005b->0x034b ; "VRFY"
031f 005d | ] | .STRTAB 0x005d->0x034d ; "EXPN"
0320 005f | _ | .STRTAB 0x005f->0x034f ; "HELP"
0321 0061 | a | .STRTAB 0x0061->0x0351 ; "NOOP"
0322 0063 | c | .STRTAB 0x0063->0x0353 ; "QUIT"
0323 0065 | e | .STRTAB 0x0065->0x0355 ; "TURN"
0324 0067 | g | .STRTAB 0x0067->0x0357 ; "SMTP Not Authorized."
0325 0079 | y | .STRTAB 0x0079->0x0361 ; "Remote Server Shutdown."
0326 008e | | .STRTAB 0x008e->0x036d ; "Remote Server Broken."
0327 00a1 | | .STRTAB 0x00a1->0x0377 ; "Remote Processing Error."
0328 00b7 | | .STREND 0x00b7->0x0383
0329 5245 4144 |READ| .STRTAB_STRINGS
0384 0000 0000 | | .BLANK 0000[0x4]
0388 ; --------------------------------------------------------------------------------------
0388 ; Debug Table
0388 ; --------------------------------------------------------------------------------------
0388 0003 0011 | | .CONST 0x0003,0x0011
038a 000b 0412 | | .DEBUG 0x000b,0x0412,0x8000,0x0000,0x004c,0x5986,0x0000,0x0007
0392 012c 04aa | , | .DEBUG 0x012c,0x04aa,0x8000,0x0000,0x004e,0xd7a5,0x0000,0x000f
039a 014b 04c2 | K | .DEBUG 0x014b,0x04c2,0x0002,0x0000,0x004c,0x5986,0x0000,0x002c
03a2 016b 04d0 | k | .DEBUG 0x016b,0x04d0,0x0005,0x0000,0x004c,0x5986,0x0000,0x0105
03aa 0183 04d2 | | .DEBUG 0x0183,0x04d2,0x0005,0x0000,0x004c,0x5986,0x0000,0x0189
03b2 019b 04d4 | | .DEBUG 0x019b,0x04d4,0x0002,0x0000,0x004c,0x5986,0x0000,0x0190
03ba 01b3 04e0 | | .DEBUG 0x01b3,0x04e0,0x0002,0x0000,0x004c,0x5986,0x0000,0x0199
03c2 01d3 04ea | | .DEBUG 0x01d3,0x04ea,0x0002,0x0000,0x004c,0x5986,0x0000,0x01a3
03ca 01e3 04f0 | | .DEBUG 0x01e3,0x04f0,0x0005,0x0000,0x004c,0x5986,0x0000,0x024f
03d2 01fb 04f2 | | .DEBUG 0x01fb,0x04f2,0x0002,0x0000,0x004c,0x5986,0x0000,0x0269
03da 020b 04f8 | | .DEBUG 0x020b,0x04f8,0x0002,0x0000,0x004c,0x5986,0x0000,0x0272
03e2 021b 04fc | | .DEBUG 0x021b,0x04fc,0x0002,0x0000,0x004c,0x5986,0x0000,0x027e
03ea 0223 0500 | # | .DEBUG 0x0223,0x0500,0x0002,0x0000,0x004c,0x5986,0x0000,0x0283
03f2 0233 0504 | 3 | .DEBUG 0x0233,0x0504,0x0002,0x0000,0x004c,0x5986,0x0000,0x028c
03fa 0243 050a | C | .DEBUG 0x0243,0x050a,0x0002,0x0000,0x004c,0x5986,0x0000,0x0295
0402 0273 051a | s | .DEBUG 0x0273,0x051a,0x0002,0x0000,0x004c,0x5986,0x0000,0x029e
040a 029b 0526 | &| .DEBUG 0x029b,0x0526,0x0002,0x0000,0x004e,0xd7a5,0x0000,0x004b
0412 ; --------------------------------------------------------------------------------------
0412 ; Debug3 Subtable 0x0
0412 ; --------------------------------------------------------------------------------------
0412 004b 0000 | K | .DBG3TAB 0x004b,0x0000
0414 000b ffff | | .CONST 0x000b,0xffff
0416 0020 fffe | | .CONST 0x0020,0xfffe
0418 0023 fffd | # | .CONST 0x0023,0xfffd
041a 0024 fffc | $ | .CONST 0x0024,0xfffc
041c 0026 fffb | & | .CONST 0x0026,0xfffb
041e 0027 fffa | ' | .CONST 0x0027,0xfffa
0420 0028 fff9 | ( | .CONST 0x0028,0xfff9
0422 0029 fff8 | ) | .CONST 0x0029,0xfff8
0424 002a fff7 | * | .CONST 0x002a,0xfff7
0426 002b fff6 | + | .CONST 0x002b,0xfff6
0428 002c fff5 | , | .CONST 0x002c,0xfff5
042a 002d fff4 | - | .CONST 0x002d,0xfff4
042c 002e fff3 | . | .CONST 0x002e,0xfff3
042e 002f fff2 | / | .CONST 0x002f,0xfff2
0430 0030 fff1 | 0 | .CONST 0x0030,0xfff1
0432 0031 fff0 | 1 | .CONST 0x0031,0xfff0
0434 0032 ffef | 2 | .CONST 0x0032,0xffef
0436 0033 ffee | 3 | .CONST 0x0033,0xffee
0438 0034 ffed | 4 | .CONST 0x0034,0xffed
043a 0035 ffec | 5 | .CONST 0x0035,0xffec
043c 0036 ffeb | 6 | .CONST 0x0036,0xffeb
043e 0037 ffea | 7 | .CONST 0x0037,0xffea
0440 0038 ffe9 | 8 | .CONST 0x0038,0xffe9
0442 0039 ffe8 | 9 | .CONST 0x0039,0xffe8
0444 003a ffe7 | : | .CONST 0x003a,0xffe7
0446 003b ffe6 | ; | .CONST 0x003b,0xffe6
0448 003c ffe5 | < | .CONST 0x003c,0xffe5
044a 003d ffe4 | = | .CONST 0x003d,0xffe4
044c 003e ffe3 | > | .CONST 0x003e,0xffe3
044e 003f ffe2 | ? | .CONST 0x003f,0xffe2
0450 0040 ffe1 | @ | .CONST 0x0040,0xffe1
0452 0041 ffe0 | A | .CONST 0x0041,0xffe0
0454 0046 ffdf | F | .CONST 0x0046,0xffdf
0456 00be ffde | | .CONST 0x00be,0xffde
0458 00bf ffdd | | .CONST 0x00bf,0xffdd
045a 00c4 ffdc | | .CONST 0x00c4,0xffdc
045c 00c6 ffdb | | .CONST 0x00c6,0xffdb
045e 00c8 ffda | | .CONST 0x00c8,0xffda
0460 00ca ffd9 | | .CONST 0x00ca,0xffd9
0462 00ce ffd8 | | .CONST 0x00ce,0xffd8
0464 00d1 ffd7 | | .CONST 0x00d1,0xffd7
0466 00d4 ffd6 | | .CONST 0x00d4,0xffd6
0468 00d7 ffd5 | | .CONST 0x00d7,0xffd5
046a 00da ffd4 | | .CONST 0x00da,0xffd4
046c 00dd ffd3 | | .CONST 0x00dd,0xffd3
046e 00e0 ffd2 | | .CONST 0x00e0,0xffd2
0470 00e3 ffd1 | | .CONST 0x00e3,0xffd1
0472 00e6 ffd0 | | .CONST 0x00e6,0xffd0
0474 00e9 ffcf | | .CONST 0x00e9,0xffcf
0476 00ec ffce | | .CONST 0x00ec,0xffce
0478 00ef ffcd | | .CONST 0x00ef,0xffcd
047a 00f2 ffcc | | .CONST 0x00f2,0xffcc
047c 00f5 ffcb | | .CONST 0x00f5,0xffcb
047e 00f8 ffca | | .CONST 0x00f8,0xffca
0480 00fb ffc9 | | .CONST 0x00fb,0xffc9
0482 00fe ffc8 | | .CONST 0x00fe,0xffc8
0484 0101 ffc7 | | .CONST 0x0101,0xffc7
0486 0104 ffc6 | | .CONST 0x0104,0xffc6
0488 0107 ffc5 | | .CONST 0x0107,0xffc5
048a 010a ffc4 | | .CONST 0x010a,0xffc4
048c 010d ffc3 | | .CONST 0x010d,0xffc3
048e 010f ffc2 | | .CONST 0x010f,0xffc2
0490 0110 ffc1 | | .CONST 0x0110,0xffc1
0492 0111 ffc0 | | .CONST 0x0111,0xffc0
0494 0112 ffbf | | .CONST 0x0112,0xffbf
0496 0113 ffbe | | .CONST 0x0113,0xffbe
0498 0118 ffbd | | .CONST 0x0118,0xffbd
049a 011c ffbc | | .CONST 0x011c,0xffbc
049c 011e ffbb | | .CONST 0x011e,0xffbb
049e 0120 ffba | | .CONST 0x0120,0xffba
04a0 0121 ffb9 | ! | .CONST 0x0121,0xffb9
04a2 0123 ffb8 | # | .CONST 0x0123,0xffb8
04a4 0125 ffb7 | % | .CONST 0x0125,0xffb7
04a6 0127 ffb6 | ' | .CONST 0x0127,0xffb6
04a8 0129 ffb5 | ) | .CONST 0x0129,0xffb5
04aa ; --------------------------------------------------------------------------------------
04aa ; Debug3 Subtable 0x1
04aa ; --------------------------------------------------------------------------------------
04aa 000b 0000 | | .DBG3TAB 0x000b,0x0000
04ac 012c ffff | , | .CONST 0x012c,0xffff
04ae 012e fffe | . | .CONST 0x012e,0xfffe
04b0 0130 fffd | 0 | .CONST 0x0130,0xfffd
04b2 0132 fffc | 2 | .CONST 0x0132,0xfffc
04b4 0134 fffb | 4 | .CONST 0x0134,0xfffb
04b6 0136 fffa | 6 | .CONST 0x0136,0xfffa
04b8 0138 fff9 | 8 | .CONST 0x0138,0xfff9
04ba 013a fff8 | : | .CONST 0x013a,0xfff8
04bc 013c fff7 | < | .CONST 0x013c,0xfff7
04be 013e fff6 | > | .CONST 0x013e,0xfff6
04c0 0140 fff5 | @ | .CONST 0x0140,0xfff5
04c2 ; --------------------------------------------------------------------------------------
04c2 ; Debug3 Subtable 0x2
04c2 ; --------------------------------------------------------------------------------------
04c2 0000 0006 | | .DBG3TAB 0x0000,0x0006
04c4 014b 0001 | K | .CONST 0x014b,0x0001
04c6 0154 0006 | T | .CONST 0x0154,0x0006
04c8 0158 0002 | X | .CONST 0x0158,0x0002
04ca 015b 0003 | [ | .CONST 0x015b,0x0003
04cc 015e 0004 | ^ | .CONST 0x015e,0x0004
04ce 0161 0005 | a | .CONST 0x0161,0x0005
04d0 ; --------------------------------------------------------------------------------------
04d0 ; Debug3 Subtable 0x3
04d0 ; --------------------------------------------------------------------------------------
04d0 0000 0000 | | .DBG3TAB 0x0000,0x0000
04d2 ; --------------------------------------------------------------------------------------
04d2 ; Debug3 Subtable 0x4
04d2 ; --------------------------------------------------------------------------------------
04d2 0000 0000 | | .DBG3TAB 0x0000,0x0000
04d4 ; --------------------------------------------------------------------------------------
04d4 ; Debug3 Subtable 0x5
04d4 ; --------------------------------------------------------------------------------------
04d4 0001 0004 | | .DBG3TAB 0x0001,0x0004
04d6 019b ffff | | .CONST 0x019b,0xffff
04d8 019e 0001 | | .CONST 0x019e,0x0001
04da 01a1 0002 | | .CONST 0x01a1,0x0002
04dc 01a4 0003 | | .CONST 0x01a4,0x0003
04de 01a9 0004 | | .CONST 0x01a9,0x0004
04e0 ; --------------------------------------------------------------------------------------
04e0 ; Debug3 Subtable 0x6
04e0 ; --------------------------------------------------------------------------------------
04e0 0000 0004 | | .DBG3TAB 0x0000,0x0004
04e2 01b3 0001 | | .CONST 0x01b3,0x0001
04e4 01b8 0002 | | .CONST 0x01b8,0x0002
04e6 01ba 0003 | | .CONST 0x01ba,0x0003
04e8 01c7 0004 | | .CONST 0x01c7,0x0004
04ea ; --------------------------------------------------------------------------------------
04ea ; Debug3 Subtable 0x7
04ea ; --------------------------------------------------------------------------------------
04ea 0001 0001 | | .DBG3TAB 0x0001,0x0001
04ec 01d3 ffff | | .CONST 0x01d3,0xffff
04ee 01d5 0001 | | .CONST 0x01d5,0x0001
04f0 ; --------------------------------------------------------------------------------------
04f0 ; Debug3 Subtable 0x8
04f0 ; --------------------------------------------------------------------------------------
04f0 0000 0000 | | .DBG3TAB 0x0000,0x0000
04f2 ; --------------------------------------------------------------------------------------
04f2 ; Debug3 Subtable 0x9
04f2 ; --------------------------------------------------------------------------------------
04f2 0000 0002 | | .DBG3TAB 0x0000,0x0002
04f4 01fb 0001 | | .CONST 0x01fb,0x0001
04f6 0201 0002 | | .CONST 0x0201,0x0002
04f8 ; --------------------------------------------------------------------------------------
04f8 ; Debug3 Subtable 0xa
04f8 ; --------------------------------------------------------------------------------------
04f8 0000 0001 | | .DBG3TAB 0x0000,0x0001
04fa 020b 0001 | | .CONST 0x020b,0x0001
04fc ; --------------------------------------------------------------------------------------
04fc ; Debug3 Subtable 0xb
04fc ; --------------------------------------------------------------------------------------
04fc 0000 0001 | | .DBG3TAB 0x0000,0x0001
04fe 021b 0001 | | .CONST 0x021b,0x0001
0500 ; --------------------------------------------------------------------------------------
0500 ; Debug3 Subtable 0xc
0500 ; --------------------------------------------------------------------------------------
0500 0000 0001 | | .DBG3TAB 0x0000,0x0001
0502 0223 0001 | # | .CONST 0x0223,0x0001
0504 ; --------------------------------------------------------------------------------------
0504 ; Debug3 Subtable 0xd
0504 ; --------------------------------------------------------------------------------------
0504 0001 0001 | | .DBG3TAB 0x0001,0x0001
0506 0233 ffff | 3 | .CONST 0x0233,0xffff
0508 0235 0001 | 5 | .CONST 0x0235,0x0001
050a ; --------------------------------------------------------------------------------------
050a ; Debug3 Subtable 0xe
050a ; --------------------------------------------------------------------------------------
050a 0002 0005 | | .DBG3TAB 0x0002,0x0005
050c 0243 0001 | C | .CONST 0x0243,0x0001
050e 0244 fbff | D | .CONST 0x0244,0xfbff
0510 024b fbfe | K | .CONST 0x024b,0xfbfe
0512 0255 0401 | U | .CONST 0x0255,0x0401
0514 0260 0402 | ` | .CONST 0x0260,0x0402
0516 0269 0403 | i | .CONST 0x0269,0x0403
0518 026d 0002 | m | .CONST 0x026d,0x0002
051a ; --------------------------------------------------------------------------------------
051a ; Debug3 Subtable 0xf
051a ; --------------------------------------------------------------------------------------
051a 0002 0003 | | .DBG3TAB 0x0002,0x0003
051c 0273 0001 | s | .CONST 0x0273,0x0001
051e 0274 fbff | t | .CONST 0x0274,0xfbff
0520 027b fbfe | { | .CONST 0x027b,0xfbfe
0522 0285 0401 | | .CONST 0x0285,0x0401
0524 0291 0002 | | .CONST 0x0291,0x0002
0526 ; --------------------------------------------------------------------------------------
0526 ; Debug3 Subtable 0x10
0526 ; --------------------------------------------------------------------------------------
0526 0001 0001 | | .DBG3TAB 0x0001,0x0001
0528 029b ffff | | .CONST 0x029b,0xffff
052a 029d 0001 | | .CONST 0x029d,0x0001
052c 0000 0000 | | .BLANK 0000[0xd4]