|
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: 3072 (0xc00) Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0468 | h | .CONST 0x0468 ; 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 0047 | G | .CONST 0x0047 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0021 | ! | .CONST 0x0021 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x04d2,0x8000,0x0000,0x0036,0xd594,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xd,0xfffd 000f 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xf,0xfffc 0011 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x11,0xfffb 0013 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa 0015 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x15,0xfff9 0017 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x17,0xfff8 0019 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x19,0xfff7 001b 00bf | | Action Accept_Activation 001c e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x001c,0x04e6,0x8000,0x0000,0x0036,0xd9a4,0x0000,0x0019 ; Debug Table 0x1.0x0 = 0x1c,0xffff 001d 190d | | Execute Package,Field_Reference,Field_Number 0xd 001e 0007 | | Action Break_Optional 001f e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x1 = 0x1f,0xfffe 0020 190e | | Execute Package,Field_Reference,Field_Number 0xe 0021 0007 | | Action Break_Optional 0022 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x2 = 0x22,0xfffd 0023 00c7 | | Action Elaborate_Subprogram 0024 029d 019b | | Declare_Subprogram INIT_0198,For_Outer_Call ; Debug Table 0x1.0x3 = 0x24,0xfffc 0026 029d 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call ; Debug Table 0x1.0x4 = 0x26,0xfffb 0028 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x28,0xfffa 0029 190d | | Execute Package,Field_Reference,Field_Number 0xd 002a 00c6 | | Action Check_Subprogram_Elaborated 002b e003 | | Load 0x0,0x3 002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002d e003 | | Load 0x0,0x3 002e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002f e004 | | Load 0x0,0x4 0030 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0031 4909 |I | Short_Literal 0x109 0032 4801 |H | Short_Literal 0x1 0033 62cc |b | Indirect_Literal Discrete,0x300,{0x00000000, 0x0036d9a4} 0034 4931 |I1 | Short_Literal 0x131 0035 4800 |H | Short_Literal 0x0 0036 0007 | | Action Break_Optional 0037 029d 021b | | Declare_Subprogram INIT_0218,For_Outer_Call ; Debug Table 0x1.0x6 = 0x37,0xfff9 0039 029d 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call ; Debug Table 0x1.0x7 = 0x39,0xfff8 003b 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x8 = 0x3b,0xfff7 003c 00c7 | | Action Elaborate_Subprogram 003d 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x9 = 0x3d,0xfff6 003e 00c7 | | Action Elaborate_Subprogram 003f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xa = 0x3f,0xfff5 0040 00c7 | | Action Elaborate_Subprogram 0041 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xb = 0x41,0xfff4 0042 00c7 | | Action Elaborate_Subprogram 0043 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xc = 0x43,0xfff3 0044 00c7 | | Action Elaborate_Subprogram 0045 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xd = 0x45,0xfff2 0046 00c7 | | Action Elaborate_Subprogram 0047 BODY_0008: 0047 00bc | | Action Signal_Activated 0048 00bb | | Action Signal_Completion 0049 0000 0000 | | .BLANK 0000[0x7] 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0053,0x0504,0x0002,0x0000,0x0036,0xd594,0x0000,0x0012 ; Debug Table 0x2.0x0 = 0x53,0x1 0054 01db | | Execute Vector,Length 0055 0c02 | | Execute_Immediate Greater_Equal,0x2 0056 680c |h | Jump_Zero 0x63 0057 00da | | Load_Top At_Offset_2 0058 01dd | | Execute Vector,First 0059 00db | | Load_Top At_Offset_3 005a 01dd | | Execute Vector,First 005b 0a01 | | Execute_Immediate Plus,0x1 005c 0248 | H | Execute Discrete,Check_In_Integer 005d e5ff | | Load 0x2,-0x1 005e 01cf | | Execute Vector,Slice_Read 005f 0092 0304 | | Action Push_String_Extended,0x304 ; "!!" 0061 01df | | Execute Vector,Equal 0062 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0063 4800 |H | Short_Literal 0x0 0064 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0065 0000 0000 | | .XXX[0x3] 0067 0000 | | 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 0072 | r | .CONST 0x0072 ; Address of begin 0069 008f | | .CONST 0x008f ; Address of exception handler 006a 0003 | | .CONST 0x0003 ; Number of locals 006b INIT_0068: 006b e005 | | Load 0x0,0x5 ; Debug Table 0x3 = .DEBUG 0x006b,0x0508,0x0002,0x0000,0x0036,0xd594,0x0000,0x001b ; Debug Table 0x3.0x0 = 0x6b,0xffff 006c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006d 02c7 | | Declare_Variable Any 006e 00d8 | | Load_Top At_Offset_0 006f 1c00 | | Execute_Immediate Run_Utility,0x0 0070 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x1 = 0x70,0xfffe 0071 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0072 BODY_0068: 0072 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x2 = 0x72,0x1 0073 0120 | | Execute Any,Is_Value 0074 6803 |h | Jump_Zero 0x78 0075 e005 | | Load 0x0,0x5 0076 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0077 7801 |x | Jump 0x79 0078 00d9 | | Load_Top At_Offset_1 0079 e5ff | | Load 0x2,-0x1 007a 8216 | | Call 0x1,0x16 007b 4800 |H | Short_Literal 0x0 007c 8220 | | Call 0x1,0x20 007d c402 | | Store 0x2,0x2 007e e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x3 = 0x7e,0x2 007f 8217 | | Call 0x1,0x17 0080 00da | | Load_Top At_Offset_2 0081 e006 | | Load 0x0,0x6 0082 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0083 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x4 = 0x83,0x3 0084 8221 | ! | Call 0x1,0x21 0085 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x5 = 0x85,0x4 0086 00da | | Load_Top At_Offset_2 0087 e006 | | Load 0x0,0x6 0088 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0089 0059 | Y | Store_Top Discrete,At_Offset_1 008a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x6 = 0x8a,0x5 008b e002 | | Load 0x0,0x2 008c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 008d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x7 = 0x8d,0x6 008e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 008f TRAP_0068: 008f 0007 | | Action Break_Optional 0090 e007 | | Load 0x0,0x7 ; Debug Table 0x3.0x8 = 0x90,0x7 0091 180e | | Execute Package,Field_Execute,Field_Number 0xe 0092 4805 |H | Short_Literal 0x5 0093 0092 0305 | | Action Push_String_Extended,0x305 ; "Queue_Client.Class_Exists failed." 0095 e008 | | Load 0x0,0x8 0096 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0097 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x9 = 0x97,0x8 0098 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0099 0000 0000 | | .BLANK 0000[0x7] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a8 | | .CONST 0x00a8 ; Address of begin 00a1 00ca | | .CONST 0x00ca ; Address of exception handler 00a2 0002 | | .CONST 0x0002 ; Number of locals 00a3 INIT_00a0: 00a3 e005 | | Load 0x0,0x5 ; Debug Table 0x4 = .DEBUG 0x00a3,0x051e,0x0001,0x0000,0x0036,0xd594,0x0000,0x0026 ; Debug Table 0x4.0x0 = 0xa3,0xffff 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 02c7 | | Declare_Variable Any 00a6 00d8 | | Load_Top At_Offset_0 00a7 1c00 | | Execute_Immediate Run_Utility,0x0 00a8 BODY_00a0: 00a8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1 = 0xa8,0x1 00a9 0120 | | Execute Any,Is_Value 00aa 6803 |h | Jump_Zero 0xae 00ab e005 | | Load 0x0,0x5 00ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ad 7801 |x | Jump 0xaf 00ae 00d8 | | Load_Top At_Offset_0 00af e5ff | | Load 0x2,-0x1 00b0 8216 | | Call 0x1,0x16 00b1 4801 |H | Short_Literal 0x1 00b2 8220 | | Call 0x1,0x20 00b3 c402 | | Store 0x2,0x2 00b4 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x2 = 0xb4,0x2 00b5 8217 | | Call 0x1,0x17 00b6 00d9 | | Load_Top At_Offset_1 00b7 e006 | | Load 0x0,0x6 00b8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 00b9 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x3 = 0xb9,0x3 00ba 00d9 | | Load_Top At_Offset_1 00bb e004 | | Load 0x0,0x4 00bc 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00bd e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x4 = 0xbd,0x4 00be 00d9 | | Load_Top At_Offset_1 00bf e004 | | Load 0x0,0x4 00c0 180f | | Execute Package,Field_Execute,Field_Number 0xf 00c1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x5 = 0xc1,0x5 00c2 e004 | | Load 0x0,0x4 00c3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00c4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x6 = 0xc4,0x6 00c5 8221 | ! | Call 0x1,0x21 00c6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x7 = 0xc6,0x7 00c7 e004 | | Load 0x0,0x4 00c8 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00c9 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00ca TRAP_00a0: 00ca 0007 | | Action Break_Optional 00cb e007 | | Load 0x0,0x7 ; Debug Table 0x4.0x8 = 0xcb,0x8 00cc 180e | | Execute Package,Field_Execute,Field_Number 0xe 00cd 4805 |H | Short_Literal 0x5 00ce 0092 0306 | | Action Push_String_Extended,0x306 ; "Queue_Client.Spool failed." 00d0 e008 | | Load 0x0,0x8 00d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00d2 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x9 = 0xd2,0x9 00d3 e004 | | Load 0x0,0x4 00d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00d5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00d6 0000 0000 | | .XXX[0x2] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00e0 | | .CONST 0x00e0 ; Address of begin 00d9 00f7 | | .CONST 0x00f7 ; Address of exception handler 00da 0002 | | .CONST 0x0002 ; Number of locals 00db INIT_00d8: 00db e005 | | Load 0x0,0x5 ; Debug Table 0x5 = .DEBUG 0x00db,0x0534,0x0001,0x0000,0x0036,0xd594,0x0000,0x003a ; Debug Table 0x5.0x0 = 0xdb,0xffff 00dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00dd 02c7 | | Declare_Variable Any 00de 00d8 | | Load_Top At_Offset_0 00df 1c00 | | Execute_Immediate Run_Utility,0x0 00e0 BODY_00d8: 00e0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0xe0,0x1 00e1 0120 | | Execute Any,Is_Value 00e2 6803 |h | Jump_Zero 0xe6 00e3 e005 | | Load 0x0,0x5 00e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e5 7801 |x | Jump 0xe7 00e6 00d8 | | Load_Top At_Offset_0 00e7 e5ff | | Load 0x2,-0x1 00e8 8216 | | Call 0x1,0x16 00e9 4802 |H | Short_Literal 0x2 00ea 8220 | | Call 0x1,0x20 00eb c402 | | Store 0x2,0x2 00ec 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x2 = 0xec,0x2 00ed 8217 | | Call 0x1,0x17 00ee 00d9 | | Load_Top At_Offset_1 00ef e006 | | Load 0x0,0x6 00f0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 00f1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0xf1,0x3 00f2 8221 | ! | Call 0x1,0x21 00f3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x4 = 0xf3,0x4 00f4 e004 | | Load 0x0,0x4 00f5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00f6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00f7 TRAP_00d8: 00f7 0007 | | Action Break_Optional 00f8 e007 | | Load 0x0,0x7 ; Debug Table 0x5.0x5 = 0xf8,0x5 00f9 180e | | Execute Package,Field_Execute,Field_Number 0xe 00fa 4805 |H | Short_Literal 0x5 00fb 0092 0307 | | Action Push_String_Extended,0x307 ; "Queue_Client.Display failed." 00fd e008 | | Load 0x0,0x8 00fe 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0108 | | .CONST 0x0108 ; Address of begin 0101 0123 | # | .CONST 0x0123 ; Address of exception handler 0102 0002 | | .CONST 0x0002 ; Number of locals 0103 INIT_0100: 0103 e005 | | Load 0x0,0x5 ; Debug Table 0x6 = .DEBUG 0x0103,0x0542,0x0001,0x0000,0x0036,0xd594,0x0000,0x0044 ; Debug Table 0x6.0x0 = 0x103,0xffff 0104 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0105 02c7 | | Declare_Variable Any 0106 00d8 | | Load_Top At_Offset_0 0107 1c00 | | Execute_Immediate Run_Utility,0x0 0108 BODY_0100: 0108 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x108,0x1 0109 0120 | | Execute Any,Is_Value 010a 6803 |h | Jump_Zero 0x10e 010b e005 | | Load 0x0,0x5 010c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 010d 7801 |x | Jump 0x10f 010e 00d8 | | Load_Top At_Offset_0 010f e5ff | | Load 0x2,-0x1 0110 8216 | | Call 0x1,0x16 0111 4803 |H | Short_Literal 0x3 0112 8220 | | Call 0x1,0x20 0113 c402 | | Store 0x2,0x2 0114 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x2 = 0x114,0x2 0115 8217 | | Call 0x1,0x17 0116 00d9 | | Load_Top At_Offset_1 0117 e006 | | Load 0x0,0x6 0118 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0119 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x3 = 0x119,0x3 011a 00d9 | | Load_Top At_Offset_1 011b e006 | | Load 0x0,0x6 011c 1820 | | Execute Package,Field_Execute,Field_Number 0x20 011d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x4 = 0x11d,0x4 011e 8221 | ! | Call 0x1,0x21 011f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x5 = 0x11f,0x5 0120 e004 | | Load 0x0,0x4 0121 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0122 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0123 TRAP_0100: 0123 0007 | | Action Break_Optional 0124 e007 | | Load 0x0,0x7 ; Debug Table 0x6.0x6 = 0x124,0x6 0125 180e | | Execute Package,Field_Execute,Field_Number 0xe 0126 4805 |H | Short_Literal 0x5 0127 0092 0308 | | Action Push_String_Extended,0x308 ; "Queue_Client.Classes failed." 0129 e008 | | Load 0x0,0x8 012a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 012b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 012c 0000 0000 | | .BLANK 0000[0x4] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0138 | 8 | .CONST 0x0138 ; Address of begin 0131 0157 | W | .CONST 0x0157 ; Address of exception handler 0132 0002 | | .CONST 0x0002 ; Number of locals 0133 INIT_0130: 0133 e005 | | Load 0x0,0x5 ; Debug Table 0x7 = .DEBUG 0x0133,0x0552,0x0001,0x0000,0x0036,0xd594,0x0000,0x0052 ; Debug Table 0x7.0x0 = 0x133,0xffff 0134 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0135 02c7 | | Declare_Variable Any 0136 00d8 | | Load_Top At_Offset_0 0137 1c00 | | Execute_Immediate Run_Utility,0x0 0138 BODY_0130: 0138 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0x138,0x1 0139 0120 | | Execute Any,Is_Value 013a 6803 |h | Jump_Zero 0x13e 013b e005 | | Load 0x0,0x5 013c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 013d 7801 |x | Jump 0x13f 013e 00d8 | | Load_Top At_Offset_0 013f e5ff | | Load 0x2,-0x1 0140 8216 | | Call 0x1,0x16 0141 4804 |H | Short_Literal 0x4 0142 8220 | | Call 0x1,0x20 0143 c402 | | Store 0x2,0x2 0144 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x2 = 0x144,0x2 0145 8217 | | Call 0x1,0x17 0146 00d9 | | Load_Top At_Offset_1 0147 e006 | | Load 0x0,0x6 0148 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0149 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x3 = 0x149,0x3 014a 00d9 | | Load_Top At_Offset_1 014b e006 | | Load 0x0,0x6 014c 1820 | | Execute Package,Field_Execute,Field_Number 0x20 014d e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x4 = 0x14d,0x4 014e 00d9 | | Load_Top At_Offset_1 014f e006 | | Load 0x0,0x6 0150 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0151 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x5 = 0x151,0x5 0152 8221 | ! | Call 0x1,0x21 0153 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x6 = 0x153,0x6 0154 e004 | | Load 0x0,0x4 0155 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0156 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0157 TRAP_0130: 0157 0007 | | Action Break_Optional 0158 e007 | | Load 0x0,0x7 ; Debug Table 0x7.0x7 = 0x158,0x7 0159 180e | | Execute Package,Field_Execute,Field_Number 0xe 015a 4805 |H | Short_Literal 0x5 015b 0092 0309 | | Action Push_String_Extended,0x309 ; "Queue_Client.Devices failed." 015d e008 | | Load 0x0,0x8 015e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 015f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0168 | h | .CONST 0x0168 ; Address of begin 0161 0195 | | .CONST 0x0195 ; Address of exception handler 0162 0002 | | .CONST 0x0002 ; Number of locals 0163 INIT_0160: 0163 e005 | | Load 0x0,0x5 ; Debug Table 0x8 = .DEBUG 0x0163,0x0564,0x0001,0x0000,0x0036,0xd594,0x0000,0x0062 ; Debug Table 0x8.0x0 = 0x163,0xffff 0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0165 02c7 | | Declare_Variable Any 0166 00d8 | | Load_Top At_Offset_0 0167 1c00 | | Execute_Immediate Run_Utility,0x0 0168 BODY_0160: 0168 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x168,0x1 0169 820d | | Call 0x1,0xd 016a 681c |h | Jump_Zero 0x187 016b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x2 = 0x16b,0x2 016c 0120 | | Execute Any,Is_Value 016d 6803 |h | Jump_Zero 0x171 016e e005 | | Load 0x0,0x5 016f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0170 7801 |x | Jump 0x172 0171 00d8 | | Load_Top At_Offset_0 0172 e5ff | | Load 0x2,-0x1 0173 8216 | | Call 0x1,0x16 0174 4805 |H | Short_Literal 0x5 0175 8220 | | Call 0x1,0x20 0176 c402 | | Store 0x2,0x2 0177 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x3 = 0x177,0x3 0178 8217 | | Call 0x1,0x17 0179 00d9 | | Load_Top At_Offset_1 017a e006 | | Load 0x0,0x6 017b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 017c e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x4 = 0x17c,0x4 017d 00d9 | | Load_Top At_Offset_1 017e e006 | | Load 0x0,0x6 017f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0180 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x5 = 0x180,0x5 0181 e002 | | Load 0x0,0x2 0182 180f | | Execute Package,Field_Execute,Field_Number 0xf 0183 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x6 = 0x183,0x6 0184 e002 | | Load 0x0,0x2 0185 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0186 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0187 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x7 = 0x187,0x7 0188 0092 030a | | Action Push_String_Extended,0x30a ; "@" 018a 01df | | Execute Vector,Equal 018b 6804 |h | Jump_Zero 0x190 018c e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x8 = 0x18c,0x8 018d e009 | | Load 0x0,0x9 018e 180f | | Execute Package,Field_Execute,Field_Number 0xf 018f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0190 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x9 = 0x190,0x9 0191 e5ff | | Load 0x2,-0x1 0192 e009 | | Load 0x0,0x9 0193 180d | | Execute Package,Field_Execute,Field_Number 0xd 0194 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0195 TRAP_0160: 0195 0007 | | Action Break_Optional 0196 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x8.0xa = 0x196,0xa 0197 0000 | | .XXX[0x1] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 01a3 | | .CONST 0x01a3 ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0003 | | .CONST 0x0003 ; Number of locals 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x019b,0x057c,0x0002,0x0000,0x0036,0xd9a4,0x0000,0x0060 ; Debug Table 0x9.0x0 = 0x19b,0xffff 019c 01dd | | Execute Vector,First 019d 0a02 | | Execute_Immediate Plus,0x2 019e 00e4 | | Load_Encached Positive_Cache 019f 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 01a0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x1 = 0x1a0,0xfffe 01a1 00e4 | | Load_Encached Positive_Cache 01a2 03f1 | | Declare_Variable Discrete,With_Value 01a3 BODY_0198: 01a3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x2 = 0x1a3,0x1 01a4 820d | | Call 0x1,0xd 01a5 700d |p | Jump_Nonzero 0x1b3 01a6 e007 | | Load 0x0,0x7 ; Debug Table 0x9.0x3 = 0x1a6,0x2 01a7 180e | | Execute Package,Field_Execute,Field_Number 0xe 01a8 4807 |H | Short_Literal 0x7 01a9 4822 |H" | Short_Literal 0x22 01aa e5ff | | Load 0x2,-0x1 01ab 01ca | | Execute Vector,Prepend 01ac 0092 030b | | Action Push_String_Extended,0x30b ; "\x22 is not a network name." 01ae 01cc | | Execute Vector,Catenate 01af e008 | | Load 0x0,0x8 01b0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01b1 48e0 |H | Short_Literal 0xe0 ; Debug Table 0x9.0x4 = 0x1b1,0x3 01b2 0257 | W | Execute Discrete,Raise 01b3 00cf | | Action Mark_Auxiliary 01b4 7811 |x | Jump 0x1c6 01b5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x5 = 0x1b5,0x5 01b6 e5ff | | Load 0x2,-0x1 01b7 01d7 | | Execute Vector,Field_Read 01b8 0b2e | . | Execute_Immediate Case_Compare,0x2e 01b9 7008 |p | Jump_Nonzero 0x1c2 01ba 0b21 | ! | Execute_Immediate Case_Compare,0x21 01bb 7006 |p | Jump_Nonzero 0x1c2 01bc 0b24 | $ | Execute_Immediate Case_Compare,0x24 01bd 7004 |p | Jump_Nonzero 0x1c2 01be 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x6 = 0x1be,0x7 01bf 0a01 | | Execute_Immediate Plus,0x1 01c0 005b | [ | Store_Top Discrete,At_Offset_3 01c1 7802 |x | Jump 0x1c4 01c2 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x9.0x7 = 0x1c2,0x6 01c3 7807 |x | Jump 0x1cb 01c4 00d1 | | Pop_Control Pop_Count_1 01c5 00c9 | | Action Pop_Auxiliary_Loop 01c6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x8 = 0x1c6,0x4 01c7 e5ff | | Load 0x2,-0x1 01c8 01dc | | Execute Vector,Last 01c9 027a | z | Execute Discrete,Less_Equal 01ca 77ea |w | Jump_Nonzero 0x1b5 01cb 00ce | | Action Pop_Auxiliary 01cc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x9 = 0x1cc,0x8 01cd 00d9 | | Load_Top At_Offset_1 01ce 0aff | | Execute_Immediate Plus,-0x1 01cf 0248 | H | Execute Discrete,Check_In_Integer 01d0 e5ff | | Load 0x2,-0x1 01d1 01cf | | Execute Vector,Slice_Read 01d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d3 0000 0000 | | .BLANK 0000[0x5] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01e5 | | .CONST 0x01e5 ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0002 | | .CONST 0x0002 ; Number of locals 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x01db,0x0592,0x0002,0x0000,0x0036,0xd9a4,0x0000,0x00c8 ; Debug Table 0xa.0x0 = 0x1db,0xffff 01dc 01dd | | Execute Vector,First 01dd 0a02 | | Execute_Immediate Plus,0x2 01de 0248 | H | Execute Discrete,Check_In_Integer 01df 00db | | Load_Top At_Offset_3 01e0 8216 | | Call 0x1,0x16 01e1 01db | | Execute Vector,Length 01e2 0273 | s | Execute Discrete,Plus 01e3 00e4 | | Load_Encached Positive_Cache 01e4 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 01e5 BODY_01d8: 01e5 00cf | | Action Mark_Auxiliary 01e6 781e |x | Jump 0x205 01e7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x1 = 0x1e7,0x2 01e8 e5ff | | Load 0x2,-0x1 01e9 01d7 | | Execute Vector,Field_Read 01ea 0b2e | . | Execute_Immediate Case_Compare,0x2e 01eb 7014 |p | Jump_Nonzero 0x200 01ec 0b24 | $ | Execute_Immediate Case_Compare,0x24 01ed 7012 |p | Jump_Nonzero 0x200 01ee 0b21 | ! | Execute_Immediate Case_Compare,0x21 01ef 7002 |p | Jump_Nonzero 0x1f2 01f0 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xa.0x2 = 0x1f0,0x6 01f1 7818 |x | Jump 0x20a 01f2 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x3 = 0x1f2,0x4 01f3 e5ff | | Load 0x2,-0x1 01f4 01dc | | Execute Vector,Last 01f5 027c | | | Execute Discrete,Less 01f6 6809 |h | Jump_Zero 0x200 01f7 00da | | Load_Top At_Offset_2 01f8 0a01 | | Execute_Immediate Plus,0x1 01f9 0248 | H | Execute Discrete,Check_In_Integer 01fa e5ff | | Load 0x2,-0x1 01fb 01d7 | | Execute Vector,Field_Read 01fc 0f21 | ! | Execute_Immediate Equal,0x21 01fd 6802 |h | Jump_Zero 0x200 01fe 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xa.0x4 = 0x1fe,0x5 01ff 780a |x | Jump 0x20a 0200 00d1 | | Pop_Control Pop_Count_1 0201 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x5 = 0x201,0x7 0202 0a01 | | Execute_Immediate Plus,0x1 0203 005a | Z | Store_Top Discrete,At_Offset_2 0204 00c9 | | Action Pop_Auxiliary_Loop 0205 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x6 = 0x205,0x1 0206 e5ff | | Load 0x2,-0x1 0207 01dc | | Execute Vector,Last 0208 027a | z | Execute Discrete,Less_Equal 0209 77dd |w | Jump_Nonzero 0x1e7 020a 00ce | | Action Pop_Auxiliary 020b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x7 = 0x20b,0x8 020c e5ff | | Load 0x2,-0x1 020d 01dc | | Execute Vector,Last 020e e5ff | | Load 0x2,-0x1 020f 01cf | | Execute Vector,Slice_Read 0210 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0211 0000 0000 | | .BLANK 0000[0x7] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0234 | 4 | .CONST 0x0234 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b e5fd | | Load 0x2,-0x3 ; Debug Table 0xb = .DEBUG 0x021b,0x05a4,0x0001,0x0000,0x0036,0xd9a4,0x0000,0x0153 ; Debug Table 0xb.0x0 = 0x21b,0x1 021c 0120 | | Execute Any,Is_Value 021d 6803 |h | Jump_Zero 0x221 021e e005 | | Load 0x0,0x5 021f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0220 7801 |x | Jump 0x222 0221 e5fd | | Load 0x2,-0x3 0222 4801 |H | Short_Literal 0x1 0223 4909 |I | Short_Literal 0x109 0224 e21a | | Load 0x1,0x1a 0225 e5fe | | Load 0x2,-0x2 0226 8215 | | Call 0x1,0x15 0227 e5fe | | Load 0x2,-0x2 0228 8214 | | Call 0x1,0x14 0229 e5ff | | Load 0x2,-0x1 022a e218 | | Load 0x1,0x18 022b e219 | | Load 0x1,0x19 022c e21a | | Load 0x1,0x1a 022d e21b | | Load 0x1,0x1b 022e e21c | | Load 0x1,0x1c 022f 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0230 e002 | | Load 0x0,0x2 0231 180d | | Execute Package,Field_Execute,Field_Number 0xd 0232 c5fd | | Store 0x2,-0x3 0233 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0234 TRAP_0218: 0234 e001 | | Load 0x0,0x1 0235 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0236 010f | | Execute Exception,Equal 0237 6810 |h | Jump_Zero 0x248 0238 e007 | | Load 0x0,0x7 ; Debug Table 0xb.0x1 = 0x238,0x2 0239 180e | | Execute Package,Field_Execute,Field_Number 0xe 023a 4807 |H | Short_Literal 0x7 023b 4822 |H" | Short_Literal 0x22 023c e5fe | | Load 0x2,-0x2 023d 01ca | | Execute Vector,Prepend 023e 0092 030c | | Action Push_String_Extended,0x30c ; "\x22 is not a machine name" 0240 01cc | | Execute Vector,Catenate 0241 0092 030d | | Action Push_String_Extended,0x30d ; " (Transport_Name.Undefined)." 0243 01cc | | Execute Vector,Catenate 0244 e008 | | Load 0x0,0x8 0245 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0246 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x2 = 0x246,0x3 0247 0101 | | Execute Exception,Reraise 0248 e007 | | Load 0x0,0x7 ; Debug Table 0xb.0x3 = 0x248,0x4 0249 180e | | Execute Package,Field_Execute,Field_Number 0xe 024a 4807 |H | Short_Literal 0x7 024b 0092 030e | | Action Push_String_Extended,0x30e ; "Cannot connect to queue server on machine " 024d e5fe | | Load 0x2,-0x2 024e 01cc | | Execute Vector,Catenate 024f e008 | | Load 0x0,0x8 0250 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0251 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x251,0x5 0252 0101 | | Execute Exception,Reraise 0253 0000 0000 | | .BLANK 0000[0x5] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 025f | _ | .CONST 0x025f ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x025b,0x05b0,0x0001,0x0000,0x0036,0xd9a4,0x0000,0x01aa ; Debug Table 0xc.0x0 = 0x25b,0x1 025c e002 | | Load 0x0,0x2 025d 180f | | Execute Package,Field_Execute,Field_Number 0xf 025e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 025f TRAP_0258: 025f 010e | | Execute Exception,Is_Constraint_Error 0260 6809 |h | Jump_Zero 0x26a 0261 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x1 = 0x261,0x2 0262 180e | | Execute Package,Field_Execute,Field_Number 0xe 0263 4808 |H | Short_Literal 0x8 0264 0092 030f | | Action Push_String_Extended,0x30f ; "Constraint_Error was raised." 0266 e008 | | Load 0x0,0x8 0267 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0268 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x2 = 0x268,0x3 0269 0101 | | Execute Exception,Reraise 026a 010d | | Execute Exception,Is_Numeric_Error 026b 6809 |h | Jump_Zero 0x275 026c e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x3 = 0x26c,0x4 026d 180e | | Execute Package,Field_Execute,Field_Number 0xe 026e 4808 |H | Short_Literal 0x8 026f 0092 0310 | | Action Push_String_Extended,0x310 ; "Numeric_Error was raised." 0271 e008 | | Load 0x0,0x8 0272 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0273 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x4 = 0x273,0x5 0274 0101 | | Execute Exception,Reraise 0275 010c | | Execute Exception,Is_Program_Error 0276 6809 |h | Jump_Zero 0x280 0277 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x5 = 0x277,0x6 0278 180e | | Execute Package,Field_Execute,Field_Number 0xe 0279 4808 |H | Short_Literal 0x8 027a 0092 0311 | | Action Push_String_Extended,0x311 ; "Program_Error was raised." 027c e008 | | Load 0x0,0x8 027d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 027e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x6 = 0x27e,0x7 027f 0101 | | Execute Exception,Reraise 0280 010b | | Execute Exception,Is_Storage_Error 0281 6809 |h | Jump_Zero 0x28b 0282 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x7 = 0x282,0x8 0283 180e | | Execute Package,Field_Execute,Field_Number 0xe 0284 4808 |H | Short_Literal 0x8 0285 0092 0312 | | Action Push_String_Extended,0x312 ; "Storage_Error was raised." 0287 e008 | | Load 0x0,0x8 0288 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0289 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x8 = 0x289,0x9 028a 0101 | | Execute Exception,Reraise 028b 010a | | Execute Exception,Is_Tasking_Error 028c 6809 |h | Jump_Zero 0x296 028d e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x9 = 0x28d,0xa 028e 180e | | Execute Package,Field_Execute,Field_Number 0xe 028f 4808 |H | Short_Literal 0x8 0290 0092 0313 | | Action Push_String_Extended,0x313 ; "Tasking_Error was raised." 0292 e008 | | Load 0x0,0x8 0293 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0294 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xa = 0x294,0xb 0295 0101 | | Execute Exception,Reraise 0296 e00a | | Load 0x0,0xa 0297 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0298 010f | | Execute Exception,Equal 0299 6809 |h | Jump_Zero 0x2a3 029a e007 | | Load 0x0,0x7 ; Debug Table 0xc.0xb = 0x29a,0xc 029b 180e | | Execute Package,Field_Execute,Field_Number 0xe 029c 4808 |H | Short_Literal 0x8 029d 0092 0314 | | Action Push_String_Extended,0x314 ; "Rpc.Protocol_Error was raised." 029f e008 | | Load 0x0,0x8 02a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xc = 0x2a1,0xd 02a2 0101 | | Execute Exception,Reraise 02a3 e00a | | Load 0x0,0xa 02a4 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 02a5 010f | | Execute Exception,Equal 02a6 6809 |h | Jump_Zero 0x2b0 02a7 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0xd = 0x2a7,0xe 02a8 180e | | Execute Package,Field_Execute,Field_Number 0xe 02a9 4808 |H | Short_Literal 0x8 02aa 0092 0315 | | Action Push_String_Extended,0x315 ; "Rpc.No_Such_Program was raised." 02ac e008 | | Load 0x0,0x8 02ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xe = 0x2ae,0xf 02af 0101 | | Execute Exception,Reraise 02b0 e00a | | Load 0x0,0xa 02b1 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 02b2 010f | | Execute Exception,Equal 02b3 6809 |h | Jump_Zero 0x2bd 02b4 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0xf = 0x2b4,0x10 02b5 180e | | Execute Package,Field_Execute,Field_Number 0xe 02b6 4808 |H | Short_Literal 0x8 02b7 0092 0316 | | Action Push_String_Extended,0x316 ; "Rpc.No_Such_Version was raised." 02b9 e008 | | Load 0x0,0x8 02ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02bb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x10 = 0x2bb,0x11 02bc 0101 | | Execute Exception,Reraise 02bd e00a | | Load 0x0,0xa 02be 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 02bf 010f | | Execute Exception,Equal 02c0 6809 |h | Jump_Zero 0x2ca 02c1 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x11 = 0x2c1,0x12 02c2 180e | | Execute Package,Field_Execute,Field_Number 0xe 02c3 4808 |H | Short_Literal 0x8 02c4 0092 0317 | | Action Push_String_Extended,0x317 ; "Rpc.No_Such_Procedure was raised." 02c6 e008 | | Load 0x0,0x8 02c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02c8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x12 = 0x2c8,0x13 02c9 0101 | | Execute Exception,Reraise 02ca e00a | | Load 0x0,0xa 02cb 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02cc 010f | | Execute Exception,Equal 02cd 6809 |h | Jump_Zero 0x2d7 02ce e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x13 = 0x2ce,0x14 02cf 180e | | Execute Package,Field_Execute,Field_Number 0xe 02d0 4808 |H | Short_Literal 0x8 02d1 0092 0318 | | Action Push_String_Extended,0x318 ; "Rpc.Other_Error was raised." 02d3 e008 | | Load 0x0,0x8 02d4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02d5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x14 = 0x2d5,0x15 02d6 0101 | | Execute Exception,Reraise 02d7 e00a | | Load 0x0,0xa 02d8 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 02d9 010f | | Execute Exception,Equal 02da 6809 |h | Jump_Zero 0x2e4 02db e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x15 = 0x2db,0x16 02dc 180e | | Execute Package,Field_Execute,Field_Number 0xe 02dd 4808 |H | Short_Literal 0x8 02de 0092 0319 | | Action Push_String_Extended,0x319 ; "Rpc.Invalid_Argument was raised." 02e0 e008 | | Load 0x0,0x8 02e1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x16 = 0x2e2,0x17 02e3 0101 | | Execute Exception,Reraise 02e4 e00a | | Load 0x0,0xa 02e5 1b22 | " | Execute Package,Field_Read,Field_Number 0x22 02e6 010f | | Execute Exception,Equal 02e7 6809 |h | Jump_Zero 0x2f1 02e8 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x17 = 0x2e8,0x18 02e9 180e | | Execute Package,Field_Execute,Field_Number 0xe 02ea 4808 |H | Short_Literal 0x8 02eb 0092 031a | | Action Push_String_Extended,0x31a ; "Rpc.Server_Defined_Error was raised." 02ed e008 | | Load 0x0,0x8 02ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x18 = 0x2ef,0x19 02f0 0101 | | Execute Exception,Reraise 02f1 e00a | | Load 0x0,0xa 02f2 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b 02f3 010f | | Execute Exception,Equal 02f4 6809 |h | Jump_Zero 0x2fe 02f5 e007 | | Load 0x0,0x7 ; Debug Table 0xc.0x19 = 0x2f5,0x1a 02f6 180e | | Execute Package,Field_Execute,Field_Number 0xe 02f7 4808 |H | Short_Literal 0x8 02f8 0092 031b | | Action Push_String_Extended,0x31b ; "Rpc.Username_or_Password_Error was raised." 02fa e008 | | Load 0x0,0x8 02fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x1a = 0x2fc,0x1b 02fd 0101 | | Execute Exception,Reraise 02fe 0100 | | Execute Exception,Raise 02ff 0000 | | .XXX[0x1] 0300 0000 0000 | | .LITERAL {0x00000000, 0x0036d9a4} 0304 ; -------------------------------------------------------------------------------------- 0304 ; STRING TABLE 0304 ; -------------------------------------------------------------------------------------- 0304 0032 | 2 | .STRTAB 0x0032->0x031d ; "!!" 0305 0032 | 2 | .STRTAB 0x0032->0x031e ; "Queue_Client.Class_Exists failed." 0306 0051 | Q | .STRTAB 0x0051->0x032e ; "Queue_Client.Spool failed." 0307 0069 | i | .STRTAB 0x0069->0x033b ; "Queue_Client.Display failed." 0308 0083 | | .STRTAB 0x0083->0x0349 ; "Queue_Client.Classes failed." 0309 009d | | .STRTAB 0x009d->0x0357 ; "Queue_Client.Devices failed." 030a 00b7 | | .STRTAB 0x00b7->0x0365 ; "@" 030b 00b6 | | .STRTAB 0x00b6->0x0366 ; "\x22 is not a network name." 030c 00cc | | .STRTAB 0x00cc->0x0372 ; "\x22 is not a machine name" 030d 00e1 | | .STRTAB 0x00e1->0x037d ; " (Transport_Name.Undefined)." 030e 00fb | | .STRTAB 0x00fb->0x038b ; "Cannot connect to queue server on machine " 030f 0123 | # | .STRTAB 0x0123->0x03a0 ; "Constraint_Error was raised." 0310 013d | = | .STRTAB 0x013d->0x03ae ; "Numeric_Error was raised." 0311 0154 | T | .STRTAB 0x0154->0x03bb ; "Program_Error was raised." 0312 016b | k | .STRTAB 0x016b->0x03c7 ; "Storage_Error was raised." 0313 0182 | | .STRTAB 0x0182->0x03d4 ; "Tasking_Error was raised." 0314 0199 | | .STRTAB 0x0199->0x03e0 ; "Rpc.Protocol_Error was raised." 0315 01b5 | | .STRTAB 0x01b5->0x03ef ; "Rpc.No_Such_Program was raised." 0316 01d2 | | .STRTAB 0x01d2->0x03ff ; "Rpc.No_Such_Version was raised." 0317 01ef | | .STRTAB 0x01ef->0x040e ; "Rpc.No_Such_Procedure was raised." 0318 020e | | .STRTAB 0x020e->0x041f ; "Rpc.Other_Error was raised." 0319 0227 | ' | .STRTAB 0x0227->0x042c ; "Rpc.Invalid_Argument was raised." 031a 0245 | E | .STRTAB 0x0245->0x043c ; "Rpc.Server_Defined_Error was raised." 031b 0267 | g | .STRTAB 0x0267->0x044e ; "Rpc.Username_or_Password_Error was raised." 031c 028f | | .STREND 0x028f->0x0463 031d 2121 5175 |!!Qu| .STRTAB_STRINGS 0464 0000 0000 | | .BLANK 0000[0x4] 0468 ; -------------------------------------------------------------------------------------- 0468 ; Debug Table 0468 ; -------------------------------------------------------------------------------------- 0468 0003 000d | | .CONST 0x0003,0x000d 046a 000b 04d2 | | .DEBUG 0x000b,0x04d2,0x8000,0x0000,0x0036,0xd594,0x0000,0x0005 0472 001c 04e6 | | .DEBUG 0x001c,0x04e6,0x8000,0x0000,0x0036,0xd9a4,0x0000,0x0019 047a 0053 0504 | S | .DEBUG 0x0053,0x0504,0x0002,0x0000,0x0036,0xd594,0x0000,0x0012 0482 006b 0508 | k | .DEBUG 0x006b,0x0508,0x0002,0x0000,0x0036,0xd594,0x0000,0x001b 048a 00a3 051e | | .DEBUG 0x00a3,0x051e,0x0001,0x0000,0x0036,0xd594,0x0000,0x0026 0492 00db 0534 | 4| .DEBUG 0x00db,0x0534,0x0001,0x0000,0x0036,0xd594,0x0000,0x003a 049a 0103 0542 | B| .DEBUG 0x0103,0x0542,0x0001,0x0000,0x0036,0xd594,0x0000,0x0044 04a2 0133 0552 | 3 R| .DEBUG 0x0133,0x0552,0x0001,0x0000,0x0036,0xd594,0x0000,0x0052 04aa 0163 0564 | c d| .DEBUG 0x0163,0x0564,0x0001,0x0000,0x0036,0xd594,0x0000,0x0062 04b2 019b 057c | || .DEBUG 0x019b,0x057c,0x0002,0x0000,0x0036,0xd9a4,0x0000,0x0060 04ba 01db 0592 | | .DEBUG 0x01db,0x0592,0x0002,0x0000,0x0036,0xd9a4,0x0000,0x00c8 04c2 021b 05a4 | | .DEBUG 0x021b,0x05a4,0x0001,0x0000,0x0036,0xd9a4,0x0000,0x0153 04ca 025b 05b0 | [ | .DEBUG 0x025b,0x05b0,0x0001,0x0000,0x0036,0xd9a4,0x0000,0x01aa 04d2 ; -------------------------------------------------------------------------------------- 04d2 ; Debug3 Subtable 0x0 04d2 ; -------------------------------------------------------------------------------------- 04d2 0009 0000 | | .DBG3TAB 0x0009,0x0000 04d4 000b ffff | | .CONST 0x000b,0xffff 04d6 000c fffe | | .CONST 0x000c,0xfffe 04d8 000d fffd | | .CONST 0x000d,0xfffd 04da 000f fffc | | .CONST 0x000f,0xfffc 04dc 0011 fffb | | .CONST 0x0011,0xfffb 04de 0013 fffa | | .CONST 0x0013,0xfffa 04e0 0015 fff9 | | .CONST 0x0015,0xfff9 04e2 0017 fff8 | | .CONST 0x0017,0xfff8 04e4 0019 fff7 | | .CONST 0x0019,0xfff7 04e6 ; -------------------------------------------------------------------------------------- 04e6 ; Debug3 Subtable 0x1 04e6 ; -------------------------------------------------------------------------------------- 04e6 000e 0000 | | .DBG3TAB 0x000e,0x0000 04e8 001c ffff | | .CONST 0x001c,0xffff 04ea 001f fffe | | .CONST 0x001f,0xfffe 04ec 0022 fffd | " | .CONST 0x0022,0xfffd 04ee 0024 fffc | $ | .CONST 0x0024,0xfffc 04f0 0026 fffb | & | .CONST 0x0026,0xfffb 04f2 0028 fffa | ( | .CONST 0x0028,0xfffa 04f4 0037 fff9 | 7 | .CONST 0x0037,0xfff9 04f6 0039 fff8 | 9 | .CONST 0x0039,0xfff8 04f8 003b fff7 | ; | .CONST 0x003b,0xfff7 04fa 003d fff6 | = | .CONST 0x003d,0xfff6 04fc 003f fff5 | ? | .CONST 0x003f,0xfff5 04fe 0041 fff4 | A | .CONST 0x0041,0xfff4 0500 0043 fff3 | C | .CONST 0x0043,0xfff3 0502 0045 fff2 | E | .CONST 0x0045,0xfff2 0504 ; -------------------------------------------------------------------------------------- 0504 ; Debug3 Subtable 0x2 0504 ; -------------------------------------------------------------------------------------- 0504 0000 0001 | | .DBG3TAB 0x0000,0x0001 0506 0053 0001 | S | .CONST 0x0053,0x0001 0508 ; -------------------------------------------------------------------------------------- 0508 ; Debug3 Subtable 0x3 0508 ; -------------------------------------------------------------------------------------- 0508 0002 0008 | | .DBG3TAB 0x0002,0x0008 050a 006b ffff | k | .CONST 0x006b,0xffff 050c 0070 fffe | p | .CONST 0x0070,0xfffe 050e 0072 0001 | r | .CONST 0x0072,0x0001 0510 007e 0002 | ~ | .CONST 0x007e,0x0002 0512 0083 0003 | | .CONST 0x0083,0x0003 0514 0085 0004 | | .CONST 0x0085,0x0004 0516 008a 0005 | | .CONST 0x008a,0x0005 0518 008d 0006 | | .CONST 0x008d,0x0006 051a 0090 0007 | | .CONST 0x0090,0x0007 051c 0097 0008 | | .CONST 0x0097,0x0008 051e ; -------------------------------------------------------------------------------------- 051e ; Debug3 Subtable 0x4 051e ; -------------------------------------------------------------------------------------- 051e 0001 0009 | | .DBG3TAB 0x0001,0x0009 0520 00a3 ffff | | .CONST 0x00a3,0xffff 0522 00a8 0001 | | .CONST 0x00a8,0x0001 0524 00b4 0002 | | .CONST 0x00b4,0x0002 0526 00b9 0003 | | .CONST 0x00b9,0x0003 0528 00bd 0004 | | .CONST 0x00bd,0x0004 052a 00c1 0005 | | .CONST 0x00c1,0x0005 052c 00c4 0006 | | .CONST 0x00c4,0x0006 052e 00c6 0007 | | .CONST 0x00c6,0x0007 0530 00cb 0008 | | .CONST 0x00cb,0x0008 0532 00d2 0009 | | .CONST 0x00d2,0x0009 0534 ; -------------------------------------------------------------------------------------- 0534 ; Debug3 Subtable 0x5 0534 ; -------------------------------------------------------------------------------------- 0534 0001 0005 | | .DBG3TAB 0x0001,0x0005 0536 00db ffff | | .CONST 0x00db,0xffff 0538 00e0 0001 | | .CONST 0x00e0,0x0001 053a 00ec 0002 | | .CONST 0x00ec,0x0002 053c 00f1 0003 | | .CONST 0x00f1,0x0003 053e 00f3 0004 | | .CONST 0x00f3,0x0004 0540 00f8 0005 | | .CONST 0x00f8,0x0005 0542 ; -------------------------------------------------------------------------------------- 0542 ; Debug3 Subtable 0x6 0542 ; -------------------------------------------------------------------------------------- 0542 0001 0006 | | .DBG3TAB 0x0001,0x0006 0544 0103 ffff | | .CONST 0x0103,0xffff 0546 0108 0001 | | .CONST 0x0108,0x0001 0548 0114 0002 | | .CONST 0x0114,0x0002 054a 0119 0003 | | .CONST 0x0119,0x0003 054c 011d 0004 | | .CONST 0x011d,0x0004 054e 011f 0005 | | .CONST 0x011f,0x0005 0550 0124 0006 | $ | .CONST 0x0124,0x0006 0552 ; -------------------------------------------------------------------------------------- 0552 ; Debug3 Subtable 0x7 0552 ; -------------------------------------------------------------------------------------- 0552 0001 0007 | | .DBG3TAB 0x0001,0x0007 0554 0133 ffff | 3 | .CONST 0x0133,0xffff 0556 0138 0001 | 8 | .CONST 0x0138,0x0001 0558 0144 0002 | D | .CONST 0x0144,0x0002 055a 0149 0003 | I | .CONST 0x0149,0x0003 055c 014d 0004 | M | .CONST 0x014d,0x0004 055e 0151 0005 | Q | .CONST 0x0151,0x0005 0560 0153 0006 | S | .CONST 0x0153,0x0006 0562 0158 0007 | X | .CONST 0x0158,0x0007 0564 ; -------------------------------------------------------------------------------------- 0564 ; Debug3 Subtable 0x8 0564 ; -------------------------------------------------------------------------------------- 0564 0001 000a | | .DBG3TAB 0x0001,0x000a 0566 0163 ffff | c | .CONST 0x0163,0xffff 0568 0168 0001 | h | .CONST 0x0168,0x0001 056a 016b 0002 | k | .CONST 0x016b,0x0002 056c 0177 0003 | w | .CONST 0x0177,0x0003 056e 017c 0004 | | | .CONST 0x017c,0x0004 0570 0180 0005 | | .CONST 0x0180,0x0005 0572 0183 0006 | | .CONST 0x0183,0x0006 0574 0187 0007 | | .CONST 0x0187,0x0007 0576 018c 0008 | | .CONST 0x018c,0x0008 0578 0190 0009 | | .CONST 0x0190,0x0009 057a 0196 000a | | .CONST 0x0196,0x000a 057c ; -------------------------------------------------------------------------------------- 057c ; Debug3 Subtable 0x9 057c ; -------------------------------------------------------------------------------------- 057c 0002 0008 | | .DBG3TAB 0x0002,0x0008 057e 019b ffff | | .CONST 0x019b,0xffff 0580 01a0 fffe | | .CONST 0x01a0,0xfffe 0582 01a3 0001 | | .CONST 0x01a3,0x0001 0584 01a6 0002 | | .CONST 0x01a6,0x0002 0586 01b1 0003 | | .CONST 0x01b1,0x0003 0588 01b5 0005 | | .CONST 0x01b5,0x0005 058a 01be 0007 | | .CONST 0x01be,0x0007 058c 01c2 0006 | | .CONST 0x01c2,0x0006 058e 01c6 0004 | | .CONST 0x01c6,0x0004 0590 01cc 0008 | | .CONST 0x01cc,0x0008 0592 ; -------------------------------------------------------------------------------------- 0592 ; Debug3 Subtable 0xa 0592 ; -------------------------------------------------------------------------------------- 0592 0001 0007 | | .DBG3TAB 0x0001,0x0007 0594 01db ffff | | .CONST 0x01db,0xffff 0596 01e7 0002 | | .CONST 0x01e7,0x0002 0598 01f0 0006 | | .CONST 0x01f0,0x0006 059a 01f2 0004 | | .CONST 0x01f2,0x0004 059c 01fe 0005 | | .CONST 0x01fe,0x0005 059e 0201 0007 | | .CONST 0x0201,0x0007 05a0 0205 0001 | | .CONST 0x0205,0x0001 05a2 020b 0008 | | .CONST 0x020b,0x0008 05a4 ; -------------------------------------------------------------------------------------- 05a4 ; Debug3 Subtable 0xb 05a4 ; -------------------------------------------------------------------------------------- 05a4 0000 0005 | | .DBG3TAB 0x0000,0x0005 05a6 021b 0001 | | .CONST 0x021b,0x0001 05a8 0238 0002 | 8 | .CONST 0x0238,0x0002 05aa 0246 0003 | F | .CONST 0x0246,0x0003 05ac 0248 0004 | H | .CONST 0x0248,0x0004 05ae 0251 0005 | Q | .CONST 0x0251,0x0005 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; Debug3 Subtable 0xc 05b0 ; -------------------------------------------------------------------------------------- 05b0 0000 001b | | .DBG3TAB 0x0000,0x001b 05b2 025b 0001 | [ | .CONST 0x025b,0x0001 05b4 0261 0002 | a | .CONST 0x0261,0x0002 05b6 0268 0003 | h | .CONST 0x0268,0x0003 05b8 026c 0004 | l | .CONST 0x026c,0x0004 05ba 0273 0005 | s | .CONST 0x0273,0x0005 05bc 0277 0006 | w | .CONST 0x0277,0x0006 05be 027e 0007 | ~ | .CONST 0x027e,0x0007 05c0 0282 0008 | | .CONST 0x0282,0x0008 05c2 0289 0009 | | .CONST 0x0289,0x0009 05c4 028d 000a | | .CONST 0x028d,0x000a 05c6 0294 000b | | .CONST 0x0294,0x000b 05c8 029a 000c | | .CONST 0x029a,0x000c 05ca 02a1 000d | | .CONST 0x02a1,0x000d 05cc 02a7 000e | | .CONST 0x02a7,0x000e 05ce 02ae 000f | | .CONST 0x02ae,0x000f 05d0 02b4 0010 | | .CONST 0x02b4,0x0010 05d2 02bb 0011 | | .CONST 0x02bb,0x0011 05d4 02c1 0012 | | .CONST 0x02c1,0x0012 05d6 02c8 0013 | | .CONST 0x02c8,0x0013 05d8 02ce 0014 | | .CONST 0x02ce,0x0014 05da 02d5 0015 | | .CONST 0x02d5,0x0015 05dc 02db 0016 | | .CONST 0x02db,0x0016 05de 02e2 0017 | | .CONST 0x02e2,0x0017 05e0 02e8 0018 | | .CONST 0x02e8,0x0018 05e2 02ef 0019 | | .CONST 0x02ef,0x0019 05e4 02f5 001a | | .CONST 0x02f5,0x001a 05e6 02fc 001b | | .CONST 0x02fc,0x001b 05e8 0000 0000 | | .BLANK 0000[0x18]