DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦7b331f445⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0cf0bb

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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 0400       |    |		.CONST	0x0400								; 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 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 004f       | O  |		.CONST	0x004f								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0010       |    |		.CONST	0x0010								; 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 02ff       |    |		Declare_Variable	Variant_Record
0021 00d8       |    |		Load_Top	At_Offset_0
0022 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0023 e004       |    |		Load	0x0,0x4
0024 0007       |    |		Action	Break_Optional
0025 00e2       |    |		Load_Encached	Integer_Cache
0026 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0027 e005       |    |		Load	0x0,0x5
0028 02ff       |    |		Declare_Variable	Variant_Record
0029 00d8       |    |		Load_Top	At_Offset_0
002a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
002b e006       |    |		Load	0x0,0x6
002c 02ff       |    |		Declare_Variable	Variant_Record
002d 00d8       |    |		Load_Top	At_Offset_0
002e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
002f e003       |    |		Load	0x0,0x3
0030 02ff       |    |		Declare_Variable	Variant_Record
0031 00d8       |    |		Load_Top	At_Offset_0
0032 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0033 00e3       |    |		Load_Encached	Natural_Cache
0034 e007       |    |		Load	0x0,0x7
0035 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0036 02c7       |    |		Declare_Variable	Any
0037 00d8       |    |		Load_Top	At_Offset_0
0038 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0039 e008       |    |		Load	0x0,0x8
003a 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
003b e009       |    |		Load	0x0,0x9
003c 02ff       |    |		Declare_Variable	Variant_Record
003d 00d8       |    |		Load_Top	At_Offset_0
003e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
003f e009       |    |		Load	0x0,0x9
0040 02ff       |    |		Declare_Variable	Variant_Record
0041 00d8       |    |		Load_Top	At_Offset_0
0042 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0043 4800       |H   |		Short_Literal	0x0
0044 48ff       |H   |		Short_Literal	0xff
0045 e00a       |    |		Load	0x0,0xa
0046 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0047 035b       | [  |		Declare_Type	Array,Constrained
0048 0337       | 7  |		Declare_Variable	Array
0049 4801       |H   |		Short_Literal	0x1
004a 4806       |H   |		Short_Literal	0x6
004b 00e9       |    |		Load_Encached	String_Cache
004c 0334       | 4  |		Declare_Variable	Array,With_Constraint
004d 52d6       |R   |		Indirect_Literal	Any,0x324,{0x5443502f, 0x49502020}
004e 00e8       |    |		Load_Encached	Character_Cache
004f			BODY_0018:
004f 4800       |H   |		Short_Literal	0x0
0050 a404       |    |		Store_Unchecked	0x2,0x4
0051 e408       |    |		Load	0x2,0x8
0052 0092 0328  |   (|		Action	Push_String_Extended,0x328					; "Server"
0054 800b       |    |		Call	0x0,0xb
0055 00d1       |    |		Pop_Control	Pop_Count_1
0056 e406       |    |		Load	0x2,0x6
0057 00da       |    |		Load_Top	At_Offset_2
0058 e007       |    |		Load	0x0,0x7
0059 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
005a 800c       |    |		Call	0x0,0xc
005b 00d1       |    |		Pop_Control	Pop_Count_1
005c e008       |    |		Load	0x0,0x8
005d 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
005e e40a       |    |		Load	0x2,0xa
005f 0120       |    |		Execute	Any,Is_Value
0060 6803       |h   |		Jump_Zero	0x64
0061 e007       |    |		Load	0x0,0x7
0062 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0063 7801       |x   |		Jump	0x65
0064 e40a       |    |		Load	0x2,0xa
0065 e008       |    |		Load	0x0,0x8
0066 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0067 e40f       |    |		Load	0x2,0xf
0068 e007       |    |		Load	0x0,0x7
0069 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
006a c40a       |    |		Store	0x2,0xa
006b c40b       |    |		Store	0x2,0xb
006c e407       |    |		Load	0x2,0x7
006d e40a       |    |		Load	0x2,0xa
006e e007       |    |		Load	0x0,0x7
006f 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0070 800d       |    |		Call	0x0,0xd
0071 00d1       |    |		Pop_Control	Pop_Count_1
0072 e403       |    |		Load	0x2,0x3
0073 e407       |    |		Load	0x2,0x7
0074 800e       |    |		Call	0x0,0xe
0075 00d1       |    |		Pop_Control	Pop_Count_1
0076 e403       |    |		Load	0x2,0x3
0077 0092 0329  |   )|		Action	Push_String_Extended,0x329					; ":"
0079 800f       |    |		Call	0x0,0xf
007a 00d1       |    |		Pop_Control	Pop_Count_1
007b e403       |    |		Load	0x2,0x3
007c e406       |    |		Load	0x2,0x6
007d 8010       |    |		Call	0x0,0x10
007e 00d1       |    |		Pop_Control	Pop_Count_1
007f e403       |    |		Load	0x2,0x3
0080 0092 0329  |   )|		Action	Push_String_Extended,0x329					; ":"
0082 800f       |    |		Call	0x0,0xf
0083 00d1       |    |		Pop_Control	Pop_Count_1
0084 e403       |    |		Load	0x2,0x3
0085 e408       |    |		Load	0x2,0x8
0086 8010       |    |		Call	0x0,0x10
0087 00d1       |    |		Pop_Control	Pop_Count_1
0088 e402       |    |		Load	0x2,0x2
0089 e403       |    |		Load	0x2,0x3
008a 8011       |    |		Call	0x0,0x11
008b 00d1       |    |		Pop_Control	Pop_Count_1
008c e402       |    |		Load	0x2,0x2
008d e404       |    |		Load	0x2,0x4
008e 8012       |    |		Call	0x0,0x12
008f 00d1       |    |		Pop_Control	Pop_Count_1
0090 e402       |    |		Load	0x2,0x2
0091 e405       |    |		Load	0x2,0x5
0092 8013       |    |		Call	0x0,0x13
0093 00d1       |    |		Pop_Control	Pop_Count_1
0094 e40c       |    |		Load	0x2,0xc
0095 e402       |    |		Load	0x2,0x2
0096 8014       |    |		Call	0x0,0x14
0097 00d1       |    |		Pop_Control	Pop_Count_1
0098 0092 032a  |   *|		Action	Push_String_Extended,0x32a					; "Server : send registration to ORB : "
009a e40c       |    |		Load	0x2,0xc
009b 8015       |    |		Call	0x0,0x15
009c 01cc       |    |		Execute	Vector,Catenate
009d e016       |    |		Load	0x0,0x16
009e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
009f 00cf       |    |		Action	Mark_Auxiliary
00a0 782c       |x,  |		Jump	0xcd
00a1 e008       |    |		Load	0x0,0x8
00a2 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
00a3 627c       |b|  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
00a4 4800       |H   |		Short_Literal	0x0
00a5 4801       |H   |		Short_Literal	0x1
00a6 e017       |    |		Load	0x0,0x17
00a7 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00a8 035b       | [  |		Declare_Type	Array,Constrained
00a9 0337       | 7  |		Declare_Variable	Array
00aa 480a       |H   |		Short_Literal	0xa
00ab 4800       |H   |		Short_Literal	0x0
00ac 00da       |    |		Load_Top	At_Offset_2
00ad 01d6       |    |		Execute	Vector,Field_Write
00ae 482a       |H*  |		Short_Literal	0x2a
00af 4801       |H   |		Short_Literal	0x1
00b0 00da       |    |		Load_Top	At_Offset_2
00b1 01d6       |    |		Execute	Vector,Field_Write
00b2 4800       |H   |		Short_Literal	0x0
00b3 4803       |H   |		Short_Literal	0x3
00b4 e017       |    |		Load	0x0,0x17
00b5 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00b6 035b       | [  |		Declare_Type	Array,Constrained
00b7 0337       | 7  |		Declare_Variable	Array
00b8 48c1       |H   |		Short_Literal	0xc1
00b9 4800       |H   |		Short_Literal	0x0
00ba 00da       |    |		Load_Top	At_Offset_2
00bb 01d6       |    |		Execute	Vector,Field_Write
00bc 4836       |H6  |		Short_Literal	0x36
00bd 4801       |H   |		Short_Literal	0x1
00be 00da       |    |		Load_Top	At_Offset_2
00bf 01d6       |    |		Execute	Vector,Field_Write
00c0 4892       |H   |		Short_Literal	0x92
00c1 4802       |H   |		Short_Literal	0x2
00c2 00da       |    |		Load_Top	At_Offset_2
00c3 01d6       |    |		Execute	Vector,Field_Write
00c4 4884       |H   |		Short_Literal	0x84
00c5 4803       |H   |		Short_Literal	0x3
00c6 00da       |    |		Load_Top	At_Offset_2
00c7 01d6       |    |		Execute	Vector,Field_Write
00c8 e40a       |    |		Load	0x2,0xa
00c9 e007       |    |		Load	0x0,0x7
00ca 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00cb c40b       |    |		Store	0x2,0xb
00cc 00c9       |    |		Action	Pop_Auxiliary_Loop
00cd e40a       |    |		Load	0x2,0xa
00ce e007       |    |		Load	0x0,0x7
00cf 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00d0 6fd0       |o   |		Jump_Zero	0xa1
00d1 00ce       |    |		Action	Pop_Auxiliary
00d2 00e3       |    |		Load_Encached	Natural_Cache
00d3 e008       |    |		Load	0x0,0x8
00d4 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
00d5 4800       |H   |		Short_Literal	0x0
00d6 6249       |bI  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
00d7 e40c       |    |		Load	0x2,0xc
00d8 8018       |    |		Call	0x0,0x18
00d9 e40a       |    |		Load	0x2,0xa
00da e007       |    |		Load	0x0,0x7
00db 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
00dc c40b       |    |		Store	0x2,0xb
00dd c409       |    |		Store	0x2,0x9
00de e40a       |    |		Load	0x2,0xa
00df e007       |    |		Load	0x0,0x7
00e0 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00e1 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; "Server : data transmited."
00e3 e016       |    |		Load	0x0,0x16
00e4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00e5 0092 032c  |   ,|		Action	Push_String_Extended,0x32c					; "Server : wait for ID..."
00e7 e016       |    |		Load	0x0,0x16
00e8 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00e9 00cf       |    |		Action	Mark_Auxiliary
00ea 7808       |x   |		Jump	0xf3
00eb e008       |    |		Load	0x0,0x8
00ec 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
00ed 6232       |b2  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
00ee e40a       |    |		Load	0x2,0xa
00ef e007       |    |		Load	0x0,0x7
00f0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00f1 c40b       |    |		Store	0x2,0xb
00f2 00c9       |    |		Action	Pop_Auxiliary_Loop
00f3 e40a       |    |		Load	0x2,0xa
00f4 e007       |    |		Load	0x0,0x7
00f5 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00f6 6ff4       |o   |		Jump_Zero	0xeb
00f7 00c9       |    |		Action	Pop_Auxiliary_Loop
00f8 00e3       |    |		Load_Encached	Natural_Cache
00f9 e40e       |    |		Load	0x2,0xe
00fa e008       |    |		Load	0x0,0x8
00fb 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
00fc 6223       |b#  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
00fd e40a       |    |		Load	0x2,0xa
00fe e007       |    |		Load	0x0,0x7
00ff 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0100 c40b       |    |		Store	0x2,0xb
0101 00d1       |    |		Pop_Control	Pop_Count_1
0102 c409       |    |		Store	0x2,0x9
0103 e40b       |    |		Load	0x2,0xb
0104 e008       |    |		Load	0x0,0x8
0105 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0106 0092 032d  |   -|		Action	Push_String_Extended,0x32d					; "OK"
0108 01df       |    |		Execute	Vector,Equal
0109 7002       |p   |		Jump_Nonzero	0x10c
010a 00c9       |    |		Action	Pop_Auxiliary_Loop
010b 7fec       |    |		Jump	0xf8
010c 00ce       |    |		Action	Pop_Auxiliary
010d 0092 032e  |   .|		Action	Push_String_Extended,0x32e					; "Server : received message from ORB : "
010f e016       |    |		Load	0x0,0x16
0110 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0111 00db       |    |		Load_Top	At_Offset_3
0112 4800       |H   |		Short_Literal	0x0
0113 e409       |    |		Load	0x2,0x9
0114 0aff       |    |		Execute_Immediate	Plus,-0x1
0115 e40e       |    |		Load	0x2,0xe
0116 01cf       |    |		Execute	Vector,Slice_Read
0117 8019       |    |		Call	0x0,0x19
0118 00d1       |    |		Pop_Control	Pop_Count_1
0119 00db       |    |		Load_Top	At_Offset_3
011a 8015       |    |		Call	0x0,0x15
011b e016       |    |		Load	0x0,0x16
011c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
011d e402       |    |		Load	0x2,0x2
011e e40d       |    |		Load	0x2,0xd
011f 801a       |    |		Call	0x0,0x1a
0120 00d1       |    |		Pop_Control	Pop_Count_1
0121 e403       |    |		Load	0x2,0x3
0122 e402       |    |		Load	0x2,0x2
0123 801b       |    |		Call	0x0,0x1b
0124 00d1       |    |		Pop_Control	Pop_Count_1
0125 e403       |    |		Load	0x2,0x3
0126 8015       |    |		Call	0x0,0x15
0127 00e2       |    |		Load_Encached	Integer_Cache
0128 00e0       |    |		Load_Encached	Standard_Cache
0129 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
012a a405       |    |		Store_Unchecked	0x2,0x5
012b e40a       |    |		Load	0x2,0xa
012c e007       |    |		Load	0x0,0x7
012d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
012e 4806       |H   |		Short_Literal	0x6
012f a404       |    |		Store_Unchecked	0x2,0x4
0130 e403       |    |		Load	0x2,0x3
0131 0092 032f  |   /|		Action	Push_String_Extended,0x32f					; "Datum"
0133 800b       |    |		Call	0x0,0xb
0134 00d1       |    |		Pop_Control	Pop_Count_1
0135 e402       |    |		Load	0x2,0x2
0136 e404       |    |		Load	0x2,0x4
0137 8012       |    |		Call	0x0,0x12
0138 00d1       |    |		Pop_Control	Pop_Count_1
0139 e402       |    |		Load	0x2,0x2
013a e403       |    |		Load	0x2,0x3
013b 8011       |    |		Call	0x0,0x11
013c 00d1       |    |		Pop_Control	Pop_Count_1
013d e402       |    |		Load	0x2,0x2
013e e405       |    |		Load	0x2,0x5
013f 8013       |    |		Call	0x0,0x13
0140 00d1       |    |		Pop_Control	Pop_Count_1
0141 e40c       |    |		Load	0x2,0xc
0142 e402       |    |		Load	0x2,0x2
0143 8014       |    |		Call	0x0,0x14
0144 00d1       |    |		Pop_Control	Pop_Count_1
0145 0092 0330  |   0|		Action	Push_String_Extended,0x330					; "Server : send publication to ORB : "
0147 e40c       |    |		Load	0x2,0xc
0148 8015       |    |		Call	0x0,0x15
0149 01cc       |    |		Execute	Vector,Catenate
014a e016       |    |		Load	0x0,0x16
014b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
014c 00cf       |    |		Action	Mark_Auxiliary
014d 782c       |x,  |		Jump	0x17a
014e e008       |    |		Load	0x0,0x8
014f 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0150 61cf       |a   |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
0151 4800       |H   |		Short_Literal	0x0
0152 4801       |H   |		Short_Literal	0x1
0153 e017       |    |		Load	0x0,0x17
0154 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0155 035b       | [  |		Declare_Type	Array,Constrained
0156 0337       | 7  |		Declare_Variable	Array
0157 480a       |H   |		Short_Literal	0xa
0158 4800       |H   |		Short_Literal	0x0
0159 00da       |    |		Load_Top	At_Offset_2
015a 01d6       |    |		Execute	Vector,Field_Write
015b 482a       |H*  |		Short_Literal	0x2a
015c 4801       |H   |		Short_Literal	0x1
015d 00da       |    |		Load_Top	At_Offset_2
015e 01d6       |    |		Execute	Vector,Field_Write
015f 4800       |H   |		Short_Literal	0x0
0160 4803       |H   |		Short_Literal	0x3
0161 e017       |    |		Load	0x0,0x17
0162 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0163 035b       | [  |		Declare_Type	Array,Constrained
0164 0337       | 7  |		Declare_Variable	Array
0165 48c1       |H   |		Short_Literal	0xc1
0166 4800       |H   |		Short_Literal	0x0
0167 00da       |    |		Load_Top	At_Offset_2
0168 01d6       |    |		Execute	Vector,Field_Write
0169 4836       |H6  |		Short_Literal	0x36
016a 4801       |H   |		Short_Literal	0x1
016b 00da       |    |		Load_Top	At_Offset_2
016c 01d6       |    |		Execute	Vector,Field_Write
016d 4892       |H   |		Short_Literal	0x92
016e 4802       |H   |		Short_Literal	0x2
016f 00da       |    |		Load_Top	At_Offset_2
0170 01d6       |    |		Execute	Vector,Field_Write
0171 4884       |H   |		Short_Literal	0x84
0172 4803       |H   |		Short_Literal	0x3
0173 00da       |    |		Load_Top	At_Offset_2
0174 01d6       |    |		Execute	Vector,Field_Write
0175 e40a       |    |		Load	0x2,0xa
0176 e007       |    |		Load	0x0,0x7
0177 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0178 c40b       |    |		Store	0x2,0xb
0179 00c9       |    |		Action	Pop_Auxiliary_Loop
017a e40a       |    |		Load	0x2,0xa
017b e007       |    |		Load	0x0,0x7
017c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
017d 6fd0       |o   |		Jump_Zero	0x14e
017e 00ce       |    |		Action	Pop_Auxiliary
017f 0092 0331  |   1|		Action	Push_String_Extended,0x331					; "Server : connected to ORB"
0181 e016       |    |		Load	0x0,0x16
0182 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0183 00e3       |    |		Load_Encached	Natural_Cache
0184 e008       |    |		Load	0x0,0x8
0185 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0186 4800       |H   |		Short_Literal	0x0
0187 6198       |a   |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
0188 e40c       |    |		Load	0x2,0xc
0189 8018       |    |		Call	0x0,0x18
018a e40a       |    |		Load	0x2,0xa
018b e007       |    |		Load	0x0,0x7
018c 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
018d c40b       |    |		Store	0x2,0xb
018e c409       |    |		Store	0x2,0x9
018f e40a       |    |		Load	0x2,0xa
0190 e007       |    |		Load	0x0,0x7
0191 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0192 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; "Server : data transmited."
0194 e016       |    |		Load	0x0,0x16
0195 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0196 0092 0332  |   2|		Action	Push_String_Extended,0x332					; "Server : wait for Request..."
0198 e016       |    |		Load	0x0,0x16
0199 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
019a 00cf       |    |		Action	Mark_Auxiliary
019b 00cf       |    |		Action	Mark_Auxiliary
019c 7808       |x   |		Jump	0x1a5
019d e008       |    |		Load	0x0,0x8
019e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
019f 6180       |a   |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
01a0 e40a       |    |		Load	0x2,0xa
01a1 e007       |    |		Load	0x0,0x7
01a2 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01a3 c40b       |    |		Store	0x2,0xb
01a4 00c9       |    |		Action	Pop_Auxiliary_Loop
01a5 e40a       |    |		Load	0x2,0xa
01a6 e007       |    |		Load	0x0,0x7
01a7 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01a8 6ff4       |o   |		Jump_Zero	0x19d
01a9 00c9       |    |		Action	Pop_Auxiliary_Loop
01aa 00e3       |    |		Load_Encached	Natural_Cache
01ab e40e       |    |		Load	0x2,0xe
01ac e008       |    |		Load	0x0,0x8
01ad 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
01ae 6171       |aq  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
01af e40a       |    |		Load	0x2,0xa
01b0 e007       |    |		Load	0x0,0x7
01b1 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
01b2 c40b       |    |		Store	0x2,0xb
01b3 00d1       |    |		Pop_Control	Pop_Count_1
01b4 c409       |    |		Store	0x2,0x9
01b5 e40b       |    |		Load	0x2,0xb
01b6 e008       |    |		Load	0x0,0x8
01b7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01b8 0092 032d  |   -|		Action	Push_String_Extended,0x32d					; "OK"
01ba 01df       |    |		Execute	Vector,Equal
01bb 7002       |p   |		Jump_Nonzero	0x1be
01bc 00c9       |    |		Action	Pop_Auxiliary_Loop
01bd 7fec       |    |		Jump	0x1aa
01be 00ce       |    |		Action	Pop_Auxiliary
01bf 0092 032e  |   .|		Action	Push_String_Extended,0x32e					; "Server : received message from ORB : "
01c1 e016       |    |		Load	0x0,0x16
01c2 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
01c3 e40d       |    |		Load	0x2,0xd
01c4 4800       |H   |		Short_Literal	0x0
01c5 e409       |    |		Load	0x2,0x9
01c6 0aff       |    |		Execute_Immediate	Plus,-0x1
01c7 e40e       |    |		Load	0x2,0xe
01c8 01cf       |    |		Execute	Vector,Slice_Read
01c9 8019       |    |		Call	0x0,0x19
01ca 00d1       |    |		Pop_Control	Pop_Count_1
01cb e402       |    |		Load	0x2,0x2
01cc e40d       |    |		Load	0x2,0xd
01cd 801a       |    |		Call	0x0,0x1a
01ce 00d1       |    |		Pop_Control	Pop_Count_1
01cf e403       |    |		Load	0x2,0x3
01d0 e402       |    |		Load	0x2,0x2
01d1 801b       |    |		Call	0x0,0x1b
01d2 00d1       |    |		Pop_Control	Pop_Count_1
01d3 e40d       |    |		Load	0x2,0xd
01d4 8015       |    |		Call	0x0,0x15
01d5 e016       |    |		Load	0x0,0x16
01d6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01d7 e40a       |    |		Load	0x2,0xa
01d8 e007       |    |		Load	0x0,0x7
01d9 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01da e403       |    |		Load	0x2,0x3
01db 0092 0333  |   3|		Action	Push_String_Extended,0x333					; "02/23/96 4.00pm"
01dd 800b       |    |		Call	0x0,0xb
01de 00d1       |    |		Pop_Control	Pop_Count_1
01df e402       |    |		Load	0x2,0x2
01e0 e403       |    |		Load	0x2,0x3
01e1 8011       |    |		Call	0x0,0x11
01e2 00d1       |    |		Pop_Control	Pop_Count_1
01e3 e402       |    |		Load	0x2,0x2
01e4 4805       |H   |		Short_Literal	0x5
01e5 8012       |    |		Call	0x0,0x12
01e6 00d1       |    |		Pop_Control	Pop_Count_1
01e7 e402       |    |		Load	0x2,0x2
01e8 e405       |    |		Load	0x2,0x5
01e9 8013       |    |		Call	0x0,0x13
01ea 00d1       |    |		Pop_Control	Pop_Count_1
01eb e40c       |    |		Load	0x2,0xc
01ec e402       |    |		Load	0x2,0x2
01ed 8014       |    |		Call	0x0,0x14
01ee 00d1       |    |		Pop_Control	Pop_Count_1
01ef 0092 0334  |   4|		Action	Push_String_Extended,0x334					; "Server : send answer to ORB : "
01f1 e40c       |    |		Load	0x2,0xc
01f2 8015       |    |		Call	0x0,0x15
01f3 01cc       |    |		Execute	Vector,Catenate
01f4 e016       |    |		Load	0x0,0x16
01f5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01f6 00cf       |    |		Action	Mark_Auxiliary
01f7 782c       |x,  |		Jump	0x224
01f8 e008       |    |		Load	0x0,0x8
01f9 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
01fa 6125       |a%  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
01fb 4800       |H   |		Short_Literal	0x0
01fc 4801       |H   |		Short_Literal	0x1
01fd e017       |    |		Load	0x0,0x17
01fe 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01ff 035b       | [  |		Declare_Type	Array,Constrained
0200 0337       | 7  |		Declare_Variable	Array
0201 480a       |H   |		Short_Literal	0xa
0202 4800       |H   |		Short_Literal	0x0
0203 00da       |    |		Load_Top	At_Offset_2
0204 01d6       |    |		Execute	Vector,Field_Write
0205 482a       |H*  |		Short_Literal	0x2a
0206 4801       |H   |		Short_Literal	0x1
0207 00da       |    |		Load_Top	At_Offset_2
0208 01d6       |    |		Execute	Vector,Field_Write
0209 4800       |H   |		Short_Literal	0x0
020a 4803       |H   |		Short_Literal	0x3
020b e017       |    |		Load	0x0,0x17
020c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
020d 035b       | [  |		Declare_Type	Array,Constrained
020e 0337       | 7  |		Declare_Variable	Array
020f 48c1       |H   |		Short_Literal	0xc1
0210 4800       |H   |		Short_Literal	0x0
0211 00da       |    |		Load_Top	At_Offset_2
0212 01d6       |    |		Execute	Vector,Field_Write
0213 4836       |H6  |		Short_Literal	0x36
0214 4801       |H   |		Short_Literal	0x1
0215 00da       |    |		Load_Top	At_Offset_2
0216 01d6       |    |		Execute	Vector,Field_Write
0217 4892       |H   |		Short_Literal	0x92
0218 4802       |H   |		Short_Literal	0x2
0219 00da       |    |		Load_Top	At_Offset_2
021a 01d6       |    |		Execute	Vector,Field_Write
021b 4884       |H   |		Short_Literal	0x84
021c 4803       |H   |		Short_Literal	0x3
021d 00da       |    |		Load_Top	At_Offset_2
021e 01d6       |    |		Execute	Vector,Field_Write
021f e40a       |    |		Load	0x2,0xa
0220 e007       |    |		Load	0x0,0x7
0221 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0222 c40b       |    |		Store	0x2,0xb
0223 00c9       |    |		Action	Pop_Auxiliary_Loop
0224 e40a       |    |		Load	0x2,0xa
0225 e007       |    |		Load	0x0,0x7
0226 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0227 6fd0       |o   |		Jump_Zero	0x1f8
0228 00ce       |    |		Action	Pop_Auxiliary
0229 0092 0331  |   1|		Action	Push_String_Extended,0x331					; "Server : connected to ORB"
022b e016       |    |		Load	0x0,0x16
022c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
022d 00e3       |    |		Load_Encached	Natural_Cache
022e e008       |    |		Load	0x0,0x8
022f 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0230 4800       |H   |		Short_Literal	0x0
0231 60ee       |`   |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
0232 e40c       |    |		Load	0x2,0xc
0233 8018       |    |		Call	0x0,0x18
0234 e40a       |    |		Load	0x2,0xa
0235 e007       |    |		Load	0x0,0x7
0236 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0237 c40b       |    |		Store	0x2,0xb
0238 c409       |    |		Store	0x2,0x9
0239 e40a       |    |		Load	0x2,0xa
023a e007       |    |		Load	0x0,0x7
023b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
023c 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; "Server : data transmited."
023e e016       |    |		Load	0x0,0x16
023f 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0240 0092 0335  |   5|		Action	Push_String_Extended,0x335					; "q : quit , others : continue"
0242 e016       |    |		Load	0x0,0x16
0243 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0244 00e8       |    |		Load_Encached	Character_Cache
0245 e016       |    |		Load	0x0,0x16
0246 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
0247 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0248 00d9       |    |		Load_Top	At_Offset_1
0249 0f71       | q  |		Execute_Immediate	Equal,0x71
024a 7002       |p   |		Jump_Nonzero	0x24d
024b 00c9       |    |		Action	Pop_Auxiliary_Loop
024c 7f4e       | N  |		Jump	0x19b
024d 00ce       |    |		Action	Pop_Auxiliary
024e e403       |    |		Load	0x2,0x3
024f 0092 032f  |   /|		Action	Push_String_Extended,0x32f					; "Datum"
0251 800b       |    |		Call	0x0,0xb
0252 00d1       |    |		Pop_Control	Pop_Count_1
0253 e402       |    |		Load	0x2,0x2
0254 e403       |    |		Load	0x2,0x3
0255 8011       |    |		Call	0x0,0x11
0256 00d1       |    |		Pop_Control	Pop_Count_1
0257 e402       |    |		Load	0x2,0x2
0258 4807       |H   |		Short_Literal	0x7
0259 8012       |    |		Call	0x0,0x12
025a 00d1       |    |		Pop_Control	Pop_Count_1
025b e402       |    |		Load	0x2,0x2
025c e405       |    |		Load	0x2,0x5
025d 8013       |    |		Call	0x0,0x13
025e 00d1       |    |		Pop_Control	Pop_Count_1
025f e40c       |    |		Load	0x2,0xc
0260 e402       |    |		Load	0x2,0x2
0261 8014       |    |		Call	0x0,0x14
0262 00d1       |    |		Pop_Control	Pop_Count_1
0263 0092 0336  |   6|		Action	Push_String_Extended,0x336					; "Server : send unpublication to ORB : "
0265 e40c       |    |		Load	0x2,0xc
0266 8015       |    |		Call	0x0,0x15
0267 01cc       |    |		Execute	Vector,Catenate
0268 e016       |    |		Load	0x0,0x16
0269 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
026a 00cf       |    |		Action	Mark_Auxiliary
026b 782c       |x,  |		Jump	0x298
026c e008       |    |		Load	0x0,0x8
026d 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
026e 60b1       |`   |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
026f 4800       |H   |		Short_Literal	0x0
0270 4801       |H   |		Short_Literal	0x1
0271 e017       |    |		Load	0x0,0x17
0272 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0273 035b       | [  |		Declare_Type	Array,Constrained
0274 0337       | 7  |		Declare_Variable	Array
0275 480a       |H   |		Short_Literal	0xa
0276 4800       |H   |		Short_Literal	0x0
0277 00da       |    |		Load_Top	At_Offset_2
0278 01d6       |    |		Execute	Vector,Field_Write
0279 482a       |H*  |		Short_Literal	0x2a
027a 4801       |H   |		Short_Literal	0x1
027b 00da       |    |		Load_Top	At_Offset_2
027c 01d6       |    |		Execute	Vector,Field_Write
027d 4800       |H   |		Short_Literal	0x0
027e 4803       |H   |		Short_Literal	0x3
027f e017       |    |		Load	0x0,0x17
0280 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0281 035b       | [  |		Declare_Type	Array,Constrained
0282 0337       | 7  |		Declare_Variable	Array
0283 48c1       |H   |		Short_Literal	0xc1
0284 4800       |H   |		Short_Literal	0x0
0285 00da       |    |		Load_Top	At_Offset_2
0286 01d6       |    |		Execute	Vector,Field_Write
0287 4836       |H6  |		Short_Literal	0x36
0288 4801       |H   |		Short_Literal	0x1
0289 00da       |    |		Load_Top	At_Offset_2
028a 01d6       |    |		Execute	Vector,Field_Write
028b 4892       |H   |		Short_Literal	0x92
028c 4802       |H   |		Short_Literal	0x2
028d 00da       |    |		Load_Top	At_Offset_2
028e 01d6       |    |		Execute	Vector,Field_Write
028f 4884       |H   |		Short_Literal	0x84
0290 4803       |H   |		Short_Literal	0x3
0291 00da       |    |		Load_Top	At_Offset_2
0292 01d6       |    |		Execute	Vector,Field_Write
0293 e40a       |    |		Load	0x2,0xa
0294 e007       |    |		Load	0x0,0x7
0295 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0296 c40b       |    |		Store	0x2,0xb
0297 00c9       |    |		Action	Pop_Auxiliary_Loop
0298 e40a       |    |		Load	0x2,0xa
0299 e007       |    |		Load	0x0,0x7
029a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
029b 6fd0       |o   |		Jump_Zero	0x26c
029c 00ce       |    |		Action	Pop_Auxiliary
029d 0092 0331  |   1|		Action	Push_String_Extended,0x331					; "Server : connected to ORB"
029f e016       |    |		Load	0x0,0x16
02a0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02a1 00e3       |    |		Load_Encached	Natural_Cache
02a2 e008       |    |		Load	0x0,0x8
02a3 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
02a4 4800       |H   |		Short_Literal	0x0
02a5 607a       |`z  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
02a6 e40c       |    |		Load	0x2,0xc
02a7 8018       |    |		Call	0x0,0x18
02a8 e40a       |    |		Load	0x2,0xa
02a9 e007       |    |		Load	0x0,0x7
02aa 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
02ab c40b       |    |		Store	0x2,0xb
02ac c409       |    |		Store	0x2,0x9
02ad e40a       |    |		Load	0x2,0xa
02ae e007       |    |		Load	0x0,0x7
02af 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02b0 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; "Server : data transmited."
02b2 e016       |    |		Load	0x0,0x16
02b3 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02b4 4801       |H   |		Short_Literal	0x1
02b5 a404       |    |		Store_Unchecked	0x2,0x4
02b6 e403       |    |		Load	0x2,0x3
02b7 00ea       |    |		Load_Encached	Null_String_Cache
02b8 800b       |    |		Call	0x0,0xb
02b9 00d1       |    |		Pop_Control	Pop_Count_1
02ba e402       |    |		Load	0x2,0x2
02bb e403       |    |		Load	0x2,0x3
02bc 8011       |    |		Call	0x0,0x11
02bd 00d1       |    |		Pop_Control	Pop_Count_1
02be e402       |    |		Load	0x2,0x2
02bf e404       |    |		Load	0x2,0x4
02c0 8012       |    |		Call	0x0,0x12
02c1 00d1       |    |		Pop_Control	Pop_Count_1
02c2 e402       |    |		Load	0x2,0x2
02c3 e405       |    |		Load	0x2,0x5
02c4 8013       |    |		Call	0x0,0x13
02c5 00d1       |    |		Pop_Control	Pop_Count_1
02c6 e40c       |    |		Load	0x2,0xc
02c7 e402       |    |		Load	0x2,0x2
02c8 8014       |    |		Call	0x0,0x14
02c9 00d1       |    |		Pop_Control	Pop_Count_1
02ca 0092 0337  |   7|		Action	Push_String_Extended,0x337					; "Server : send unregistration to ORB :"
02cc e40c       |    |		Load	0x2,0xc
02cd 8015       |    |		Call	0x0,0x15
02ce 01cc       |    |		Execute	Vector,Catenate
02cf e016       |    |		Load	0x0,0x16
02d0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02d1 00cf       |    |		Action	Mark_Auxiliary
02d2 782c       |x,  |		Jump	0x2ff
02d3 e008       |    |		Load	0x0,0x8
02d4 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
02d5 604a       |`J  |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
02d6 4800       |H   |		Short_Literal	0x0
02d7 4801       |H   |		Short_Literal	0x1
02d8 e017       |    |		Load	0x0,0x17
02d9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02da 035b       | [  |		Declare_Type	Array,Constrained
02db 0337       | 7  |		Declare_Variable	Array
02dc 480a       |H   |		Short_Literal	0xa
02dd 4800       |H   |		Short_Literal	0x0
02de 00da       |    |		Load_Top	At_Offset_2
02df 01d6       |    |		Execute	Vector,Field_Write
02e0 482a       |H*  |		Short_Literal	0x2a
02e1 4801       |H   |		Short_Literal	0x1
02e2 00da       |    |		Load_Top	At_Offset_2
02e3 01d6       |    |		Execute	Vector,Field_Write
02e4 4800       |H   |		Short_Literal	0x0
02e5 4803       |H   |		Short_Literal	0x3
02e6 e017       |    |		Load	0x0,0x17
02e7 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02e8 035b       | [  |		Declare_Type	Array,Constrained
02e9 0337       | 7  |		Declare_Variable	Array
02ea 48c1       |H   |		Short_Literal	0xc1
02eb 4800       |H   |		Short_Literal	0x0
02ec 00da       |    |		Load_Top	At_Offset_2
02ed 01d6       |    |		Execute	Vector,Field_Write
02ee 4836       |H6  |		Short_Literal	0x36
02ef 4801       |H   |		Short_Literal	0x1
02f0 00da       |    |		Load_Top	At_Offset_2
02f1 01d6       |    |		Execute	Vector,Field_Write
02f2 4892       |H   |		Short_Literal	0x92
02f3 4802       |H   |		Short_Literal	0x2
02f4 00da       |    |		Load_Top	At_Offset_2
02f5 01d6       |    |		Execute	Vector,Field_Write
02f6 4884       |H   |		Short_Literal	0x84
02f7 4803       |H   |		Short_Literal	0x3
02f8 00da       |    |		Load_Top	At_Offset_2
02f9 01d6       |    |		Execute	Vector,Field_Write
02fa e40a       |    |		Load	0x2,0xa
02fb e007       |    |		Load	0x0,0x7
02fc 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02fd c40b       |    |		Store	0x2,0xb
02fe 00c9       |    |		Action	Pop_Auxiliary_Loop
02ff e40a       |    |		Load	0x2,0xa
0300 e007       |    |		Load	0x0,0x7
0301 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0302 6fd0       |o   |		Jump_Zero	0x2d3
0303 00ce       |    |		Action	Pop_Auxiliary
0304 0092 0338  |   8|		Action	Push_String_Extended,0x338					; "Server : Connected to Orb"
0306 e016       |    |		Load	0x0,0x16
0307 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0308 00e3       |    |		Load_Encached	Natural_Cache
0309 e008       |    |		Load	0x0,0x8
030a 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
030b 4800       |H   |		Short_Literal	0x0
030c 6013       |`   |		Indirect_Literal	Discrete,0x320,{0x00007fff, 0xffffffff}
030d e40c       |    |		Load	0x2,0xc
030e 8018       |    |		Call	0x0,0x18
030f e40a       |    |		Load	0x2,0xa
0310 e007       |    |		Load	0x0,0x7
0311 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0312 c40b       |    |		Store	0x2,0xb
0313 c409       |    |		Store	0x2,0x9
0314 e40a       |    |		Load	0x2,0xa
0315 e007       |    |		Load	0x0,0x7
0316 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0317 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; "Server : data transmited."
0319 e016       |    |		Load	0x0,0x16
031a 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
031b e40a       |    |		Load	0x2,0xa
031c e007       |    |		Load	0x0,0x7
031d 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
031e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
031f 0000       |    |		.XXX[0x1]
0320 0000 7fff  |    |		.LITERAL	{0x00007fff, 0xffffffff}
0324 5443 502f  |TCP/|		.LITERAL	{0x5443502f, 0x49502020}
0328 ; --------------------------------------------------------------------------------------
0328 ; STRING TABLE
0328 ; --------------------------------------------------------------------------------------
0328 0024       | $  |		.STRTAB	0x0024->0x033a							; "Server"
0329 0028       | (  |		.STRTAB	0x0028->0x033d							; ":"
032a 0027       | '  |		.STRTAB	0x0027->0x033d							; "Server : send registration to ORB : "
032b 0049       | I  |		.STRTAB	0x0049->0x034f							; "Server : data transmited."
032c 0060       | `  |		.STRTAB	0x0060->0x035c							; "Server : wait for ID..."
032d 0075       | u  |		.STRTAB	0x0075->0x0367							; "OK"
032e 0075       | u  |		.STRTAB	0x0075->0x0368							; "Server : received message from ORB : "
032f 0098       |    |		.STRTAB	0x0098->0x037b							; "Datum"
0330 009b       |    |		.STRTAB	0x009b->0x037d							; "Server : send publication to ORB : "
0331 00bc       |    |		.STRTAB	0x00bc->0x038f							; "Server : connected to ORB"
0332 00d3       |    |		.STRTAB	0x00d3->0x039b							; "Server : wait for Request..."
0333 00ed       |    |		.STRTAB	0x00ed->0x03a9							; "02/23/96 4.00pm"
0334 00fa       |    |		.STRTAB	0x00fa->0x03b1							; "Server : send answer to ORB : "
0335 0116       |    |		.STRTAB	0x0116->0x03c0							; "q : quit , others : continue"
0336 0130       | 0  |		.STRTAB	0x0130->0x03ce							; "Server : send unpublication to ORB : "
0337 0153       | S  |		.STRTAB	0x0153->0x03e0							; "Server : send unregistration to ORB :"
0338 0176       | v  |		.STRTAB	0x0176->0x03f3							; "Server : Connected to Orb"
0339 018d       |    |		.STREND 0x018d->0x03ff
033a 5365 7276  |Serv|		.STRTAB_STRINGS
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug Table
0400 ; --------------------------------------------------------------------------------------
0400 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x761c,0x0000,0x0001,0x0002
0406 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
040a 001b 040e  |    |		.DBG4T	0x001b,0x040e,0x8001,0x4000
040e ; --------------------------------------------------------------------------------------
040e ; Debug chain
040e ; --------------------------------------------------------------------------------------
040e 000f 0062  |   b|		.DBGLEN	0x000f,0x0062
0410 001b 001f  |    |		.DBGLNO	0x001b,0x001f,0x0023,0x0025,0x0027,0x002b,0x002f,0x0033,0x0034,0x0039,0x003b,0x003f,0x0043,0x0049,0x004e,0x004f,0x0051,0x0056,0x005c,0x006c,0x0072,0x0076,0x007b,0x007f,0x0084,0x0088,0x008c,0x0090,0x0094,0x0098,0x00a1,0x00cd,0x00d2,0x00de,0x00e1,0x00e5,0x00eb,0x00f3,0x00f8,0x0103,0x010d,0x0111,0x0119,0x011d,0x0121,0x0125,0x012b,0x012e,0x0130,0x0135,0x0139,0x013d,0x0141,0x0145,0x014e,0x017a,0x017f,0x0183,0x018f,0x0192,0x0196,0x019b,0x019d,0x01a5,0x01aa,0x01b5,0x01bf,0x01c3,0x01cb,0x01cf,0x01d3,0x01d7,0x01da,0x01df,0x01e3,0x01e7,0x01eb,0x01ef,0x01f8,0x0224,0x0229,0x022d,0x0239,0x023c,0x0240,0x0244,0x0248,0x024e,0x0253,0x0257,0x025b,0x025f,0x0263,0x026c,0x0298,0x029d,0x02a1,0x02ad,0x02b0,0x02b4,0x02b6,0x02ba,0x02be,0x02c2,0x02c6,0x02ca,0x02d3,0x02ff,0x0304,0x0308,0x0314,0x0317,0x031b
0481 0001 0002  |    |		.XXX[0x62]
0483 0003 0004  |    |
0485 0005 0006  |    |
0487 0007 0008  |    |
0489 0009 000a  |    |
048b 000b 000c  |    |
048d 000d 000e  |    |
048f 000f 0011  |    |
0491 0010 0012  |    |
0493 0013 0014  |    |
0495 0015 0017  |    |
0497 0016 0019  |    |
0499 001a 001b  |    |
049b 001c 001d  |    |
049d 001e 001f  |    |
049f 0020 0021  |   !|
04a1 0022 0023  | " #|
04a3 0024 0025  | $ %|
04a5 0026 0027  | & '|
04a7 0028 002a  | ( *|
04a9 0029 002b  | ) +|
04ab 002c 002d  | , -|
04ad 002e 002f  | . /|
04af 0030 0032  | 0 2|
04b1 0031 0034  | 1 4|
04b3 0035 0036  | 5 6|
04b5 0037 0038  | 7 8|
04b7 0039 003a  | 9 :|
04b9 003b 003c  | ; <|
04bb 003d 003e  | = >|
04bd 003f 0040  | ? @|
04bf 0041 0043  | A C|
04c1 0042 0044  | B D|
04c3 0045 0046  | E F|
04c5 0047 0048  | G H|
04c7 0049 004a  | I J|
04c9 004b 004c  | K L|
04cb 004d 004e  | M N|
04cd 004f 0050  | O P|
04cf 0052 0051  | R Q|
04d1 0053 0054  | S T|
04d3 0055 0056  | U V|
04d5 0057 0058  | W X|
04d7 0059 005a  | Y Z|
04d9 005b 005c  | [ \|
04db 005d 005f  | ] _|
04dd 005e 0060  | ^ `|
04df 0061 0062  | a b|
04e1 0063 0064  | c d|
04e3 0000 0000  |    |		.BLANK	0000[0x11d]