|
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_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 | | push_full_address 0x0 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 INIT_00a0,For_Outer_Call,Visible,Unelaborated 0016 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0018 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated 001a 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated 001c 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 001e 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 0020 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0022 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated 0024 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 0026 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0028 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 002a 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 002c 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 002e 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 0030 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0032 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 0034 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated 0036 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 0038 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated 003a 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated 003c 029a 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated 003e 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated 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 | | push_full_address 0x0 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 | | push_full_address 0x0 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 | | push_full_address 0x0 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 INIT_03a0,For_Outer_Call 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,Entry 00a6 4501 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 00ce 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 00e6 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 00fe 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 0117 4503 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 0131 4504 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 0151 4505 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 0170 4504 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 018f 4503 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 01ac 00d8 | | Load_Top At_Offset_0 01ad e012 | | Load 0x0,0x12 01ae e227 | ' | Load 0x1,0x27 01af 0096 | | Execute Package,Entry 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,Entry 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,Entry 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,Entry 01c5 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 01df 4503 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 021a 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 023c 00d8 | | Load_Top At_Offset_0 023d e012 | | Load 0x0,0x12 023e e227 | ' | Load 0x1,0x27 023f 0096 | | Execute Package,Entry 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,Entry 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,Entry 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,Entry 0255 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 0293 4504 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 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,Entry 02d3 4504 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 02ef 4503 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 030c 00d8 | | Load_Top At_Offset_0 030d e012 | | Load 0x0,0x12 030e e227 | ' | Load 0x1,0x27 030f 0096 | | Execute Package,Entry 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,Entry 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,Entry 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,Entry 0324 4502 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 033f 4503 |E | Exit_Suprogram New_Top_Offset 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,Entry 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,Entry 035d 00d8 | | Load_Top At_Offset_0 035e e012 | | Load 0x0,0x12 035f e227 | ' | Load 0x1,0x27 0360 0096 | | Execute Package,Entry 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,Entry 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,Entry 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,Entry 0376 4503 |E | Exit_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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,Entry 03a7 e5fe | | Load 0x2,-0x2 03a8 e021 | ! | Load 0x0,0x21 03a9 e227 | ' | Load 0x1,0x27 03aa 0096 | | Execute Package,Entry 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_Suprogram New_Top_Offset 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]