|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_373c93
└─⟦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 04a0 | | .CONST 0x04a0 ; 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 00b0 | | .CONST 0x00b0 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0023 | # | .CONST 0x0023 ; Number of locals
000b INIT_0008:
000b 029a 00bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b8
000d 029a 00f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f0
000f 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110
0011 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118
0013 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
0015 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
0017 029a 01e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e0
0019 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
001b 029a 0233 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0230
001d 029a 023b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0238
001f 00bf | | Action Accept_Activation
0020 4801 |H | Short_Literal 0x1
0021 4804 |H | Short_Literal 0x4
0022 e002 | | Load 0x0,0x2
0023 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0024 035b | [ | Declare_Type Array,Constrained
0025 4801 |H | Short_Literal 0x1
0026 4804 |H | Short_Literal 0x4
0027 e002 | | Load 0x0,0x2
0028 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0029 035b | [ | Declare_Type Array,Constrained
002a 02a0 | | Declare_Subprogram Null_Subprogram
002b 4802 |H | Short_Literal 0x2
002c 032d | - | Declare_Type Record,Defined
002d 4801 |H | Short_Literal 0x1
002e 4804 |H | Short_Literal 0x4
002f e002 | | Load 0x0,0x2
0030 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0031 035b | [ | Declare_Type Array,Constrained
0032 4801 |H | Short_Literal 0x1
0033 4804 |H | Short_Literal 0x4
0034 e002 | | Load 0x0,0x2
0035 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0036 035b | [ | Declare_Type Array,Constrained
0037 00e3 | | Load_Encached Natural_Cache
0038 e003 | | Load 0x0,0x3
0039 1b11 | | Execute Package,Field_Read,Field_Number 0x11
003a 02a0 | | Declare_Subprogram Null_Subprogram
003b 4804 |H | Short_Literal 0x4
003c 032d | - | Declare_Type Record,Defined
003d 4801 |H | Short_Literal 0x1
003e 4804 |H | Short_Literal 0x4
003f e002 | | Load 0x0,0x2
0040 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0041 035b | [ | Declare_Type Array,Constrained
0042 4801 |H | Short_Literal 0x1
0043 4804 |H | Short_Literal 0x4
0044 e002 | | Load 0x0,0x2
0045 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0046 035b | [ | Declare_Type Array,Constrained
0047 00e3 | | Load_Encached Natural_Cache
0048 02a0 | | Declare_Subprogram Null_Subprogram
0049 4803 |H | Short_Literal 0x3
004a 032d | - | Declare_Type Record,Defined
004b 0093 0000 | | PushFullAddress InMicrocode
004d 609a |` | Indirect_Literal Discrete,0xe8,{0x80000000, 0x00020000}
004e 0273 | s | Execute Discrete,Plus
004f e004 | | Load 0x0,0x4
0050 0273 | s | Execute Discrete,Plus
0051 e005 | | Load 0x0,0x5
0052 0273 | s | Execute Discrete,Plus
0053 00d9 | | Load_Top At_Offset_1
0054 e006 | | Load 0x0,0x6
0055 0387 | | Declare_Variable Package
0056 00d8 | | Load_Top At_Offset_0
0057 020f | | Execute Module,Activate
0058 e007 | | Load 0x0,0x7
0059 00d9 | | Load_Top At_Offset_1
005a 0098 | | Execute Package,Field_Read_Dynamic
005b 0007 | | Action Break_Optional
005c 0093 0000 | | PushFullAddress InMicrocode
005e 6085 |` | Indirect_Literal Discrete,0xe4,{0x80000000, 0x00010000}
005f 0273 | s | Execute Discrete,Plus
0060 e004 | | Load 0x0,0x4
0061 0273 | s | Execute Discrete,Plus
0062 e008 | | Load 0x0,0x8
0063 0273 | s | Execute Discrete,Plus
0064 e217 | | Load 0x1,0x17
0065 e006 | | Load 0x0,0x6
0066 0387 | | Declare_Variable Package
0067 00d8 | | Load_Top At_Offset_0
0068 020f | | Execute Module,Activate
0069 e007 | | Load 0x0,0x7
006a 00d9 | | Load_Top At_Offset_1
006b 0098 | | Execute Package,Field_Read_Dynamic
006c 0007 | | Action Break_Optional
006d 00e3 | | Load_Encached Natural_Cache
006e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
006f 029d 0243 | C| Declare_Subprogram For_Outer_Call,INIT_0240
0071 029d 0273 | s| Declare_Subprogram For_Outer_Call,INIT_0270
0073 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0074 00c7 | | Action Elaborate_Subprogram
0075 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0076 00c7 | | Action Elaborate_Subprogram
0077 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0078 00c7 | | Action Elaborate_Subprogram
0079 1d10 | | Execute_Immediate Reference_Lex_1,0x10
007a 00c7 | | Action Elaborate_Subprogram
007b 1d11 | | Execute_Immediate Reference_Lex_1,0x11
007c 00c7 | | Action Elaborate_Subprogram
007d 1d12 | | Execute_Immediate Reference_Lex_1,0x12
007e 00c7 | | Action Elaborate_Subprogram
007f 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0080 00c7 | | Action Elaborate_Subprogram
0081 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0082 00c7 | | Action Elaborate_Subprogram
0083 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0084 00c7 | | Action Elaborate_Subprogram
0085 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0086 00c7 | | Action Elaborate_Subprogram
0087 029d 0293 | | Declare_Subprogram For_Outer_Call,INIT_0290
0089 4800 |H | Short_Literal 0x0
008a 0093 02f3 | | PushFullAddress InMicrocode,INIT_02f0
008c 00f5 | | Load_Encached Unused21
008d 037d | } | Declare_Type Task,Defined
008e 036f | o | Declare_Variable Task
008f e009 | | Load 0x0,0x9
0090 e00a | | Load 0x0,0xa
0091 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0092 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0093 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0094 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0095 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0096 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0097 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0098 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0099 1d12 | | Execute_Immediate Reference_Lex_1,0x12
009a 480b |H | Short_Literal 0xb
009b e222 | " | Load 0x1,0x22
009c 020e | | Execute Module,Augment_Imports
009d 0007 | | Action Break_Optional
009e 4800 |H | Short_Literal 0x0
009f 0093 02c3 | | PushFullAddress InMicrocode,INIT_02c0
00a1 00f5 | | Load_Encached Unused21
00a2 037d | } | Declare_Type Task,Defined
00a3 036f | o | Declare_Variable Task
00a4 e00b | | Load 0x0,0xb
00a5 e009 | | Load 0x0,0x9
00a6 e00a | | Load 0x0,0xa
00a7 e00c | | Load 0x0,0xc
00a8 a00d | | Reference 0x0,0xd
00a9 a00e | | Reference 0x0,0xe
00aa a00f | | Reference 0x0,0xf
00ab e222 | " | Load 0x1,0x22
00ac 480d |H | Short_Literal 0xd
00ad 4809 |H | Short_Literal 0x9
00ae e223 | # | Load 0x1,0x23
00af 020e | | Execute Module,Augment_Imports
00b0 BODY_0008:
00b0 00be | | Action Activate_Tasks
00b1 00bc | | Action Signal_Activated
00b2 00bb | | Action Signal_Completion
00b3 0000 0000 | | .BLANK 0000[0x5]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00cf | | .CONST 0x00cf ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0004 | | .CONST 0x0004 ; Number of locals
00bb INIT_00b8:
00bb e217 | | Load 0x1,0x17
00bc 0322 | " | Declare_Variable Record
00bd 00db | | Load_Top At_Offset_3
00be e217 | | Load 0x1,0x17
00bf 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
00c0 0119 | | Execute Any,Check_In_Formal_Type
00c1 00d9 | | Load_Top At_Offset_1
00c2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00c3 e5fe | | Load 0x2,-0x2
00c4 e217 | | Load 0x1,0x17
00c5 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
00c6 0119 | | Execute Any,Check_In_Formal_Type
00c7 00d9 | | Load_Top At_Offset_1
00c8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c9 e010 | | Load 0x0,0x10
00ca e21c | | Load 0x1,0x1c
00cb 0098 | | Execute Package,Field_Read_Dynamic
00cc 0007 | | Action Break_Optional
00cd 00e1 | | Load_Encached Boolean_Cache
00ce 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00cf BODY_00b8:
00cf 00da | | Load_Top At_Offset_2
00d0 e21d | | Load 0x1,0x1d
00d1 e011 | | Load 0x0,0x11
00d2 e21c | | Load 0x1,0x1c
00d3 0096 | | Execute Package,Field_Execute_Dynamic
00d4 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
00d5 00d8 | | Load_Top At_Offset_0
00d6 6802 |h | Jump_Zero 0xd9
00d7 4800 |H | Short_Literal 0x0
00d8 4402 |D | Exit_Subprogram With_Result,0x2
00d9 e21d | | Load 0x1,0x1d
00da 00db | | Load_Top At_Offset_3
00db e012 | | Load 0x0,0x12
00dc e21c | | Load 0x1,0x1c
00dd 0096 | | Execute Package,Field_Execute_Dynamic
00de a21d | | Store_Unchecked 0x1,0x1d
00df 4801 |H | Short_Literal 0x1
00e0 4402 |D | Exit_Subprogram With_Result,0x2
00e1 0000 0000 | | .XXX[0x3]
00e3 0000 | |
00e4 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00e8 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
00ec 0000 0000 | | .BLANK 0000[0x4]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 0103 | | .CONST 0x0103 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0003 | | .CONST 0x0003 ; Number of locals
00f3 INIT_00f0:
00f3 e217 | | Load 0x1,0x17
00f4 0322 | " | Declare_Variable Record
00f5 00db | | Load_Top At_Offset_3
00f6 e217 | | Load 0x1,0x17
00f7 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
00f8 0119 | | Execute Any,Check_In_Formal_Type
00f9 00d9 | | Load_Top At_Offset_1
00fa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00fb e5fe | | Load 0x2,-0x2
00fc e217 | | Load 0x1,0x17
00fd 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
00fe 0119 | | Execute Any,Check_In_Formal_Type
00ff 00d9 | | Load_Top At_Offset_1
0100 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0101 00e1 | | Load_Encached Boolean_Cache
0102 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0103 BODY_00f0:
0103 00e1 | | Load_Encached Boolean_Cache
0104 e21d | | Load 0x1,0x1d
0105 00db | | Load_Top At_Offset_3
0106 e013 | | Load 0x0,0x13
0107 e21c | | Load 0x1,0x1c
0108 0096 | | Execute Package,Field_Execute_Dynamic
0109 c21d | | Store 0x1,0x1d
010a 0059 | Y | Store_Top Discrete,At_Offset_1
010b 00d8 | | Load_Top At_Offset_0
010c 4402 |D | Exit_Subprogram With_Result,0x2
010d 0000 0000 | | .XXX[0x3]
010f 0000 | |
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 0833 | 3 | Execute_Immediate Raise,0x33
0114 0000 0000 | | .BLANK 0000[0x4]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011f | | .CONST 0x011f ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b e00b | | Load 0x0,0xb
011c 0322 | " | Declare_Variable Record
011d 00d8 | | Load_Top At_Offset_0
011e 1c00 | | Execute_Immediate Run_Utility,0x0
011f BODY_0118:
011f 4803 |H | Short_Literal 0x3
0120 00d9 | | Load_Top At_Offset_1
0121 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0122 00db | | Load_Top At_Offset_3
0123 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0124 00d9 | | Load_Top At_Offset_1
0125 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0126 00db | | Load_Top At_Offset_3
0127 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0128 00d9 | | Load_Top At_Offset_1
0129 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
012a 00db | | Load_Top At_Offset_3
012b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
012c 00d9 | | Load_Top At_Offset_1
012d 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
012e 00db | | Load_Top At_Offset_3
012f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0130 00d9 | | Load_Top At_Offset_1
0131 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0132 00db | | Load_Top At_Offset_3
0133 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
0134 00d9 | | Load_Top At_Offset_1
0135 380a |8 | Execute Record,Field_Write,Field_Number 0xa
0136 e5fe | | Load 0x2,-0x2
0137 00d9 | | Load_Top At_Offset_1
0138 8014 | | Call 0x0,0x14
0139 00d1 | | Pop_Control Pop_Count_1
013a e5fe | | Load 0x2,-0x2
013b 00d9 | | Load_Top At_Offset_1
013c 8015 | | Call 0x0,0x15
013d 00d1 | | Pop_Control Pop_Count_1
013e e5fe | | Load 0x2,-0x2
013f 800f | | Call 0x0,0xf
0140 00d1 | | Pop_Control Pop_Count_1
0141 0092 03b7 | | Action Push_String_Extended,0x3b7 ; " envoi a la tache tierce Ok"
0143 e009 | | Load 0x0,0x9
0144 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0145 4502 |E | Exit_Subprogram 0x2
0146 0000 0000 | | .XXX[0x2]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0167 | g | .CONST 0x0167 ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0006 | | .CONST 0x0006 ; Number of locals
014b INIT_0148:
014b e00b | | Load 0x0,0xb
014c 0322 | " | Declare_Variable Record
014d 00d8 | | Load_Top At_Offset_0
014e 1c00 | | Execute_Immediate Run_Utility,0x0
014f e010 | | Load 0x0,0x10
0150 e21c | | Load 0x1,0x1c
0151 0098 | | Execute Package,Field_Read_Dynamic
0152 0007 | | Action Break_Optional
0153 e217 | | Load 0x1,0x17
0154 0322 | " | Declare_Variable Record
0155 4801 |H | Short_Literal 0x1
0156 4804 |H | Short_Literal 0x4
0157 e002 | | Load 0x0,0x2
0158 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0159 035b | [ | Declare_Type Array,Constrained
015a 0337 | 7 | Declare_Variable Array
015b e5ff | | Load 0x2,-0x1
015c 00d9 | | Load_Top At_Offset_1
015d 01d4 | | Execute Vector,Structure_Write
015e 4801 |H | Short_Literal 0x1
015f 4804 |H | Short_Literal 0x4
0160 e002 | | Load 0x0,0x2
0161 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0162 035b | [ | Declare_Type Array,Constrained
0163 0337 | 7 | Declare_Variable Array
0164 e5fe | | Load 0x2,-0x2
0165 00d9 | | Load_Top At_Offset_1
0166 01d4 | | Execute Vector,Structure_Write
0167 BODY_0148:
0167 4804 |H | Short_Literal 0x4
0168 e402 | | Load 0x2,0x2
0169 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
016a e5ff | | Load 0x2,-0x1
016b e402 | | Load 0x2,0x2
016c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
016d e5fe | | Load 0x2,-0x2
016e e402 | | Load 0x2,0x2
016f 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0170 e5fd | | Load 0x2,-0x3
0171 e402 | | Load 0x2,0x2
0172 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0173 e21d | | Load 0x1,0x1d
0174 e016 | | Load 0x0,0x16
0175 e21c | | Load 0x1,0x1c
0176 0096 | | Execute Package,Field_Execute_Dynamic
0177 7034 |p4 | Jump_Nonzero 0x1ac
0178 e010 | | Load 0x0,0x10
0179 e21c | | Load 0x1,0x1c
017a 0098 | | Execute Package,Field_Read_Dynamic
017b e21d | | Load 0x1,0x1d
017c e017 | | Load 0x0,0x17
017d e21c | | Load 0x1,0x1c
017e 0096 | | Execute Package,Field_Execute_Dynamic
017f c403 | | Store 0x2,0x3
0180 00cf | | Action Mark_Auxiliary
0181 e403 | | Load 0x2,0x3
0182 e018 | | Load 0x0,0x18
0183 e21c | | Load 0x1,0x1c
0184 0096 | | Execute Package,Field_Execute_Dynamic
0185 e404 | | Load 0x2,0x4
0186 017d | } | Execute Record,Structure_Write
0187 00db | | Load_Top At_Offset_3
0188 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0189 e402 | | Load 0x2,0x2
018a 380a |8 | Execute Record,Field_Write,Field_Number 0xa
018b 00db | | Load_Top At_Offset_3
018c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
018d e402 | | Load 0x2,0x2
018e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
018f e5fc | | Load 0x2,-0x4
0190 e402 | | Load 0x2,0x2
0191 8014 | | Call 0x0,0x14
0192 00d1 | | Pop_Control Pop_Count_1
0193 e5fc | | Load 0x2,-0x4
0194 e402 | | Load 0x2,0x2
0195 8015 | | Call 0x0,0x15
0196 00d1 | | Pop_Control Pop_Count_1
0197 e5fc | | Load 0x2,-0x4
0198 800f | | Call 0x0,0xf
0199 00d1 | | Pop_Control Pop_Count_1
019a 0092 03b8 | | Action Push_String_Extended,0x3b8 ; " Un Message d'info generale a ete envoye "
019c e009 | | Load 0x0,0x9
019d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
019e e403 | | Load 0x2,0x3
019f e019 | | Load 0x0,0x19
01a0 e21c | | Load 0x1,0x1c
01a1 0096 | | Execute Package,Field_Execute_Dynamic
01a2 c403 | | Store 0x2,0x3
01a3 e403 | | Load 0x2,0x3
01a4 e01a | | Load 0x0,0x1a
01a5 e21c | | Load 0x1,0x1c
01a6 0096 | | Execute Package,Field_Execute_Dynamic
01a7 6801 |h | Jump_Zero 0x1a9
01a8 7802 |x | Jump 0x1ab
01a9 00c9 | | Action Pop_Auxiliary_Loop
01aa 7fd6 | | Jump 0x181
01ab 00ce | | Action Pop_Auxiliary
01ac 4504 |E | Exit_Subprogram 0x4
01ad 0000 0000 | | .XXX[0x3]
01af 0000 | |
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b7 | | .CONST 0x01b7 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0002 | | .CONST 0x0002 ; Number of locals
01b3 INIT_01b0:
01b3 e00b | | Load 0x0,0xb
01b4 0322 | " | Declare_Variable Record
01b5 00d8 | | Load_Top At_Offset_0
01b6 1c00 | | Execute_Immediate Run_Utility,0x0
01b7 BODY_01b0:
01b7 4805 |H | Short_Literal 0x5
01b8 00d9 | | Load_Top At_Offset_1
01b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01ba 00db | | Load_Top At_Offset_3
01bb 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01bc 00d9 | | Load_Top At_Offset_1
01bd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01be 00db | | Load_Top At_Offset_3
01bf 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
01c0 00d9 | | Load_Top At_Offset_1
01c1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01c2 00db | | Load_Top At_Offset_3
01c3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
01c4 00d9 | | Load_Top At_Offset_1
01c5 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01c6 00db | | Load_Top At_Offset_3
01c7 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
01c8 00d9 | | Load_Top At_Offset_1
01c9 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
01ca 00db | | Load_Top At_Offset_3
01cb 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
01cc 00d9 | | Load_Top At_Offset_1
01cd 380a |8 | Execute Record,Field_Write,Field_Number 0xa
01ce e5fe | | Load 0x2,-0x2
01cf 00d9 | | Load_Top At_Offset_1
01d0 8014 | | Call 0x0,0x14
01d1 00d1 | | Pop_Control Pop_Count_1
01d2 e5fe | | Load 0x2,-0x2
01d3 00d9 | | Load_Top At_Offset_1
01d4 8015 | | Call 0x0,0x15
01d5 00d1 | | Pop_Control Pop_Count_1
01d6 e5fe | | Load 0x2,-0x2
01d7 800f | | Call 0x0,0xf
01d8 00d1 | | Pop_Control Pop_Count_1
01d9 0092 03b7 | | Action Push_String_Extended,0x3b7 ; " envoi a la tache tierce Ok"
01db e009 | | Load 0x0,0x9
01dc 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01dd 4502 |E | Exit_Subprogram 0x2
01de 0000 0000 | | .XXX[0x2]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01fa | | .CONST 0x01fa ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0004 | | .CONST 0x0004 ; Number of locals
01e3 INIT_01e0:
01e3 e219 | | Load 0x1,0x19
01e4 0322 | " | Declare_Variable Record
01e5 00db | | Load_Top At_Offset_3
01e6 e219 | | Load 0x1,0x19
01e7 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
01e8 0119 | | Execute Any,Check_In_Formal_Type
01e9 00d9 | | Load_Top At_Offset_1
01ea 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01eb e5fe | | Load 0x2,-0x2
01ec e219 | | Load 0x1,0x19
01ed 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
01ee 0119 | | Execute Any,Check_In_Formal_Type
01ef 00d9 | | Load_Top At_Offset_1
01f0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01f1 e5fd | | Load 0x2,-0x3
01f2 00d9 | | Load_Top At_Offset_1
01f3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01f4 e010 | | Load 0x0,0x10
01f5 e21a | | Load 0x1,0x1a
01f6 0098 | | Execute Package,Field_Read_Dynamic
01f7 0007 | | Action Break_Optional
01f8 00e1 | | Load_Encached Boolean_Cache
01f9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01fa BODY_01e0:
01fa 00da | | Load_Top At_Offset_2
01fb e21b | | Load 0x1,0x1b
01fc e011 | | Load 0x0,0x11
01fd e21a | | Load 0x1,0x1a
01fe 0096 | | Execute Package,Field_Execute_Dynamic
01ff 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0200 00d8 | | Load_Top At_Offset_0
0201 6802 |h | Jump_Zero 0x204
0202 4800 |H | Short_Literal 0x0
0203 4403 |D | Exit_Subprogram With_Result,0x3
0204 e21b | | Load 0x1,0x1b
0205 00db | | Load_Top At_Offset_3
0206 e012 | | Load 0x0,0x12
0207 e21a | | Load 0x1,0x1a
0208 0096 | | Execute Package,Field_Execute_Dynamic
0209 a21b | | Store_Unchecked 0x1,0x1b
020a 4801 |H | Short_Literal 0x1
020b 4403 |D | Exit_Subprogram With_Result,0x3
020c 0000 0000 | | .BLANK 0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0226 | & | .CONST 0x0226 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0003 | | .CONST 0x0003 ; Number of locals
0213 INIT_0210:
0213 e219 | | Load 0x1,0x19
0214 0322 | " | Declare_Variable Record
0215 00db | | Load_Top At_Offset_3
0216 e219 | | Load 0x1,0x19
0217 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0218 0119 | | Execute Any,Check_In_Formal_Type
0219 00d9 | | Load_Top At_Offset_1
021a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
021b e5fe | | Load 0x2,-0x2
021c e219 | | Load 0x1,0x19
021d 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
021e 0119 | | Execute Any,Check_In_Formal_Type
021f 00d9 | | Load_Top At_Offset_1
0220 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0221 e5fd | | Load 0x2,-0x3
0222 00d9 | | Load_Top At_Offset_1
0223 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0224 00e1 | | Load_Encached Boolean_Cache
0225 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0226 BODY_0210:
0226 00e1 | | Load_Encached Boolean_Cache
0227 e21b | | Load 0x1,0x1b
0228 00db | | Load_Top At_Offset_3
0229 e013 | | Load 0x0,0x13
022a e21a | | Load 0x1,0x1a
022b 0096 | | Execute Package,Field_Execute_Dynamic
022c c21b | | Store 0x1,0x1b
022d 0059 | Y | Store_Top Discrete,At_Offset_1
022e 00d8 | | Load_Top At_Offset_0
022f 4403 |D | Exit_Subprogram With_Result,0x3
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 0833 | 3 | Execute_Immediate Raise,0x33
0234 0000 0000 | | .BLANK 0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b 0833 | 3 | Execute_Immediate Raise,0x33
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0257 | W | .CONST 0x0257 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0004 | | .CONST 0x0004 ; Number of locals
0243 INIT_0240:
0243 e217 | | Load 0x1,0x17
0244 0322 | " | Declare_Variable Record
0245 00db | | Load_Top At_Offset_3
0246 e217 | | Load 0x1,0x17
0247 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0248 0119 | | Execute Any,Check_In_Formal_Type
0249 00d9 | | Load_Top At_Offset_1
024a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
024b e5fe | | Load 0x2,-0x2
024c e217 | | Load 0x1,0x17
024d 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
024e 0119 | | Execute Any,Check_In_Formal_Type
024f 00d9 | | Load_Top At_Offset_1
0250 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0251 e010 | | Load 0x0,0x10
0252 e21c | | Load 0x1,0x1c
0253 0098 | | Execute Package,Field_Read_Dynamic
0254 0007 | | Action Break_Optional
0255 00e1 | | Load_Encached Boolean_Cache
0256 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0257 BODY_0240:
0257 00da | | Load_Top At_Offset_2
0258 e21d | | Load 0x1,0x1d
0259 e011 | | Load 0x0,0x11
025a e21c | | Load 0x1,0x1c
025b 0096 | | Execute Package,Field_Execute_Dynamic
025c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
025d 00d8 | | Load_Top At_Offset_0
025e 6802 |h | Jump_Zero 0x261
025f 4800 |H | Short_Literal 0x0
0260 4403 |D | Exit_Subprogram With_Result,0x3
0261 e21d | | Load 0x1,0x1d
0262 00db | | Load_Top At_Offset_3
0263 e012 | | Load 0x0,0x12
0264 e21c | | Load 0x1,0x1c
0265 0096 | | Execute Package,Field_Execute_Dynamic
0266 a21d | | Store_Unchecked 0x1,0x1d
0267 4801 |H | Short_Literal 0x1
0268 4403 |D | Exit_Subprogram With_Result,0x3
0269 0000 0000 | | .BLANK 0000[0x7]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0283 | | .CONST 0x0283 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0003 | | .CONST 0x0003 ; Number of locals
0273 INIT_0270:
0273 e217 | | Load 0x1,0x17
0274 0322 | " | Declare_Variable Record
0275 00db | | Load_Top At_Offset_3
0276 e217 | | Load 0x1,0x17
0277 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0278 0119 | | Execute Any,Check_In_Formal_Type
0279 00d9 | | Load_Top At_Offset_1
027a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
027b e5fe | | Load 0x2,-0x2
027c e217 | | Load 0x1,0x17
027d 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
027e 0119 | | Execute Any,Check_In_Formal_Type
027f 00d9 | | Load_Top At_Offset_1
0280 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0281 00e1 | | Load_Encached Boolean_Cache
0282 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0283 BODY_0270:
0283 00e1 | | Load_Encached Boolean_Cache
0284 e21d | | Load 0x1,0x1d
0285 00db | | Load_Top At_Offset_3
0286 e013 | | Load 0x0,0x13
0287 e21c | | Load 0x1,0x1c
0288 0096 | | Execute Package,Field_Execute_Dynamic
0289 c21d | | Store 0x1,0x1d
028a 0059 | Y | Store_Top Discrete,At_Offset_1
028b 00d8 | | Load_Top At_Offset_0
028c 4403 |D | Exit_Subprogram With_Result,0x3
028d 0000 0000 | | .XXX[0x3]
028f 0000 | |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0297 | | .CONST 0x0297 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0002 | | .CONST 0x0002 ; Number of locals
0293 INIT_0290:
0293 e00b | | Load 0x0,0xb
0294 0322 | " | Declare_Variable Record
0295 00d8 | | Load_Top At_Offset_0
0296 1c00 | | Execute_Immediate Run_Utility,0x0
0297 BODY_0290:
0297 480c |H | Short_Literal 0xc
0298 00d9 | | Load_Top At_Offset_1
0299 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
029a e00c | | Load 0x0,0xc
029b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
029c 00d9 | | Load_Top At_Offset_1
029d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
029e e00c | | Load 0x0,0xc
029f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02a0 00d9 | | Load_Top At_Offset_1
02a1 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
02a2 e5fe | | Load 0x2,-0x2
02a3 00d9 | | Load_Top At_Offset_1
02a4 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02a5 e5fd | | Load 0x2,-0x3
02a6 00d9 | | Load_Top At_Offset_1
02a7 380a |8 | Execute Record,Field_Write,Field_Number 0xa
02a8 4801 |H | Short_Literal 0x1
02a9 00d9 | | Load_Top At_Offset_1
02aa 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02ab 00db | | Load_Top At_Offset_3
02ac 00d9 | | Load_Top At_Offset_1
02ad 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
02ae 0092 03b9 | | Action Push_String_Extended,0x3b9 ; "Essai de reponse"
02b0 e009 | | Load 0x0,0x9
02b1 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02b2 e5fc | | Load 0x2,-0x4
02b3 00d9 | | Load_Top At_Offset_1
02b4 8015 | | Call 0x0,0x15
02b5 00d1 | | Pop_Control Pop_Count_1
02b6 e5fc | | Load 0x2,-0x4
02b7 800f | | Call 0x0,0xf
02b8 00d1 | | Pop_Control Pop_Count_1
02b9 0092 03ba | | Action Push_String_Extended,0x3ba ; "Reponse Envoyee"
02bb e009 | | Load 0x0,0x9
02bc 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02bd 4504 |E | Exit_Subprogram 0x4
02be 0000 0000 | | .XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cb | | .CONST 0x02cb ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 000e | | .CONST 0x000e ; Number of locals
02c3 INIT_02c0:
02c3 00bf | | Action Accept_Activation
02c4 e001 | | Load 0x0,0x1
02c5 0322 | " | Declare_Variable Record
02c6 00d8 | | Load_Top At_Offset_0
02c7 1c00 | | Execute_Immediate Run_Utility,0x0
02c8 00e1 | | Load_Encached Boolean_Cache
02c9 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
02ca 00bc | | Action Signal_Activated
02cb BODY_02c0:
02cb 00cf | | Action Mark_Auxiliary
02cc 781a |x | Jump 0x2e7
02cd 0092 03bb | | Action Push_String_Extended,0x3bb ; "T_Receive : reception ... "
02cf e002 | | Load 0x0,0x2
02d0 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02d1 e003 | | Load 0x0,0x3
02d2 e004 | | Load 0x0,0x4
02d3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02d4 8005 | | Call 0x0,0x5
02d5 00d1 | | Pop_Control Pop_Count_1
02d6 e003 | | Load 0x0,0x3
02d7 00db | | Load_Top At_Offset_3
02d8 8006 | | Call 0x0,0x6
02d9 00d2 | | Pop_Control Pop_Count_2
02da e003 | | Load 0x0,0x3
02db 8007 | | Call 0x0,0x7
02dc 00d1 | | Pop_Control Pop_Count_1
02dd 0092 03bc | | Action Push_String_Extended,0x3bc ; "T_Receive : 1 Message est recu"
02df e002 | | Load 0x0,0x2
02e0 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02e1 00da | | Load_Top At_Offset_2
02e2 4801 |H | Short_Literal 0x1
02e3 e008 | | Load 0x0,0x8
02e4 e009 | | Load 0x0,0x9
02e5 00ad | | Action InMicrocode,Package,Field_Execute_Dynamic
02e6 00c9 | | Action Pop_Auxiliary_Loop
02e7 00d9 | | Load_Top At_Offset_1
02e8 77e4 |w | Jump_Nonzero 0x2cd
02e9 00ce | | Action Pop_Auxiliary
02ea 00bb | | Action Signal_Completion
02eb 0000 0000 | | .BLANK 0000[0x5]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02fe | | .CONST 0x02fe ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0010 | | .CONST 0x0010 ; Number of locals
02f3 INIT_02f0:
02f3 4801 |H | Short_Literal 0x1
02f4 02cb | | Declare_Variable Entry
02f5 00bf | | Action Accept_Activation
02f6 00e1 | | Load_Encached Boolean_Cache
02f7 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
02f8 00e1 | | Load_Encached Boolean_Cache
02f9 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
02fa 480d |H | Short_Literal 0xd
02fb 0299 030b | | Declare_Subprogram For_Accept,INIT_0308
02fd 00bc | | Action Signal_Activated
02fe BODY_02f0:
02fe 00cf | | Action Mark_Auxiliary
02ff 7804 |x | Jump 0x304
0300 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0301 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0302 0137 | 7 | Execute Entry,Rendezvous
0303 00c9 | | Action Pop_Auxiliary_Loop
0304 00da | | Load_Top At_Offset_2
0305 77fa |w | Jump_Nonzero 0x300
0306 00ce | | Action Pop_Auxiliary
0307 00bb | | Action Signal_Completion
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 0092 03bd | | Action Push_String_Extended,0x3bd ; "T_Orb : case"
030d e001 | | Load 0x0,0x1
030e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
030f 00db | | Load_Top At_Offset_3
0310 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0311 460c |F | Jump_Case 0xc
0312 781f |x | Jump 0x332 ; case 0x0
0313 7834 |x4 | Jump 0x348 ; case 0x1
0314 4100 |A | End_Rendezvous 0x0 ; case 0x2
0315 780e |x | Jump 0x324 ; case 0x3
0316 787f |x | Jump 0x396 ; case 0x4
0317 7891 |x | Jump 0x3a9 ; case 0x5
0318 4100 |A | End_Rendezvous 0x0 ; case 0x6
0319 4100 |A | End_Rendezvous 0x0 ; case 0x7
031a 7843 |xC | Jump 0x35e ; case 0x8
031b 785e |x^ | Jump 0x37a ; case 0x9
031c 4100 |A | End_Rendezvous 0x0 ; case 0xa
031d 4100 |A | End_Rendezvous 0x0 ; case 0xb
031e 7800 |x | Jump 0x31f ; case 0xc
031f 0092 03be | | Action Push_String_Extended,0x3be ; "T_Orb : Message traite ok"
0321 e001 | | Load 0x0,0x1
0322 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0323 4100 |A | End_Rendezvous 0x0
0324 e002 | | Load 0x0,0x2
0325 e5fe | | Load 0x2,-0x2
0326 8003 | | Call 0x0,0x3
0327 00d1 | | Pop_Control Pop_Count_1
0328 e002 | | Load 0x0,0x2
0329 e5fe | | Load 0x2,-0x2
032a 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
032b e5fe | | Load 0x2,-0x2
032c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
032d e5fe | | Load 0x2,-0x2
032e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
032f 8004 | | Call 0x0,0x4
0330 00d1 | | Pop_Control Pop_Count_1
0331 4100 |A | End_Rendezvous 0x0
0332 0092 03bf | | Action Push_String_Extended,0x3bf ; "essai registration"
0334 e001 | | Load 0x0,0x1
0335 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0336 00db | | Load_Top At_Offset_3
0337 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0338 e5fe | | Load 0x2,-0x2
0339 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
033a 8005 | | Call 0x0,0x5
033b a20e | | Store_Unchecked 0x1,0xe
033c e20e | | Load 0x1,0xe
033d 6805 |h | Jump_Zero 0x343
033e 0092 03c0 | | Action Push_String_Extended,0x3c0 ; "T_Orb Registration Ok"
0340 e001 | | Load 0x0,0x1
0341 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0342 4100 |A | End_Rendezvous 0x0
0343 0092 03c1 | | Action Push_String_Extended,0x3c1 ; "T_Orb Registration not Ok"
0345 e001 | | Load 0x0,0x1
0346 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0347 4100 |A | End_Rendezvous 0x0
0348 0092 03c2 | | Action Push_String_Extended,0x3c2 ; "essai unregistration"
034a e001 | | Load 0x0,0x1
034b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
034c 00db | | Load_Top At_Offset_3
034d 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
034e e5fe | | Load 0x2,-0x2
034f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0350 8006 | | Call 0x0,0x6
0351 a20e | | Store_Unchecked 0x1,0xe
0352 e20e | | Load 0x1,0xe
0353 6805 |h | Jump_Zero 0x359
0354 0092 03c3 | | Action Push_String_Extended,0x3c3 ; "T_Orb UnRegistration Ok"
0356 e001 | | Load 0x0,0x1
0357 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0358 4100 |A | End_Rendezvous 0x0
0359 0092 03c4 | | Action Push_String_Extended,0x3c4 ; "T_Orb UnRegistration not Ok"
035b e001 | | Load 0x0,0x1
035c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
035d 4100 |A | End_Rendezvous 0x0
035e e007 | | Load 0x0,0x7
035f e5fe | | Load 0x2,-0x2
0360 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0361 e5fe | | Load 0x2,-0x2
0362 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0363 8008 | | Call 0x0,0x8
0364 a20e | | Store_Unchecked 0x1,0xe
0365 e20e | | Load 0x1,0xe
0366 6805 |h | Jump_Zero 0x36c
0367 0092 03c5 | | Action Push_String_Extended,0x3c5 ; "T_Orb Subscription Ok"
0369 e001 | | Load 0x0,0x1
036a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
036b 7804 |x | Jump 0x370
036c 0092 03c6 | | Action Push_String_Extended,0x3c6 ; "T_Orb Subscription not Ok"
036e e001 | | Load 0x0,0x1
036f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0370 e002 | | Load 0x0,0x2
0371 e5fe | | Load 0x2,-0x2
0372 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0373 e5fe | | Load 0x2,-0x2
0374 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0375 e5fe | | Load 0x2,-0x2
0376 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0377 8004 | | Call 0x0,0x4
0378 00d1 | | Pop_Control Pop_Count_1
0379 4100 |A | End_Rendezvous 0x0
037a e007 | | Load 0x0,0x7
037b e5fe | | Load 0x2,-0x2
037c 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
037d e5fe | | Load 0x2,-0x2
037e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
037f 8009 | | Call 0x0,0x9
0380 a20e | | Store_Unchecked 0x1,0xe
0381 e20e | | Load 0x1,0xe
0382 6805 |h | Jump_Zero 0x388
0383 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "T_Orb Unsubscription Ok"
0385 e001 | | Load 0x0,0x1
0386 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0387 7804 |x | Jump 0x38c
0388 0092 03c8 | | Action Push_String_Extended,0x3c8 ; "T_Orb Unsubscription not Ok"
038a e001 | | Load 0x0,0x1
038b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
038c e002 | | Load 0x0,0x2
038d e5fe | | Load 0x2,-0x2
038e 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
038f e5fe | | Load 0x2,-0x2
0390 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0391 e5fe | | Load 0x2,-0x2
0392 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0393 8004 | | Call 0x0,0x4
0394 00d1 | | Pop_Control Pop_Count_1
0395 4100 |A | End_Rendezvous 0x0
0396 e002 | | Load 0x0,0x2
0397 e5fe | | Load 0x2,-0x2
0398 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0399 e5fe | | Load 0x2,-0x2
039a 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
039b e5fe | | Load 0x2,-0x2
039c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
039d 800a | | Call 0x0,0xa
039e 00d1 | | Pop_Control Pop_Count_1
039f e002 | | Load 0x0,0x2
03a0 e5fe | | Load 0x2,-0x2
03a1 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
03a2 e5fe | | Load 0x2,-0x2
03a3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03a4 e5fe | | Load 0x2,-0x2
03a5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
03a6 8004 | | Call 0x0,0x4
03a7 00d1 | | Pop_Control Pop_Count_1
03a8 4100 |A | End_Rendezvous 0x0
03a9 e002 | | Load 0x0,0x2
03aa e5fe | | Load 0x2,-0x2
03ab 800b | | Call 0x0,0xb
03ac 00d1 | | Pop_Control Pop_Count_1
03ad e002 | | Load 0x0,0x2
03ae e5fe | | Load 0x2,-0x2
03af 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
03b0 e5fe | | Load 0x2,-0x2
03b1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03b2 e5fe | | Load 0x2,-0x2
03b3 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
03b4 8004 | | Call 0x0,0x4
03b5 00d1 | | Pop_Control Pop_Count_1
03b6 4100 |A | End_Rendezvous 0x0
03b7 ; --------------------------------------------------------------------------------------
03b7 ; STRING TABLE
03b7 ; --------------------------------------------------------------------------------------
03b7 0026 | & | .STRTAB 0x0026->0x03ca ; " envoi a la tache tierce Ok"
; " envoi a la tache tierce Ok"
03b8 003f | ? | .STRTAB 0x003f->0x03d7 ; " Un Message d'info generale a ete envoye "
03b9 0066 | f | .STRTAB 0x0066->0x03ec ; "Essai de reponse"
03ba 0074 | t | .STRTAB 0x0074->0x03f4 ; "Reponse Envoyee"
03bb 0081 | | .STRTAB 0x0081->0x03fb ; "T_Receive : reception ... "
03bc 0099 | | .STRTAB 0x0099->0x0408 ; "T_Receive : 1 Message est recu"
03bd 00b5 | | .STRTAB 0x00b5->0x0417 ; "T_Orb : case"
03be 00bf | | .STRTAB 0x00bf->0x041d ; "T_Orb : Message traite ok"
03bf 00d6 | | .STRTAB 0x00d6->0x042a ; "essai registration"
03c0 00e6 | | .STRTAB 0x00e6->0x0433 ; "T_Orb Registration Ok"
03c1 00f9 | | .STRTAB 0x00f9->0x043d ; "T_Orb Registration not Ok"
03c2 0110 | | .STRTAB 0x0110->0x044a ; "essai unregistration"
03c3 0122 | " | .STRTAB 0x0122->0x0454 ; "T_Orb UnRegistration Ok"
03c4 0137 | 7 | .STRTAB 0x0137->0x045f ; "T_Orb UnRegistration not Ok"
03c5 0150 | P | .STRTAB 0x0150->0x046d ; "T_Orb Subscription Ok"
03c6 0163 | c | .STRTAB 0x0163->0x0477 ; "T_Orb Subscription not Ok"
03c7 017a | z | .STRTAB 0x017a->0x0484 ; "T_Orb Unsubscription Ok"
03c8 018f | | .STRTAB 0x018f->0x048f ; "T_Orb Unsubscription not Ok"
03c9 01a8 | | .STREND 0x01a8->0x049d
03ca 2065 6e76 | env| .STRTAB_STRINGS
049d 0000 0000 | | .XXX[0x3]
049f 0000 | |
04a0 ; --------------------------------------------------------------------------------------
04a0 ; Debug Table
04a0 ; --------------------------------------------------------------------------------------
04a0 0004 000a | | .DEBUG4 0x0004,0x000a,0x2385,0x0000,0x0001,0x0014
04a6 000b 04f6 | | .DBG4T 0x000b,0x04f6,0x8000,0x0000
04aa 0020 0502 | | .DBG4T 0x0020,0x0502,0x8000,0x0000
04ae 00bb 051e | | .DBG4T 0x00bb,0x051e,0x0002,0x0000
04b2 00f3 0528 | (| .DBG4T 0x00f3,0x0528,0x0002,0x0000
04b6 0113 052e | .| .DBG4T 0x0113,0x052e,0x0001,0x0000
04ba 011b 0531 | 1| .DBG4T 0x011b,0x0531,0x0001,0x0000
04be 014b 053e | K >| .DBG4T 0x014b,0x053e,0x0001,0x4000
04c2 01b3 0565 | e| .DBG4T 0x01b3,0x0565,0x0001,0x0000
04c6 01e3 0572 | r| .DBG4T 0x01e3,0x0572,0x0002,0x0000
04ca 0213 057c | || .DBG4T 0x0213,0x057c,0x0002,0x0000
04ce 0233 0582 | 3 | .DBG4T 0x0233,0x0582,0x0001,0x0000
04d2 023b 0585 | ; | .DBG4T 0x023b,0x0585,0x0001,0x0000
04d6 0243 0588 | C | .DBG4T 0x0243,0x0588,0x0002,0x0000
04da 0273 0592 | s | .DBG4T 0x0273,0x0592,0x0002,0x0000
04de 0293 0598 | | .DBG4T 0x0293,0x0598,0x0001,0x0000
04e2 02c3 0000 | | .DBG4T 0x02c3,0x0000,0x0000,0x0000
04e6 02c4 05a6 | | .DBG4T 0x02c4,0x05a6,0x0000,0x4000
04ea 02f3 05b8 | | .DBG4T 0x02f3,0x05b8,0x0000,0x0000
04ee 02f6 05bb | | .DBG4T 0x02f6,0x05bb,0x0000,0x4000
04f2 030b 05c3 | | .DBG4T 0x030b,0x05c3,0x0003,0x4000
04f6 ; --------------------------------------------------------------------------------------
04f6 ; Debug chain
04f6 ; --------------------------------------------------------------------------------------
04f6 000a 0000 | | .DBGLEN 0x000a,0x0000
04f8 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d
0502 ; --------------------------------------------------------------------------------------
0502 ; Debug chain
0502 ; --------------------------------------------------------------------------------------
0502 0019 0001 | | .DBGLEN 0x0019,0x0001
0504 0020 002d | -| .DBGLNO 0x0020,0x002d,0x003d,0x004b,0x0058,0x005c,0x0069,0x006d,0x006f,0x0071,0x0073,0x0075,0x0077,0x0079,0x007b,0x007d,0x007f,0x0081,0x0083,0x0085,0x0087,0x0089,0x008f,0x009e,0x00a4,0x00b1
051e ; --------------------------------------------------------------------------------------
051e ; Debug chain
051e ; --------------------------------------------------------------------------------------
051e 0003 0005 | | .DBGLEN 0x0003,0x0005
0520 00bb 00c9 | | .DBGLNO 0x00bb,0x00c9,0x00cd,0x00cf,0x00d5,0x00d7,0x00d9,0x00df
0528 ; --------------------------------------------------------------------------------------
0528 ; Debug chain
0528 ; --------------------------------------------------------------------------------------
0528 0002 0002 | | .DBGLEN 0x0002,0x0002
052a 00f3 0101 | | .DBGLNO 0x00f3,0x0101,0x0103,0x010b
052e ; --------------------------------------------------------------------------------------
052e ; Debug chain
052e ; --------------------------------------------------------------------------------------
052e 0000 0001 | | .DBGLEN 0x0000,0x0001
0530 0113 | | .DBGLNO 0x0113
0531 ; --------------------------------------------------------------------------------------
0531 ; Debug chain
0531 ; --------------------------------------------------------------------------------------
0531 0001 000a | | .DBGLEN 0x0001,0x000a
0533 011b 011f | | .DBGLNO 0x011b,0x011f,0x0122,0x0126,0x012a,0x012e,0x0132,0x0136,0x013a,0x013e,0x0141
053e ; --------------------------------------------------------------------------------------
053e ; Debug chain
053e ; --------------------------------------------------------------------------------------
053e 0005 0010 | | .DBGLEN 0x0005,0x0010
0540 014b 014f | K O| .DBGLNO 0x014b,0x014f,0x0153,0x0155,0x015e,0x0167,0x016a,0x016d,0x0170,0x0173,0x0178,0x0181,0x0187,0x018b,0x018f,0x0193,0x0197,0x019a,0x019e,0x01a3,0x01a8
0555 0001 0002 | | .XXX[0x10]
0557 0003 0004 | |
0559 0005 0006 | |
055b 0008 0009 | |
055d 000a 000b | |
055f 000c 000d | |
0561 000e 000f | |
0563 0010 0011 | |
0565 ; --------------------------------------------------------------------------------------
0565 ; Debug chain
0565 ; --------------------------------------------------------------------------------------
0565 0001 000a | | .DBGLEN 0x0001,0x000a
0567 01b3 01b7 | | .DBGLNO 0x01b3,0x01b7,0x01ba,0x01be,0x01c2,0x01c6,0x01ca,0x01ce,0x01d2,0x01d6,0x01d9
0572 ; --------------------------------------------------------------------------------------
0572 ; Debug chain
0572 ; --------------------------------------------------------------------------------------
0572 0003 0005 | | .DBGLEN 0x0003,0x0005
0574 01e3 01f4 | | .DBGLNO 0x01e3,0x01f4,0x01f8,0x01fa,0x0200,0x0202,0x0204,0x020a
057c ; --------------------------------------------------------------------------------------
057c ; Debug chain
057c ; --------------------------------------------------------------------------------------
057c 0002 0002 | | .DBGLEN 0x0002,0x0002
057e 0213 0224 | $| .DBGLNO 0x0213,0x0224,0x0226,0x022e
0582 ; --------------------------------------------------------------------------------------
0582 ; Debug chain
0582 ; --------------------------------------------------------------------------------------
0582 0000 0001 | | .DBGLEN 0x0000,0x0001
0584 0233 | 3 | .DBGLNO 0x0233
0585 ; --------------------------------------------------------------------------------------
0585 ; Debug chain
0585 ; --------------------------------------------------------------------------------------
0585 0000 0001 | | .DBGLEN 0x0000,0x0001
0587 023b | ; | .DBGLNO 0x023b
0588 ; --------------------------------------------------------------------------------------
0588 ; Debug chain
0588 ; --------------------------------------------------------------------------------------
0588 0003 0005 | | .DBGLEN 0x0003,0x0005
058a 0243 0251 | C Q| .DBGLNO 0x0243,0x0251,0x0255,0x0257,0x025d,0x025f,0x0261,0x0267
0592 ; --------------------------------------------------------------------------------------
0592 ; Debug chain
0592 ; --------------------------------------------------------------------------------------
0592 0002 0002 | | .DBGLEN 0x0002,0x0002
0594 0273 0281 | s | .DBGLNO 0x0273,0x0281,0x0283,0x028b
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug chain
0598 ; --------------------------------------------------------------------------------------
0598 0001 000b | | .DBGLEN 0x0001,0x000b
059a 0293 0297 | | .DBGLNO 0x0293,0x0297,0x029a,0x029e,0x02a2,0x02a5,0x02a8,0x02ab,0x02ae,0x02b2,0x02b6,0x02b9
05a6 ; --------------------------------------------------------------------------------------
05a6 ; Debug chain
05a6 ; --------------------------------------------------------------------------------------
05a6 0002 0007 | | .DBGLEN 0x0002,0x0007
05a8 02c4 02c8 | | .DBGLNO 0x02c4,0x02c8,0x02cd,0x02d1,0x02d6,0x02da,0x02dd,0x02e1,0x02e7
05b1 0002 0003 | | .XXX[0x7]
05b3 0004 0005 | |
05b5 0006 0007 | |
05b7 0001 | |
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug chain
05b8 ; --------------------------------------------------------------------------------------
05b8 0001 0000 | | .DBGLEN 0x0001,0x0000
05ba 02f3 | | .DBGLNO 0x02f3
05bb ; --------------------------------------------------------------------------------------
05bb ; Debug chain
05bb ; --------------------------------------------------------------------------------------
05bb 0002 0002 | | .DBGLEN 0x0002,0x0002
05bd 02f6 02f8 | | .DBGLNO 0x02f6,0x02f8,0x0300,0x0304
05c1 0002 0001 | | .XXX[0x2]
05c3 ; --------------------------------------------------------------------------------------
05c3 ; Debug chain
05c3 ; --------------------------------------------------------------------------------------
05c3 0000 001d | | .DBGLEN 0x0000,0x001d
05c5 030b 030f | | .DBGLNO 0x030b,0x030f,0x031f,0x0324,0x0328,0x0332,0x0336,0x033c,0x033e,0x0343,0x0348,0x034c,0x0352,0x0354,0x0359,0x035e,0x0365,0x0367,0x036c,0x0370,0x037a,0x0381,0x0383,0x0388,0x038c,0x0396,0x039f,0x03a9,0x03ad
05e2 0001 0002 | | .XXX[0x1e]
05e4 0022 000e | " |
05e6 000f 0003 | |
05e8 0004 0005 | |
05ea 0006 0007 | |
05ec 0008 0009 | |
05ee 000a 000b | |
05f0 000c 0016 | |
05f2 0017 0018 | |
05f4 0019 001a | |
05f6 001b 001c | |
05f8 001d 001e | |
05fa 001f 0010 | |
05fc 0011 0012 | |
05fe 0013 0000 | |