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

⟦632f04575⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 03c0       |    |		.CONST	0x03c0								; 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 003c       | <  |		.CONST	0x003c								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0011       |    |		.CONST	0x0011								; Number of locals
001b			INIT_0018:
001b e002       |    |		Load	0x0,0x2
001c 0322       | "  |		Declare_Variable	Record
001d e003       |    |		Load	0x0,0x3
001e 0007       |    |		Action	Break_Optional
001f e004       |    |		Load	0x0,0x4
0020 0322       | "  |		Declare_Variable	Record
0021 e004       |    |		Load	0x0,0x4
0022 0322       | "  |		Declare_Variable	Record
0023 e005       |    |		Load	0x0,0x5
0024 02ff       |    |		Declare_Variable	Variant_Record
0025 00d8       |    |		Load_Top	At_Offset_0
0026 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0027 e003       |    |		Load	0x0,0x3
0028 0007       |    |		Action	Break_Optional
0029 0092 0365  |   e|		Action	Push_String_Extended,0x365					; "date"
002b 0092 0366  |   f|		Action	Push_String_Extended,0x366					; "day"
002d 0092 0367  |   g|		Action	Push_String_Extended,0x367					; "para"
002f 0092 0368  |   h|		Action	Push_String_Extended,0x368					; "para_2"
0031 0092 0369  |   i|		Action	Push_String_Extended,0x369					; "is_class"
0033 0092 036a  |   j|		Action	Push_String_Extended,0x36a					; "is_class_2"
0035 e006       |    |		Load	0x0,0x6
0036 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0037 00e1       |    |		Load_Encached	Boolean_Cache
0038 e006       |    |		Load	0x0,0x6
0039 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
003a e004       |    |		Load	0x0,0x4
003b 0322       | "  |		Declare_Variable	Record
003c			BODY_0018:
003c 00d8       |    |		Load_Top	At_Offset_0
003d 4800       |H   |		Short_Literal	0x0
003e 4801       |H   |		Short_Literal	0x1
003f e007       |    |		Load	0x0,0x7
0040 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0041 035b       | [  |		Declare_Type	Array,Constrained
0042 0337       | 7  |		Declare_Variable	Array
0043 480a       |H   |		Short_Literal	0xa
0044 4800       |H   |		Short_Literal	0x0
0045 00da       |    |		Load_Top	At_Offset_2
0046 01d6       |    |		Execute	Vector,Field_Write
0047 482e       |H.  |		Short_Literal	0x2e
0048 4801       |H   |		Short_Literal	0x1
0049 00da       |    |		Load_Top	At_Offset_2
004a 01d6       |    |		Execute	Vector,Field_Write
004b 4800       |H   |		Short_Literal	0x0
004c 4803       |H   |		Short_Literal	0x3
004d e007       |    |		Load	0x0,0x7
004e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
004f 035b       | [  |		Declare_Type	Array,Constrained
0050 0337       | 7  |		Declare_Variable	Array
0051 480a       |H   |		Short_Literal	0xa
0052 4800       |H   |		Short_Literal	0x0
0053 00da       |    |		Load_Top	At_Offset_2
0054 01d6       |    |		Execute	Vector,Field_Write
0055 482e       |H.  |		Short_Literal	0x2e
0056 4801       |H   |		Short_Literal	0x1
0057 00da       |    |		Load_Top	At_Offset_2
0058 01d6       |    |		Execute	Vector,Field_Write
0059 484a       |HJ  |		Short_Literal	0x4a
005a 4802       |H   |		Short_Literal	0x2
005b 00da       |    |		Load_Top	At_Offset_2
005c 01d6       |    |		Execute	Vector,Field_Write
005d 4802       |H   |		Short_Literal	0x2
005e 4803       |H   |		Short_Literal	0x3
005f 00da       |    |		Load_Top	At_Offset_2
0060 01d6       |    |		Execute	Vector,Field_Write
0061 8008       |    |		Call	0x0,0x8
0062 00d1       |    |		Pop_Control	Pop_Count_1
0063 e402       |    |		Load	0x2,0x2
0064 8009       |    |		Call	0x0,0x9
0065 00d1       |    |		Pop_Control	Pop_Count_1
0066 e403       |    |		Load	0x2,0x3
0067 e402       |    |		Load	0x2,0x2
0068 e40c       |    |		Load	0x2,0xc
0069 800a       |    |		Call	0x0,0xa
006a 00db       |    |		Load_Top	At_Offset_3
006b 800b       |    |		Call	0x0,0xb
006c 00d1       |    |		Pop_Control	Pop_Count_1
006d c403       |    |		Store	0x2,0x3
006e 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
0070 e403       |    |		Load	0x2,0x3
0071 800c       |    |		Call	0x0,0xc
0072 800d       |    |		Call	0x0,0xd
0073 01cc       |    |		Execute	Vector,Catenate
0074 e00e       |    |		Load	0x0,0xe
0075 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0076 00d8       |    |		Load_Top	At_Offset_0
0077 4800       |H   |		Short_Literal	0x0
0078 4801       |H   |		Short_Literal	0x1
0079 e007       |    |		Load	0x0,0x7
007a 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
007b 035b       | [  |		Declare_Type	Array,Constrained
007c 0337       | 7  |		Declare_Variable	Array
007d 480a       |H   |		Short_Literal	0xa
007e 4800       |H   |		Short_Literal	0x0
007f 00da       |    |		Load_Top	At_Offset_2
0080 01d6       |    |		Execute	Vector,Field_Write
0081 4804       |H   |		Short_Literal	0x4
0082 4801       |H   |		Short_Literal	0x1
0083 00da       |    |		Load_Top	At_Offset_2
0084 01d6       |    |		Execute	Vector,Field_Write
0085 4800       |H   |		Short_Literal	0x0
0086 4803       |H   |		Short_Literal	0x3
0087 e007       |    |		Load	0x0,0x7
0088 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0089 035b       | [  |		Declare_Type	Array,Constrained
008a 0337       | 7  |		Declare_Variable	Array
008b 480a       |H   |		Short_Literal	0xa
008c 4800       |H   |		Short_Literal	0x0
008d 00da       |    |		Load_Top	At_Offset_2
008e 01d6       |    |		Execute	Vector,Field_Write
008f 4804       |H   |		Short_Literal	0x4
0090 4801       |H   |		Short_Literal	0x1
0091 00da       |    |		Load_Top	At_Offset_2
0092 01d6       |    |		Execute	Vector,Field_Write
0093 4807       |H   |		Short_Literal	0x7
0094 4802       |H   |		Short_Literal	0x2
0095 00da       |    |		Load_Top	At_Offset_2
0096 01d6       |    |		Execute	Vector,Field_Write
0097 4802       |H   |		Short_Literal	0x2
0098 4803       |H   |		Short_Literal	0x3
0099 00da       |    |		Load_Top	At_Offset_2
009a 01d6       |    |		Execute	Vector,Field_Write
009b 8008       |    |		Call	0x0,0x8
009c 00d1       |    |		Pop_Control	Pop_Count_1
009d e403       |    |		Load	0x2,0x3
009e e402       |    |		Load	0x2,0x2
009f e40c       |    |		Load	0x2,0xc
00a0 800a       |    |		Call	0x0,0xa
00a1 00db       |    |		Load_Top	At_Offset_3
00a2 800b       |    |		Call	0x0,0xb
00a3 00d1       |    |		Pop_Control	Pop_Count_1
00a4 c403       |    |		Store	0x2,0x3
00a5 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
00a7 e403       |    |		Load	0x2,0x3
00a8 800c       |    |		Call	0x0,0xc
00a9 800d       |    |		Call	0x0,0xd
00aa 01cc       |    |		Execute	Vector,Catenate
00ab e00e       |    |		Load	0x0,0xe
00ac 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00ad 00d8       |    |		Load_Top	At_Offset_0
00ae 4800       |H   |		Short_Literal	0x0
00af 4801       |H   |		Short_Literal	0x1
00b0 e007       |    |		Load	0x0,0x7
00b1 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00b2 035b       | [  |		Declare_Type	Array,Constrained
00b3 0337       | 7  |		Declare_Variable	Array
00b4 4867       |Hg  |		Short_Literal	0x67
00b5 4800       |H   |		Short_Literal	0x0
00b6 00da       |    |		Load_Top	At_Offset_2
00b7 01d6       |    |		Execute	Vector,Field_Write
00b8 482b       |H+  |		Short_Literal	0x2b
00b9 4801       |H   |		Short_Literal	0x1
00ba 00da       |    |		Load_Top	At_Offset_2
00bb 01d6       |    |		Execute	Vector,Field_Write
00bc 4800       |H   |		Short_Literal	0x0
00bd 4803       |H   |		Short_Literal	0x3
00be e007       |    |		Load	0x0,0x7
00bf 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00c0 035b       | [  |		Declare_Type	Array,Constrained
00c1 0337       | 7  |		Declare_Variable	Array
00c2 480d       |H   |		Short_Literal	0xd
00c3 4800       |H   |		Short_Literal	0x0
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 01d6       |    |		Execute	Vector,Field_Write
00c6 482b       |H+  |		Short_Literal	0x2b
00c7 4801       |H   |		Short_Literal	0x1
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 01d6       |    |		Execute	Vector,Field_Write
00ca 4849       |HI  |		Short_Literal	0x49
00cb 4802       |H   |		Short_Literal	0x2
00cc 00da       |    |		Load_Top	At_Offset_2
00cd 01d6       |    |		Execute	Vector,Field_Write
00ce 4817       |H   |		Short_Literal	0x17
00cf 4803       |H   |		Short_Literal	0x3
00d0 00da       |    |		Load_Top	At_Offset_2
00d1 01d6       |    |		Execute	Vector,Field_Write
00d2 8008       |    |		Call	0x0,0x8
00d3 00d1       |    |		Pop_Control	Pop_Count_1
00d4 e403       |    |		Load	0x2,0x3
00d5 e402       |    |		Load	0x2,0x2
00d6 e40c       |    |		Load	0x2,0xc
00d7 800a       |    |		Call	0x0,0xa
00d8 00db       |    |		Load_Top	At_Offset_3
00d9 800b       |    |		Call	0x0,0xb
00da 00d1       |    |		Pop_Control	Pop_Count_1
00db c403       |    |		Store	0x2,0x3
00dc 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
00de e403       |    |		Load	0x2,0x3
00df 800c       |    |		Call	0x0,0xc
00e0 800d       |    |		Call	0x0,0xd
00e1 01cc       |    |		Execute	Vector,Catenate
00e2 e00e       |    |		Load	0x0,0xe
00e3 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00e4 00d8       |    |		Load_Top	At_Offset_0
00e5 4800       |H   |		Short_Literal	0x0
00e6 4801       |H   |		Short_Literal	0x1
00e7 e007       |    |		Load	0x0,0x7
00e8 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00e9 035b       | [  |		Declare_Type	Array,Constrained
00ea 0337       | 7  |		Declare_Variable	Array
00eb 480a       |H   |		Short_Literal	0xa
00ec 4800       |H   |		Short_Literal	0x0
00ed 00da       |    |		Load_Top	At_Offset_2
00ee 01d6       |    |		Execute	Vector,Field_Write
00ef 4807       |H   |		Short_Literal	0x7
00f0 4801       |H   |		Short_Literal	0x1
00f1 00da       |    |		Load_Top	At_Offset_2
00f2 01d6       |    |		Execute	Vector,Field_Write
00f3 4800       |H   |		Short_Literal	0x0
00f4 4803       |H   |		Short_Literal	0x3
00f5 e007       |    |		Load	0x0,0x7
00f6 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00f7 035b       | [  |		Declare_Type	Array,Constrained
00f8 0337       | 7  |		Declare_Variable	Array
00f9 480a       |H   |		Short_Literal	0xa
00fa 4800       |H   |		Short_Literal	0x0
00fb 00da       |    |		Load_Top	At_Offset_2
00fc 01d6       |    |		Execute	Vector,Field_Write
00fd 4803       |H   |		Short_Literal	0x3
00fe 4801       |H   |		Short_Literal	0x1
00ff 00da       |    |		Load_Top	At_Offset_2
0100 01d6       |    |		Execute	Vector,Field_Write
0101 484a       |HJ  |		Short_Literal	0x4a
0102 4802       |H   |		Short_Literal	0x2
0103 00da       |    |		Load_Top	At_Offset_2
0104 01d6       |    |		Execute	Vector,Field_Write
0105 4802       |H   |		Short_Literal	0x2
0106 4803       |H   |		Short_Literal	0x3
0107 00da       |    |		Load_Top	At_Offset_2
0108 01d6       |    |		Execute	Vector,Field_Write
0109 8008       |    |		Call	0x0,0x8
010a 00d1       |    |		Pop_Control	Pop_Count_1
010b e403       |    |		Load	0x2,0x3
010c e402       |    |		Load	0x2,0x2
010d e40c       |    |		Load	0x2,0xc
010e 800a       |    |		Call	0x0,0xa
010f 00db       |    |		Load_Top	At_Offset_3
0110 800b       |    |		Call	0x0,0xb
0111 00d1       |    |		Pop_Control	Pop_Count_1
0112 c403       |    |		Store	0x2,0x3
0113 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
0115 e403       |    |		Load	0x2,0x3
0116 800c       |    |		Call	0x0,0xc
0117 800d       |    |		Call	0x0,0xd
0118 01cc       |    |		Execute	Vector,Catenate
0119 e00e       |    |		Load	0x0,0xe
011a 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
011b e402       |    |		Load	0x2,0x2
011c e403       |    |		Load	0x2,0x3
011d 800f       |    |		Call	0x0,0xf
011e 00d1       |    |		Pop_Control	Pop_Count_1
011f 0092 036c  |   l|		Action	Push_String_Extended,0x36c					; "destruction de l agent n= "
0121 e403       |    |		Load	0x2,0x3
0122 800c       |    |		Call	0x0,0xc
0123 800d       |    |		Call	0x0,0xd
0124 01cc       |    |		Execute	Vector,Catenate
0125 e00e       |    |		Load	0x0,0xe
0126 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0127 e402       |    |		Load	0x2,0x2
0128 4802       |H   |		Short_Literal	0x2
0129 8010       |    |		Call	0x0,0x10
012a 800f       |    |		Call	0x0,0xf
012b 00d1       |    |		Pop_Control	Pop_Count_1
012c 0092 036c  |   l|		Action	Push_String_Extended,0x36c					; "destruction de l agent n= "
012e 4802       |H   |		Short_Literal	0x2
012f 8010       |    |		Call	0x0,0x10
0130 800c       |    |		Call	0x0,0xc
0131 800d       |    |		Call	0x0,0xd
0132 01cc       |    |		Execute	Vector,Catenate
0133 e00e       |    |		Load	0x0,0xe
0134 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0135 00d8       |    |		Load_Top	At_Offset_0
0136 4800       |H   |		Short_Literal	0x0
0137 4801       |H   |		Short_Literal	0x1
0138 e007       |    |		Load	0x0,0x7
0139 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
013a 035b       | [  |		Declare_Type	Array,Constrained
013b 0337       | 7  |		Declare_Variable	Array
013c 480a       |H   |		Short_Literal	0xa
013d 4800       |H   |		Short_Literal	0x0
013e 00da       |    |		Load_Top	At_Offset_2
013f 01d6       |    |		Execute	Vector,Field_Write
0140 484a       |HJ  |		Short_Literal	0x4a
0141 4801       |H   |		Short_Literal	0x1
0142 00da       |    |		Load_Top	At_Offset_2
0143 01d6       |    |		Execute	Vector,Field_Write
0144 4800       |H   |		Short_Literal	0x0
0145 4803       |H   |		Short_Literal	0x3
0146 e007       |    |		Load	0x0,0x7
0147 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0148 035b       | [  |		Declare_Type	Array,Constrained
0149 0337       | 7  |		Declare_Variable	Array
014a 480a       |H   |		Short_Literal	0xa
014b 4800       |H   |		Short_Literal	0x0
014c 00da       |    |		Load_Top	At_Offset_2
014d 01d6       |    |		Execute	Vector,Field_Write
014e 4807       |H   |		Short_Literal	0x7
014f 4801       |H   |		Short_Literal	0x1
0150 00da       |    |		Load_Top	At_Offset_2
0151 01d6       |    |		Execute	Vector,Field_Write
0152 4807       |H   |		Short_Literal	0x7
0153 4802       |H   |		Short_Literal	0x2
0154 00da       |    |		Load_Top	At_Offset_2
0155 01d6       |    |		Execute	Vector,Field_Write
0156 4802       |H   |		Short_Literal	0x2
0157 4803       |H   |		Short_Literal	0x3
0158 00da       |    |		Load_Top	At_Offset_2
0159 01d6       |    |		Execute	Vector,Field_Write
015a 8008       |    |		Call	0x0,0x8
015b 00d1       |    |		Pop_Control	Pop_Count_1
015c e403       |    |		Load	0x2,0x3
015d e402       |    |		Load	0x2,0x2
015e e40c       |    |		Load	0x2,0xc
015f 800a       |    |		Call	0x0,0xa
0160 00db       |    |		Load_Top	At_Offset_3
0161 800b       |    |		Call	0x0,0xb
0162 00d1       |    |		Pop_Control	Pop_Count_1
0163 c403       |    |		Store	0x2,0x3
0164 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
0166 e403       |    |		Load	0x2,0x3
0167 800c       |    |		Call	0x0,0xc
0168 800d       |    |		Call	0x0,0xd
0169 01cc       |    |		Execute	Vector,Catenate
016a e00e       |    |		Load	0x0,0xe
016b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
016c e403       |    |		Load	0x2,0x3
016d e402       |    |		Load	0x2,0x2
016e e40c       |    |		Load	0x2,0xc
016f 800a       |    |		Call	0x0,0xa
0170 e011       |    |		Load	0x0,0x11
0171 800b       |    |		Call	0x0,0xb
0172 00d1       |    |		Pop_Control	Pop_Count_1
0173 c403       |    |		Store	0x2,0x3
0174 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
0176 e403       |    |		Load	0x2,0x3
0177 800c       |    |		Call	0x0,0xc
0178 800d       |    |		Call	0x0,0xd
0179 01cc       |    |		Execute	Vector,Catenate
017a e00e       |    |		Load	0x0,0xe
017b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
017c e402       |    |		Load	0x2,0x2
017d e40a       |    |		Load	0x2,0xa
017e 800a       |    |		Call	0x0,0xa
017f e408       |    |		Load	0x2,0x8
0180 800a       |    |		Call	0x0,0xa
0181 e403       |    |		Load	0x2,0x3
0182 8012       |    |		Call	0x0,0x12
0183 00d1       |    |		Pop_Control	Pop_Count_1
0184 e402       |    |		Load	0x2,0x2
0185 e40a       |    |		Load	0x2,0xa
0186 800a       |    |		Call	0x0,0xa
0187 e408       |    |		Load	0x2,0x8
0188 800a       |    |		Call	0x0,0xa
0189 4801       |H   |		Short_Literal	0x1
018a 8010       |    |		Call	0x0,0x10
018b 8012       |    |		Call	0x0,0x12
018c 00d1       |    |		Pop_Control	Pop_Count_1
018d e402       |    |		Load	0x2,0x2
018e e40a       |    |		Load	0x2,0xa
018f 800a       |    |		Call	0x0,0xa
0190 e408       |    |		Load	0x2,0x8
0191 800a       |    |		Call	0x0,0xa
0192 4802       |H   |		Short_Literal	0x2
0193 8010       |    |		Call	0x0,0x10
0194 8012       |    |		Call	0x0,0x12
0195 00d1       |    |		Pop_Control	Pop_Count_1
0196 e402       |    |		Load	0x2,0x2
0197 e40a       |    |		Load	0x2,0xa
0198 800a       |    |		Call	0x0,0xa
0199 e408       |    |		Load	0x2,0x8
019a 800a       |    |		Call	0x0,0xa
019b 4803       |H   |		Short_Literal	0x3
019c 8010       |    |		Call	0x0,0x10
019d 8012       |    |		Call	0x0,0x12
019e 00d1       |    |		Pop_Control	Pop_Count_1
019f 00d8       |    |		Load_Top	At_Offset_0
01a0 4800       |H   |		Short_Literal	0x0
01a1 4801       |H   |		Short_Literal	0x1
01a2 e007       |    |		Load	0x0,0x7
01a3 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01a4 035b       | [  |		Declare_Type	Array,Constrained
01a5 0337       | 7  |		Declare_Variable	Array
01a6 480a       |H   |		Short_Literal	0xa
01a7 4800       |H   |		Short_Literal	0x0
01a8 00da       |    |		Load_Top	At_Offset_2
01a9 01d6       |    |		Execute	Vector,Field_Write
01aa 4807       |H   |		Short_Literal	0x7
01ab 4801       |H   |		Short_Literal	0x1
01ac 00da       |    |		Load_Top	At_Offset_2
01ad 01d6       |    |		Execute	Vector,Field_Write
01ae 4800       |H   |		Short_Literal	0x0
01af 4803       |H   |		Short_Literal	0x3
01b0 e007       |    |		Load	0x0,0x7
01b1 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01b2 035b       | [  |		Declare_Type	Array,Constrained
01b3 0337       | 7  |		Declare_Variable	Array
01b4 480a       |H   |		Short_Literal	0xa
01b5 4800       |H   |		Short_Literal	0x0
01b6 00da       |    |		Load_Top	At_Offset_2
01b7 01d6       |    |		Execute	Vector,Field_Write
01b8 4803       |H   |		Short_Literal	0x3
01b9 4801       |H   |		Short_Literal	0x1
01ba 00da       |    |		Load_Top	At_Offset_2
01bb 01d6       |    |		Execute	Vector,Field_Write
01bc 484a       |HJ  |		Short_Literal	0x4a
01bd 4802       |H   |		Short_Literal	0x2
01be 00da       |    |		Load_Top	At_Offset_2
01bf 01d6       |    |		Execute	Vector,Field_Write
01c0 4802       |H   |		Short_Literal	0x2
01c1 4803       |H   |		Short_Literal	0x3
01c2 00da       |    |		Load_Top	At_Offset_2
01c3 01d6       |    |		Execute	Vector,Field_Write
01c4 8008       |    |		Call	0x0,0x8
01c5 00d1       |    |		Pop_Control	Pop_Count_1
01c6 e403       |    |		Load	0x2,0x3
01c7 e402       |    |		Load	0x2,0x2
01c8 e40c       |    |		Load	0x2,0xc
01c9 800a       |    |		Call	0x0,0xa
01ca 00db       |    |		Load_Top	At_Offset_3
01cb 800b       |    |		Call	0x0,0xb
01cc 00d1       |    |		Pop_Control	Pop_Count_1
01cd c403       |    |		Store	0x2,0x3
01ce 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
01d0 e403       |    |		Load	0x2,0x3
01d1 800c       |    |		Call	0x0,0xc
01d2 800d       |    |		Call	0x0,0xd
01d3 01cc       |    |		Execute	Vector,Catenate
01d4 e00e       |    |		Load	0x0,0xe
01d5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01d6 e403       |    |		Load	0x2,0x3
01d7 e402       |    |		Load	0x2,0x2
01d8 e40c       |    |		Load	0x2,0xc
01d9 800a       |    |		Call	0x0,0xa
01da e011       |    |		Load	0x0,0x11
01db 800b       |    |		Call	0x0,0xb
01dc 00d1       |    |		Pop_Control	Pop_Count_1
01dd c403       |    |		Store	0x2,0x3
01de 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
01e0 e403       |    |		Load	0x2,0x3
01e1 800c       |    |		Call	0x0,0xc
01e2 800d       |    |		Call	0x0,0xd
01e3 01cc       |    |		Execute	Vector,Catenate
01e4 e00e       |    |		Load	0x0,0xe
01e5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01e6 e403       |    |		Load	0x2,0x3
01e7 e402       |    |		Load	0x2,0x2
01e8 e40c       |    |		Load	0x2,0xc
01e9 800a       |    |		Call	0x0,0xa
01ea e011       |    |		Load	0x0,0x11
01eb 800b       |    |		Call	0x0,0xb
01ec 00d1       |    |		Pop_Control	Pop_Count_1
01ed c403       |    |		Store	0x2,0x3
01ee 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
01f0 e403       |    |		Load	0x2,0x3
01f1 800c       |    |		Call	0x0,0xc
01f2 800d       |    |		Call	0x0,0xd
01f3 01cc       |    |		Execute	Vector,Catenate
01f4 e00e       |    |		Load	0x0,0xe
01f5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01f6 e403       |    |		Load	0x2,0x3
01f7 e402       |    |		Load	0x2,0x2
01f8 e40c       |    |		Load	0x2,0xc
01f9 800a       |    |		Call	0x0,0xa
01fa e011       |    |		Load	0x0,0x11
01fb 800b       |    |		Call	0x0,0xb
01fc 00d1       |    |		Pop_Control	Pop_Count_1
01fd c403       |    |		Store	0x2,0x3
01fe 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "enregistrement_sous l agent n= "
0200 e403       |    |		Load	0x2,0x3
0201 800c       |    |		Call	0x0,0xc
0202 800d       |    |		Call	0x0,0xd
0203 01cc       |    |		Execute	Vector,Catenate
0204 e00e       |    |		Load	0x0,0xe
0205 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0206 e402       |    |		Load	0x2,0x2
0207 e40b       |    |		Load	0x2,0xb
0208 800a       |    |		Call	0x0,0xa
0209 e409       |    |		Load	0x2,0x9
020a 800a       |    |		Call	0x0,0xa
020b e403       |    |		Load	0x2,0x3
020c 8012       |    |		Call	0x0,0x12
020d 00d1       |    |		Pop_Control	Pop_Count_1
020e e402       |    |		Load	0x2,0x2
020f e40b       |    |		Load	0x2,0xb
0210 800a       |    |		Call	0x0,0xa
0211 e409       |    |		Load	0x2,0x9
0212 800a       |    |		Call	0x0,0xa
0213 4805       |H   |		Short_Literal	0x5
0214 8010       |    |		Call	0x0,0x10
0215 8012       |    |		Call	0x0,0x12
0216 00d1       |    |		Pop_Control	Pop_Count_1
0217 e402       |    |		Load	0x2,0x2
0218 e40b       |    |		Load	0x2,0xb
0219 800a       |    |		Call	0x0,0xa
021a e409       |    |		Load	0x2,0x9
021b 800a       |    |		Call	0x0,0xa
021c 4806       |H   |		Short_Literal	0x6
021d 8010       |    |		Call	0x0,0x10
021e 8012       |    |		Call	0x0,0x12
021f 00d1       |    |		Pop_Control	Pop_Count_1
0220 e402       |    |		Load	0x2,0x2
0221 e40b       |    |		Load	0x2,0xb
0222 800a       |    |		Call	0x0,0xa
0223 e409       |    |		Load	0x2,0x9
0224 800a       |    |		Call	0x0,0xa
0225 4807       |H   |		Short_Literal	0x7
0226 8010       |    |		Call	0x0,0x10
0227 8012       |    |		Call	0x0,0x12
0228 00d1       |    |		Pop_Control	Pop_Count_1
0229 e402       |    |		Load	0x2,0x2
022a e40a       |    |		Load	0x2,0xa
022b 800a       |    |		Call	0x0,0xa
022c e408       |    |		Load	0x2,0x8
022d 800a       |    |		Call	0x0,0xa
022e 4805       |H   |		Short_Literal	0x5
022f 8010       |    |		Call	0x0,0x10
0230 8012       |    |		Call	0x0,0x12
0231 00d1       |    |		Pop_Control	Pop_Count_1
0232 e402       |    |		Load	0x2,0x2
0233 e40a       |    |		Load	0x2,0xa
0234 800a       |    |		Call	0x0,0xa
0235 e408       |    |		Load	0x2,0x8
0236 800a       |    |		Call	0x0,0xa
0237 4806       |H   |		Short_Literal	0x6
0238 8010       |    |		Call	0x0,0x10
0239 8012       |    |		Call	0x0,0x12
023a 00d1       |    |		Pop_Control	Pop_Count_1
023b e402       |    |		Load	0x2,0x2
023c e40a       |    |		Load	0x2,0xa
023d 800a       |    |		Call	0x0,0xa
023e e408       |    |		Load	0x2,0x8
023f 800a       |    |		Call	0x0,0xa
0240 4807       |H   |		Short_Literal	0x7
0241 8010       |    |		Call	0x0,0x10
0242 8012       |    |		Call	0x0,0x12
0243 00d1       |    |		Pop_Control	Pop_Count_1
0244 e402       |    |		Load	0x2,0x2
0245 e40a       |    |		Load	0x2,0xa
0246 800a       |    |		Call	0x0,0xa
0247 e408       |    |		Load	0x2,0x8
0248 800a       |    |		Call	0x0,0xa
0249 4808       |H   |		Short_Literal	0x8
024a 8010       |    |		Call	0x0,0x10
024b 8012       |    |		Call	0x0,0x12
024c 00d1       |    |		Pop_Control	Pop_Count_1
024d e006       |    |		Load	0x0,0x6
024e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
024f e006       |    |		Load	0x0,0x6
0250 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0251 c40e       |    |		Store	0x2,0xe
0252 00e1       |    |		Load_Encached	Boolean_Cache
0253 e406       |    |		Load	0x2,0x6
0254 e006       |    |		Load	0x0,0x6
0255 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0256 e402       |    |		Load	0x2,0x2
0257 e408       |    |		Load	0x2,0x8
0258 800a       |    |		Call	0x0,0xa
0259 8013       |    |		Call	0x0,0x13
025a 00d1       |    |		Pop_Control	Pop_Count_1
025b c40e       |    |		Store	0x2,0xe
025c 00d1       |    |		Pop_Control	Pop_Count_1
025d 005b       | [  |		Store_Top	Discrete,At_Offset_3
025e 00da       |    |		Load_Top	At_Offset_2
025f 6824       |h$  |		Jump_Zero	0x284
0260 e006       |    |		Load	0x0,0x6
0261 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0262 e40e       |    |		Load	0x2,0xe
0263 e006       |    |		Load	0x0,0x6
0264 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0265 003a       | :  |		Store_Top	Access,At_Offset_2
0266 00cf       |    |		Action	Mark_Auxiliary
0267 00da       |    |		Load_Top	At_Offset_2
0268 e006       |    |		Load	0x0,0x6
0269 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
026a 7010       |p   |		Jump_Nonzero	0x27b
026b 0092 036d  |   m|		Action	Push_String_Extended,0x36d					; "un agent_nb "
026d 00db       |    |		Load_Top	At_Offset_3
026e e006       |    |		Load	0x0,0x6
026f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0270 800c       |    |		Call	0x0,0xc
0271 800d       |    |		Call	0x0,0xd
0272 01cc       |    |		Execute	Vector,Catenate
0273 e00e       |    |		Load	0x0,0xe
0274 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0275 00da       |    |		Load_Top	At_Offset_2
0276 e006       |    |		Load	0x0,0x6
0277 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0278 003b       | ;  |		Store_Top	Access,At_Offset_3
0279 00c9       |    |		Action	Pop_Auxiliary_Loop
027a 7fec       |    |		Jump	0x267
027b 00ce       |    |		Action	Pop_Auxiliary
027c 0092 036e  |   n|		Action	Push_String_Extended,0x36e					; "les parametres sont :"
027e e406       |    |		Load	0x2,0x6
027f 800d       |    |		Call	0x0,0xd
0280 01cc       |    |		Execute	Vector,Catenate
0281 e00e       |    |		Load	0x0,0xe
0282 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0283 7804       |x   |		Jump	0x288
0284 0092 036f  |   o|		Action	Push_String_Extended,0x36f					; "error"
0286 e00e       |    |		Load	0x0,0xe
0287 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0288 e006       |    |		Load	0x0,0x6
0289 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
028a e006       |    |		Load	0x0,0x6
028b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
028c c40e       |    |		Store	0x2,0xe
028d 00e1       |    |		Load_Encached	Boolean_Cache
028e e406       |    |		Load	0x2,0x6
028f e006       |    |		Load	0x0,0x6
0290 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0291 e402       |    |		Load	0x2,0x2
0292 e409       |    |		Load	0x2,0x9
0293 800a       |    |		Call	0x0,0xa
0294 8013       |    |		Call	0x0,0x13
0295 00d1       |    |		Pop_Control	Pop_Count_1
0296 c40e       |    |		Store	0x2,0xe
0297 00d1       |    |		Pop_Control	Pop_Count_1
0298 005b       | [  |		Store_Top	Discrete,At_Offset_3
0299 00da       |    |		Load_Top	At_Offset_2
029a 6824       |h$  |		Jump_Zero	0x2bf
029b e006       |    |		Load	0x0,0x6
029c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
029d e40e       |    |		Load	0x2,0xe
029e e006       |    |		Load	0x0,0x6
029f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02a0 003a       | :  |		Store_Top	Access,At_Offset_2
02a1 00cf       |    |		Action	Mark_Auxiliary
02a2 00da       |    |		Load_Top	At_Offset_2
02a3 e006       |    |		Load	0x0,0x6
02a4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02a5 7010       |p   |		Jump_Nonzero	0x2b6
02a6 0092 036d  |   m|		Action	Push_String_Extended,0x36d					; "un agent_nb "
02a8 00db       |    |		Load_Top	At_Offset_3
02a9 e006       |    |		Load	0x0,0x6
02aa 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02ab 800c       |    |		Call	0x0,0xc
02ac 800d       |    |		Call	0x0,0xd
02ad 01cc       |    |		Execute	Vector,Catenate
02ae e00e       |    |		Load	0x0,0xe
02af 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02b0 00da       |    |		Load_Top	At_Offset_2
02b1 e006       |    |		Load	0x0,0x6
02b2 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02b3 003b       | ;  |		Store_Top	Access,At_Offset_3
02b4 00c9       |    |		Action	Pop_Auxiliary_Loop
02b5 7fec       |    |		Jump	0x2a2
02b6 00ce       |    |		Action	Pop_Auxiliary
02b7 0092 036e  |   n|		Action	Push_String_Extended,0x36e					; "les parametres sont :"
02b9 e406       |    |		Load	0x2,0x6
02ba 800d       |    |		Call	0x0,0xd
02bb 01cc       |    |		Execute	Vector,Catenate
02bc e00e       |    |		Load	0x0,0xe
02bd 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02be 7804       |x   |		Jump	0x2c3
02bf 0092 036f  |   o|		Action	Push_String_Extended,0x36f					; "error"
02c1 e00e       |    |		Load	0x0,0xe
02c2 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02c3 e402       |    |		Load	0x2,0x2
02c4 e408       |    |		Load	0x2,0x8
02c5 800a       |    |		Call	0x0,0xa
02c6 4805       |H   |		Short_Literal	0x5
02c7 8010       |    |		Call	0x0,0x10
02c8 8014       |    |		Call	0x0,0x14
02c9 00d1       |    |		Pop_Control	Pop_Count_1
02ca e402       |    |		Load	0x2,0x2
02cb e408       |    |		Load	0x2,0x8
02cc 800a       |    |		Call	0x0,0xa
02cd 4801       |H   |		Short_Literal	0x1
02ce 8010       |    |		Call	0x0,0x10
02cf 8014       |    |		Call	0x0,0x14
02d0 00d1       |    |		Pop_Control	Pop_Count_1
02d1 e006       |    |		Load	0x0,0x6
02d2 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02d3 e006       |    |		Load	0x0,0x6
02d4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02d5 c40e       |    |		Store	0x2,0xe
02d6 00e1       |    |		Load_Encached	Boolean_Cache
02d7 e406       |    |		Load	0x2,0x6
02d8 e006       |    |		Load	0x0,0x6
02d9 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02da e402       |    |		Load	0x2,0x2
02db e408       |    |		Load	0x2,0x8
02dc 800a       |    |		Call	0x0,0xa
02dd 8013       |    |		Call	0x0,0x13
02de 00d1       |    |		Pop_Control	Pop_Count_1
02df c40e       |    |		Store	0x2,0xe
02e0 00d1       |    |		Pop_Control	Pop_Count_1
02e1 005b       | [  |		Store_Top	Discrete,At_Offset_3
02e2 00da       |    |		Load_Top	At_Offset_2
02e3 6824       |h$  |		Jump_Zero	0x308
02e4 e006       |    |		Load	0x0,0x6
02e5 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
02e6 e40e       |    |		Load	0x2,0xe
02e7 e006       |    |		Load	0x0,0x6
02e8 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02e9 003a       | :  |		Store_Top	Access,At_Offset_2
02ea 00cf       |    |		Action	Mark_Auxiliary
02eb 00da       |    |		Load_Top	At_Offset_2
02ec e006       |    |		Load	0x0,0x6
02ed 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02ee 7010       |p   |		Jump_Nonzero	0x2ff
02ef 0092 036d  |   m|		Action	Push_String_Extended,0x36d					; "un agent_nb "
02f1 00db       |    |		Load_Top	At_Offset_3
02f2 e006       |    |		Load	0x0,0x6
02f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02f4 800c       |    |		Call	0x0,0xc
02f5 800d       |    |		Call	0x0,0xd
02f6 01cc       |    |		Execute	Vector,Catenate
02f7 e00e       |    |		Load	0x0,0xe
02f8 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02f9 00da       |    |		Load_Top	At_Offset_2
02fa e006       |    |		Load	0x0,0x6
02fb 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02fc 003b       | ;  |		Store_Top	Access,At_Offset_3
02fd 00c9       |    |		Action	Pop_Auxiliary_Loop
02fe 7fec       |    |		Jump	0x2eb
02ff 00ce       |    |		Action	Pop_Auxiliary
0300 0092 036e  |   n|		Action	Push_String_Extended,0x36e					; "les parametres sont :"
0302 e406       |    |		Load	0x2,0x6
0303 800d       |    |		Call	0x0,0xd
0304 01cc       |    |		Execute	Vector,Catenate
0305 e00e       |    |		Load	0x0,0xe
0306 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0307 7804       |x   |		Jump	0x30c
0308 0092 036f  |   o|		Action	Push_String_Extended,0x36f					; "error"
030a e00e       |    |		Load	0x0,0xe
030b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
030c e405       |    |		Load	0x2,0x5
030d e402       |    |		Load	0x2,0x2
030e 4802       |H   |		Short_Literal	0x2
030f 8010       |    |		Call	0x0,0x10
0310 8015       |    |		Call	0x0,0x15
0311 00d2       |    |		Pop_Control	Pop_Count_2
0312 0092 0370  |   p|		Action	Push_String_Extended,0x370					; "je get l 'objet n= "
0314 4802       |H   |		Short_Literal	0x2
0315 8010       |    |		Call	0x0,0x10
0316 800c       |    |		Call	0x0,0xc
0317 800d       |    |		Call	0x0,0xd
0318 01cc       |    |		Execute	Vector,Catenate
0319 0092 0371  |   q|		Action	Push_String_Extended,0x371					; " "
031b 01cc       |    |		Execute	Vector,Catenate
031c e405       |    |		Load	0x2,0x5
031d 8016       |    |		Call	0x0,0x16
031e 800d       |    |		Call	0x0,0xd
031f 01cc       |    |		Execute	Vector,Catenate
0320 e00e       |    |		Load	0x0,0xe
0321 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0322 e405       |    |		Load	0x2,0x5
0323 e402       |    |		Load	0x2,0x2
0324 4805       |H   |		Short_Literal	0x5
0325 8010       |    |		Call	0x0,0x10
0326 8015       |    |		Call	0x0,0x15
0327 00d2       |    |		Pop_Control	Pop_Count_2
0328 0092 0370  |   p|		Action	Push_String_Extended,0x370					; "je get l 'objet n= "
032a 4805       |H   |		Short_Literal	0x5
032b 8010       |    |		Call	0x0,0x10
032c 800c       |    |		Call	0x0,0xc
032d 800d       |    |		Call	0x0,0xd
032e 01cc       |    |		Execute	Vector,Catenate
032f 0092 0371  |   q|		Action	Push_String_Extended,0x371					; " "
0331 01cc       |    |		Execute	Vector,Catenate
0332 e405       |    |		Load	0x2,0x5
0333 8016       |    |		Call	0x0,0x16
0334 800d       |    |		Call	0x0,0xd
0335 01cc       |    |		Execute	Vector,Catenate
0336 e00e       |    |		Load	0x0,0xe
0337 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0338 e405       |    |		Load	0x2,0x5
0339 e402       |    |		Load	0x2,0x2
033a 4801       |H   |		Short_Literal	0x1
033b 8010       |    |		Call	0x0,0x10
033c 8015       |    |		Call	0x0,0x15
033d 00d2       |    |		Pop_Control	Pop_Count_2
033e 0092 0370  |   p|		Action	Push_String_Extended,0x370					; "je get l 'objet n= "
0340 4801       |H   |		Short_Literal	0x1
0341 8010       |    |		Call	0x0,0x10
0342 800c       |    |		Call	0x0,0xc
0343 800d       |    |		Call	0x0,0xd
0344 01cc       |    |		Execute	Vector,Catenate
0345 0092 0371  |   q|		Action	Push_String_Extended,0x371					; " "
0347 01cc       |    |		Execute	Vector,Catenate
0348 e405       |    |		Load	0x2,0x5
0349 8016       |    |		Call	0x0,0x16
034a 800d       |    |		Call	0x0,0xd
034b 01cc       |    |		Execute	Vector,Catenate
034c e00e       |    |		Load	0x0,0xe
034d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
034e e405       |    |		Load	0x2,0x5
034f e402       |    |		Load	0x2,0x2
0350 4803       |H   |		Short_Literal	0x3
0351 8010       |    |		Call	0x0,0x10
0352 8015       |    |		Call	0x0,0x15
0353 00d2       |    |		Pop_Control	Pop_Count_2
0354 0092 0370  |   p|		Action	Push_String_Extended,0x370					; "je get l 'objet n= "
0356 4803       |H   |		Short_Literal	0x3
0357 8010       |    |		Call	0x0,0x10
0358 800c       |    |		Call	0x0,0xc
0359 800d       |    |		Call	0x0,0xd
035a 01cc       |    |		Execute	Vector,Catenate
035b 0092 0371  |   q|		Action	Push_String_Extended,0x371					; " "
035d 01cc       |    |		Execute	Vector,Catenate
035e e405       |    |		Load	0x2,0x5
035f 8016       |    |		Call	0x0,0x16
0360 800d       |    |		Call	0x0,0xd
0361 01cc       |    |		Execute	Vector,Catenate
0362 e00e       |    |		Load	0x0,0xe
0363 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0364 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0365 ; --------------------------------------------------------------------------------------
0365 ; STRING TABLE
0365 ; --------------------------------------------------------------------------------------
0365 001c       |    |		.STRTAB	0x001c->0x0373							; "date"
0366 001e       |    |		.STRTAB	0x001e->0x0375							; "day"
0367 001f       |    |		.STRTAB	0x001f->0x0376							; "para"
0368 0021       | !  |		.STRTAB	0x0021->0x0378							; "para_2"
0369 0025       | %  |		.STRTAB	0x0025->0x037b							; "is_class"
036a 002b       | +  |		.STRTAB	0x002b->0x037f							; "is_class_2"
036b 0033       | 3  |		.STRTAB	0x0033->0x0384							; "enregistrement_sous l agent n= "
036c 0050       | P  |		.STRTAB	0x0050->0x0394							; "destruction de l agent n= "
036d 0068       | h  |		.STRTAB	0x0068->0x03a1							; "un agent_nb "
036e 0072       | r  |		.STRTAB	0x0072->0x03a7							; "les parametres sont :"
036f 0085       |    |		.STRTAB	0x0085->0x03b1							; "error"
0370 0088       |    |		.STRTAB	0x0088->0x03b4							; "je get l 'objet n= "
0371 0099       |    |		.STRTAB	0x0099->0x03bd							; " "
0372 0098       |    |		.STREND 0x0098->0x03be
0373 6461 7465  |date|		.STRTAB_STRINGS
03be 0000 0000  |    |		.XXX[0x2]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; Debug Table
03c0 ; --------------------------------------------------------------------------------------
03c0 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x8ca0,0x0000,0x0001,0x0002
03c6 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
03ca 001b 03ce  |    |		.DBG4T	0x001b,0x03ce,0x8001,0x4000
03ce ; --------------------------------------------------------------------------------------
03ce ; Debug chain
03ce ; --------------------------------------------------------------------------------------
03ce 0010 0050  |   P|		.DBGLEN	0x0010,0x0050
03d0 001b 001d  |    |		.DBGLNO	0x001b,0x001d,0x001f,0x0021,0x0023,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0038,0x003a,0x003c,0x0063,0x0066,0x006e,0x0076,0x009d,0x00a5,0x00ad,0x00d4,0x00dc,0x00e4,0x010b,0x0113,0x011b,0x011f,0x0127,0x012c,0x0135,0x015c,0x0164,0x016c,0x0174,0x017c,0x0184,0x018d,0x0196,0x019f,0x01c6,0x01ce,0x01d6,0x01de,0x01e6,0x01ee,0x01f6,0x01fe,0x0206,0x020e,0x0217,0x0220,0x0229,0x0232,0x023b,0x0244,0x024d,0x0252,0x025e,0x0260,0x0267,0x026b,0x0275,0x027c,0x0284,0x0288,0x028d,0x0299,0x029b,0x02a2,0x02a6,0x02b0,0x02b7,0x02bf,0x02c3,0x02ca,0x02d1,0x02d6,0x02e2,0x02e4,0x02eb,0x02ef,0x02f9,0x0300,0x0308,0x030c,0x0312,0x0322,0x0328,0x0338,0x033e,0x034e,0x0354
0430 0001 0002  |    |		.XXX[0x50]
0432 0003 0004  |    |
0434 0005 0006  |    |
0436 0007 0008  |    |
0438 0009 000a  |    |
043a 000b 000c  |    |
043c 000d 000e  |    |
043e 000f 0010  |    |
0440 0011 0012  |    |
0442 0013 0014  |    |
0444 0015 0016  |    |
0446 0017 0018  |    |
0448 0019 001a  |    |
044a 001b 001c  |    |
044c 001d 001e  |    |
044e 001f 0020  |    |
0450 0021 0022  | ! "|
0452 0023 0024  | # $|
0454 0025 0026  | % &|
0456 0027 0028  | ' (|
0458 0029 002a  | ) *|
045a 002b 002c  | + ,|
045c 002d 002e  | - .|
045e 002f 0031  | / 1|
0460 0032 0033  | 2 3|
0462 0034 0035  | 4 5|
0464 0036 0037  | 6 7|
0466 0038 0039  | 8 9|
0468 003b 003c  | ; <|
046a 003d 003e  | = >|
046c 003f 0040  | ? @|
046e 0041 0042  | A B|
0470 0043 0044  | C D|
0472 0045 0047  | E G|
0474 0048 0049  | H I|
0476 004a 004b  | J K|
0478 004c 004d  | L M|
047a 004e 004f  | N O|
047c 0050 0051  | P Q|
047e 0052 0053  | R S|
0480 0000 0000  |    |		.BLANK	0000[0x180]