|
|
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: 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 For_Outer_Call,Visible,Unelaborated,INIT_0070
000d 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080
000f 00bf | | Action Accept_Activation
0010 0093 0000 | | PushFullAddress InMicrocode
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 | | PushFullAddress InMicrocode,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 | | Reference 0x0,0xd
003d e210 | | Load 0x1,0x10
003e e00e | | Load 0x0,0xe
003f e00f | | Load 0x0,0xf
0040 a010 | | Reference 0x0,0x10
0041 a011 | | Reference 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 | | Reference 0x0,0x15
004c e211 | | Load 0x1,0x11
004d e016 | | Load 0x0,0x16
004e e017 | | Load 0x0,0x17
004f a018 | | Reference 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 | | PushFullAddress InMicrocode,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_Subprogram 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_Subprogram 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 0x1
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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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 | | Action InMicrocode,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]