|
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: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_542cf6
└─⟦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 03b8 | | .CONST 0x03b8 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 003c | < | .CONST 0x003c ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0012 | | .CONST 0x0012 ; Number of locals
001b INIT_0018:
001b 00e3 | | Load_Encached Natural_Cache
001c 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
001e 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
0020 029f 0083 | | Declare_Subprogram INIT_0080,For_Call
0022 029f 009b | | Declare_Subprogram INIT_0098,For_Call
0024 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
0026 029f 00d3 | | Declare_Subprogram INIT_00d0,For_Call
0028 029f 0103 | | Declare_Subprogram INIT_0100,For_Call
002a 029f 0113 | | Declare_Subprogram INIT_0110,For_Call
002c 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call
002e 029f 017b | {| Declare_Subprogram INIT_0178,For_Call
0030 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call
0032 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call
0034 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call
0036 029f 020b | | Declare_Subprogram INIT_0208,For_Call
0038 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call
003a 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call
003c BODY_0018:
003c 480a |H | Short_Literal 0xa
003d a402 | | Store_Unchecked 0x2,0x2
003e 8411 | | Call 0x2,0x11
003f 4819 |H | Short_Literal 0x19
0040 a402 | | Store_Unchecked 0x2,0x2
0041 8412 | | Call 0x2,0x12
0042 8407 | | Call 0x2,0x7
0043 4822 |H" | Short_Literal 0x22
0044 8408 | | Call 0x2,0x8
0045 8409 | | Call 0x2,0x9
0046 840a | | Call 0x2,0xa
0047 840b | | Call 0x2,0xb
0048 840c | | Call 0x2,0xc
0049 840d | | Call 0x2,0xd
004a 840e | | Call 0x2,0xe
004b 840f | | Call 0x2,0xf
004c 8410 | | Call 0x2,0x10
004d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
004e 0000 0000 | | .XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0059 | Y | .CONST 0x0059 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0004 | | .CONST 0x0004 ; Number of locals
0053 INIT_0050:
0053 e002 | | Load 0x0,0x2
0054 0322 | " | Declare_Variable Record
0055 00d8 | | Load_Top At_Offset_0
0056 0322 | " | Declare_Variable Record
0057 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call
0059 BODY_0050:
0059 00da | | Load_Top At_Offset_2
005a e7ff | | Load 0x3,-0x1
005b 00d8 | | Load_Top At_Offset_0
005c e003 | | Load 0x0,0x3
005d 0260 | ` | Execute Discrete,In_Type
005e 7001 |p | Jump_Nonzero 0x60
005f 0801 | | Execute_Immediate Raise,0x1
0060 8004 | | Call 0x0,0x4
0061 00d1 | | Pop_Control Pop_Count_1
0062 8604 | | Call 0x3,0x4
0063 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0064 0000 0000 | | .BLANK 0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0071 | q | .CONST 0x0071 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0004 | | .CONST 0x0004 ; Number of locals
006b INIT_0068:
006b e005 | | Load 0x0,0x5
006c 0322 | " | Declare_Variable Record
006d 00d8 | | Load_Top At_Offset_0
006e 0322 | " | Declare_Variable Record
006f 029f 026b | k| Declare_Subprogram INIT_0268,For_Call
0071 BODY_0068:
0071 00da | | Load_Top At_Offset_2
0072 e7fe | | Load 0x3,-0x2
0073 00d8 | | Load_Top At_Offset_0
0074 e006 | | Load 0x0,0x6
0075 0260 | ` | Execute Discrete,In_Type
0076 7001 |p | Jump_Nonzero 0x78
0077 0801 | | Execute_Immediate Raise,0x1
0078 e7ff | | Load 0x3,-0x1
0079 8007 | | Call 0x0,0x7
007a 00d1 | | Pop_Control Pop_Count_1
007b 8604 | | Call 0x3,0x4
007c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
007d 0000 0000 | | .XXX[0x3]
007f 0000 | |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0089 | | .CONST 0x0089 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0004 | | .CONST 0x0004 ; Number of locals
0083 INIT_0080:
0083 e008 | | Load 0x0,0x8
0084 0322 | " | Declare_Variable Record
0085 00d8 | | Load_Top At_Offset_0
0086 0322 | " | Declare_Variable Record
0087 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
0089 BODY_0080:
0089 00da | | Load_Top At_Offset_2
008a e7fe | | Load 0x3,-0x2
008b 00d8 | | Load_Top At_Offset_0
008c e009 | | Load 0x0,0x9
008d 0260 | ` | Execute Discrete,In_Type
008e 7001 |p | Jump_Nonzero 0x90
008f 0801 | | Execute_Immediate Raise,0x1
0090 e7ff | | Load 0x3,-0x1
0091 800a | | Call 0x0,0xa
0092 00d1 | | Pop_Control Pop_Count_1
0093 8604 | | Call 0x3,0x4
0094 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0095 0000 0000 | | .XXX[0x3]
0097 0000 | |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a1 | | .CONST 0x00a1 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0004 | | .CONST 0x0004 ; Number of locals
009b INIT_0098:
009b e00b | | Load 0x0,0xb
009c 0322 | " | Declare_Variable Record
009d 00d8 | | Load_Top At_Offset_0
009e 0322 | " | Declare_Variable Record
009f 029f 029b | | Declare_Subprogram INIT_0298,For_Call
00a1 BODY_0098:
00a1 00da | | Load_Top At_Offset_2
00a2 e7ff | | Load 0x3,-0x1
00a3 00d8 | | Load_Top At_Offset_0
00a4 e00c | | Load 0x0,0xc
00a5 0260 | ` | Execute Discrete,In_Type
00a6 7001 |p | Jump_Nonzero 0xa8
00a7 0801 | | Execute_Immediate Raise,0x1
00a8 800d | | Call 0x0,0xd
00a9 00d1 | | Pop_Control Pop_Count_1
00aa 8604 | | Call 0x3,0x4
00ab 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00ac 0000 0000 | | .BLANK 0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00c3 | | .CONST 0x00c3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0009 | | .CONST 0x0009 ; Number of locals
00b3 INIT_00b0:
00b3 e00e | | Load 0x0,0xe
00b4 0619 | | Execute_Immediate Set_Value_Unchecked,0x19
00b5 e00f | | Load 0x0,0xf
00b6 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00b7 e010 | | Load 0x0,0x10
00b8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00b9 e011 | | Load 0x0,0x11
00ba 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00bb e012 | | Load 0x0,0x12
00bc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00bd e013 | | Load 0x0,0x13
00be 0322 | " | Declare_Variable Record
00bf 00d8 | | Load_Top At_Offset_0
00c0 0322 | " | Declare_Variable Record
00c1 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call
00c3 BODY_00b0:
00c3 00da | | Load_Top At_Offset_2
00c4 e606 | | Load 0x3,0x6
00c5 e605 | | Load 0x3,0x5
00c6 e604 | | Load 0x3,0x4
00c7 e603 | | Load 0x3,0x3
00c8 e602 | | Load 0x3,0x2
00c9 8014 | | Call 0x0,0x14
00ca 00d1 | | Pop_Control Pop_Count_1
00cb 8609 | | Call 0x3,0x9
00cc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00cd 0000 0000 | | .XXX[0x3]
00cf 0000 | |
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00e7 | | .CONST 0x00e7 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 000b | | .CONST 0x000b ; Number of locals
00d3 INIT_00d0:
00d3 e002 | | Load 0x0,0x2
00d4 0322 | " | Declare_Variable Record
00d5 e013 | | Load 0x0,0x13
00d6 0322 | " | Declare_Variable Record
00d7 e015 | | Load 0x0,0x15
00d8 0322 | " | Declare_Variable Record
00d9 00d8 | | Load_Top At_Offset_0
00da 0322 | " | Declare_Variable Record
00db e00e | | Load 0x0,0xe
00dc 0619 | | Execute_Immediate Set_Value_Unchecked,0x19
00dd e00f | | Load 0x0,0xf
00de 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00df e010 | | Load 0x0,0x10
00e0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00e1 e011 | | Load 0x0,0x11
00e2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00e3 e012 | | Load 0x0,0x12
00e4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00e5 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call
00e7 BODY_00d0:
00e7 e603 | | Load 0x3,0x3
00e8 00da | | Load_Top At_Offset_2
00e9 e609 | | Load 0x3,0x9
00ea e608 | | Load 0x3,0x8
00eb e607 | | Load 0x3,0x7
00ec e606 | | Load 0x3,0x6
00ed 8014 | | Call 0x0,0x14
00ee 00d1 | | Pop_Control Pop_Count_1
00ef e602 | | Load 0x3,0x2
00f0 4817 |H | Short_Literal 0x17
00f1 8004 | | Call 0x0,0x4
00f2 00d1 | | Pop_Control Pop_Count_1
00f3 e604 | | Load 0x3,0x4
00f4 e603 | | Load 0x3,0x3
00f5 e602 | | Load 0x3,0x2
00f6 e7ff | | Load 0x3,-0x1
00f7 00d8 | | Load_Top At_Offset_0
00f8 e016 | | Load 0x0,0x16
00f9 0260 | ` | Execute Discrete,In_Type
00fa 7001 |p | Jump_Nonzero 0xfc
00fb 0801 | | Execute_Immediate Raise,0x1
00fc 8017 | | Call 0x0,0x17
00fd 00d1 | | Pop_Control Pop_Count_1
00fe 860b | | Call 0x3,0xb
00ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0109 | | .CONST 0x0109 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0004 | | .CONST 0x0004 ; Number of locals
0103 INIT_0100:
0103 e018 | | Load 0x0,0x18
0104 0322 | " | Declare_Variable Record
0105 00d8 | | Load_Top At_Offset_0
0106 0322 | " | Declare_Variable Record
0107 029f 02e3 | | Declare_Subprogram INIT_02e0,For_Call
0109 BODY_0100:
0109 00da | | Load_Top At_Offset_2
010a 4818 |H | Short_Literal 0x18
010b 480a |H | Short_Literal 0xa
010c 8019 | | Call 0x0,0x19
010d 00d1 | | Pop_Control Pop_Count_1
010e 8604 | | Call 0x3,0x4
010f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011d | | .CONST 0x011d ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0004 | | .CONST 0x0004 ; Number of locals
0113 INIT_0110:
0113 e01a | | Load 0x0,0x1a
0114 0322 | " | Declare_Variable Record
0115 00d8 | | Load_Top At_Offset_0
0116 1c00 | | Execute_Immediate Run_Utility,0x0
0117 00d8 | | Load_Top At_Offset_0
0118 0322 | " | Declare_Variable Record
0119 00d8 | | Load_Top At_Offset_0
011a 1c00 | | Execute_Immediate Run_Utility,0x0
011b 029f 02fb | | Declare_Subprogram INIT_02f8,For_Call
011d BODY_0110:
011d 00da | | Load_Top At_Offset_2
011e 801b | | Call 0x0,0x1b
011f 00d1 | | Pop_Control Pop_Count_1
0120 00da | | Load_Top At_Offset_2
0121 4800 |H | Short_Literal 0x0
0122 801c | | Call 0x0,0x1c
0123 00d1 | | Pop_Control Pop_Count_1
0124 00da | | Load_Top At_Offset_2
0125 801d | | Call 0x0,0x1d
0126 e01e | | Load 0x0,0x1e
0127 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0128 00da | | Load_Top At_Offset_2
0129 801f | | Call 0x0,0x1f
012a 00d1 | | Pop_Control Pop_Count_1
012b 00da | | Load_Top At_Offset_2
012c 4800 |H | Short_Literal 0x0
012d 8020 | | Call 0x0,0x20
012e 00d1 | | Pop_Control Pop_Count_1
012f 00da | | Load_Top At_Offset_2
0130 801d | | Call 0x0,0x1d
0131 e01e | | Load 0x0,0x1e
0132 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0133 8604 | | Call 0x3,0x4
0134 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0135 0000 0000 | | .XXX[0x3]
0137 0000 | |
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0151 | Q | .CONST 0x0151 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0009 | | .CONST 0x0009 ; Number of locals
013b INIT_0138:
013b e021 | ! | Load 0x0,0x21
013c 0322 | " | Declare_Variable Record
013d 00d8 | | Load_Top At_Offset_0
013e 1c00 | | Execute_Immediate Run_Utility,0x0
013f 00d8 | | Load_Top At_Offset_0
0140 0322 | " | Declare_Variable Record
0141 00d8 | | Load_Top At_Offset_0
0142 1c00 | | Execute_Immediate Run_Utility,0x0
0143 e018 | | Load 0x0,0x18
0144 0322 | " | Declare_Variable Record
0145 00d8 | | Load_Top At_Offset_0
0146 0322 | " | Declare_Variable Record
0147 00d8 | | Load_Top At_Offset_0
0148 0322 | " | Declare_Variable Record
0149 00d8 | | Load_Top At_Offset_0
014a 0322 | " | Declare_Variable Record
014b e01a | | Load 0x0,0x1a
014c 0322 | " | Declare_Variable Record
014d 00d8 | | Load_Top At_Offset_0
014e 1c00 | | Execute_Immediate Run_Utility,0x0
014f 029f 0313 | | Declare_Subprogram INIT_0310,For_Call
0151 BODY_0138:
0151 e604 | | Load 0x3,0x4
0152 4801 |H | Short_Literal 0x1
0153 4801 |H | Short_Literal 0x1
0154 8019 | | Call 0x0,0x19
0155 00d1 | | Pop_Control Pop_Count_1
0156 e605 | | Load 0x3,0x5
0157 4802 |H | Short_Literal 0x2
0158 4802 |H | Short_Literal 0x2
0159 8019 | | Call 0x0,0x19
015a 00d1 | | Pop_Control Pop_Count_1
015b 00db | | Load_Top At_Offset_3
015c 4803 |H | Short_Literal 0x3
015d 4803 |H | Short_Literal 0x3
015e 8019 | | Call 0x0,0x19
015f 00d1 | | Pop_Control Pop_Count_1
0160 00da | | Load_Top At_Offset_2
0161 4804 |H | Short_Literal 0x4
0162 4804 |H | Short_Literal 0x4
0163 8019 | | Call 0x0,0x19
0164 00d1 | | Pop_Control Pop_Count_1
0165 00d9 | | Load_Top At_Offset_1
0166 801b | | Call 0x0,0x1b
0167 00d1 | | Pop_Control Pop_Count_1
0168 00d9 | | Load_Top At_Offset_1
0169 4800 |H | Short_Literal 0x0
016a 801c | | Call 0x0,0x1c
016b 00d1 | | Pop_Control Pop_Count_1
016c e602 | | Load 0x3,0x2
016d 00da | | Load_Top At_Offset_2
016e e607 | | Load 0x3,0x7
016f e606 | | Load 0x3,0x6
0170 e605 | | Load 0x3,0x5
0171 e604 | | Load 0x3,0x4
0172 8022 | " | Call 0x0,0x22
0173 00d1 | | Pop_Control Pop_Count_1
0174 8609 | | Call 0x3,0x9
0175 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0176 0000 0000 | | .XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0199 | | .CONST 0x0199 ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 000b | | .CONST 0x000b ; Number of locals
017b INIT_0178:
017b e023 | # | Load 0x0,0x23
017c 0322 | " | Declare_Variable Record
017d 00d8 | | Load_Top At_Offset_0
017e 1c00 | | Execute_Immediate Run_Utility,0x0
017f 00d8 | | Load_Top At_Offset_0
0180 0322 | " | Declare_Variable Record
0181 00d8 | | Load_Top At_Offset_0
0182 1c00 | | Execute_Immediate Run_Utility,0x0
0183 e021 | ! | Load 0x0,0x21
0184 0322 | " | Declare_Variable Record
0185 00d8 | | Load_Top At_Offset_0
0186 1c00 | | Execute_Immediate Run_Utility,0x0
0187 00d8 | | Load_Top At_Offset_0
0188 0322 | " | Declare_Variable Record
0189 00d8 | | Load_Top At_Offset_0
018a 1c00 | | Execute_Immediate Run_Utility,0x0
018b e018 | | Load 0x0,0x18
018c 0322 | " | Declare_Variable Record
018d 00d8 | | Load_Top At_Offset_0
018e 0322 | " | Declare_Variable Record
018f 00d8 | | Load_Top At_Offset_0
0190 0322 | " | Declare_Variable Record
0191 00d8 | | Load_Top At_Offset_0
0192 0322 | " | Declare_Variable Record
0193 e01a | | Load 0x0,0x1a
0194 0322 | " | Declare_Variable Record
0195 00d8 | | Load_Top At_Offset_0
0196 1c00 | | Execute_Immediate Run_Utility,0x0
0197 029f 032b | +| Declare_Subprogram INIT_0328,For_Call
0199 BODY_0178:
0199 e606 | | Load 0x3,0x6
019a 4801 |H | Short_Literal 0x1
019b 4801 |H | Short_Literal 0x1
019c 8019 | | Call 0x0,0x19
019d 00d1 | | Pop_Control Pop_Count_1
019e e607 | | Load 0x3,0x7
019f 4802 |H | Short_Literal 0x2
01a0 4802 |H | Short_Literal 0x2
01a1 8019 | | Call 0x0,0x19
01a2 00d1 | | Pop_Control Pop_Count_1
01a3 00db | | Load_Top At_Offset_3
01a4 4803 |H | Short_Literal 0x3
01a5 4803 |H | Short_Literal 0x3
01a6 8019 | | Call 0x0,0x19
01a7 00d1 | | Pop_Control Pop_Count_1
01a8 00da | | Load_Top At_Offset_2
01a9 4804 |H | Short_Literal 0x4
01aa 4804 |H | Short_Literal 0x4
01ab 8019 | | Call 0x0,0x19
01ac 00d1 | | Pop_Control Pop_Count_1
01ad 00d9 | | Load_Top At_Offset_1
01ae 801b | | Call 0x0,0x1b
01af 00d1 | | Pop_Control Pop_Count_1
01b0 00d9 | | Load_Top At_Offset_1
01b1 4802 |H | Short_Literal 0x2
01b2 801c | | Call 0x0,0x1c
01b3 00d1 | | Pop_Control Pop_Count_1
01b4 e604 | | Load 0x3,0x4
01b5 00da | | Load_Top At_Offset_2
01b6 e609 | | Load 0x3,0x9
01b7 e608 | | Load 0x3,0x8
01b8 e607 | | Load 0x3,0x7
01b9 e606 | | Load 0x3,0x6
01ba 8022 | " | Call 0x0,0x22
01bb 00d1 | | Pop_Control Pop_Count_1
01bc e605 | | Load 0x3,0x5
01bd 8024 | $ | Call 0x0,0x24
01be 00d1 | | Pop_Control Pop_Count_1
01bf e602 | | Load 0x3,0x2
01c0 e605 | | Load 0x3,0x5
01c1 00d8 | | Load_Top At_Offset_0
01c2 e604 | | Load 0x3,0x4
01c3 4805 |H | Short_Literal 0x5
01c4 4802 |H | Short_Literal 0x2
01c5 8025 | % | Call 0x0,0x25
01c6 00d1 | | Pop_Control Pop_Count_1
01c7 860b | | Call 0x3,0xb
01c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01c9 0000 0000 | | .BLANK 0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d9 | | .CONST 0x01d9 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0004 | | .CONST 0x0004 ; Number of locals
01d3 INIT_01d0:
01d3 e026 | & | Load 0x0,0x26
01d4 0322 | " | Declare_Variable Record
01d5 00d8 | | Load_Top At_Offset_0
01d6 0322 | " | Declare_Variable Record
01d7 029f 0343 | C| Declare_Subprogram INIT_0340,For_Call
01d9 BODY_01d0:
01d9 00da | | Load_Top At_Offset_2
01da 480e |H | Short_Literal 0xe
01db 4808 |H | Short_Literal 0x8
01dc 480c |H | Short_Literal 0xc
01dd 8027 | ' | Call 0x0,0x27
01de 00d1 | | Pop_Control Pop_Count_1
01df 8604 | | Call 0x3,0x4
01e0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01e1 0000 0000 | | .BLANK 0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f1 | | .CONST 0x01f1 ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0004 | | .CONST 0x0004 ; Number of locals
01eb INIT_01e8:
01eb e028 | ( | Load 0x0,0x28
01ec 0322 | " | Declare_Variable Record
01ed 00d8 | | Load_Top At_Offset_0
01ee 0322 | " | Declare_Variable Record
01ef 029f 035b | [| Declare_Subprogram INIT_0358,For_Call
01f1 BODY_01e8:
01f1 00da | | Load_Top At_Offset_2
01f2 4805 |H | Short_Literal 0x5
01f3 480c |H | Short_Literal 0xc
01f4 8029 | ) | Call 0x0,0x29
01f5 00d1 | | Pop_Control Pop_Count_1
01f6 8604 | | Call 0x3,0x4
01f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0201 | | .CONST 0x0201 ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0004 | | .CONST 0x0004 ; Number of locals
01fb INIT_01f8:
01fb e02a | * | Load 0x0,0x2a
01fc 0322 | " | Declare_Variable Record
01fd 00d8 | | Load_Top At_Offset_0
01fe 0322 | " | Declare_Variable Record
01ff 029f 0373 | s| Declare_Subprogram INIT_0370,For_Call
0201 BODY_01f8:
0201 00da | | Load_Top At_Offset_2
0202 4843 |HC | Short_Literal 0x43
0203 4817 |H | Short_Literal 0x17
0204 802b | + | Call 0x0,0x2b
0205 00d1 | | Pop_Control Pop_Count_1
0206 8604 | | Call 0x3,0x4
0207 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0215 | | .CONST 0x0215 ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0006 | | .CONST 0x0006 ; Number of locals
020b INIT_0208:
020b e02c | , | Load 0x0,0x2c
020c 0322 | " | Declare_Variable Record
020d 00d8 | | Load_Top At_Offset_0
020e 0322 | " | Declare_Variable Record
020f e018 | | Load 0x0,0x18
0210 0322 | " | Declare_Variable Record
0211 e02d | - | Load 0x0,0x2d
0212 0322 | " | Declare_Variable Record
0213 029f 038b | | Declare_Subprogram INIT_0388,For_Call
0215 BODY_0208:
0215 00da | | Load_Top At_Offset_2
0216 4822 |H" | Short_Literal 0x22
0217 480a |H | Short_Literal 0xa
0218 8019 | | Call 0x0,0x19
0219 00d1 | | Pop_Control Pop_Count_1
021a 00d9 | | Load_Top At_Offset_1
021b 00db | | Load_Top At_Offset_3
021c 4803 |H | Short_Literal 0x3
021d 802e | . | Call 0x0,0x2e
021e 00d1 | | Pop_Control Pop_Count_1
021f e602 | | Load 0x3,0x2
0220 4800 |H | Short_Literal 0x0
0221 00db | | Load_Top At_Offset_3
0222 4800 |H | Short_Literal 0x0
0223 6008 |` | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00000d80}
0224 480c |H | Short_Literal 0xc
0225 802f | / | Call 0x0,0x2f
0226 00d1 | | Pop_Control Pop_Count_1
0227 8606 | | Call 0x3,0x6
0228 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0229 0000 0000 | | .XXX[0x3]
022b 0000 | |
022c 0000 0000 | | .LITERAL {0x00000000, 0x00000d80}
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0235 | 5 | .CONST 0x0235 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 0092 0399 | | Action Push_String_Extended,0x399 ; "Bidule"
0235 BODY_0230:
0235 e402 | | Load 0x2,0x2
0236 8403 | | Call 0x2,0x3
0237 e402 | | Load 0x2,0x2
0238 00d9 | | Load_Top At_Offset_1
0239 8404 | | Call 0x2,0x4
023a e402 | | Load 0x2,0x2
023b 00d9 | | Load_Top At_Offset_1
023c 8405 | | Call 0x2,0x5
023d e402 | | Load 0x2,0x2
023e 8406 | | Call 0x2,0x6
023f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0245 | E | .CONST 0x0245 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 0092 039a | | Action Push_String_Extended,0x39a ; "long libelle de plus de 30 caracteres .........."
0245 BODY_0240:
0245 e402 | | Load 0x2,0x2
0246 8403 | | Call 0x2,0x3
0247 e402 | | Load 0x2,0x2
0248 00d9 | | Load_Top At_Offset_1
0249 8404 | | Call 0x2,0x4
024a e402 | | Load 0x2,0x2
024b 00d9 | | Load_Top At_Offset_1
024c 8405 | | Call 0x2,0x5
024d e402 | | Load 0x2,0x2
024e 8406 | | Call 0x2,0x6
024f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0255 | U | .CONST 0x0255 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0002 | | .CONST 0x0002 ; Number of locals
0253 INIT_0250:
0253 e602 | | Load 0x3,0x2
0254 8030 | 0 | Call 0x0,0x30
0255 BODY_0250:
0255 00d8 | | Load_Top At_Offset_0
0256 e01e | | Load 0x0,0x1e
0257 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0258 00d8 | | Load_Top At_Offset_0
0259 8031 | 1 | Call 0x0,0x31
025a e603 | | Load 0x3,0x3
025b 017d | } | Execute Record,Structure_Write
025c e603 | | Load 0x3,0x3
025d 8030 | 0 | Call 0x0,0x30
025e e01e | | Load 0x0,0x1e
025f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0260 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0261 0000 0000 | | .BLANK 0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026d | m | .CONST 0x026d ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0002 | | .CONST 0x0002 ; Number of locals
026b INIT_0268:
026b e602 | | Load 0x3,0x2
026c 8032 | 2 | Call 0x0,0x32
026d BODY_0268:
026d 00d8 | | Load_Top At_Offset_0
026e e01e | | Load 0x0,0x1e
026f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0270 00d8 | | Load_Top At_Offset_0
0271 8033 | 3 | Call 0x0,0x33
0272 e603 | | Load 0x3,0x3
0273 017d | } | Execute Record,Structure_Write
0274 e603 | | Load 0x3,0x3
0275 8032 | 2 | Call 0x0,0x32
0276 e01e | | Load 0x0,0x1e
0277 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0278 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0279 0000 0000 | | .BLANK 0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0285 | | .CONST 0x0285 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0002 | | .CONST 0x0002 ; Number of locals
0283 INIT_0280:
0283 e602 | | Load 0x3,0x2
0284 8034 | 4 | Call 0x0,0x34
0285 BODY_0280:
0285 00d8 | | Load_Top At_Offset_0
0286 e01e | | Load 0x0,0x1e
0287 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0288 00d8 | | Load_Top At_Offset_0
0289 8035 | 5 | Call 0x0,0x35
028a e603 | | Load 0x3,0x3
028b 017d | } | Execute Record,Structure_Write
028c e603 | | Load 0x3,0x3
028d 8034 | 4 | Call 0x0,0x34
028e e01e | | Load 0x0,0x1e
028f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0290 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0291 0000 0000 | | .BLANK 0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d | | .CONST 0x029d ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0002 | | .CONST 0x0002 ; Number of locals
029b INIT_0298:
029b e602 | | Load 0x3,0x2
029c 8036 | 6 | Call 0x0,0x36
029d BODY_0298:
029d 00d8 | | Load_Top At_Offset_0
029e e01e | | Load 0x0,0x1e
029f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02a0 00d8 | | Load_Top At_Offset_0
02a1 8037 | 7 | Call 0x0,0x37
02a2 e603 | | Load 0x3,0x3
02a3 017d | } | Execute Record,Structure_Write
02a4 e603 | | Load 0x3,0x3
02a5 8036 | 6 | Call 0x0,0x36
02a6 e01e | | Load 0x0,0x1e
02a7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02a8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02a9 0000 0000 | | .BLANK 0000[0x7]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b5 | | .CONST 0x02b5 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0002 | | .CONST 0x0002 ; Number of locals
02b3 INIT_02b0:
02b3 e607 | | Load 0x3,0x7
02b4 8038 | 8 | Call 0x0,0x38
02b5 BODY_02b0:
02b5 00d8 | | Load_Top At_Offset_0
02b6 e01e | | Load 0x0,0x1e
02b7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02b8 00d8 | | Load_Top At_Offset_0
02b9 8039 | 9 | Call 0x0,0x39
02ba e608 | | Load 0x3,0x8
02bb 017d | } | Execute Record,Structure_Write
02bc e608 | | Load 0x3,0x8
02bd 8038 | 8 | Call 0x0,0x38
02be e01e | | Load 0x0,0x1e
02bf 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02c0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02c1 0000 0000 | | .BLANK 0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cd | | .CONST 0x02cd ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0002 | | .CONST 0x0002 ; Number of locals
02cb INIT_02c8:
02cb e604 | | Load 0x3,0x4
02cc 803a | : | Call 0x0,0x3a
02cd BODY_02c8:
02cd 00d8 | | Load_Top At_Offset_0
02ce e01e | | Load 0x0,0x1e
02cf 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02d0 00d8 | | Load_Top At_Offset_0
02d1 803b | ; | Call 0x0,0x3b
02d2 e605 | | Load 0x3,0x5
02d3 017d | } | Execute Record,Structure_Write
02d4 e605 | | Load 0x3,0x5
02d5 803a | : | Call 0x0,0x3a
02d6 e01e | | Load 0x0,0x1e
02d7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02d8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02d9 0000 0000 | | .BLANK 0000[0x7]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e5 | | .CONST 0x02e5 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0002 | | .CONST 0x0002 ; Number of locals
02e3 INIT_02e0:
02e3 e602 | | Load 0x3,0x2
02e4 803c | < | Call 0x0,0x3c
02e5 BODY_02e0:
02e5 00d8 | | Load_Top At_Offset_0
02e6 e01e | | Load 0x0,0x1e
02e7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02e8 00d8 | | Load_Top At_Offset_0
02e9 803d | = | Call 0x0,0x3d
02ea e603 | | Load 0x3,0x3
02eb 017d | } | Execute Record,Structure_Write
02ec e603 | | Load 0x3,0x3
02ed 803c | < | Call 0x0,0x3c
02ee e01e | | Load 0x0,0x1e
02ef 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02f0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02f1 0000 0000 | | .BLANK 0000[0x7]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fd | | .CONST 0x02fd ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0002 | | .CONST 0x0002 ; Number of locals
02fb INIT_02f8:
02fb e602 | | Load 0x3,0x2
02fc 801d | | Call 0x0,0x1d
02fd BODY_02f8:
02fd 00d8 | | Load_Top At_Offset_0
02fe e01e | | Load 0x0,0x1e
02ff 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0300 00d8 | | Load_Top At_Offset_0
0301 803e | > | Call 0x0,0x3e
0302 e603 | | Load 0x3,0x3
0303 017d | } | Execute Record,Structure_Write
0304 e603 | | Load 0x3,0x3
0305 801d | | Call 0x0,0x1d
0306 e01e | | Load 0x0,0x1e
0307 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0308 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0309 0000 0000 | | .BLANK 0000[0x7]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0315 | | .CONST 0x0315 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0002 | | .CONST 0x0002 ; Number of locals
0313 INIT_0310:
0313 e602 | | Load 0x3,0x2
0314 803f | ? | Call 0x0,0x3f
0315 BODY_0310:
0315 00d8 | | Load_Top At_Offset_0
0316 e01e | | Load 0x0,0x1e
0317 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0318 00d8 | | Load_Top At_Offset_0
0319 8040 | @ | Call 0x0,0x40
031a e603 | | Load 0x3,0x3
031b 017d | } | Execute Record,Structure_Write
031c e603 | | Load 0x3,0x3
031d 803f | ? | Call 0x0,0x3f
031e e01e | | Load 0x0,0x1e
031f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0320 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0321 0000 0000 | | .BLANK 0000[0x7]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032d | - | .CONST 0x032d ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0002 | | .CONST 0x0002 ; Number of locals
032b INIT_0328:
032b e602 | | Load 0x3,0x2
032c 8041 | A | Call 0x0,0x41
032d BODY_0328:
032d 00d8 | | Load_Top At_Offset_0
032e e01e | | Load 0x0,0x1e
032f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0330 00d8 | | Load_Top At_Offset_0
0331 8042 | B | Call 0x0,0x42
0332 e603 | | Load 0x3,0x3
0333 017d | } | Execute Record,Structure_Write
0334 e603 | | Load 0x3,0x3
0335 8041 | A | Call 0x0,0x41
0336 e01e | | Load 0x0,0x1e
0337 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0338 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0339 0000 0000 | | .BLANK 0000[0x7]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0345 | E | .CONST 0x0345 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0002 | | .CONST 0x0002 ; Number of locals
0343 INIT_0340:
0343 e602 | | Load 0x3,0x2
0344 8043 | C | Call 0x0,0x43
0345 BODY_0340:
0345 00d8 | | Load_Top At_Offset_0
0346 e01e | | Load 0x0,0x1e
0347 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0348 00d8 | | Load_Top At_Offset_0
0349 8044 | D | Call 0x0,0x44
034a e603 | | Load 0x3,0x3
034b 017d | } | Execute Record,Structure_Write
034c e603 | | Load 0x3,0x3
034d 8043 | C | Call 0x0,0x43
034e e01e | | Load 0x0,0x1e
034f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0350 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0351 0000 0000 | | .BLANK 0000[0x7]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035d | ] | .CONST 0x035d ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0002 | | .CONST 0x0002 ; Number of locals
035b INIT_0358:
035b e602 | | Load 0x3,0x2
035c 8045 | E | Call 0x0,0x45
035d BODY_0358:
035d 00d8 | | Load_Top At_Offset_0
035e e01e | | Load 0x0,0x1e
035f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0360 00d8 | | Load_Top At_Offset_0
0361 8046 | F | Call 0x0,0x46
0362 e603 | | Load 0x3,0x3
0363 017d | } | Execute Record,Structure_Write
0364 e603 | | Load 0x3,0x3
0365 8045 | E | Call 0x0,0x45
0366 e01e | | Load 0x0,0x1e
0367 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0368 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0369 0000 0000 | | .BLANK 0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0375 | u | .CONST 0x0375 ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0002 | | .CONST 0x0002 ; Number of locals
0373 INIT_0370:
0373 e602 | | Load 0x3,0x2
0374 8047 | G | Call 0x0,0x47
0375 BODY_0370:
0375 00d8 | | Load_Top At_Offset_0
0376 e01e | | Load 0x0,0x1e
0377 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0378 00d8 | | Load_Top At_Offset_0
0379 8048 | H | Call 0x0,0x48
037a e603 | | Load 0x3,0x3
037b 017d | } | Execute Record,Structure_Write
037c e603 | | Load 0x3,0x3
037d 8047 | G | Call 0x0,0x47
037e e01e | | Load 0x0,0x1e
037f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0380 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0381 0000 0000 | | .BLANK 0000[0x7]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038d | | .CONST 0x038d ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0002 | | .CONST 0x0002 ; Number of locals
038b INIT_0388:
038b e602 | | Load 0x3,0x2
038c 8049 | I | Call 0x0,0x49
038d BODY_0388:
038d 00d8 | | Load_Top At_Offset_0
038e e01e | | Load 0x0,0x1e
038f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0390 00d8 | | Load_Top At_Offset_0
0391 804a | J | Call 0x0,0x4a
0392 e603 | | Load 0x3,0x3
0393 017d | } | Execute Record,Structure_Write
0394 e603 | | Load 0x3,0x3
0395 8049 | I | Call 0x0,0x49
0396 e01e | | Load 0x0,0x1e
0397 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0398 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0399 ; --------------------------------------------------------------------------------------
0399 ; STRING TABLE
0399 ; --------------------------------------------------------------------------------------
0399 0006 | | .STRTAB 0x0006->0x039c ; "Bidule"
039a 000a | | .STRTAB 0x000a->0x039f ; "long libelle de plus de 30 caracteres .........."
039b 0038 | 8 | .STREND 0x0038->0x03b7
039c 4269 6475 |Bidu| .STRTAB_STRINGS
03b7 0000 | | .XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; Debug Table
03b8 ; --------------------------------------------------------------------------------------
03b8 0004 0009 | | .DEBUG4 0x0004,0x0009,0x7490,0x0000,0x0001,0x0020
03be 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
03c2 001b 043e | >| .DBG4T 0x001b,0x043e,0x8001,0x0000
03c6 0053 045d | S ]| .DBG4T 0x0053,0x045d,0x0001,0x0000
03ca 006b 0462 | k b| .DBG4T 0x006b,0x0462,0x0001,0x0000
03ce 0083 0467 | g| .DBG4T 0x0083,0x0467,0x0001,0x0000
03d2 009b 046c | l| .DBG4T 0x009b,0x046c,0x0001,0x0000
03d6 00b3 0471 | q| .DBG4T 0x00b3,0x0471,0x0001,0x0000
03da 00d3 047b | {| .DBG4T 0x00d3,0x047b,0x0001,0x0000
03de 0103 0489 | | .DBG4T 0x0103,0x0489,0x0001,0x0000
03e2 0113 048e | | .DBG4T 0x0113,0x048e,0x0001,0x0000
03e6 013b 0498 | ; | .DBG4T 0x013b,0x0498,0x0001,0x0000
03ea 017b 04a5 | { | .DBG4T 0x017b,0x04a5,0x0001,0x0000
03ee 01d3 04b5 | | .DBG4T 0x01d3,0x04b5,0x0001,0x0000
03f2 01eb 04ba | | .DBG4T 0x01eb,0x04ba,0x0001,0x0000
03f6 01fb 04bf | | .DBG4T 0x01fb,0x04bf,0x0001,0x0000
03fa 020b 04c4 | | .DBG4T 0x020b,0x04c4,0x0001,0x0000
03fe 0233 04cd | 3 | .DBG4T 0x0233,0x04cd,0x0004,0x0000
0402 0243 04d4 | C | .DBG4T 0x0243,0x04d4,0x0004,0x0000
0406 0253 04db | S | .DBG4T 0x0253,0x04db,0x0004,0x0000
040a 026b 04e1 | k | .DBG4T 0x026b,0x04e1,0x0004,0x0000
040e 0283 04e7 | | .DBG4T 0x0283,0x04e7,0x0004,0x0000
0412 029b 04ed | | .DBG4T 0x029b,0x04ed,0x0004,0x0000
0416 02b3 04f3 | | .DBG4T 0x02b3,0x04f3,0x0004,0x0000
041a 02cb 04f9 | | .DBG4T 0x02cb,0x04f9,0x0004,0x0000
041e 02e3 04ff | | .DBG4T 0x02e3,0x04ff,0x0004,0x0000
0422 02fb 0505 | | .DBG4T 0x02fb,0x0505,0x0004,0x0000
0426 0313 050b | | .DBG4T 0x0313,0x050b,0x0004,0x0000
042a 032b 0511 | + | .DBG4T 0x032b,0x0511,0x0004,0x0000
042e 0343 0517 | C | .DBG4T 0x0343,0x0517,0x0004,0x0000
0432 035b 051d | [ | .DBG4T 0x035b,0x051d,0x0004,0x0000
0436 0373 0523 | s #| .DBG4T 0x0373,0x0523,0x0004,0x0000
043a 038b 0529 | )| .DBG4T 0x038b,0x0529,0x0004,0x0000
043e ; --------------------------------------------------------------------------------------
043e ; Debug chain
043e ; --------------------------------------------------------------------------------------
043e 000f 000e | | .DBGLEN 0x000f,0x000e
0440 001b 001c | | .DBGLNO 0x001b,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x003c,0x003e,0x003f,0x0041,0x0042,0x0043,0x0045,0x0046,0x0047,0x0048,0x0049,0x004a,0x004b,0x004c
045d ; --------------------------------------------------------------------------------------
045d ; Debug chain
045d ; --------------------------------------------------------------------------------------
045d 0001 0002 | | .DBGLEN 0x0001,0x0002
045f 0053 0059 | S Y| .DBGLNO 0x0053,0x0059,0x0062
0462 ; --------------------------------------------------------------------------------------
0462 ; Debug chain
0462 ; --------------------------------------------------------------------------------------
0462 0001 0002 | | .DBGLEN 0x0001,0x0002
0464 006b 0071 | k q| .DBGLNO 0x006b,0x0071,0x007b
0467 ; --------------------------------------------------------------------------------------
0467 ; Debug chain
0467 ; --------------------------------------------------------------------------------------
0467 0001 0002 | | .DBGLEN 0x0001,0x0002
0469 0083 0089 | | .DBGLNO 0x0083,0x0089,0x0093
046c ; --------------------------------------------------------------------------------------
046c ; Debug chain
046c ; --------------------------------------------------------------------------------------
046c 0001 0002 | | .DBGLEN 0x0001,0x0002
046e 009b 00a1 | | .DBGLNO 0x009b,0x00a1,0x00aa
0471 ; --------------------------------------------------------------------------------------
0471 ; Debug chain
0471 ; --------------------------------------------------------------------------------------
0471 0006 0002 | | .DBGLEN 0x0006,0x0002
0473 00b3 00b5 | | .DBGLNO 0x00b3,0x00b5,0x00b7,0x00b9,0x00bb,0x00bd,0x00c3,0x00cb
047b ; --------------------------------------------------------------------------------------
047b ; Debug chain
047b ; --------------------------------------------------------------------------------------
047b 0008 0004 | | .DBGLEN 0x0008,0x0004
047d 00d3 00d5 | | .DBGLNO 0x00d3,0x00d5,0x00d7,0x00db,0x00dd,0x00df,0x00e1,0x00e3,0x00e7,0x00ef,0x00f3,0x00fe
0489 ; --------------------------------------------------------------------------------------
0489 ; Debug chain
0489 ; --------------------------------------------------------------------------------------
0489 0001 0002 | | .DBGLEN 0x0001,0x0002
048b 0103 0109 | | .DBGLNO 0x0103,0x0109,0x010e
048e ; --------------------------------------------------------------------------------------
048e ; Debug chain
048e ; --------------------------------------------------------------------------------------
048e 0001 0007 | | .DBGLEN 0x0001,0x0007
0490 0113 011d | | .DBGLNO 0x0113,0x011d,0x0120,0x0124,0x0128,0x012b,0x012f,0x0133
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug chain
0498 ; --------------------------------------------------------------------------------------
0498 0003 0008 | | .DBGLEN 0x0003,0x0008
049a 013b 0143 | ; C| .DBGLNO 0x013b,0x0143,0x014b,0x0151,0x0156,0x015b,0x0160,0x0165,0x0168,0x016c,0x0174
04a5 ; --------------------------------------------------------------------------------------
04a5 ; Debug chain
04a5 ; --------------------------------------------------------------------------------------
04a5 0004 000a | | .DBGLEN 0x0004,0x000a
04a7 017b 0183 | { | .DBGLNO 0x017b,0x0183,0x018b,0x0193,0x0199,0x019e,0x01a3,0x01a8,0x01ad,0x01b0,0x01b4,0x01bc,0x01bf,0x01c7
04b5 ; --------------------------------------------------------------------------------------
04b5 ; Debug chain
04b5 ; --------------------------------------------------------------------------------------
04b5 0001 0002 | | .DBGLEN 0x0001,0x0002
04b7 01d3 01d9 | | .DBGLNO 0x01d3,0x01d9,0x01df
04ba ; --------------------------------------------------------------------------------------
04ba ; Debug chain
04ba ; --------------------------------------------------------------------------------------
04ba 0001 0002 | | .DBGLEN 0x0001,0x0002
04bc 01eb 01f1 | | .DBGLNO 0x01eb,0x01f1,0x01f6
04bf ; --------------------------------------------------------------------------------------
04bf ; Debug chain
04bf ; --------------------------------------------------------------------------------------
04bf 0001 0002 | | .DBGLEN 0x0001,0x0002
04c1 01fb 0201 | | .DBGLNO 0x01fb,0x0201,0x0206
04c4 ; --------------------------------------------------------------------------------------
04c4 ; Debug chain
04c4 ; --------------------------------------------------------------------------------------
04c4 0003 0004 | | .DBGLEN 0x0003,0x0004
04c6 020b 020f | | .DBGLNO 0x020b,0x020f,0x0211,0x0215,0x021a,0x021f,0x0227
04cd ; --------------------------------------------------------------------------------------
04cd ; Debug chain
04cd ; --------------------------------------------------------------------------------------
04cd 0001 0004 | | .DBGLEN 0x0001,0x0004
04cf 0233 0235 | 3 5| .DBGLNO 0x0233,0x0235,0x0237,0x023a,0x023d
04d4 ; --------------------------------------------------------------------------------------
04d4 ; Debug chain
04d4 ; --------------------------------------------------------------------------------------
04d4 0001 0004 | | .DBGLEN 0x0001,0x0004
04d6 0243 0245 | C E| .DBGLNO 0x0243,0x0245,0x0247,0x024a,0x024d
04db ; --------------------------------------------------------------------------------------
04db ; Debug chain
04db ; --------------------------------------------------------------------------------------
04db 0001 0003 | | .DBGLEN 0x0001,0x0003
04dd 0253 0255 | S U| .DBGLNO 0x0253,0x0255,0x0258,0x025c
04e1 ; --------------------------------------------------------------------------------------
04e1 ; Debug chain
04e1 ; --------------------------------------------------------------------------------------
04e1 0001 0003 | | .DBGLEN 0x0001,0x0003
04e3 026b 026d | k m| .DBGLNO 0x026b,0x026d,0x0270,0x0274
04e7 ; --------------------------------------------------------------------------------------
04e7 ; Debug chain
04e7 ; --------------------------------------------------------------------------------------
04e7 0001 0003 | | .DBGLEN 0x0001,0x0003
04e9 0283 0285 | | .DBGLNO 0x0283,0x0285,0x0288,0x028c
04ed ; --------------------------------------------------------------------------------------
04ed ; Debug chain
04ed ; --------------------------------------------------------------------------------------
04ed 0001 0003 | | .DBGLEN 0x0001,0x0003
04ef 029b 029d | | .DBGLNO 0x029b,0x029d,0x02a0,0x02a4
04f3 ; --------------------------------------------------------------------------------------
04f3 ; Debug chain
04f3 ; --------------------------------------------------------------------------------------
04f3 0001 0003 | | .DBGLEN 0x0001,0x0003
04f5 02b3 02b5 | | .DBGLNO 0x02b3,0x02b5,0x02b8,0x02bc
04f9 ; --------------------------------------------------------------------------------------
04f9 ; Debug chain
04f9 ; --------------------------------------------------------------------------------------
04f9 0001 0003 | | .DBGLEN 0x0001,0x0003
04fb 02cb 02cd | | .DBGLNO 0x02cb,0x02cd,0x02d0,0x02d4
04ff ; --------------------------------------------------------------------------------------
04ff ; Debug chain
04ff ; --------------------------------------------------------------------------------------
04ff 0001 0003 | | .DBGLEN 0x0001,0x0003
0501 02e3 02e5 | | .DBGLNO 0x02e3,0x02e5,0x02e8,0x02ec
0505 ; --------------------------------------------------------------------------------------
0505 ; Debug chain
0505 ; --------------------------------------------------------------------------------------
0505 0001 0003 | | .DBGLEN 0x0001,0x0003
0507 02fb 02fd | | .DBGLNO 0x02fb,0x02fd,0x0300,0x0304
050b ; --------------------------------------------------------------------------------------
050b ; Debug chain
050b ; --------------------------------------------------------------------------------------
050b 0001 0003 | | .DBGLEN 0x0001,0x0003
050d 0313 0315 | | .DBGLNO 0x0313,0x0315,0x0318,0x031c
0511 ; --------------------------------------------------------------------------------------
0511 ; Debug chain
0511 ; --------------------------------------------------------------------------------------
0511 0001 0003 | | .DBGLEN 0x0001,0x0003
0513 032b 032d | + -| .DBGLNO 0x032b,0x032d,0x0330,0x0334
0517 ; --------------------------------------------------------------------------------------
0517 ; Debug chain
0517 ; --------------------------------------------------------------------------------------
0517 0001 0003 | | .DBGLEN 0x0001,0x0003
0519 0343 0345 | C E| .DBGLNO 0x0343,0x0345,0x0348,0x034c
051d ; --------------------------------------------------------------------------------------
051d ; Debug chain
051d ; --------------------------------------------------------------------------------------
051d 0001 0003 | | .DBGLEN 0x0001,0x0003
051f 035b 035d | [ ]| .DBGLNO 0x035b,0x035d,0x0360,0x0364
0523 ; --------------------------------------------------------------------------------------
0523 ; Debug chain
0523 ; --------------------------------------------------------------------------------------
0523 0001 0003 | | .DBGLEN 0x0001,0x0003
0525 0373 0375 | s u| .DBGLNO 0x0373,0x0375,0x0378,0x037c
0529 ; --------------------------------------------------------------------------------------
0529 ; Debug chain
0529 ; --------------------------------------------------------------------------------------
0529 0001 0003 | | .DBGLEN 0x0001,0x0003
052b 038b 038d | | .DBGLNO 0x038b,0x038d,0x0390,0x0394
052f 0000 0000 | | .BLANK 0000[0xd1]