|
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: 2048 (0x800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1df4c9
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0290 | | .CONST 0x0290 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0025 | % | .CONST 0x0025 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0005 | | .CONST 0x0005 ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 0322 | " | Declare_Variable Record 001d 00d8 | | Load_Top At_Offset_0 001e 1c00 | | Execute_Immediate Run_Utility,0x0 001f e003 | | Load 0x0,0x3 0020 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0021 e004 | | Load 0x0,0x4 0022 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0023 029f 003b | ;| Declare_Subprogram INIT_0038,For_Call 0025 BODY_0018: 0025 0092 01dd | | Action Push_String_Extended,0x1dd ; "ORB : ready..." 0027 e005 | | Load 0x0,0x5 0028 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0029 00cf | | Action Mark_Auxiliary 002a 8006 | | Call 0x0,0x6 002b 7006 |p | Jump_Nonzero 0x32 002c e402 | | Load 0x2,0x2 002d 8007 | | Call 0x0,0x7 002e 00d1 | | Pop_Control Pop_Count_1 002f e402 | | Load 0x2,0x2 0030 8405 | | Call 0x2,0x5 0031 00d1 | | Pop_Control Pop_Count_1 0032 00c9 | | Action Pop_Auxiliary_Loop 0033 7ff6 | | Jump 0x2a 0034 0000 0000 | | .BLANK 0000[0x4] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 0057 | W | .CONST 0x0057 ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 000a | | .CONST 0x000a ; Number of locals 003b INIT_0038: 003b e008 | | Load 0x0,0x8 003c 0007 | | Action Break_Optional 003d e009 | | Load 0x0,0x9 003e 0322 | " | Declare_Variable Record 003f 00d8 | | Load_Top At_Offset_0 0040 1c00 | | Execute_Immediate Run_Utility,0x0 0041 e00a | | Load 0x0,0xa 0042 02ff | | Declare_Variable Variant_Record 0043 00d8 | | Load_Top At_Offset_0 0044 1c00 | | Execute_Immediate Run_Utility,0x0 0045 e00b | | Load 0x0,0xb 0046 0322 | " | Declare_Variable Record 0047 00d8 | | Load_Top At_Offset_0 0048 1c00 | | Execute_Immediate Run_Utility,0x0 0049 00e2 | | Load_Encached Integer_Cache 004a 03e9 | | Declare_Variable Discrete,Duplicate 004b e00c | | Load 0x0,0xc 004c 0322 | " | Declare_Variable Record 004d 00d8 | | Load_Top At_Offset_0 004e 1c00 | | Execute_Immediate Run_Utility,0x0 004f e00a | | Load 0x0,0xa 0050 02ff | | Declare_Variable Variant_Record 0051 00d8 | | Load_Top At_Offset_0 0052 1c00 | | Execute_Immediate Run_Utility,0x0 0053 00d8 | | Load_Top At_Offset_0 0054 02ff | | Declare_Variable Variant_Record 0055 00d8 | | Load_Top At_Offset_0 0056 1c00 | | Execute_Immediate Run_Utility,0x0 0057 BODY_0038: 0057 e008 | | Load 0x0,0x8 0058 e7ff | | Load 0x3,-0x1 0059 800d | | Call 0x0,0xd 005a c602 | | Store 0x3,0x2 005b e602 | | Load 0x3,0x2 005c 460e |F | Jump_Case 0xf 005d 7868 |xh | Jump 0xc6 ; case 0x0 005e 788c |x | Jump 0xeb ; case 0x1 005f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x2 0060 78f1 |x | Jump 0x152 ; case 0x3 0061 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x4 0062 78a0 |x | Jump 0x103 ; case 0x5 0063 7967 |yg | Jump 0x1cb ; case 0x6 0064 7891 |x | Jump 0xf6 ; case 0x7 0065 7935 |y5 | Jump 0x19b ; case 0x8 0066 78dc |x | Jump 0x143 ; case 0x9 0067 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0xa 0068 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0xb 0069 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0xc 006a 796d |ym | Jump 0x1d8 ; case 0xd 006b 7800 |x | Jump 0x6c ; case 0xe 006c 0092 01de | | Action Push_String_Extended,0x1de ; "Orb : received an error on returning a request" 006e e005 | | Load 0x0,0x5 006f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0070 00e2 | | Load_Encached Integer_Cache 0071 e7ff | | Load 0x3,-0x1 0072 800e | | Call 0x0,0xe 0073 c606 | | Store 0x3,0x6 0074 e604 | | Load 0x3,0x4 0075 e7ff | | Load 0x3,-0x1 0076 800f | | Call 0x0,0xf 0077 00d1 | | Pop_Control Pop_Count_1 0078 e604 | | Load 0x3,0x4 0079 e403 | | Load 0x2,0x3 007a 8010 | | Call 0x0,0x10 007b a607 | | Store_Unchecked 0x3,0x7 007c 00db | | Load_Top At_Offset_3 007d 00e0 | | Load_Encached Standard_Cache 007e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 007f e606 | | Load 0x3,0x6 0080 00e0 | | Load_Encached Standard_Cache 0081 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0082 01df | | Execute Vector,Equal 0083 681f |h | Jump_Zero 0xa3 0084 00d8 | | Load_Top At_Offset_0 0085 00e2 | | Load_Encached Integer_Cache 0086 e606 | | Load 0x3,0x6 0087 8011 | | Call 0x0,0x11 0088 c607 | | Store 0x3,0x7 0089 00d1 | | Pop_Control Pop_Count_1 008a e7ff | | Load 0x3,-0x1 008b 4800 |H | Short_Literal 0x0 008c 8012 | | Call 0x0,0x12 008d 00d1 | | Pop_Control Pop_Count_1 008e e7ff | | Load 0x3,-0x1 008f 00db | | Load_Top At_Offset_3 0090 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0091 00db | | Load_Top At_Offset_3 0092 00db | | Load_Top At_Offset_3 0093 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0094 00da | | Load_Top At_Offset_2 0095 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0096 e607 | | Load 0x3,0x7 0097 8013 | | Call 0x0,0x13 0098 00d1 | | Pop_Control Pop_Count_1 0099 00da | | Load_Top At_Offset_2 009a 8014 | | Call 0x0,0x14 009b 00db | | Load_Top At_Offset_3 009c 8015 | | Call 0x0,0x15 009d e403 | | Load 0x2,0x3 009e 4800 |H | Short_Literal 0x0 009f e606 | | Load 0x3,0x6 00a0 8016 | | Call 0x0,0x16 00a1 c403 | | Store 0x2,0x3 00a2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00a3 e7ff | | Load 0x3,-0x1 00a4 4800 |H | Short_Literal 0x0 00a5 8012 | | Call 0x0,0x12 00a6 00d1 | | Pop_Control Pop_Count_1 00a7 e7ff | | Load 0x3,-0x1 00a8 4803 |H | Short_Literal 0x3 00a9 8017 | | Call 0x0,0x17 00aa 00d1 | | Pop_Control Pop_Count_1 00ab e7ff | | Load 0x3,-0x1 00ac 00db | | Load_Top At_Offset_3 00ad 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00ae 00db | | Load_Top At_Offset_3 00af 00db | | Load_Top At_Offset_3 00b0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00b1 00da | | Load_Top At_Offset_2 00b2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00b3 e607 | | Load 0x3,0x7 00b4 8013 | | Call 0x0,0x13 00b5 00d1 | | Pop_Control Pop_Count_1 00b6 00da | | Load_Top At_Offset_2 00b7 8014 | | Call 0x0,0x14 00b8 00d8 | | Load_Top At_Offset_0 00b9 00e2 | | Load_Encached Integer_Cache 00ba e606 | | Load 0x3,0x6 00bb 8011 | | Call 0x0,0x11 00bc c607 | | Store 0x3,0x7 00bd 00d1 | | Pop_Control Pop_Count_1 00be 00db | | Load_Top At_Offset_3 00bf 8015 | | Call 0x0,0x15 00c0 00d8 | | Load_Top At_Offset_0 00c1 e607 | | Load 0x3,0x7 00c2 e608 | | Load 0x3,0x8 00c3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00c4 8018 | | Call 0x0,0x18 00c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00c6 0092 01df | | Action Push_String_Extended,0x1df ; "Orb : received a Registration" 00c8 e005 | | Load 0x0,0x5 00c9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ca 00db | | Load_Top At_Offset_3 00cb e7ff | | Load 0x3,-0x1 00cc 8019 | | Call 0x0,0x19 00cd 00d1 | | Pop_Control Pop_Count_1 00ce c607 | | Store 0x3,0x7 00cf 00d9 | | Load_Top At_Offset_1 00d0 e607 | | Load 0x3,0x7 00d1 00e0 | | Load_Encached Standard_Cache 00d2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00d3 801a | | Call 0x0,0x1a 00d4 00d1 | | Pop_Control Pop_Count_1 00d5 e7ff | | Load 0x3,-0x1 00d6 00da | | Load_Top At_Offset_2 00d7 801b | | Call 0x0,0x1b 00d8 00d1 | | Pop_Control Pop_Count_1 00d9 e7ff | | Load 0x3,-0x1 00da 480c |H | Short_Literal 0xc 00db 8017 | | Call 0x0,0x17 00dc 00d1 | | Pop_Control Pop_Count_1 00dd e7ff | | Load 0x3,-0x1 00de 00db | | Load_Top At_Offset_3 00df 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00e0 4800 |H | Short_Literal 0x0 00e1 00db | | Load_Top At_Offset_3 00e2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00e3 00da | | Load_Top At_Offset_2 00e4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00e5 e607 | | Load 0x3,0x7 00e6 8013 | | Call 0x0,0x13 00e7 00d1 | | Pop_Control Pop_Count_1 00e8 00da | | Load_Top At_Offset_2 00e9 8014 | | Call 0x0,0x14 00ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00eb 0092 01e0 | | Action Push_String_Extended,0x1e0 ; "Orb : received an unregistration" 00ed e005 | | Load 0x0,0x5 00ee 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ef 00e2 | | Load_Encached Integer_Cache 00f0 e7ff | | Load 0x3,-0x1 00f1 800e | | Call 0x0,0xe 00f2 c606 | | Store 0x3,0x6 00f3 e606 | | Load 0x3,0x6 00f4 801c | | Call 0x0,0x1c 00f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00f6 0092 01e1 | | Action Push_String_Extended,0x1e1 ; "Orb : received an unpublication" 00f8 e005 | | Load 0x0,0x5 00f9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00fa 00e2 | | Load_Encached Integer_Cache 00fb e7ff | | Load 0x3,-0x1 00fc 800e | | Call 0x0,0xe 00fd c606 | | Store 0x3,0x6 00fe e403 | | Load 0x2,0x3 00ff e606 | | Load 0x3,0x6 0100 801d | | Call 0x0,0x1d 0101 c403 | | Store 0x2,0x3 0102 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0103 0092 01e2 | | Action Push_String_Extended,0x1e2 ; "Orb : Received a forward" 0105 e005 | | Load 0x0,0x5 0106 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0107 00e2 | | Load_Encached Integer_Cache 0108 e7ff | | Load 0x3,-0x1 0109 800e | | Call 0x0,0xe 010a c606 | | Store 0x3,0x6 010b 00d8 | | Load_Top At_Offset_0 010c 00e2 | | Load_Encached Integer_Cache 010d e606 | | Load 0x3,0x6 010e 8011 | | Call 0x0,0x11 010f c607 | | Store 0x3,0x7 0110 00d1 | | Pop_Control Pop_Count_1 0111 e403 | | Load 0x2,0x3 0112 4800 |H | Short_Literal 0x0 0113 e606 | | Load 0x3,0x6 0114 8016 | | Call 0x0,0x16 0115 c403 | | Store 0x2,0x3 0116 e7ff | | Load 0x3,-0x1 0117 4805 |H | Short_Literal 0x5 0118 8017 | | Call 0x0,0x17 0119 00d1 | | Pop_Control Pop_Count_1 011a e7ff | | Load 0x3,-0x1 011b 4800 |H | Short_Literal 0x0 011c 8012 | | Call 0x0,0x12 011d 00d1 | | Pop_Control Pop_Count_1 011e e7ff | | Load 0x3,-0x1 011f 00db | | Load_Top At_Offset_3 0120 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0121 00db | | Load_Top At_Offset_3 0122 00db | | Load_Top At_Offset_3 0123 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0124 00da | | Load_Top At_Offset_2 0125 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0126 e607 | | Load 0x3,0x7 0127 8013 | | Call 0x0,0x13 0128 00d1 | | Pop_Control Pop_Count_1 0129 00da | | Load_Top At_Offset_2 012a 8014 | | Call 0x0,0x14 012b 00db | | Load_Top At_Offset_3 012c 8015 | | Call 0x0,0x15 012d 00d8 | | Load_Top At_Offset_0 012e e404 | | Load 0x2,0x4 012f 801e | | Call 0x0,0x1e 0130 6811 |h | Jump_Zero 0x142 0131 00d8 | | Load_Top At_Offset_0 0132 e404 | | Load 0x2,0x4 0133 801f | | Call 0x0,0x1f 0134 a607 | | Store_Unchecked 0x3,0x7 0135 e7ff | | Load 0x3,-0x1 0136 00db | | Load_Top At_Offset_3 0137 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0138 00db | | Load_Top At_Offset_3 0139 00db | | Load_Top At_Offset_3 013a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 013b 00da | | Load_Top At_Offset_2 013c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 013d e607 | | Load 0x3,0x7 013e 8013 | | Call 0x0,0x13 013f 00d1 | | Pop_Control Pop_Count_1 0140 00da | | Load_Top At_Offset_2 0141 8014 | | Call 0x0,0x14 0142 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0143 0092 01e3 | | Action Push_String_Extended,0x1e3 ; "Orb : received an unsubscription" 0145 e005 | | Load 0x0,0x5 0146 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0147 e605 | | Load 0x3,0x5 0148 e7ff | | Load 0x3,-0x1 0149 e403 | | Load 0x2,0x3 014a 8020 | | Call 0x0,0x20 014b 00d1 | | Pop_Control Pop_Count_1 014c e404 | | Load 0x2,0x4 014d e605 | | Load 0x3,0x5 014e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 014f 8021 | ! | Call 0x0,0x21 0150 c404 | | Store 0x2,0x4 0151 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0152 0092 01e4 | | Action Push_String_Extended,0x1e4 ; "Orb : received a request..." 0154 e005 | | Load 0x0,0x5 0155 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0156 e604 | | Load 0x3,0x4 0157 e7ff | | Load 0x3,-0x1 0158 800f | | Call 0x0,0xf 0159 00d1 | | Pop_Control Pop_Count_1 015a 00e2 | | Load_Encached Integer_Cache 015b e7ff | | Load 0x3,-0x1 015c 800e | | Call 0x0,0xe 015d c606 | | Store 0x3,0x6 015e e604 | | Load 0x3,0x4 015f e403 | | Load 0x2,0x3 0160 8022 | " | Call 0x0,0x22 0161 6823 |h# | Jump_Zero 0x185 0162 e604 | | Load 0x3,0x4 0163 e403 | | Load 0x2,0x3 0164 8010 | | Call 0x0,0x10 0165 a607 | | Store_Unchecked 0x3,0x7 0166 e403 | | Load 0x2,0x3 0167 4801 |H | Short_Literal 0x1 0168 e607 | | Load 0x3,0x7 0169 8016 | | Call 0x0,0x16 016a c403 | | Store 0x2,0x3 016b e604 | | Load 0x3,0x4 016c e606 | | Load 0x3,0x6 016d e607 | | Load 0x3,0x7 016e 8018 | | Call 0x0,0x18 016f e7ff | | Load 0x3,-0x1 0170 4803 |H | Short_Literal 0x3 0171 8017 | | Call 0x0,0x17 0172 00d1 | | Pop_Control Pop_Count_1 0173 e7ff | | Load 0x3,-0x1 0174 4800 |H | Short_Literal 0x0 0175 8012 | | Call 0x0,0x12 0176 00d1 | | Pop_Control Pop_Count_1 0177 e7ff | | Load 0x3,-0x1 0178 00db | | Load_Top At_Offset_3 0179 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 017a 00db | | Load_Top At_Offset_3 017b 00db | | Load_Top At_Offset_3 017c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 017d 00da | | Load_Top At_Offset_2 017e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 017f e607 | | Load 0x3,0x7 0180 8013 | | Call 0x0,0x13 0181 00d1 | | Pop_Control Pop_Count_1 0182 00da | | Load_Top At_Offset_2 0183 8014 | | Call 0x0,0x14 0184 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0185 e7ff | | Load 0x3,-0x1 0186 480e |H | Short_Literal 0xe 0187 8017 | | Call 0x0,0x17 0188 00d1 | | Pop_Control Pop_Count_1 0189 e7ff | | Load 0x3,-0x1 018a 4800 |H | Short_Literal 0x0 018b 8012 | | Call 0x0,0x12 018c 00d1 | | Pop_Control Pop_Count_1 018d e7ff | | Load 0x3,-0x1 018e 00db | | Load_Top At_Offset_3 018f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0190 e606 | | Load 0x3,0x6 0191 00db | | Load_Top At_Offset_3 0192 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0193 00da | | Load_Top At_Offset_2 0194 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0195 e606 | | Load 0x3,0x6 0196 8013 | | Call 0x0,0x13 0197 00d1 | | Pop_Control Pop_Count_1 0198 00da | | Load_Top At_Offset_2 0199 8014 | | Call 0x0,0x14 019a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019b 0092 01e5 | | Action Push_String_Extended,0x1e5 ; "Orb : received a subscription." 019d e005 | | Load 0x0,0x5 019e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 019f e604 | | Load 0x3,0x4 01a0 e7ff | | Load 0x3,-0x1 01a1 800f | | Call 0x0,0xf 01a2 00d1 | | Pop_Control Pop_Count_1 01a3 e604 | | Load 0x3,0x4 01a4 e403 | | Load 0x2,0x3 01a5 8022 | " | Call 0x0,0x22 01a6 680a |h | Jump_Zero 0x1b1 01a7 e605 | | Load 0x3,0x5 01a8 e7ff | | Load 0x3,-0x1 01a9 e403 | | Load 0x2,0x3 01aa 8020 | | Call 0x0,0x20 01ab 00d1 | | Pop_Control Pop_Count_1 01ac e404 | | Load 0x2,0x4 01ad e605 | | Load 0x3,0x5 01ae 8023 | # | Call 0x0,0x23 01af c404 | | Store 0x2,0x4 01b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b1 00e2 | | Load_Encached Integer_Cache 01b2 e7ff | | Load 0x3,-0x1 01b3 800e | | Call 0x0,0xe 01b4 c606 | | Store 0x3,0x6 01b5 e7ff | | Load 0x3,-0x1 01b6 480e |H | Short_Literal 0xe 01b7 8017 | | Call 0x0,0x17 01b8 00d1 | | Pop_Control Pop_Count_1 01b9 e7ff | | Load 0x3,-0x1 01ba 4800 |H | Short_Literal 0x0 01bb 8012 | | Call 0x0,0x12 01bc 00d1 | | Pop_Control Pop_Count_1 01bd e7ff | | Load 0x3,-0x1 01be 00db | | Load_Top At_Offset_3 01bf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01c0 e606 | | Load 0x3,0x6 01c1 00db | | Load_Top At_Offset_3 01c2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01c3 00da | | Load_Top At_Offset_2 01c4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01c5 e606 | | Load 0x3,0x6 01c6 8013 | | Call 0x0,0x13 01c7 00d1 | | Pop_Control Pop_Count_1 01c8 00da | | Load_Top At_Offset_2 01c9 8014 | | Call 0x0,0x14 01ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01cb 0092 01e6 | | Action Push_String_Extended,0x1e6 ; "Orb : received a publication" 01cd e005 | | Load 0x0,0x5 01ce 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01cf e603 | | Load 0x3,0x3 01d0 e7ff | | Load 0x3,-0x1 01d1 8024 | $ | Call 0x0,0x24 01d2 00d1 | | Pop_Control Pop_Count_1 01d3 e403 | | Load 0x2,0x3 01d4 e603 | | Load 0x3,0x3 01d5 8025 | % | Call 0x0,0x25 01d6 c403 | | Store 0x2,0x3 01d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01d8 0092 01e7 | | Action Push_String_Extended,0x1e7 ; "Orb : received an error : message lost.);" 01da e005 | | Load 0x0,0x5 01db 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01dd ; -------------------------------------------------------------------------------------- 01dd ; STRING TABLE 01dd ; -------------------------------------------------------------------------------------- 01dd 0018 | | .STRTAB 0x0018->0x01e9 ; "ORB : ready..." 01de 0024 | $ | .STRTAB 0x0024->0x01f0 ; "Orb : received an error on returning a request" 01df 0050 | P | .STRTAB 0x0050->0x0207 ; "Orb : received a Registration" 01e0 006b | k | .STRTAB 0x006b->0x0215 ; "Orb : received an unregistration" 01e1 0089 | | .STRTAB 0x0089->0x0225 ; "Orb : received an unpublication" 01e2 00a6 | | .STRTAB 0x00a6->0x0235 ; "Orb : Received a forward" 01e3 00bc | | .STRTAB 0x00bc->0x0241 ; "Orb : received an unsubscription" 01e4 00da | | .STRTAB 0x00da->0x0251 ; "Orb : received a request..." 01e5 00f3 | | .STRTAB 0x00f3->0x025e ; "Orb : received a subscription." 01e6 010f | | .STRTAB 0x010f->0x026d ; "Orb : received a publication" 01e7 0129 | ) | .STRTAB 0x0129->0x027b ; "Orb : received an error : message lost.);" 01e8 0150 | P | .STREND 0x0150->0x0290 01e9 4f52 4220 |ORB | .STRTAB_STRINGS 0290 ; -------------------------------------------------------------------------------------- 0290 ; Debug Table 0290 ; -------------------------------------------------------------------------------------- 0290 0004 000a | | .DEBUG4 0x0004,0x000a,0x7a72,0x0000,0x0001,0x0003 0296 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000 029a 001b 02a2 | | .DBG4T 0x001b,0x02a2,0x8001,0xc000 029e 003b 02b4 | ; | .DBG4T 0x003b,0x02b4,0x0001,0x4000 02a2 ; -------------------------------------------------------------------------------------- 02a2 ; Debug chain 02a2 ; -------------------------------------------------------------------------------------- 02a2 0004 0004 | | .DBGLEN 0x0004,0x0004 02a4 001b 001f | | .DBGLNO 0x001b,0x001f,0x0021,0x0023,0x0025,0x002a,0x002c,0x002f 02ac 0001 0003 | | .XXX[0x8] 02ae 0004 0005 | | 02b0 0001 0003 | | 02b2 0004 0005 | | 02b4 ; -------------------------------------------------------------------------------------- 02b4 ; Debug chain 02b4 ; -------------------------------------------------------------------------------------- 02b4 0007 005e | ^| .DBGLEN 0x0007,0x005e 02b6 003b 003d | ; =| .DBGLNO 0x003b,0x003d,0x0041,0x0045,0x0049,0x004b,0x004f,0x0057,0x005b,0x006c,0x0070,0x0074,0x0078,0x007c,0x0084,0x008a,0x008e,0x0091,0x0094,0x0099,0x009b,0x009d,0x00a3,0x00a7,0x00ab,0x00ae,0x00b1,0x00b6,0x00b8,0x00be,0x00c0,0x00c6,0x00ca,0x00cf,0x00d5,0x00d9,0x00dd,0x00e0,0x00e3,0x00e8,0x00eb,0x00ef,0x00f3,0x00f6,0x00fa,0x00fe,0x0103,0x0107,0x010b,0x0111,0x0116,0x011a,0x011e,0x0121,0x0124,0x0129,0x012b,0x012d,0x0131,0x0135,0x0138,0x013b,0x0140,0x0143,0x0147,0x014c,0x0152,0x0156,0x015a,0x015e,0x0162,0x0166,0x016b,0x016f,0x0173,0x0177,0x017a,0x017d,0x0182,0x0185,0x0189,0x018d,0x0190,0x0193,0x0198,0x019b,0x019f,0x01a3,0x01a7,0x01ac,0x01b1,0x01b5,0x01b9,0x01bd,0x01c0,0x01c3,0x01c8,0x01cb,0x01cf,0x01d3,0x01d8 031b 0001 0002 | | .XXX[0x5e] 031d 004d 004e | M N| 031f 004f 0050 | O P| 0321 0051 0052 | Q R| 0323 0053 0054 | S T| 0325 0055 0056 | U V| 0327 0057 0058 | W X| 0329 0059 005a | Y Z| 032b 005b 005c | [ \| 032d 005d 005e | ] ^| 032f 005f 0060 | _ `| 0331 0061 0062 | a b| 0333 0003 0004 | | 0335 0005 0006 | | 0337 0007 0008 | | 0339 0009 000a | | 033b 000b 000c | | 033d 000d 000e | | 033f 0027 0028 | ' (| 0341 0029 002a | ) *| 0343 002b 002c | + ,| 0345 002d 002e | - .| 0347 002f 0030 | / 0| 0349 0031 0032 | 1 2| 034b 0033 0034 | 3 4| 034d 0035 0036 | 5 6| 034f 0037 0038 | 7 8| 0351 0039 003a | 9 :| 0353 0047 0048 | G H| 0355 0049 0010 | I | 0357 0011 0012 | | 0359 0013 0014 | | 035b 0015 0016 | | 035d 0017 0018 | | 035f 0019 001a | | 0361 001b 001c | | 0363 001d 001e | | 0365 001f 0020 | | 0367 0021 0022 | ! "| 0369 003b 003c | ; <| 036b 003d 003e | = >| 036d 003f 0040 | ? @| 036f 0041 0042 | A B| 0371 0043 0044 | C D| 0373 0045 0046 | E F| 0375 0024 0025 | $ %| 0377 0026 0063 | & c| 0379 0000 0000 | | .BLANK 0000[0x87]