|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0168ee
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0248 | H | .CONST 0x0248 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0066 | f | .CONST 0x0066 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0015 | | .CONST 0x0015 ; Number of locals 000b INIT_0008: 000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 000d 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 0093 0000 | | push_full_address 0x0 0012 6065 |`e | Indirect_Literal Discrete,0x78,{0x80000000, 0x00010000} 0013 0273 | s | Execute Discrete,Plus 0014 e002 | | Load 0x0,0x2 0015 0273 | s | Execute Discrete,Plus 0016 e003 | | Load 0x0,0x3 0017 0273 | s | Execute Discrete,Plus 0018 e004 | | Load 0x0,0x4 0019 0387 | | Declare_Variable Package 001a 00d8 | | Load_Top At_Offset_0 001b 020f | | Execute Module,Activate 001c e005 | | Load 0x0,0x5 001d 036f | o | Declare_Variable Task 001e e005 | | Load 0x0,0x5 001f 036f | o | Declare_Variable Task 0020 e005 | | Load 0x0,0x5 0021 036f | o | Declare_Variable Task 0022 00e1 | | Load_Encached Boolean_Cache 0023 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0024 4800 |H | Short_Literal 0x0 0025 0093 00ab | | push_full_address INIT_00a8 0027 00f5 | | Load_Encached Unused21 0028 037d | } | Declare_Type Task,Defined 0029 036f | o | Declare_Variable Task 002a e006 | | Load 0x0,0x6 002b e007 | | Load 0x0,0x7 002c e008 | | Load 0x0,0x8 002d e20f | | Load 0x1,0xf 002e 0095 | | Execute Package,Field_Reference_Dynamic 002f e009 | | Load 0x0,0x9 0030 e20f | | Load 0x1,0xf 0031 0095 | | Execute Package,Field_Reference_Dynamic 0032 e00a | | Load 0x0,0xa 0033 e20f | | Load 0x1,0xf 0034 0095 | | Execute Package,Field_Reference_Dynamic 0035 e00b | | Load 0x0,0xb 0036 e20f | | Load 0x1,0xf 0037 0095 | | Execute Package,Field_Reference_Dynamic 0038 e00c | | Load 0x0,0xc 0039 e20f | | Load 0x1,0xf 003a 0095 | | Execute Package,Field_Reference_Dynamic 003b 1d13 | | Execute_Immediate Reference_Lex_1,0x13 003c a00d | | Store_Unchecked 0x0,0xd 003d e210 | | Load 0x1,0x10 003e e00e | | Load 0x0,0xe 003f e00f | | Load 0x0,0xf 0040 a010 | | Store_Unchecked 0x0,0x10 0041 a011 | | Store_Unchecked 0x0,0x11 0042 e012 | | Load 0x0,0x12 0043 e20f | | Load 0x1,0xf 0044 0095 | | Execute Package,Field_Reference_Dynamic 0045 e013 | | Load 0x0,0x13 0046 e20f | | Load 0x1,0xf 0047 0095 | | Execute Package,Field_Reference_Dynamic 0048 e014 | | Load 0x0,0x14 0049 e20f | | Load 0x1,0xf 004a 0095 | | Execute Package,Field_Reference_Dynamic 004b a015 | | Store_Unchecked 0x0,0x15 004c e211 | | Load 0x1,0x11 004d e016 | | Load 0x0,0x16 004e e017 | | Load 0x0,0x17 004f a018 | | Store_Unchecked 0x0,0x18 0050 e019 | | Load 0x0,0x19 0051 e01a | | Load 0x0,0x1a 0052 e01b | | Load 0x0,0x1b 0053 4819 |H | Short_Literal 0x19 0054 e214 | | Load 0x1,0x14 0055 020e | | Execute Module,Augment_Imports 0056 0007 | | Action Break_Optional 0057 4800 |H | Short_Literal 0x0 0058 0093 008b | | push_full_address INIT_0088 005a 00f5 | | Load_Encached Unused21 005b 037d | } | Declare_Type Task,Defined 005c 036f | o | Declare_Variable Task 005d 1d13 | | Execute_Immediate Reference_Lex_1,0x13 005e 4801 |H | Short_Literal 0x1 005f 00da | | Load_Top At_Offset_2 0060 020e | | Execute Module,Augment_Imports 0061 0007 | | Action Break_Optional 0062 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0063 00c7 | | Action Elaborate_Subprogram 0064 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0065 00c7 | | Action Elaborate_Subprogram 0066 BODY_0008: 0066 00be | | Action Activate_Tasks 0067 00bc | | Action Signal_Activated 0068 00bb | | Action Signal_Completion 0069 0000 0000 | | .BLANK 0000[0x7] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 4800 |H | Short_Literal 0x0 0074 e214 | | Load 0x1,0x14 0075 170d | | Execute Task,Entry_Call,Field_Number 0xd 0076 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0077 0000 | | .XXX[0x1] 0078 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 007c 0000 0000 | | .BLANK 0000[0x4] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 4800 |H | Short_Literal 0x0 0084 e215 | | Load 0x1,0x15 0085 170d | | Execute Task,Entry_Call,Field_Number 0xd 0086 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0087 0000 | | .XXX[0x1] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 0096 | | .CONST 0x0096 ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 000e | | .CONST 0x000e ; Number of locals 008b INIT_0088: 008b 4800 |H | Short_Literal 0x0 008c 02cb | | Declare_Variable Entry 008d 00bf | | Action Accept_Activation 008e 480d 4814 |H H | Declare_Variable Select 0x000, 0x001, 0090 4800 4800 |H H | [0x000]: 0x000 = 0x0000, 0092 4800 4801 |H H | [0x00d]: 0x014 = 0x00a0 0094 02cf | | 0095 00bc | | Action Signal_Activated 0096 BODY_0088: 0096 00cf | | Action Mark_Auxiliary 0097 00d9 | | Load_Top At_Offset_1 0098 013f | ? | Execute Select,Rendezvous 0099 00d1 | | Pop_Control Pop_Count_1 009a e001 | | Load 0x0,0x1 009b 7002 |p | Jump_Nonzero 0x9e 009c 00c9 | | Action Pop_Auxiliary_Loop 009d 7ff9 | | Jump 0x97 009e 00ce | | Action Pop_Auxiliary 009f 00bb | | Action Signal_Completion 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; See instruction 0x02cf at 0x8e, index=0xd 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 4801 |H | Short_Literal 0x1 00a4 c001 | | Store 0x0,0x1 00a5 4100 |A | End_Rendezvous 0x0 00a6 0000 0000 | | .XXX[0x2] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00e3 | | .CONST 0x00e3 ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 001d | | .CONST 0x001d ; Number of locals 00ab INIT_00a8: 00ab 4800 |H | Short_Literal 0x0 00ac 02cb | | Declare_Variable Entry 00ad 00bf | | Action Accept_Activation 00ae 00e4 | | Load_Encached Positive_Cache 00af 03e9 | | Declare_Variable Discrete,Duplicate 00b0 03e9 | | Declare_Variable Discrete,Duplicate 00b1 613a |a: | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00000400} 00b2 e001 | | Load 0x0,0x1 00b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b4 1c08 | | Execute_Immediate Run_Utility,0x8 00b5 00d8 | | Load_Top At_Offset_0 00b6 1c00 | | Execute_Immediate Run_Utility,0x0 00b7 6134 |a4 | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00000400} 00b8 e001 | | Load 0x0,0x1 00b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00ba 1c08 | | Execute_Immediate Run_Utility,0x8 00bb 00d8 | | Load_Top At_Offset_0 00bc 1c00 | | Execute_Immediate Run_Utility,0x0 00bd 48ff |H | Short_Literal 0xff 00be e001 | | Load 0x0,0x1 00bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c0 1c08 | | Execute_Immediate Run_Utility,0x8 00c1 00d8 | | Load_Top At_Offset_0 00c2 1c00 | | Execute_Immediate Run_Utility,0x0 00c3 48ff |H | Short_Literal 0xff 00c4 e001 | | Load 0x0,0x1 00c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c6 1c08 | | Execute_Immediate Run_Utility,0x8 00c7 00d8 | | Load_Top At_Offset_0 00c8 1c00 | | Execute_Immediate Run_Utility,0x0 00c9 4801 |H | Short_Literal 0x1 00ca 6121 |a! | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00000400} 00cb e002 | | Load 0x0,0x2 00cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00cd 035b | [ | Declare_Type Array,Constrained 00ce 0337 | 7 | Declare_Variable Array 00cf 4801 |H | Short_Literal 0x1 00d0 611b |a | Indirect_Literal Discrete,0x1ec,{0x00000000, 0x00000400} 00d1 e002 | | Load 0x0,0x2 00d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00d3 035b | [ | Declare_Type Array,Constrained 00d4 0337 | 7 | Declare_Variable Array 00d5 00e4 | | Load_Encached Positive_Cache 00d6 00e2 | | Load_Encached Integer_Cache 00d7 03e9 | | Declare_Variable Discrete,Duplicate 00d8 03e9 | | Declare_Variable Discrete,Duplicate 00d9 00e1 | | Load_Encached Boolean_Cache 00da 00e1 | | Load_Encached Boolean_Cache 00db 480d 483d |H H=| Declare_Variable Select 0x000, 0x001, 00dd 4800 4800 |H H | [0x000]: 0x000 = 0x0000, 00df 4800 4801 |H H | [0x00d]: 0x03d = 0x01e8 00e1 02cf | | 00e2 00bc | | Action Signal_Activated 00e3 BODY_00a8: 00e3 00e4 | | Load_Encached Positive_Cache 00e4 8003 | | Call 0x0,0x3 00e5 c217 | | Store 0x1,0x17 00e6 8004 | | Call 0x0,0x4 00e7 8005 | | Call 0x0,0x5 00e8 00d8 | | Load_Top At_Offset_0 00e9 013f | ? | Execute Select,Rendezvous 00ea 4601 |F | Jump_Case 0x2 00eb 7800 |x | Jump 0xec ; case 0x0 00ec 00cf | | Action Mark_Auxiliary ; case 0x1 00ed 00cf | | Action Mark_Auxiliary 00ee e217 | | Load 0x1,0x17 00ef 4801 |H | Short_Literal 0x1 00f0 0263 | c | Execute Discrete,Above_Bound 00f1 70e8 |p | Jump_Nonzero 0x1da 00f2 e219 | | Load 0x1,0x19 00f3 4804 |H | Short_Literal 0x4 00f4 00da | | Load_Top At_Offset_2 00f5 8006 | | Call 0x0,0x6 00f6 c219 | | Store 0x1,0x19 00f7 e219 | | Load 0x1,0x19 00f8 70df |p | Jump_Nonzero 0x1d8 00f9 e218 | | Load 0x1,0x18 00fa 4801 |H | Short_Literal 0x1 00fb 00da | | Load_Top At_Offset_2 00fc 8006 | | Call 0x0,0x6 00fd c218 | | Store 0x1,0x18 00fe e215 | | Load 0x1,0x15 00ff 00d9 | | Load_Top At_Offset_1 0100 8007 | | Call 0x0,0x7 0101 00d1 | | Pop_Control Pop_Count_1 0102 e218 | | Load 0x1,0x18 0103 0b01 | | Execute_Immediate Case_Compare,0x1 0104 7009 |p | Jump_Nonzero 0x10e 0105 0b02 | | Execute_Immediate Case_Compare,0x2 0106 7035 |p5 | Jump_Nonzero 0x13c 0107 0b03 | | Execute_Immediate Case_Compare,0x3 0108 7041 |pA | Jump_Nonzero 0x14a 0109 0f04 | | Execute_Immediate Equal,0x4 010a 708d |p | Jump_Nonzero 0x198 010b 4800 |H | Short_Literal 0x0 010c c008 | | Store 0x0,0x8 010d 78ca |x | Jump 0x1d8 010e 00d1 | | Pop_Control Pop_Count_1 010f 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "!!! REQUETE !!!" 0111 8009 | | Call 0x0,0x9 0112 00e1 | | Load_Encached Boolean_Cache 0113 00e4 | | Load_Encached Positive_Cache 0114 4805 |H | Short_Literal 0x5 0115 e215 | | Load 0x1,0x15 0116 4804 |H | Short_Literal 0x4 0117 e00a | | Load 0x0,0xa 0118 e00b | | Load 0x0,0xb 0119 00ad | | QQ_Action Package,Field_Execute_Dynamic 011a c20e | | Store 0x1,0xe 011b c21b | | Store 0x1,0x1b 011c e21b | | Load 0x1,0x1b 011d 700f |p | Jump_Nonzero 0x12d 011e e216 | | Load 0x1,0x16 011f e20e | | Load 0x1,0xe 0120 4802 |H | Short_Literal 0x2 0121 e00a | | Load 0x0,0xa 0122 e00c | | Load 0x0,0xc 0123 00ad | | QQ_Action Package,Field_Execute_Dynamic 0124 00d1 | | Pop_Control Pop_Count_1 0125 4803 |H | Short_Literal 0x3 0126 e216 | | Load 0x1,0x16 0127 800d | | Call 0x0,0xd 0128 800e | | Call 0x0,0xe 0129 800f | | Call 0x0,0xf 012a e215 | | Load 0x1,0x15 012b 8010 | | Call 0x0,0x10 012c 780c |x | Jump 0x139 012d 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "Je ne peux satisfaire votre demande ...." 012f 8009 | | Call 0x0,0x9 0130 0092 01f2 | | Action Push_String_Extended,0x1f2 ; "Je ne connais pas ce contrat : " 0132 8009 | | Call 0x0,0x9 0133 4805 |H | Short_Literal 0x5 0134 e215 | | Load 0x1,0x15 0135 800d | | Call 0x0,0xd 0136 e001 | | Load 0x0,0x1 0137 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0138 8009 | | Call 0x0,0x9 0139 00d8 | | Load_Top At_Offset_0 013a 8011 | | Call 0x0,0x11 013b 789c |x | Jump 0x1d8 013c 00d1 | | Pop_Control Pop_Count_1 013d 0092 01f3 | | Action Push_String_Extended,0x1f3 ; "!!! PROPAGATION !!!" 013f 8009 | | Call 0x0,0x9 0140 4803 |H | Short_Literal 0x3 0141 e215 | | Load 0x1,0x15 0142 800d | | Call 0x0,0xd 0143 800e | | Call 0x0,0xe 0144 800f | | Call 0x0,0xf 0145 e215 | | Load 0x1,0x15 0146 8010 | | Call 0x0,0x10 0147 00d8 | | Load_Top At_Offset_0 0148 8011 | | Call 0x0,0x11 0149 788e |x | Jump 0x1d8 014a 00d1 | | Pop_Control Pop_Count_1 014b 0092 01f4 | | Action Push_String_Extended,0x1f4 ; "!!! REGISTRATION !!!" 014d 8009 | | Call 0x0,0x9 014e e212 | | Load 0x1,0x12 014f e215 | | Load 0x1,0x15 0150 8012 | | Call 0x0,0x12 0151 e001 | | Load 0x0,0x1 0152 180f | | Execute Package,Field_Execute,Field_Number 0xf 0153 00d1 | | Pop_Control Pop_Count_1 0154 e213 | | Load 0x1,0x13 0155 4803 |H | Short_Literal 0x3 0156 e215 | | Load 0x1,0x15 0157 800d | | Call 0x0,0xd 0158 e001 | | Load 0x0,0x1 0159 180f | | Execute Package,Field_Execute,Field_Number 0xf 015a 00d1 | | Pop_Control Pop_Count_1 015b 4801 |H | Short_Literal 0x1 015c a21c | | Store_Unchecked 0x1,0x1c 015d 00cf | | Action Mark_Auxiliary 015e e217 | | Load 0x1,0x17 015f 4801 |H | Short_Literal 0x1 0160 0263 | c | Execute Discrete,Above_Bound 0161 7029 |p) | Jump_Nonzero 0x18b 0162 e21a | | Load 0x1,0x1a 0163 4804 |H | Short_Literal 0x4 0164 00da | | Load_Top At_Offset_2 0165 4803 |H | Short_Literal 0x3 0166 e013 | | Load 0x0,0x13 0167 e014 | | Load 0x0,0x14 0168 00ad | | QQ_Action Package,Field_Execute_Dynamic 0169 c21a | | Store 0x1,0x1a 016a e21a | | Load 0x1,0x1a 016b 701d |p | Jump_Nonzero 0x189 016c e211 | | Load 0x1,0x11 016d 00d9 | | Load_Top At_Offset_1 016e 4802 |H | Short_Literal 0x2 016f e013 | | Load 0x0,0x13 0170 e015 | | Load 0x0,0x15 0171 00ad | | QQ_Action Package,Field_Execute_Dynamic 0172 00d1 | | Pop_Control Pop_Count_1 0173 e211 | | Load 0x1,0x11 0174 e212 | | Load 0x1,0x12 0175 8016 | | Call 0x0,0x16 0176 6812 |h | Jump_Zero 0x189 0177 e214 | | Load 0x1,0x14 0178 4803 |H | Short_Literal 0x3 0179 00da | | Load_Top At_Offset_2 017a 4803 |H | Short_Literal 0x3 017b e013 | | Load 0x0,0x13 017c e017 | | Load 0x0,0x17 017d 00ad | | QQ_Action Package,Field_Execute_Dynamic 017e 00d1 | | Pop_Control Pop_Count_1 017f e214 | | Load 0x1,0x14 0180 e213 | | Load 0x1,0x13 0181 8016 | | Call 0x0,0x16 0182 6806 |h | Jump_Zero 0x189 0183 4800 |H | Short_Literal 0x0 0184 a21c | | Store_Unchecked 0x1,0x1c 0185 e21c | | Load 0x1,0x1c 0186 7002 |p | Jump_Nonzero 0x189 0187 00d2 | | Pop_Control Pop_Count_2 0188 7802 |x | Jump 0x18b 0189 00c8 | | Action Pop_Auxiliary_Range 018a 3fd7 |? | Loop_Increasing 0x162 018b 00ce | | Action Pop_Auxiliary 018c e21c | | Load 0x1,0x1c 018d 6807 |h | Jump_Zero 0x195 018e 00e1 | | Load_Encached Boolean_Cache 018f e215 | | Load 0x1,0x15 0190 4802 |H | Short_Literal 0x2 0191 e00a | | Load 0x0,0xa 0192 e018 | | Load 0x0,0x18 0193 00ad | | QQ_Action Package,Field_Execute_Dynamic 0194 c21c | | Store 0x1,0x1c 0195 00d8 | | Load_Top At_Offset_0 0196 8011 | | Call 0x0,0x11 0197 7840 |x@ | Jump 0x1d8 0198 0092 01f5 | | Action Push_String_Extended,0x1f5 ; "!!! DEREGISTRATION !!!" 019a 8009 | | Call 0x0,0x9 019b e212 | | Load 0x1,0x12 019c e215 | | Load 0x1,0x15 019d 8012 | | Call 0x0,0x12 019e e001 | | Load 0x0,0x1 019f 180f | | Execute Package,Field_Execute,Field_Number 0xf 01a0 00d1 | | Pop_Control Pop_Count_1 01a1 e213 | | Load 0x1,0x13 01a2 4803 |H | Short_Literal 0x3 01a3 e215 | | Load 0x1,0x15 01a4 800d | | Call 0x0,0xd 01a5 e001 | | Load 0x0,0x1 01a6 180f | | Execute Package,Field_Execute,Field_Number 0xf 01a7 00d1 | | Pop_Control Pop_Count_1 01a8 4800 |H | Short_Literal 0x0 01a9 a21c | | Store_Unchecked 0x1,0x1c 01aa 00cf | | Action Mark_Auxiliary 01ab e217 | | Load 0x1,0x17 01ac 4801 |H | Short_Literal 0x1 01ad 0263 | c | Execute Discrete,Above_Bound 01ae 7026 |p& | Jump_Nonzero 0x1d5 01af e211 | | Load 0x1,0x11 01b0 00d9 | | Load_Top At_Offset_1 01b1 4802 |H | Short_Literal 0x2 01b2 e013 | | Load 0x0,0x13 01b3 e015 | | Load 0x0,0x15 01b4 00ad | | QQ_Action Package,Field_Execute_Dynamic 01b5 00d1 | | Pop_Control Pop_Count_1 01b6 e211 | | Load 0x1,0x11 01b7 e212 | | Load 0x1,0x12 01b8 8016 | | Call 0x0,0x16 01b9 6819 |h | Jump_Zero 0x1d3 01ba e214 | | Load 0x1,0x14 01bb 4803 |H | Short_Literal 0x3 01bc 00da | | Load_Top At_Offset_2 01bd 4803 |H | Short_Literal 0x3 01be e013 | | Load 0x0,0x13 01bf e017 | | Load 0x0,0x17 01c0 00ad | | QQ_Action Package,Field_Execute_Dynamic 01c1 00d1 | | Pop_Control Pop_Count_1 01c2 e214 | | Load 0x1,0x14 01c3 e213 | | Load 0x1,0x13 01c4 8016 | | Call 0x0,0x16 01c5 680d |h | Jump_Zero 0x1d3 01c6 4801 |H | Short_Literal 0x1 01c7 a21c | | Store_Unchecked 0x1,0x1c 01c8 00e1 | | Load_Encached Boolean_Cache 01c9 00d9 | | Load_Top At_Offset_1 01ca 4802 |H | Short_Literal 0x2 01cb e00a | | Load 0x0,0xa 01cc e019 | | Load 0x0,0x19 01cd 00ad | | QQ_Action Package,Field_Execute_Dynamic 01ce c21b | | Store 0x1,0x1b 01cf e21c | | Load 0x1,0x1c 01d0 7002 |p | Jump_Nonzero 0x1d3 01d1 00d2 | | Pop_Control Pop_Count_2 01d2 7802 |x | Jump 0x1d5 01d3 00c8 | | Action Pop_Auxiliary_Range 01d4 3fda |? | Loop_Increasing 0x1af 01d5 00ce | | Action Pop_Auxiliary 01d6 00d8 | | Load_Top At_Offset_0 01d7 8011 | | Call 0x0,0x11 01d8 00c8 | | Action Pop_Auxiliary_Range 01d9 3f18 |? | Loop_Increasing 0xf2 01da 00ce | | Action Pop_Auxiliary 01db e008 | | Load 0x0,0x8 01dc 7002 |p | Jump_Nonzero 0x1df 01dd 00c9 | | Action Pop_Auxiliary_Loop 01de 7f0e | | Jump 0xed 01df 00ce | | Action Pop_Auxiliary 01e0 00bb | | Action Signal_Completion 01e1 0000 0000 | | .BLANK 0000[0x7] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; See instruction 0x02cf at 0xdb, index=0xd 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 4100 |A | End_Rendezvous 0x0 01ec 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; STRING TABLE 01f0 ; -------------------------------------------------------------------------------------- 01f0 000e | | .STRTAB 0x000e->0x01f7 ; "!!! REQUETE !!!" 01f1 001b | | .STRTAB 0x001b->0x01fe ; "Je ne peux satisfaire votre demande ...." 01f2 0041 | A | .STRTAB 0x0041->0x0212 ; "Je ne connais pas ce contrat : " 01f3 005e | ^ | .STRTAB 0x005e->0x0222 ; "!!! PROPAGATION !!!" 01f4 006f | o | .STRTAB 0x006f->0x022b ; "!!! REGISTRATION !!!" 01f5 0081 | | .STRTAB 0x0081->0x0235 ; "!!! DEREGISTRATION !!!" 01f6 0095 | | .STREND 0x0095->0x0240 01f7 2121 2120 |!!! | .STRTAB_STRINGS 0241 0000 0000 | | .BLANK 0000[0x7] 0248 ; -------------------------------------------------------------------------------------- 0248 ; Debug Table 0248 ; -------------------------------------------------------------------------------------- 0248 0004 000a | | .DEBUG4 0x0004,0x000a,0x7765,0x0000,0x0001,0x000a 024e 000b 0276 | v| .DBG4T 0x000b,0x0276,0x8000,0x0000 0252 0010 027a | z| .DBG4T 0x0010,0x027a,0x8000,0x0000 0256 0073 0285 | s | .DBG4T 0x0073,0x0285,0x0001,0x0000 025a 0083 0288 | | .DBG4T 0x0083,0x0288,0x0001,0x0000 025e 008b 028b | | .DBG4T 0x008b,0x028b,0x0000,0x0000 0262 008e 028e | | .DBG4T 0x008e,0x028e,0x0000,0x4000 0266 00a3 0294 | | .DBG4T 0x00a3,0x0294,0x0003,0x0000 026a 00ab 0297 | | .DBG4T 0x00ab,0x0297,0x0000,0x0000 026e 00ae 029a | | .DBG4T 0x00ae,0x029a,0x0000,0x4000 0272 01eb 0000 | | .DBG4T 0x01eb,0x0000,0x0003,0x0000 0276 ; -------------------------------------------------------------------------------------- 0276 ; Debug chain 0276 ; -------------------------------------------------------------------------------------- 0276 0002 0000 | | .DBGLEN 0x0002,0x0000 0278 000b 000d | | .DBGLNO 0x000b,0x000d 027a ; -------------------------------------------------------------------------------------- 027a ; Debug chain 027a ; -------------------------------------------------------------------------------------- 027a 0009 0000 | | .DBGLEN 0x0009,0x0000 027c 0010 001c | | .DBGLNO 0x0010,0x001c,0x0022,0x0024,0x002a,0x0057,0x005d,0x0062,0x0064 0285 ; -------------------------------------------------------------------------------------- 0285 ; Debug chain 0285 ; -------------------------------------------------------------------------------------- 0285 0000 0001 | | .DBGLEN 0x0000,0x0001 0287 0073 | s | .DBGLNO 0x0073 0288 ; -------------------------------------------------------------------------------------- 0288 ; Debug chain 0288 ; -------------------------------------------------------------------------------------- 0288 0000 0001 | | .DBGLEN 0x0000,0x0001 028a 0083 | | .DBGLNO 0x0083 028b ; -------------------------------------------------------------------------------------- 028b ; Debug chain 028b ; -------------------------------------------------------------------------------------- 028b 0001 0000 | | .DBGLEN 0x0001,0x0000 028d 008b | | .DBGLNO 0x008b 028e ; -------------------------------------------------------------------------------------- 028e ; Debug chain 028e ; -------------------------------------------------------------------------------------- 028e 0000 0002 | | .DBGLEN 0x0000,0x0002 0290 0097 009a | | .DBGLNO 0x0097,0x009a 0292 0002 0004 | | .XXX[0x2] 0294 ; -------------------------------------------------------------------------------------- 0294 ; Debug chain 0294 ; -------------------------------------------------------------------------------------- 0294 0000 0001 | | .DBGLEN 0x0000,0x0001 0296 00a3 | | .DBGLNO 0x00a3 0297 ; -------------------------------------------------------------------------------------- 0297 ; Debug chain 0297 ; -------------------------------------------------------------------------------------- 0297 0001 0000 | | .DBGLEN 0x0001,0x0000 0299 00ab | | .DBGLNO 0x00ab 029a ; -------------------------------------------------------------------------------------- 029a ; Debug chain 029a ; -------------------------------------------------------------------------------------- 029a 0008 0038 | 8| .DBGLEN 0x0008,0x0038 029c 00ae 00b1 | | .DBGLNO 0x00ae,0x00b1,0x00bd,0x00c9,0x00d5,0x00d6,0x00d9,0x00da,0x00e3,0x00e6,0x00e7,0x00e8,0x00ed,0x00ee,0x00f2,0x00f7,0x00f9,0x00fe,0x0102,0x010b,0x010f,0x0112,0x011c,0x011e,0x0125,0x012a,0x012d,0x0130,0x0133,0x0139,0x013d,0x0140,0x0145,0x0147,0x014b,0x014e,0x0154,0x015b,0x015e,0x0162,0x016a,0x016c,0x0173,0x0177,0x017f,0x0183,0x0185,0x018c,0x018e,0x0195,0x0198,0x019b,0x01a1,0x01a8,0x01ab,0x01af,0x01b6,0x01ba,0x01c2,0x01c6,0x01c8,0x01cf,0x01d6,0x01db 02dc 0001 0002 | | .XXX[0x38] 02de 0003 0004 | | 02e0 0006 0007 | | 02e2 0008 0009 | | 02e4 000a 000b | | 02e6 000c 0038 | 8| 02e8 000d 000e | | 02ea 000f 0010 | | 02ec 0011 0012 | | 02ee 0013 0014 | | 02f0 0015 0016 | | 02f2 0017 0018 | | 02f4 0019 001a | | 02f6 001b 001c | | 02f8 001d 001e | | 02fa 001f 0020 | | 02fc 0021 0022 | ! "| 02fe 0023 0024 | # $| 0300 0025 0026 | % &| 0302 0027 0028 | ' (| 0304 0029 002a | ) *| 0306 002b 002c | + ,| 0308 002d 002e | - .| 030a 002f 0030 | / 0| 030c 0031 0032 | 1 2| 030e 0033 0034 | 3 4| 0310 0035 0036 | 5 6| 0312 0037 0039 | 7 9| 0314 0000 0000 | | .BLANK 0000[0xec]