|
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_0ae4cb
└─⟦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 0390 | | .CONST 0x0390 ; 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 00b5 | | .CONST 0x00b5 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0030 | 0 | .CONST 0x0030 ; Number of locals
000b INIT_0008:
000b 0093 0000 | | push_full_address 0x0
000d 60ca |` | Indirect_Literal Discrete,0xd8,{0x80000000, 0x00010000}
000e 0273 | s | Execute Discrete,Plus
000f 0129 | ) | Execute Any,Make_Visible
0010 0093 0000 | | push_full_address 0x0
0012 60c1 |` | Indirect_Literal Discrete,0xd4,{0x80000000, 0x00020000}
0013 0273 | s | Execute Discrete,Plus
0014 0129 | ) | Execute Any,Make_Visible
0015 0093 0000 | | push_full_address 0x0
0017 60b8 |` | Indirect_Literal Discrete,0xd0,{0x80000000, 0x00030000}
0018 0273 | s | Execute Discrete,Plus
0019 0129 | ) | Execute Any,Make_Visible
001a 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
001c 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
001e 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
0020 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
0022 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0024 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0026 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
0028 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
002a 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
002c 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
002e 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
0030 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
0032 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0034 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0036 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated
0038 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
003a 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
003c 4820 |H | Short_Literal 0x20
003d e002 | | Load 0x0,0x2
003e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003f 1c07 | | Execute_Immediate Run_Utility,0x7
0040 0129 | ) | Execute Any,Make_Visible
0041 4820 |H | Short_Literal 0x20
0042 e002 | | Load 0x0,0x2
0043 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0044 1c07 | | Execute_Immediate Run_Utility,0x7
0045 0129 | ) | Execute Any,Make_Visible
0046 e003 | | Load 0x0,0x3
0047 029f 0333 | 3| Declare_Subprogram INIT_0330,For_Call
0049 4803 |H | Short_Literal 0x3
004a 032e | . | Declare_Type Record,Defined,Visible
004b 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated
004d 0093 0000 | | push_full_address 0x0
004f 607c |`| | Indirect_Literal Discrete,0xcc,{0x80000000, 0x00010000}
0050 0273 | s | Execute Discrete,Plus
0051 e004 | | Load 0x0,0x4
0052 0273 | s | Execute Discrete,Plus
0053 e005 | | Load 0x0,0x5
0054 0273 | s | Execute Discrete,Plus
0055 00da | | Load_Top At_Offset_2
0056 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0057 e006 | | Load 0x0,0x6
0058 0386 | | Declare_Variable Package,Visible
0059 00d8 | | Load_Top At_Offset_0
005a 020f | | Execute Module,Activate
005b e007 | | Load 0x0,0x7
005c 00d9 | | Load_Top At_Offset_1
005d 0098 | | Execute Package,Field_Read_Dynamic
005e 02a0 | | Declare_Subprogram Null_Subprogram
005f 4801 |H | Short_Literal 0x1
0060 032e | . | Declare_Type Record,Defined,Visible
0061 e008 | | Load 0x0,0x8
0062 00da | | Load_Top At_Offset_2
0063 0098 | | Execute Package,Field_Read_Dynamic
0064 02a0 | | Declare_Subprogram Null_Subprogram
0065 4801 |H | Short_Literal 0x1
0066 032e | . | Declare_Type Record,Defined,Visible
0067 00bf | | Action Accept_Activation
0068 e221 | ! | Load 0x1,0x21
0069 0322 | " | Declare_Variable Record
006a 00d8 | | Load_Top At_Offset_0
006b 1c00 | | Execute_Immediate Run_Utility,0x0
006c 00e1 | | Load_Encached Boolean_Cache
006d 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call
006f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0070 00c7 | | Action Elaborate_Subprogram
0071 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call
0073 e009 | | Load 0x0,0x9
0074 e223 | # | Load 0x1,0x23
0075 0095 | | Execute Package,Field_Reference_Dynamic
0076 00c6 | | Action Check_Subprogram_Elaborated
0077 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0078 0093 0000 | | push_full_address 0x0
007a 604d |`M | Indirect_Literal Discrete,0xc8,{0x80000000, 0x00030000}
007b 0273 | s | Execute Discrete,Plus
007c e004 | | Load 0x0,0x4
007d 0273 | s | Execute Discrete,Plus
007e e00a | | Load 0x0,0xa
007f 0273 | s | Execute Discrete,Plus
0080 4800 |H | Short_Literal 0x0
0081 0007 | | Action Break_Optional
0082 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call
0084 e00b | | Load 0x0,0xb
0085 e223 | # | Load 0x1,0x23
0086 0095 | | Execute Package,Field_Reference_Dynamic
0087 00c6 | | Action Check_Subprogram_Elaborated
0088 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0089 0093 0000 | | push_full_address 0x0
008b 6038 |`8 | Indirect_Literal Discrete,0xc4,{0x80000000, 0x00020000}
008c 0273 | s | Execute Discrete,Plus
008d e004 | | Load 0x0,0x4
008e 0273 | s | Execute Discrete,Plus
008f e00c | | Load 0x0,0xc
0090 0273 | s | Execute Discrete,Plus
0091 4800 |H | Short_Literal 0x0
0092 0007 | | Action Break_Optional
0093 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0094 00c7 | | Action Elaborate_Subprogram
0095 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0096 00c7 | | Action Elaborate_Subprogram
0097 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0098 00c7 | | Action Elaborate_Subprogram
0099 1d12 | | Execute_Immediate Reference_Lex_1,0x12
009a 00c7 | | Action Elaborate_Subprogram
009b 1d13 | | Execute_Immediate Reference_Lex_1,0x13
009c 00c7 | | Action Elaborate_Subprogram
009d 1d15 | | Execute_Immediate Reference_Lex_1,0x15
009e 00c7 | | Action Elaborate_Subprogram
009f 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00a0 00c7 | | Action Elaborate_Subprogram
00a1 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00a2 00c7 | | Action Elaborate_Subprogram
00a3 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00a4 00c7 | | Action Elaborate_Subprogram
00a5 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00a6 00c7 | | Action Elaborate_Subprogram
00a7 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00a8 00c7 | | Action Elaborate_Subprogram
00a9 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00aa 00c7 | | Action Elaborate_Subprogram
00ab 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00ac 00c7 | | Action Elaborate_Subprogram
00ad 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00ae 00c7 | | Action Elaborate_Subprogram
00af 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00b0 00c7 | | Action Elaborate_Subprogram
00b1 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00b2 00c7 | | Action Elaborate_Subprogram
00b3 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00b4 00c7 | | Action Elaborate_Subprogram
00b5 BODY_0008:
00b5 00bc | | Action Signal_Activated
00b6 00bb | | Action Signal_Completion
00b7 0000 | | .XXX[0x1]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb | | .CONST 0x00bb ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0001 | | .CONST 0x0001 ; Number of locals
00bb BODY_00b8:
00bb INIT_00b8:
00bb e00d | | Load 0x0,0xd
00bc e223 | # | Load 0x1,0x23
00bd 0096 | | Execute Package,Entry
00be 00db | | Load_Top At_Offset_3
00bf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00c0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00c1 0000 0000 | | .XXX[0x3]
00c3 0000 | |
00c4 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
00c8 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
00cc 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00d0 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
00d4 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
00d8 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00dc 0000 0000 | | .BLANK 0000[0x4]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e9 | | .CONST 0x00e9 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0003 | | .CONST 0x0003 ; Number of locals
00e3 INIT_00e0:
00e3 e221 | ! | Load 0x1,0x21
00e4 0322 | " | Declare_Variable Record
00e5 00d8 | | Load_Top At_Offset_0
00e6 1c00 | | Execute_Immediate Run_Utility,0x0
00e7 e003 | | Load 0x0,0x3
00e8 0322 | " | Declare_Variable Record
00e9 BODY_00e0:
00e9 00d8 | | Load_Top At_Offset_0
00ea 800e | | Call 0x0,0xe
00eb 00d1 | | Pop_Control Pop_Count_1
00ec 00d8 | | Load_Top At_Offset_0
00ed e5fe | | Load 0x2,-0x2
00ee 00d8 | | Load_Top At_Offset_0
00ef 8228 | ( | Call 0x1,0x28
00f0 00da | | Load_Top At_Offset_2
00f1 017d | } | Execute Record,Structure_Write
00f2 e5ff | | Load 0x2,-0x1
00f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00f4 00da | | Load_Top At_Offset_2
00f5 e00f | | Load 0x0,0xf
00f6 e223 | # | Load 0x1,0x23
00f7 0096 | | Execute Package,Entry
00f8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00f9 0000 0000 | | .BLANK 0000[0x7]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0106 | | .CONST 0x0106 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0003 | | .CONST 0x0003 ; Number of locals
0103 INIT_0100:
0103 e003 | | Load 0x0,0x3
0104 0322 | " | Declare_Variable Record
0105 00e1 | | Load_Encached Boolean_Cache
0106 BODY_0100:
0106 00d9 | | Load_Top At_Offset_1
0107 800e | | Call 0x0,0xe
0108 00d1 | | Pop_Control Pop_Count_1
0109 00d9 | | Load_Top At_Offset_1
010a e5fe | | Load 0x2,-0x2
010b e5ff | | Load 0x2,-0x1
010c 8215 | | Call 0x1,0x15
010d 00d1 | | Pop_Control Pop_Count_1
010e e5fd | | Load 0x2,-0x3
010f 00da | | Load_Top At_Offset_2
0110 8010 | | Call 0x0,0x10
0111 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0112 00d9 | | Load_Top At_Offset_1
0113 8011 | | Call 0x0,0x11
0114 00d1 | | Pop_Control Pop_Count_1
0115 00d8 | | Load_Top At_Offset_0
0116 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0117 0000 | | .XXX[0x1]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0123 | # | .CONST 0x0123 ; Address of begin
0119 013f | ? | .CONST 0x013f ; Address of exception handler
011a 0004 | | .CONST 0x0004 ; Number of locals
011b INIT_0118:
011b 00e1 | | Load_Encached Boolean_Cache
011c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
011d e221 | ! | Load 0x1,0x21
011e 0322 | " | Declare_Variable Record
011f 00d8 | | Load_Top At_Offset_0
0120 1c00 | | Execute_Immediate Run_Utility,0x0
0121 e003 | | Load 0x0,0x3
0122 0322 | " | Declare_Variable Record
0123 BODY_0118:
0123 00d8 | | Load_Top At_Offset_0
0124 800e | | Call 0x0,0xe
0125 00d1 | | Pop_Control Pop_Count_1
0126 00d8 | | Load_Top At_Offset_0
0127 e5fe | | Load 0x2,-0x2
0128 00d8 | | Load_Top At_Offset_0
0129 8228 | ( | Call 0x1,0x28
012a 00da | | Load_Top At_Offset_2
012b 017d | } | Execute Record,Structure_Write
012c 00d9 | | Load_Top At_Offset_1
012d 00e1 | | Load_Encached Boolean_Cache
012e e5ff | | Load 0x2,-0x1
012f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0130 e403 | | Load 0x2,0x3
0131 e012 | | Load 0x0,0x12
0132 e223 | # | Load 0x1,0x23
0133 0096 | | Execute Package,Entry
0134 c402 | | Store 0x2,0x2
0135 00d1 | | Pop_Control Pop_Count_1
0136 00da | | Load_Top At_Offset_2
0137 6805 |h | Jump_Zero 0x13d
0138 00d9 | | Load_Top At_Offset_1
0139 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
013a e002 | | Load 0x0,0x2
013b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
013c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
013d 00ea | | Load_Encached Null_String_Cache
013e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
013f TRAP_0118:
013f 0007 | | Action Break_Optional
0140 e20f | | Load 0x1,0xf
0141 0257 | W | Execute Discrete,Raise
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0153 | S | .CONST 0x0153 ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0003 | | .CONST 0x0003 ; Number of locals
014b INIT_0148:
014b e003 | | Load 0x0,0x3
014c 0322 | " | Declare_Variable Record
014d 4820 |H | Short_Literal 0x20
014e e002 | | Load 0x0,0x2
014f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0150 1c08 | | Execute_Immediate Run_Utility,0x8
0151 00d8 | | Load_Top At_Offset_0
0152 1c00 | | Execute_Immediate Run_Utility,0x0
0153 BODY_0148:
0153 00d8 | | Load_Top At_Offset_0
0154 e002 | | Load 0x0,0x2
0155 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0156 00d1 | | Pop_Control Pop_Count_1
0157 00d9 | | Load_Top At_Offset_1
0158 800e | | Call 0x0,0xe
0159 00d1 | | Pop_Control Pop_Count_1
015a 00d9 | | Load_Top At_Offset_1
015b e5fe | | Load 0x2,-0x2
015c e5ff | | Load 0x2,-0x1
015d 8215 | | Call 0x1,0x15
015e 00d1 | | Pop_Control Pop_Count_1
015f 00d8 | | Load_Top At_Offset_0
0160 e5fd | | Load 0x2,-0x3
0161 00db | | Load_Top At_Offset_3
0162 8013 | | Call 0x0,0x13
0163 e002 | | Load 0x0,0x2
0164 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0165 00d1 | | Pop_Control Pop_Count_1
0166 00d9 | | Load_Top At_Offset_1
0167 8011 | | Call 0x0,0x11
0168 00d1 | | Pop_Control Pop_Count_1
0169 00d8 | | Load_Top At_Offset_0
016a e002 | | Load 0x0,0x2
016b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
016c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
016d 0000 0000 | | .XXX[0x3]
016f 0000 | |
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 017b | { | .CONST 0x017b ; Address of begin
0171 0196 | | .CONST 0x0196 ; Address of exception handler
0172 0004 | | .CONST 0x0004 ; Number of locals
0173 INIT_0170:
0173 00e1 | | Load_Encached Boolean_Cache
0174 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0175 e221 | ! | Load 0x1,0x21
0176 0322 | " | Declare_Variable Record
0177 00d8 | | Load_Top At_Offset_0
0178 1c00 | | Execute_Immediate Run_Utility,0x0
0179 e003 | | Load 0x0,0x3
017a 0322 | " | Declare_Variable Record
017b BODY_0170:
017b 00d8 | | Load_Top At_Offset_0
017c 800e | | Call 0x0,0xe
017d 00d1 | | Pop_Control Pop_Count_1
017e 00d8 | | Load_Top At_Offset_0
017f e5fe | | Load 0x2,-0x2
0180 00d8 | | Load_Top At_Offset_0
0181 8228 | ( | Call 0x1,0x28
0182 00da | | Load_Top At_Offset_2
0183 017d | } | Execute Record,Structure_Write
0184 00d9 | | Load_Top At_Offset_1
0185 00e1 | | Load_Encached Boolean_Cache
0186 e5ff | | Load 0x2,-0x1
0187 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0188 e403 | | Load 0x2,0x3
0189 e012 | | Load 0x0,0x12
018a e223 | # | Load 0x1,0x23
018b 0096 | | Execute Package,Entry
018c c402 | | Store 0x2,0x2
018d 00d1 | | Pop_Control Pop_Count_1
018e 00da | | Load_Top At_Offset_2
018f 6805 |h | Jump_Zero 0x195
0190 e5fd | | Load 0x2,-0x3
0191 00da | | Load_Top At_Offset_2
0192 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0193 8014 | | Call 0x0,0x14
0194 00d1 | | Pop_Control Pop_Count_1
0195 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0196 TRAP_0170:
0196 0007 | | Action Break_Optional
0197 e20f | | Load 0x1,0xf
0198 0257 | W | Execute Discrete,Raise
0199 0000 0000 | | .BLANK 0000[0x7]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a9 | | .CONST 0x01a9 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0004 | | .CONST 0x0004 ; Number of locals
01a3 INIT_01a0:
01a3 e015 | | Load 0x0,0x15
01a4 0322 | " | Declare_Variable Record
01a5 00e2 | | Load_Encached Integer_Cache
01a6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01a7 e003 | | Load 0x0,0x3
01a8 0322 | " | Declare_Variable Record
01a9 BODY_01a0:
01a9 00d8 | | Load_Top At_Offset_0
01aa 800e | | Call 0x0,0xe
01ab 00d1 | | Pop_Control Pop_Count_1
01ac 00d8 | | Load_Top At_Offset_0
01ad e5fe | | Load 0x2,-0x2
01ae e5ff | | Load 0x2,-0x1
01af 8215 | | Call 0x1,0x15
01b0 00d1 | | Pop_Control Pop_Count_1
01b1 00da | | Load_Top At_Offset_2
01b2 00d9 | | Load_Top At_Offset_1
01b3 8016 | | Call 0x0,0x16
01b4 00d1 | | Pop_Control Pop_Count_1
01b5 00cf | | Action Mark_Auxiliary
01b6 780e |x | Jump 0x1c5
01b7 00da | | Load_Top At_Offset_2
01b8 e5fd | | Load 0x2,-0x3
01b9 027f | | Execute Discrete,Equal
01ba 6803 |h | Jump_Zero 0x1be
01bb 00db | | Load_Top At_Offset_3
01bc 8017 | | Call 0x0,0x17
01bd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01be 00da | | Load_Top At_Offset_2
01bf 0a01 | | Execute_Immediate Plus,0x1
01c0 005b | [ | Store_Top Discrete,At_Offset_3
01c1 00db | | Load_Top At_Offset_3
01c2 8018 | | Call 0x0,0x18
01c3 00d1 | | Pop_Control Pop_Count_1
01c4 00c9 | | Action Pop_Auxiliary_Loop
01c5 00db | | Load_Top At_Offset_3
01c6 8019 | | Call 0x0,0x19
01c7 6fef |o | Jump_Zero 0x1b7
01c8 00ce | | Action Pop_Auxiliary
01c9 00d8 | | Load_Top At_Offset_0
01ca 8011 | | Call 0x0,0x11
01cb 00d1 | | Pop_Control Pop_Count_1
01cc 0092 034a | J| Action Push_String_Extended,0x34a ; "Erreur sur affichage de variables enumeres"
01ce 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01cf 0000 | | .XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 4800 |H | Short_Literal 0x0
01d4 00db | | Load_Top At_Offset_3
01d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01d6 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
01d7 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
01d8 e00b | | Load 0x0,0xb
01d9 e223 | # | Load 0x1,0x23
01da 0096 | | Execute Package,Entry
01db 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01dc 0000 0000 | | .BLANK 0000[0x4]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 0092 034b | K| Action Push_String_Extended,0x34b ; "Number of Model:"
01e5 00db | | Load_Top At_Offset_3
01e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01e7 e01a | | Load 0x0,0x1a
01e8 e223 | # | Load 0x1,0x23
01e9 0096 | | Execute Package,Entry
01ea 00e0 | | Load_Encached Standard_Cache
01eb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ec 01cc | | Execute Vector,Catenate
01ed e01b | | Load 0x0,0x1b
01ee 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01ef 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01fb | | .CONST 0x01fb ; Address of begin
01f1 0215 | | .CONST 0x0215 ; Address of exception handler
01f2 0004 | | .CONST 0x0004 ; Number of locals
01f3 INIT_01f0:
01f3 00e1 | | Load_Encached Boolean_Cache
01f4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01f5 e221 | ! | Load 0x1,0x21
01f6 0322 | " | Declare_Variable Record
01f7 00d8 | | Load_Top At_Offset_0
01f8 1c00 | | Execute_Immediate Run_Utility,0x0
01f9 e003 | | Load 0x0,0x3
01fa 0322 | " | Declare_Variable Record
01fb BODY_01f0:
01fb 00d8 | | Load_Top At_Offset_0
01fc 800e | | Call 0x0,0xe
01fd 00d1 | | Pop_Control Pop_Count_1
01fe 00d8 | | Load_Top At_Offset_0
01ff e5fd | | Load 0x2,-0x3
0200 8014 | | Call 0x0,0x14
0201 00d1 | | Pop_Control Pop_Count_1
0202 00d9 | | Load_Top At_Offset_1
0203 00e1 | | Load_Encached Boolean_Cache
0204 e5fc | | Load 0x2,-0x4
0205 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0206 00db | | Load_Top At_Offset_3
0207 e5fe | | Load 0x2,-0x2
0208 e5ff | | Load 0x2,-0x1
0209 8228 | ( | Call 0x1,0x28
020a e01c | | Load 0x0,0x1c
020b e223 | # | Load 0x1,0x23
020c 0096 | | Execute Package,Entry
020d c402 | | Store 0x2,0x2
020e 00d1 | | Pop_Control Pop_Count_1
020f 00da | | Load_Top At_Offset_2
0210 6803 |h | Jump_Zero 0x214
0211 00d9 | | Load_Top At_Offset_1
0212 8229 | ) | Call 0x1,0x29
0213 00d1 | | Pop_Control Pop_Count_1
0214 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0215 TRAP_01f0:
0215 0007 | | Action Break_Optional
0216 e20d | | Load 0x1,0xd
0217 0257 | W | Execute Discrete,Raise
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2
021c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021d 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
021e 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
021f e009 | | Load 0x0,0x9
0220 e223 | # | Load 0x1,0x23
0221 0096 | | Execute Package,Entry
0222 00db | | Load_Top At_Offset_3
0223 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0224 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0225 0000 0000 | | .XXX[0x3]
0227 0000 | |
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 00da | | Load_Top At_Offset_2
022c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
022d e01d | | Load 0x0,0x1d
022e e223 | # | Load 0x1,0x23
022f 0096 | | Execute Package,Entry
0230 e5fe | | Load 0x2,-0x2
0231 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0232 4800 |H | Short_Literal 0x0
0233 a227 | ' | Store_Unchecked 0x1,0x27
0234 00db | | Load_Top At_Offset_3
0235 821c | | Call 0x1,0x1c
0236 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0237 0000 | | .XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b e227 | ' | Load 0x1,0x27
023c 7012 |p | Jump_Nonzero 0x24f
023d 00da | | Load_Top At_Offset_2
023e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
023f e01e | | Load 0x0,0x1e
0240 e223 | # | Load 0x1,0x23
0241 0096 | | Execute Package,Entry
0242 680a |h | Jump_Zero 0x24d
0243 e226 | & | Load 0x1,0x26
0244 00db | | Load_Top At_Offset_3
0245 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0246 e01f | | Load 0x0,0x1f
0247 e223 | # | Load 0x1,0x23
0248 0096 | | Execute Package,Entry
0249 e5ff | | Load 0x2,-0x1
024a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
024b 00d1 | | Pop_Control Pop_Count_1
024c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
024d e20e | | Load 0x1,0xe
024e 0257 | W | Execute Discrete,Raise
024f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253 | S | .CONST 0x0253 ; Address of begin
0251 0258 | X | .CONST 0x0258 ; Address of exception handler
0252 0001 | | .CONST 0x0001 ; Number of locals
0253 BODY_0250:
0253 INIT_0250:
0253 e226 | & | Load 0x1,0x26
0254 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0255 e002 | | Load 0x0,0x2
0256 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0257 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0258 TRAP_0250:
0258 0007 | | Action Break_Optional
0259 e20e | | Load 0x1,0xe
025a 0257 | W | Execute Discrete,Raise
025b 0000 0000 | | .BLANK 0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0268 | h | .CONST 0x0268 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 e226 | & | Load 0x1,0x26
0264 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0265 e002 | | Load 0x0,0x2
0266 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0267 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0268 TRAP_0260:
0268 0007 | | Action Break_Optional
0269 e20e | | Load 0x1,0xe
026a 0257 | W | Execute Discrete,Raise
026b 0000 0000 | | .BLANK 0000[0x5]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0278 | x | .CONST 0x0278 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 00db | | Load_Top At_Offset_3
0274 e226 | & | Load 0x1,0x26
0275 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0276 8014 | | Call 0x0,0x14
0277 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0278 TRAP_0270:
0278 0007 | | Action Break_Optional
0279 e20e | | Load 0x1,0xe
027a 0257 | W | Execute Discrete,Raise
027b 0000 0000 | | .BLANK 0000[0x5]
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 00e1 | | Load_Encached Boolean_Cache
0284 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0285 BODY_0280:
0285 00db | | Load_Top At_Offset_3
0286 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0287 e01e | | Load 0x0,0x1e
0288 e223 | # | Load 0x1,0x23
0289 0096 | | Execute Package,Entry
028a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
028b 00d8 | | Load_Top At_Offset_0
028c 6802 |h | Jump_Zero 0x28f
028d 4800 |H | Short_Literal 0x0
028e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
028f 00d8 | | Load_Top At_Offset_0
0290 0f00 | | Execute_Immediate Equal,0x0
0291 e227 | ' | Load 0x1,0x27
0292 0f00 | | Execute_Immediate Equal,0x0
0293 0279 | y | Execute Discrete,And
0294 6804 |h | Jump_Zero 0x299
0295 4801 |H | Short_Literal 0x1
0296 a227 | ' | Store_Unchecked 0x1,0x27
0297 4800 |H | Short_Literal 0x0
0298 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0299 00d8 | | Load_Top At_Offset_0
029a 0f00 | | Execute_Immediate Equal,0x0
029b e227 | ' | Load 0x1,0x27
029c 0279 | y | Execute Discrete,And
029d 6802 |h | Jump_Zero 0x2a0
029e 4801 |H | Short_Literal 0x1
029f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a0 0831 | 1 | Execute_Immediate Raise,0x31
02a1 0000 0000 | | .BLANK 0000[0x7]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ad | | .CONST 0x02ad ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0002 | | .CONST 0x0002 ; Number of locals
02ab INIT_02a8:
02ab 029f 0313 | | Declare_Subprogram INIT_0310,For_Call
02ad BODY_02a8:
02ad 8402 | | Call 0x2,0x2
02ae 0831 | 1 | Execute_Immediate Raise,0x31
02af 0000 | | .XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b7 | | .CONST 0x02b7 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0002 | | .CONST 0x0002 ; Number of locals
02b3 INIT_02b0:
02b3 e221 | ! | Load 0x1,0x21
02b4 0322 | " | Declare_Variable Record
02b5 00d8 | | Load_Top At_Offset_0
02b6 1c00 | | Execute_Immediate Run_Utility,0x0
02b7 BODY_02b0:
02b7 00d8 | | Load_Top At_Offset_0
02b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b9 e002 | | Load 0x0,0x2
02ba 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02bb 00d1 | | Pop_Control Pop_Count_1
02bc 00d8 | | Load_Top At_Offset_0
02bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02be e5ff | | Load 0x2,-0x1
02bf e002 | | Load 0x0,0x2
02c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02c1 00d1 | | Pop_Control Pop_Count_1
02c2 00d8 | | Load_Top At_Offset_0
02c3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02c4 e002 | | Load 0x0,0x2
02c5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02c6 00d1 | | Pop_Control Pop_Count_1
02c7 00d8 | | Load_Top At_Offset_0
02c8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02c9 e5fe | | Load 0x2,-0x2
02ca e002 | | Load 0x0,0x2
02cb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02cc 00d1 | | Pop_Control Pop_Count_1
02cd 00d8 | | Load_Top At_Offset_0
02ce 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02cf e5fd | | Load 0x2,-0x3
02d0 8020 | | Call 0x0,0x20
02d1 00d1 | | Pop_Control Pop_Count_1
02d2 00d8 | | Load_Top At_Offset_0
02d3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02d4 0000 0000 | | .BLANK 0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db 00da | | Load_Top At_Offset_2
02dc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02dd 8011 | | Call 0x0,0x11
02de 00d1 | | Pop_Control Pop_Count_1
02df 00da | | Load_Top At_Offset_2
02e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02e1 e002 | | Load 0x0,0x2
02e2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02e3 00d1 | | Pop_Control Pop_Count_1
02e4 00da | | Load_Top At_Offset_2
02e5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02e6 e002 | | Load 0x0,0x2
02e7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02e8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02e9 0000 0000 | | .BLANK 0000[0x7]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3 | | .CONST 0x02f3 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0001 | | .CONST 0x0001 ; Number of locals
02f3 BODY_02f0:
02f3 INIT_02f0:
02f3 0092 034c | L| Action Push_String_Extended,0x34c ; "........................................"
02f5 e01b | | Load 0x0,0x1b
02f6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
02f7 00da | | Load_Top At_Offset_2
02f8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02f9 e002 | | Load 0x0,0x2
02fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02fb 0092 034d | M| Action Push_String_Extended,0x34d ; " "
02fd 01cc | | Execute Vector,Catenate
02fe 00db | | Load_Top At_Offset_3
02ff 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0300 e002 | | Load 0x0,0x2
0301 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0302 01cc | | Execute Vector,Catenate
0303 0092 034e | N| Action Push_String_Extended,0x34e ; " With Fields: "
0305 01cc | | Execute Vector,Catenate
0306 e01b | | Load 0x0,0x1b
0307 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0308 00da | | Load_Top At_Offset_2
0309 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
030a 8021 | ! | Call 0x0,0x21
030b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
030c 0000 0000 | | .BLANK 0000[0x4]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313 | | .CONST 0x0313 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0001 | | .CONST 0x0001 ; Number of locals
0313 BODY_0310:
0313 INIT_0310:
0313 e5ff | | Load 0x2,-0x1
0314 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0315 e002 | | Load 0x0,0x2
0316 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0317 e5fe | | Load 0x2,-0x2
0318 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0319 e002 | | Load 0x0,0x2
031a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
031b 01c1 | | Execute Vector,Less
031c 6803 |h | Jump_Zero 0x320
031d 4fff |O | Short_Literal -0x1
031e 00cb | | Action Pop_Block_With_Result
031f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0320 e5ff | | Load 0x2,-0x1
0321 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0322 e002 | | Load 0x0,0x2
0323 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0324 e5fe | | Load 0x2,-0x2
0325 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0326 e002 | | Load 0x0,0x2
0327 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0328 01df | | Execute Vector,Equal
0329 6803 |h | Jump_Zero 0x32d
032a 4800 |H | Short_Literal 0x0
032b 00cb | | Action Pop_Block_With_Result
032c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
032d 4801 |H | Short_Literal 0x1
032e 00cb | | Action Pop_Block_With_Result
032f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 4601 |F | Jump_Case 0x2
0334 7801 |x | Jump 0x336 ; case 0x0
0335 780d |x | Jump 0x343 ; case 0x1
0336 00da | | Load_Top At_Offset_2
0337 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0338 0125 | % | Execute Any,Set_Constraint
0339 00da | | Load_Top At_Offset_2
033a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
033b 1c00 | | Execute_Immediate Run_Utility,0x0
033c 00da | | Load_Top At_Offset_2
033d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
033e 0125 | % | Execute Any,Set_Constraint
033f 00da | | Load_Top At_Offset_2
0340 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0341 1c00 | | Execute_Immediate Run_Utility,0x0
0342 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0343 00da | | Load_Top At_Offset_2
0344 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0345 0125 | % | Execute Any,Set_Constraint
0346 00da | | Load_Top At_Offset_2
0347 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0348 0125 | % | Execute Any,Set_Constraint
0349 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
034a ; --------------------------------------------------------------------------------------
034a ; STRING TABLE
034a ; --------------------------------------------------------------------------------------
034a 000c | | .STRTAB 0x000c->0x0350 ; "Erreur sur affichage de variables enumeres"
034b 0034 | 4 | .STRTAB 0x0034->0x0365 ; "Number of Model:"
034c 0042 | B | .STRTAB 0x0042->0x036d ; "........................................"
034d 0068 | h | .STRTAB 0x0068->0x0381 ; " "
034e 0067 | g | .STRTAB 0x0067->0x0381 ; " With Fields: "
034f 0073 | s | .STREND 0x0073->0x0388
0350 4572 7265 |Erre| .STRTAB_STRINGS
0389 0000 0000 | | .BLANK 0000[0x7]
0390 ; --------------------------------------------------------------------------------------
0390 ; Debug Table
0390 ; --------------------------------------------------------------------------------------
0390 0004 0008 | | .DEBUG4 0x0004,0x0008,0xd066,0x0000,0x0001,0x0019
0396 000b 03fa | | .DBG4T 0x000b,0x03fa,0x8000,0x8000
039a 0068 042e | h .| .DBG4T 0x0068,0x042e,0x8000,0x8000
039e 00bb 0462 | b| .DBG4T 0x00bb,0x0462,0x0001,0x0000
03a2 00e3 0465 | e| .DBG4T 0x00e3,0x0465,0x0002,0x0000
03a6 0103 046c | l| .DBG4T 0x0103,0x046c,0x0002,0x0000
03aa 011b 0475 | u| .DBG4T 0x011b,0x0475,0x0002,0x0000
03ae 014b 0481 | K | .DBG4T 0x014b,0x0481,0x0002,0x0000
03b2 0173 048b | s | .DBG4T 0x0173,0x048b,0x0001,0x0000
03b6 01a3 0496 | | .DBG4T 0x01a3,0x0496,0x0002,0x4000
03ba 01d3 04af | | .DBG4T 0x01d3,0x04af,0x0001,0x0000
03be 01e3 04b2 | | .DBG4T 0x01e3,0x04b2,0x0001,0x0000
03c2 01f3 04b5 | | .DBG4T 0x01f3,0x04b5,0x0001,0x0000
03c6 021b 04c0 | | .DBG4T 0x021b,0x04c0,0x0001,0x0000
03ca 022b 04c3 | + | .DBG4T 0x022b,0x04c3,0x0001,0x0000
03ce 023b 04c8 | ; | .DBG4T 0x023b,0x04c8,0x0001,0x0000
03d2 0253 04ce | S | .DBG4T 0x0253,0x04ce,0x0002,0x0000
03d6 0263 04d2 | c | .DBG4T 0x0263,0x04d2,0x0002,0x0000
03da 0273 04d6 | s | .DBG4T 0x0273,0x04d6,0x0001,0x0000
03de 0283 04da | | .DBG4T 0x0283,0x04da,0x0002,0x0000
03e2 02ab 04e5 | | .DBG4T 0x02ab,0x04e5,0x0002,0x0000
03e6 02b3 04e8 | | .DBG4T 0x02b3,0x04e8,0x0002,0x0000
03ea 02db 04f1 | | .DBG4T 0x02db,0x04f1,0x0001,0x0000
03ee 02f3 04f6 | | .DBG4T 0x02f3,0x04f6,0x0001,0x0000
03f2 0313 04fb | | .DBG4T 0x0313,0x04fb,0x0004,0x0000
03f6 0333 0000 | 3 | .DBG4T 0x0333,0x0000,0x0005,0x0000
03fa ; --------------------------------------------------------------------------------------
03fa ; Debug chain
03fa ; --------------------------------------------------------------------------------------
03fa 0019 0000 | | .DBGLEN 0x0019,0x0000
03fc 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0015,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x004b,0x004d,0x005b,0x0061
0415 0001 0002 | | .XXX[0x19]
0417 0003 0007 | |
0419 0008 0009 | |
041b 000a 000b | |
041d 000c 000d | |
041f 000e 000f | |
0421 0010 0011 | |
0423 0012 0013 | |
0425 0014 0015 | |
0427 0016 0017 | |
0429 0018 0019 | |
042b 001a 001b | |
042d 001c | |
042e ; --------------------------------------------------------------------------------------
042e ; Debug chain
042e ; --------------------------------------------------------------------------------------
042e 0019 0000 | | .DBGLEN 0x0019,0x0000
0430 0068 006c | h l| .DBGLNO 0x0068,0x006c,0x006d,0x006f,0x0071,0x0073,0x0082,0x0084,0x0093,0x0095,0x0097,0x0099,0x009b,0x009d,0x009f,0x00a1,0x00a3,0x00a5,0x00a7,0x00a9,0x00ab,0x00ad,0x00af,0x00b1,0x00b3
0449 0004 0005 | | .XXX[0x19]
044b 0006 0007 | |
044d 0008 0009 | |
044f 000a 000b | |
0451 000c 000d | |
0453 000e 000f | |
0455 0010 0011 | |
0457 0012 0013 | |
0459 0014 0015 | |
045b 0016 0017 | |
045d 0018 0019 | |
045f 001a 001b | |
0461 001c | |
0462 ; --------------------------------------------------------------------------------------
0462 ; Debug chain
0462 ; --------------------------------------------------------------------------------------
0462 0000 0001 | | .DBGLEN 0x0000,0x0001
0464 00bb | | .DBGLNO 0x00bb
0465 ; --------------------------------------------------------------------------------------
0465 ; Debug chain
0465 ; --------------------------------------------------------------------------------------
0465 0002 0003 | | .DBGLEN 0x0002,0x0003
0467 00e3 00e7 | | .DBGLNO 0x00e3,0x00e7,0x00e9,0x00ec,0x00f2
046c ; --------------------------------------------------------------------------------------
046c ; Debug chain
046c ; --------------------------------------------------------------------------------------
046c 0002 0005 | | .DBGLEN 0x0002,0x0005
046e 0103 0105 | | .DBGLNO 0x0103,0x0105,0x0106,0x0109,0x010e,0x0112,0x0115
0475 ; --------------------------------------------------------------------------------------
0475 ; Debug chain
0475 ; --------------------------------------------------------------------------------------
0475 0003 0007 | | .DBGLEN 0x0003,0x0007
0477 011b 011d | | .DBGLNO 0x011b,0x011d,0x0121,0x0123,0x0126,0x012c,0x0136,0x0138,0x013d,0x0140
0481 ; --------------------------------------------------------------------------------------
0481 ; Debug chain
0481 ; --------------------------------------------------------------------------------------
0481 0002 0006 | | .DBGLEN 0x0002,0x0006
0483 014b 014d | K M| .DBGLNO 0x014b,0x014d,0x0153,0x0157,0x015a,0x015f,0x0166,0x0169
048b ; --------------------------------------------------------------------------------------
048b ; Debug chain
048b ; --------------------------------------------------------------------------------------
048b 0003 0006 | | .DBGLEN 0x0003,0x0006
048d 0173 0175 | s u| .DBGLNO 0x0173,0x0175,0x0179,0x017b,0x017e,0x0184,0x018e,0x0190,0x0197
0496 ; --------------------------------------------------------------------------------------
0496 ; Debug chain
0496 ; --------------------------------------------------------------------------------------
0496 0003 000a | | .DBGLEN 0x0003,0x000a
0498 01a3 01a5 | | .DBGLNO 0x01a3,0x01a5,0x01a7,0x01a9,0x01ac,0x01b1,0x01b7,0x01bb,0x01be,0x01c1,0x01c5,0x01c9,0x01cc
04a5 0001 0002 | | .XXX[0xa]
04a7 0003 0005 | |
04a9 0006 0007 | |
04ab 0008 0004 | |
04ad 0009 000a | |
04af ; --------------------------------------------------------------------------------------
04af ; Debug chain
04af ; --------------------------------------------------------------------------------------
04af 0000 0001 | | .DBGLEN 0x0000,0x0001
04b1 01d3 | | .DBGLNO 0x01d3
04b2 ; --------------------------------------------------------------------------------------
04b2 ; Debug chain
04b2 ; --------------------------------------------------------------------------------------
04b2 0000 0001 | | .DBGLEN 0x0000,0x0001
04b4 01e3 | | .DBGLNO 0x01e3
04b5 ; --------------------------------------------------------------------------------------
04b5 ; Debug chain
04b5 ; --------------------------------------------------------------------------------------
04b5 0003 0006 | | .DBGLEN 0x0003,0x0006
04b7 01f3 01f5 | | .DBGLNO 0x01f3,0x01f5,0x01f9,0x01fb,0x01fe,0x0202,0x020f,0x0211,0x0216
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug chain
04c0 ; --------------------------------------------------------------------------------------
04c0 0000 0001 | | .DBGLEN 0x0000,0x0001
04c2 021b | | .DBGLNO 0x021b
04c3 ; --------------------------------------------------------------------------------------
04c3 ; Debug chain
04c3 ; --------------------------------------------------------------------------------------
04c3 0000 0003 | | .DBGLEN 0x0000,0x0003
04c5 022b 0232 | + 2| .DBGLNO 0x022b,0x0232,0x0234
04c8 ; --------------------------------------------------------------------------------------
04c8 ; Debug chain
04c8 ; --------------------------------------------------------------------------------------
04c8 0000 0004 | | .DBGLEN 0x0000,0x0004
04ca 023b 023d | ; =| .DBGLNO 0x023b,0x023d,0x0243,0x024d
04ce ; --------------------------------------------------------------------------------------
04ce ; Debug chain
04ce ; --------------------------------------------------------------------------------------
04ce 0000 0002 | | .DBGLEN 0x0000,0x0002
04d0 0253 0259 | S Y| .DBGLNO 0x0253,0x0259
04d2 ; --------------------------------------------------------------------------------------
04d2 ; Debug chain
04d2 ; --------------------------------------------------------------------------------------
04d2 0000 0002 | | .DBGLEN 0x0000,0x0002
04d4 0263 0269 | c i| .DBGLNO 0x0263,0x0269
04d6 ; --------------------------------------------------------------------------------------
04d6 ; Debug chain
04d6 ; --------------------------------------------------------------------------------------
04d6 0000 0002 | | .DBGLEN 0x0000,0x0002
04d8 0273 0279 | s y| .DBGLNO 0x0273,0x0279
04da ; --------------------------------------------------------------------------------------
04da ; Debug chain
04da ; --------------------------------------------------------------------------------------
04da 0001 0008 | | .DBGLEN 0x0001,0x0008
04dc 0283 0285 | | .DBGLNO 0x0283,0x0285,0x028b,0x028d,0x028f,0x0295,0x0297,0x0299,0x029e
04e5 ; --------------------------------------------------------------------------------------
04e5 ; Debug chain
04e5 ; --------------------------------------------------------------------------------------
04e5 0000 0001 | | .DBGLEN 0x0000,0x0001
04e7 02ad | | .DBGLNO 0x02ad
04e8 ; --------------------------------------------------------------------------------------
04e8 ; Debug chain
04e8 ; --------------------------------------------------------------------------------------
04e8 0001 0006 | | .DBGLEN 0x0001,0x0006
04ea 02b3 02b7 | | .DBGLNO 0x02b3,0x02b7,0x02bc,0x02c2,0x02c7,0x02cd,0x02d2
04f1 ; --------------------------------------------------------------------------------------
04f1 ; Debug chain
04f1 ; --------------------------------------------------------------------------------------
04f1 0000 0003 | | .DBGLEN 0x0000,0x0003
04f3 02db 02df | | .DBGLNO 0x02db,0x02df,0x02e4
04f6 ; --------------------------------------------------------------------------------------
04f6 ; Debug chain
04f6 ; --------------------------------------------------------------------------------------
04f6 0000 0003 | | .DBGLEN 0x0000,0x0003
04f8 02f3 02f7 | | .DBGLNO 0x02f3,0x02f7,0x0308
04fb ; --------------------------------------------------------------------------------------
04fb ; Debug chain
04fb ; --------------------------------------------------------------------------------------
04fb 0000 0005 | | .DBGLEN 0x0000,0x0005
04fd 0313 031d | | .DBGLNO 0x0313,0x031d,0x0320,0x032a,0x032d
0502 0000 0000 | | .BLANK 0000[0xfe]