|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0eacf9
└─⟦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 03c0 | | .CONST 0x03c0 ; 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 009a | | .CONST 0x009a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0029 | ) | .CONST 0x0029 ; Number of locals
000b INIT_0008:
000b 0093 0000 | | PushFullAddress InMicrocode
000d 60a6 |` | Indirect_Literal Discrete,0xb4,{0x80000000, 0x00010000}
000e 0273 | s | Execute Discrete,Plus
000f 0129 | ) | Execute Any,Make_Visible
0010 4800 |H | Short_Literal 0x0
0011 483f |H? | Short_Literal 0x3f
0012 e002 | | Load 0x0,0x2
0013 03f9 | | Declare_Type Discrete,Constrained,Visible
0014 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0
0016 029a 00bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b8
0018 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0
001a 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8
001c 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100
001e 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118
0020 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138
0022 029a 015b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0158
0024 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178
0026 029a 0193 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0190
0028 029a 01cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c8
002a 029a 01e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e0
002c 029a 0223 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0220
002e 029a 025b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0258
0030 029a 029b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0298
0032 029a 02db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02d8
0034 029a 02f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02f0
0036 029a 032b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0328
0038 029a 0343 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0340
003a 029a 037b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0378
003c 029a 038b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0388
003e 029a 0393 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0390
0040 e20e | | Load 0x1,0xe
0041 02a0 | | Declare_Subprogram Null_Subprogram
0042 4801 |H | Short_Literal 0x1
0043 032e | . | Declare_Type Record,Defined,Visible
0044 00bf | | Action Accept_Activation
0045 0093 0000 | | PushFullAddress InMicrocode
0047 6068 |`h | Indirect_Literal Discrete,0xb0,{0x80000000, 0x00030000}
0048 0273 | s | Execute Discrete,Plus
0049 e003 | | Load 0x0,0x3
004a 0273 | s | Execute Discrete,Plus
004b e004 | | Load 0x0,0x4
004c 0273 | s | Execute Discrete,Plus
004d 4801 |H | Short_Literal 0x1
004e e005 | | Load 0x0,0x5
004f 0387 | | Declare_Variable Package
0050 00d8 | | Load_Top At_Offset_0
0051 020f | | Execute Module,Activate
0052 0093 0000 | | PushFullAddress InMicrocode
0054 6057 |`W | Indirect_Literal Discrete,0xac,{0x80000000, 0x00020000}
0055 0273 | s | Execute Discrete,Plus
0056 e003 | | Load 0x0,0x3
0057 0273 | s | Execute Discrete,Plus
0058 e006 | | Load 0x0,0x6
0059 0273 | s | Execute Discrete,Plus
005a 4802 |H | Short_Literal 0x2
005b e005 | | Load 0x0,0x5
005c 0387 | | Declare_Variable Package
005d 00d8 | | Load_Top At_Offset_0
005e 020f | | Execute Module,Activate
005f 0093 0000 | | PushFullAddress InMicrocode
0061 6046 |`F | Indirect_Literal Discrete,0xa8,{0x80000000, 0x00010000}
0062 0273 | s | Execute Discrete,Plus
0063 e003 | | Load 0x0,0x3
0064 0273 | s | Execute Discrete,Plus
0065 e007 | | Load 0x0,0x7
0066 0273 | s | Execute Discrete,Plus
0067 4800 |H | Short_Literal 0x0
0068 e005 | | Load 0x0,0x5
0069 0387 | | Declare_Variable Package
006a 00d8 | | Load_Top At_Offset_0
006b 020f | | Execute Module,Activate
006c 029d 03a3 | | Declare_Subprogram For_Outer_Call,INIT_03a0
006e 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
006f 00c7 | | Action Elaborate_Subprogram
0070 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0071 00c7 | | Action Elaborate_Subprogram
0072 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0073 00c7 | | Action Elaborate_Subprogram
0074 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0075 00c7 | | Action Elaborate_Subprogram
0076 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0077 00c7 | | Action Elaborate_Subprogram
0078 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0079 00c7 | | Action Elaborate_Subprogram
007a 1d16 | | Execute_Immediate Reference_Lex_1,0x16
007b 00c7 | | Action Elaborate_Subprogram
007c 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
007d 00c7 | | Action Elaborate_Subprogram
007e 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
007f 00c7 | | Action Elaborate_Subprogram
0080 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0081 00c7 | | Action Elaborate_Subprogram
0082 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0083 00c7 | | Action Elaborate_Subprogram
0084 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0085 00c7 | | Action Elaborate_Subprogram
0086 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0087 00c7 | | Action Elaborate_Subprogram
0088 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0089 00c7 | | Action Elaborate_Subprogram
008a 1d20 | | Execute_Immediate Reference_Lex_1,0x20
008b 00c7 | | Action Elaborate_Subprogram
008c 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
008d 00c7 | | Action Elaborate_Subprogram
008e 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
008f 00c7 | | Action Elaborate_Subprogram
0090 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0091 00c7 | | Action Elaborate_Subprogram
0092 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0093 00c7 | | Action Elaborate_Subprogram
0094 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0095 00c7 | | Action Elaborate_Subprogram
0096 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0097 00c7 | | Action Elaborate_Subprogram
0098 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0099 00c7 | | Action Elaborate_Subprogram
009a BODY_0008:
009a 00bc | | Action Signal_Activated
009b 00bb | | Action Signal_Completion
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 e008 | | Load 0x0,0x8
00a4 e228 | ( | Load 0x1,0x28
00a5 0096 | | Execute Package,Field_Execute_Dynamic
00a6 4501 |E | Exit_Subprogram 0x1
00a7 0000 | | .XXX[0x1]
00a8 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00ac 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
00b0 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
00b4 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c1 | | .CONST 0x00c1 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0002 | | .CONST 0x0002 ; Number of locals
00bb INIT_00b8:
00bb e009 | | Load 0x0,0x9
00bc e228 | ( | Load 0x1,0x28
00bd 0098 | | Execute Package,Field_Read_Dynamic
00be 02ff | | Declare_Variable Variant_Record
00bf 00d8 | | Load_Top At_Offset_0
00c0 1c00 | | Execute_Immediate Run_Utility,0x0
00c1 BODY_00b8:
00c1 00d8 | | Load_Top At_Offset_0
00c2 e00a | | Load 0x0,0xa
00c3 482c |H, | Short_Literal 0x2c
00c4 e5ff | | Load 0x2,-0x1
00c5 8223 | # | Call 0x1,0x23
00c6 e00b | | Load 0x0,0xb
00c7 e228 | ( | Load 0x1,0x28
00c8 0096 | | Execute Package,Field_Execute_Dynamic
00c9 00d1 | | Pop_Control Pop_Count_1
00ca 00d8 | | Load_Top At_Offset_0
00cb e00c | | Load 0x0,0xc
00cc e228 | ( | Load 0x1,0x28
00cd 0096 | | Execute Package,Field_Execute_Dynamic
00ce 4502 |E | Exit_Subprogram 0x2
00cf 0000 | | .XXX[0x1]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d9 | | .CONST 0x00d9 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0002 | | .CONST 0x0002 ; Number of locals
00d3 INIT_00d0:
00d3 e009 | | Load 0x0,0x9
00d4 e228 | ( | Load 0x1,0x28
00d5 0098 | | Execute Package,Field_Read_Dynamic
00d6 02ff | | Declare_Variable Variant_Record
00d7 00d8 | | Load_Top At_Offset_0
00d8 1c00 | | Execute_Immediate Run_Utility,0x0
00d9 BODY_00d0:
00d9 00d8 | | Load_Top At_Offset_0
00da e00a | | Load 0x0,0xa
00db 482b |H+ | Short_Literal 0x2b
00dc e5ff | | Load 0x2,-0x1
00dd 8223 | # | Call 0x1,0x23
00de e00b | | Load 0x0,0xb
00df e228 | ( | Load 0x1,0x28
00e0 0096 | | Execute Package,Field_Execute_Dynamic
00e1 00d1 | | Pop_Control Pop_Count_1
00e2 00d8 | | Load_Top At_Offset_0
00e3 e00c | | Load 0x0,0xc
00e4 e228 | ( | Load 0x1,0x28
00e5 0096 | | Execute Package,Field_Execute_Dynamic
00e6 4502 |E | Exit_Subprogram 0x2
00e7 0000 | | .XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f1 | | .CONST 0x00f1 ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0002 | | .CONST 0x0002 ; Number of locals
00eb INIT_00e8:
00eb e009 | | Load 0x0,0x9
00ec e228 | ( | Load 0x1,0x28
00ed 0098 | | Execute Package,Field_Read_Dynamic
00ee 02ff | | Declare_Variable Variant_Record
00ef 00d8 | | Load_Top At_Offset_0
00f0 1c00 | | Execute_Immediate Run_Utility,0x0
00f1 BODY_00e8:
00f1 00d8 | | Load_Top At_Offset_0
00f2 e00a | | Load 0x0,0xa
00f3 482a |H* | Short_Literal 0x2a
00f4 e5ff | | Load 0x2,-0x1
00f5 8223 | # | Call 0x1,0x23
00f6 e00b | | Load 0x0,0xb
00f7 e228 | ( | Load 0x1,0x28
00f8 0096 | | Execute Package,Field_Execute_Dynamic
00f9 00d1 | | Pop_Control Pop_Count_1
00fa 00d8 | | Load_Top At_Offset_0
00fb e00c | | Load 0x0,0xc
00fc e228 | ( | Load 0x1,0x28
00fd 0096 | | Execute Package,Field_Execute_Dynamic
00fe 4502 |E | Exit_Subprogram 0x2
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0109 | | .CONST 0x0109 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 e009 | | Load 0x0,0x9
0104 e228 | ( | Load 0x1,0x28
0105 0098 | | Execute Package,Field_Read_Dynamic
0106 02ff | | Declare_Variable Variant_Record
0107 00d8 | | Load_Top At_Offset_0
0108 1c00 | | Execute_Immediate Run_Utility,0x0
0109 BODY_0100:
0109 00d8 | | Load_Top At_Offset_0
010a e5fe | | Load 0x2,-0x2
010b 800d | | Call 0x0,0xd
010c 4823 |H# | Short_Literal 0x23
010d e5ff | | Load 0x2,-0x1
010e 8223 | # | Call 0x1,0x23
010f e00b | | Load 0x0,0xb
0110 e228 | ( | Load 0x1,0x28
0111 0096 | | Execute Package,Field_Execute_Dynamic
0112 00d1 | | Pop_Control Pop_Count_1
0113 00d8 | | Load_Top At_Offset_0
0114 e00c | | Load 0x0,0xc
0115 e228 | ( | Load 0x1,0x28
0116 0096 | | Execute Package,Field_Execute_Dynamic
0117 4503 |E | Exit_Subprogram 0x3
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0121 | ! | .CONST 0x0121 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b e009 | | Load 0x0,0x9
011c e228 | ( | Load 0x1,0x28
011d 0098 | | Execute Package,Field_Read_Dynamic
011e 02ff | | Declare_Variable Variant_Record
011f 00d8 | | Load_Top At_Offset_0
0120 1c00 | | Execute_Immediate Run_Utility,0x0
0121 BODY_0118:
0121 00d8 | | Load_Top At_Offset_0
0122 4800 |H | Short_Literal 0x0
0123 e5fd | | Load 0x2,-0x3
0124 e5fe | | Load 0x2,-0x2
0125 800e | | Call 0x0,0xe
0126 4810 |H | Short_Literal 0x10
0127 e5ff | | Load 0x2,-0x1
0128 8223 | # | Call 0x1,0x23
0129 e00b | | Load 0x0,0xb
012a e228 | ( | Load 0x1,0x28
012b 0096 | | Execute Package,Field_Execute_Dynamic
012c 00d1 | | Pop_Control Pop_Count_1
012d 00d8 | | Load_Top At_Offset_0
012e e00c | | Load 0x0,0xc
012f e228 | ( | Load 0x1,0x28
0130 0096 | | Execute Package,Field_Execute_Dynamic
0131 4504 |E | Exit_Subprogram 0x4
0132 0000 0000 | | .BLANK 0000[0x6]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0141 | A | .CONST 0x0141 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e009 | | Load 0x0,0x9
013c e228 | ( | Load 0x1,0x28
013d 0098 | | Execute Package,Field_Read_Dynamic
013e 02ff | | Declare_Variable Variant_Record
013f 00d8 | | Load_Top At_Offset_0
0140 1c00 | | Execute_Immediate Run_Utility,0x0
0141 BODY_0138:
0141 00d8 | | Load_Top At_Offset_0
0142 e5fc | | Load 0x2,-0x4
0143 e5fd | | Load 0x2,-0x3
0144 e5fe | | Load 0x2,-0x2
0145 800f | | Call 0x0,0xf
0146 4811 |H | Short_Literal 0x11
0147 e5ff | | Load 0x2,-0x1
0148 8223 | # | Call 0x1,0x23
0149 e00b | | Load 0x0,0xb
014a e228 | ( | Load 0x1,0x28
014b 0096 | | Execute Package,Field_Execute_Dynamic
014c 00d1 | | Pop_Control Pop_Count_1
014d 00d8 | | Load_Top At_Offset_0
014e e00c | | Load 0x0,0xc
014f e228 | ( | Load 0x1,0x28
0150 0096 | | Execute Package,Field_Execute_Dynamic
0151 4505 |E | Exit_Subprogram 0x5
0152 0000 0000 | | .BLANK 0000[0x6]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0161 | a | .CONST 0x0161 ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0002 | | .CONST 0x0002 ; Number of locals
015b INIT_0158:
015b e009 | | Load 0x0,0x9
015c e228 | ( | Load 0x1,0x28
015d 0098 | | Execute Package,Field_Read_Dynamic
015e 02ff | | Declare_Variable Variant_Record
015f 00d8 | | Load_Top At_Offset_0
0160 1c00 | | Execute_Immediate Run_Utility,0x0
0161 BODY_0158:
0161 00d8 | | Load_Top At_Offset_0
0162 e5fd | | Load 0x2,-0x3
0163 e5fe | | Load 0x2,-0x2
0164 8010 | | Call 0x0,0x10
0165 4813 |H | Short_Literal 0x13
0166 e5ff | | Load 0x2,-0x1
0167 8223 | # | Call 0x1,0x23
0168 e00b | | Load 0x0,0xb
0169 e228 | ( | Load 0x1,0x28
016a 0096 | | Execute Package,Field_Execute_Dynamic
016b 00d1 | | Pop_Control Pop_Count_1
016c 00d8 | | Load_Top At_Offset_0
016d e00c | | Load 0x0,0xc
016e e228 | ( | Load 0x1,0x28
016f 0096 | | Execute Package,Field_Execute_Dynamic
0170 4504 |E | Exit_Subprogram 0x4
0171 0000 0000 | | .BLANK 0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0181 | | .CONST 0x0181 ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e009 | | Load 0x0,0x9
017c e228 | ( | Load 0x1,0x28
017d 0098 | | Execute Package,Field_Read_Dynamic
017e 02ff | | Declare_Variable Variant_Record
017f 00d8 | | Load_Top At_Offset_0
0180 1c00 | | Execute_Immediate Run_Utility,0x0
0181 BODY_0178:
0181 00d8 | | Load_Top At_Offset_0
0182 e5fe | | Load 0x2,-0x2
0183 8011 | | Call 0x0,0x11
0184 4812 |H | Short_Literal 0x12
0185 e5ff | | Load 0x2,-0x1
0186 8223 | # | Call 0x1,0x23
0187 e00b | | Load 0x0,0xb
0188 e228 | ( | Load 0x1,0x28
0189 0096 | | Execute Package,Field_Execute_Dynamic
018a 00d1 | | Pop_Control Pop_Count_1
018b 00d8 | | Load_Top At_Offset_0
018c e00c | | Load 0x0,0xc
018d e228 | ( | Load 0x1,0x28
018e 0096 | | Execute Package,Field_Execute_Dynamic
018f 4503 |E | Exit_Subprogram 0x3
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 019f | | .CONST 0x019f ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0003 | | .CONST 0x0003 ; Number of locals
0193 INIT_0190:
0193 e009 | | Load 0x0,0x9
0194 e226 | & | Load 0x1,0x26
0195 0098 | | Execute Package,Field_Read_Dynamic
0196 02ff | | Declare_Variable Variant_Record
0197 00d8 | | Load_Top At_Offset_0
0198 1c00 | | Execute_Immediate Run_Utility,0x0
0199 e009 | | Load 0x0,0x9
019a e227 | ' | Load 0x1,0x27
019b 0098 | | Execute Package,Field_Read_Dynamic
019c 02ff | | Declare_Variable Variant_Record
019d 00d8 | | Load_Top At_Offset_0
019e 1c00 | | Execute_Immediate Run_Utility,0x0
019f BODY_0190:
019f 00d9 | | Load_Top At_Offset_1
01a0 e00a | | Load 0x0,0xa
01a1 4824 |H$ | Short_Literal 0x24
01a2 e5ff | | Load 0x2,-0x1
01a3 8223 | # | Call 0x1,0x23
01a4 e00b | | Load 0x0,0xb
01a5 e226 | & | Load 0x1,0x26
01a6 0096 | | Execute Package,Field_Execute_Dynamic
01a7 00d1 | | Pop_Control Pop_Count_1
01a8 00d9 | | Load_Top At_Offset_1
01a9 e00c | | Load 0x0,0xc
01aa e226 | & | Load 0x1,0x26
01ab 0096 | | Execute Package,Field_Execute_Dynamic
01ac 00d8 | | Load_Top At_Offset_0
01ad e012 | | Load 0x0,0x12
01ae e227 | ' | Load 0x1,0x27
01af 0096 | | Execute Package,Field_Execute_Dynamic
01b0 00d1 | | Pop_Control Pop_Count_1
01b1 00d8 | | Load_Top At_Offset_0
01b2 00da | | Load_Top At_Offset_2
01b3 8229 | ) | Call 0x1,0x29
01b4 00d8 | | Load_Top At_Offset_0
01b5 e013 | | Load 0x0,0x13
01b6 e227 | ' | Load 0x1,0x27
01b7 0096 | | Execute Package,Field_Execute_Dynamic
01b8 0227 | ' | Execute Access,All_Reference
01b9 8014 | | Call 0x0,0x14
01ba e5fe | | Load 0x2,-0x2
01bb 017d | } | Execute Record,Structure_Write
01bc 00d9 | | Load_Top At_Offset_1
01bd e015 | | Load 0x0,0x15
01be e226 | & | Load 0x1,0x26
01bf 0096 | | Execute Package,Field_Execute_Dynamic
01c0 00d1 | | Pop_Control Pop_Count_1
01c1 00d8 | | Load_Top At_Offset_0
01c2 e015 | | Load 0x0,0x15
01c3 e227 | ' | Load 0x1,0x27
01c4 0096 | | Execute Package,Field_Execute_Dynamic
01c5 4502 |E | Exit_Subprogram 0x2
01c6 0000 0000 | | .XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d1 | | .CONST 0x01d1 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb e009 | | Load 0x0,0x9
01cc e228 | ( | Load 0x1,0x28
01cd 0098 | | Execute Package,Field_Read_Dynamic
01ce 02ff | | Declare_Variable Variant_Record
01cf 00d8 | | Load_Top At_Offset_0
01d0 1c00 | | Execute_Immediate Run_Utility,0x0
01d1 BODY_01c8:
01d1 00d8 | | Load_Top At_Offset_0
01d2 e5fe | | Load 0x2,-0x2
01d3 8016 | | Call 0x0,0x16
01d4 4822 |H" | Short_Literal 0x22
01d5 e5ff | | Load 0x2,-0x1
01d6 8223 | # | Call 0x1,0x23
01d7 e00b | | Load 0x0,0xb
01d8 e228 | ( | Load 0x1,0x28
01d9 0096 | | Execute Package,Field_Execute_Dynamic
01da 00d1 | | Pop_Control Pop_Count_1
01db 00d8 | | Load_Top At_Offset_0
01dc e00c | | Load 0x0,0xc
01dd e228 | ( | Load 0x1,0x28
01de 0096 | | Execute Package,Field_Execute_Dynamic
01df 4503 |E | Exit_Subprogram 0x3
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01ef | | .CONST 0x01ef ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0003 | | .CONST 0x0003 ; Number of locals
01e3 INIT_01e0:
01e3 e009 | | Load 0x0,0x9
01e4 e226 | & | Load 0x1,0x26
01e5 0098 | | Execute Package,Field_Read_Dynamic
01e6 02ff | | Declare_Variable Variant_Record
01e7 00d8 | | Load_Top At_Offset_0
01e8 1c00 | | Execute_Immediate Run_Utility,0x0
01e9 e009 | | Load 0x0,0x9
01ea e227 | ' | Load 0x1,0x27
01eb 0098 | | Execute Package,Field_Read_Dynamic
01ec 02ff | | Declare_Variable Variant_Record
01ed 00d8 | | Load_Top At_Offset_0
01ee 1c00 | | Execute_Immediate Run_Utility,0x0
01ef BODY_01e0:
01ef 00d9 | | Load_Top At_Offset_1
01f0 e00a | | Load 0x0,0xa
01f1 481d |H | Short_Literal 0x1d
01f2 e5ff | | Load 0x2,-0x1
01f3 8223 | # | Call 0x1,0x23
01f4 e00b | | Load 0x0,0xb
01f5 e226 | & | Load 0x1,0x26
01f6 0096 | | Execute Package,Field_Execute_Dynamic
01f7 00d1 | | Pop_Control Pop_Count_1
01f8 00d9 | | Load_Top At_Offset_1
01f9 e00c | | Load 0x0,0xc
01fa e226 | & | Load 0x1,0x26
01fb 0096 | | Execute Package,Field_Execute_Dynamic
01fc 00d8 | | Load_Top At_Offset_0
01fd 48ee |H | Short_Literal 0xee
01fe e017 | | Load 0x0,0x17
01ff e227 | ' | Load 0x1,0x27
0200 0096 | | Execute Package,Field_Execute_Dynamic
0201 00d1 | | Pop_Control Pop_Count_1
0202 00d8 | | Load_Top At_Offset_0
0203 e012 | | Load 0x0,0x12
0204 e227 | ' | Load 0x1,0x27
0205 0096 | | Execute Package,Field_Execute_Dynamic
0206 00d1 | | Pop_Control Pop_Count_1
0207 00d8 | | Load_Top At_Offset_0
0208 00da | | Load_Top At_Offset_2
0209 8229 | ) | Call 0x1,0x29
020a 00d8 | | Load_Top At_Offset_0
020b e013 | | Load 0x0,0x13
020c e227 | ' | Load 0x1,0x27
020d 0096 | | Execute Package,Field_Execute_Dynamic
020e 8018 | | Call 0x0,0x18
020f e5fe | | Load 0x2,-0x2
0210 017d | } | Execute Record,Structure_Write
0211 00d9 | | Load_Top At_Offset_1
0212 e015 | | Load 0x0,0x15
0213 e226 | & | Load 0x1,0x26
0214 0096 | | Execute Package,Field_Execute_Dynamic
0215 00d1 | | Pop_Control Pop_Count_1
0216 00d8 | | Load_Top At_Offset_0
0217 e015 | | Load 0x0,0x15
0218 e227 | ' | Load 0x1,0x27
0219 0096 | | Execute Package,Field_Execute_Dynamic
021a 4502 |E | Exit_Subprogram 0x2
021b 0000 0000 | | .BLANK 0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022f | / | .CONST 0x022f ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0003 | | .CONST 0x0003 ; Number of locals
0223 INIT_0220:
0223 e009 | | Load 0x0,0x9
0224 e226 | & | Load 0x1,0x26
0225 0098 | | Execute Package,Field_Read_Dynamic
0226 02ff | | Declare_Variable Variant_Record
0227 00d8 | | Load_Top At_Offset_0
0228 1c00 | | Execute_Immediate Run_Utility,0x0
0229 e009 | | Load 0x0,0x9
022a e227 | ' | Load 0x1,0x27
022b 0098 | | Execute Package,Field_Read_Dynamic
022c 02ff | | Declare_Variable Variant_Record
022d 00d8 | | Load_Top At_Offset_0
022e 1c00 | | Execute_Immediate Run_Utility,0x0
022f BODY_0220:
022f 00d9 | | Load_Top At_Offset_1
0230 e00a | | Load 0x0,0xa
0231 481e |H | Short_Literal 0x1e
0232 e5ff | | Load 0x2,-0x1
0233 8223 | # | Call 0x1,0x23
0234 e00b | | Load 0x0,0xb
0235 e226 | & | Load 0x1,0x26
0236 0096 | | Execute Package,Field_Execute_Dynamic
0237 00d1 | | Pop_Control Pop_Count_1
0238 00d9 | | Load_Top At_Offset_1
0239 e00c | | Load 0x0,0xc
023a e226 | & | Load 0x1,0x26
023b 0096 | | Execute Package,Field_Execute_Dynamic
023c 00d8 | | Load_Top At_Offset_0
023d e012 | | Load 0x0,0x12
023e e227 | ' | Load 0x1,0x27
023f 0096 | | Execute Package,Field_Execute_Dynamic
0240 00d1 | | Pop_Control Pop_Count_1
0241 00d8 | | Load_Top At_Offset_0
0242 00da | | Load_Top At_Offset_2
0243 8229 | ) | Call 0x1,0x29
0244 00d8 | | Load_Top At_Offset_0
0245 e013 | | Load 0x0,0x13
0246 e227 | ' | Load 0x1,0x27
0247 0096 | | Execute Package,Field_Execute_Dynamic
0248 0227 | ' | Execute Access,All_Reference
0249 8019 | | Call 0x0,0x19
024a e5fe | | Load 0x2,-0x2
024b 017d | } | Execute Record,Structure_Write
024c 00d9 | | Load_Top At_Offset_1
024d e015 | | Load 0x0,0x15
024e e226 | & | Load 0x1,0x26
024f 0096 | | Execute Package,Field_Execute_Dynamic
0250 00d1 | | Pop_Control Pop_Count_1
0251 00d8 | | Load_Top At_Offset_0
0252 e015 | | Load 0x0,0x15
0253 e227 | ' | Load 0x1,0x27
0254 0096 | | Execute Package,Field_Execute_Dynamic
0255 4502 |E | Exit_Subprogram 0x2
0256 0000 0000 | | .XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0267 | g | .CONST 0x0267 ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0003 | | .CONST 0x0003 ; Number of locals
025b INIT_0258:
025b e009 | | Load 0x0,0x9
025c e226 | & | Load 0x1,0x26
025d 0098 | | Execute Package,Field_Read_Dynamic
025e 02ff | | Declare_Variable Variant_Record
025f 00d8 | | Load_Top At_Offset_0
0260 1c00 | | Execute_Immediate Run_Utility,0x0
0261 e009 | | Load 0x0,0x9
0262 e227 | ' | Load 0x1,0x27
0263 0098 | | Execute Package,Field_Read_Dynamic
0264 02ff | | Declare_Variable Variant_Record
0265 00d8 | | Load_Top At_Offset_0
0266 1c00 | | Execute_Immediate Run_Utility,0x0
0267 BODY_0258:
0267 00d9 | | Load_Top At_Offset_1
0268 e5fd | | Load 0x2,-0x3
0269 e5fe | | Load 0x2,-0x2
026a 8010 | | Call 0x0,0x10
026b 481f |H | Short_Literal 0x1f
026c e5ff | | Load 0x2,-0x1
026d 8223 | # | Call 0x1,0x23
026e e00b | | Load 0x0,0xb
026f e226 | & | Load 0x1,0x26
0270 0096 | | Execute Package,Field_Execute_Dynamic
0271 00d1 | | Pop_Control Pop_Count_1
0272 00d9 | | Load_Top At_Offset_1
0273 e00c | | Load 0x0,0xc
0274 e226 | & | Load 0x1,0x26
0275 0096 | | Execute Package,Field_Execute_Dynamic
0276 00d8 | | Load_Top At_Offset_0
0277 48ee |H | Short_Literal 0xee
0278 e017 | | Load 0x0,0x17
0279 e227 | ' | Load 0x1,0x27
027a 0096 | | Execute Package,Field_Execute_Dynamic
027b 00d1 | | Pop_Control Pop_Count_1
027c 00d8 | | Load_Top At_Offset_0
027d e012 | | Load 0x0,0x12
027e e227 | ' | Load 0x1,0x27
027f 0096 | | Execute Package,Field_Execute_Dynamic
0280 00d1 | | Pop_Control Pop_Count_1
0281 00d8 | | Load_Top At_Offset_0
0282 00da | | Load_Top At_Offset_2
0283 8229 | ) | Call 0x1,0x29
0284 00d8 | | Load_Top At_Offset_0
0285 e013 | | Load 0x0,0x13
0286 e227 | ' | Load 0x1,0x27
0287 0096 | | Execute Package,Field_Execute_Dynamic
0288 801a | | Call 0x0,0x1a
0289 a5fc | | Store_Unchecked 0x2,-0x4
028a 00d9 | | Load_Top At_Offset_1
028b e015 | | Load 0x0,0x15
028c e226 | & | Load 0x1,0x26
028d 0096 | | Execute Package,Field_Execute_Dynamic
028e 00d1 | | Pop_Control Pop_Count_1
028f 00d8 | | Load_Top At_Offset_0
0290 e015 | | Load 0x0,0x15
0291 e227 | ' | Load 0x1,0x27
0292 0096 | | Execute Package,Field_Execute_Dynamic
0293 4504 |E | Exit_Subprogram 0x4
0294 0000 0000 | | .BLANK 0000[0x4]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a7 | | .CONST 0x02a7 ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0003 | | .CONST 0x0003 ; Number of locals
029b INIT_0298:
029b e009 | | Load 0x0,0x9
029c e226 | & | Load 0x1,0x26
029d 0098 | | Execute Package,Field_Read_Dynamic
029e 02ff | | Declare_Variable Variant_Record
029f 00d8 | | Load_Top At_Offset_0
02a0 1c00 | | Execute_Immediate Run_Utility,0x0
02a1 e009 | | Load 0x0,0x9
02a2 e227 | ' | Load 0x1,0x27
02a3 0098 | | Execute Package,Field_Read_Dynamic
02a4 02ff | | Declare_Variable Variant_Record
02a5 00d8 | | Load_Top At_Offset_0
02a6 1c00 | | Execute_Immediate Run_Utility,0x0
02a7 BODY_0298:
02a7 00d9 | | Load_Top At_Offset_1
02a8 e5fd | | Load 0x2,-0x3
02a9 e5fe | | Load 0x2,-0x2
02aa 8010 | | Call 0x0,0x10
02ab 4829 |H) | Short_Literal 0x29
02ac e5ff | | Load 0x2,-0x1
02ad 8223 | # | Call 0x1,0x23
02ae e00b | | Load 0x0,0xb
02af e226 | & | Load 0x1,0x26
02b0 0096 | | Execute Package,Field_Execute_Dynamic
02b1 00d1 | | Pop_Control Pop_Count_1
02b2 00d9 | | Load_Top At_Offset_1
02b3 e00c | | Load 0x0,0xc
02b4 e226 | & | Load 0x1,0x26
02b5 0096 | | Execute Package,Field_Execute_Dynamic
02b6 00d8 | | Load_Top At_Offset_0
02b7 48ee |H | Short_Literal 0xee
02b8 e017 | | Load 0x0,0x17
02b9 e227 | ' | Load 0x1,0x27
02ba 0096 | | Execute Package,Field_Execute_Dynamic
02bb 00d1 | | Pop_Control Pop_Count_1
02bc 00d8 | | Load_Top At_Offset_0
02bd e012 | | Load 0x0,0x12
02be e227 | ' | Load 0x1,0x27
02bf 0096 | | Execute Package,Field_Execute_Dynamic
02c0 00d1 | | Pop_Control Pop_Count_1
02c1 00d8 | | Load_Top At_Offset_0
02c2 00da | | Load_Top At_Offset_2
02c3 8229 | ) | Call 0x1,0x29
02c4 00d8 | | Load_Top At_Offset_0
02c5 e013 | | Load 0x0,0x13
02c6 e227 | ' | Load 0x1,0x27
02c7 0096 | | Execute Package,Field_Execute_Dynamic
02c8 801b | | Call 0x0,0x1b
02c9 a5fc | | Store_Unchecked 0x2,-0x4
02ca 00d9 | | Load_Top At_Offset_1
02cb e015 | | Load 0x0,0x15
02cc e226 | & | Load 0x1,0x26
02cd 0096 | | Execute Package,Field_Execute_Dynamic
02ce 00d1 | | Pop_Control Pop_Count_1
02cf 00d8 | | Load_Top At_Offset_0
02d0 e015 | | Load 0x0,0x15
02d1 e227 | ' | Load 0x1,0x27
02d2 0096 | | Execute Package,Field_Execute_Dynamic
02d3 4504 |E | Exit_Subprogram 0x4
02d4 0000 0000 | | .BLANK 0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e1 | | .CONST 0x02e1 ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0002 | | .CONST 0x0002 ; Number of locals
02db INIT_02d8:
02db e009 | | Load 0x0,0x9
02dc e228 | ( | Load 0x1,0x28
02dd 0098 | | Execute Package,Field_Read_Dynamic
02de 02ff | | Declare_Variable Variant_Record
02df 00d8 | | Load_Top At_Offset_0
02e0 1c00 | | Execute_Immediate Run_Utility,0x0
02e1 BODY_02d8:
02e1 00d8 | | Load_Top At_Offset_0
02e2 e5fe | | Load 0x2,-0x2
02e3 801c | | Call 0x0,0x1c
02e4 4827 |H' | Short_Literal 0x27
02e5 e5ff | | Load 0x2,-0x1
02e6 8223 | # | Call 0x1,0x23
02e7 e00b | | Load 0x0,0xb
02e8 e228 | ( | Load 0x1,0x28
02e9 0096 | | Execute Package,Field_Execute_Dynamic
02ea 00d1 | | Pop_Control Pop_Count_1
02eb 00d8 | | Load_Top At_Offset_0
02ec e00c | | Load 0x0,0xc
02ed e228 | ( | Load 0x1,0x28
02ee 0096 | | Execute Package,Field_Execute_Dynamic
02ef 4503 |E | Exit_Subprogram 0x3
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02ff | | .CONST 0x02ff ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0003 | | .CONST 0x0003 ; Number of locals
02f3 INIT_02f0:
02f3 e009 | | Load 0x0,0x9
02f4 e226 | & | Load 0x1,0x26
02f5 0098 | | Execute Package,Field_Read_Dynamic
02f6 02ff | | Declare_Variable Variant_Record
02f7 00d8 | | Load_Top At_Offset_0
02f8 1c00 | | Execute_Immediate Run_Utility,0x0
02f9 e009 | | Load 0x0,0x9
02fa e227 | ' | Load 0x1,0x27
02fb 0098 | | Execute Package,Field_Read_Dynamic
02fc 02ff | | Declare_Variable Variant_Record
02fd 00d8 | | Load_Top At_Offset_0
02fe 1c00 | | Execute_Immediate Run_Utility,0x0
02ff BODY_02f0:
02ff 00d9 | | Load_Top At_Offset_1
0300 e00a | | Load 0x0,0xa
0301 4828 |H( | Short_Literal 0x28
0302 e5ff | | Load 0x2,-0x1
0303 8223 | # | Call 0x1,0x23
0304 e00b | | Load 0x0,0xb
0305 e226 | & | Load 0x1,0x26
0306 0096 | | Execute Package,Field_Execute_Dynamic
0307 00d1 | | Pop_Control Pop_Count_1
0308 00d9 | | Load_Top At_Offset_1
0309 e00c | | Load 0x0,0xc
030a e226 | & | Load 0x1,0x26
030b 0096 | | Execute Package,Field_Execute_Dynamic
030c 00d8 | | Load_Top At_Offset_0
030d e012 | | Load 0x0,0x12
030e e227 | ' | Load 0x1,0x27
030f 0096 | | Execute Package,Field_Execute_Dynamic
0310 00d1 | | Pop_Control Pop_Count_1
0311 00d8 | | Load_Top At_Offset_0
0312 00da | | Load_Top At_Offset_2
0313 8229 | ) | Call 0x1,0x29
0314 00d8 | | Load_Top At_Offset_0
0315 e013 | | Load 0x0,0x13
0316 e227 | ' | Load 0x1,0x27
0317 0096 | | Execute Package,Field_Execute_Dynamic
0318 0227 | ' | Execute Access,All_Reference
0319 801d | | Call 0x0,0x1d
031a a5fe | | Store_Unchecked 0x2,-0x2
031b 00d9 | | Load_Top At_Offset_1
031c e015 | | Load 0x0,0x15
031d e226 | & | Load 0x1,0x26
031e 0096 | | Execute Package,Field_Execute_Dynamic
031f 00d1 | | Pop_Control Pop_Count_1
0320 00d8 | | Load_Top At_Offset_0
0321 e015 | | Load 0x0,0x15
0322 e227 | ' | Load 0x1,0x27
0323 0096 | | Execute Package,Field_Execute_Dynamic
0324 4502 |E | Exit_Subprogram 0x2
0325 0000 0000 | | .XXX[0x3]
0327 0000 | |
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0331 | 1 | .CONST 0x0331 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0002 | | .CONST 0x0002 ; Number of locals
032b INIT_0328:
032b e009 | | Load 0x0,0x9
032c e228 | ( | Load 0x1,0x28
032d 0098 | | Execute Package,Field_Read_Dynamic
032e 02ff | | Declare_Variable Variant_Record
032f 00d8 | | Load_Top At_Offset_0
0330 1c00 | | Execute_Immediate Run_Utility,0x0
0331 BODY_0328:
0331 00d8 | | Load_Top At_Offset_0
0332 e5fe | | Load 0x2,-0x2
0333 801e | | Call 0x0,0x1e
0334 4825 |H% | Short_Literal 0x25
0335 e5ff | | Load 0x2,-0x1
0336 8223 | # | Call 0x1,0x23
0337 e00b | | Load 0x0,0xb
0338 e228 | ( | Load 0x1,0x28
0339 0096 | | Execute Package,Field_Execute_Dynamic
033a 00d1 | | Pop_Control Pop_Count_1
033b 00d8 | | Load_Top At_Offset_0
033c e00c | | Load 0x0,0xc
033d e228 | ( | Load 0x1,0x28
033e 0096 | | Execute Package,Field_Execute_Dynamic
033f 4503 |E | Exit_Subprogram 0x3
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 034f | O | .CONST 0x034f ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0003 | | .CONST 0x0003 ; Number of locals
0343 INIT_0340:
0343 e009 | | Load 0x0,0x9
0344 e226 | & | Load 0x1,0x26
0345 0098 | | Execute Package,Field_Read_Dynamic
0346 02ff | | Declare_Variable Variant_Record
0347 00d8 | | Load_Top At_Offset_0
0348 1c00 | | Execute_Immediate Run_Utility,0x0
0349 e009 | | Load 0x0,0x9
034a e227 | ' | Load 0x1,0x27
034b 0098 | | Execute Package,Field_Read_Dynamic
034c 02ff | | Declare_Variable Variant_Record
034d 00d8 | | Load_Top At_Offset_0
034e 1c00 | | Execute_Immediate Run_Utility,0x0
034f BODY_0340:
034f 00d9 | | Load_Top At_Offset_1
0350 e5fe | | Load 0x2,-0x2
0351 801f | | Call 0x0,0x1f
0352 4826 |H& | Short_Literal 0x26
0353 e5ff | | Load 0x2,-0x1
0354 8223 | # | Call 0x1,0x23
0355 e00b | | Load 0x0,0xb
0356 e226 | & | Load 0x1,0x26
0357 0096 | | Execute Package,Field_Execute_Dynamic
0358 00d1 | | Pop_Control Pop_Count_1
0359 00d9 | | Load_Top At_Offset_1
035a e00c | | Load 0x0,0xc
035b e226 | & | Load 0x1,0x26
035c 0096 | | Execute Package,Field_Execute_Dynamic
035d 00d8 | | Load_Top At_Offset_0
035e e012 | | Load 0x0,0x12
035f e227 | ' | Load 0x1,0x27
0360 0096 | | Execute Package,Field_Execute_Dynamic
0361 00d1 | | Pop_Control Pop_Count_1
0362 00d8 | | Load_Top At_Offset_0
0363 00da | | Load_Top At_Offset_2
0364 8229 | ) | Call 0x1,0x29
0365 00d8 | | Load_Top At_Offset_0
0366 e013 | | Load 0x0,0x13
0367 e227 | ' | Load 0x1,0x27
0368 0096 | | Execute Package,Field_Execute_Dynamic
0369 0227 | ' | Execute Access,All_Reference
036a 8020 | | Call 0x0,0x20
036b e5fd | | Load 0x2,-0x3
036c 017d | } | Execute Record,Structure_Write
036d 00d9 | | Load_Top At_Offset_1
036e e015 | | Load 0x0,0x15
036f e226 | & | Load 0x1,0x26
0370 0096 | | Execute Package,Field_Execute_Dynamic
0371 00d1 | | Pop_Control Pop_Count_1
0372 00d8 | | Load_Top At_Offset_0
0373 e015 | | Load 0x0,0x15
0374 e227 | ' | Load 0x1,0x27
0375 0096 | | Execute Package,Field_Execute_Dynamic
0376 4503 |E | Exit_Subprogram 0x3
0377 0000 | | .XXX[0x1]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b e225 | % | Load 0x1,0x25
037c 0322 | " | Declare_Variable Record
037d 00db | | Load_Top At_Offset_3
037e 00d9 | | Load_Top At_Offset_1
037f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0380 4401 |D | Exit_Subprogram With_Result,0x1
0381 0000 0000 | | .BLANK 0000[0x7]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00da | | Load_Top At_Offset_2
038c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
038d 4401 |D | Exit_Subprogram With_Result,0x1
038e 0000 0000 | | .XXX[0x2]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 0092 03b0 | | Action Push_String_Extended,0x3b0 ; "Lecteur Cl35 d'adresse"
0395 00db | | Load_Top At_Offset_3
0396 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0397 00e0 | | Load_Encached Standard_Cache
0398 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0399 01cc | | Execute Vector,Catenate
039a 0092 03b1 | | Action Push_String_Extended,0x3b1 ; " "
039c 01cc | | Execute Vector,Catenate
039d 4401 |D | Exit_Subprogram With_Result,0x1
039e 0000 0000 | | .XXX[0x2]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 00da | | Load_Top At_Offset_2
03a4 e021 | ! | Load 0x0,0x21
03a5 e226 | & | Load 0x1,0x26
03a6 0096 | | Execute Package,Field_Execute_Dynamic
03a7 e5fe | | Load 0x2,-0x2
03a8 e021 | ! | Load 0x0,0x21
03a9 e227 | ' | Load 0x1,0x27
03aa 0096 | | Execute Package,Field_Execute_Dynamic
03ab 027e | ~ | Execute Discrete,Not_Equal
03ac 6802 |h | Jump_Zero 0x3af
03ad e20d | | Load 0x1,0xd
03ae 0257 | W | Execute Discrete,Raise
03af 4503 |E | Exit_Subprogram 0x3
03b0 ; --------------------------------------------------------------------------------------
03b0 ; STRING TABLE
03b0 ; --------------------------------------------------------------------------------------
03b0 0006 | | .STRTAB 0x0006->0x03b3 ; "Lecteur Cl35 d'adresse"
03b1 001a | | .STRTAB 0x001a->0x03be ; " "
03b2 0019 | | .STREND 0x0019->0x03be
03b3 4c65 6374 |Lect| .STRTAB_STRINGS
03bf 0000 | | .XXX[0x1]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; Debug Table
03c0 ; --------------------------------------------------------------------------------------
03c0 0004 0009 | | .DEBUG4 0x0004,0x0009,0x55b4,0x0000,0x0001,0x0019
03c6 000b 042a | *| .DBG4T 0x000b,0x042a,0x8000,0x8000
03ca 0045 045e | E ^| .DBG4T 0x0045,0x045e,0x8000,0x8000
03ce 00a3 0494 | | .DBG4T 0x00a3,0x0494,0x0001,0x0000
03d2 00bb 0497 | | .DBG4T 0x00bb,0x0497,0x0001,0x0000
03d6 00d3 049c | | .DBG4T 0x00d3,0x049c,0x0001,0x0000
03da 00eb 04a1 | | .DBG4T 0x00eb,0x04a1,0x0001,0x0000
03de 0103 04a6 | | .DBG4T 0x0103,0x04a6,0x0001,0x0000
03e2 011b 04ab | | .DBG4T 0x011b,0x04ab,0x0001,0x0000
03e6 013b 04b0 | ; | .DBG4T 0x013b,0x04b0,0x0001,0x0000
03ea 015b 04b5 | [ | .DBG4T 0x015b,0x04b5,0x0001,0x0000
03ee 017b 04ba | { | .DBG4T 0x017b,0x04ba,0x0001,0x0000
03f2 0193 04bf | | .DBG4T 0x0193,0x04bf,0x0001,0x0000
03f6 01cb 04ca | | .DBG4T 0x01cb,0x04ca,0x0001,0x0000
03fa 01e3 04cf | | .DBG4T 0x01e3,0x04cf,0x0001,0x0000
03fe 0223 04db | # | .DBG4T 0x0223,0x04db,0x0001,0x0000
0402 025b 04e6 | [ | .DBG4T 0x025b,0x04e6,0x0001,0x0000
0406 029b 04f2 | | .DBG4T 0x029b,0x04f2,0x0001,0x0000
040a 02db 04fe | | .DBG4T 0x02db,0x04fe,0x0001,0x0000
040e 02f3 0503 | | .DBG4T 0x02f3,0x0503,0x0001,0x0000
0412 032b 050e | + | .DBG4T 0x032b,0x050e,0x0001,0x0000
0416 0343 0513 | C | .DBG4T 0x0343,0x0513,0x0001,0x0000
041a 037b 051e | { | .DBG4T 0x037b,0x051e,0x0002,0x0000
041e 038b 0521 | !| .DBG4T 0x038b,0x0521,0x0002,0x0000
0422 0393 0524 | $| .DBG4T 0x0393,0x0524,0x0002,0x0000
0426 03a3 0527 | '| .DBG4T 0x03a3,0x0527,0x0001,0x0000
042a ; --------------------------------------------------------------------------------------
042a ; Debug chain
042a ; --------------------------------------------------------------------------------------
042a 0019 0000 | | .DBGLEN 0x0019,0x0000
042c 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0014,0x0016,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040
0445 0005 0008 | | .XXX[0x19]
0447 0009 000a | |
0449 000b 000c | |
044b 000d 000e | |
044d 000f 0010 | |
044f 0011 0012 | |
0451 0013 0014 | |
0453 0015 0016 | |
0455 0017 0018 | |
0457 0019 001a | |
0459 001b 001c | |
045b 001d 001e | |
045d 001f | |
045e ; --------------------------------------------------------------------------------------
045e ; Debug chain
045e ; --------------------------------------------------------------------------------------
045e 001a 0000 | | .DBGLEN 0x001a,0x0000
0460 0045 0052 | E R| .DBGLNO 0x0045,0x0052,0x005f,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a,0x007c,0x007e,0x0080,0x0082,0x0084,0x0086,0x0088,0x008a,0x008c,0x008e,0x0090,0x0092,0x0094,0x0096,0x0098
047a 0003 0004 | | .XXX[0x1a]
047c 0005 0018 | |
047e 0019 001a | |
0480 001b 001c | |
0482 001d 001e | |
0484 001f 0020 | |
0486 0021 0022 | ! "|
0488 0023 0024 | # $|
048a 0025 0026 | % &|
048c 0027 0028 | ' (|
048e 0029 002a | ) *|
0490 002b 002c | + ,|
0492 002d 002e | - .|
0494 ; --------------------------------------------------------------------------------------
0494 ; Debug chain
0494 ; --------------------------------------------------------------------------------------
0494 0000 0001 | | .DBGLEN 0x0000,0x0001
0496 00a3 | | .DBGLNO 0x00a3
0497 ; --------------------------------------------------------------------------------------
0497 ; Debug chain
0497 ; --------------------------------------------------------------------------------------
0497 0001 0002 | | .DBGLEN 0x0001,0x0002
0499 00bb 00c1 | | .DBGLNO 0x00bb,0x00c1,0x00ca
049c ; --------------------------------------------------------------------------------------
049c ; Debug chain
049c ; --------------------------------------------------------------------------------------
049c 0001 0002 | | .DBGLEN 0x0001,0x0002
049e 00d3 00d9 | | .DBGLNO 0x00d3,0x00d9,0x00e2
04a1 ; --------------------------------------------------------------------------------------
04a1 ; Debug chain
04a1 ; --------------------------------------------------------------------------------------
04a1 0001 0002 | | .DBGLEN 0x0001,0x0002
04a3 00eb 00f1 | | .DBGLNO 0x00eb,0x00f1,0x00fa
04a6 ; --------------------------------------------------------------------------------------
04a6 ; Debug chain
04a6 ; --------------------------------------------------------------------------------------
04a6 0001 0002 | | .DBGLEN 0x0001,0x0002
04a8 0103 0109 | | .DBGLNO 0x0103,0x0109,0x0113
04ab ; --------------------------------------------------------------------------------------
04ab ; Debug chain
04ab ; --------------------------------------------------------------------------------------
04ab 0001 0002 | | .DBGLEN 0x0001,0x0002
04ad 011b 0121 | !| .DBGLNO 0x011b,0x0121,0x012d
04b0 ; --------------------------------------------------------------------------------------
04b0 ; Debug chain
04b0 ; --------------------------------------------------------------------------------------
04b0 0001 0002 | | .DBGLEN 0x0001,0x0002
04b2 013b 0141 | ; A| .DBGLNO 0x013b,0x0141,0x014d
04b5 ; --------------------------------------------------------------------------------------
04b5 ; Debug chain
04b5 ; --------------------------------------------------------------------------------------
04b5 0001 0002 | | .DBGLEN 0x0001,0x0002
04b7 015b 0161 | [ a| .DBGLNO 0x015b,0x0161,0x016c
04ba ; --------------------------------------------------------------------------------------
04ba ; Debug chain
04ba ; --------------------------------------------------------------------------------------
04ba 0001 0002 | | .DBGLEN 0x0001,0x0002
04bc 017b 0181 | { | .DBGLNO 0x017b,0x0181,0x018b
04bf ; --------------------------------------------------------------------------------------
04bf ; Debug chain
04bf ; --------------------------------------------------------------------------------------
04bf 0002 0007 | | .DBGLEN 0x0002,0x0007
04c1 0193 0199 | | .DBGLNO 0x0193,0x0199,0x019f,0x01a8,0x01ac,0x01b1,0x01b4,0x01bc,0x01c1
04ca ; --------------------------------------------------------------------------------------
04ca ; Debug chain
04ca ; --------------------------------------------------------------------------------------
04ca 0001 0002 | | .DBGLEN 0x0001,0x0002
04cc 01cb 01d1 | | .DBGLNO 0x01cb,0x01d1,0x01db
04cf ; --------------------------------------------------------------------------------------
04cf ; Debug chain
04cf ; --------------------------------------------------------------------------------------
04cf 0002 0008 | | .DBGLEN 0x0002,0x0008
04d1 01e3 01e9 | | .DBGLNO 0x01e3,0x01e9,0x01ef,0x01f8,0x01fc,0x0202,0x0207,0x020a,0x0211,0x0216
04db ; --------------------------------------------------------------------------------------
04db ; Debug chain
04db ; --------------------------------------------------------------------------------------
04db 0002 0007 | | .DBGLEN 0x0002,0x0007
04dd 0223 0229 | # )| .DBGLNO 0x0223,0x0229,0x022f,0x0238,0x023c,0x0241,0x0244,0x024c,0x0251
04e6 ; --------------------------------------------------------------------------------------
04e6 ; Debug chain
04e6 ; --------------------------------------------------------------------------------------
04e6 0002 0008 | | .DBGLEN 0x0002,0x0008
04e8 025b 0261 | [ a| .DBGLNO 0x025b,0x0261,0x0267,0x0272,0x0276,0x027c,0x0281,0x0284,0x028a,0x028f
04f2 ; --------------------------------------------------------------------------------------
04f2 ; Debug chain
04f2 ; --------------------------------------------------------------------------------------
04f2 0002 0008 | | .DBGLEN 0x0002,0x0008
04f4 029b 02a1 | | .DBGLNO 0x029b,0x02a1,0x02a7,0x02b2,0x02b6,0x02bc,0x02c1,0x02c4,0x02ca,0x02cf
04fe ; --------------------------------------------------------------------------------------
04fe ; Debug chain
04fe ; --------------------------------------------------------------------------------------
04fe 0001 0002 | | .DBGLEN 0x0001,0x0002
0500 02db 02e1 | | .DBGLNO 0x02db,0x02e1,0x02eb
0503 ; --------------------------------------------------------------------------------------
0503 ; Debug chain
0503 ; --------------------------------------------------------------------------------------
0503 0002 0007 | | .DBGLEN 0x0002,0x0007
0505 02f3 02f9 | | .DBGLNO 0x02f3,0x02f9,0x02ff,0x0308,0x030c,0x0311,0x0314,0x031b,0x0320
050e ; --------------------------------------------------------------------------------------
050e ; Debug chain
050e ; --------------------------------------------------------------------------------------
050e 0001 0002 | | .DBGLEN 0x0001,0x0002
0510 032b 0331 | + 1| .DBGLNO 0x032b,0x0331,0x033b
0513 ; --------------------------------------------------------------------------------------
0513 ; Debug chain
0513 ; --------------------------------------------------------------------------------------
0513 0002 0007 | | .DBGLEN 0x0002,0x0007
0515 0343 0349 | C I| .DBGLNO 0x0343,0x0349,0x034f,0x0359,0x035d,0x0362,0x0365,0x036d,0x0372
051e ; --------------------------------------------------------------------------------------
051e ; Debug chain
051e ; --------------------------------------------------------------------------------------
051e 0000 0001 | | .DBGLEN 0x0000,0x0001
0520 037b | { | .DBGLNO 0x037b
0521 ; --------------------------------------------------------------------------------------
0521 ; Debug chain
0521 ; --------------------------------------------------------------------------------------
0521 0000 0001 | | .DBGLEN 0x0000,0x0001
0523 038b | | .DBGLNO 0x038b
0524 ; --------------------------------------------------------------------------------------
0524 ; Debug chain
0524 ; --------------------------------------------------------------------------------------
0524 0000 0001 | | .DBGLEN 0x0000,0x0001
0526 0393 | | .DBGLNO 0x0393
0527 ; --------------------------------------------------------------------------------------
0527 ; Debug chain
0527 ; --------------------------------------------------------------------------------------
0527 0000 0002 | | .DBGLEN 0x0000,0x0002
0529 03a3 03ad | | .DBGLNO 0x03a3,0x03ad
052b 0000 0000 | | .BLANK 0000[0xd5]