|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 4096 (0x1000) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_185ca9
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 05d8 | | .CONST 0x05d8 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0097 | | .CONST 0x0097 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0028 | ( | .CONST 0x0028 ; Number of locals 000b INIT_0008: 000b 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated 000d 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 000f 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 0011 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0013 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated 0015 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 0017 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0019 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 001b 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 001d e002 | | Load 0x0,0x2 001e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 001f 02a0 | | Declare_Subprogram Null_Subprogram 0020 4801 |H | Short_Literal 0x1 0021 032e | . | Declare_Type Record,Defined,Visible 0022 00bf | | Action Accept_Activation 0023 e003 | | Load 0x0,0x3 0024 e004 | | Load 0x0,0x4 0025 e005 | | Load 0x0,0x5 0026 e006 | | Load 0x0,0x6 0027 0387 | | Declare_Variable Package 0028 00d8 | | Load_Top At_Offset_0 0029 020f | | Execute Module,Activate 002a e007 | | Load 0x0,0x7 002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002c 02c7 | | Declare_Variable Any 002d 00d8 | | Load_Top At_Offset_0 002e 1c00 | | Execute_Immediate Run_Utility,0x0 002f 00e1 | | Load_Encached Boolean_Cache 0030 e008 | | Load 0x0,0x8 0031 0337 | 7 | Declare_Variable Array 0032 e009 | | Load 0x0,0x9 0033 00d9 | | Load_Top At_Offset_1 0034 01d4 | | Execute Vector,Structure_Write 0035 00e1 | | Load_Encached Boolean_Cache 0036 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0037 4800 |H | Short_Literal 0x0 0038 0093 03d3 | | push_full_address INIT_03d0 003a 00f5 | | Load_Encached Unused21 003b 037d | } | Declare_Type Task,Defined 003c 036f | o | Declare_Variable Task 003d 4800 |H | Short_Literal 0x0 003e 0093 032b | +| push_full_address INIT_0328 0040 00f5 | | Load_Encached Unused21 0041 037d | } | Declare_Type Task,Defined 0042 036f | o | Declare_Variable Task 0043 4800 |H | Short_Literal 0x0 0044 0093 02b3 | | push_full_address INIT_02b0 0046 00f5 | | Load_Encached Unused21 0047 037d | } | Declare_Type Task,Defined 0048 036f | o | Declare_Variable Task 0049 029d 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call 004b 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call 004d 0093 0000 | | push_full_address 0x0 004f 6080 |` | Indirect_Literal Discrete,0xd0,{0x80000000, 0x00010000} 0050 0273 | s | Execute Discrete,Plus 0051 e20d | | Load 0x1,0xd 0052 6079 |`y | Indirect_Literal Discrete,0xcc,{0x00000000, 0x0000ffff} 0053 0279 | y | Execute Discrete,And 0054 0273 | s | Execute Discrete,Plus 0055 e00a | | Load 0x0,0xa 0056 0273 | s | Execute Discrete,Plus 0057 e005 | | Load 0x0,0x5 0058 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0059 e00b | | Load 0x0,0xb 005a 0387 | | Declare_Variable Package 005b 00d8 | | Load_Top At_Offset_0 005c 020f | | Execute Module,Activate 005d 029d 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call 005f 029d 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call 0061 029d 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call 0063 029d 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call 0065 e005 | | Load 0x0,0x5 0066 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0067 a00c | | Store_Unchecked 0x0,0xc 0068 a00d | | Store_Unchecked 0x0,0xd 0069 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 006a 4805 |H | Short_Literal 0x5 006b e21f | | Load 0x1,0x1f 006c 020e | | Execute Module,Augment_Imports 006d 0007 | | Action Break_Optional 006e e21a | | Load 0x1,0x1a 006f e00e | | Load 0x0,0xe 0070 4802 |H | Short_Literal 0x2 0071 e221 | ! | Load 0x1,0x21 0072 020e | | Execute Module,Augment_Imports 0073 0007 | | Action Break_Optional 0074 e21a | | Load 0x1,0x1a 0075 e00e | | Load 0x0,0xe 0076 e005 | | Load 0x0,0x5 0077 e00f | | Load 0x0,0xf 0078 e010 | | Load 0x0,0x10 0079 e002 | | Load 0x0,0x2 007a a011 | | Store_Unchecked 0x0,0x11 007b 1d0e | | Execute_Immediate Reference_Lex_1,0xe 007c e20f | | Load 0x1,0xf 007d a012 | | Store_Unchecked 0x0,0x12 007e a013 | | Store_Unchecked 0x0,0x13 007f 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0080 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0081 480d |H | Short_Literal 0xd 0082 e220 | | Load 0x1,0x20 0083 020e | | Execute Module,Augment_Imports 0084 0007 | | Action Break_Optional 0085 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0086 00c7 | | Action Elaborate_Subprogram 0087 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0088 00c7 | | Action Elaborate_Subprogram 0089 1d12 | | Execute_Immediate Reference_Lex_1,0x12 008a 00c7 | | Action Elaborate_Subprogram 008b 1d14 | | Execute_Immediate Reference_Lex_1,0x14 008c 00c7 | | Action Elaborate_Subprogram 008d 1d16 | | Execute_Immediate Reference_Lex_1,0x16 008e 00c7 | | Action Elaborate_Subprogram 008f 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0090 00c7 | | Action Elaborate_Subprogram 0091 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0092 00c7 | | Action Elaborate_Subprogram 0093 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0094 00c7 | | Action Elaborate_Subprogram 0095 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0096 00c7 | | Action Elaborate_Subprogram 0097 BODY_0008: 0097 00be | | Action Activate_Tasks 0098 00bc | | Action Signal_Activated 0099 00bb | | Action Signal_Completion 009a 0000 0000 | | .BLANK 0000[0x6] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 e21b | | Load 0x1,0x1b 00a4 e014 | | Load 0x0,0x14 00a5 e224 | $ | Load 0x1,0x24 00a6 0096 | | Execute Package,Entry 00a7 0092 03fe | | Action Push_String_Extended,0x3fe ; "The connection was closed by the Agent." 00a9 e00e | | Load 0x0,0xe 00aa 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ab 8015 | | Call 0x0,0x15 00ac 0092 03ff | | Action Push_String_Extended,0x3ff ; "Letter box's agent disposed." 00ae e00e | | Load 0x0,0xe 00af 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00b0 8016 | | Call 0x0,0x16 00b1 0092 0400 | | Action Push_String_Extended,0x400 ; "Connector's agent disposed." 00b3 e00e | | Load 0x0,0xe 00b4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00b5 4800 |H | Short_Literal 0x0 00b6 e220 | | Load 0x1,0x20 00b7 170d | | Execute Task,Entry_Call,Field_Number 0xd 00b8 0092 0401 | | Action Push_String_Extended,0x401 ; "Server task disposed." 00ba e00e | | Load 0x0,0xe 00bb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00bc 4800 |H | Short_Literal 0x0 00bd e221 | ! | Load 0x1,0x21 00be 170d | | Execute Task,Entry_Call,Field_Number 0xd 00bf 0092 0402 | | Action Push_String_Extended,0x402 ; "Customer task disposed." 00c1 e00e | | Load 0x0,0xe 00c2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00c3 4800 |H | Short_Literal 0x0 00c4 e21f | | Load 0x1,0x1f 00c5 170d | | Execute Task,Entry_Call,Field_Number 0xd 00c6 0092 0403 | | Action Push_String_Extended,0x403 ; "Dispatcher task disposed." 00c8 e00e | | Load 0x0,0xe 00c9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00cb 0000 | | .XXX[0x1] 00cc 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 00d0 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 00d4 0000 0000 | | .BLANK 0000[0x4] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00dd | | .CONST 0x00dd ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0002 | | .CONST 0x0002 ; Number of locals 00db INIT_00d8: 00db e005 | | Load 0x0,0x5 00dc 0322 | " | Declare_Variable Record 00dd BODY_00d8: 00dd 00d8 | | Load_Top At_Offset_0 00de e5ff | | Load 0x2,-0x1 00df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e0 e002 | | Load 0x0,0x2 00e1 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00e2 0092 0404 | | Action Push_String_Extended,0x404 ; "serv" 00e4 0092 0405 | | Action Push_String_Extended,0x405 ; "regi" 00e6 4800 |H | Short_Literal 0x0 00e7 4800 |H | Short_Literal 0x0 00e8 e017 | | Load 0x0,0x17 00e9 e007 | | Load 0x0,0x7 00ea 180f | | Execute Package,Field_Execute,Field_Number 0xf 00eb e018 | | Load 0x0,0x18 00ec 01c3 | | Execute Vector,Check_In_Type 00ed 8019 | | Call 0x0,0x19 00ee e01a | | Load 0x0,0x1a 00ef e01b | | Load 0x0,0x1b 00f0 e20f | | Load 0x1,0xf 00f1 801c | | Call 0x0,0x1c 00f2 00d1 | | Pop_Control Pop_Count_1 00f3 00e1 | | Load_Encached Boolean_Cache 00f4 00d9 | | Load_Top At_Offset_1 00f5 4864 |Hd | Short_Literal 0x64 00f6 8226 | & | Call 0x1,0x26 00f7 c21c | | Store 0x1,0x1c 00f8 e21c | | Load 0x1,0x1c 00f9 0f01 | | Execute_Immediate Equal,0x1 00fa 6805 |h | Jump_Zero 0x100 00fb 0092 0406 | | Action Push_String_Extended,0x406 ; "Registration Contract sending was successfull !" 00fd e00e | | Load 0x0,0xe 00fe 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0100 0092 0407 | | Action Push_String_Extended,0x407 ; "Registration Contract sending failed !!!" 0102 e00e | | Load 0x0,0xe 0103 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0104 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0105 0000 0000 | | .XXX[0x3] 0107 0000 | | 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010d | | .CONST 0x010d ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0002 | | .CONST 0x0002 ; Number of locals 010b INIT_0108: 010b e005 | | Load 0x0,0x5 010c 0322 | " | Declare_Variable Record 010d BODY_0108: 010d 00d8 | | Load_Top At_Offset_0 010e 0092 0408 | | Action Push_String_Extended,0x408 ; "Happy to unregister" 0110 0092 0404 | | Action Push_String_Extended,0x404 ; "serv" 0112 0092 0409 | | Action Push_String_Extended,0x409 ; "unre" 0114 4800 |H | Short_Literal 0x0 0115 4800 |H | Short_Literal 0x0 0116 e017 | | Load 0x0,0x17 0117 e007 | | Load 0x0,0x7 0118 180f | | Execute Package,Field_Execute,Field_Number 0xf 0119 e018 | | Load 0x0,0x18 011a 01c3 | | Execute Vector,Check_In_Type 011b 8019 | | Call 0x0,0x19 011c e01a | | Load 0x0,0x1a 011d e01b | | Load 0x0,0x1b 011e e20f | | Load 0x1,0xf 011f 801c | | Call 0x0,0x1c 0120 00d1 | | Pop_Control Pop_Count_1 0121 00e1 | | Load_Encached Boolean_Cache 0122 00d9 | | Load_Top At_Offset_1 0123 4864 |Hd | Short_Literal 0x64 0124 8226 | & | Call 0x1,0x26 0125 c21c | | Store 0x1,0x1c 0126 e21c | | Load 0x1,0x1c 0127 0f01 | | Execute_Immediate Equal,0x1 0128 6805 |h | Jump_Zero 0x12e 0129 0092 040a | | Action Push_String_Extended,0x40a ; "Unregistration Contract sending was successfull !" 012b e00e | | Load 0x0,0xe 012c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 012d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 012e 0092 040b | | Action Push_String_Extended,0x40b ; "Unregistration Contract sending failed !!!" 0130 e00e | | Load 0x0,0xe 0131 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0132 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0133 0000 0000 | | .BLANK 0000[0x5] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b e21e | | Load 0x1,0x1e 013c 00ca | | Action Exit_Nullary_Function 013d 0000 0000 | | .XXX[0x3] 013f 0000 | | 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0145 | E | .CONST 0x0145 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0002 | | .CONST 0x0002 ; Number of locals 0143 INIT_0140: 0143 e005 | | Load 0x0,0x5 0144 0322 | " | Declare_Variable Record 0145 BODY_0140: 0145 00d8 | | Load_Top At_Offset_0 0146 0092 040c | | Action Push_String_Extended,0x40c ; "I want you to find a worker for me !" 0148 e5fe | | Load 0x2,-0x2 0149 e5ff | | Load 0x2,-0x1 014a e5fd | | Load 0x2,-0x3 014b 4800 |H | Short_Literal 0x0 014c e017 | | Load 0x0,0x17 014d e007 | | Load 0x0,0x7 014e 180f | | Execute Package,Field_Execute,Field_Number 0xf 014f e018 | | Load 0x0,0x18 0150 01c3 | | Execute Vector,Check_In_Type 0151 8019 | | Call 0x0,0x19 0152 e01d | | Load 0x0,0x1d 0153 e009 | | Load 0x0,0x9 0154 e20f | | Load 0x1,0xf 0155 801c | | Call 0x0,0x1c 0156 00d1 | | Pop_Control Pop_Count_1 0157 00e1 | | Load_Encached Boolean_Cache 0158 00d9 | | Load_Top At_Offset_1 0159 4864 |Hd | Short_Literal 0x64 015a 8226 | & | Call 0x1,0x26 015b c21c | | Store 0x1,0x1c 015c e21c | | Load 0x1,0x1c 015d 0f01 | | Execute_Immediate Equal,0x1 015e 6805 |h | Jump_Zero 0x164 015f 0092 040d | | Action Push_String_Extended,0x40d ; "Ask for a job sending was successfull !" 0161 e00e | | Load 0x0,0xe 0162 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0163 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0164 0092 040e | | Action Push_String_Extended,0x40e ; "Ask for a job sending sending failed !!!" 0166 e00e | | Load 0x0,0xe 0167 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0168 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0169 0000 0000 | | .BLANK 0000[0x7] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0177 | w | .CONST 0x0177 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0003 | | .CONST 0x0003 ; Number of locals 0173 INIT_0170: 0173 e005 | | Load 0x0,0x5 0174 0322 | " | Declare_Variable Record 0175 e010 | | Load 0x0,0x10 0176 0337 | 7 | Declare_Variable Array 0177 BODY_0170: 0177 00d9 | | Load_Top At_Offset_1 0178 4801 |H | Short_Literal 0x1 0179 e221 | ! | Load 0x1,0x21 017a 1710 | | Execute Task,Entry_Call,Field_Number 0x10 017b 00d1 | | Pop_Control Pop_Count_1 017c 00e3 | | Load_Encached Natural_Cache 017d 00da | | Load_Top At_Offset_2 017e 4801 |H | Short_Literal 0x1 017f 801e | | Call 0x0,0x1e 0180 c5ff | | Store 0x2,-0x1 0181 00d8 | | Load_Top At_Offset_0 0182 00da | | Load_Top At_Offset_2 0183 4802 |H | Short_Literal 0x2 0184 8011 | | Call 0x0,0x11 0185 00d1 | | Pop_Control Pop_Count_1 0186 00d8 | | Load_Top At_Offset_0 0187 0092 040f | | Action Push_String_Extended,0x40f ; "fail" 0189 01df | | Execute Vector,Equal 018a 6806 |h | Jump_Zero 0x191 018b 0092 040f | | Action Push_String_Extended,0x40f ; "fail" 018d e002 | | Load 0x0,0x2 018e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 018f a5fe | | Store_Unchecked 0x2,-0x2 0190 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0191 e5fe | | Load 0x2,-0x2 0192 00da | | Load_Top At_Offset_2 0193 4803 |H | Short_Literal 0x3 0194 801f | | Call 0x0,0x1f 0195 c5fe | | Store 0x2,-0x2 0196 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0197 0000 | | .XXX[0x1] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019c | | .CONST 0x019c ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b 00e1 | | Load_Encached Boolean_Cache 019c BODY_0198: 019c 00e1 | | Load_Encached Boolean_Cache 019d 4801 |H | Short_Literal 0x1 019e e221 | ! | Load 0x1,0x21 019f 170f | | Execute Task,Entry_Call,Field_Number 0xf 01a0 0059 | Y | Store_Top Discrete,At_Offset_1 01a1 00d8 | | Load_Top At_Offset_0 01a2 00ca | | Action Exit_Nullary_Function 01a3 0000 0000 | | .BLANK 0000[0x5] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab 00db | | Load_Top At_Offset_3 01ac 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01ad 00db | | Load_Top At_Offset_3 01ae e002 | | Load 0x0,0x2 01af 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01b0 e5fe | | Load 0x2,-0x2 01b1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01b3 0000 0000 | | .BLANK 0000[0x5] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 00db | | Load_Top At_Offset_3 01bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01bd 00db | | Load_Top At_Offset_3 01be 00e0 | | Load_Encached Standard_Cache 01bf 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01c0 e002 | | Load 0x0,0x2 01c1 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01c2 e5fe | | Load 0x2,-0x2 01c3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01c4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c5 0000 0000 | | .XXX[0x3] 01c7 0000 | | 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 00db | | Load_Top At_Offset_3 01cc 00db | | Load_Top At_Offset_3 01cd 8020 | | Call 0x0,0x20 01ce 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01cf 0000 | | .XXX[0x1] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00db | | Load_Top At_Offset_3 01d4 e021 | ! | Load 0x0,0x21 01d5 01c3 | | Execute Vector,Check_In_Type 01d6 00db | | Load_Top At_Offset_3 01d7 8222 | " | Call 0x1,0x22 01d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01d9 0000 0000 | | .BLANK 0000[0x7] 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 0092 0410 | | Action Push_String_Extended,0x410 ; "Generic_Agent is going to initiate its letter box." 01e5 e00e | | Load 0x0,0xe 01e6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01e7 8022 | " | Call 0x0,0x22 01e8 0092 0411 | | Action Push_String_Extended,0x411 ; "Generic_Agent is going to initiate its connector." 01ea e00e | | Load 0x0,0xe 01eb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01ec e21d | | Load 0x1,0x1d 01ed 8023 | # | Call 0x0,0x23 01ee e21d | | Load 0x1,0x1d 01ef e21b | | Load 0x1,0x1b 01f0 e017 | | Load 0x0,0x17 01f1 e024 | $ | Load 0x0,0x24 01f2 e224 | $ | Load 0x1,0x24 01f3 0096 | | Execute Package,Entry 01f4 c21b | | Store 0x1,0x1b 01f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01f6 0000 0000 | | .XXX[0x2] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 0092 0412 | | Action Push_String_Extended,0x412 ; "Agent is going to send :" 01fd e00e | | Load 0x0,0xe 01fe 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01ff 00db | | Load_Top At_Offset_3 0200 8025 | % | Call 0x0,0x25 0201 e00e | | Load 0x0,0xe 0202 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0203 00e1 | | Load_Encached Boolean_Cache 0204 e5fe | | Load 0x2,-0x2 0205 e5ff | | Load 0x2,-0x1 0206 e01b | | Load 0x0,0x1b 0207 4800 |H | Short_Literal 0x0 0208 4803 |H | Short_Literal 0x3 0209 e026 | & | Load 0x0,0x26 020a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 020b 035b | [ | Declare_Type Array,Constrained 020c 0337 | 7 | Declare_Variable Array 020d 48c1 |H | Short_Literal 0xc1 020e 4800 |H | Short_Literal 0x0 020f 00da | | Load_Top At_Offset_2 0210 01d6 | | Execute Vector,Field_Write 0211 4836 |H6 | Short_Literal 0x36 0212 4801 |H | Short_Literal 0x1 0213 00da | | Load_Top At_Offset_2 0214 01d6 | | Execute Vector,Field_Write 0215 4892 |H | Short_Literal 0x92 0216 4802 |H | Short_Literal 0x2 0217 00da | | Load_Top At_Offset_2 0218 01d6 | | Execute Vector,Field_Write 0219 4884 |H | Short_Literal 0x84 021a 4803 |H | Short_Literal 0x3 021b 00da | | Load_Top At_Offset_2 021c 01d6 | | Execute Vector,Field_Write 021d e21b | | Load 0x1,0x1b 021e e027 | ' | Load 0x0,0x27 021f e224 | $ | Load 0x1,0x24 0220 0096 | | Execute Package,Entry 0221 c5fd | | Store 0x2,-0x3 0222 0092 0413 | | Action Push_String_Extended,0x413 ; "Going out of send_mail_to_orb" 0224 e00e | | Load 0x0,0xe 0225 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0226 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0227 0000 | | .XXX[0x1] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022f | / | .CONST 0x022f ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0003 | | .CONST 0x0003 ; Number of locals 022b INIT_0228: 022b e00f | | Load 0x0,0xf 022c 0337 | 7 | Declare_Variable Array 022d e010 | | Load 0x0,0x10 022e 0337 | 7 | Declare_Variable Array 022f BODY_0228: 022f 00d9 | | Load_Top At_Offset_1 0230 e5ff | | Load 0x2,-0x1 0231 4801 |H | Short_Literal 0x1 0232 8011 | | Call 0x0,0x11 0233 00d1 | | Pop_Control Pop_Count_1 0234 00d8 | | Load_Top At_Offset_0 0235 e5ff | | Load 0x2,-0x1 0236 4802 |H | Short_Literal 0x2 0237 8011 | | Call 0x0,0x11 0238 00d1 | | Pop_Control Pop_Count_1 0239 0092 0414 | | Action Push_String_Extended,0x414 ; "DISPATCHER working on " 023b 00da | | Load_Top At_Offset_2 023c 01cc | | Execute Vector,Catenate 023d 0092 0415 | | Action Push_String_Extended,0x415 ; " " 023f 01cc | | Execute Vector,Catenate 0240 00d9 | | Load_Top At_Offset_1 0241 01cc | | Execute Vector,Catenate 0242 e00e | | Load 0x0,0xe 0243 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0244 00d9 | | Load_Top At_Offset_1 0245 0092 0416 | | Action Push_String_Extended,0x416 ; "rjob" 0247 01df | | Execute Vector,Equal 0248 6805 |h | Jump_Zero 0x24e 0249 e5ff | | Load 0x2,-0x1 024a 4801 |H | Short_Literal 0x1 024b e221 | ! | Load 0x1,0x21 024c 170e | | Execute Task,Entry_Call,Field_Number 0xe 024d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 024e 00d9 | | Load_Top At_Offset_1 024f 0092 0405 | | Action Push_String_Extended,0x405 ; "regi" 0251 01df | | Execute Vector,Equal 0252 6808 |h | Jump_Zero 0x25b 0253 00d8 | | Load_Top At_Offset_0 0254 0092 0417 | | Action Push_String_Extended,0x417 ; "ok " 0256 01df | | Execute Vector,Equal 0257 6802 |h | Jump_Zero 0x25a 0258 4801 |H | Short_Literal 0x1 0259 a21e | | Store_Unchecked 0x1,0x1e 025a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 025b 00d9 | | Load_Top At_Offset_1 025c 0092 0409 | | Action Push_String_Extended,0x409 ; "unre" 025e 01df | | Execute Vector,Equal 025f 6808 |h | Jump_Zero 0x268 0260 00d8 | | Load_Top At_Offset_0 0261 0092 0417 | | Action Push_String_Extended,0x417 ; "ok " 0263 01df | | Execute Vector,Equal 0264 6802 |h | Jump_Zero 0x267 0265 4800 |H | Short_Literal 0x0 0266 a21e | | Store_Unchecked 0x1,0x1e 0267 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0268 00d9 | | Load_Top At_Offset_1 0269 0092 0418 | | Action Push_String_Extended,0x418 ; "chck" 026b 01de | | Execute Vector,Not_Equal 026c 6804 |h | Jump_Zero 0x271 026d e5ff | | Load 0x2,-0x1 026e 4801 |H | Short_Literal 0x1 026f e220 | | Load 0x1,0x20 0270 170e | | Execute Task,Entry_Call,Field_Number 0xe 0271 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0272 0000 0000 | | .BLANK 0000[0x6] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 0283 | | .CONST 0x0283 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0005 | | .CONST 0x0005 ; Number of locals 027b INIT_0278: 027b e018 | | Load 0x0,0x18 027c 0337 | 7 | Declare_Variable Array 027d 00d8 | | Load_Top At_Offset_0 027e 0337 | 7 | Declare_Variable Array 027f e008 | | Load 0x0,0x8 0280 0337 | 7 | Declare_Variable Array 0281 00d8 | | Load_Top At_Offset_0 0282 0337 | 7 | Declare_Variable Array 0283 BODY_0278: 0283 00da | | Load_Top At_Offset_2 0284 e5ff | | Load 0x2,-0x1 0285 4801 |H | Short_Literal 0x1 0286 8028 | ( | Call 0x0,0x28 0287 00d1 | | Pop_Control Pop_Count_1 0288 00db | | Load_Top At_Offset_3 0289 e5ff | | Load 0x2,-0x1 028a 4800 |H | Short_Literal 0x0 028b 8028 | ( | Call 0x0,0x28 028c 00d1 | | Pop_Control Pop_Count_1 028d e5ff | | Load 0x2,-0x1 028e e402 | | Load 0x2,0x2 028f 4801 |H | Short_Literal 0x1 0290 8029 | ) | Call 0x0,0x29 0291 00d1 | | Pop_Control Pop_Count_1 0292 e5ff | | Load 0x2,-0x1 0293 00db | | Load_Top At_Offset_3 0294 4800 |H | Short_Literal 0x0 0295 8029 | ) | Call 0x0,0x29 0296 00d1 | | Pop_Control Pop_Count_1 0297 00d8 | | Load_Top At_Offset_0 0298 e5ff | | Load 0x2,-0x1 0299 4801 |H | Short_Literal 0x1 029a 802a | * | Call 0x0,0x2a 029b 00d1 | | Pop_Control Pop_Count_1 029c 00d9 | | Load_Top At_Offset_1 029d e5ff | | Load 0x2,-0x1 029e 4800 |H | Short_Literal 0x0 029f 802a | * | Call 0x0,0x2a 02a0 00d1 | | Pop_Control Pop_Count_1 02a1 e5ff | | Load 0x2,-0x1 02a2 00da | | Load_Top At_Offset_2 02a3 4801 |H | Short_Literal 0x1 02a4 802b | + | Call 0x0,0x2b 02a5 00d1 | | Pop_Control Pop_Count_1 02a6 e5ff | | Load 0x2,-0x1 02a7 00d9 | | Load_Top At_Offset_1 02a8 4800 |H | Short_Literal 0x0 02a9 802b | + | Call 0x0,0x2b 02aa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02ab 0000 0000 | | .BLANK 0000[0x5] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02cf | | .CONST 0x02cf ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0013 | | .CONST 0x0013 ; Number of locals 02b3 INIT_02b0: 02b3 4800 |H | Short_Literal 0x0 02b4 02cb | | Declare_Variable Entry 02b5 4801 |H | Short_Literal 0x1 02b6 02cb | | Declare_Variable Entry 02b7 4801 |H | Short_Literal 0x1 02b8 02cb | | Declare_Variable Entry 02b9 4801 |H | Short_Literal 0x1 02ba 02cb | | Declare_Variable Entry 02bb 00bf | | Action Accept_Activation 02bc e001 | | Load 0x0,0x1 02bd 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02be 0322 | " | Declare_Variable Record 02bf 00e1 | | Load_Encached Boolean_Cache 02c0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02c1 480d 485c |H H\| Declare_Variable Select 0x000, 0x004, 02c3 480f 485e |H H^| [0x000]: 0x000 = 0x0000, 02c5 4810 4860 |H H`| [0x00e]: 0x063 = 0x0318, 02c7 480e 4863 |H Hc| [0x010]: 0x060 = 0x0300, 02c9 4800 4800 |H H | [0x00f]: 0x05e = 0x02f0, 02cb 4800 4804 |H H | [0x00d]: 0x05c = 0x02e0 02cd 02cf | | 02ce 00bc | | Action Signal_Activated 02cf BODY_02b0: 02cf 00cf | | Action Mark_Auxiliary 02d0 00d9 | | Load_Top At_Offset_1 02d1 013f | ? | Execute Select,Rendezvous 02d2 00d1 | | Pop_Control Pop_Count_1 02d3 6014 |` | Indirect_Literal Discrete,0x2e8,{0x00000000, 0x00018000} 02d4 00ba | | Action Initiate_Delay 02d5 0092 0419 | | Action Push_String_Extended,0x419 ; "Agent as a customer is alive." 02d7 e002 | | Load 0x0,0x2 02d8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 02d9 00da | | Load_Top At_Offset_2 02da 0f01 | | Execute_Immediate Equal,0x1 02db 7002 |p | Jump_Nonzero 0x2de 02dc 00c9 | | Action Pop_Auxiliary_Loop 02dd 7ff2 | | Jump 0x2d0 02de 00ce | | Action Pop_Auxiliary 02df 00bb | | Action Signal_Completion 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; See instruction 0x02cf at 0x2c1, index=0xd 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 4801 |H | Short_Literal 0x1 02e4 a212 | | Store_Unchecked 0x1,0x12 02e5 4100 |A | End_Rendezvous 0x0 02e6 0000 0000 | | .XXX[0x2] 02e8 0000 0000 | | .LITERAL {0x00000000, 0x00018000} 02ec 0000 0000 | | .BLANK 0000[0x4] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; See instruction 0x02cf at 0x2c1, index=0xf 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 e211 | | Load 0x1,0x11 02f4 e001 | | Load 0x0,0x1 02f5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02f6 0f00 | | Execute_Immediate Equal,0x0 02f7 a5fe | | Store_Unchecked 0x2,-0x2 02f8 4101 |A | End_Rendezvous 0x1 02f9 0000 0000 | | .BLANK 0000[0x7] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; See instruction 0x02cf at 0x2c1, index=0x10 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 e211 | | Load 0x1,0x11 0304 e001 | | Load 0x0,0x1 0305 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0306 e5fe | | Load 0x2,-0x2 0307 017d | } | Execute Record,Structure_Write 0308 e211 | | Load 0x1,0x11 0309 e001 | | Load 0x0,0x1 030a 1816 | | Execute Package,Field_Execute,Field_Number 0x16 030b 00d1 | | Pop_Control Pop_Count_1 030c 0092 041a | | Action Push_String_Extended,0x41a ; "Job answer extracted from the fifo." 030e e002 | | Load 0x0,0x2 030f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0310 4101 |A | End_Rendezvous 0x1 0311 0000 0000 | | .BLANK 0000[0x7] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; See instruction 0x02cf at 0x2c1, index=0xe 0318 ; -------------------------------------------------------------------------------------- 0318 031b | | .CONST 0x031b ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0001 | | .CONST 0x0001 ; Number of locals 031b BODY_0318: 031b INIT_0318: 031b e211 | | Load 0x1,0x11 031c e5fe | | Load 0x2,-0x2 031d e001 | | Load 0x0,0x1 031e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 031f 00d1 | | Pop_Control Pop_Count_1 0320 0092 041b | | Action Push_String_Extended,0x41b ; "Job answer added to the answer fifo." 0322 e002 | | Load 0x0,0x2 0323 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0324 4100 |A | End_Rendezvous 0x0 0325 0000 0000 | | .XXX[0x3] 0327 0000 | | 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 0341 | A | .CONST 0x0341 ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0012 | | .CONST 0x0012 ; Number of locals 032b INIT_0328: 032b 4800 |H | Short_Literal 0x0 032c 02cb | | Declare_Variable Entry 032d 4801 |H | Short_Literal 0x1 032e 02cb | | Declare_Variable Entry 032f 00bf | | Action Accept_Activation 0330 e001 | | Load 0x0,0x1 0331 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0332 0322 | " | Declare_Variable Record 0333 00e1 | | Load_Encached Boolean_Cache 0334 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0335 029f 0363 | c| Declare_Subprogram INIT_0360,For_Call 0337 480d 4877 |H Hw| Declare_Variable Select 0x000, 0x002, 0339 480e 4878 |H Hx| [0x001]: 0x000 = 0x0000, 033b 4801 4800 |H H | [0x00e]: 0x078 = 0x03c0, 033d 4800 4802 |H H | [0x00d]: 0x077 = 0x03b8 033f 02cf | | 0340 00bc | | Action Signal_Activated 0341 BODY_0328: 0341 00cf | | Action Mark_Auxiliary 0342 00d9 | | Load_Top At_Offset_1 0343 013f | ? | Execute Select,Rendezvous 0344 4603 |F | Jump_Case 0x4 0345 7807 |x | Jump 0x34d ; case 0x0 0346 7806 |x | Jump 0x34d ; case 0x1 0347 7800 |x | Jump 0x348 ; case 0x2 0348 e20f | | Load 0x1,0xf ; case 0x3 0349 e001 | | Load 0x0,0x1 034a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 034b 7001 |p | Jump_Nonzero 0x34d 034c 8211 | | Call 0x1,0x11 034d 6062 |`b | Indirect_Literal Discrete,0x3b0,{0x00000000, 0x00018000} 034e 00ba | | Action Initiate_Delay 034f 0092 041c | | Action Push_String_Extended,0x41c ; "Agent as a server is alive." 0351 e002 | | Load 0x0,0x2 0352 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0353 00db | | Load_Top At_Offset_3 0354 0f01 | | Execute_Immediate Equal,0x1 0355 7002 |p | Jump_Nonzero 0x358 0356 00c9 | | Action Pop_Auxiliary_Loop 0357 7fea | | Jump 0x342 0358 00ce | | Action Pop_Auxiliary 0359 00bb | | Action Signal_Completion 035a 0000 0000 | | .BLANK 0000[0x6] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 036c | l | .CONST 0x036c ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0006 | | .CONST 0x0006 ; Number of locals 0363 INIT_0360: 0363 e003 | | Load 0x0,0x3 0364 0322 | " | Declare_Variable Record 0365 e004 | | Load 0x0,0x4 0366 0337 | 7 | Declare_Variable Array 0367 e005 | | Load 0x0,0x5 0368 0337 | 7 | Declare_Variable Array 0369 e006 | | Load 0x0,0x6 036a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 036b 00e1 | | Load_Encached Boolean_Cache 036c BODY_0360: 036c e20f | | Load 0x1,0xf 036d e001 | | Load 0x0,0x1 036e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 036f e402 | | Load 0x2,0x2 0370 017d | } | Execute Record,Structure_Write 0371 e20f | | Load 0x1,0xf 0372 e001 | | Load 0x0,0x1 0373 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0374 00d1 | | Pop_Control Pop_Count_1 0375 00db | | Load_Top At_Offset_3 0376 e402 | | Load 0x2,0x2 0377 4801 |H | Short_Literal 0x1 0378 8007 | | Call 0x0,0x7 0379 00d1 | | Pop_Control Pop_Count_1 037a 00da | | Load_Top At_Offset_2 037b e402 | | Load 0x2,0x2 037c 4802 |H | Short_Literal 0x2 037d 8007 | | Call 0x0,0x7 037e 00d1 | | Pop_Control Pop_Count_1 037f 0092 041d | | Action Push_String_Extended,0x41d ; "Agent is going to treat with " 0381 e403 | | Load 0x2,0x3 0382 01cc | | Execute Vector,Catenate 0383 0092 041e | | Action Push_String_Extended,0x41e ; " and " 0385 01cc | | Execute Vector,Catenate 0386 00db | | Load_Top At_Offset_3 0387 01cc | | Execute Vector,Catenate 0388 e002 | | Load 0x0,0x2 0389 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 038a 00da | | Load_Top At_Offset_2 038b e403 | | Load 0x2,0x3 038c 8008 | | Call 0x0,0x8 038d e006 | | Load 0x0,0x6 038e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 038f 003a | : | Store_Top Access,At_Offset_2 0390 e402 | | Load 0x2,0x2 0391 e009 | | Load 0x0,0x9 0392 4800 |H | Short_Literal 0x0 0393 800a | | Call 0x0,0xa 0394 00d1 | | Pop_Control Pop_Count_1 0395 e402 | | Load 0x2,0x2 0396 0092 0416 | | Action Push_String_Extended,0x416 ; "rjob" 0398 4801 |H | Short_Literal 0x1 0399 800a | | Call 0x0,0xa 039a 00d1 | | Pop_Control Pop_Count_1 039b e402 | | Load 0x2,0x2 039c 0092 0416 | | Action Push_String_Extended,0x416 ; "rjob" 039e 4802 |H | Short_Literal 0x2 039f 800a | | Call 0x0,0xa 03a0 00d1 | | Pop_Control Pop_Count_1 03a1 e402 | | Load 0x2,0x2 03a2 00da | | Load_Top At_Offset_2 03a3 4803 |H | Short_Literal 0x3 03a4 800b | | Call 0x0,0xb 03a5 00d1 | | Pop_Control Pop_Count_1 03a6 e402 | | Load 0x2,0x2 03a7 800c | | Call 0x0,0xc 03a8 00d1 | | Pop_Control Pop_Count_1 03a9 00e1 | | Load_Encached Boolean_Cache 03aa e402 | | Load 0x2,0x2 03ab 48c8 |H | Short_Literal 0xc8 03ac 800d | | Call 0x0,0xd 03ad 0059 | Y | Store_Top Discrete,At_Offset_1 03ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03af 0000 | | .XXX[0x1] 03b0 0000 0000 | | .LITERAL {0x00000000, 0x00018000} 03b4 0000 0000 | | .BLANK 0000[0x4] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; See instruction 0x02cf at 0x337, index=0xd 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bb | | .CONST 0x03bb ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0001 | | .CONST 0x0001 ; Number of locals 03bb BODY_03b8: 03bb INIT_03b8: 03bb 4801 |H | Short_Literal 0x1 03bc a210 | | Store_Unchecked 0x1,0x10 03bd 4100 |A | End_Rendezvous 0x0 03be 0000 0000 | | .XXX[0x2] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; See instruction 0x02cf at 0x337, index=0xe 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 e20f | | Load 0x1,0xf 03c4 e5fe | | Load 0x2,-0x2 03c5 e001 | | Load 0x0,0x1 03c6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03c7 00d1 | | Pop_Control Pop_Count_1 03c8 0092 041f | | Action Push_String_Extended,0x41f ; "Request added to the request fifo." 03ca e002 | | Load 0x0,0x2 03cb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 03cc 4100 |A | End_Rendezvous 0x0 03cd 0000 0000 | | .XXX[0x3] 03cf 0000 | | 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03e2 | | .CONST 0x03e2 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0010 | | .CONST 0x0010 ; Number of locals 03d3 INIT_03d0: 03d3 4800 |H | Short_Literal 0x0 03d4 02cb | | Declare_Variable Entry 03d5 00bf | | Action Accept_Activation 03d6 00e1 | | Load_Encached Boolean_Cache 03d7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 03d8 e001 | | Load 0x0,0x1 03d9 0322 | " | Declare_Variable Record 03da 480d 487f |H H | Declare_Variable Select 0x000, 0x001, 03dc 4801 4800 |H H | [0x001]: 0x000 = 0x0000, 03de 4800 4801 |H H | [0x00d]: 0x07f = 0x03f8 03e0 02cf | | 03e1 00bc | | Action Signal_Activated 03e2 BODY_03d0: 03e2 8002 | | Call 0x0,0x2 03e3 00cf | | Action Mark_Auxiliary 03e4 00d9 | | Load_Top At_Offset_1 03e5 013f | ? | Execute Select,Rendezvous 03e6 4602 |F | Jump_Case 0x3 03e7 780c |x | Jump 0x3f4 ; case 0x0 03e8 7800 |x | Jump 0x3e9 ; case 0x1 03e9 8003 | | Call 0x0,0x3 ; case 0x2 03ea 0f01 | | Execute_Immediate Equal,0x1 03eb 6805 |h | Jump_Zero 0x3f1 03ec 00da | | Load_Top At_Offset_2 03ed 8004 | | Call 0x0,0x4 03ee 00d1 | | Pop_Control Pop_Count_1 03ef 00da | | Load_Top At_Offset_2 03f0 8005 | | Call 0x0,0x5 03f1 00db | | Load_Top At_Offset_3 03f2 0f01 | | Execute_Immediate Equal,0x1 03f3 7002 |p | Jump_Nonzero 0x3f6 03f4 00c9 | | Action Pop_Auxiliary_Loop 03f5 7fee | | Jump 0x3e4 03f6 00ce | | Action Pop_Auxiliary 03f7 00bb | | Action Signal_Completion 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; See instruction 0x02cf at 0x3da, index=0xd 03f8 ; -------------------------------------------------------------------------------------- 03f8 03fb | | .CONST 0x03fb ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0001 | | .CONST 0x0001 ; Number of locals 03fb BODY_03f8: 03fb INIT_03f8: 03fb 4801 |H | Short_Literal 0x1 03fc a20e | | Store_Unchecked 0x1,0xe 03fd 4100 |A | End_Rendezvous 0x0 03fe ; -------------------------------------------------------------------------------------- 03fe ; STRING TABLE 03fe ; -------------------------------------------------------------------------------------- 03fe 0046 | F | .STRTAB 0x0046->0x0421 ; "The connection was closed by the Agent." 03ff 006b | k | .STRTAB 0x006b->0x0434 ; "Letter box's agent disposed." 0400 0085 | | .STRTAB 0x0085->0x0442 ; "Connector's agent disposed." 0401 009e | | .STRTAB 0x009e->0x0450 ; "Server task disposed." 0402 00b1 | | .STRTAB 0x00b1->0x045a ; "Customer task disposed." 0403 00c6 | | .STRTAB 0x00c6->0x0466 ; "Dispatcher task disposed." 0404 00dd | | .STRTAB 0x00dd->0x0472 ; "serv" 0405 00df | | .STRTAB 0x00df->0x0474 ; "regi" 0406 00e1 | | .STRTAB 0x00e1->0x0476 ; "Registration Contract sending was successfull !" 0407 010e | | .STRTAB 0x010e->0x048e ; "Registration Contract sending failed !!!" 0408 0134 | 4 | .STRTAB 0x0134->0x04a2 ; "Happy to unregister" 0409 0145 | E | .STRTAB 0x0145->0x04ab ; "unre" 040a 0147 | G | .STRTAB 0x0147->0x04ad ; "Unregistration Contract sending was successfull !" 040b 0176 | v | .STRTAB 0x0176->0x04c6 ; "Unregistration Contract sending failed !!!" 040c 019e | | .STRTAB 0x019e->0x04db ; "I want you to find a worker for me !" 040d 01c0 | | .STRTAB 0x01c0->0x04ed ; "Ask for a job sending was successfull !" 040e 01e5 | | .STRTAB 0x01e5->0x0500 ; "Ask for a job sending sending failed !!!" 040f 020b | | .STRTAB 0x020b->0x0514 ; "fail" 0410 020d | | .STRTAB 0x020d->0x0516 ; "Generic_Agent is going to initiate its letter box." 0411 023d | = | .STRTAB 0x023d->0x052f ; "Generic_Agent is going to initiate its connector." 0412 026c | l | .STRTAB 0x026c->0x0548 ; "Agent is going to send :" 0413 0282 | | .STRTAB 0x0282->0x0554 ; "Going out of send_mail_to_orb" 0414 029d | | .STRTAB 0x029d->0x0562 ; "DISPATCHER working on " 0415 02b1 | | .STRTAB 0x02b1->0x056d ; " " 0416 02b0 | | .STRTAB 0x02b0->0x056e ; "rjob" 0417 02b2 | | .STRTAB 0x02b2->0x0570 ; "ok " 0418 02b4 | | .STRTAB 0x02b4->0x0572 ; "chck" 0419 02b6 | | .STRTAB 0x02b6->0x0574 ; "Agent as a customer is alive." 041a 02d1 | | .STRTAB 0x02d1->0x0582 ; "Job answer extracted from the fifo." 041b 02f2 | | .STRTAB 0x02f2->0x0594 ; "Job answer added to the answer fifo." 041c 0314 | | .STRTAB 0x0314->0x05a6 ; "Agent as a server is alive." 041d 032d | - | .STRTAB 0x032d->0x05b3 ; "Agent is going to treat with " 041e 0348 | H | .STRTAB 0x0348->0x05c2 ; " and " 041f 034b | K | .STRTAB 0x034b->0x05c4 ; "Request added to the request fifo." 0420 036b | k | .STREND 0x036b->0x05d5 0421 5468 6520 |The | .STRTAB_STRINGS 05d6 0000 0000 | | .XXX[0x2] 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; Debug Table 05d8 ; -------------------------------------------------------------------------------------- 05d8 0004 000a | | .DEBUG4 0x0004,0x000a,0x7b95,0x0000,0x0001,0x001f 05de 000b 065a | Z| .DBG4T 0x000b,0x065a,0xc000,0x8000 05e2 0023 0670 | # p| .DBG4T 0x0023,0x0670,0xc000,0x0000 05e6 00a3 068c | | .DBG4T 0x00a3,0x068c,0x1001,0x0000 05ea 00db 069a | | .DBG4T 0x00db,0x069a,0x1001,0x0000 05ee 010b 06a2 | | .DBG4T 0x010b,0x06a2,0x1001,0x0000 05f2 013b 06aa | ; | .DBG4T 0x013b,0x06aa,0x1002,0x0000 05f6 0143 06ad | C | .DBG4T 0x0143,0x06ad,0x1001,0x0000 05fa 0173 06b5 | s | .DBG4T 0x0173,0x06b5,0x1001,0x0000 05fe 019b 06bf | | .DBG4T 0x019b,0x06bf,0x1002,0x0000 0602 01ab 06c4 | | .DBG4T 0x01ab,0x06c4,0x1001,0x0000 0606 01bb 06c7 | | .DBG4T 0x01bb,0x06c7,0x1001,0x0000 060a 01cb 06ca | | .DBG4T 0x01cb,0x06ca,0x1001,0x0000 060e 01d3 0000 | | .DBG4T 0x01d3,0x0000,0x100b,0x0000 0612 01e3 06cd | | .DBG4T 0x01e3,0x06cd,0x1001,0x0000 0616 01fb 06d4 | | .DBG4T 0x01fb,0x06d4,0x1001,0x0000 061a 022b 06da | + | .DBG4T 0x022b,0x06da,0x1001,0x0000 061e 027b 06eb | { | .DBG4T 0x027b,0x06eb,0x1001,0x0000 0622 02b3 06f7 | | .DBG4T 0x02b3,0x06f7,0x0000,0x0000 0626 02bc 06fd | | .DBG4T 0x02bc,0x06fd,0x0000,0x4000 062a 02e3 0709 | | .DBG4T 0x02e3,0x0709,0x0003,0x0000 062e 02f3 070c | | .DBG4T 0x02f3,0x070c,0x0003,0x0000 0632 0303 070f | | .DBG4T 0x0303,0x070f,0x0003,0x0000 0636 031b 0714 | | .DBG4T 0x031b,0x0714,0x0003,0x0000 063a 032b 0718 | + | .DBG4T 0x032b,0x0718,0x0000,0x0000 063e 0330 071c | 0 | .DBG4T 0x0330,0x071c,0x0000,0x4000 0642 0363 072c | c ,| .DBG4T 0x0363,0x072c,0x0004,0x0000 0646 03bb 073f | ?| .DBG4T 0x03bb,0x073f,0x0003,0x0000 064a 03c3 0742 | B| .DBG4T 0x03c3,0x0742,0x0003,0x0000 064e 03d3 0746 | F| .DBG4T 0x03d3,0x0746,0x0000,0x0000 0652 03d6 0749 | I| .DBG4T 0x03d6,0x0749,0x0000,0x4000 0656 03fb 0759 | Y| .DBG4T 0x03fb,0x0759,0x0003,0x0000 065a ; -------------------------------------------------------------------------------------- 065a ; Debug chain 065a ; -------------------------------------------------------------------------------------- 065a 000a 0000 | | .DBGLEN 0x000a,0x0000 065c 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d 0666 0002 0003 | | .XXX[0xa] 0668 0004 0005 | | 066a 0006 0007 | | 066c 0008 0009 | | 066e 000a 000b | | 0670 ; -------------------------------------------------------------------------------------- 0670 ; Debug chain 0670 ; -------------------------------------------------------------------------------------- 0670 001a 0000 | | .DBGLEN 0x001a,0x0000 0672 0023 002a | # *| .DBGLNO 0x0023,0x002a,0x002f,0x0030,0x0035,0x0037,0x003d,0x0043,0x0049,0x004b,0x005d,0x005f,0x0061,0x0063,0x0065,0x006e,0x0074,0x0085,0x0087,0x0089,0x008b,0x008d,0x008f,0x0091,0x0093,0x0095 068c ; -------------------------------------------------------------------------------------- 068c ; Debug chain 068c ; -------------------------------------------------------------------------------------- 068c 0000 000c | | .DBGLEN 0x0000,0x000c 068e 00a3 00a7 | | .DBGLNO 0x00a3,0x00a7,0x00ab,0x00ac,0x00b0,0x00b1,0x00b5,0x00b8,0x00bc,0x00bf,0x00c3,0x00c6 069a ; -------------------------------------------------------------------------------------- 069a ; Debug chain 069a ; -------------------------------------------------------------------------------------- 069a 0001 0005 | | .DBGLEN 0x0001,0x0005 069c 00db 00dd | | .DBGLNO 0x00db,0x00dd,0x00f3,0x00f8,0x00fb,0x0100 06a2 ; -------------------------------------------------------------------------------------- 06a2 ; Debug chain 06a2 ; -------------------------------------------------------------------------------------- 06a2 0001 0005 | | .DBGLEN 0x0001,0x0005 06a4 010b 010d | | .DBGLNO 0x010b,0x010d,0x0121,0x0126,0x0129,0x012e 06aa ; -------------------------------------------------------------------------------------- 06aa ; Debug chain 06aa ; -------------------------------------------------------------------------------------- 06aa 0000 0001 | | .DBGLEN 0x0000,0x0001 06ac 013b | ; | .DBGLNO 0x013b 06ad ; -------------------------------------------------------------------------------------- 06ad ; Debug chain 06ad ; -------------------------------------------------------------------------------------- 06ad 0001 0005 | | .DBGLEN 0x0001,0x0005 06af 0143 0145 | C E| .DBGLNO 0x0143,0x0145,0x0157,0x015c,0x015f,0x0164 06b5 ; -------------------------------------------------------------------------------------- 06b5 ; Debug chain 06b5 ; -------------------------------------------------------------------------------------- 06b5 0002 0006 | | .DBGLEN 0x0002,0x0006 06b7 0173 0175 | s u| .DBGLNO 0x0173,0x0175,0x0177,0x017c,0x0181,0x0186,0x018b,0x0191 06bf ; -------------------------------------------------------------------------------------- 06bf ; Debug chain 06bf ; -------------------------------------------------------------------------------------- 06bf 0001 0002 | | .DBGLEN 0x0001,0x0002 06c1 019b 019c | | .DBGLNO 0x019b,0x019c,0x01a1 06c4 ; -------------------------------------------------------------------------------------- 06c4 ; Debug chain 06c4 ; -------------------------------------------------------------------------------------- 06c4 0000 0001 | | .DBGLEN 0x0000,0x0001 06c6 01ab | | .DBGLNO 0x01ab 06c7 ; -------------------------------------------------------------------------------------- 06c7 ; Debug chain 06c7 ; -------------------------------------------------------------------------------------- 06c7 0000 0001 | | .DBGLEN 0x0000,0x0001 06c9 01bb | | .DBGLNO 0x01bb 06ca ; -------------------------------------------------------------------------------------- 06ca ; Debug chain 06ca ; -------------------------------------------------------------------------------------- 06ca 0000 0001 | | .DBGLEN 0x0000,0x0001 06cc 01cb | | .DBGLNO 0x01cb 06cd ; -------------------------------------------------------------------------------------- 06cd ; Debug chain 06cd ; -------------------------------------------------------------------------------------- 06cd 0000 0005 | | .DBGLEN 0x0000,0x0005 06cf 01e3 01e7 | | .DBGLNO 0x01e3,0x01e7,0x01e8,0x01ec,0x01ee 06d4 ; -------------------------------------------------------------------------------------- 06d4 ; Debug chain 06d4 ; -------------------------------------------------------------------------------------- 06d4 0000 0004 | | .DBGLEN 0x0000,0x0004 06d6 01fb 01ff | | .DBGLNO 0x01fb,0x01ff,0x0203,0x0222 06da ; -------------------------------------------------------------------------------------- 06da ; Debug chain 06da ; -------------------------------------------------------------------------------------- 06da 0002 000d | | .DBGLEN 0x0002,0x000d 06dc 022b 022d | + -| .DBGLNO 0x022b,0x022d,0x022f,0x0234,0x0239,0x0244,0x0249,0x024e,0x0253,0x0258,0x025b,0x0260,0x0265,0x0268,0x026d 06eb ; -------------------------------------------------------------------------------------- 06eb ; Debug chain 06eb ; -------------------------------------------------------------------------------------- 06eb 0002 0008 | | .DBGLEN 0x0002,0x0008 06ed 027b 027f | { | .DBGLNO 0x027b,0x027f,0x0283,0x0288,0x028d,0x0292,0x0297,0x029c,0x02a1,0x02a6 06f7 ; -------------------------------------------------------------------------------------- 06f7 ; Debug chain 06f7 ; -------------------------------------------------------------------------------------- 06f7 0004 0000 | | .DBGLEN 0x0004,0x0000 06f9 02b3 02b5 | | .DBGLNO 0x02b3,0x02b5,0x02b7,0x02b9 06fd ; -------------------------------------------------------------------------------------- 06fd ; Debug chain 06fd ; -------------------------------------------------------------------------------------- 06fd 0002 0004 | | .DBGLEN 0x0002,0x0004 06ff 02bc 02bf | | .DBGLNO 0x02bc,0x02bf,0x02d0,0x02d3,0x02d5,0x02d9 0705 0002 0007 | | .XXX[0x4] 0707 0008 0009 | | 0709 ; -------------------------------------------------------------------------------------- 0709 ; Debug chain 0709 ; -------------------------------------------------------------------------------------- 0709 0000 0001 | | .DBGLEN 0x0000,0x0001 070b 02e3 | | .DBGLNO 0x02e3 070c ; -------------------------------------------------------------------------------------- 070c ; Debug chain 070c ; -------------------------------------------------------------------------------------- 070c 0000 0001 | | .DBGLEN 0x0000,0x0001 070e 02f3 | | .DBGLNO 0x02f3 070f ; -------------------------------------------------------------------------------------- 070f ; Debug chain 070f ; -------------------------------------------------------------------------------------- 070f 0000 0003 | | .DBGLEN 0x0000,0x0003 0711 0303 0308 | | .DBGLNO 0x0303,0x0308,0x030c 0714 ; -------------------------------------------------------------------------------------- 0714 ; Debug chain 0714 ; -------------------------------------------------------------------------------------- 0714 0000 0002 | | .DBGLEN 0x0000,0x0002 0716 031b 0320 | | .DBGLNO 0x031b,0x0320 0718 ; -------------------------------------------------------------------------------------- 0718 ; Debug chain 0718 ; -------------------------------------------------------------------------------------- 0718 0002 0000 | | .DBGLEN 0x0002,0x0000 071a 032b 032d | + -| .DBGLNO 0x032b,0x032d 071c ; -------------------------------------------------------------------------------------- 071c ; Debug chain 071c ; -------------------------------------------------------------------------------------- 071c 0002 0006 | | .DBGLEN 0x0002,0x0006 071e 0330 0333 | 0 3| .DBGLNO 0x0330,0x0333,0x0342,0x0348,0x034c,0x034d,0x034f,0x0353 0726 0002 0005 | | .XXX[0x6] 0728 0006 0007 | | 072a 0008 0009 | | 072c ; -------------------------------------------------------------------------------------- 072c ; Debug chain 072c ; -------------------------------------------------------------------------------------- 072c 0005 000c | | .DBGLEN 0x0005,0x000c 072e 0363 0365 | c e| .DBGLNO 0x0363,0x0365,0x0367,0x0369,0x036b,0x036c,0x0371,0x0375,0x037a,0x037f,0x038a,0x0390,0x0395,0x039b,0x03a1,0x03a6,0x03a9 073f ; -------------------------------------------------------------------------------------- 073f ; Debug chain 073f ; -------------------------------------------------------------------------------------- 073f 0000 0001 | | .DBGLEN 0x0000,0x0001 0741 03bb | | .DBGLNO 0x03bb 0742 ; -------------------------------------------------------------------------------------- 0742 ; Debug chain 0742 ; -------------------------------------------------------------------------------------- 0742 0000 0002 | | .DBGLEN 0x0000,0x0002 0744 03c3 03c8 | | .DBGLNO 0x03c3,0x03c8 0746 ; -------------------------------------------------------------------------------------- 0746 ; Debug chain 0746 ; -------------------------------------------------------------------------------------- 0746 0001 0000 | | .DBGLEN 0x0001,0x0000 0748 03d3 | | .DBGLNO 0x03d3 0749 ; -------------------------------------------------------------------------------------- 0749 ; Debug chain 0749 ; -------------------------------------------------------------------------------------- 0749 0002 0006 | | .DBGLEN 0x0002,0x0006 074b 03d6 03d8 | | .DBGLNO 0x03d6,0x03d8,0x03e2,0x03e4,0x03e9,0x03ec,0x03ef,0x03f1 0753 0001 0003 | | .XXX[0x6] 0755 0005 0006 | | 0757 0007 0008 | | 0759 ; -------------------------------------------------------------------------------------- 0759 ; Debug chain 0759 ; -------------------------------------------------------------------------------------- 0759 0000 0001 | | .DBGLEN 0x0000,0x0001 075b 03fb | | .DBGLNO 0x03fb 075c 0000 0000 | | .BLANK 0000[0xa4]