|
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: 13312 (0x3400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 1248 | H | .CONST 0x1248 ; 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 000c | | .CONST 0x000c ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0110 | | .CONST 0x0110 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 005b | [ | .CONST 0x005b ; Number of locals 000b INIT_0008: 000b 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 000d 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 000f 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 0011 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0013 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0015 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0017 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 0019 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 001b 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 001d 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 001f 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0021 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 0023 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0025 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 0027 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 0029 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 002b 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 002d 0093 0000 | | push_full_address 0x0 002f 6100 |a | Indirect_Literal Discrete,0x130,{0x80000000, 0x00010000} 0030 0273 | s | Execute Discrete,Plus 0031 0129 | ) | Execute Any,Make_Visible 0032 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated 0034 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0036 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated 0038 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 003a 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated 003c 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated 003e 029a 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Visible,Unelaborated 0040 029a 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call,Visible,Unelaborated 0042 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated 0044 029a 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call,Visible,Unelaborated 0046 00bf | | Action Accept_Activation 0047 e002 | | Load 0x0,0x2 0048 e003 | | Load 0x0,0x3 0049 00e2 | | Load_Encached Integer_Cache 004a e004 | | Load 0x0,0x4 004b 1b50 | P | Execute Package,Field_Read,Field_Number 0x50 004c 0387 | | Declare_Variable Package 004d 00d8 | | Load_Top At_Offset_0 004e 020f | | Execute Module,Activate 004f 0007 | | Action Break_Optional 0050 4818 |H | Short_Literal 0x18 0051 03cc | | Declare_Type Access,Incomplete,Accesses_Protected 0052 00d8 | | Load_Top At_Offset_0 0053 e004 | | Load 0x0,0x4 0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0055 00e1 | | Load_Encached Boolean_Cache 0056 029f 06db | | Declare_Subprogram INIT_06d8,For_Call 0058 4803 |H | Short_Literal 0x3 0059 032d | - | Declare_Type Record,Defined 005a 00d8 | | Load_Top At_Offset_0 005b 02a0 | | Declare_Subprogram Null_Subprogram 005c 00db | | Load_Top At_Offset_3 005d 03c7 | | Complete_Type Access,By_Defining 005e 00d9 | | Load_Top At_Offset_1 005f 0221 | ! | Execute Access,Allow_Deallocate 0060 0007 | | Action Break_Optional 0061 a005 | | Store_Unchecked 0x0,0x5 0062 00c6 | | Action Check_Subprogram_Elaborated 0063 00d8 | | Load_Top At_Offset_0 0064 00da | | Load_Top At_Offset_2 0065 e006 | | Load 0x0,0x6 0066 e007 | | Load 0x0,0x7 0067 4800 |H | Short_Literal 0x0 0068 0007 | | Action Break_Optional 0069 e22a | * | Load 0x1,0x2a 006a 0007 | | Action Break_Optional 006b 00e9 | | Load_Encached String_Cache 006c 02a0 | | Declare_Subprogram Null_Subprogram 006d 4818 |H | Short_Literal 0x18 006e 03d3 | | Declare_Type Access,Defined,Accesses_Protected 006f 00d8 | | Load_Top At_Offset_0 0070 0221 | ! | Execute Access,Allow_Deallocate 0071 0007 | | Action Break_Optional 0072 a005 | | Store_Unchecked 0x0,0x5 0073 00c6 | | Action Check_Subprogram_Elaborated 0074 00e9 | | Load_Encached String_Cache 0075 00d9 | | Load_Top At_Offset_1 0076 e008 | | Load 0x0,0x8 0077 e009 | | Load 0x0,0x9 0078 4800 |H | Short_Literal 0x0 0079 0007 | | Action Break_Optional 007a e232 | 2 | Load 0x1,0x32 007b e00a | | Load 0x0,0xa 007c 00e1 | | Load_Encached Boolean_Cache 007d 00e1 | | Load_Encached Boolean_Cache 007e 02a0 | | Declare_Subprogram Null_Subprogram 007f 4804 |H | Short_Literal 0x4 0080 032d | - | Declare_Type Record,Defined 0081 00d8 | | Load_Top At_Offset_0 0082 02a0 | | Declare_Subprogram Null_Subprogram 0083 4818 |H | Short_Literal 0x18 0084 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0085 00d8 | | Load_Top At_Offset_0 0086 0221 | ! | Execute Access,Allow_Deallocate 0087 0007 | | Action Break_Optional 0088 e00b | | Load 0x0,0xb 0089 0266 | f | Execute Discrete,Bounds 008a 00da | | Load_Top At_Offset_2 008b 02a0 | | Declare_Subprogram Null_Subprogram 008c 4801 |H | Short_Literal 0x1 008d 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 008e 00d8 | | Load_Top At_Offset_0 008f 02a0 | | Declare_Subprogram Null_Subprogram 0090 4818 |H | Short_Literal 0x18 0091 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0092 00d8 | | Load_Top At_Offset_0 0093 0221 | ! | Execute Access,Allow_Deallocate 0094 0007 | | Action Break_Optional 0095 a005 | | Store_Unchecked 0x0,0x5 0096 00c6 | | Action Check_Subprogram_Elaborated 0097 00db | | Load_Top At_Offset_3 0098 00db | | Load_Top At_Offset_3 0099 e00c | | Load 0x0,0xc 009a e00d | | Load 0x0,0xd 009b 4800 |H | Short_Literal 0x0 009c 0007 | | Action Break_Optional 009d a005 | | Store_Unchecked 0x0,0x5 009e 00c6 | | Action Check_Subprogram_Elaborated 009f e23a | : | Load 0x1,0x3a 00a0 e23b | ; | Load 0x1,0x3b 00a1 e00e | | Load 0x0,0xe 00a2 e00f | | Load 0x0,0xf 00a3 4800 |H | Short_Literal 0x0 00a4 0007 | | Action Break_Optional 00a5 0007 | | Action Break_Optional 00a6 4818 |H | Short_Literal 0x18 00a7 03cc | | Declare_Type Access,Incomplete,Accesses_Protected 00a8 00d8 | | Load_Top At_Offset_0 00a9 e232 | 2 | Load 0x1,0x32 00aa 02a0 | | Declare_Subprogram Null_Subprogram 00ab 4802 |H | Short_Literal 0x2 00ac 032d | - | Declare_Type Record,Defined 00ad 00d8 | | Load_Top At_Offset_0 00ae 02a0 | | Declare_Subprogram Null_Subprogram 00af 00db | | Load_Top At_Offset_3 00b0 03c7 | | Complete_Type Access,By_Defining 00b1 00d9 | | Load_Top At_Offset_1 00b2 0221 | ! | Execute Access,Allow_Deallocate 00b3 0007 | | Action Break_Optional 00b4 a005 | | Store_Unchecked 0x0,0x5 00b5 00c6 | | Action Check_Subprogram_Elaborated 00b6 00d8 | | Load_Top At_Offset_0 00b7 00da | | Load_Top At_Offset_2 00b8 e010 | | Load 0x0,0x10 00b9 e011 | | Load 0x0,0x11 00ba 4800 |H | Short_Literal 0x0 00bb 0007 | | Action Break_Optional 00bc e246 | F | Load 0x1,0x46 00bd 0007 | | Action Break_Optional 00be 029d 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call 00c0 029d 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call 00c2 029d 074b | K| Declare_Subprogram INIT_0748,For_Outer_Call 00c4 1d0f | | Execute_Immediate Reference_Lex_1,0xf 00c5 00c7 | | Action Elaborate_Subprogram 00c6 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00c7 00c7 | | Action Elaborate_Subprogram 00c8 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00c9 00c7 | | Action Elaborate_Subprogram 00ca 1d0d | | Execute_Immediate Reference_Lex_1,0xd 00cb 00c7 | | Action Elaborate_Subprogram 00cc 1d0e | | Execute_Immediate Reference_Lex_1,0xe 00cd 00c7 | | Action Elaborate_Subprogram 00ce 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00cf 00c7 | | Action Elaborate_Subprogram 00d0 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00d1 00c7 | | Action Elaborate_Subprogram 00d2 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00d3 00c7 | | Action Elaborate_Subprogram 00d4 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00d5 00c7 | | Action Elaborate_Subprogram 00d6 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00d7 00c7 | | Action Elaborate_Subprogram 00d8 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00d9 00c7 | | Action Elaborate_Subprogram 00da 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00db 00c7 | | Action Elaborate_Subprogram 00dc 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00dd 00c7 | | Action Elaborate_Subprogram 00de 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00df 00c7 | | Action Elaborate_Subprogram 00e0 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00e1 00c7 | | Action Elaborate_Subprogram 00e2 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00e3 00c7 | | Action Elaborate_Subprogram 00e4 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00e5 00c7 | | Action Elaborate_Subprogram 00e6 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00e7 00c7 | | Action Elaborate_Subprogram 00e8 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00e9 00c7 | | Action Elaborate_Subprogram 00ea 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00eb 00c7 | | Action Elaborate_Subprogram 00ec 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00ed 00c7 | | Action Elaborate_Subprogram 00ee 029d 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call 00f0 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call 00f2 029d 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call 00f4 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00f5 00c7 | | Action Elaborate_Subprogram 00f6 029d 0823 | #| Declare_Subprogram INIT_0820,For_Outer_Call 00f8 029d 095b | [| Declare_Subprogram INIT_0958,For_Outer_Call 00fa 029d 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call 00fc 029d 0a7b | {| Declare_Subprogram INIT_0a78,For_Outer_Call 00fe 029d 0ba3 | | Declare_Subprogram INIT_0ba0,For_Outer_Call 0100 029d 0d7b | {| Declare_Subprogram INIT_0d78,For_Outer_Call 0102 029d 0ea3 | | Declare_Subprogram INIT_0ea0,For_Outer_Call 0104 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0105 00c7 | | Action Elaborate_Subprogram 0106 029d 107b | {| Declare_Subprogram INIT_1078,For_Outer_Call 0108 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0109 00c7 | | Action Elaborate_Subprogram 010a 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 010b 00c7 | | Action Elaborate_Subprogram 010c 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 010d 00c7 | | Action Elaborate_Subprogram 010e 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 010f 00c7 | | Action Elaborate_Subprogram 0110 BODY_0008: 0110 00bc | | Action Signal_Activated 0111 00bb | | Action Signal_Completion 0112 0000 0000 | | .BLANK 0000[0x6] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 0122 | " | .CONST 0x0122 ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0003 | | .CONST 0x0003 ; Number of locals 011b INIT_0118: 011b e22a | * | Load 0x1,0x2a 011c 03bc | | Declare_Variable Access,By_Allocation 011d 00d8 | | Load_Top At_Offset_0 011e 00e0 | | Load_Encached Standard_Cache 011f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0120 029f 1083 | | Declare_Subprogram INIT_1080,For_Call 0122 BODY_0118: 0122 8403 | | Call 0x2,0x3 0123 e231 | 1 | Load 0x1,0x31 0124 00da | | Load_Top At_Offset_2 0125 0227 | ' | Execute Access,All_Reference 0126 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0127 00d9 | | Load_Top At_Offset_1 0128 a231 | 1 | Store_Unchecked 0x1,0x31 0129 00d9 | | Load_Top At_Offset_1 012a 0227 | ' | Execute Access,All_Reference 012b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 012c e004 | | Load 0x0,0x4 012d 181f | | Execute Package,Field_Execute,Field_Number 0x1f 012e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 012f 0000 | | .XXX[0x1] 0130 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0134 0000 0000 | | .BLANK 0000[0x4] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013d | = | .CONST 0x013d ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0002 | | .CONST 0x0002 ; Number of locals 013b INIT_0138: 013b e22a | * | Load 0x1,0x2a 013c 0007 | | Action Break_Optional 013d BODY_0138: 013d e231 | 1 | Load 0x1,0x31 013e 7001 |p | Jump_Nonzero 0x140 013f 08e0 | | Execute_Immediate Raise,0xe0 0140 4801 |H | Short_Literal 0x1 0141 e231 | 1 | Load 0x1,0x31 0142 0227 | ' | Execute Access,All_Reference 0143 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0144 e004 | | Load 0x0,0x4 0145 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0146 0092 1180 | | Action Push_String_Extended,0x1180 ; "End of log." 0148 e231 | 1 | Load 0x1,0x31 0149 0227 | ' | Execute Access,All_Reference 014a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 014b e004 | | Load 0x0,0x4 014c 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 014d e231 | 1 | Load 0x1,0x31 014e 0229 | ) | Execute Access,All_Read 014f 00d8 | | Load_Top At_Offset_0 0150 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0151 e004 | | Load 0x0,0x4 0152 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0153 00d9 | | Load_Top At_Offset_1 0154 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0155 00d1 | | Pop_Control Pop_Count_1 0156 e231 | 1 | Load 0x1,0x31 0157 0039 | 9 | Store_Top Access,At_Offset_1 0158 e231 | 1 | Load 0x1,0x31 0159 0227 | ' | Execute Access,All_Reference 015a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 015b a231 | 1 | Store_Unchecked 0x1,0x31 015c 00d8 | | Load_Top At_Offset_0 015d e22c | , | Load 0x1,0x2c 015e e22d | - | Load 0x1,0x2d 015f 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0160 8005 | | Call 0x0,0x5 0161 0039 | 9 | Store_Top Access,At_Offset_1 0162 e231 | 1 | Load 0x1,0x31 0163 6806 |h | Jump_Zero 0x16a 0164 e231 | 1 | Load 0x1,0x31 0165 0227 | ' | Execute Access,All_Reference 0166 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0167 e004 | | Load 0x0,0x4 0168 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0169 4501 |E | Exit_Suprogram New_Top_Offset 0x1 016a e004 | | Load 0x0,0x4 016b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 016c e004 | | Load 0x0,0x4 016d 181f | | Execute Package,Field_Execute,Field_Number 0x1f 016e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 016f 0000 | | .XXX[0x1] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0174 | t | .CONST 0x0174 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0002 | | .CONST 0x0002 ; Number of locals 0173 INIT_0170: 0173 e231 | 1 | Load 0x1,0x31 0174 BODY_0170: 0174 00cf | | Action Mark_Auxiliary 0175 7812 |x | Jump 0x188 0176 0092 1181 | | Action Push_String_Extended,0x1181 ; "::: " 0178 00da | | Load_Top At_Offset_2 0179 0227 | ' | Execute Access,All_Reference 017a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 017b e004 | | Load 0x0,0x4 017c 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 017d e5ff | | Load 0x2,-0x1 017e 00da | | Load_Top At_Offset_2 017f 0227 | ' | Execute Access,All_Reference 0180 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0181 e004 | | Load 0x0,0x4 0182 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 0183 00d9 | | Load_Top At_Offset_1 0184 0227 | ' | Execute Access,All_Reference 0185 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0186 003a | : | Store_Top Access,At_Offset_2 0187 00c9 | | Action Pop_Auxiliary_Loop 0188 00d9 | | Load_Top At_Offset_1 0189 77ec |w | Jump_Nonzero 0x176 018a 00ce | | Action Pop_Auxiliary 018b 0092 1181 | | Action Push_String_Extended,0x1181 ; "::: " 018d e004 | | Load 0x0,0x4 018e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 018f e004 | | Load 0x0,0x4 0190 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0191 00db | | Load_Top At_Offset_3 0192 e004 | | Load 0x0,0x4 0193 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0194 e004 | | Load 0x0,0x4 0195 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 0196 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0197 0000 | | .XXX[0x1] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019c | | .CONST 0x019c ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b e231 | 1 | Load 0x1,0x31 019c BODY_0198: 019c 00cf | | Action Mark_Auxiliary 019d 7812 |x | Jump 0x1b0 019e 0092 1182 | | Action Push_String_Extended,0x1182 ; "*** " 01a0 00da | | Load_Top At_Offset_2 01a1 0227 | ' | Execute Access,All_Reference 01a2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01a3 e004 | | Load 0x0,0x4 01a4 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01a5 e5ff | | Load 0x2,-0x1 01a6 00da | | Load_Top At_Offset_2 01a7 0227 | ' | Execute Access,All_Reference 01a8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01a9 e004 | | Load 0x0,0x4 01aa 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 01ab 00d9 | | Load_Top At_Offset_1 01ac 0227 | ' | Execute Access,All_Reference 01ad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01ae 003a | : | Store_Top Access,At_Offset_2 01af 00c9 | | Action Pop_Auxiliary_Loop 01b0 00d9 | | Load_Top At_Offset_1 01b1 77ec |w | Jump_Nonzero 0x19e 01b2 00ce | | Action Pop_Auxiliary 01b3 0092 1182 | | Action Push_String_Extended,0x1182 ; "*** " 01b5 e004 | | Load 0x0,0x4 01b6 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01b7 e004 | | Load 0x0,0x4 01b8 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01b9 00db | | Load_Top At_Offset_3 01ba e004 | | Load 0x0,0x4 01bb 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01bc e004 | | Load 0x0,0x4 01bd 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 01be 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01bf 0000 | | .XXX[0x1] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c4 | | .CONST 0x01c4 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0002 | | .CONST 0x0002 ; Number of locals 01c3 INIT_01c0: 01c3 e231 | 1 | Load 0x1,0x31 01c4 BODY_01c0: 01c4 00cf | | Action Mark_Auxiliary 01c5 7812 |x | Jump 0x1d8 01c6 0092 1182 | | Action Push_String_Extended,0x1182 ; "*** " 01c8 00da | | Load_Top At_Offset_2 01c9 0227 | ' | Execute Access,All_Reference 01ca 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01cb e004 | | Load 0x0,0x4 01cc 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01cd e5ff | | Load 0x2,-0x1 01ce 00da | | Load_Top At_Offset_2 01cf 0227 | ' | Execute Access,All_Reference 01d0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01d1 e004 | | Load 0x0,0x4 01d2 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 01d3 00d9 | | Load_Top At_Offset_1 01d4 0227 | ' | Execute Access,All_Reference 01d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01d6 003a | : | Store_Top Access,At_Offset_2 01d7 00c9 | | Action Pop_Auxiliary_Loop 01d8 00d9 | | Load_Top At_Offset_1 01d9 77ec |w | Jump_Nonzero 0x1c6 01da 00ce | | Action Pop_Auxiliary 01db 0092 1182 | | Action Push_String_Extended,0x1182 ; "*** " 01dd e004 | | Load 0x0,0x4 01de 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01df e004 | | Load 0x0,0x4 01e0 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01e1 00db | | Load_Top At_Offset_3 01e2 e004 | | Load 0x0,0x4 01e3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01e4 e004 | | Load 0x0,0x4 01e5 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 01e6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01e7 0000 | | .XXX[0x1] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 4801 |H | Short_Literal 0x1 01ec 8213 | | Call 0x1,0x13 01ed 0092 1183 | | Action Push_String_Extended,0x1183 ; "=== Test Section => " 01ef 8216 | | Call 0x1,0x16 01f0 00da | | Load_Top At_Offset_2 01f1 8217 | | Call 0x1,0x17 01f2 4801 |H | Short_Literal 0x1 01f3 8213 | | Call 0x1,0x13 01f4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01f5 0000 0000 | | .XXX[0x3] 01f7 0000 | | 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fc | | .CONST 0x01fc ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0002 | | .CONST 0x0002 ; Number of locals 01fb INIT_01f8: 01fb e231 | 1 | Load 0x1,0x31 01fc BODY_01f8: 01fc 00cf | | Action Mark_Auxiliary 01fd 7816 |x | Jump 0x214 01fe e5ff | | Load 0x2,-0x1 01ff 00d8 | | Load_Top At_Offset_0 0200 e004 | | Load 0x0,0x4 0201 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0202 0260 | ` | Execute Discrete,In_Type 0203 7001 |p | Jump_Nonzero 0x205 0204 0801 | | Execute_Immediate Raise,0x1 0205 00da | | Load_Top At_Offset_2 0206 0227 | ' | Execute Access,All_Reference 0207 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0208 e004 | | Load 0x0,0x4 0209 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 020a 00d9 | | Load_Top At_Offset_1 020b 0227 | ' | Execute Access,All_Reference 020c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 020d 7001 |p | Jump_Nonzero 0x20f 020e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 020f 00d9 | | Load_Top At_Offset_1 0210 0227 | ' | Execute Access,All_Reference 0211 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0212 003a | : | Store_Top Access,At_Offset_2 0213 00c9 | | Action Pop_Auxiliary_Loop 0214 00d9 | | Load_Top At_Offset_1 0215 77e8 |w | Jump_Nonzero 0x1fe 0216 00ce | | Action Pop_Auxiliary 0217 00db | | Load_Top At_Offset_3 0218 00d8 | | Load_Top At_Offset_0 0219 e004 | | Load 0x0,0x4 021a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 021b 0260 | ` | Execute Discrete,In_Type 021c 7001 |p | Jump_Nonzero 0x21e 021d 0801 | | Execute_Immediate Raise,0x1 021e e004 | | Load 0x0,0x4 021f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0220 e004 | | Load 0x0,0x4 0221 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0222 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0223 0000 0000 | | .BLANK 0000[0x5] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022c | , | .CONST 0x022c ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0002 | | .CONST 0x0002 ; Number of locals 022b INIT_0228: 022b e231 | 1 | Load 0x1,0x31 022c BODY_0228: 022c 00cf | | Action Mark_Auxiliary 022d 7816 |x | Jump 0x244 022e e5ff | | Load 0x2,-0x1 022f 00d8 | | Load_Top At_Offset_0 0230 e004 | | Load 0x0,0x4 0231 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0232 0260 | ` | Execute Discrete,In_Type 0233 7001 |p | Jump_Nonzero 0x235 0234 0801 | | Execute_Immediate Raise,0x1 0235 00da | | Load_Top At_Offset_2 0236 0227 | ' | Execute Access,All_Reference 0237 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0238 e004 | | Load 0x0,0x4 0239 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 023a 00d9 | | Load_Top At_Offset_1 023b 0227 | ' | Execute Access,All_Reference 023c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 023d 7001 |p | Jump_Nonzero 0x23f 023e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 023f 00d9 | | Load_Top At_Offset_1 0240 0227 | ' | Execute Access,All_Reference 0241 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0242 003a | : | Store_Top Access,At_Offset_2 0243 00c9 | | Action Pop_Auxiliary_Loop 0244 00d9 | | Load_Top At_Offset_1 0245 77e8 |w | Jump_Nonzero 0x22e 0246 00ce | | Action Pop_Auxiliary 0247 00db | | Load_Top At_Offset_3 0248 00d8 | | Load_Top At_Offset_0 0249 e004 | | Load 0x0,0x4 024a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 024b 0260 | ` | Execute Discrete,In_Type 024c 7001 |p | Jump_Nonzero 0x24e 024d 0801 | | Execute_Immediate Raise,0x1 024e e004 | | Load 0x0,0x4 024f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0250 e004 | | Load 0x0,0x4 0251 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0252 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0253 0000 0000 | | .BLANK 0000[0x5] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025c | \ | .CONST 0x025c ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0002 | | .CONST 0x0002 ; Number of locals 025b INIT_0258: 025b e231 | 1 | Load 0x1,0x31 025c BODY_0258: 025c 00cf | | Action Mark_Auxiliary 025d 7810 |x | Jump 0x26e 025e e5ff | | Load 0x2,-0x1 025f 00da | | Load_Top At_Offset_2 0260 0227 | ' | Execute Access,All_Reference 0261 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0262 e004 | | Load 0x0,0x4 0263 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0264 00d9 | | Load_Top At_Offset_1 0265 0227 | ' | Execute Access,All_Reference 0266 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0267 7001 |p | Jump_Nonzero 0x269 0268 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0269 00d9 | | Load_Top At_Offset_1 026a 0227 | ' | Execute Access,All_Reference 026b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 026c 003a | : | Store_Top Access,At_Offset_2 026d 00c9 | | Action Pop_Auxiliary_Loop 026e 00d9 | | Load_Top At_Offset_1 026f 77ee |w | Jump_Nonzero 0x25e 0270 00ce | | Action Pop_Auxiliary 0271 00db | | Load_Top At_Offset_3 0272 e004 | | Load 0x0,0x4 0273 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0274 e004 | | Load 0x0,0x4 0275 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0276 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0277 0000 | | .XXX[0x1] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027c | | | .CONST 0x027c ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0002 | | .CONST 0x0002 ; Number of locals 027b INIT_0278: 027b e231 | 1 | Load 0x1,0x31 027c BODY_0278: 027c 00cf | | Action Mark_Auxiliary 027d 7810 |x | Jump 0x28e 027e e5ff | | Load 0x2,-0x1 027f 00da | | Load_Top At_Offset_2 0280 0227 | ' | Execute Access,All_Reference 0281 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0282 e004 | | Load 0x0,0x4 0283 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0284 00d9 | | Load_Top At_Offset_1 0285 0227 | ' | Execute Access,All_Reference 0286 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0287 7001 |p | Jump_Nonzero 0x289 0288 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0289 00d9 | | Load_Top At_Offset_1 028a 0227 | ' | Execute Access,All_Reference 028b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 028c 003a | : | Store_Top Access,At_Offset_2 028d 00c9 | | Action Pop_Auxiliary_Loop 028e 00d9 | | Load_Top At_Offset_1 028f 77ee |w | Jump_Nonzero 0x27e 0290 00ce | | Action Pop_Auxiliary 0291 00db | | Load_Top At_Offset_3 0292 e004 | | Load 0x0,0x4 0293 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0294 e004 | | Load 0x0,0x4 0295 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0296 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0297 0000 | | .XXX[0x1] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029c | | .CONST 0x029c ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0002 | | .CONST 0x0002 ; Number of locals 029b INIT_0298: 029b e231 | 1 | Load 0x1,0x31 029c BODY_0298: 029c 00cf | | Action Mark_Auxiliary 029d 7810 |x | Jump 0x2ae 029e e5ff | | Load 0x2,-0x1 029f 00da | | Load_Top At_Offset_2 02a0 0227 | ' | Execute Access,All_Reference 02a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a2 e004 | | Load 0x0,0x4 02a3 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 02a4 00d9 | | Load_Top At_Offset_1 02a5 0227 | ' | Execute Access,All_Reference 02a6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02a7 7001 |p | Jump_Nonzero 0x2a9 02a8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02a9 00d9 | | Load_Top At_Offset_1 02aa 0227 | ' | Execute Access,All_Reference 02ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02ac 003a | : | Store_Top Access,At_Offset_2 02ad 00c9 | | Action Pop_Auxiliary_Loop 02ae 00d9 | | Load_Top At_Offset_1 02af 77ee |w | Jump_Nonzero 0x29e 02b0 00ce | | Action Pop_Auxiliary 02b1 00db | | Load_Top At_Offset_3 02b2 e004 | | Load 0x0,0x4 02b3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 02b4 e004 | | Load 0x0,0x4 02b5 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 02b6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02b7 0000 | | .XXX[0x1] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bc | | .CONST 0x02bc ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0002 | | .CONST 0x0002 ; Number of locals 02bb INIT_02b8: 02bb e231 | 1 | Load 0x1,0x31 02bc BODY_02b8: 02bc 00cf | | Action Mark_Auxiliary 02bd 7811 |x | Jump 0x2cf 02be e5ff | | Load 0x2,-0x1 02bf 824e | N | Call 0x1,0x4e 02c0 00da | | Load_Top At_Offset_2 02c1 0227 | ' | Execute Access,All_Reference 02c2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02c3 e004 | | Load 0x0,0x4 02c4 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 02c5 00d9 | | Load_Top At_Offset_1 02c6 0227 | ' | Execute Access,All_Reference 02c7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02c8 7001 |p | Jump_Nonzero 0x2ca 02c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02ca 00d9 | | Load_Top At_Offset_1 02cb 0227 | ' | Execute Access,All_Reference 02cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02cd 003a | : | Store_Top Access,At_Offset_2 02ce 00c9 | | Action Pop_Auxiliary_Loop 02cf 00d9 | | Load_Top At_Offset_1 02d0 77ed |w | Jump_Nonzero 0x2be 02d1 00ce | | Action Pop_Auxiliary 02d2 00db | | Load_Top At_Offset_3 02d3 824e | N | Call 0x1,0x4e 02d4 e004 | | Load 0x0,0x4 02d5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 02d6 e004 | | Load 0x0,0x4 02d7 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 02d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02d9 0000 0000 | | .BLANK 0000[0x7] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e4 | | .CONST 0x02e4 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0002 | | .CONST 0x0002 ; Number of locals 02e3 INIT_02e0: 02e3 e231 | 1 | Load 0x1,0x31 02e4 BODY_02e0: 02e4 00cf | | Action Mark_Auxiliary 02e5 7811 |x | Jump 0x2f7 02e6 e5ff | | Load 0x2,-0x1 02e7 824e | N | Call 0x1,0x4e 02e8 00da | | Load_Top At_Offset_2 02e9 0227 | ' | Execute Access,All_Reference 02ea 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02eb e004 | | Load 0x0,0x4 02ec 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 02ed 00d9 | | Load_Top At_Offset_1 02ee 0227 | ' | Execute Access,All_Reference 02ef 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02f0 7001 |p | Jump_Nonzero 0x2f2 02f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02f2 00d9 | | Load_Top At_Offset_1 02f3 0227 | ' | Execute Access,All_Reference 02f4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02f5 003a | : | Store_Top Access,At_Offset_2 02f6 00c9 | | Action Pop_Auxiliary_Loop 02f7 00d9 | | Load_Top At_Offset_1 02f8 77ed |w | Jump_Nonzero 0x2e6 02f9 00ce | | Action Pop_Auxiliary 02fa 00db | | Load_Top At_Offset_3 02fb 824e | N | Call 0x1,0x4e 02fc e004 | | Load 0x0,0x4 02fd 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 02fe e004 | | Load 0x0,0x4 02ff 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 0300 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0301 0000 0000 | | .BLANK 0000[0x7] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030c | | .CONST 0x030c ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0002 | | .CONST 0x0002 ; Number of locals 030b INIT_0308: 030b e231 | 1 | Load 0x1,0x31 030c BODY_0308: 030c 00cf | | Action Mark_Auxiliary 030d 7818 |x | Jump 0x326 030e e5fd | | Load 0x2,-0x3 030f 00d8 | | Load_Top At_Offset_0 0310 e004 | | Load 0x0,0x4 0311 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0312 0260 | ` | Execute Discrete,In_Type 0313 7001 |p | Jump_Nonzero 0x315 0314 0801 | | Execute_Immediate Raise,0x1 0315 e5fe | | Load 0x2,-0x2 0316 e5ff | | Load 0x2,-0x1 0317 e402 | | Load 0x2,0x2 0318 0227 | ' | Execute Access,All_Reference 0319 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 031a e229 | ) | Load 0x1,0x29 031b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 031c 00d9 | | Load_Top At_Offset_1 031d 0227 | ' | Execute Access,All_Reference 031e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 031f 7001 |p | Jump_Nonzero 0x321 0320 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0321 00d9 | | Load_Top At_Offset_1 0322 0227 | ' | Execute Access,All_Reference 0323 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0324 003a | : | Store_Top Access,At_Offset_2 0325 00c9 | | Action Pop_Auxiliary_Loop 0326 00d9 | | Load_Top At_Offset_1 0327 77e6 |w | Jump_Nonzero 0x30e 0328 00ce | | Action Pop_Auxiliary 0329 e5fd | | Load 0x2,-0x3 032a 00d8 | | Load_Top At_Offset_0 032b e004 | | Load 0x0,0x4 032c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 032d 0260 | ` | Execute Discrete,In_Type 032e 7001 |p | Jump_Nonzero 0x330 032f 0801 | | Execute_Immediate Raise,0x1 0330 e5fe | | Load 0x2,-0x2 0331 e5ff | | Load 0x2,-0x1 0332 e004 | | Load 0x0,0x4 0333 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0334 e229 | ) | Load 0x1,0x29 0335 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0336 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0337 0000 | | .XXX[0x1] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033c | < | .CONST 0x033c ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0002 | | .CONST 0x0002 ; Number of locals 033b INIT_0338: 033b e231 | 1 | Load 0x1,0x31 033c BODY_0338: 033c 00cf | | Action Mark_Auxiliary 033d 7818 |x | Jump 0x356 033e e5fd | | Load 0x2,-0x3 033f 00d8 | | Load_Top At_Offset_0 0340 e004 | | Load 0x0,0x4 0341 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0342 0260 | ` | Execute Discrete,In_Type 0343 7001 |p | Jump_Nonzero 0x345 0344 0801 | | Execute_Immediate Raise,0x1 0345 e5fe | | Load 0x2,-0x2 0346 e5ff | | Load 0x2,-0x1 0347 e402 | | Load 0x2,0x2 0348 0227 | ' | Execute Access,All_Reference 0349 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 034a e229 | ) | Load 0x1,0x29 034b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 034c 00d9 | | Load_Top At_Offset_1 034d 0227 | ' | Execute Access,All_Reference 034e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 034f 7001 |p | Jump_Nonzero 0x351 0350 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0351 00d9 | | Load_Top At_Offset_1 0352 0227 | ' | Execute Access,All_Reference 0353 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0354 003a | : | Store_Top Access,At_Offset_2 0355 00c9 | | Action Pop_Auxiliary_Loop 0356 00d9 | | Load_Top At_Offset_1 0357 77e6 |w | Jump_Nonzero 0x33e 0358 00ce | | Action Pop_Auxiliary 0359 e5fd | | Load 0x2,-0x3 035a 00d8 | | Load_Top At_Offset_0 035b e004 | | Load 0x0,0x4 035c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 035d 0260 | ` | Execute Discrete,In_Type 035e 7001 |p | Jump_Nonzero 0x360 035f 0801 | | Execute_Immediate Raise,0x1 0360 e5fe | | Load 0x2,-0x2 0361 e5ff | | Load 0x2,-0x1 0362 e004 | | Load 0x0,0x4 0363 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0364 e229 | ) | Load 0x1,0x29 0365 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0366 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0367 0000 | | .XXX[0x1] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036c | l | .CONST 0x036c ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0002 | | .CONST 0x0002 ; Number of locals 036b INIT_0368: 036b e231 | 1 | Load 0x1,0x31 036c BODY_0368: 036c 00cf | | Action Mark_Auxiliary 036d 7818 |x | Jump 0x386 036e e5fd | | Load 0x2,-0x3 036f 00d8 | | Load_Top At_Offset_0 0370 e004 | | Load 0x0,0x4 0371 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0372 0260 | ` | Execute Discrete,In_Type 0373 7001 |p | Jump_Nonzero 0x375 0374 0801 | | Execute_Immediate Raise,0x1 0375 e5fe | | Load 0x2,-0x2 0376 e5ff | | Load 0x2,-0x1 0377 e402 | | Load 0x2,0x2 0378 0227 | ' | Execute Access,All_Reference 0379 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 037a e012 | | Load 0x0,0x12 037b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 037c 00d9 | | Load_Top At_Offset_1 037d 0227 | ' | Execute Access,All_Reference 037e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 037f 7001 |p | Jump_Nonzero 0x381 0380 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0381 00d9 | | Load_Top At_Offset_1 0382 0227 | ' | Execute Access,All_Reference 0383 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0384 003a | : | Store_Top Access,At_Offset_2 0385 00c9 | | Action Pop_Auxiliary_Loop 0386 00d9 | | Load_Top At_Offset_1 0387 77e6 |w | Jump_Nonzero 0x36e 0388 00ce | | Action Pop_Auxiliary 0389 e5fd | | Load 0x2,-0x3 038a 00d8 | | Load_Top At_Offset_0 038b e004 | | Load 0x0,0x4 038c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 038d 0260 | ` | Execute Discrete,In_Type 038e 7001 |p | Jump_Nonzero 0x390 038f 0801 | | Execute_Immediate Raise,0x1 0390 e5fe | | Load 0x2,-0x2 0391 e5ff | | Load 0x2,-0x1 0392 e004 | | Load 0x0,0x4 0393 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0394 e012 | | Load 0x0,0x12 0395 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0396 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0397 0000 | | .XXX[0x1] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039c | | .CONST 0x039c ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0002 | | .CONST 0x0002 ; Number of locals 039b INIT_0398: 039b e231 | 1 | Load 0x1,0x31 039c BODY_0398: 039c 00cf | | Action Mark_Auxiliary 039d 7818 |x | Jump 0x3b6 039e e5fd | | Load 0x2,-0x3 039f 00d8 | | Load_Top At_Offset_0 03a0 e004 | | Load 0x0,0x4 03a1 1b12 | | Execute Package,Field_Read,Field_Number 0x12 03a2 0260 | ` | Execute Discrete,In_Type 03a3 7001 |p | Jump_Nonzero 0x3a5 03a4 0801 | | Execute_Immediate Raise,0x1 03a5 e5fe | | Load 0x2,-0x2 03a6 e5ff | | Load 0x2,-0x1 03a7 e402 | | Load 0x2,0x2 03a8 0227 | ' | Execute Access,All_Reference 03a9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03aa e012 | | Load 0x0,0x12 03ab 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03ac 00d9 | | Load_Top At_Offset_1 03ad 0227 | ' | Execute Access,All_Reference 03ae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03af 7001 |p | Jump_Nonzero 0x3b1 03b0 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03b1 00d9 | | Load_Top At_Offset_1 03b2 0227 | ' | Execute Access,All_Reference 03b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03b4 003a | : | Store_Top Access,At_Offset_2 03b5 00c9 | | Action Pop_Auxiliary_Loop 03b6 00d9 | | Load_Top At_Offset_1 03b7 77e6 |w | Jump_Nonzero 0x39e 03b8 00ce | | Action Pop_Auxiliary 03b9 e5fd | | Load 0x2,-0x3 03ba 00d8 | | Load_Top At_Offset_0 03bb e004 | | Load 0x0,0x4 03bc 1b12 | | Execute Package,Field_Read,Field_Number 0x12 03bd 0260 | ` | Execute Discrete,In_Type 03be 7001 |p | Jump_Nonzero 0x3c0 03bf 0801 | | Execute_Immediate Raise,0x1 03c0 e5fe | | Load 0x2,-0x2 03c1 e5ff | | Load 0x2,-0x1 03c2 e004 | | Load 0x0,0x4 03c3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 03c4 e012 | | Load 0x0,0x12 03c5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03c6 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03c7 0000 | | .XXX[0x1] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cb | | .CONST 0x03cb ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0001 | | .CONST 0x0001 ; Number of locals 03cb BODY_03c8: 03cb INIT_03c8: 03cb 485f |H_ | Short_Literal 0x5f 03cc 00db | | Load_Top At_Offset_3 03cd 01cb | | Execute Vector,Append 03ce e5fe | | Load 0x2,-0x2 03cf 01cc | | Execute Vector,Catenate 03d0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03d1 0000 0000 | | .BLANK 0000[0x7] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03dd | | .CONST 0x03dd ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0002 | | .CONST 0x0002 ; Number of locals 03db INIT_03d8: 03db 029f 10a3 | | Declare_Subprogram INIT_10a0,For_Call 03dd BODY_03d8: 03dd 8402 | | Call 0x2,0x2 03de 0831 | 1 | Execute_Immediate Raise,0x31 03df 0000 | | .XXX[0x1] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03ef | | .CONST 0x03ef ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0003 | | .CONST 0x0003 ; Number of locals 03e3 INIT_03e0: 03e3 e013 | | Load 0x0,0x13 03e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03e6 02c7 | | Declare_Variable Any 03e7 00d8 | | Load_Top At_Offset_0 03e8 1c00 | | Execute_Immediate Run_Utility,0x0 03e9 e013 | | Load 0x0,0x13 03ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03eb 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 03ec 02c7 | | Declare_Variable Any 03ed 00d8 | | Load_Top At_Offset_0 03ee 1c00 | | Execute_Immediate Run_Utility,0x0 03ef BODY_03e0: 03ef 4801 |H | Short_Literal 0x1 03f0 e013 | | Load 0x0,0x13 03f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03f2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03f3 e5ff | | Load 0x2,-0x1 03f4 e013 | | Load 0x0,0x13 03f5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03f6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 03f7 c402 | | Store 0x2,0x2 03f8 00d9 | | Load_Top At_Offset_1 03f9 e013 | | Load 0x0,0x13 03fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03fb 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 03fc 6812 |h | Jump_Zero 0x40f 03fd 0092 1184 | | Action Push_String_Extended,0x1184 ; "Could not find [" 03ff e5ff | | Load 0x2,-0x1 0400 01cc | | Execute Vector,Catenate 0401 0092 1185 | | Action Push_String_Extended,0x1185 ; "] to delete it." 0403 01cc | | Execute Vector,Catenate 0404 8210 | | Call 0x1,0x10 0405 0092 1186 | | Action Push_String_Extended,0x1186 ; "Error: " 0407 00da | | Load_Top At_Offset_2 0408 e013 | | Load 0x0,0x13 0409 1b0d | | Execute Package,Field_Read,Field_Number 0xd 040a 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 040b 01cc | | Execute Vector,Catenate 040c 8210 | | Call 0x1,0x10 040d e21e | | Load 0x1,0x1e 040e 0257 | W | Execute Discrete,Raise 040f 00d8 | | Load_Top At_Offset_0 0410 0120 | | Execute Any,Is_Value 0411 6804 |h | Jump_Zero 0x416 0412 e013 | | Load 0x0,0x13 0413 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0414 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 0415 7801 |x | Jump 0x417 0416 00d8 | | Load_Top At_Offset_0 0417 4fff |O | Short_Literal -0x1 0418 00db | | Load_Top At_Offset_3 0419 e013 | | Load 0x0,0x13 041a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 041b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 041c c403 | | Store 0x2,0x3 041d 00d8 | | Load_Top At_Offset_0 041e e013 | | Load 0x0,0x13 041f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0420 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0421 6812 |h | Jump_Zero 0x434 0422 0092 1187 | | Action Push_String_Extended,0x1187 ; "Could not delete [" 0424 e5ff | | Load 0x2,-0x1 0425 01cc | | Execute Vector,Catenate 0426 0092 1188 | | Action Push_String_Extended,0x1188 ; "]." 0428 01cc | | Execute Vector,Catenate 0429 8210 | | Call 0x1,0x10 042a 0092 1186 | | Action Push_String_Extended,0x1186 ; "Error: " 042c 00da | | Load_Top At_Offset_2 042d e013 | | Load 0x0,0x13 042e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 042f 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0430 01cc | | Execute Vector,Catenate 0431 8210 | | Call 0x1,0x10 0432 e21e | | Load 0x1,0x1e 0433 0257 | W | Execute Discrete,Raise 0434 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0435 0000 0000 | | .XXX[0x3] 0437 0000 | | 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 0442 | B | .CONST 0x0442 ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0003 | | .CONST 0x0003 ; Number of locals 043b INIT_0438: 043b e004 | | Load 0x0,0x4 043c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 043d 02c7 | | Declare_Variable Any 043e 00d8 | | Load_Top At_Offset_0 043f 1c00 | | Execute_Immediate Run_Utility,0x0 0440 029f 10bb | | Declare_Subprogram INIT_10b8,For_Call 0442 BODY_0438: 0442 00be | | Action Activate_Tasks 0443 8403 | | Call 0x2,0x3 0444 0831 | 1 | Execute_Immediate Raise,0x31 0445 0000 0000 | | .XXX[0x3] 0447 0000 | | 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 046d | m | .CONST 0x046d ; Address of begin 0449 0597 | | .CONST 0x0597 ; Address of exception handler 044a 000e | | .CONST 0x000e ; Number of locals 044b INIT_0448: 044b e004 | | Load 0x0,0x4 044c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 044d 02c7 | | Declare_Variable Any 044e 00d8 | | Load_Top At_Offset_0 044f 1c00 | | Execute_Immediate Run_Utility,0x0 0450 e004 | | Load 0x0,0x4 0451 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0452 02c7 | | Declare_Variable Any 0453 00d8 | | Load_Top At_Offset_0 0454 1c00 | | Execute_Immediate Run_Utility,0x0 0455 00e1 | | Load_Encached Boolean_Cache 0456 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0457 4801 |H | Short_Literal 0x1 0458 614f |aO | Indirect_Literal Discrete,0x5a8,{0x00000000, 0x00000400} 0459 00e9 | | Load_Encached String_Cache 045a 035b | [ | Declare_Type Array,Constrained 045b 0337 | 7 | Declare_Variable Array 045c 4801 |H | Short_Literal 0x1 045d 614a |aJ | Indirect_Literal Discrete,0x5a8,{0x00000000, 0x00000400} 045e 00e9 | | Load_Encached String_Cache 045f 035b | [ | Declare_Type Array,Constrained 0460 0337 | 7 | Declare_Variable Array 0461 00e3 | | Load_Encached Natural_Cache 0462 00e3 | | Load_Encached Natural_Cache 0463 00e1 | | Load_Encached Boolean_Cache 0464 00e1 | | Load_Encached Boolean_Cache 0465 00e1 | | Load_Encached Boolean_Cache 0466 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0467 00e1 | | Load_Encached Boolean_Cache 0468 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0469 029f 10d3 | | Declare_Subprogram INIT_10d0,For_Call 046b 029f 10eb | | Declare_Subprogram INIT_10e8,For_Call 046d BODY_0448: 046d 00be | | Action Activate_Tasks 046e 840d | | Call 0x2,0xd 046f 840e | | Call 0x2,0xe 0470 e5fc | | Load 0x2,-0x4 0471 68a8 |h | Jump_Zero 0x51a 0472 e5fd | | Load 0x2,-0x3 0473 6858 |hX | Jump_Zero 0x4cc 0474 00cf | | Action Mark_Auxiliary 0475 00cf | | Action Mark_Auxiliary 0476 0007 | | Action Break_Optional 0477 00e1 | | Load_Encached Boolean_Cache 0478 00e1 | | Load_Encached Boolean_Cache 0479 00e3 | | Load_Encached Natural_Cache 047a e405 | | Load 0x2,0x5 047b e402 | | Load 0x2,0x2 047c 8251 | Q | Call 0x1,0x51 047d 00d1 | | Pop_Control Pop_Count_1 047e c407 | | Store 0x2,0x7 047f c409 | | Store 0x2,0x9 0480 c40b | | Store 0x2,0xb 0481 e40b | | Load 0x2,0xb 0482 7009 |p | Jump_Nonzero 0x48c 0483 4801 |H | Short_Literal 0x1 0484 e407 | | Load 0x2,0x7 0485 e405 | | Load 0x2,0x5 0486 01cf | | Execute Vector,Slice_Read 0487 8253 | S | Call 0x1,0x53 0488 7001 |p | Jump_Nonzero 0x48a 0489 7802 |x | Jump 0x48c 048a 00c9 | | Action Pop_Auxiliary_Loop 048b 7feb | | Jump 0x477 048c 00c9 | | Action Pop_Auxiliary_Loop 048d 0007 | | Action Break_Optional 048e 00e1 | | Load_Encached Boolean_Cache 048f 00e1 | | Load_Encached Boolean_Cache 0490 00e3 | | Load_Encached Natural_Cache 0491 e406 | | Load 0x2,0x6 0492 e403 | | Load 0x2,0x3 0493 8251 | Q | Call 0x1,0x51 0494 00d1 | | Pop_Control Pop_Count_1 0495 c408 | | Store 0x2,0x8 0496 c40a | | Store 0x2,0xa 0497 c40c | | Store 0x2,0xc 0498 e40c | | Load 0x2,0xc 0499 7009 |p | Jump_Nonzero 0x4a3 049a 4801 |H | Short_Literal 0x1 049b e408 | | Load 0x2,0x8 049c e406 | | Load 0x2,0x6 049d 01cf | | Execute Vector,Slice_Read 049e 8253 | S | Call 0x1,0x53 049f 7001 |p | Jump_Nonzero 0x4a1 04a0 7802 |x | Jump 0x4a3 04a1 00c9 | | Action Pop_Auxiliary_Loop 04a2 7feb | | Jump 0x48e 04a3 00ce | | Action Pop_Auxiliary 04a4 4801 |H | Short_Literal 0x1 04a5 e407 | | Load 0x2,0x7 04a6 e405 | | Load 0x2,0x5 04a7 01cf | | Execute Vector,Slice_Read 04a8 4801 |H | Short_Literal 0x1 04a9 e408 | | Load 0x2,0x8 04aa e406 | | Load 0x2,0x6 04ab 01cf | | Execute Vector,Slice_Read 04ac 01de | | Execute Vector,Not_Equal 04ad 680a |h | Jump_Zero 0x4b8 04ae 4801 |H | Short_Literal 0x1 04af e408 | | Load 0x2,0x8 04b0 e406 | | Load 0x2,0x6 04b1 01cf | | Execute Vector,Slice_Read 04b2 4801 |H | Short_Literal 0x1 04b3 e407 | | Load 0x2,0x7 04b4 e405 | | Load 0x2,0x5 04b5 01cf | | Execute Vector,Slice_Read 04b6 8252 | R | Call 0x1,0x52 04b7 6808 |h | Jump_Zero 0x4c0 04b8 e409 | | Load 0x2,0x9 04b9 e40a | | Load 0x2,0xa 04ba 027e | ~ | Execute Discrete,Not_Equal 04bb 7004 |p | Jump_Nonzero 0x4c0 04bc e40b | | Load 0x2,0xb 04bd e40c | | Load 0x2,0xc 04be 027e | ~ | Execute Discrete,Not_Equal 04bf 6803 |h | Jump_Zero 0x4c3 04c0 4800 |H | Short_Literal 0x0 04c1 a404 | | Store_Unchecked 0x2,0x4 04c2 7807 |x | Jump 0x4ca 04c3 e40b | | Load 0x2,0xb 04c4 6803 |h | Jump_Zero 0x4c8 04c5 4801 |H | Short_Literal 0x1 04c6 a404 | | Store_Unchecked 0x2,0x4 04c7 7802 |x | Jump 0x4ca 04c8 00c9 | | Action Pop_Auxiliary_Loop 04c9 7fab | | Jump 0x475 04ca 00ce | | Action Pop_Auxiliary 04cb 78c1 |x | Jump 0x58d 04cc 00cf | | Action Mark_Auxiliary 04cd 00cf | | Action Mark_Auxiliary 04ce 0007 | | Action Break_Optional 04cf 00e1 | | Load_Encached Boolean_Cache 04d0 00e1 | | Load_Encached Boolean_Cache 04d1 00e3 | | Load_Encached Natural_Cache 04d2 e405 | | Load 0x2,0x5 04d3 e402 | | Load 0x2,0x2 04d4 8251 | Q | Call 0x1,0x51 04d5 00d1 | | Pop_Control Pop_Count_1 04d6 c407 | | Store 0x2,0x7 04d7 c409 | | Store 0x2,0x9 04d8 c40b | | Store 0x2,0xb 04d9 e40b | | Load 0x2,0xb 04da 7009 |p | Jump_Nonzero 0x4e4 04db 4801 |H | Short_Literal 0x1 04dc e407 | | Load 0x2,0x7 04dd e405 | | Load 0x2,0x5 04de 01cf | | Execute Vector,Slice_Read 04df 8253 | S | Call 0x1,0x53 04e0 7001 |p | Jump_Nonzero 0x4e2 04e1 7802 |x | Jump 0x4e4 04e2 00c9 | | Action Pop_Auxiliary_Loop 04e3 7feb | | Jump 0x4cf 04e4 00c9 | | Action Pop_Auxiliary_Loop 04e5 0007 | | Action Break_Optional 04e6 00e1 | | Load_Encached Boolean_Cache 04e7 00e1 | | Load_Encached Boolean_Cache 04e8 00e3 | | Load_Encached Natural_Cache 04e9 e406 | | Load 0x2,0x6 04ea e403 | | Load 0x2,0x3 04eb 8251 | Q | Call 0x1,0x51 04ec 00d1 | | Pop_Control Pop_Count_1 04ed c408 | | Store 0x2,0x8 04ee c40a | | Store 0x2,0xa 04ef c40c | | Store 0x2,0xc 04f0 e40c | | Load 0x2,0xc 04f1 7009 |p | Jump_Nonzero 0x4fb 04f2 4801 |H | Short_Literal 0x1 04f3 e408 | | Load 0x2,0x8 04f4 e406 | | Load 0x2,0x6 04f5 01cf | | Execute Vector,Slice_Read 04f6 8253 | S | Call 0x1,0x53 04f7 7001 |p | Jump_Nonzero 0x4f9 04f8 7802 |x | Jump 0x4fb 04f9 00c9 | | Action Pop_Auxiliary_Loop 04fa 7feb | | Jump 0x4e6 04fb 00ce | | Action Pop_Auxiliary 04fc 4801 |H | Short_Literal 0x1 04fd e407 | | Load 0x2,0x7 04fe e405 | | Load 0x2,0x5 04ff 01cf | | Execute Vector,Slice_Read 0500 4801 |H | Short_Literal 0x1 0501 e408 | | Load 0x2,0x8 0502 e406 | | Load 0x2,0x6 0503 01cf | | Execute Vector,Slice_Read 0504 01de | | Execute Vector,Not_Equal 0505 7008 |p | Jump_Nonzero 0x50e 0506 e409 | | Load 0x2,0x9 0507 e40a | | Load 0x2,0xa 0508 027e | ~ | Execute Discrete,Not_Equal 0509 7004 |p | Jump_Nonzero 0x50e 050a e40b | | Load 0x2,0xb 050b e40c | | Load 0x2,0xc 050c 027e | ~ | Execute Discrete,Not_Equal 050d 6803 |h | Jump_Zero 0x511 050e 4800 |H | Short_Literal 0x0 050f a404 | | Store_Unchecked 0x2,0x4 0510 7807 |x | Jump 0x518 0511 e40b | | Load 0x2,0xb 0512 6803 |h | Jump_Zero 0x516 0513 4801 |H | Short_Literal 0x1 0514 a404 | | Store_Unchecked 0x2,0x4 0515 7802 |x | Jump 0x518 0516 00c9 | | Action Pop_Auxiliary_Loop 0517 7fb5 | | Jump 0x4cd 0518 00ce | | Action Pop_Auxiliary 0519 7873 |xs | Jump 0x58d 051a e5fd | | Load 0x2,-0x3 051b 683e |h> | Jump_Zero 0x55a 051c 00cf | | Action Mark_Auxiliary 051d 0007 | | Action Break_Optional 051e 00e1 | | Load_Encached Boolean_Cache 051f 00e1 | | Load_Encached Boolean_Cache 0520 00e3 | | Load_Encached Natural_Cache 0521 e405 | | Load 0x2,0x5 0522 e402 | | Load 0x2,0x2 0523 8251 | Q | Call 0x1,0x51 0524 00d1 | | Pop_Control Pop_Count_1 0525 c407 | | Store 0x2,0x7 0526 c409 | | Store 0x2,0x9 0527 c40b | | Store 0x2,0xb 0528 00e1 | | Load_Encached Boolean_Cache 0529 00e1 | | Load_Encached Boolean_Cache 052a 00e3 | | Load_Encached Natural_Cache 052b e406 | | Load 0x2,0x6 052c e403 | | Load 0x2,0x3 052d 8251 | Q | Call 0x1,0x51 052e 00d1 | | Pop_Control Pop_Count_1 052f c408 | | Store 0x2,0x8 0530 c40a | | Store 0x2,0xa 0531 c40c | | Store 0x2,0xc 0532 4801 |H | Short_Literal 0x1 0533 e407 | | Load 0x2,0x7 0534 e405 | | Load 0x2,0x5 0535 01cf | | Execute Vector,Slice_Read 0536 4801 |H | Short_Literal 0x1 0537 e408 | | Load 0x2,0x8 0538 e406 | | Load 0x2,0x6 0539 01cf | | Execute Vector,Slice_Read 053a 01de | | Execute Vector,Not_Equal 053b 680a |h | Jump_Zero 0x546 053c 4801 |H | Short_Literal 0x1 053d e408 | | Load 0x2,0x8 053e e406 | | Load 0x2,0x6 053f 01cf | | Execute Vector,Slice_Read 0540 4801 |H | Short_Literal 0x1 0541 e407 | | Load 0x2,0x7 0542 e405 | | Load 0x2,0x5 0543 01cf | | Execute Vector,Slice_Read 0544 8252 | R | Call 0x1,0x52 0545 6808 |h | Jump_Zero 0x54e 0546 e409 | | Load 0x2,0x9 0547 e40a | | Load 0x2,0xa 0548 027e | ~ | Execute Discrete,Not_Equal 0549 7004 |p | Jump_Nonzero 0x54e 054a e40b | | Load 0x2,0xb 054b e40c | | Load 0x2,0xc 054c 027e | ~ | Execute Discrete,Not_Equal 054d 6803 |h | Jump_Zero 0x551 054e 4800 |H | Short_Literal 0x0 054f a404 | | Store_Unchecked 0x2,0x4 0550 7807 |x | Jump 0x558 0551 e40b | | Load 0x2,0xb 0552 6803 |h | Jump_Zero 0x556 0553 4801 |H | Short_Literal 0x1 0554 a404 | | Store_Unchecked 0x2,0x4 0555 7802 |x | Jump 0x558 0556 00c9 | | Action Pop_Auxiliary_Loop 0557 7fc6 | | Jump 0x51e 0558 00ce | | Action Pop_Auxiliary 0559 7833 |x3 | Jump 0x58d 055a 00cf | | Action Mark_Auxiliary 055b 0007 | | Action Break_Optional 055c 00e1 | | Load_Encached Boolean_Cache 055d 00e1 | | Load_Encached Boolean_Cache 055e 00e3 | | Load_Encached Natural_Cache 055f e405 | | Load 0x2,0x5 0560 e402 | | Load 0x2,0x2 0561 8251 | Q | Call 0x1,0x51 0562 00d1 | | Pop_Control Pop_Count_1 0563 c407 | | Store 0x2,0x7 0564 c409 | | Store 0x2,0x9 0565 c40b | | Store 0x2,0xb 0566 00e1 | | Load_Encached Boolean_Cache 0567 00e1 | | Load_Encached Boolean_Cache 0568 00e3 | | Load_Encached Natural_Cache 0569 e406 | | Load 0x2,0x6 056a e403 | | Load 0x2,0x3 056b 8251 | Q | Call 0x1,0x51 056c 00d1 | | Pop_Control Pop_Count_1 056d c408 | | Store 0x2,0x8 056e c40a | | Store 0x2,0xa 056f c40c | | Store 0x2,0xc 0570 4801 |H | Short_Literal 0x1 0571 e407 | | Load 0x2,0x7 0572 e405 | | Load 0x2,0x5 0573 01cf | | Execute Vector,Slice_Read 0574 4801 |H | Short_Literal 0x1 0575 e408 | | Load 0x2,0x8 0576 e406 | | Load 0x2,0x6 0577 01cf | | Execute Vector,Slice_Read 0578 01de | | Execute Vector,Not_Equal 0579 7008 |p | Jump_Nonzero 0x582 057a e409 | | Load 0x2,0x9 057b e40a | | Load 0x2,0xa 057c 027e | ~ | Execute Discrete,Not_Equal 057d 7004 |p | Jump_Nonzero 0x582 057e e40b | | Load 0x2,0xb 057f e40c | | Load 0x2,0xc 0580 027e | ~ | Execute Discrete,Not_Equal 0581 6803 |h | Jump_Zero 0x585 0582 4800 |H | Short_Literal 0x0 0583 a404 | | Store_Unchecked 0x2,0x4 0584 7807 |x | Jump 0x58c 0585 e40b | | Load 0x2,0xb 0586 6803 |h | Jump_Zero 0x58a 0587 4801 |H | Short_Literal 0x1 0588 a404 | | Store_Unchecked 0x2,0x4 0589 7802 |x | Jump 0x58c 058a 00c9 | | Action Pop_Auxiliary_Loop 058b 7fd0 | | Jump 0x55c 058c 00ce | | Action Pop_Auxiliary 058d e402 | | Load 0x2,0x2 058e e004 | | Load 0x0,0x4 058f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0590 c402 | | Store 0x2,0x2 0591 e403 | | Load 0x2,0x3 0592 e004 | | Load 0x0,0x4 0593 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0594 c403 | | Store 0x2,0x3 0595 e404 | | Load 0x2,0x4 0596 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0597 TRAP_0448: 0597 0007 | | Action Break_Optional 0598 0092 1189 | | Action Push_String_Extended,0x1189 ; "%%% Unexpected exception in Text_Io.Files_Equal?" 059a 8217 | | Call 0x1,0x17 059b e402 | | Load 0x2,0x2 059c e004 | | Load 0x0,0x4 059d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 059e c402 | | Store 0x2,0x2 059f e403 | | Load 0x2,0x3 05a0 e004 | | Load 0x0,0x4 05a1 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05a2 c403 | | Store 0x2,0x3 05a3 4800 |H | Short_Literal 0x0 05a4 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 05a5 0000 0000 | | .XXX[0x3] 05a7 0000 | | 05a8 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 05ac 0000 0000 | | .BLANK 0000[0x4] 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05c8 | | .CONST 0x05c8 ; Address of begin 05b1 062a | * | .CONST 0x062a ; Address of exception handler 05b2 0009 | | .CONST 0x0009 ; Number of locals 05b3 INIT_05b0: 05b3 e004 | | Load 0x0,0x4 05b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05b5 02c7 | | Declare_Variable Any 05b6 00d8 | | Load_Top At_Offset_0 05b7 1c00 | | Execute_Immediate Run_Utility,0x0 05b8 e004 | | Load 0x0,0x4 05b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05ba 02c7 | | Declare_Variable Any 05bb 00d8 | | Load_Top At_Offset_0 05bc 1c00 | | Execute_Immediate Run_Utility,0x0 05bd e23b | ; | Load 0x1,0x3b 05be 0007 | | Action Break_Optional 05bf e23b | ; | Load 0x1,0x3b 05c0 0007 | | Action Break_Optional 05c1 e00b | | Load 0x0,0xb 05c2 0007 | | Action Break_Optional 05c3 e00b | | Load 0x0,0xb 05c4 029f 110b | | Declare_Subprogram INIT_1108,For_Call 05c6 029f 1123 | #| Declare_Subprogram INIT_1120,For_Call 05c8 BODY_05b0: 05c8 00be | | Action Activate_Tasks 05c9 0092 118a | | Action Push_String_Extended,0x118a ; "::: diff( " 05cb e5ff | | Load 0x2,-0x1 05cc 01cc | | Execute Vector,Catenate 05cd 0092 118b | | Action Push_String_Extended,0x118b ; ", " 05cf 01cc | | Execute Vector,Catenate 05d0 e5fe | | Load 0x2,-0x2 05d1 01cc | | Execute Vector,Catenate 05d2 0092 118c | | Action Push_String_Extended,0x118c ; " );" 05d4 01cc | | Execute Vector,Catenate 05d5 8217 | | Call 0x1,0x17 05d6 8408 | | Call 0x2,0x8 05d7 8409 | | Call 0x2,0x9 05d8 00db | | Load_Top At_Offset_3 05d9 e404 | | Load 0x2,0x4 05da e5fd | | Load 0x2,-0x3 05db e402 | | Load 0x2,0x2 05dc 8255 | U | Call 0x1,0x55 05dd c404 | | Store 0x2,0x4 05de c406 | | Store 0x2,0x6 05df 00da | | Load_Top At_Offset_2 05e0 e405 | | Load 0x2,0x5 05e1 e5fd | | Load 0x2,-0x3 05e2 e403 | | Load 0x2,0x3 05e3 8255 | U | Call 0x1,0x55 05e4 c405 | | Store 0x2,0x5 05e5 005b | [ | Store_Top Discrete,At_Offset_3 05e6 e402 | | Load 0x2,0x2 05e7 e004 | | Load 0x0,0x4 05e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05e9 c402 | | Store 0x2,0x2 05ea e403 | | Load 0x2,0x3 05eb e004 | | Load 0x0,0x4 05ec 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05ed c403 | | Store 0x2,0x3 05ee e5fd | | Load 0x2,-0x3 05ef 681a |h | Jump_Zero 0x60a 05f0 e5fc | | Load 0x2,-0x4 05f1 680c |h | Jump_Zero 0x5fe 05f2 4801 |H | Short_Literal 0x1 05f3 00db | | Load_Top At_Offset_3 05f4 e405 | | Load 0x2,0x5 05f5 0227 | ' | Execute Access,All_Reference 05f6 01cf | | Execute Vector,Slice_Read 05f7 4801 |H | Short_Literal 0x1 05f8 e406 | | Load 0x2,0x6 05f9 e404 | | Load 0x2,0x4 05fa 0227 | ' | Execute Access,All_Reference 05fb 01cf | | Execute Vector,Slice_Read 05fc 825a | Z | Call 0x1,0x5a 05fd 7825 |x% | Jump 0x623 05fe 4801 |H | Short_Literal 0x1 05ff 00db | | Load_Top At_Offset_3 0600 e405 | | Load 0x2,0x5 0601 0227 | ' | Execute Access,All_Reference 0602 01cf | | Execute Vector,Slice_Read 0603 4801 |H | Short_Literal 0x1 0604 e406 | | Load 0x2,0x6 0605 e404 | | Load 0x2,0x4 0606 0227 | ' | Execute Access,All_Reference 0607 01cf | | Execute Vector,Slice_Read 0608 8259 | Y | Call 0x1,0x59 0609 7819 |x | Jump 0x623 060a e5fc | | Load 0x2,-0x4 060b 680c |h | Jump_Zero 0x618 060c 4801 |H | Short_Literal 0x1 060d 00db | | Load_Top At_Offset_3 060e e405 | | Load 0x2,0x5 060f 0227 | ' | Execute Access,All_Reference 0610 01cf | | Execute Vector,Slice_Read 0611 4801 |H | Short_Literal 0x1 0612 e406 | | Load 0x2,0x6 0613 e404 | | Load 0x2,0x4 0614 0227 | ' | Execute Access,All_Reference 0615 01cf | | Execute Vector,Slice_Read 0616 8258 | X | Call 0x1,0x58 0617 780b |x | Jump 0x623 0618 4801 |H | Short_Literal 0x1 0619 00db | | Load_Top At_Offset_3 061a e405 | | Load 0x2,0x5 061b 0227 | ' | Execute Access,All_Reference 061c 01cf | | Execute Vector,Slice_Read 061d 4801 |H | Short_Literal 0x1 061e e406 | | Load 0x2,0x6 061f e404 | | Load 0x2,0x4 0620 0227 | ' | Execute Access,All_Reference 0621 01cf | | Execute Vector,Slice_Read 0622 8257 | W | Call 0x1,0x57 0623 e404 | | Load 0x2,0x4 0624 8250 | P | Call 0x1,0x50 0625 c404 | | Store 0x2,0x4 0626 e405 | | Load 0x2,0x5 0627 8250 | P | Call 0x1,0x50 0628 c405 | | Store 0x2,0x5 0629 4505 |E | Exit_Suprogram New_Top_Offset 0x5 062a TRAP_05b0: 062a 0007 | | Action Break_Optional 062b e404 | | Load 0x2,0x4 062c 8250 | P | Call 0x1,0x50 062d c404 | | Store 0x2,0x4 062e e405 | | Load 0x2,0x5 062f 8250 | P | Call 0x1,0x50 0630 c405 | | Store 0x2,0x5 0631 0092 118d | | Action Push_String_Extended,0x118d ; "%%% Unexpected exception in Text_Io.Files_Diff?" 0633 8217 | | Call 0x1,0x17 0634 e402 | | Load 0x2,0x2 0635 e004 | | Load 0x0,0x4 0636 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0637 c402 | | Store 0x2,0x2 0638 e403 | | Load 0x2,0x3 0639 e004 | | Load 0x0,0x4 063a 1816 | | Execute Package,Field_Execute,Field_Number 0x16 063b c403 | | Store 0x2,0x3 063c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 063d 0000 0000 | | .XXX[0x3] 063f 0000 | | 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 064f | O | .CONST 0x064f ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0005 | | .CONST 0x0005 ; Number of locals 0643 INIT_0640: 0643 e013 | | Load 0x0,0x13 0644 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0645 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0646 02c7 | | Declare_Variable Any 0647 00d8 | | Load_Top At_Offset_0 0648 1c00 | | Execute_Immediate Run_Utility,0x0 0649 e246 | F | Load 0x1,0x46 064a 0007 | | Action Break_Optional 064b e246 | F | Load 0x1,0x46 064c 0007 | | Action Break_Optional 064d e232 | 2 | Load 0x1,0x32 064e 0007 | | Action Break_Optional 064f BODY_0640: 064f 4801 |H | Short_Literal 0x1 0650 e013 | | Load 0x0,0x13 0651 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0652 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0653 e5ff | | Load 0x2,-0x1 0654 e5fe | | Load 0x2,-0x2 0655 01cc | | Execute Vector,Catenate 0656 e013 | | Load 0x0,0x13 0657 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0658 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0659 c402 | | Store 0x2,0x2 065a 00db | | Load_Top At_Offset_3 065b e013 | | Load 0x0,0x13 065c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 065d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 065e 6814 |h | Jump_Zero 0x673 065f 0092 118e | | Action Push_String_Extended,0x118e ; "Could not locate wildcards [" 0661 e5ff | | Load 0x2,-0x1 0662 01cc | | Execute Vector,Catenate 0663 e5fe | | Load 0x2,-0x2 0664 01cc | | Execute Vector,Catenate 0665 0092 1188 | | Action Push_String_Extended,0x1188 ; "]." 0667 01cc | | Execute Vector,Catenate 0668 8210 | | Call 0x1,0x10 0669 0092 1186 | | Action Push_String_Extended,0x1186 ; "Error: " 066b e402 | | Load 0x2,0x2 066c e013 | | Load 0x0,0x13 066d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 066e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 066f 01cc | | Execute Vector,Catenate 0670 8210 | | Call 0x1,0x10 0671 e21e | | Load 0x1,0x1e 0672 0257 | W | Execute Discrete,Raise 0673 e246 | F | Load 0x1,0x46 0674 a24d | M | Store_Unchecked 0x1,0x4d 0675 e246 | F | Load 0x1,0x46 0676 003a | : | Store_Top Access,At_Offset_2 0677 00cf | | Action Mark_Auxiliary 0678 7827 |x' | Jump 0x6a0 0679 e402 | | Load 0x2,0x2 067a e013 | | Load 0x0,0x13 067b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 067c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 067d e013 | | Load 0x0,0x13 067e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 067f 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0680 e232 | 2 | Load 0x1,0x32 0681 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0682 003a | : | Store_Top Access,At_Offset_2 0683 e247 | G | Load 0x1,0x47 0684 0322 | " | Declare_Variable Record 0685 e246 | F | Load 0x1,0x46 0686 00d9 | | Load_Top At_Offset_1 0687 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0688 00da | | Load_Top At_Offset_2 0689 00d9 | | Load_Top At_Offset_1 068a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 068b e246 | F | Load 0x1,0x46 068c 03b6 | | Declare_Variable Access,By_Allocation,With_Value 068d a403 | | Store_Unchecked 0x2,0x3 068e 00da | | Load_Top At_Offset_2 068f 6804 |h | Jump_Zero 0x694 0690 00db | | Load_Top At_Offset_3 0691 00db | | Load_Top At_Offset_3 0692 0227 | ' | Execute Access,All_Reference 0693 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0694 00db | | Load_Top At_Offset_3 0695 003b | ; | Store_Top Access,At_Offset_3 0696 e24d | M | Load 0x1,0x4d 0697 7002 |p | Jump_Nonzero 0x69a 0698 00db | | Load_Top At_Offset_3 0699 a24d | M | Store_Unchecked 0x1,0x4d 069a e402 | | Load 0x2,0x2 069b e013 | | Load 0x0,0x13 069c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 069d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 069e c402 | | Store 0x2,0x2 069f 00c9 | | Action Pop_Auxiliary_Loop 06a0 e402 | | Load 0x2,0x2 06a1 e013 | | Load 0x0,0x13 06a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06a3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 06a4 6fd4 |o | Jump_Zero 0x679 06a5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06a6 0000 0000 | | .XXX[0x2] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06ad | | .CONST 0x06ad ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0002 | | .CONST 0x0002 ; Number of locals 06ab INIT_06a8: 06ab e246 | F | Load 0x1,0x46 06ac 0007 | | Action Break_Optional 06ad BODY_06a8: 06ad e24d | M | Load 0x1,0x4d 06ae 7002 |p | Jump_Nonzero 0x6b1 06af e21e | | Load 0x1,0x1e 06b0 0257 | W | Execute Discrete,Raise 06b1 e24d | M | Load 0x1,0x4d 06b2 0039 | 9 | Store_Top Access,At_Offset_1 06b3 e24d | M | Load 0x1,0x4d 06b4 0227 | ' | Execute Access,All_Reference 06b5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06b6 a24d | M | Store_Unchecked 0x1,0x4d 06b7 00d8 | | Load_Top At_Offset_0 06b8 824f | O | Call 0x1,0x4f 06b9 0039 | 9 | Store_Top Access,At_Offset_1 06ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06bb 0000 0000 | | .BLANK 0000[0x5] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c3 | | .CONST 0x06c3 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0001 | | .CONST 0x0001 ; Number of locals 06c3 BODY_06c0: 06c3 INIT_06c0: 06c3 e24d | M | Load 0x1,0x4d 06c4 7002 |p | Jump_Nonzero 0x6c7 06c5 e21e | | Load 0x1,0x1e 06c6 0257 | W | Execute Discrete,Raise 06c7 e24d | M | Load 0x1,0x4d 06c8 0227 | ' | Execute Access,All_Reference 06c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 06ca 0227 | ' | Execute Access,All_Reference 06cb 0335 | 5 | Declare_Variable Array,Duplicate 06cc 00cd | | Action Spare6_Action 06cd 00ca | | Action Exit_Nullary_Function 06ce 0000 0000 | | .XXX[0x2] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06d3 | | .CONST 0x06d3 ; Address of begin 06d1 0004 | | .CONST 0x0004 ; Address of exception handler 06d2 0001 | | .CONST 0x0001 ; Number of locals 06d3 BODY_06d0: 06d3 INIT_06d0: 06d3 e24d | M | Load 0x1,0x4d 06d4 022d | - | Execute Access,Is_Null 06d5 00ca | | Action Exit_Nullary_Function 06d6 0000 0000 | | .XXX[0x2] 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; SUBPROGRAM 06d8 ; -------------------------------------------------------------------------------------- 06d8 06db | | .CONST 0x06db ; Address of begin 06d9 0004 | | .CONST 0x0004 ; Address of exception handler 06da 0001 | | .CONST 0x0001 ; Number of locals 06db BODY_06d8: 06db INIT_06d8: 06db 4601 |F | Jump_Case 0x2 06dc 7801 |x | Jump 0x6de ; case 0x0 06dd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 06de 00da | | Load_Top At_Offset_2 06df 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06e0 0125 | % | Execute Any,Set_Constraint 06e1 00da | | Load_Top At_Offset_2 06e2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06e3 1c00 | | Execute_Immediate Run_Utility,0x0 06e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06e5 0000 0000 | | .XXX[0x3] 06e7 0000 | | 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06fa | | .CONST 0x06fa ; Address of begin 06e9 0004 | | .CONST 0x0004 ; Address of exception handler 06ea 0002 | | .CONST 0x0002 ; Number of locals 06eb INIT_06e8: 06eb 4801 |H | Short_Literal 0x1 06ec 00db | | Load_Top At_Offset_3 06ed 01db | | Execute Vector,Length 06ee 00d8 | | Load_Top At_Offset_0 06ef 00e2 | | Load_Encached Integer_Cache 06f0 0260 | ` | Execute Discrete,In_Type 06f1 7001 |p | Jump_Nonzero 0x6f3 06f2 0801 | | Execute_Immediate Raise,0x1 06f3 00e9 | | Load_Encached String_Cache 06f4 035b | [ | Declare_Type Array,Constrained 06f5 0337 | 7 | Declare_Variable Array 06f6 00db | | Load_Top At_Offset_3 06f7 8014 | | Call 0x0,0x14 06f8 00d9 | | Load_Top At_Offset_1 06f9 01d4 | | Execute Vector,Structure_Write 06fa BODY_06e8: 06fa 00cf | | Action Mark_Auxiliary 06fb 00d9 | | Load_Top At_Offset_1 06fc 01d9 | | Execute Vector,Reverse_Bounds 06fd 0263 | c | Execute Discrete,Above_Bound 06fe 702a |p* | Jump_Nonzero 0x729 06ff 00d8 | | Load_Top At_Offset_0 0700 e402 | | Load 0x2,0x2 0701 01d7 | | Execute Vector,Field_Read 0702 4820 |H | Short_Literal 0x20 0703 487f |H | Short_Literal 0x7f 0704 0261 | a | Execute Discrete,Not_In_Range 0705 6821 |h! | Jump_Zero 0x727 0706 485c |H\ | Short_Literal 0x5c 0707 485c |H\ | Short_Literal 0x5c 0708 4801 |H | Short_Literal 0x1 0709 00db | | Load_Top At_Offset_3 070a 0aff | | Execute_Immediate Plus,-0x1 070b e402 | | Load 0x2,0x2 070c 01cf | | Execute Vector,Slice_Read 070d 01cb | | Execute Vector,Append 070e 00da | | Load_Top At_Offset_2 070f e402 | | Load 0x2,0x2 0710 01d7 | | Execute Vector,Field_Read 0711 00d8 | | Load_Top At_Offset_0 0712 00e2 | | Load_Encached Integer_Cache 0713 0260 | ` | Execute Discrete,In_Type 0714 7001 |p | Jump_Nonzero 0x716 0715 0801 | | Execute_Immediate Raise,0x1 0716 00e0 | | Load_Encached Standard_Cache 0717 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0718 01cc | | Execute Vector,Catenate 0719 01cb | | Execute Vector,Append 071a e5ff | | Load 0x2,-0x1 071b 01dd | | Execute Vector,First 071c 00da | | Load_Top At_Offset_2 071d 0273 | s | Execute Discrete,Plus 071e e5ff | | Load 0x2,-0x1 071f 01dc | | Execute Vector,Last 0720 e5ff | | Load 0x2,-0x1 0721 01cf | | Execute Vector,Slice_Read 0722 824e | N | Call 0x1,0x4e 0723 01cc | | Execute Vector,Catenate 0724 00e9 | | Load_Encached String_Cache 0725 01c6 | | Execute Vector,Convert_To_Formal 0726 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0727 00c8 | | Action Pop_Auxiliary_Range 0728 3fd6 |? | Loop_Increasing 0x6ff 0729 00ce | | Action Pop_Auxiliary 072a 00d8 | | Load_Top At_Offset_0 072b 00e9 | | Load_Encached String_Cache 072c 01c6 | | Execute Vector,Convert_To_Formal 072d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 072e 0000 0000 | | .XXX[0x2] 0730 ; -------------------------------------------------------------------------------------- 0730 ; SUBPROGRAM 0730 ; -------------------------------------------------------------------------------------- 0730 0733 | 3 | .CONST 0x0733 ; Address of begin 0731 0004 | | .CONST 0x0004 ; Address of exception handler 0732 0001 | | .CONST 0x0001 ; Number of locals 0733 BODY_0730: 0733 INIT_0730: 0733 00da | | Load_Top At_Offset_2 0734 0229 | ) | Execute Access,All_Read 0735 00d8 | | Load_Top At_Offset_0 0736 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0737 e233 | 3 | Load 0x1,0x33 0738 e234 | 4 | Load 0x1,0x34 0739 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 073a 8005 | | Call 0x0,0x5 073b 00d9 | | Load_Top At_Offset_1 073c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 073d 00d1 | | Pop_Control Pop_Count_1 073e 00da | | Load_Top At_Offset_2 073f e248 | H | Load 0x1,0x48 0740 e249 | I | Load 0x1,0x49 0741 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 0742 8005 | | Call 0x0,0x5 0743 003b | ; | Store_Top Access,At_Offset_3 0744 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0745 0000 0000 | | .XXX[0x3] 0747 0000 | | 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 074b | K | .CONST 0x074b ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0001 | | .CONST 0x0001 ; Number of locals 074b BODY_0748: 074b INIT_0748: 074b 00cf | | Action Mark_Auxiliary 074c 00db | | Load_Top At_Offset_3 074d 0227 | ' | Execute Access,All_Reference 074e 01d9 | | Execute Vector,Reverse_Bounds 074f 0263 | c | Execute Discrete,Above_Bound 0750 7023 |p# | Jump_Nonzero 0x774 0751 00d8 | | Load_Top At_Offset_0 0752 e5ff | | Load 0x2,-0x1 0753 0227 | ' | Execute Access,All_Reference 0754 01d7 | | Execute Vector,Field_Read 0755 681c |h | Jump_Zero 0x772 0756 00d8 | | Load_Top At_Offset_0 0757 e5ff | | Load 0x2,-0x1 0758 0229 | ) | Execute Access,All_Read 0759 01d7 | | Execute Vector,Field_Read 075a 0229 | ) | Execute Access,All_Read 075b 00d8 | | Load_Top At_Offset_0 075c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 075d e233 | 3 | Load 0x1,0x33 075e e234 | 4 | Load 0x1,0x34 075f 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0760 8005 | | Call 0x0,0x5 0761 00d9 | | Load_Top At_Offset_1 0762 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0763 00d1 | | Pop_Control Pop_Count_1 0764 e5ff | | Load 0x2,-0x1 0765 0229 | ) | Execute Access,All_Read 0766 00d9 | | Load_Top At_Offset_1 0767 00d8 | | Load_Top At_Offset_0 0768 00da | | Load_Top At_Offset_2 0769 01d7 | | Execute Vector,Field_Read 076a e23c | < | Load 0x1,0x3c 076b e23d | = | Load 0x1,0x3d 076c 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 076d 8005 | | Call 0x0,0x5 076e 00d9 | | Load_Top At_Offset_1 076f 00db | | Load_Top At_Offset_3 0770 01d6 | | Execute Vector,Field_Write 0771 00d2 | | Pop_Control Pop_Count_2 0772 00c8 | | Action Pop_Auxiliary_Range 0773 3fdd |? | Loop_Increasing 0x751 0774 00ce | | Action Pop_Auxiliary 0775 00da | | Load_Top At_Offset_2 0776 e241 | A | Load 0x1,0x41 0777 e242 | B | Load 0x1,0x42 0778 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 0779 8005 | | Call 0x0,0x5 077a 003b | ; | Store_Top Access,At_Offset_3 077b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 077c 0000 0000 | | .BLANK 0000[0x4] 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0783 | | .CONST 0x0783 ; Address of begin 0781 0791 | | .CONST 0x0791 ; Address of exception handler 0782 0001 | | .CONST 0x0001 ; Number of locals 0783 BODY_0780: 0783 INIT_0780: 0783 00e3 | | Load_Encached Natural_Cache 0784 e5fe | | Load 0x2,-0x2 0785 e5ff | | Load 0x2,-0x1 0786 e004 | | Load 0x0,0x4 0787 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 0788 00d1 | | Pop_Control Pop_Count_1 0789 c5fd | | Store 0x2,-0x3 078a 00da | | Load_Top At_Offset_2 078b e004 | | Load 0x0,0x4 078c 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 078d a5fc | | Store_Unchecked 0x2,-0x4 078e 4800 |H | Short_Literal 0x0 078f a5fb | | Store_Unchecked 0x2,-0x5 0790 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0791 TRAP_0780: 0791 00d8 | | Load_Top At_Offset_0 0792 0107 | | Execute Exception,Get_Name 0793 4950 |IP | Short_Literal 0x150 0794 495f |I_ | Short_Literal 0x15f 0795 0262 | b | Execute Discrete,In_Range 0796 6807 |h | Jump_Zero 0x79e 0797 4800 |H | Short_Literal 0x0 0798 a5fd | | Store_Unchecked 0x2,-0x3 0799 4800 |H | Short_Literal 0x0 079a a5fc | | Store_Unchecked 0x2,-0x4 079b 4801 |H | Short_Literal 0x1 079c a5fb | | Store_Unchecked 0x2,-0x5 079d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 079e 0100 | | Execute Exception,Raise 079f 0000 | | .XXX[0x1] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a5 | | .CONST 0x07a5 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0003 | | .CONST 0x0003 ; Number of locals 07a3 INIT_07a0: 07a3 00e8 | | Load_Encached Character_Cache 07a4 00e8 | | Load_Encached Character_Cache 07a5 BODY_07a0: 07a5 e5ff | | Load 0x2,-0x1 07a6 01db | | Execute Vector,Length 07a7 e5fe | | Load 0x2,-0x2 07a8 01db | | Execute Vector,Length 07a9 027e | ~ | Execute Discrete,Not_Equal 07aa 6802 |h | Jump_Zero 0x7ad 07ab 4800 |H | Short_Literal 0x0 07ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07ad 00cf | | Action Mark_Auxiliary 07ae 4800 |H | Short_Literal 0x0 07af e5ff | | Load 0x2,-0x1 07b0 01db | | Execute Vector,Length 07b1 0aff | | Execute_Immediate Plus,-0x1 07b2 00d8 | | Load_Top At_Offset_0 07b3 00e2 | | Load_Encached Integer_Cache 07b4 0260 | ` | Execute Discrete,In_Type 07b5 7001 |p | Jump_Nonzero 0x7b7 07b6 0801 | | Execute_Immediate Raise,0x1 07b7 00e3 | | Load_Encached Natural_Cache 07b8 025d | ] | Execute Discrete,Bounds_Check 07b9 0264 | d | Execute Discrete,Below_Bound 07ba 703c |p< | Jump_Nonzero 0x7f7 07bb e5ff | | Load 0x2,-0x1 07bc 01dd | | Execute Vector,First 07bd 00d9 | | Load_Top At_Offset_1 07be 0273 | s | Execute Discrete,Plus 07bf e5ff | | Load 0x2,-0x1 07c0 01d7 | | Execute Vector,Field_Read 07c1 a402 | | Store_Unchecked 0x2,0x2 07c2 e5fe | | Load 0x2,-0x2 07c3 01dd | | Execute Vector,First 07c4 00d9 | | Load_Top At_Offset_1 07c5 0273 | s | Execute Discrete,Plus 07c6 e5fe | | Load 0x2,-0x2 07c7 01d7 | | Execute Vector,Field_Read 07c8 a403 | | Store_Unchecked 0x2,0x3 07c9 e402 | | Load 0x2,0x2 07ca e403 | | Load 0x2,0x3 07cb 027e | ~ | Execute Discrete,Not_Equal 07cc 6828 |h( | Jump_Zero 0x7f5 07cd e402 | | Load 0x2,0x2 07ce 4861 |Ha | Short_Literal 0x61 07cf 487a |Hz | Short_Literal 0x7a 07d0 0262 | b | Execute Discrete,In_Range 07d1 680e |h | Jump_Zero 0x7e0 07d2 00db | | Load_Top At_Offset_3 07d3 4841 |HA | Short_Literal 0x41 07d4 485a |HZ | Short_Literal 0x5a 07d5 0262 | b | Execute Discrete,In_Range 07d6 6807 |h | Jump_Zero 0x7de 07d7 e402 | | Load 0x2,0x2 07d8 e403 | | Load 0x2,0x3 07d9 0a20 | | Execute_Immediate Plus,0x20 07da 027e | ~ | Execute Discrete,Not_Equal 07db 6819 |h | Jump_Zero 0x7f5 07dc 4800 |H | Short_Literal 0x0 07dd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07de 4800 |H | Short_Literal 0x0 07df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07e0 e402 | | Load 0x2,0x2 07e1 4841 |HA | Short_Literal 0x41 07e2 485a |HZ | Short_Literal 0x5a 07e3 0262 | b | Execute Discrete,In_Range 07e4 680e |h | Jump_Zero 0x7f3 07e5 00db | | Load_Top At_Offset_3 07e6 4861 |Ha | Short_Literal 0x61 07e7 487a |Hz | Short_Literal 0x7a 07e8 0262 | b | Execute Discrete,In_Range 07e9 6807 |h | Jump_Zero 0x7f1 07ea e402 | | Load 0x2,0x2 07eb e403 | | Load 0x2,0x3 07ec 0ae0 | | Execute_Immediate Plus,-0x20 07ed 027e | ~ | Execute Discrete,Not_Equal 07ee 6806 |h | Jump_Zero 0x7f5 07ef 4800 |H | Short_Literal 0x0 07f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07f1 4800 |H | Short_Literal 0x0 07f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07f3 4800 |H | Short_Literal 0x0 07f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07f5 00c8 | | Action Pop_Auxiliary_Range 07f6 37c4 |7 | Loop_Decreasing 0x7bb 07f7 00ce | | Action Pop_Auxiliary 07f8 4801 |H | Short_Literal 0x1 07f9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07fa 0000 0000 | | .BLANK 0000[0x6] 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0804 | | .CONST 0x0804 ; Address of begin 0801 0004 | | .CONST 0x0004 ; Address of exception handler 0802 0002 | | .CONST 0x0002 ; Number of locals 0803 INIT_0800: 0803 00e8 | | Load_Encached Character_Cache 0804 BODY_0800: 0804 00cf | | Action Mark_Auxiliary 0805 e5ff | | Load 0x2,-0x1 0806 01d9 | | Execute Vector,Reverse_Bounds 0807 0263 | c | Execute Discrete,Above_Bound 0808 700e |p | Jump_Nonzero 0x817 0809 00d8 | | Load_Top At_Offset_0 080a e5ff | | Load 0x2,-0x1 080b 01d7 | | Execute Vector,Field_Read 080c a402 | | Store_Unchecked 0x2,0x2 080d 00db | | Load_Top At_Offset_3 080e 0e20 | | Execute_Immediate Not_Equal,0x20 080f 6805 |h | Jump_Zero 0x815 0810 00db | | Load_Top At_Offset_3 0811 0e09 | | Execute_Immediate Not_Equal,0x9 0812 6802 |h | Jump_Zero 0x815 0813 4800 |H | Short_Literal 0x0 0814 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0815 00c8 | | Action Pop_Auxiliary_Range 0816 3ff2 |? | Loop_Increasing 0x809 0817 00ce | | Action Pop_Auxiliary 0818 4801 |H | Short_Literal 0x1 0819 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 081a 0000 0000 | | .BLANK 0000[0x6] 0820 ; -------------------------------------------------------------------------------------- 0820 ; SUBPROGRAM 0820 ; -------------------------------------------------------------------------------------- 0820 082a | * | .CONST 0x082a ; Address of begin 0821 0004 | | .CONST 0x0004 ; Address of exception handler 0822 0004 | | .CONST 0x0004 ; Number of locals 0823 INIT_0820: 0823 e00a | | Load 0x0,0xa 0824 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0825 00db | | Load_Top At_Offset_3 0826 01dd | | Execute Vector,First 0827 00e3 | | Load_Encached Natural_Cache 0828 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0829 00e8 | | Load_Encached Character_Cache 082a BODY_0820: 082a e5fe | | Load 0x2,-0x2 082b 7065 |pe | Jump_Nonzero 0x891 082c 00cf | | Action Mark_Auxiliary 082d 0007 | | Action Break_Optional 082e 00da | | Load_Top At_Offset_2 082f e5ff | | Load 0x2,-0x1 0830 01dc | | Execute Vector,Last 0831 027d | } | Execute Discrete,Greater 0832 6801 |h | Jump_Zero 0x834 0833 785b |x[ | Jump 0x88f 0834 00db | | Load_Top At_Offset_3 0835 00db | | Load_Top At_Offset_3 0836 e5ff | | Load 0x2,-0x1 0837 01d7 | | Execute Vector,Field_Read 0838 0273 | s | Execute Discrete,Plus 0839 c402 | | Store 0x2,0x2 083a 00da | | Load_Top At_Offset_2 083b 0a01 | | Execute_Immediate Plus,0x1 083c 005b | [ | Store_Top Discrete,At_Offset_3 083d 00da | | Load_Top At_Offset_2 083e e5ff | | Load 0x2,-0x1 083f 01dc | | Execute Vector,Last 0840 027d | } | Execute Discrete,Greater 0841 6801 |h | Jump_Zero 0x843 0842 784c |xL | Jump 0x88f 0843 00db | | Load_Top At_Offset_3 0844 00db | | Load_Top At_Offset_3 0845 e5ff | | Load 0x2,-0x1 0846 01d7 | | Execute Vector,Field_Read 0847 0904 | | Execute_Immediate Binary_Scale,0x4 0848 0273 | s | Execute Discrete,Plus 0849 c402 | | Store 0x2,0x2 084a 00da | | Load_Top At_Offset_2 084b 0a01 | | Execute_Immediate Plus,0x1 084c 005b | [ | Store_Top Discrete,At_Offset_3 084d 00da | | Load_Top At_Offset_2 084e e5ff | | Load 0x2,-0x1 084f 01dc | | Execute Vector,Last 0850 027d | } | Execute Discrete,Greater 0851 6801 |h | Jump_Zero 0x853 0852 783c |x< | Jump 0x88f 0853 00db | | Load_Top At_Offset_3 0854 00db | | Load_Top At_Offset_3 0855 e5ff | | Load 0x2,-0x1 0856 01d7 | | Execute Vector,Field_Read 0857 0908 | | Execute_Immediate Binary_Scale,0x8 0858 0273 | s | Execute Discrete,Plus 0859 c402 | | Store 0x2,0x2 085a 00da | | Load_Top At_Offset_2 085b 0a01 | | Execute_Immediate Plus,0x1 085c 005b | [ | Store_Top Discrete,At_Offset_3 085d 00da | | Load_Top At_Offset_2 085e e5ff | | Load 0x2,-0x1 085f 01dc | | Execute Vector,Last 0860 027d | } | Execute Discrete,Greater 0861 6801 |h | Jump_Zero 0x863 0862 782c |x, | Jump 0x88f 0863 00db | | Load_Top At_Offset_3 0864 00db | | Load_Top At_Offset_3 0865 e5ff | | Load 0x2,-0x1 0866 01d7 | | Execute Vector,Field_Read 0867 090c | | Execute_Immediate Binary_Scale,0xc 0868 0273 | s | Execute Discrete,Plus 0869 c402 | | Store 0x2,0x2 086a 00da | | Load_Top At_Offset_2 086b 0a01 | | Execute_Immediate Plus,0x1 086c 005b | [ | Store_Top Discrete,At_Offset_3 086d 00da | | Load_Top At_Offset_2 086e e5ff | | Load 0x2,-0x1 086f 01dc | | Execute Vector,Last 0870 027d | } | Execute Discrete,Greater 0871 6801 |h | Jump_Zero 0x873 0872 781c |x | Jump 0x88f 0873 00db | | Load_Top At_Offset_3 0874 00db | | Load_Top At_Offset_3 0875 e5ff | | Load 0x2,-0x1 0876 01d7 | | Execute Vector,Field_Read 0877 0910 | | Execute_Immediate Binary_Scale,0x10 0878 0273 | s | Execute Discrete,Plus 0879 c402 | | Store 0x2,0x2 087a 00da | | Load_Top At_Offset_2 087b 0a01 | | Execute_Immediate Plus,0x1 087c 005b | [ | Store_Top Discrete,At_Offset_3 087d 00da | | Load_Top At_Offset_2 087e e5ff | | Load 0x2,-0x1 087f 01dc | | Execute Vector,Last 0880 027d | } | Execute Discrete,Greater 0881 6801 |h | Jump_Zero 0x883 0882 780c |x | Jump 0x88f 0883 00db | | Load_Top At_Offset_3 0884 00db | | Load_Top At_Offset_3 0885 e5ff | | Load 0x2,-0x1 0886 01d7 | | Execute Vector,Field_Read 0887 0914 | | Execute_Immediate Binary_Scale,0x14 0888 0273 | s | Execute Discrete,Plus 0889 c402 | | Store 0x2,0x2 088a 00da | | Load_Top At_Offset_2 088b 0a01 | | Execute_Immediate Plus,0x1 088c 005b | [ | Store_Top Discrete,At_Offset_3 088d 00c9 | | Action Pop_Auxiliary_Loop 088e 7f9f | | Jump 0x82e 088f 00ce | | Action Pop_Auxiliary 0890 78be |x | Jump 0x94f 0891 00cf | | Action Mark_Auxiliary 0892 0007 | | Action Break_Optional 0893 00da | | Load_Top At_Offset_2 0894 e5ff | | Load 0x2,-0x1 0895 01dc | | Execute Vector,Last 0896 027d | } | Execute Discrete,Greater 0897 6801 |h | Jump_Zero 0x899 0898 78b5 |x | Jump 0x94e 0899 00da | | Load_Top At_Offset_2 089a e5ff | | Load 0x2,-0x1 089b 01d7 | | Execute Vector,Field_Read 089c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 089d 00d9 | | Load_Top At_Offset_1 089e 4861 |Ha | Short_Literal 0x61 089f 487a |Hz | Short_Literal 0x7a 08a0 0262 | b | Execute Discrete,In_Range 08a1 6808 |h | Jump_Zero 0x8aa 08a2 00d9 | | Load_Top At_Offset_1 08a3 0ae0 | | Execute_Immediate Plus,-0x20 08a4 00d8 | | Load_Top At_Offset_0 08a5 00e8 | | Load_Encached Character_Cache 08a6 0260 | ` | Execute Discrete,In_Type 08a7 7001 |p | Jump_Nonzero 0x8a9 08a8 0801 | | Execute_Immediate Raise,0x1 08a9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08aa 00db | | Load_Top At_Offset_3 08ab 00da | | Load_Top At_Offset_2 08ac 0273 | s | Execute Discrete,Plus 08ad c402 | | Store 0x2,0x2 08ae 00da | | Load_Top At_Offset_2 08af 0a01 | | Execute_Immediate Plus,0x1 08b0 005b | [ | Store_Top Discrete,At_Offset_3 08b1 00da | | Load_Top At_Offset_2 08b2 e5ff | | Load 0x2,-0x1 08b3 01dc | | Execute Vector,Last 08b4 027d | } | Execute Discrete,Greater 08b5 6801 |h | Jump_Zero 0x8b7 08b6 7897 |x | Jump 0x94e 08b7 00da | | Load_Top At_Offset_2 08b8 e5ff | | Load 0x2,-0x1 08b9 01d7 | | Execute Vector,Field_Read 08ba 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08bb 00d9 | | Load_Top At_Offset_1 08bc 4861 |Ha | Short_Literal 0x61 08bd 487a |Hz | Short_Literal 0x7a 08be 0262 | b | Execute Discrete,In_Range 08bf 6808 |h | Jump_Zero 0x8c8 08c0 00d9 | | Load_Top At_Offset_1 08c1 0ae0 | | Execute_Immediate Plus,-0x20 08c2 00d8 | | Load_Top At_Offset_0 08c3 00e8 | | Load_Encached Character_Cache 08c4 0260 | ` | Execute Discrete,In_Type 08c5 7001 |p | Jump_Nonzero 0x8c7 08c6 0801 | | Execute_Immediate Raise,0x1 08c7 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08c8 00db | | Load_Top At_Offset_3 08c9 00da | | Load_Top At_Offset_2 08ca 0904 | | Execute_Immediate Binary_Scale,0x4 08cb 0273 | s | Execute Discrete,Plus 08cc c402 | | Store 0x2,0x2 08cd 00da | | Load_Top At_Offset_2 08ce 0a01 | | Execute_Immediate Plus,0x1 08cf 005b | [ | Store_Top Discrete,At_Offset_3 08d0 00da | | Load_Top At_Offset_2 08d1 e5ff | | Load 0x2,-0x1 08d2 01dc | | Execute Vector,Last 08d3 027d | } | Execute Discrete,Greater 08d4 6801 |h | Jump_Zero 0x8d6 08d5 7878 |xx | Jump 0x94e 08d6 00da | | Load_Top At_Offset_2 08d7 e5ff | | Load 0x2,-0x1 08d8 01d7 | | Execute Vector,Field_Read 08d9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08da 00d9 | | Load_Top At_Offset_1 08db 4861 |Ha | Short_Literal 0x61 08dc 487a |Hz | Short_Literal 0x7a 08dd 0262 | b | Execute Discrete,In_Range 08de 6808 |h | Jump_Zero 0x8e7 08df 00d9 | | Load_Top At_Offset_1 08e0 0ae0 | | Execute_Immediate Plus,-0x20 08e1 00d8 | | Load_Top At_Offset_0 08e2 00e8 | | Load_Encached Character_Cache 08e3 0260 | ` | Execute Discrete,In_Type 08e4 7001 |p | Jump_Nonzero 0x8e6 08e5 0801 | | Execute_Immediate Raise,0x1 08e6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08e7 00db | | Load_Top At_Offset_3 08e8 00da | | Load_Top At_Offset_2 08e9 0908 | | Execute_Immediate Binary_Scale,0x8 08ea 0273 | s | Execute Discrete,Plus 08eb c402 | | Store 0x2,0x2 08ec 00da | | Load_Top At_Offset_2 08ed 0a01 | | Execute_Immediate Plus,0x1 08ee 005b | [ | Store_Top Discrete,At_Offset_3 08ef 00da | | Load_Top At_Offset_2 08f0 e5ff | | Load 0x2,-0x1 08f1 01dc | | Execute Vector,Last 08f2 027d | } | Execute Discrete,Greater 08f3 6801 |h | Jump_Zero 0x8f5 08f4 7859 |xY | Jump 0x94e 08f5 00da | | Load_Top At_Offset_2 08f6 e5ff | | Load 0x2,-0x1 08f7 01d7 | | Execute Vector,Field_Read 08f8 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08f9 00d9 | | Load_Top At_Offset_1 08fa 4861 |Ha | Short_Literal 0x61 08fb 487a |Hz | Short_Literal 0x7a 08fc 0262 | b | Execute Discrete,In_Range 08fd 6808 |h | Jump_Zero 0x906 08fe 00d9 | | Load_Top At_Offset_1 08ff 0ae0 | | Execute_Immediate Plus,-0x20 0900 00d8 | | Load_Top At_Offset_0 0901 00e8 | | Load_Encached Character_Cache 0902 0260 | ` | Execute Discrete,In_Type 0903 7001 |p | Jump_Nonzero 0x905 0904 0801 | | Execute_Immediate Raise,0x1 0905 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0906 00db | | Load_Top At_Offset_3 0907 00da | | Load_Top At_Offset_2 0908 090c | | Execute_Immediate Binary_Scale,0xc 0909 0273 | s | Execute Discrete,Plus 090a c402 | | Store 0x2,0x2 090b 00da | | Load_Top At_Offset_2 090c 0a01 | | Execute_Immediate Plus,0x1 090d 005b | [ | Store_Top Discrete,At_Offset_3 090e 00da | | Load_Top At_Offset_2 090f e5ff | | Load 0x2,-0x1 0910 01dc | | Execute Vector,Last 0911 027d | } | Execute Discrete,Greater 0912 6801 |h | Jump_Zero 0x914 0913 783a |x: | Jump 0x94e 0914 00da | | Load_Top At_Offset_2 0915 e5ff | | Load 0x2,-0x1 0916 01d7 | | Execute Vector,Field_Read 0917 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0918 00d9 | | Load_Top At_Offset_1 0919 4861 |Ha | Short_Literal 0x61 091a 487a |Hz | Short_Literal 0x7a 091b 0262 | b | Execute Discrete,In_Range 091c 6808 |h | Jump_Zero 0x925 091d 00d9 | | Load_Top At_Offset_1 091e 0ae0 | | Execute_Immediate Plus,-0x20 091f 00d8 | | Load_Top At_Offset_0 0920 00e8 | | Load_Encached Character_Cache 0921 0260 | ` | Execute Discrete,In_Type 0922 7001 |p | Jump_Nonzero 0x924 0923 0801 | | Execute_Immediate Raise,0x1 0924 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0925 00db | | Load_Top At_Offset_3 0926 00da | | Load_Top At_Offset_2 0927 0910 | | Execute_Immediate Binary_Scale,0x10 0928 0273 | s | Execute Discrete,Plus 0929 c402 | | Store 0x2,0x2 092a 00da | | Load_Top At_Offset_2 092b 0a01 | | Execute_Immediate Plus,0x1 092c 005b | [ | Store_Top Discrete,At_Offset_3 092d 00da | | Load_Top At_Offset_2 092e e5ff | | Load 0x2,-0x1 092f 01dc | | Execute Vector,Last 0930 027d | } | Execute Discrete,Greater 0931 6801 |h | Jump_Zero 0x933 0932 781b |x | Jump 0x94e 0933 00da | | Load_Top At_Offset_2 0934 e5ff | | Load 0x2,-0x1 0935 01d7 | | Execute Vector,Field_Read 0936 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0937 00d9 | | Load_Top At_Offset_1 0938 4861 |Ha | Short_Literal 0x61 0939 487a |Hz | Short_Literal 0x7a 093a 0262 | b | Execute Discrete,In_Range 093b 6808 |h | Jump_Zero 0x944 093c 00d9 | | Load_Top At_Offset_1 093d 0ae0 | | Execute_Immediate Plus,-0x20 093e 00d8 | | Load_Top At_Offset_0 093f 00e8 | | Load_Encached Character_Cache 0940 0260 | ` | Execute Discrete,In_Type 0941 7001 |p | Jump_Nonzero 0x943 0942 0801 | | Execute_Immediate Raise,0x1 0943 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0944 00db | | Load_Top At_Offset_3 0945 00da | | Load_Top At_Offset_2 0946 0914 | | Execute_Immediate Binary_Scale,0x14 0947 0273 | s | Execute Discrete,Plus 0948 c402 | | Store 0x2,0x2 0949 00da | | Load_Top At_Offset_2 094a 0a01 | | Execute_Immediate Plus,0x1 094b 005b | [ | Store_Top Discrete,At_Offset_3 094c 00c9 | | Action Pop_Auxiliary_Loop 094d 7f45 | E | Jump 0x893 094e 00ce | | Action Pop_Auxiliary 094f 00da | | Load_Top At_Offset_2 0950 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0951 0000 0000 | | .BLANK 0000[0x7] 0958 ; -------------------------------------------------------------------------------------- 0958 ; SUBPROGRAM 0958 ; -------------------------------------------------------------------------------------- 0958 0965 | e | .CONST 0x0965 ; Address of begin 0959 0004 | | .CONST 0x0004 ; Address of exception handler 095a 0006 | | .CONST 0x0006 ; Number of locals 095b INIT_0958: 095b 4801 |H | Short_Literal 0x1 095c 604f |`O | Indirect_Literal Discrete,0x9ac,{0x00000000, 0x00000400} 095d 00e9 | | Load_Encached String_Cache 095e 035b | [ | Declare_Type Array,Constrained 095f 0337 | 7 | Declare_Variable Array 0960 00e3 | | Load_Encached Natural_Cache 0961 00e1 | | Load_Encached Boolean_Cache 0962 00e1 | | Load_Encached Boolean_Cache 0963 029f 1143 | C| Declare_Subprogram INIT_1140,For_Call 0965 BODY_0958: 0965 4801 |H | Short_Literal 0x1 0966 4be8 |K | Short_Literal 0x3e8 0967 e23b | ; | Load 0x1,0x3b 0968 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0969 a5fd | | Store_Unchecked 0x2,-0x3 096a 4800 |H | Short_Literal 0x0 096b a5fc | | Store_Unchecked 0x2,-0x4 096c 00cf | | Action Mark_Auxiliary 096d 0007 | | Action Break_Optional 096e 00e1 | | Load_Encached Boolean_Cache 096f 00e1 | | Load_Encached Boolean_Cache 0970 00e3 | | Load_Encached Natural_Cache 0971 e402 | | Load 0x2,0x2 0972 e5ff | | Load 0x2,-0x1 0973 8251 | Q | Call 0x1,0x51 0974 00d1 | | Pop_Control Pop_Count_1 0975 c403 | | Store 0x2,0x3 0976 c404 | | Store 0x2,0x4 0977 005b | [ | Store_Top Discrete,At_Offset_3 0978 00da | | Load_Top At_Offset_2 0979 6801 |h | Jump_Zero 0x97b 097a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 097b e5fc | | Load 0x2,-0x4 097c e5fd | | Load 0x2,-0x3 097d 0227 | ' | Execute Access,All_Reference 097e 01dc | | Execute Vector,Last 097f 027f | | Execute Discrete,Equal 0980 6801 |h | Jump_Zero 0x982 0981 8406 | | Call 0x2,0x6 0982 e5fc | | Load 0x2,-0x4 0983 0a01 | | Execute_Immediate Plus,0x1 0984 c5fc | | Store 0x2,-0x4 0985 e238 | 8 | Load 0x1,0x38 0986 0322 | " | Declare_Variable Record 0987 4801 |H | Short_Literal 0x1 0988 e403 | | Load 0x2,0x3 0989 e402 | | Load 0x2,0x2 098a 01cf | | Execute Vector,Slice_Read 098b e232 | 2 | Load 0x1,0x32 098c 03b6 | | Declare_Variable Access,By_Allocation,With_Value 098d 00d9 | | Load_Top At_Offset_1 098e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 098f e5fe | | Load 0x2,-0x2 0990 4801 |H | Short_Literal 0x1 0991 e403 | | Load 0x2,0x3 0992 e402 | | Load 0x2,0x2 0993 01cf | | Execute Vector,Slice_Read 0994 8254 | T | Call 0x1,0x54 0995 00d9 | | Load_Top At_Offset_1 0996 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0997 e404 | | Load 0x2,0x4 0998 00d9 | | Load_Top At_Offset_1 0999 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 099a 4801 |H | Short_Literal 0x1 099b e403 | | Load 0x2,0x3 099c e402 | | Load 0x2,0x2 099d 01cf | | Execute Vector,Slice_Read 099e 8253 | S | Call 0x1,0x53 099f 00d9 | | Load_Top At_Offset_1 09a0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 09a1 e239 | 9 | Load 0x1,0x39 09a2 03b6 | | Declare_Variable Access,By_Allocation,With_Value 09a3 e5fc | | Load 0x2,-0x4 09a4 e5fd | | Load 0x2,-0x3 09a5 0227 | ' | Execute Access,All_Reference 09a6 01d6 | | Execute Vector,Field_Write 09a7 00c9 | | Action Pop_Auxiliary_Loop 09a8 7fc5 | | Jump 0x96e 09a9 0000 0000 | | .XXX[0x3] 09ab 0000 | | 09ac 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 09b0 ; -------------------------------------------------------------------------------------- 09b0 ; SUBPROGRAM 09b0 ; -------------------------------------------------------------------------------------- 09b0 09b3 | | .CONST 0x09b3 ; Address of begin 09b1 0004 | | .CONST 0x0004 ; Address of exception handler 09b2 0001 | | .CONST 0x0001 ; Number of locals 09b3 BODY_09b0: 09b3 INIT_09b0: 09b3 00da | | Load_Top At_Offset_2 09b4 01db | | Execute Vector,Length 09b5 7035 |p5 | Jump_Nonzero 0x9eb 09b6 00db | | Load_Top At_Offset_3 09b7 01db | | Execute Vector,Length 09b8 7001 |p | Jump_Nonzero 0x9ba 09b9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09ba 4801 |H | Short_Literal 0x1 09bb 8213 | | Call 0x1,0x13 09bc 0092 118f | | Action Push_String_Extended,0x118f ; "--- Insert " 09be 8216 | | Call 0x1,0x16 09bf 480a |H | Short_Literal 0xa 09c0 4801 |H | Short_Literal 0x1 09c1 e5ff | | Load 0x2,-0x1 09c2 01dd | | Execute Vector,First 09c3 00d8 | | Load_Top At_Offset_0 09c4 e00a | | Load 0x0,0xa 09c5 0260 | ` | Execute Discrete,In_Type 09c6 7001 |p | Jump_Nonzero 0x9c8 09c7 0801 | | Execute_Immediate Raise,0x1 09c8 821c | | Call 0x1,0x1c 09c9 0092 1190 | | Action Push_String_Extended,0x1190 ; "," 09cb 8216 | | Call 0x1,0x16 09cc 480a |H | Short_Literal 0xa 09cd 4801 |H | Short_Literal 0x1 09ce e5fe | | Load 0x2,-0x2 09cf 01db | | Execute Vector,Length 09d0 00d8 | | Load_Top At_Offset_0 09d1 e00a | | Load 0x0,0xa 09d2 0260 | ` | Execute Discrete,In_Type 09d3 7001 |p | Jump_Nonzero 0x9d5 09d4 0801 | | Execute_Immediate Raise,0x1 09d5 821c | | Call 0x1,0x1c 09d6 4801 |H | Short_Literal 0x1 09d7 8213 | | Call 0x1,0x13 09d8 00cf | | Action Mark_Auxiliary 09d9 e5fe | | Load 0x2,-0x2 09da 01d9 | | Execute Vector,Reverse_Bounds 09db 0263 | c | Execute Discrete,Above_Bound 09dc 700c |p | Jump_Nonzero 0x9e9 09dd 0092 1191 | | Action Push_String_Extended,0x1191 ; "> " 09df 8216 | | Call 0x1,0x16 09e0 00d8 | | Load_Top At_Offset_0 09e1 e5fe | | Load 0x2,-0x2 09e2 01d7 | | Execute Vector,Field_Read 09e3 0227 | ' | Execute Access,All_Reference 09e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09e5 0227 | ' | Execute Access,All_Reference 09e6 8217 | | Call 0x1,0x17 09e7 00c8 | | Action Pop_Auxiliary_Range 09e8 3ff4 |? | Loop_Increasing 0x9dd 09e9 00ce | | Action Pop_Auxiliary 09ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09eb 00db | | Load_Top At_Offset_3 09ec 01db | | Execute Vector,Length 09ed 7031 |p1 | Jump_Nonzero 0xa1f 09ee 4801 |H | Short_Literal 0x1 09ef 8213 | | Call 0x1,0x13 09f0 0092 1192 | | Action Push_String_Extended,0x1192 ; "--- Delete " 09f2 8216 | | Call 0x1,0x16 09f3 480a |H | Short_Literal 0xa 09f4 4801 |H | Short_Literal 0x1 09f5 e5ff | | Load 0x2,-0x1 09f6 01dd | | Execute Vector,First 09f7 00d8 | | Load_Top At_Offset_0 09f8 e00a | | Load 0x0,0xa 09f9 0260 | ` | Execute Discrete,In_Type 09fa 7001 |p | Jump_Nonzero 0x9fc 09fb 0801 | | Execute_Immediate Raise,0x1 09fc 821c | | Call 0x1,0x1c 09fd 0092 1190 | | Action Push_String_Extended,0x1190 ; "," 09ff 8216 | | Call 0x1,0x16 0a00 480a |H | Short_Literal 0xa 0a01 4801 |H | Short_Literal 0x1 0a02 e5ff | | Load 0x2,-0x1 0a03 01db | | Execute Vector,Length 0a04 00d8 | | Load_Top At_Offset_0 0a05 e00a | | Load 0x0,0xa 0a06 0260 | ` | Execute Discrete,In_Type 0a07 7001 |p | Jump_Nonzero 0xa09 0a08 0801 | | Execute_Immediate Raise,0x1 0a09 821c | | Call 0x1,0x1c 0a0a 4801 |H | Short_Literal 0x1 0a0b 8213 | | Call 0x1,0x13 0a0c 00cf | | Action Mark_Auxiliary 0a0d 00db | | Load_Top At_Offset_3 0a0e 01d9 | | Execute Vector,Reverse_Bounds 0a0f 0263 | c | Execute Discrete,Above_Bound 0a10 700c |p | Jump_Nonzero 0xa1d 0a11 0092 1193 | | Action Push_String_Extended,0x1193 ; "< " 0a13 8216 | | Call 0x1,0x16 0a14 00d8 | | Load_Top At_Offset_0 0a15 e5ff | | Load 0x2,-0x1 0a16 01d7 | | Execute Vector,Field_Read 0a17 0227 | ' | Execute Access,All_Reference 0a18 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a19 0227 | ' | Execute Access,All_Reference 0a1a 8217 | | Call 0x1,0x17 0a1b 00c8 | | Action Pop_Auxiliary_Range 0a1c 3ff4 |? | Loop_Increasing 0xa11 0a1d 00ce | | Action Pop_Auxiliary 0a1e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a1f 4801 |H | Short_Literal 0x1 0a20 8213 | | Call 0x1,0x13 0a21 0092 1194 | | Action Push_String_Extended,0x1194 ; "--- Change " 0a23 8216 | | Call 0x1,0x16 0a24 480a |H | Short_Literal 0xa 0a25 4801 |H | Short_Literal 0x1 0a26 e5ff | | Load 0x2,-0x1 0a27 01dd | | Execute Vector,First 0a28 00d8 | | Load_Top At_Offset_0 0a29 e00a | | Load 0x0,0xa 0a2a 0260 | ` | Execute Discrete,In_Type 0a2b 7001 |p | Jump_Nonzero 0xa2d 0a2c 0801 | | Execute_Immediate Raise,0x1 0a2d 821c | | Call 0x1,0x1c 0a2e 0092 1190 | | Action Push_String_Extended,0x1190 ; "," 0a30 8216 | | Call 0x1,0x16 0a31 480a |H | Short_Literal 0xa 0a32 4801 |H | Short_Literal 0x1 0a33 e5ff | | Load 0x2,-0x1 0a34 01db | | Execute Vector,Length 0a35 00d8 | | Load_Top At_Offset_0 0a36 e00a | | Load 0x0,0xa 0a37 0260 | ` | Execute Discrete,In_Type 0a38 7001 |p | Jump_Nonzero 0xa3a 0a39 0801 | | Execute_Immediate Raise,0x1 0a3a 821c | | Call 0x1,0x1c 0a3b 0092 1190 | | Action Push_String_Extended,0x1190 ; "," 0a3d 8216 | | Call 0x1,0x16 0a3e 480a |H | Short_Literal 0xa 0a3f 4801 |H | Short_Literal 0x1 0a40 e5fe | | Load 0x2,-0x2 0a41 01db | | Execute Vector,Length 0a42 00d8 | | Load_Top At_Offset_0 0a43 e00a | | Load 0x0,0xa 0a44 0260 | ` | Execute Discrete,In_Type 0a45 7001 |p | Jump_Nonzero 0xa47 0a46 0801 | | Execute_Immediate Raise,0x1 0a47 821c | | Call 0x1,0x1c 0a48 4801 |H | Short_Literal 0x1 0a49 8213 | | Call 0x1,0x13 0a4a 00cf | | Action Mark_Auxiliary 0a4b 00db | | Load_Top At_Offset_3 0a4c 01d9 | | Execute Vector,Reverse_Bounds 0a4d 0263 | c | Execute Discrete,Above_Bound 0a4e 700c |p | Jump_Nonzero 0xa5b 0a4f 0092 1193 | | Action Push_String_Extended,0x1193 ; "< " 0a51 8216 | | Call 0x1,0x16 0a52 00d8 | | Load_Top At_Offset_0 0a53 e5ff | | Load 0x2,-0x1 0a54 01d7 | | Execute Vector,Field_Read 0a55 0227 | ' | Execute Access,All_Reference 0a56 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a57 0227 | ' | Execute Access,All_Reference 0a58 8217 | | Call 0x1,0x17 0a59 00c8 | | Action Pop_Auxiliary_Range 0a5a 3ff4 |? | Loop_Increasing 0xa4f 0a5b 00ce | | Action Pop_Auxiliary 0a5c 0092 1195 | | Action Push_String_Extended,0x1195 ; "--- ------" 0a5e 8217 | | Call 0x1,0x17 0a5f 00cf | | Action Mark_Auxiliary 0a60 e5fe | | Load 0x2,-0x2 0a61 01d9 | | Execute Vector,Reverse_Bounds 0a62 0263 | c | Execute Discrete,Above_Bound 0a63 700c |p | Jump_Nonzero 0xa70 0a64 0092 1191 | | Action Push_String_Extended,0x1191 ; "> " 0a66 8216 | | Call 0x1,0x16 0a67 00d8 | | Load_Top At_Offset_0 0a68 e5fe | | Load 0x2,-0x2 0a69 01d7 | | Execute Vector,Field_Read 0a6a 0227 | ' | Execute Access,All_Reference 0a6b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a6c 0227 | ' | Execute Access,All_Reference 0a6d 8217 | | Call 0x1,0x17 0a6e 00c8 | | Action Pop_Auxiliary_Range 0a6f 3ff4 |? | Loop_Increasing 0xa64 0a70 00ce | | Action Pop_Auxiliary 0a71 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a72 0000 0000 | | .BLANK 0000[0x6] 0a78 ; -------------------------------------------------------------------------------------- 0a78 ; SUBPROGRAM 0a78 ; -------------------------------------------------------------------------------------- 0a78 0a8b | | .CONST 0x0a8b ; Address of begin 0a79 0004 | | .CONST 0x0004 ; Address of exception handler 0a7a 0009 | | .CONST 0x0009 ; Number of locals 0a7b INIT_0a78: 0a7b e239 | 9 | Load 0x1,0x39 0a7c 0007 | | Action Break_Optional 0a7d e239 | 9 | Load 0x1,0x39 0a7e 0007 | | Action Break_Optional 0a7f e00b | | Load 0x0,0xb 0a80 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a81 e00b | | Load 0x0,0xb 0a82 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a83 e00b | | Load 0x0,0xb 0a84 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a85 e00b | | Load 0x0,0xb 0a86 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a87 e00b | | Load 0x0,0xb 0a88 0007 | | Action Break_Optional 0a89 e00b | | Load 0x0,0xb 0a8a 0007 | | Action Break_Optional 0a8b BODY_0a78: 0a8b e5ff | | Load 0x2,-0x1 0a8c 01dd | | Execute Vector,First 0a8d e5fe | | Load 0x2,-0x2 0a8e 01dd | | Execute Vector,First 0a8f 027e | ~ | Execute Discrete,Not_Equal 0a90 6801 |h | Jump_Zero 0xa92 0a91 08e2 | | Execute_Immediate Raise,0xe2 0a92 00cf | | Action Mark_Auxiliary 0a93 e5ff | | Load 0x2,-0x1 0a94 01d9 | | Execute Vector,Reverse_Bounds 0a95 0263 | c | Execute Discrete,Above_Bound 0a96 7029 |p) | Jump_Nonzero 0xac0 0a97 00d8 | | Load_Top At_Offset_0 0a98 e5fe | | Load 0x2,-0x2 0a99 01dc | | Execute Vector,Last 0a9a 027d | } | Execute Discrete,Greater 0a9b 6802 |h | Jump_Zero 0xa9e 0a9c 00d2 | | Pop_Control Pop_Count_2 0a9d 7822 |x" | Jump 0xac0 0a9e 00d8 | | Load_Top At_Offset_0 0a9f e5ff | | Load 0x2,-0x1 0aa0 01d7 | | Execute Vector,Field_Read 0aa1 a402 | | Store_Unchecked 0x2,0x2 0aa2 00d8 | | Load_Top At_Offset_0 0aa3 e5fe | | Load 0x2,-0x2 0aa4 01d7 | | Execute Vector,Field_Read 0aa5 a403 | | Store_Unchecked 0x2,0x3 0aa6 e402 | | Load 0x2,0x2 0aa7 0227 | ' | Execute Access,All_Reference 0aa8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0aa9 e403 | | Load 0x2,0x3 0aaa 0227 | ' | Execute Access,All_Reference 0aab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0aac 027e | ~ | Execute Discrete,Not_Equal 0aad 700a |p | Jump_Nonzero 0xab8 0aae e402 | | Load 0x2,0x2 0aaf 0227 | ' | Execute Access,All_Reference 0ab0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ab1 0227 | ' | Execute Access,All_Reference 0ab2 e403 | | Load 0x2,0x3 0ab3 0227 | ' | Execute Access,All_Reference 0ab4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ab5 0227 | ' | Execute Access,All_Reference 0ab6 01de | | Execute Vector,Not_Equal 0ab7 6802 |h | Jump_Zero 0xaba 0ab8 00d2 | | Pop_Control Pop_Count_2 0ab9 7806 |x | Jump 0xac0 0aba 00d8 | | Load_Top At_Offset_0 0abb a406 | | Store_Unchecked 0x2,0x6 0abc 00d8 | | Load_Top At_Offset_0 0abd a407 | | Store_Unchecked 0x2,0x7 0abe 00c8 | | Action Pop_Auxiliary_Range 0abf 3fd7 |? | Loop_Increasing 0xa97 0ac0 00ce | | Action Pop_Auxiliary 0ac1 00cf | | Action Mark_Auxiliary 0ac2 0007 | | Action Break_Optional 0ac3 00cf | | Action Mark_Auxiliary 0ac4 00cf | | Action Mark_Auxiliary 0ac5 e5ff | | Load 0x2,-0x1 0ac6 01dc | | Execute Vector,Last 0ac7 e404 | | Load 0x2,0x4 0ac8 0a01 | | Execute_Immediate Plus,0x1 0ac9 0263 | c | Execute Discrete,Above_Bound 0aca 7011 |p | Jump_Nonzero 0xadc 0acb 00d8 | | Load_Top At_Offset_0 0acc e5ff | | Load 0x2,-0x1 0acd 01d7 | | Execute Vector,Field_Read 0ace 0227 | ' | Execute Access,All_Reference 0acf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ad0 7009 |p | Jump_Nonzero 0xada 0ad1 00d8 | | Load_Top At_Offset_0 0ad2 e5ff | | Load 0x2,-0x1 0ad3 01d7 | | Execute Vector,Field_Read 0ad4 a402 | | Store_Unchecked 0x2,0x2 0ad5 00d8 | | Load_Top At_Offset_0 0ad6 c404 | | Store 0x2,0x4 0ad7 00d2 | | Pop_Control Pop_Count_2 0ad8 00ce | | Action Pop_Auxiliary 0ad9 7805 |x | Jump 0xadf 0ada 00c8 | | Action Pop_Auxiliary_Range 0adb 3fef |? | Loop_Increasing 0xacb 0adc 00ce | | Action Pop_Auxiliary 0add 00ce | | Action Pop_Auxiliary 0ade 78ac |x | Jump 0xb8b 0adf 0008 | | Action Idle 0ae0 00cf | | Action Mark_Auxiliary 0ae1 e5fe | | Load 0x2,-0x2 0ae2 01dc | | Execute Vector,Last 0ae3 e405 | | Load 0x2,0x5 0ae4 0a01 | | Execute_Immediate Plus,0x1 0ae5 0263 | c | Execute Discrete,Above_Bound 0ae6 7021 |p! | Jump_Nonzero 0xb08 0ae7 00d8 | | Load_Top At_Offset_0 0ae8 e5fe | | Load 0x2,-0x2 0ae9 01d7 | | Execute Vector,Field_Read 0aea a403 | | Store_Unchecked 0x2,0x3 0aeb e403 | | Load 0x2,0x3 0aec 0227 | ' | Execute Access,All_Reference 0aed 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0aee 7017 |p | Jump_Nonzero 0xb06 0aef e402 | | Load 0x2,0x2 0af0 0227 | ' | Execute Access,All_Reference 0af1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0af2 e403 | | Load 0x2,0x3 0af3 0227 | ' | Execute Access,All_Reference 0af4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0af5 027f | | Execute Discrete,Equal 0af6 680f |h | Jump_Zero 0xb06 0af7 e402 | | Load 0x2,0x2 0af8 0227 | ' | Execute Access,All_Reference 0af9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0afa 0227 | ' | Execute Access,All_Reference 0afb e403 | | Load 0x2,0x3 0afc 0227 | ' | Execute Access,All_Reference 0afd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0afe 0227 | ' | Execute Access,All_Reference 0aff 01df | | Execute Vector,Equal 0b00 6805 |h | Jump_Zero 0xb06 0b01 00d8 | | Load_Top At_Offset_0 0b02 c405 | | Store 0x2,0x5 0b03 00d2 | | Pop_Control Pop_Count_2 0b04 00ce | | Action Pop_Auxiliary 0b05 7805 |x | Jump 0xb0b 0b06 00c8 | | Action Pop_Auxiliary_Range 0b07 3fdf |? | Loop_Increasing 0xae7 0b08 00ce | | Action Pop_Auxiliary 0b09 00c9 | | Action Pop_Auxiliary_Loop 0b0a 7fb9 | | Jump 0xac4 0b0b 00ce | | Action Pop_Auxiliary 0b0c 0008 | | Action Idle 0b0d 0007 | | Action Break_Optional 0b0e e404 | | Load 0x2,0x4 0b0f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0b10 e405 | | Load 0x2,0x5 0b11 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0b12 00cf | | Action Mark_Auxiliary 0b13 7824 |x$ | Jump 0xb38 0b14 e404 | | Load 0x2,0x4 0b15 0aff | | Execute_Immediate Plus,-0x1 0b16 e5ff | | Load 0x2,-0x1 0b17 01d7 | | Execute Vector,Field_Read 0b18 a402 | | Store_Unchecked 0x2,0x2 0b19 e405 | | Load 0x2,0x5 0b1a 0aff | | Execute_Immediate Plus,-0x1 0b1b e5fe | | Load 0x2,-0x2 0b1c 01d7 | | Execute Vector,Field_Read 0b1d a403 | | Store_Unchecked 0x2,0x3 0b1e e402 | | Load 0x2,0x2 0b1f 0227 | ' | Execute Access,All_Reference 0b20 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b21 e403 | | Load 0x2,0x3 0b22 0227 | ' | Execute Access,All_Reference 0b23 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b24 027e | ~ | Execute Discrete,Not_Equal 0b25 701c |p | Jump_Nonzero 0xb42 0b26 e402 | | Load 0x2,0x2 0b27 0227 | ' | Execute Access,All_Reference 0b28 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b29 0227 | ' | Execute Access,All_Reference 0b2a e403 | | Load 0x2,0x3 0b2b 0227 | ' | Execute Access,All_Reference 0b2c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b2d 0227 | ' | Execute Access,All_Reference 0b2e 01de | | Execute Vector,Not_Equal 0b2f 6801 |h | Jump_Zero 0xb31 0b30 7811 |x | Jump 0xb42 0b31 e404 | | Load 0x2,0x4 0b32 0aff | | Execute_Immediate Plus,-0x1 0b33 c404 | | Store 0x2,0x4 0b34 e405 | | Load 0x2,0x5 0b35 0aff | | Execute_Immediate Plus,-0x1 0b36 c405 | | Store 0x2,0x5 0b37 00c9 | | Action Pop_Auxiliary_Loop 0b38 e404 | | Load 0x2,0x4 0b39 0aff | | Execute_Immediate Plus,-0x1 0b3a e406 | | Load 0x2,0x6 0b3b 027d | } | Execute Discrete,Greater 0b3c 6805 |h | Jump_Zero 0xb42 0b3d e405 | | Load 0x2,0x5 0b3e 0aff | | Execute_Immediate Plus,-0x1 0b3f e407 | | Load 0x2,0x7 0b40 027d | } | Execute Discrete,Greater 0b41 77d2 |w | Jump_Nonzero 0xb14 0b42 00ce | | Action Pop_Auxiliary 0b43 00db | | Load_Top At_Offset_3 0b44 0a01 | | Execute_Immediate Plus,0x1 0b45 e405 | | Load 0x2,0x5 0b46 0aff | | Execute_Immediate Plus,-0x1 0b47 e5fe | | Load 0x2,-0x2 0b48 01cf | | Execute Vector,Slice_Read 0b49 e406 | | Load 0x2,0x6 0b4a 0a01 | | Execute_Immediate Plus,0x1 0b4b e404 | | Load 0x2,0x4 0b4c 0aff | | Execute_Immediate Plus,-0x1 0b4d e5ff | | Load 0x2,-0x1 0b4e 01cf | | Execute Vector,Slice_Read 0b4f 8256 | V | Call 0x1,0x56 0b50 00da | | Load_Top At_Offset_2 0b51 a404 | | Store_Unchecked 0x2,0x4 0b52 00d9 | | Load_Top At_Offset_1 0b53 a405 | | Store_Unchecked 0x2,0x5 0b54 00cf | | Action Mark_Auxiliary 0b55 7824 |x$ | Jump 0xb7a 0b56 e404 | | Load 0x2,0x4 0b57 0a01 | | Execute_Immediate Plus,0x1 0b58 e5ff | | Load 0x2,-0x1 0b59 01d7 | | Execute Vector,Field_Read 0b5a a402 | | Store_Unchecked 0x2,0x2 0b5b e405 | | Load 0x2,0x5 0b5c 0a01 | | Execute_Immediate Plus,0x1 0b5d e5fe | | Load 0x2,-0x2 0b5e 01d7 | | Execute Vector,Field_Read 0b5f a403 | | Store_Unchecked 0x2,0x3 0b60 e402 | | Load 0x2,0x2 0b61 0227 | ' | Execute Access,All_Reference 0b62 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b63 e403 | | Load 0x2,0x3 0b64 0227 | ' | Execute Access,All_Reference 0b65 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b66 027e | ~ | Execute Discrete,Not_Equal 0b67 701c |p | Jump_Nonzero 0xb84 0b68 e402 | | Load 0x2,0x2 0b69 0227 | ' | Execute Access,All_Reference 0b6a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b6b 0227 | ' | Execute Access,All_Reference 0b6c e403 | | Load 0x2,0x3 0b6d 0227 | ' | Execute Access,All_Reference 0b6e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b6f 0227 | ' | Execute Access,All_Reference 0b70 01de | | Execute Vector,Not_Equal 0b71 6801 |h | Jump_Zero 0xb73 0b72 7811 |x | Jump 0xb84 0b73 e404 | | Load 0x2,0x4 0b74 0a01 | | Execute_Immediate Plus,0x1 0b75 c404 | | Store 0x2,0x4 0b76 e405 | | Load 0x2,0x5 0b77 0a01 | | Execute_Immediate Plus,0x1 0b78 c405 | | Store 0x2,0x5 0b79 00c9 | | Action Pop_Auxiliary_Loop 0b7a e404 | | Load 0x2,0x4 0b7b e5ff | | Load 0x2,-0x1 0b7c 01dc | | Execute Vector,Last 0b7d 027c | | | Execute Discrete,Less 0b7e 6805 |h | Jump_Zero 0xb84 0b7f e405 | | Load 0x2,0x5 0b80 e5fe | | Load 0x2,-0x2 0b81 01dc | | Execute Vector,Last 0b82 027c | | | Execute Discrete,Less 0b83 77d2 |w | Jump_Nonzero 0xb56 0b84 00ce | | Action Pop_Auxiliary 0b85 e404 | | Load 0x2,0x4 0b86 a406 | | Store_Unchecked 0x2,0x6 0b87 e405 | | Load 0x2,0x5 0b88 a407 | | Store_Unchecked 0x2,0x7 0b89 00c9 | | Action Pop_Auxiliary_Loop 0b8a 7f38 | 8 | Jump 0xac3 0b8b 00ce | | Action Pop_Auxiliary 0b8c 00da | | Load_Top At_Offset_2 0b8d 0a01 | | Execute_Immediate Plus,0x1 0b8e e5fe | | Load 0x2,-0x2 0b8f 01dc | | Execute Vector,Last 0b90 e5fe | | Load 0x2,-0x2 0b91 01cf | | Execute Vector,Slice_Read 0b92 e406 | | Load 0x2,0x6 0b93 0a01 | | Execute_Immediate Plus,0x1 0b94 e5ff | | Load 0x2,-0x1 0b95 01dc | | Execute Vector,Last 0b96 e5ff | | Load 0x2,-0x1 0b97 01cf | | Execute Vector,Slice_Read 0b98 8256 | V | Call 0x1,0x56 0b99 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b9a 0000 0000 | | .BLANK 0000[0x6] 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 ; SUBPROGRAM 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 0bb3 | | .CONST 0x0bb3 ; Address of begin 0ba1 0004 | | .CONST 0x0004 ; Address of exception handler 0ba2 0009 | | .CONST 0x0009 ; Number of locals 0ba3 INIT_0ba0: 0ba3 e239 | 9 | Load 0x1,0x39 0ba4 0007 | | Action Break_Optional 0ba5 e239 | 9 | Load 0x1,0x39 0ba6 0007 | | Action Break_Optional 0ba7 e00b | | Load 0x0,0xb 0ba8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0ba9 e00b | | Load 0x0,0xb 0baa 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0bab e00b | | Load 0x0,0xb 0bac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0bad e00b | | Load 0x0,0xb 0bae 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0baf e00b | | Load 0x0,0xb 0bb0 0007 | | Action Break_Optional 0bb1 e00b | | Load 0x0,0xb 0bb2 0007 | | Action Break_Optional 0bb3 BODY_0ba0: 0bb3 e5ff | | Load 0x2,-0x1 0bb4 01dd | | Execute Vector,First 0bb5 e5fe | | Load 0x2,-0x2 0bb6 01dd | | Execute Vector,First 0bb7 027e | ~ | Execute Discrete,Not_Equal 0bb8 6801 |h | Jump_Zero 0xbba 0bb9 08e2 | | Execute_Immediate Raise,0xe2 0bba 00cf | | Action Mark_Auxiliary 0bbb 00cf | | Action Mark_Auxiliary 0bbc 0007 | | Action Break_Optional 0bbd e406 | | Load 0x2,0x6 0bbe e5ff | | Load 0x2,-0x1 0bbf 01dc | | Execute Vector,Last 0bc0 027f | | Execute Discrete,Equal 0bc1 6802 |h | Jump_Zero 0xbc4 0bc2 00ce | | Action Pop_Auxiliary 0bc3 784a |xJ | Jump 0xc0e 0bc4 e406 | | Load 0x2,0x6 0bc5 0a01 | | Execute_Immediate Plus,0x1 0bc6 e5ff | | Load 0x2,-0x1 0bc7 01d7 | | Execute Vector,Field_Read 0bc8 0227 | ' | Execute Access,All_Reference 0bc9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0bca 7001 |p | Jump_Nonzero 0xbcc 0bcb 7805 |x | Jump 0xbd1 0bcc e406 | | Load 0x2,0x6 0bcd 0a01 | | Execute_Immediate Plus,0x1 0bce c406 | | Store 0x2,0x6 0bcf 00c9 | | Action Pop_Auxiliary_Loop 0bd0 7fec | | Jump 0xbbd 0bd1 00ce | | Action Pop_Auxiliary 0bd2 e406 | | Load 0x2,0x6 0bd3 0a01 | | Execute_Immediate Plus,0x1 0bd4 e5ff | | Load 0x2,-0x1 0bd5 01d7 | | Execute Vector,Field_Read 0bd6 a402 | | Store_Unchecked 0x2,0x2 0bd7 00cf | | Action Mark_Auxiliary 0bd8 0007 | | Action Break_Optional 0bd9 e407 | | Load 0x2,0x7 0bda e5ff | | Load 0x2,-0x1 0bdb 01dc | | Execute Vector,Last 0bdc 027f | | Execute Discrete,Equal 0bdd 6802 |h | Jump_Zero 0xbe0 0bde 00ce | | Action Pop_Auxiliary 0bdf 782e |x. | Jump 0xc0e 0be0 e407 | | Load 0x2,0x7 0be1 0a01 | | Execute_Immediate Plus,0x1 0be2 e5ff | | Load 0x2,-0x1 0be3 01d7 | | Execute Vector,Field_Read 0be4 0227 | ' | Execute Access,All_Reference 0be5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0be6 7001 |p | Jump_Nonzero 0xbe8 0be7 7805 |x | Jump 0xbed 0be8 e407 | | Load 0x2,0x7 0be9 0a01 | | Execute_Immediate Plus,0x1 0bea c407 | | Store 0x2,0x7 0beb 00c9 | | Action Pop_Auxiliary_Loop 0bec 7fec | | Jump 0xbd9 0bed 00ce | | Action Pop_Auxiliary 0bee 00db | | Load_Top At_Offset_3 0bef 0a01 | | Execute_Immediate Plus,0x1 0bf0 e5ff | | Load 0x2,-0x1 0bf1 01d7 | | Execute Vector,Field_Read 0bf2 a403 | | Store_Unchecked 0x2,0x3 0bf3 e402 | | Load 0x2,0x2 0bf4 0227 | ' | Execute Access,All_Reference 0bf5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0bf6 e403 | | Load 0x2,0x3 0bf7 0227 | ' | Execute Access,All_Reference 0bf8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0bf9 027e | ~ | Execute Discrete,Not_Equal 0bfa 7013 |p | Jump_Nonzero 0xc0e 0bfb e402 | | Load 0x2,0x2 0bfc 0227 | ' | Execute Access,All_Reference 0bfd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bfe 0227 | ' | Execute Access,All_Reference 0bff e403 | | Load 0x2,0x3 0c00 0227 | ' | Execute Access,All_Reference 0c01 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c02 0227 | ' | Execute Access,All_Reference 0c03 01de | | Execute Vector,Not_Equal 0c04 6801 |h | Jump_Zero 0xc06 0c05 7808 |x | Jump 0xc0e 0c06 e406 | | Load 0x2,0x6 0c07 0a01 | | Execute_Immediate Plus,0x1 0c08 c406 | | Store 0x2,0x6 0c09 00db | | Load_Top At_Offset_3 0c0a 0a01 | | Execute_Immediate Plus,0x1 0c0b c407 | | Store 0x2,0x7 0c0c 00c9 | | Action Pop_Auxiliary_Loop 0c0d 7fad | | Jump 0xbbb 0c0e 00ce | | Action Pop_Auxiliary 0c0f 00cf | | Action Mark_Auxiliary 0c10 0007 | | Action Break_Optional 0c11 00cf | | Action Mark_Auxiliary 0c12 00cf | | Action Mark_Auxiliary 0c13 e5ff | | Load 0x2,-0x1 0c14 01dc | | Execute Vector,Last 0c15 e404 | | Load 0x2,0x4 0c16 0a01 | | Execute_Immediate Plus,0x1 0c17 0263 | c | Execute Discrete,Above_Bound 0c18 7011 |p | Jump_Nonzero 0xc2a 0c19 00d8 | | Load_Top At_Offset_0 0c1a e5ff | | Load 0x2,-0x1 0c1b 01d7 | | Execute Vector,Field_Read 0c1c 0227 | ' | Execute Access,All_Reference 0c1d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0c1e 7009 |p | Jump_Nonzero 0xc28 0c1f 00d8 | | Load_Top At_Offset_0 0c20 e5ff | | Load 0x2,-0x1 0c21 01d7 | | Execute Vector,Field_Read 0c22 a402 | | Store_Unchecked 0x2,0x2 0c23 00d8 | | Load_Top At_Offset_0 0c24 c404 | | Store 0x2,0x4 0c25 00d2 | | Pop_Control Pop_Count_2 0c26 00ce | | Action Pop_Auxiliary 0c27 7805 |x | Jump 0xc2d 0c28 00c8 | | Action Pop_Auxiliary_Range 0c29 3fef |? | Loop_Increasing 0xc19 0c2a 00ce | | Action Pop_Auxiliary 0c2b 00ce | | Action Pop_Auxiliary 0c2c 790e |y | Jump 0xd3b 0c2d 0008 | | Action Idle 0c2e 00cf | | Action Mark_Auxiliary 0c2f e5fe | | Load 0x2,-0x2 0c30 01dc | | Execute Vector,Last 0c31 e405 | | Load 0x2,0x5 0c32 0a01 | | Execute_Immediate Plus,0x1 0c33 0263 | c | Execute Discrete,Above_Bound 0c34 7021 |p! | Jump_Nonzero 0xc56 0c35 00d8 | | Load_Top At_Offset_0 0c36 e5fe | | Load 0x2,-0x2 0c37 01d7 | | Execute Vector,Field_Read 0c38 a403 | | Store_Unchecked 0x2,0x3 0c39 e403 | | Load 0x2,0x3 0c3a 0227 | ' | Execute Access,All_Reference 0c3b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0c3c 7017 |p | Jump_Nonzero 0xc54 0c3d e402 | | Load 0x2,0x2 0c3e 0227 | ' | Execute Access,All_Reference 0c3f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c40 e403 | | Load 0x2,0x3 0c41 0227 | ' | Execute Access,All_Reference 0c42 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c43 027f | | Execute Discrete,Equal 0c44 680f |h | Jump_Zero 0xc54 0c45 e402 | | Load 0x2,0x2 0c46 0227 | ' | Execute Access,All_Reference 0c47 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c48 0227 | ' | Execute Access,All_Reference 0c49 e403 | | Load 0x2,0x3 0c4a 0227 | ' | Execute Access,All_Reference 0c4b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c4c 0227 | ' | Execute Access,All_Reference 0c4d 01df | | Execute Vector,Equal 0c4e 6805 |h | Jump_Zero 0xc54 0c4f 00d8 | | Load_Top At_Offset_0 0c50 c405 | | Store 0x2,0x5 0c51 00d2 | | Pop_Control Pop_Count_2 0c52 00ce | | Action Pop_Auxiliary 0c53 7805 |x | Jump 0xc59 0c54 00c8 | | Action Pop_Auxiliary_Range 0c55 3fdf |? | Loop_Increasing 0xc35 0c56 00ce | | Action Pop_Auxiliary 0c57 00c9 | | Action Pop_Auxiliary_Loop 0c58 7fb9 | | Jump 0xc12 0c59 00ce | | Action Pop_Auxiliary 0c5a 0008 | | Action Idle 0c5b 0007 | | Action Break_Optional 0c5c e404 | | Load 0x2,0x4 0c5d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0c5e e405 | | Load 0x2,0x5 0c5f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0c60 00cf | | Action Mark_Auxiliary 0c61 00cf | | Action Mark_Auxiliary 0c62 0007 | | Action Break_Optional 0c63 e404 | | Load 0x2,0x4 0c64 0aff | | Execute_Immediate Plus,-0x1 0c65 e406 | | Load 0x2,0x6 0c66 027a | z | Execute Discrete,Less_Equal 0c67 6802 |h | Jump_Zero 0xc6a 0c68 00ce | | Action Pop_Auxiliary 0c69 7843 |xC | Jump 0xcad 0c6a e404 | | Load 0x2,0x4 0c6b 0aff | | Execute_Immediate Plus,-0x1 0c6c e5ff | | Load 0x2,-0x1 0c6d 01d7 | | Execute Vector,Field_Read 0c6e a402 | | Store_Unchecked 0x2,0x2 0c6f e402 | | Load 0x2,0x2 0c70 0227 | ' | Execute Access,All_Reference 0c71 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0c72 7001 |p | Jump_Nonzero 0xc74 0c73 7805 |x | Jump 0xc79 0c74 e404 | | Load 0x2,0x4 0c75 0aff | | Execute_Immediate Plus,-0x1 0c76 c404 | | Store 0x2,0x4 0c77 00c9 | | Action Pop_Auxiliary_Loop 0c78 7fea | | Jump 0xc63 0c79 00c9 | | Action Pop_Auxiliary_Loop 0c7a 0007 | | Action Break_Optional 0c7b e405 | | Load 0x2,0x5 0c7c 0aff | | Execute_Immediate Plus,-0x1 0c7d e407 | | Load 0x2,0x7 0c7e 027a | z | Execute Discrete,Less_Equal 0c7f 6802 |h | Jump_Zero 0xc82 0c80 00ce | | Action Pop_Auxiliary 0c81 782b |x+ | Jump 0xcad 0c82 e405 | | Load 0x2,0x5 0c83 0aff | | Execute_Immediate Plus,-0x1 0c84 e5fe | | Load 0x2,-0x2 0c85 01d7 | | Execute Vector,Field_Read 0c86 a403 | | Store_Unchecked 0x2,0x3 0c87 e403 | | Load 0x2,0x3 0c88 0227 | ' | Execute Access,All_Reference 0c89 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0c8a 7001 |p | Jump_Nonzero 0xc8c 0c8b 7805 |x | Jump 0xc91 0c8c e405 | | Load 0x2,0x5 0c8d 0aff | | Execute_Immediate Plus,-0x1 0c8e c405 | | Store 0x2,0x5 0c8f 00c9 | | Action Pop_Auxiliary_Loop 0c90 7fea | | Jump 0xc7b 0c91 00ce | | Action Pop_Auxiliary 0c92 e402 | | Load 0x2,0x2 0c93 0227 | ' | Execute Access,All_Reference 0c94 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c95 e403 | | Load 0x2,0x3 0c96 0227 | ' | Execute Access,All_Reference 0c97 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c98 027e | ~ | Execute Discrete,Not_Equal 0c99 7013 |p | Jump_Nonzero 0xcad 0c9a e402 | | Load 0x2,0x2 0c9b 0227 | ' | Execute Access,All_Reference 0c9c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c9d 0227 | ' | Execute Access,All_Reference 0c9e e403 | | Load 0x2,0x3 0c9f 0227 | ' | Execute Access,All_Reference 0ca0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ca1 0227 | ' | Execute Access,All_Reference 0ca2 01de | | Execute Vector,Not_Equal 0ca3 6801 |h | Jump_Zero 0xca5 0ca4 7808 |x | Jump 0xcad 0ca5 e404 | | Load 0x2,0x4 0ca6 0aff | | Execute_Immediate Plus,-0x1 0ca7 c404 | | Store 0x2,0x4 0ca8 e405 | | Load 0x2,0x5 0ca9 0aff | | Execute_Immediate Plus,-0x1 0caa c405 | | Store 0x2,0x5 0cab 00c9 | | Action Pop_Auxiliary_Loop 0cac 7fb4 | | Jump 0xc61 0cad 00c9 | | Action Pop_Auxiliary_Loop 0cae 780c |x | Jump 0xcbb 0caf e406 | | Load 0x2,0x6 0cb0 0a01 | | Execute_Immediate Plus,0x1 0cb1 e5ff | | Load 0x2,-0x1 0cb2 01d7 | | Execute Vector,Field_Read 0cb3 0227 | ' | Execute Access,All_Reference 0cb4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0cb5 7001 |p | Jump_Nonzero 0xcb7 0cb6 780a |x | Jump 0xcc1 0cb7 e406 | | Load 0x2,0x6 0cb8 0a01 | | Execute_Immediate Plus,0x1 0cb9 c406 | | Store 0x2,0x6 0cba 00c9 | | Action Pop_Auxiliary_Loop 0cbb e406 | | Load 0x2,0x6 0cbc 0a01 | | Execute_Immediate Plus,0x1 0cbd e404 | | Load 0x2,0x4 0cbe 0aff | | Execute_Immediate Plus,-0x1 0cbf 027c | | | Execute Discrete,Less 0cc0 77ee |w | Jump_Nonzero 0xcaf 0cc1 00c9 | | Action Pop_Auxiliary_Loop 0cc2 780c |x | Jump 0xccf 0cc3 e407 | | Load 0x2,0x7 0cc4 0a01 | | Execute_Immediate Plus,0x1 0cc5 e5ff | | Load 0x2,-0x1 0cc6 01d7 | | Execute Vector,Field_Read 0cc7 0227 | ' | Execute Access,All_Reference 0cc8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0cc9 7001 |p | Jump_Nonzero 0xccb 0cca 780a |x | Jump 0xcd5 0ccb e407 | | Load 0x2,0x7 0ccc 0a01 | | Execute_Immediate Plus,0x1 0ccd c407 | | Store 0x2,0x7 0cce 00c9 | | Action Pop_Auxiliary_Loop 0ccf e407 | | Load 0x2,0x7 0cd0 0a01 | | Execute_Immediate Plus,0x1 0cd1 e405 | | Load 0x2,0x5 0cd2 0aff | | Execute_Immediate Plus,-0x1 0cd3 027c | | | Execute Discrete,Less 0cd4 77ee |w | Jump_Nonzero 0xcc3 0cd5 00ce | | Action Pop_Auxiliary 0cd6 00db | | Load_Top At_Offset_3 0cd7 0a01 | | Execute_Immediate Plus,0x1 0cd8 e405 | | Load 0x2,0x5 0cd9 0aff | | Execute_Immediate Plus,-0x1 0cda e5fe | | Load 0x2,-0x2 0cdb 01cf | | Execute Vector,Slice_Read 0cdc e406 | | Load 0x2,0x6 0cdd 0a01 | | Execute_Immediate Plus,0x1 0cde e404 | | Load 0x2,0x4 0cdf 0aff | | Execute_Immediate Plus,-0x1 0ce0 e5ff | | Load 0x2,-0x1 0ce1 01cf | | Execute Vector,Slice_Read 0ce2 8256 | V | Call 0x1,0x56 0ce3 00da | | Load_Top At_Offset_2 0ce4 a404 | | Store_Unchecked 0x2,0x4 0ce5 00d9 | | Load_Top At_Offset_1 0ce6 a405 | | Store_Unchecked 0x2,0x5 0ce7 00cf | | Action Mark_Auxiliary 0ce8 00cf | | Action Mark_Auxiliary 0ce9 0007 | | Action Break_Optional 0cea e404 | | Load 0x2,0x4 0ceb e5ff | | Load 0x2,-0x1 0cec 01dc | | Execute Vector,Last 0ced 027b | { | Execute Discrete,Greater_Equal 0cee 6802 |h | Jump_Zero 0xcf1 0cef 00ce | | Action Pop_Auxiliary 0cf0 7843 |xC | Jump 0xd34 0cf1 e404 | | Load 0x2,0x4 0cf2 0a01 | | Execute_Immediate Plus,0x1 0cf3 e5ff | | Load 0x2,-0x1 0cf4 01d7 | | Execute Vector,Field_Read 0cf5 a402 | | Store_Unchecked 0x2,0x2 0cf6 e402 | | Load 0x2,0x2 0cf7 0227 | ' | Execute Access,All_Reference 0cf8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0cf9 7001 |p | Jump_Nonzero 0xcfb 0cfa 7805 |x | Jump 0xd00 0cfb e404 | | Load 0x2,0x4 0cfc 0a01 | | Execute_Immediate Plus,0x1 0cfd c404 | | Store 0x2,0x4 0cfe 00c9 | | Action Pop_Auxiliary_Loop 0cff 7fea | | Jump 0xcea 0d00 00c9 | | Action Pop_Auxiliary_Loop 0d01 0007 | | Action Break_Optional 0d02 e405 | | Load 0x2,0x5 0d03 e5fe | | Load 0x2,-0x2 0d04 01dc | | Execute Vector,Last 0d05 027b | { | Execute Discrete,Greater_Equal 0d06 6802 |h | Jump_Zero 0xd09 0d07 00ce | | Action Pop_Auxiliary 0d08 782b |x+ | Jump 0xd34 0d09 e405 | | Load 0x2,0x5 0d0a 0a01 | | Execute_Immediate Plus,0x1 0d0b e5fe | | Load 0x2,-0x2 0d0c 01d7 | | Execute Vector,Field_Read 0d0d a403 | | Store_Unchecked 0x2,0x3 0d0e e403 | | Load 0x2,0x3 0d0f 0227 | ' | Execute Access,All_Reference 0d10 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0d11 7001 |p | Jump_Nonzero 0xd13 0d12 7805 |x | Jump 0xd18 0d13 e405 | | Load 0x2,0x5 0d14 0a01 | | Execute_Immediate Plus,0x1 0d15 c405 | | Store 0x2,0x5 0d16 00c9 | | Action Pop_Auxiliary_Loop 0d17 7fea | | Jump 0xd02 0d18 00ce | | Action Pop_Auxiliary 0d19 e402 | | Load 0x2,0x2 0d1a 0227 | ' | Execute Access,All_Reference 0d1b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0d1c e403 | | Load 0x2,0x3 0d1d 0227 | ' | Execute Access,All_Reference 0d1e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0d1f 027e | ~ | Execute Discrete,Not_Equal 0d20 7013 |p | Jump_Nonzero 0xd34 0d21 e402 | | Load 0x2,0x2 0d22 0227 | ' | Execute Access,All_Reference 0d23 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d24 0227 | ' | Execute Access,All_Reference 0d25 e403 | | Load 0x2,0x3 0d26 0227 | ' | Execute Access,All_Reference 0d27 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d28 0227 | ' | Execute Access,All_Reference 0d29 01de | | Execute Vector,Not_Equal 0d2a 6801 |h | Jump_Zero 0xd2c 0d2b 7808 |x | Jump 0xd34 0d2c e404 | | Load 0x2,0x4 0d2d 0a01 | | Execute_Immediate Plus,0x1 0d2e c404 | | Store 0x2,0x4 0d2f e405 | | Load 0x2,0x5 0d30 0a01 | | Execute_Immediate Plus,0x1 0d31 c405 | | Store 0x2,0x5 0d32 00c9 | | Action Pop_Auxiliary_Loop 0d33 7fb4 | | Jump 0xce8 0d34 00ce | | Action Pop_Auxiliary 0d35 e404 | | Load 0x2,0x4 0d36 a406 | | Store_Unchecked 0x2,0x6 0d37 e405 | | Load 0x2,0x5 0d38 a407 | | Store_Unchecked 0x2,0x7 0d39 00c9 | | Action Pop_Auxiliary_Loop 0d3a 7ed6 |~ | Jump 0xc11 0d3b 00c9 | | Action Pop_Auxiliary_Loop 0d3c 780c |x | Jump 0xd49 0d3d e406 | | Load 0x2,0x6 0d3e 0a01 | | Execute_Immediate Plus,0x1 0d3f e5ff | | Load 0x2,-0x1 0d40 01d7 | | Execute Vector,Field_Read 0d41 0227 | ' | Execute Access,All_Reference 0d42 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0d43 7001 |p | Jump_Nonzero 0xd45 0d44 780a |x | Jump 0xd4f 0d45 e406 | | Load 0x2,0x6 0d46 0a01 | | Execute_Immediate Plus,0x1 0d47 c406 | | Store 0x2,0x6 0d48 00c9 | | Action Pop_Auxiliary_Loop 0d49 e406 | | Load 0x2,0x6 0d4a 0a01 | | Execute_Immediate Plus,0x1 0d4b e5ff | | Load 0x2,-0x1 0d4c 01dc | | Execute Vector,Last 0d4d 027c | | | Execute Discrete,Less 0d4e 77ee |w | Jump_Nonzero 0xd3d 0d4f 00c9 | | Action Pop_Auxiliary_Loop 0d50 780c |x | Jump 0xd5d 0d51 00db | | Load_Top At_Offset_3 0d52 0a01 | | Execute_Immediate Plus,0x1 0d53 e5ff | | Load 0x2,-0x1 0d54 01d7 | | Execute Vector,Field_Read 0d55 0227 | ' | Execute Access,All_Reference 0d56 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0d57 7001 |p | Jump_Nonzero 0xd59 0d58 780a |x | Jump 0xd63 0d59 00db | | Load_Top At_Offset_3 0d5a 0a01 | | Execute_Immediate Plus,0x1 0d5b c407 | | Store 0x2,0x7 0d5c 00c9 | | Action Pop_Auxiliary_Loop 0d5d 00db | | Load_Top At_Offset_3 0d5e 0a01 | | Execute_Immediate Plus,0x1 0d5f e5fe | | Load 0x2,-0x2 0d60 01dc | | Execute Vector,Last 0d61 027c | | | Execute Discrete,Less 0d62 77ee |w | Jump_Nonzero 0xd51 0d63 00ce | | Action Pop_Auxiliary 0d64 00da | | Load_Top At_Offset_2 0d65 0a01 | | Execute_Immediate Plus,0x1 0d66 e5fe | | Load 0x2,-0x2 0d67 01dc | | Execute Vector,Last 0d68 e5fe | | Load 0x2,-0x2 0d69 01cf | | Execute Vector,Slice_Read 0d6a e406 | | Load 0x2,0x6 0d6b 0a01 | | Execute_Immediate Plus,0x1 0d6c e5ff | | Load 0x2,-0x1 0d6d 01dc | | Execute Vector,Last 0d6e e5ff | | Load 0x2,-0x1 0d6f 01cf | | Execute Vector,Slice_Read 0d70 8256 | V | Call 0x1,0x56 0d71 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d72 0000 0000 | | .BLANK 0000[0x6] 0d78 ; -------------------------------------------------------------------------------------- 0d78 ; SUBPROGRAM 0d78 ; -------------------------------------------------------------------------------------- 0d78 0d8b | | .CONST 0x0d8b ; Address of begin 0d79 0004 | | .CONST 0x0004 ; Address of exception handler 0d7a 0009 | | .CONST 0x0009 ; Number of locals 0d7b INIT_0d78: 0d7b e239 | 9 | Load 0x1,0x39 0d7c 0007 | | Action Break_Optional 0d7d e239 | 9 | Load 0x1,0x39 0d7e 0007 | | Action Break_Optional 0d7f e00b | | Load 0x0,0xb 0d80 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d81 e00b | | Load 0x0,0xb 0d82 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d83 e00b | | Load 0x0,0xb 0d84 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d85 e00b | | Load 0x0,0xb 0d86 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d87 e00b | | Load 0x0,0xb 0d88 0007 | | Action Break_Optional 0d89 e00b | | Load 0x0,0xb 0d8a 0007 | | Action Break_Optional 0d8b BODY_0d78: 0d8b e5ff | | Load 0x2,-0x1 0d8c 01dd | | Execute Vector,First 0d8d e5fe | | Load 0x2,-0x2 0d8e 01dd | | Execute Vector,First 0d8f 027e | ~ | Execute Discrete,Not_Equal 0d90 6801 |h | Jump_Zero 0xd92 0d91 08e2 | | Execute_Immediate Raise,0xe2 0d92 00cf | | Action Mark_Auxiliary 0d93 e5ff | | Load 0x2,-0x1 0d94 01d9 | | Execute Vector,Reverse_Bounds 0d95 0263 | c | Execute Discrete,Above_Bound 0d96 7029 |p) | Jump_Nonzero 0xdc0 0d97 00d8 | | Load_Top At_Offset_0 0d98 e5fe | | Load 0x2,-0x2 0d99 01dc | | Execute Vector,Last 0d9a 027d | } | Execute Discrete,Greater 0d9b 6802 |h | Jump_Zero 0xd9e 0d9c 00d2 | | Pop_Control Pop_Count_2 0d9d 7822 |x" | Jump 0xdc0 0d9e 00d8 | | Load_Top At_Offset_0 0d9f e5ff | | Load 0x2,-0x1 0da0 01d7 | | Execute Vector,Field_Read 0da1 a402 | | Store_Unchecked 0x2,0x2 0da2 00d8 | | Load_Top At_Offset_0 0da3 e5fe | | Load 0x2,-0x2 0da4 01d7 | | Execute Vector,Field_Read 0da5 a403 | | Store_Unchecked 0x2,0x3 0da6 e402 | | Load 0x2,0x2 0da7 0227 | ' | Execute Access,All_Reference 0da8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0da9 e403 | | Load 0x2,0x3 0daa 0227 | ' | Execute Access,All_Reference 0dab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0dac 027e | ~ | Execute Discrete,Not_Equal 0dad 700a |p | Jump_Nonzero 0xdb8 0dae e403 | | Load 0x2,0x3 0daf 0227 | ' | Execute Access,All_Reference 0db0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0db1 0227 | ' | Execute Access,All_Reference 0db2 e402 | | Load 0x2,0x2 0db3 0227 | ' | Execute Access,All_Reference 0db4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0db5 0227 | ' | Execute Access,All_Reference 0db6 8252 | R | Call 0x1,0x52 0db7 7002 |p | Jump_Nonzero 0xdba 0db8 00d2 | | Pop_Control Pop_Count_2 0db9 7806 |x | Jump 0xdc0 0dba 00d8 | | Load_Top At_Offset_0 0dbb a406 | | Store_Unchecked 0x2,0x6 0dbc 00d8 | | Load_Top At_Offset_0 0dbd a407 | | Store_Unchecked 0x2,0x7 0dbe 00c8 | | Action Pop_Auxiliary_Range 0dbf 3fd7 |? | Loop_Increasing 0xd97 0dc0 00ce | | Action Pop_Auxiliary 0dc1 00cf | | Action Mark_Auxiliary 0dc2 0007 | | Action Break_Optional 0dc3 00cf | | Action Mark_Auxiliary 0dc4 00cf | | Action Mark_Auxiliary 0dc5 e5ff | | Load 0x2,-0x1 0dc6 01dc | | Execute Vector,Last 0dc7 e404 | | Load 0x2,0x4 0dc8 0a01 | | Execute_Immediate Plus,0x1 0dc9 0263 | c | Execute Discrete,Above_Bound 0dca 7011 |p | Jump_Nonzero 0xddc 0dcb 00d8 | | Load_Top At_Offset_0 0dcc e5ff | | Load 0x2,-0x1 0dcd 01d7 | | Execute Vector,Field_Read 0dce 0227 | ' | Execute Access,All_Reference 0dcf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0dd0 7009 |p | Jump_Nonzero 0xdda 0dd1 00d8 | | Load_Top At_Offset_0 0dd2 e5ff | | Load 0x2,-0x1 0dd3 01d7 | | Execute Vector,Field_Read 0dd4 a402 | | Store_Unchecked 0x2,0x2 0dd5 00d8 | | Load_Top At_Offset_0 0dd6 c404 | | Store 0x2,0x4 0dd7 00d2 | | Pop_Control Pop_Count_2 0dd8 00ce | | Action Pop_Auxiliary 0dd9 7805 |x | Jump 0xddf 0dda 00c8 | | Action Pop_Auxiliary_Range 0ddb 3fef |? | Loop_Increasing 0xdcb 0ddc 00ce | | Action Pop_Auxiliary 0ddd 00ce | | Action Pop_Auxiliary 0dde 78ac |x | Jump 0xe8b 0ddf 0008 | | Action Idle 0de0 00cf | | Action Mark_Auxiliary 0de1 e5fe | | Load 0x2,-0x2 0de2 01dc | | Execute Vector,Last 0de3 e405 | | Load 0x2,0x5 0de4 0a01 | | Execute_Immediate Plus,0x1 0de5 0263 | c | Execute Discrete,Above_Bound 0de6 7021 |p! | Jump_Nonzero 0xe08 0de7 00d8 | | Load_Top At_Offset_0 0de8 e5fe | | Load 0x2,-0x2 0de9 01d7 | | Execute Vector,Field_Read 0dea a403 | | Store_Unchecked 0x2,0x3 0deb e403 | | Load 0x2,0x3 0dec 0227 | ' | Execute Access,All_Reference 0ded 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0dee 7017 |p | Jump_Nonzero 0xe06 0def e402 | | Load 0x2,0x2 0df0 0227 | ' | Execute Access,All_Reference 0df1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0df2 e403 | | Load 0x2,0x3 0df3 0227 | ' | Execute Access,All_Reference 0df4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0df5 027f | | Execute Discrete,Equal 0df6 680f |h | Jump_Zero 0xe06 0df7 e403 | | Load 0x2,0x3 0df8 0227 | ' | Execute Access,All_Reference 0df9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0dfa 0227 | ' | Execute Access,All_Reference 0dfb e402 | | Load 0x2,0x2 0dfc 0227 | ' | Execute Access,All_Reference 0dfd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0dfe 0227 | ' | Execute Access,All_Reference 0dff 8252 | R | Call 0x1,0x52 0e00 6805 |h | Jump_Zero 0xe06 0e01 00d8 | | Load_Top At_Offset_0 0e02 c405 | | Store 0x2,0x5 0e03 00d2 | | Pop_Control Pop_Count_2 0e04 00ce | | Action Pop_Auxiliary 0e05 7805 |x | Jump 0xe0b 0e06 00c8 | | Action Pop_Auxiliary_Range 0e07 3fdf |? | Loop_Increasing 0xde7 0e08 00ce | | Action Pop_Auxiliary 0e09 00c9 | | Action Pop_Auxiliary_Loop 0e0a 7fb9 | | Jump 0xdc4 0e0b 00ce | | Action Pop_Auxiliary 0e0c 0008 | | Action Idle 0e0d 0007 | | Action Break_Optional 0e0e e404 | | Load 0x2,0x4 0e0f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0e10 e405 | | Load 0x2,0x5 0e11 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0e12 00cf | | Action Mark_Auxiliary 0e13 7824 |x$ | Jump 0xe38 0e14 e404 | | Load 0x2,0x4 0e15 0aff | | Execute_Immediate Plus,-0x1 0e16 e5ff | | Load 0x2,-0x1 0e17 01d7 | | Execute Vector,Field_Read 0e18 a402 | | Store_Unchecked 0x2,0x2 0e19 e405 | | Load 0x2,0x5 0e1a 0aff | | Execute_Immediate Plus,-0x1 0e1b e5fe | | Load 0x2,-0x2 0e1c 01d7 | | Execute Vector,Field_Read 0e1d a403 | | Store_Unchecked 0x2,0x3 0e1e e402 | | Load 0x2,0x2 0e1f 0227 | ' | Execute Access,All_Reference 0e20 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e21 e403 | | Load 0x2,0x3 0e22 0227 | ' | Execute Access,All_Reference 0e23 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e24 027e | ~ | Execute Discrete,Not_Equal 0e25 701c |p | Jump_Nonzero 0xe42 0e26 e403 | | Load 0x2,0x3 0e27 0227 | ' | Execute Access,All_Reference 0e28 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e29 0227 | ' | Execute Access,All_Reference 0e2a e402 | | Load 0x2,0x2 0e2b 0227 | ' | Execute Access,All_Reference 0e2c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e2d 0227 | ' | Execute Access,All_Reference 0e2e 8252 | R | Call 0x1,0x52 0e2f 7001 |p | Jump_Nonzero 0xe31 0e30 7811 |x | Jump 0xe42 0e31 e404 | | Load 0x2,0x4 0e32 0aff | | Execute_Immediate Plus,-0x1 0e33 c404 | | Store 0x2,0x4 0e34 e405 | | Load 0x2,0x5 0e35 0aff | | Execute_Immediate Plus,-0x1 0e36 c405 | | Store 0x2,0x5 0e37 00c9 | | Action Pop_Auxiliary_Loop 0e38 e404 | | Load 0x2,0x4 0e39 0aff | | Execute_Immediate Plus,-0x1 0e3a e406 | | Load 0x2,0x6 0e3b 027d | } | Execute Discrete,Greater 0e3c 6805 |h | Jump_Zero 0xe42 0e3d e405 | | Load 0x2,0x5 0e3e 0aff | | Execute_Immediate Plus,-0x1 0e3f e407 | | Load 0x2,0x7 0e40 027d | } | Execute Discrete,Greater 0e41 77d2 |w | Jump_Nonzero 0xe14 0e42 00ce | | Action Pop_Auxiliary 0e43 00db | | Load_Top At_Offset_3 0e44 0a01 | | Execute_Immediate Plus,0x1 0e45 e405 | | Load 0x2,0x5 0e46 0aff | | Execute_Immediate Plus,-0x1 0e47 e5fe | | Load 0x2,-0x2 0e48 01cf | | Execute Vector,Slice_Read 0e49 e406 | | Load 0x2,0x6 0e4a 0a01 | | Execute_Immediate Plus,0x1 0e4b e404 | | Load 0x2,0x4 0e4c 0aff | | Execute_Immediate Plus,-0x1 0e4d e5ff | | Load 0x2,-0x1 0e4e 01cf | | Execute Vector,Slice_Read 0e4f 8256 | V | Call 0x1,0x56 0e50 00da | | Load_Top At_Offset_2 0e51 a404 | | Store_Unchecked 0x2,0x4 0e52 00d9 | | Load_Top At_Offset_1 0e53 a405 | | Store_Unchecked 0x2,0x5 0e54 00cf | | Action Mark_Auxiliary 0e55 7824 |x$ | Jump 0xe7a 0e56 e404 | | Load 0x2,0x4 0e57 0a01 | | Execute_Immediate Plus,0x1 0e58 e5ff | | Load 0x2,-0x1 0e59 01d7 | | Execute Vector,Field_Read 0e5a a402 | | Store_Unchecked 0x2,0x2 0e5b e405 | | Load 0x2,0x5 0e5c 0a01 | | Execute_Immediate Plus,0x1 0e5d e5fe | | Load 0x2,-0x2 0e5e 01d7 | | Execute Vector,Field_Read 0e5f a403 | | Store_Unchecked 0x2,0x3 0e60 e402 | | Load 0x2,0x2 0e61 0227 | ' | Execute Access,All_Reference 0e62 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e63 e403 | | Load 0x2,0x3 0e64 0227 | ' | Execute Access,All_Reference 0e65 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e66 027e | ~ | Execute Discrete,Not_Equal 0e67 701c |p | Jump_Nonzero 0xe84 0e68 e403 | | Load 0x2,0x3 0e69 0227 | ' | Execute Access,All_Reference 0e6a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e6b 0227 | ' | Execute Access,All_Reference 0e6c e402 | | Load 0x2,0x2 0e6d 0227 | ' | Execute Access,All_Reference 0e6e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e6f 0227 | ' | Execute Access,All_Reference 0e70 8252 | R | Call 0x1,0x52 0e71 7001 |p | Jump_Nonzero 0xe73 0e72 7811 |x | Jump 0xe84 0e73 e404 | | Load 0x2,0x4 0e74 0a01 | | Execute_Immediate Plus,0x1 0e75 c404 | | Store 0x2,0x4 0e76 e405 | | Load 0x2,0x5 0e77 0a01 | | Execute_Immediate Plus,0x1 0e78 c405 | | Store 0x2,0x5 0e79 00c9 | | Action Pop_Auxiliary_Loop 0e7a e404 | | Load 0x2,0x4 0e7b e5ff | | Load 0x2,-0x1 0e7c 01dc | | Execute Vector,Last 0e7d 027c | | | Execute Discrete,Less 0e7e 6805 |h | Jump_Zero 0xe84 0e7f e405 | | Load 0x2,0x5 0e80 e5fe | | Load 0x2,-0x2 0e81 01dc | | Execute Vector,Last 0e82 027c | | | Execute Discrete,Less 0e83 77d2 |w | Jump_Nonzero 0xe56 0e84 00ce | | Action Pop_Auxiliary 0e85 e404 | | Load 0x2,0x4 0e86 a406 | | Store_Unchecked 0x2,0x6 0e87 e405 | | Load 0x2,0x5 0e88 a407 | | Store_Unchecked 0x2,0x7 0e89 00c9 | | Action Pop_Auxiliary_Loop 0e8a 7f38 | 8 | Jump 0xdc3 0e8b 00ce | | Action Pop_Auxiliary 0e8c 00da | | Load_Top At_Offset_2 0e8d 0a01 | | Execute_Immediate Plus,0x1 0e8e e5fe | | Load 0x2,-0x2 0e8f 01dc | | Execute Vector,Last 0e90 e5fe | | Load 0x2,-0x2 0e91 01cf | | Execute Vector,Slice_Read 0e92 e406 | | Load 0x2,0x6 0e93 0a01 | | Execute_Immediate Plus,0x1 0e94 e5ff | | Load 0x2,-0x1 0e95 01dc | | Execute Vector,Last 0e96 e5ff | | Load 0x2,-0x1 0e97 01cf | | Execute Vector,Slice_Read 0e98 8256 | V | Call 0x1,0x56 0e99 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0e9a 0000 0000 | | .BLANK 0000[0x6] 0ea0 ; -------------------------------------------------------------------------------------- 0ea0 ; SUBPROGRAM 0ea0 ; -------------------------------------------------------------------------------------- 0ea0 0eb3 | | .CONST 0x0eb3 ; Address of begin 0ea1 0004 | | .CONST 0x0004 ; Address of exception handler 0ea2 0009 | | .CONST 0x0009 ; Number of locals 0ea3 INIT_0ea0: 0ea3 e239 | 9 | Load 0x1,0x39 0ea4 0007 | | Action Break_Optional 0ea5 e239 | 9 | Load 0x1,0x39 0ea6 0007 | | Action Break_Optional 0ea7 e00b | | Load 0x0,0xb 0ea8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0ea9 e00b | | Load 0x0,0xb 0eaa 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0eab e00b | | Load 0x0,0xb 0eac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0ead e00b | | Load 0x0,0xb 0eae 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0eaf e00b | | Load 0x0,0xb 0eb0 0007 | | Action Break_Optional 0eb1 e00b | | Load 0x0,0xb 0eb2 0007 | | Action Break_Optional 0eb3 BODY_0ea0: 0eb3 e5ff | | Load 0x2,-0x1 0eb4 01dd | | Execute Vector,First 0eb5 e5fe | | Load 0x2,-0x2 0eb6 01dd | | Execute Vector,First 0eb7 027e | ~ | Execute Discrete,Not_Equal 0eb8 6801 |h | Jump_Zero 0xeba 0eb9 08e2 | | Execute_Immediate Raise,0xe2 0eba 00cf | | Action Mark_Auxiliary 0ebb 00cf | | Action Mark_Auxiliary 0ebc 0007 | | Action Break_Optional 0ebd e406 | | Load 0x2,0x6 0ebe e5ff | | Load 0x2,-0x1 0ebf 01dc | | Execute Vector,Last 0ec0 027f | | Execute Discrete,Equal 0ec1 6802 |h | Jump_Zero 0xec4 0ec2 00ce | | Action Pop_Auxiliary 0ec3 784a |xJ | Jump 0xf0e 0ec4 e406 | | Load 0x2,0x6 0ec5 0a01 | | Execute_Immediate Plus,0x1 0ec6 e5ff | | Load 0x2,-0x1 0ec7 01d7 | | Execute Vector,Field_Read 0ec8 0227 | ' | Execute Access,All_Reference 0ec9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0eca 7001 |p | Jump_Nonzero 0xecc 0ecb 7805 |x | Jump 0xed1 0ecc e406 | | Load 0x2,0x6 0ecd 0a01 | | Execute_Immediate Plus,0x1 0ece c406 | | Store 0x2,0x6 0ecf 00c9 | | Action Pop_Auxiliary_Loop 0ed0 7fec | | Jump 0xebd 0ed1 00ce | | Action Pop_Auxiliary 0ed2 e406 | | Load 0x2,0x6 0ed3 0a01 | | Execute_Immediate Plus,0x1 0ed4 e5ff | | Load 0x2,-0x1 0ed5 01d7 | | Execute Vector,Field_Read 0ed6 a402 | | Store_Unchecked 0x2,0x2 0ed7 00cf | | Action Mark_Auxiliary 0ed8 0007 | | Action Break_Optional 0ed9 e407 | | Load 0x2,0x7 0eda e5ff | | Load 0x2,-0x1 0edb 01dc | | Execute Vector,Last 0edc 027f | | Execute Discrete,Equal 0edd 6802 |h | Jump_Zero 0xee0 0ede 00ce | | Action Pop_Auxiliary 0edf 782e |x. | Jump 0xf0e 0ee0 e407 | | Load 0x2,0x7 0ee1 0a01 | | Execute_Immediate Plus,0x1 0ee2 e5ff | | Load 0x2,-0x1 0ee3 01d7 | | Execute Vector,Field_Read 0ee4 0227 | ' | Execute Access,All_Reference 0ee5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ee6 7001 |p | Jump_Nonzero 0xee8 0ee7 7805 |x | Jump 0xeed 0ee8 e407 | | Load 0x2,0x7 0ee9 0a01 | | Execute_Immediate Plus,0x1 0eea c407 | | Store 0x2,0x7 0eeb 00c9 | | Action Pop_Auxiliary_Loop 0eec 7fec | | Jump 0xed9 0eed 00ce | | Action Pop_Auxiliary 0eee 00db | | Load_Top At_Offset_3 0eef 0a01 | | Execute_Immediate Plus,0x1 0ef0 e5ff | | Load 0x2,-0x1 0ef1 01d7 | | Execute Vector,Field_Read 0ef2 a403 | | Store_Unchecked 0x2,0x3 0ef3 e402 | | Load 0x2,0x2 0ef4 0227 | ' | Execute Access,All_Reference 0ef5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ef6 e403 | | Load 0x2,0x3 0ef7 0227 | ' | Execute Access,All_Reference 0ef8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ef9 027e | ~ | Execute Discrete,Not_Equal 0efa 7013 |p | Jump_Nonzero 0xf0e 0efb e403 | | Load 0x2,0x3 0efc 0227 | ' | Execute Access,All_Reference 0efd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0efe 0227 | ' | Execute Access,All_Reference 0eff e402 | | Load 0x2,0x2 0f00 0227 | ' | Execute Access,All_Reference 0f01 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f02 0227 | ' | Execute Access,All_Reference 0f03 8252 | R | Call 0x1,0x52 0f04 7001 |p | Jump_Nonzero 0xf06 0f05 7808 |x | Jump 0xf0e 0f06 e406 | | Load 0x2,0x6 0f07 0a01 | | Execute_Immediate Plus,0x1 0f08 c406 | | Store 0x2,0x6 0f09 00db | | Load_Top At_Offset_3 0f0a 0a01 | | Execute_Immediate Plus,0x1 0f0b c407 | | Store 0x2,0x7 0f0c 00c9 | | Action Pop_Auxiliary_Loop 0f0d 7fad | | Jump 0xebb 0f0e 00ce | | Action Pop_Auxiliary 0f0f 00cf | | Action Mark_Auxiliary 0f10 0007 | | Action Break_Optional 0f11 00cf | | Action Mark_Auxiliary 0f12 00cf | | Action Mark_Auxiliary 0f13 e5ff | | Load 0x2,-0x1 0f14 01dc | | Execute Vector,Last 0f15 e404 | | Load 0x2,0x4 0f16 0a01 | | Execute_Immediate Plus,0x1 0f17 0263 | c | Execute Discrete,Above_Bound 0f18 7011 |p | Jump_Nonzero 0xf2a 0f19 00d8 | | Load_Top At_Offset_0 0f1a e5ff | | Load 0x2,-0x1 0f1b 01d7 | | Execute Vector,Field_Read 0f1c 0227 | ' | Execute Access,All_Reference 0f1d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f1e 7009 |p | Jump_Nonzero 0xf28 0f1f 00d8 | | Load_Top At_Offset_0 0f20 e5ff | | Load 0x2,-0x1 0f21 01d7 | | Execute Vector,Field_Read 0f22 a402 | | Store_Unchecked 0x2,0x2 0f23 00d8 | | Load_Top At_Offset_0 0f24 c404 | | Store 0x2,0x4 0f25 00d2 | | Pop_Control Pop_Count_2 0f26 00ce | | Action Pop_Auxiliary 0f27 7805 |x | Jump 0xf2d 0f28 00c8 | | Action Pop_Auxiliary_Range 0f29 3fef |? | Loop_Increasing 0xf19 0f2a 00ce | | Action Pop_Auxiliary 0f2b 00ce | | Action Pop_Auxiliary 0f2c 790e |y | Jump 0x103b 0f2d 0008 | | Action Idle 0f2e 00cf | | Action Mark_Auxiliary 0f2f e5fe | | Load 0x2,-0x2 0f30 01dc | | Execute Vector,Last 0f31 e405 | | Load 0x2,0x5 0f32 0a01 | | Execute_Immediate Plus,0x1 0f33 0263 | c | Execute Discrete,Above_Bound 0f34 7021 |p! | Jump_Nonzero 0xf56 0f35 00d8 | | Load_Top At_Offset_0 0f36 e5fe | | Load 0x2,-0x2 0f37 01d7 | | Execute Vector,Field_Read 0f38 a403 | | Store_Unchecked 0x2,0x3 0f39 e403 | | Load 0x2,0x3 0f3a 0227 | ' | Execute Access,All_Reference 0f3b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f3c 7017 |p | Jump_Nonzero 0xf54 0f3d e402 | | Load 0x2,0x2 0f3e 0227 | ' | Execute Access,All_Reference 0f3f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f40 e403 | | Load 0x2,0x3 0f41 0227 | ' | Execute Access,All_Reference 0f42 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f43 027f | | Execute Discrete,Equal 0f44 680f |h | Jump_Zero 0xf54 0f45 e403 | | Load 0x2,0x3 0f46 0227 | ' | Execute Access,All_Reference 0f47 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f48 0227 | ' | Execute Access,All_Reference 0f49 e402 | | Load 0x2,0x2 0f4a 0227 | ' | Execute Access,All_Reference 0f4b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f4c 0227 | ' | Execute Access,All_Reference 0f4d 8252 | R | Call 0x1,0x52 0f4e 6805 |h | Jump_Zero 0xf54 0f4f 00d8 | | Load_Top At_Offset_0 0f50 c405 | | Store 0x2,0x5 0f51 00d2 | | Pop_Control Pop_Count_2 0f52 00ce | | Action Pop_Auxiliary 0f53 7805 |x | Jump 0xf59 0f54 00c8 | | Action Pop_Auxiliary_Range 0f55 3fdf |? | Loop_Increasing 0xf35 0f56 00ce | | Action Pop_Auxiliary 0f57 00c9 | | Action Pop_Auxiliary_Loop 0f58 7fb9 | | Jump 0xf12 0f59 00ce | | Action Pop_Auxiliary 0f5a 0008 | | Action Idle 0f5b 0007 | | Action Break_Optional 0f5c e404 | | Load 0x2,0x4 0f5d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0f5e e405 | | Load 0x2,0x5 0f5f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0f60 00cf | | Action Mark_Auxiliary 0f61 00cf | | Action Mark_Auxiliary 0f62 0007 | | Action Break_Optional 0f63 e404 | | Load 0x2,0x4 0f64 0aff | | Execute_Immediate Plus,-0x1 0f65 e406 | | Load 0x2,0x6 0f66 027a | z | Execute Discrete,Less_Equal 0f67 6802 |h | Jump_Zero 0xf6a 0f68 00ce | | Action Pop_Auxiliary 0f69 7843 |xC | Jump 0xfad 0f6a e404 | | Load 0x2,0x4 0f6b 0aff | | Execute_Immediate Plus,-0x1 0f6c e5ff | | Load 0x2,-0x1 0f6d 01d7 | | Execute Vector,Field_Read 0f6e a402 | | Store_Unchecked 0x2,0x2 0f6f e402 | | Load 0x2,0x2 0f70 0227 | ' | Execute Access,All_Reference 0f71 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f72 7001 |p | Jump_Nonzero 0xf74 0f73 7805 |x | Jump 0xf79 0f74 e404 | | Load 0x2,0x4 0f75 0aff | | Execute_Immediate Plus,-0x1 0f76 c404 | | Store 0x2,0x4 0f77 00c9 | | Action Pop_Auxiliary_Loop 0f78 7fea | | Jump 0xf63 0f79 00c9 | | Action Pop_Auxiliary_Loop 0f7a 0007 | | Action Break_Optional 0f7b e405 | | Load 0x2,0x5 0f7c 0aff | | Execute_Immediate Plus,-0x1 0f7d e407 | | Load 0x2,0x7 0f7e 027a | z | Execute Discrete,Less_Equal 0f7f 6802 |h | Jump_Zero 0xf82 0f80 00ce | | Action Pop_Auxiliary 0f81 782b |x+ | Jump 0xfad 0f82 e405 | | Load 0x2,0x5 0f83 0aff | | Execute_Immediate Plus,-0x1 0f84 e5fe | | Load 0x2,-0x2 0f85 01d7 | | Execute Vector,Field_Read 0f86 a403 | | Store_Unchecked 0x2,0x3 0f87 e403 | | Load 0x2,0x3 0f88 0227 | ' | Execute Access,All_Reference 0f89 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f8a 7001 |p | Jump_Nonzero 0xf8c 0f8b 7805 |x | Jump 0xf91 0f8c e405 | | Load 0x2,0x5 0f8d 0aff | | Execute_Immediate Plus,-0x1 0f8e c405 | | Store 0x2,0x5 0f8f 00c9 | | Action Pop_Auxiliary_Loop 0f90 7fea | | Jump 0xf7b 0f91 00ce | | Action Pop_Auxiliary 0f92 e402 | | Load 0x2,0x2 0f93 0227 | ' | Execute Access,All_Reference 0f94 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f95 e403 | | Load 0x2,0x3 0f96 0227 | ' | Execute Access,All_Reference 0f97 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f98 027e | ~ | Execute Discrete,Not_Equal 0f99 7013 |p | Jump_Nonzero 0xfad 0f9a e403 | | Load 0x2,0x3 0f9b 0227 | ' | Execute Access,All_Reference 0f9c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f9d 0227 | ' | Execute Access,All_Reference 0f9e e402 | | Load 0x2,0x2 0f9f 0227 | ' | Execute Access,All_Reference 0fa0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0fa1 0227 | ' | Execute Access,All_Reference 0fa2 8252 | R | Call 0x1,0x52 0fa3 7001 |p | Jump_Nonzero 0xfa5 0fa4 7808 |x | Jump 0xfad 0fa5 e404 | | Load 0x2,0x4 0fa6 0aff | | Execute_Immediate Plus,-0x1 0fa7 c404 | | Store 0x2,0x4 0fa8 e405 | | Load 0x2,0x5 0fa9 0aff | | Execute_Immediate Plus,-0x1 0faa c405 | | Store 0x2,0x5 0fab 00c9 | | Action Pop_Auxiliary_Loop 0fac 7fb4 | | Jump 0xf61 0fad 00c9 | | Action Pop_Auxiliary_Loop 0fae 780c |x | Jump 0xfbb 0faf e406 | | Load 0x2,0x6 0fb0 0a01 | | Execute_Immediate Plus,0x1 0fb1 e5ff | | Load 0x2,-0x1 0fb2 01d7 | | Execute Vector,Field_Read 0fb3 0227 | ' | Execute Access,All_Reference 0fb4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0fb5 7001 |p | Jump_Nonzero 0xfb7 0fb6 780a |x | Jump 0xfc1 0fb7 e406 | | Load 0x2,0x6 0fb8 0a01 | | Execute_Immediate Plus,0x1 0fb9 c406 | | Store 0x2,0x6 0fba 00c9 | | Action Pop_Auxiliary_Loop 0fbb e406 | | Load 0x2,0x6 0fbc 0a01 | | Execute_Immediate Plus,0x1 0fbd e404 | | Load 0x2,0x4 0fbe 0aff | | Execute_Immediate Plus,-0x1 0fbf 027c | | | Execute Discrete,Less 0fc0 77ee |w | Jump_Nonzero 0xfaf 0fc1 00c9 | | Action Pop_Auxiliary_Loop 0fc2 780c |x | Jump 0xfcf 0fc3 e407 | | Load 0x2,0x7 0fc4 0a01 | | Execute_Immediate Plus,0x1 0fc5 e5ff | | Load 0x2,-0x1 0fc6 01d7 | | Execute Vector,Field_Read 0fc7 0227 | ' | Execute Access,All_Reference 0fc8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0fc9 7001 |p | Jump_Nonzero 0xfcb 0fca 780a |x | Jump 0xfd5 0fcb e407 | | Load 0x2,0x7 0fcc 0a01 | | Execute_Immediate Plus,0x1 0fcd c407 | | Store 0x2,0x7 0fce 00c9 | | Action Pop_Auxiliary_Loop 0fcf e407 | | Load 0x2,0x7 0fd0 0a01 | | Execute_Immediate Plus,0x1 0fd1 e405 | | Load 0x2,0x5 0fd2 0aff | | Execute_Immediate Plus,-0x1 0fd3 027c | | | Execute Discrete,Less 0fd4 77ee |w | Jump_Nonzero 0xfc3 0fd5 00ce | | Action Pop_Auxiliary 0fd6 00db | | Load_Top At_Offset_3 0fd7 0a01 | | Execute_Immediate Plus,0x1 0fd8 e405 | | Load 0x2,0x5 0fd9 0aff | | Execute_Immediate Plus,-0x1 0fda e5fe | | Load 0x2,-0x2 0fdb 01cf | | Execute Vector,Slice_Read 0fdc e406 | | Load 0x2,0x6 0fdd 0a01 | | Execute_Immediate Plus,0x1 0fde e404 | | Load 0x2,0x4 0fdf 0aff | | Execute_Immediate Plus,-0x1 0fe0 e5ff | | Load 0x2,-0x1 0fe1 01cf | | Execute Vector,Slice_Read 0fe2 8256 | V | Call 0x1,0x56 0fe3 00da | | Load_Top At_Offset_2 0fe4 a404 | | Store_Unchecked 0x2,0x4 0fe5 00d9 | | Load_Top At_Offset_1 0fe6 a405 | | Store_Unchecked 0x2,0x5 0fe7 00cf | | Action Mark_Auxiliary 0fe8 00cf | | Action Mark_Auxiliary 0fe9 0007 | | Action Break_Optional 0fea e404 | | Load 0x2,0x4 0feb e5ff | | Load 0x2,-0x1 0fec 01dc | | Execute Vector,Last 0fed 027b | { | Execute Discrete,Greater_Equal 0fee 6802 |h | Jump_Zero 0xff1 0fef 00ce | | Action Pop_Auxiliary 0ff0 7843 |xC | Jump 0x1034 0ff1 e404 | | Load 0x2,0x4 0ff2 0a01 | | Execute_Immediate Plus,0x1 0ff3 e5ff | | Load 0x2,-0x1 0ff4 01d7 | | Execute Vector,Field_Read 0ff5 a402 | | Store_Unchecked 0x2,0x2 0ff6 e402 | | Load 0x2,0x2 0ff7 0227 | ' | Execute Access,All_Reference 0ff8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ff9 7001 |p | Jump_Nonzero 0xffb 0ffa 7805 |x | Jump 0x1000 0ffb e404 | | Load 0x2,0x4 0ffc 0a01 | | Execute_Immediate Plus,0x1 0ffd c404 | | Store 0x2,0x4 0ffe 00c9 | | Action Pop_Auxiliary_Loop 0fff 7fea | | Jump 0xfea 1000 00c9 | | Action Pop_Auxiliary_Loop 1001 0007 | | Action Break_Optional 1002 e405 | | Load 0x2,0x5 1003 e5fe | | Load 0x2,-0x2 1004 01dc | | Execute Vector,Last 1005 027b | { | Execute Discrete,Greater_Equal 1006 6802 |h | Jump_Zero 0x1009 1007 00ce | | Action Pop_Auxiliary 1008 782b |x+ | Jump 0x1034 1009 e405 | | Load 0x2,0x5 100a 0a01 | | Execute_Immediate Plus,0x1 100b e5fe | | Load 0x2,-0x2 100c 01d7 | | Execute Vector,Field_Read 100d a403 | | Store_Unchecked 0x2,0x3 100e e403 | | Load 0x2,0x3 100f 0227 | ' | Execute Access,All_Reference 1010 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 1011 7001 |p | Jump_Nonzero 0x1013 1012 7805 |x | Jump 0x1018 1013 e405 | | Load 0x2,0x5 1014 0a01 | | Execute_Immediate Plus,0x1 1015 c405 | | Store 0x2,0x5 1016 00c9 | | Action Pop_Auxiliary_Loop 1017 7fea | | Jump 0x1002 1018 00ce | | Action Pop_Auxiliary 1019 e402 | | Load 0x2,0x2 101a 0227 | ' | Execute Access,All_Reference 101b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 101c e403 | | Load 0x2,0x3 101d 0227 | ' | Execute Access,All_Reference 101e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 101f 027e | ~ | Execute Discrete,Not_Equal 1020 7013 |p | Jump_Nonzero 0x1034 1021 e403 | | Load 0x2,0x3 1022 0227 | ' | Execute Access,All_Reference 1023 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1024 0227 | ' | Execute Access,All_Reference 1025 e402 | | Load 0x2,0x2 1026 0227 | ' | Execute Access,All_Reference 1027 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1028 0227 | ' | Execute Access,All_Reference 1029 8252 | R | Call 0x1,0x52 102a 7001 |p | Jump_Nonzero 0x102c 102b 7808 |x | Jump 0x1034 102c e404 | | Load 0x2,0x4 102d 0a01 | | Execute_Immediate Plus,0x1 102e c404 | | Store 0x2,0x4 102f e405 | | Load 0x2,0x5 1030 0a01 | | Execute_Immediate Plus,0x1 1031 c405 | | Store 0x2,0x5 1032 00c9 | | Action Pop_Auxiliary_Loop 1033 7fb4 | | Jump 0xfe8 1034 00ce | | Action Pop_Auxiliary 1035 e404 | | Load 0x2,0x4 1036 a406 | | Store_Unchecked 0x2,0x6 1037 e405 | | Load 0x2,0x5 1038 a407 | | Store_Unchecked 0x2,0x7 1039 00c9 | | Action Pop_Auxiliary_Loop 103a 7ed6 |~ | Jump 0xf11 103b 00c9 | | Action Pop_Auxiliary_Loop 103c 780c |x | Jump 0x1049 103d e406 | | Load 0x2,0x6 103e 0a01 | | Execute_Immediate Plus,0x1 103f e5ff | | Load 0x2,-0x1 1040 01d7 | | Execute Vector,Field_Read 1041 0227 | ' | Execute Access,All_Reference 1042 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 1043 7001 |p | Jump_Nonzero 0x1045 1044 780a |x | Jump 0x104f 1045 e406 | | Load 0x2,0x6 1046 0a01 | | Execute_Immediate Plus,0x1 1047 c406 | | Store 0x2,0x6 1048 00c9 | | Action Pop_Auxiliary_Loop 1049 e406 | | Load 0x2,0x6 104a 0a01 | | Execute_Immediate Plus,0x1 104b e5ff | | Load 0x2,-0x1 104c 01dc | | Execute Vector,Last 104d 027c | | | Execute Discrete,Less 104e 77ee |w | Jump_Nonzero 0x103d 104f 00c9 | | Action Pop_Auxiliary_Loop 1050 780c |x | Jump 0x105d 1051 00db | | Load_Top At_Offset_3 1052 0a01 | | Execute_Immediate Plus,0x1 1053 e5ff | | Load 0x2,-0x1 1054 01d7 | | Execute Vector,Field_Read 1055 0227 | ' | Execute Access,All_Reference 1056 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 1057 7001 |p | Jump_Nonzero 0x1059 1058 780a |x | Jump 0x1063 1059 00db | | Load_Top At_Offset_3 105a 0a01 | | Execute_Immediate Plus,0x1 105b c407 | | Store 0x2,0x7 105c 00c9 | | Action Pop_Auxiliary_Loop 105d 00db | | Load_Top At_Offset_3 105e 0a01 | | Execute_Immediate Plus,0x1 105f e5fe | | Load 0x2,-0x2 1060 01dc | | Execute Vector,Last 1061 027c | | | Execute Discrete,Less 1062 77ee |w | Jump_Nonzero 0x1051 1063 00ce | | Action Pop_Auxiliary 1064 00da | | Load_Top At_Offset_2 1065 0a01 | | Execute_Immediate Plus,0x1 1066 e5fe | | Load 0x2,-0x2 1067 01dc | | Execute Vector,Last 1068 e5fe | | Load 0x2,-0x2 1069 01cf | | Execute Vector,Slice_Read 106a e406 | | Load 0x2,0x6 106b 0a01 | | Execute_Immediate Plus,0x1 106c e5ff | | Load 0x2,-0x1 106d 01dc | | Execute Vector,Last 106e e5ff | | Load 0x2,-0x1 106f 01cf | | Execute Vector,Slice_Read 1070 8256 | V | Call 0x1,0x56 1071 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1072 0000 0000 | | .BLANK 0000[0x6] 1078 ; -------------------------------------------------------------------------------------- 1078 ; SUBPROGRAM 1078 ; -------------------------------------------------------------------------------------- 1078 107b | { | .CONST 0x107b ; Address of begin 1079 0004 | | .CONST 0x0004 ; Address of exception handler 107a 0001 | | .CONST 0x0001 ; Number of locals 107b BODY_1078: 107b INIT_1078: 107b 00da | | Load_Top At_Offset_2 107c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 107d 0000 0000 | | .XXX[0x3] 107f 0000 | | 1080 ; -------------------------------------------------------------------------------------- 1080 ; SUBPROGRAM 1080 ; -------------------------------------------------------------------------------------- 1080 1085 | | .CONST 0x1085 ; Address of begin 1081 1096 | | .CONST 0x1096 ; Address of exception handler 1082 0002 | | .CONST 0x0002 ; Number of locals 1083 INIT_1080: 1083 029f 1163 | c| Declare_Subprogram INIT_1160,For_Call 1085 BODY_1080: 1085 e402 | | Load 0x2,0x2 1086 0229 | ) | Execute Access,All_Read 1087 00d8 | | Load_Top At_Offset_0 1088 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1089 00ea | | Load_Encached Null_String_Cache 108a e5ff | | Load 0x2,-0x1 108b 4801 |H | Short_Literal 0x1 108c e004 | | Load 0x0,0x4 108d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 108e 00d9 | | Load_Top At_Offset_1 108f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1090 00d1 | | Pop_Control Pop_Count_1 1091 e5fe | | Load 0x2,-0x2 1092 e402 | | Load 0x2,0x2 1093 0227 | ' | Execute Access,All_Reference 1094 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 1095 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1096 TRAP_1080: 1096 0007 | | Action Break_Optional 1097 8602 | | Call 0x3,0x2 1098 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1099 0000 0000 | | .BLANK 0000[0x7] 10a0 ; -------------------------------------------------------------------------------------- 10a0 ; SUBPROGRAM 10a0 ; -------------------------------------------------------------------------------------- 10a0 10a7 | | .CONST 0x10a7 ; Address of begin 10a1 0004 | | .CONST 0x0004 ; Address of exception handler 10a2 0002 | | .CONST 0x0002 ; Number of locals 10a3 INIT_10a0: 10a3 e5ff | | Load 0x2,-0x1 10a4 e013 | | Load 0x0,0x13 10a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 10a6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 10a7 BODY_10a0: 10a7 00d8 | | Load_Top At_Offset_0 10a8 01db | | Execute Vector,Length 10a9 7004 |p | Jump_Nonzero 0x10ae 10aa 0092 1196 | | Action Push_String_Extended,0x1196 ; "$" 10ac 00cb | | Action Pop_Block_With_Result 10ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10ae e5ff | | Load 0x2,-0x1 10af e013 | | Load 0x0,0x13 10b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 10b1 1815 | | Execute Package,Field_Execute,Field_Number 0x15 10b2 00cb | | Action Pop_Block_With_Result 10b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10b4 0000 0000 | | .BLANK 0000[0x4] 10b8 ; -------------------------------------------------------------------------------------- 10b8 ; SUBPROGRAM 10b8 ; -------------------------------------------------------------------------------------- 10b8 10bb | | .CONST 0x10bb ; Address of begin 10b9 10c9 | | .CONST 0x10c9 ; Address of exception handler 10ba 0001 | | .CONST 0x0001 ; Number of locals 10bb BODY_10b8: 10bb INIT_10b8: 10bb e402 | | Load 0x2,0x2 10bc 00ea | | Load_Encached Null_String_Cache 10bd e5ff | | Load 0x2,-0x1 10be 4800 |H | Short_Literal 0x0 10bf e004 | | Load 0x0,0x4 10c0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 10c1 c402 | | Store 0x2,0x2 10c2 e402 | | Load 0x2,0x2 10c3 e004 | | Load 0x0,0x4 10c4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 10c5 c402 | | Store 0x2,0x2 10c6 4801 |H | Short_Literal 0x1 10c7 00cb | | Action Pop_Block_With_Result 10c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10c9 TRAP_10b8: 10c9 0007 | | Action Break_Optional 10ca 4800 |H | Short_Literal 0x0 10cb 00cb | | Action Pop_Block_With_Result 10cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10cd 0000 0000 | | .XXX[0x3] 10cf 0000 | | 10d0 ; -------------------------------------------------------------------------------------- 10d0 ; SUBPROGRAM 10d0 ; -------------------------------------------------------------------------------------- 10d0 10d3 | | .CONST 0x10d3 ; Address of begin 10d1 10db | | .CONST 0x10db ; Address of exception handler 10d2 0001 | | .CONST 0x0001 ; Number of locals 10d3 BODY_10d0: 10d3 INIT_10d0: 10d3 e402 | | Load 0x2,0x2 10d4 00ea | | Load_Encached Null_String_Cache 10d5 e5ff | | Load 0x2,-0x1 10d6 4800 |H | Short_Literal 0x0 10d7 e004 | | Load 0x0,0x4 10d8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 10d9 c402 | | Store 0x2,0x2 10da 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10db TRAP_10d0: 10db 0007 | | Action Break_Optional 10dc 0092 1197 | | Action Push_String_Extended,0x1197 ; "Could not open file to compare [" 10de e5ff | | Load 0x2,-0x1 10df 01cc | | Execute Vector,Catenate 10e0 0092 1198 | | Action Push_String_Extended,0x1198 ; "}." 10e2 01cc | | Execute Vector,Catenate 10e3 8210 | | Call 0x1,0x10 10e4 4800 |H | Short_Literal 0x0 10e5 00cb | | Action Pop_Block_With_Result 10e6 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 10e7 0000 | | .XXX[0x1] 10e8 ; -------------------------------------------------------------------------------------- 10e8 ; SUBPROGRAM 10e8 ; -------------------------------------------------------------------------------------- 10e8 10eb | | .CONST 0x10eb ; Address of begin 10e9 10f3 | | .CONST 0x10f3 ; Address of exception handler 10ea 0001 | | .CONST 0x0001 ; Number of locals 10eb BODY_10e8: 10eb INIT_10e8: 10eb e403 | | Load 0x2,0x3 10ec 00ea | | Load_Encached Null_String_Cache 10ed e5fe | | Load 0x2,-0x2 10ee 4800 |H | Short_Literal 0x0 10ef e004 | | Load 0x0,0x4 10f0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 10f1 c403 | | Store 0x2,0x3 10f2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10f3 TRAP_10e8: 10f3 0007 | | Action Break_Optional 10f4 0092 1197 | | Action Push_String_Extended,0x1197 ; "Could not open file to compare [" 10f6 e5fe | | Load 0x2,-0x2 10f7 01cc | | Execute Vector,Catenate 10f8 0092 1198 | | Action Push_String_Extended,0x1198 ; "}." 10fa 01cc | | Execute Vector,Catenate 10fb 8210 | | Call 0x1,0x10 10fc e402 | | Load 0x2,0x2 10fd e004 | | Load 0x0,0x4 10fe 1816 | | Execute Package,Field_Execute,Field_Number 0x16 10ff c402 | | Store 0x2,0x2 1100 4800 |H | Short_Literal 0x0 1101 00cb | | Action Pop_Block_With_Result 1102 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 1103 0000 0000 | | .BLANK 0000[0x5] 1108 ; -------------------------------------------------------------------------------------- 1108 ; SUBPROGRAM 1108 ; -------------------------------------------------------------------------------------- 1108 110b | | .CONST 0x110b ; Address of begin 1109 1113 | | .CONST 0x1113 ; Address of exception handler 110a 0001 | | .CONST 0x0001 ; Number of locals 110b BODY_1108: 110b INIT_1108: 110b e402 | | Load 0x2,0x2 110c 00ea | | Load_Encached Null_String_Cache 110d e5ff | | Load 0x2,-0x1 110e 4800 |H | Short_Literal 0x0 110f e004 | | Load 0x0,0x4 1110 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1111 c402 | | Store 0x2,0x2 1112 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1113 TRAP_1108: 1113 0007 | | Action Break_Optional 1114 0092 1197 | | Action Push_String_Extended,0x1197 ; "Could not open file to compare [" 1116 e5ff | | Load 0x2,-0x1 1117 01cc | | Execute Vector,Catenate 1118 0092 1198 | | Action Push_String_Extended,0x1198 ; "}." 111a 01cc | | Execute Vector,Catenate 111b 8210 | | Call 0x1,0x10 111c 00cc | | Action Pop_Block 111d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 111e 0000 0000 | | .XXX[0x2] 1120 ; -------------------------------------------------------------------------------------- 1120 ; SUBPROGRAM 1120 ; -------------------------------------------------------------------------------------- 1120 1123 | # | .CONST 0x1123 ; Address of begin 1121 112b | + | .CONST 0x112b ; Address of exception handler 1122 0001 | | .CONST 0x0001 ; Number of locals 1123 BODY_1120: 1123 INIT_1120: 1123 e403 | | Load 0x2,0x3 1124 00ea | | Load_Encached Null_String_Cache 1125 e5fe | | Load 0x2,-0x2 1126 4800 |H | Short_Literal 0x0 1127 e004 | | Load 0x0,0x4 1128 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1129 c403 | | Store 0x2,0x3 112a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 112b TRAP_1120: 112b 0007 | | Action Break_Optional 112c 0092 1197 | | Action Push_String_Extended,0x1197 ; "Could not open file to compare [" 112e e5fe | | Load 0x2,-0x2 112f 01cc | | Execute Vector,Catenate 1130 0092 1198 | | Action Push_String_Extended,0x1198 ; "}." 1132 01cc | | Execute Vector,Catenate 1133 8210 | | Call 0x1,0x10 1134 e402 | | Load 0x2,0x2 1135 e004 | | Load 0x0,0x4 1136 1816 | | Execute Package,Field_Execute,Field_Number 0x16 1137 c402 | | Store 0x2,0x2 1138 00cc | | Action Pop_Block 1139 4505 |E | Exit_Suprogram New_Top_Offset 0x5 113a 0000 0000 | | .BLANK 0000[0x6] 1140 ; -------------------------------------------------------------------------------------- 1140 ; SUBPROGRAM 1140 ; -------------------------------------------------------------------------------------- 1140 114a | J | .CONST 0x114a ; Address of begin 1141 0004 | | .CONST 0x0004 ; Address of exception handler 1142 0002 | | .CONST 0x0002 ; Number of locals 1143 INIT_1140: 1143 4801 |H | Short_Literal 0x1 1144 e5fd | | Load 0x2,-0x3 1145 0227 | ' | Execute Access,All_Reference 1146 01db | | Execute Vector,Length 1147 0901 | | Execute_Immediate Binary_Scale,0x1 1148 e23b | ; | Load 0x1,0x3b 1149 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 114a BODY_1140: 114a e5fd | | Load 0x2,-0x3 114b 0227 | ' | Execute Access,All_Reference 114c 4801 |H | Short_Literal 0x1 114d e5fd | | Load 0x2,-0x3 114e 0227 | ' | Execute Access,All_Reference 114f 01db | | Execute Vector,Length 1150 00db | | Load_Top At_Offset_3 1151 0229 | ) | Execute Access,All_Read 1152 01ce | | Execute Vector,Slice_Write 1153 e5fd | | Load 0x2,-0x3 1154 e241 | A | Load 0x1,0x41 1155 e242 | B | Load 0x1,0x42 1156 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 1157 8005 | | Call 0x0,0x5 1158 c5fd | | Store 0x2,-0x3 1159 00d8 | | Load_Top At_Offset_0 115a a5fd | | Store_Unchecked 0x2,-0x3 115b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 115c 0000 0000 | | .BLANK 0000[0x4] 1160 ; -------------------------------------------------------------------------------------- 1160 ; SUBPROGRAM 1160 ; -------------------------------------------------------------------------------------- 1160 1163 | c | .CONST 0x1163 ; Address of begin 1161 116f | o | .CONST 0x116f ; Address of exception handler 1162 0001 | | .CONST 0x0001 ; Number of locals 1163 BODY_1160: 1163 INIT_1160: 1163 e402 | | Load 0x2,0x2 1164 0229 | ) | Execute Access,All_Read 1165 00d8 | | Load_Top At_Offset_0 1166 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1167 00ea | | Load_Encached Null_String_Cache 1168 e5ff | | Load 0x2,-0x1 1169 4801 |H | Short_Literal 0x1 116a e004 | | Load 0x0,0x4 116b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 116c 00d9 | | Load_Top At_Offset_1 116d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 116e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 116f TRAP_1160: 116f 0007 | | Action Break_Optional 1170 e402 | | Load 0x2,0x2 1171 e22c | , | Load 0x1,0x2c 1172 e22d | - | Load 0x1,0x2d 1173 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 1174 8005 | | Call 0x0,0x5 1175 c402 | | Store 0x2,0x2 1176 0092 1199 | | Action Push_String_Extended,0x1199 ; "Failed to open output file [" 1178 e5ff | | Load 0x2,-0x1 1179 01cc | | Execute Vector,Catenate 117a 0092 1188 | | Action Push_String_Extended,0x1188 ; "]." 117c 01cc | | Execute Vector,Catenate 117d 8210 | | Call 0x1,0x10 117e 00d8 | | Load_Top At_Offset_0 117f 0101 | | Execute Exception,Reraise 1180 ; -------------------------------------------------------------------------------------- 1180 ; STRING TABLE 1180 ; -------------------------------------------------------------------------------------- 1180 0036 | 6 | .STRTAB 0x0036->0x119b ; "End of log." 1181 003f | ? | .STRTAB 0x003f->0x11a0 ; "::: " 1182 0041 | A | .STRTAB 0x0041->0x11a2 ; "*** " 1183 0043 | C | .STRTAB 0x0043->0x11a4 ; "=== Test Section => " 1184 0055 | U | .STRTAB 0x0055->0x11ae ; "Could not find [" 1185 0063 | c | .STRTAB 0x0063->0x11b6 ; "] to delete it." 1186 0070 | p | .STRTAB 0x0070->0x11be ; "Error: " 1187 0075 | u | .STRTAB 0x0075->0x11c1 ; "Could not delete [" 1188 0085 | | .STRTAB 0x0085->0x11ca ; "]." 1189 0085 | | .STRTAB 0x0085->0x11cb ; "%%% Unexpected exception in Text_Io.Files_Equal?" 118a 00b3 | | .STRTAB 0x00b3->0x11e3 ; "::: diff( " 118b 00bb | | .STRTAB 0x00bb->0x11e8 ; ", " 118c 00bb | | .STRTAB 0x00bb->0x11e9 ; " );" 118d 00bc | | .STRTAB 0x00bc->0x11eb ; "%%% Unexpected exception in Text_Io.Files_Diff?" 118e 00e9 | | .STRTAB 0x00e9->0x1202 ; "Could not locate wildcards [" 118f 0103 | | .STRTAB 0x0103->0x1210 ; "--- Insert " 1190 010c | | .STRTAB 0x010c->0x1216 ; "," 1191 010b | | .STRTAB 0x010b->0x1216 ; "> " 1192 010b | | .STRTAB 0x010b->0x1217 ; "--- Delete " 1193 0114 | | .STRTAB 0x0114->0x121d ; "< " 1194 0114 | | .STRTAB 0x0114->0x121e ; "--- Change " 1195 011d | | .STRTAB 0x011d->0x1223 ; "--- ------" 1196 0125 | % | .STRTAB 0x0125->0x1228 ; "$" 1197 0124 | $ | .STRTAB 0x0124->0x1229 ; "Could not open file to compare [" 1198 0142 | B | .STRTAB 0x0142->0x1239 ; "}." 1199 0142 | B | .STRTAB 0x0142->0x123a ; "Failed to open output file [" 119a 015c | \ | .STREND 0x015c->0x1248 119b 456e 6420 |End | .STRTAB_STRINGS 1248 ; -------------------------------------------------------------------------------------- 1248 ; Debug Table 1248 ; -------------------------------------------------------------------------------------- 1248 0004 0000 | | .DEBUG4 0x0004,0x0000,0x4bbd,0x0000,0x0001,0x0035 124e 000b 1322 | "| .DBG4T 0x000b,0x1322,0x8000,0x0000 1252 0047 1340 | G @| .DBG4T 0x0047,0x1340,0x8000,0x0000 1256 011b 1383 | | .DBG4T 0x011b,0x1383,0x0001,0x0000 125a 013b 138a | ; | .DBG4T 0x013b,0x138a,0x0001,0x0000 125e 0173 1398 | s | .DBG4T 0x0173,0x1398,0x0001,0x4000 1262 019b 13a7 | | .DBG4T 0x019b,0x13a7,0x0001,0x4000 1266 01c3 13b6 | | .DBG4T 0x01c3,0x13b6,0x0001,0x4000 126a 01eb 13c5 | | .DBG4T 0x01eb,0x13c5,0x0001,0x0000 126e 01fb 13cb | | .DBG4T 0x01fb,0x13cb,0x0001,0x4000 1272 022b 13da | + | .DBG4T 0x022b,0x13da,0x0001,0x4000 1276 025b 13e9 | [ | .DBG4T 0x025b,0x13e9,0x0001,0x4000 127a 027b 13f8 | { | .DBG4T 0x027b,0x13f8,0x0001,0x4000 127e 029b 1407 | | .DBG4T 0x029b,0x1407,0x0001,0x4000 1282 02bb 1416 | | .DBG4T 0x02bb,0x1416,0x0001,0x4000 1286 02e3 1425 | %| .DBG4T 0x02e3,0x1425,0x0001,0x4000 128a 030b 1434 | 4| .DBG4T 0x030b,0x1434,0x0001,0x4000 128e 033b 1443 | ; C| .DBG4T 0x033b,0x1443,0x0001,0x4000 1292 036b 1452 | k R| .DBG4T 0x036b,0x1452,0x0001,0x4000 1296 039b 1461 | a| .DBG4T 0x039b,0x1461,0x0001,0x4000 129a 03cb 1470 | p| .DBG4T 0x03cb,0x1470,0x0002,0x0000 129e 03db 1473 | s| .DBG4T 0x03db,0x1473,0x0002,0x0000 12a2 03e3 1476 | v| .DBG4T 0x03e3,0x1476,0x0001,0x0000 12a6 043b 1484 | ; | .DBG4T 0x043b,0x1484,0x0002,0x0000 12aa 044b 1488 | K | .DBG4T 0x044b,0x1488,0x0002,0x0000 12ae 05b3 14d1 | | .DBG4T 0x05b3,0x14d1,0x0001,0x0000 12b2 0643 14ef | C | .DBG4T 0x0643,0x14ef,0x0001,0x4000 12b6 06ab 1515 | | .DBG4T 0x06ab,0x1515,0x0001,0x0000 12ba 06c3 151d | | .DBG4T 0x06c3,0x151d,0x0002,0x0000 12be 06d3 1522 | "| .DBG4T 0x06d3,0x1522,0x0002,0x0000 12c2 06db 0000 | | .DBG4T 0x06db,0x0000,0x0005,0x0000 12c6 06eb 1525 | %| .DBG4T 0x06eb,0x1525,0x0002,0x0000 12ca 0733 152c | 3 ,| .DBG4T 0x0733,0x152c,0x0001,0x0000 12ce 074b 1530 | K 0| .DBG4T 0x074b,0x1530,0x0001,0x0000 12d2 0783 1537 | 7| .DBG4T 0x0783,0x1537,0x0001,0x0000 12d6 07a3 153f | ?| .DBG4T 0x07a3,0x153f,0x0002,0x0000 12da 0803 1555 | U| .DBG4T 0x0803,0x1555,0x0002,0x0000 12de 0823 155d | # ]| .DBG4T 0x0823,0x155d,0x0002,0x0000 12e2 095b 15a8 | [ | .DBG4T 0x095b,0x15a8,0x0001,0x0000 12e6 09b3 15b8 | | .DBG4T 0x09b3,0x15b8,0x0001,0x0000 12ea 0a7b 15e2 | { | .DBG4T 0x0a7b,0x15e2,0x0001,0x4000 12ee 0ba3 1652 | R| .DBG4T 0x0ba3,0x1652,0x0001,0x4000 12f2 0d7b 172c | { ,| .DBG4T 0x0d7b,0x172c,0x0001,0x4000 12f6 0ea3 179c | | .DBG4T 0x0ea3,0x179c,0x0001,0x4000 12fa 107b 1876 | { v| .DBG4T 0x107b,0x1876,0x0002,0x0000 12fe 1083 1879 | y| .DBG4T 0x1083,0x1879,0x0004,0x0000 1302 10a3 187e | ~| .DBG4T 0x10a3,0x187e,0x0004,0x0000 1306 10bb 1884 | | .DBG4T 0x10bb,0x1884,0x0004,0x0000 130a 10d3 188a | | .DBG4T 0x10d3,0x188a,0x0004,0x0000 130e 10eb 188f | | .DBG4T 0x10eb,0x188f,0x0004,0x0000 1312 110b 1895 | | .DBG4T 0x110b,0x1895,0x0004,0x0000 1316 1123 189a | # | .DBG4T 0x1123,0x189a,0x0004,0x0000 131a 1143 18a0 | C | .DBG4T 0x1143,0x18a0,0x0004,0x0000 131e 1163 18a6 | c | .DBG4T 0x1163,0x18a6,0x0004,0x0000 1322 ; -------------------------------------------------------------------------------------- 1322 ; Debug chain 1322 ; -------------------------------------------------------------------------------------- 1322 001c 0000 | | .DBGLEN 0x001c,0x0000 1324 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044 1340 ; -------------------------------------------------------------------------------------- 1340 ; Debug chain 1340 ; -------------------------------------------------------------------------------------- 1340 0041 0000 | A | .DBGLEN 0x0041,0x0000 1342 0047 004f | G O| .DBGLNO 0x0047,0x004f,0x0050,0x0052,0x0060,0x0061,0x0069,0x006b,0x0071,0x0072,0x007a,0x0081,0x0087,0x0088,0x008e,0x0094,0x0095,0x009d,0x00a5,0x00a6,0x00a8,0x00b3,0x00b4,0x00bc,0x00be,0x00c0,0x00c2,0x00c4,0x00c6,0x00c8,0x00ca,0x00cc,0x00ce,0x00d0,0x00d2,0x00d4,0x00d6,0x00d8,0x00da,0x00dc,0x00de,0x00e0,0x00e2,0x00e4,0x00e6,0x00e8,0x00ea,0x00ec,0x00ee,0x00f0,0x00f2,0x00f4,0x00f6,0x00f8,0x00fa,0x00fc,0x00fe,0x0100,0x0102,0x0104,0x0106,0x0108,0x010a,0x010c,0x010e 1383 ; -------------------------------------------------------------------------------------- 1383 ; Debug chain 1383 ; -------------------------------------------------------------------------------------- 1383 0001 0004 | | .DBGLEN 0x0001,0x0004 1385 011b 0122 | "| .DBGLNO 0x011b,0x0122,0x0123,0x0127,0x0129 138a ; -------------------------------------------------------------------------------------- 138a ; Debug chain 138a ; -------------------------------------------------------------------------------------- 138a 0001 000b | | .DBGLEN 0x0001,0x000b 138c 013b 013d | ; =| .DBGLNO 0x013b,0x013d,0x013f,0x0140,0x0146,0x014d,0x0156,0x0158,0x015c,0x0162,0x0164,0x016a 1398 ; -------------------------------------------------------------------------------------- 1398 ; Debug chain 1398 ; -------------------------------------------------------------------------------------- 1398 0001 0006 | | .DBGLEN 0x0001,0x0006 139a 0173 0176 | s v| .DBGLNO 0x0173,0x0176,0x017d,0x0183,0x0188,0x018b,0x0191 13a1 0002 0003 | | .XXX[0x6] 13a3 0004 0001 | | 13a5 0005 0006 | | 13a7 ; -------------------------------------------------------------------------------------- 13a7 ; Debug chain 13a7 ; -------------------------------------------------------------------------------------- 13a7 0001 0006 | | .DBGLEN 0x0001,0x0006 13a9 019b 019e | | .DBGLNO 0x019b,0x019e,0x01a5,0x01ab,0x01b0,0x01b3,0x01b9 13b0 0002 0003 | | .XXX[0x6] 13b2 0004 0001 | | 13b4 0005 0006 | | 13b6 ; -------------------------------------------------------------------------------------- 13b6 ; Debug chain 13b6 ; -------------------------------------------------------------------------------------- 13b6 0001 0006 | | .DBGLEN 0x0001,0x0006 13b8 01c3 01c6 | | .DBGLNO 0x01c3,0x01c6,0x01cd,0x01d3,0x01d8,0x01db,0x01e1 13bf 0002 0003 | | .XXX[0x6] 13c1 0004 0001 | | 13c3 0005 0006 | | 13c5 ; -------------------------------------------------------------------------------------- 13c5 ; Debug chain 13c5 ; -------------------------------------------------------------------------------------- 13c5 0000 0004 | | .DBGLEN 0x0000,0x0004 13c7 01eb 01ed | | .DBGLNO 0x01eb,0x01ed,0x01f0,0x01f2 13cb ; -------------------------------------------------------------------------------------- 13cb ; Debug chain 13cb ; -------------------------------------------------------------------------------------- 13cb 0001 0006 | | .DBGLEN 0x0001,0x0006 13cd 01fb 01fe | | .DBGLNO 0x01fb,0x01fe,0x020a,0x020e,0x020f,0x0214,0x0217 13d4 0002 0003 | | .XXX[0x6] 13d6 0004 0005 | | 13d8 0001 0006 | | 13da ; -------------------------------------------------------------------------------------- 13da ; Debug chain 13da ; -------------------------------------------------------------------------------------- 13da 0001 0006 | | .DBGLEN 0x0001,0x0006 13dc 022b 022e | + .| .DBGLNO 0x022b,0x022e,0x023a,0x023e,0x023f,0x0244,0x0247 13e3 0002 0003 | | .XXX[0x6] 13e5 0004 0005 | | 13e7 0001 0006 | | 13e9 ; -------------------------------------------------------------------------------------- 13e9 ; Debug chain 13e9 ; -------------------------------------------------------------------------------------- 13e9 0001 0006 | | .DBGLEN 0x0001,0x0006 13eb 025b 025e | [ ^| .DBGLNO 0x025b,0x025e,0x0264,0x0268,0x0269,0x026e,0x0271 13f2 0002 0003 | | .XXX[0x6] 13f4 0004 0005 | | 13f6 0001 0006 | | 13f8 ; -------------------------------------------------------------------------------------- 13f8 ; Debug chain 13f8 ; -------------------------------------------------------------------------------------- 13f8 0001 0006 | | .DBGLEN 0x0001,0x0006 13fa 027b 027e | { ~| .DBGLNO 0x027b,0x027e,0x0284,0x0288,0x0289,0x028e,0x0291 1401 0002 0003 | | .XXX[0x6] 1403 0004 0005 | | 1405 0001 0006 | | 1407 ; -------------------------------------------------------------------------------------- 1407 ; Debug chain 1407 ; -------------------------------------------------------------------------------------- 1407 0001 0006 | | .DBGLEN 0x0001,0x0006 1409 029b 029e | | .DBGLNO 0x029b,0x029e,0x02a4,0x02a8,0x02a9,0x02ae,0x02b1 1410 0002 0003 | | .XXX[0x6] 1412 0004 0005 | | 1414 0001 0006 | | 1416 ; -------------------------------------------------------------------------------------- 1416 ; Debug chain 1416 ; -------------------------------------------------------------------------------------- 1416 0001 0006 | | .DBGLEN 0x0001,0x0006 1418 02bb 02be | | .DBGLNO 0x02bb,0x02be,0x02c5,0x02c9,0x02ca,0x02cf,0x02d2 141f 0002 0003 | | .XXX[0x6] 1421 0004 0005 | | 1423 0001 0006 | | 1425 ; -------------------------------------------------------------------------------------- 1425 ; Debug chain 1425 ; -------------------------------------------------------------------------------------- 1425 0001 0006 | | .DBGLEN 0x0001,0x0006 1427 02e3 02e6 | | .DBGLNO 0x02e3,0x02e6,0x02ed,0x02f1,0x02f2,0x02f7,0x02fa 142e 0002 0003 | | .XXX[0x6] 1430 0004 0005 | | 1432 0001 0006 | | 1434 ; -------------------------------------------------------------------------------------- 1434 ; Debug chain 1434 ; -------------------------------------------------------------------------------------- 1434 0001 0006 | | .DBGLEN 0x0001,0x0006 1436 030b 030e | | .DBGLNO 0x030b,0x030e,0x031c,0x0320,0x0321,0x0326,0x0329 143d 0002 0003 | | .XXX[0x6] 143f 0004 0005 | | 1441 0001 0006 | | 1443 ; -------------------------------------------------------------------------------------- 1443 ; Debug chain 1443 ; -------------------------------------------------------------------------------------- 1443 0001 0006 | | .DBGLEN 0x0001,0x0006 1445 033b 033e | ; >| .DBGLNO 0x033b,0x033e,0x034c,0x0350,0x0351,0x0356,0x0359 144c 0002 0003 | | .XXX[0x6] 144e 0004 0005 | | 1450 0001 0006 | | 1452 ; -------------------------------------------------------------------------------------- 1452 ; Debug chain 1452 ; -------------------------------------------------------------------------------------- 1452 0001 0006 | | .DBGLEN 0x0001,0x0006 1454 036b 036e | k n| .DBGLNO 0x036b,0x036e,0x037c,0x0380,0x0381,0x0386,0x0389 145b 0002 0003 | | .XXX[0x6] 145d 0004 0005 | | 145f 0001 0006 | | 1461 ; -------------------------------------------------------------------------------------- 1461 ; Debug chain 1461 ; -------------------------------------------------------------------------------------- 1461 0001 0006 | | .DBGLEN 0x0001,0x0006 1463 039b 039e | | .DBGLNO 0x039b,0x039e,0x03ac,0x03b0,0x03b1,0x03b6,0x03b9 146a 0002 0003 | | .XXX[0x6] 146c 0004 0005 | | 146e 0001 0006 | | 1470 ; -------------------------------------------------------------------------------------- 1470 ; Debug chain 1470 ; -------------------------------------------------------------------------------------- 1470 0000 0001 | | .DBGLEN 0x0000,0x0001 1472 03cb | | .DBGLNO 0x03cb 1473 ; -------------------------------------------------------------------------------------- 1473 ; Debug chain 1473 ; -------------------------------------------------------------------------------------- 1473 0000 0001 | | .DBGLEN 0x0000,0x0001 1475 03dd | | .DBGLNO 0x03dd 1476 ; -------------------------------------------------------------------------------------- 1476 ; Debug chain 1476 ; -------------------------------------------------------------------------------------- 1476 0002 000a | | .DBGLEN 0x0002,0x000a 1478 03e3 03e9 | | .DBGLNO 0x03e3,0x03e9,0x03ef,0x03f8,0x03fd,0x0405,0x040d,0x040f,0x041d,0x0422,0x042a,0x0432 1484 ; -------------------------------------------------------------------------------------- 1484 ; Debug chain 1484 ; -------------------------------------------------------------------------------------- 1484 0001 0001 | | .DBGLEN 0x0001,0x0001 1486 043b 0443 | ; C| .DBGLNO 0x043b,0x0443 1488 ; -------------------------------------------------------------------------------------- 1488 ; Debug chain 1488 ; -------------------------------------------------------------------------------------- 1488 000b 003c | <| .DBGLEN 0x000b,0x003c 148a 044b 0450 | K P| .DBGLNO 0x044b,0x0450,0x0455,0x0457,0x045c,0x0461,0x0462,0x0463,0x0464,0x0465,0x0467,0x046e,0x046f,0x0470,0x0472,0x0475,0x0476,0x0477,0x0481,0x0489,0x048d,0x048e,0x0498,0x04a0,0x04a4,0x04c0,0x04c2,0x04c3,0x04c5,0x04c7,0x04cd,0x04ce,0x04cf,0x04d9,0x04e1,0x04e5,0x04e6,0x04f0,0x04f8,0x04fc,0x050e,0x0510,0x0511,0x0513,0x0515,0x051a,0x051d,0x051e,0x0528,0x0532,0x054e,0x0550,0x0551,0x0553,0x0555,0x055b,0x055c,0x0566,0x0570,0x0582,0x0584,0x0585,0x0587,0x0589,0x058d,0x0591,0x0595,0x0598,0x059b,0x059f,0x05a3 14d1 ; -------------------------------------------------------------------------------------- 14d1 ; Debug chain 14d1 ; -------------------------------------------------------------------------------------- 14d1 0006 0016 | | .DBGLEN 0x0006,0x0016 14d3 05b3 05b8 | | .DBGLNO 0x05b3,0x05b8,0x05bd,0x05bf,0x05c1,0x05c3,0x05c9,0x05d6,0x05d7,0x05d8,0x05df,0x05e6,0x05ea,0x05ee,0x05f0,0x05f2,0x05fe,0x060a,0x060c,0x0618,0x0623,0x0626,0x062b,0x062e,0x0631,0x0634,0x0638,0x063c 14ef ; -------------------------------------------------------------------------------------- 14ef ; Debug chain 14ef ; -------------------------------------------------------------------------------------- 14ef 0004 0010 | | .DBGLEN 0x0004,0x0010 14f1 0643 0649 | C I| .DBGLNO 0x0643,0x0649,0x064b,0x064d,0x064f,0x065a,0x065f,0x0669,0x0671,0x0673,0x0675,0x0679,0x0683,0x068e,0x0690,0x0694,0x0696,0x0698,0x069a,0x06a0 1505 0001 0002 | | .XXX[0x10] 1507 0003 0004 | | 1509 0005 0006 | | 150b 0007 0009 | | 150d 000a 000b | | 150f 000c 000d | | 1511 000e 000f | | 1513 0010 0008 | | 1515 ; -------------------------------------------------------------------------------------- 1515 ; Debug chain 1515 ; -------------------------------------------------------------------------------------- 1515 0001 0005 | | .DBGLEN 0x0001,0x0005 1517 06ab 06ad | | .DBGLNO 0x06ab,0x06ad,0x06af,0x06b1,0x06b3,0x06b7 151d ; -------------------------------------------------------------------------------------- 151d ; Debug chain 151d ; -------------------------------------------------------------------------------------- 151d 0000 0003 | | .DBGLEN 0x0000,0x0003 151f 06c3 06c5 | | .DBGLNO 0x06c3,0x06c5,0x06c7 1522 ; -------------------------------------------------------------------------------------- 1522 ; Debug chain 1522 ; -------------------------------------------------------------------------------------- 1522 0000 0001 | | .DBGLEN 0x0000,0x0001 1524 06d3 | | .DBGLNO 0x06d3 1525 ; -------------------------------------------------------------------------------------- 1525 ; Debug chain 1525 ; -------------------------------------------------------------------------------------- 1525 0001 0004 | | .DBGLEN 0x0001,0x0004 1527 06eb 06fb | | .DBGLNO 0x06eb,0x06fb,0x06ff,0x0706,0x072a 152c ; -------------------------------------------------------------------------------------- 152c ; Debug chain 152c ; -------------------------------------------------------------------------------------- 152c 0000 0002 | | .DBGLEN 0x0000,0x0002 152e 0733 073e | 3 >| .DBGLNO 0x0733,0x073e 1530 ; -------------------------------------------------------------------------------------- 1530 ; Debug chain 1530 ; -------------------------------------------------------------------------------------- 1530 0000 0005 | | .DBGLEN 0x0000,0x0005 1532 074c 0751 | L Q| .DBGLNO 0x074c,0x0751,0x0756,0x0764,0x0775 1537 ; -------------------------------------------------------------------------------------- 1537 ; Debug chain 1537 ; -------------------------------------------------------------------------------------- 1537 0000 0006 | | .DBGLEN 0x0000,0x0006 1539 0783 078a | | .DBGLNO 0x0783,0x078a,0x078e,0x0797,0x0799,0x079b 153f ; -------------------------------------------------------------------------------------- 153f ; Debug chain 153f ; -------------------------------------------------------------------------------------- 153f 0002 0012 | | .DBGLEN 0x0002,0x0012 1541 07a3 07a4 | | .DBGLNO 0x07a3,0x07a4,0x07a5,0x07ab,0x07ae,0x07bb,0x07c2,0x07c9,0x07cd,0x07d2,0x07d7,0x07dc,0x07de,0x07e0,0x07e5,0x07ea,0x07ef,0x07f1,0x07f3,0x07f8 1555 ; -------------------------------------------------------------------------------------- 1555 ; Debug chain 1555 ; -------------------------------------------------------------------------------------- 1555 0001 0005 | | .DBGLEN 0x0001,0x0005 1557 0803 0805 | | .DBGLNO 0x0803,0x0805,0x0809,0x080d,0x0813,0x0818 155d ; -------------------------------------------------------------------------------------- 155d ; Debug chain 155d ; -------------------------------------------------------------------------------------- 155d 0003 0046 | F| .DBGLEN 0x0003,0x0046 155f 0823 0825 | # %| .DBGLNO 0x0823,0x0825,0x0829,0x082a,0x082d,0x082e,0x0833,0x0834,0x083a,0x083d,0x0842,0x0843,0x084a,0x084d,0x0852,0x0853,0x085a,0x085d,0x0862,0x0863,0x086a,0x086d,0x0872,0x0873,0x087a,0x087d,0x0882,0x0883,0x088a,0x0892,0x0893,0x0898,0x0899,0x089d,0x08a2,0x08aa,0x08ae,0x08b1,0x08b6,0x08b7,0x08bb,0x08c0,0x08c8,0x08cd,0x08d0,0x08d5,0x08d6,0x08da,0x08df,0x08e7,0x08ec,0x08ef,0x08f4,0x08f5,0x08f9,0x08fe,0x0906,0x090b,0x090e,0x0913,0x0914,0x0918,0x091d,0x0925,0x092a,0x092d,0x0932,0x0933,0x0937,0x093c,0x0944,0x0949,0x094f 15a8 ; -------------------------------------------------------------------------------------- 15a8 ; Debug chain 15a8 ; -------------------------------------------------------------------------------------- 15a8 0004 000a | | .DBGLEN 0x0004,0x000a 15aa 095b 0960 | [ `| .DBGLNO 0x095b,0x0960,0x0961,0x0962,0x0965,0x096a,0x096d,0x096e,0x0978,0x097a,0x097b,0x0981,0x0982,0x0985 15b8 ; -------------------------------------------------------------------------------------- 15b8 ; Debug chain 15b8 ; -------------------------------------------------------------------------------------- 15b8 0000 0028 | (| .DBGLEN 0x0000,0x0028 15ba 09b3 09b6 | | .DBGLNO 0x09b3,0x09b6,0x09b9,0x09ba,0x09bc,0x09bf,0x09c9,0x09cc,0x09d6,0x09d9,0x09dd,0x09e0,0x09ea,0x09eb,0x09ee,0x09f0,0x09f3,0x09fd,0x0a00,0x0a0a,0x0a0d,0x0a11,0x0a14,0x0a1e,0x0a1f,0x0a21,0x0a24,0x0a2e,0x0a31,0x0a3b,0x0a3e,0x0a48,0x0a4b,0x0a4f,0x0a52,0x0a5c,0x0a60,0x0a64,0x0a67,0x0a71 15e2 ; -------------------------------------------------------------------------------------- 15e2 ; Debug chain 15e2 ; -------------------------------------------------------------------------------------- 15e2 0008 0033 | 3| .DBGLEN 0x0008,0x0033 15e4 0a7b 0a7d | { }| .DBGLNO 0x0a7b,0x0a7d,0x0a7f,0x0a81,0x0a83,0x0a85,0x0a87,0x0a89,0x0a8b,0x0a91,0x0a93,0x0a97,0x0a9c,0x0a9e,0x0aa2,0x0aa6,0x0ab8,0x0aba,0x0abc,0x0ac1,0x0ac2,0x0ac3,0x0ac4,0x0ac5,0x0acb,0x0ad1,0x0ad5,0x0ad7,0x0add,0x0adf,0x0ae1,0x0ae7,0x0aeb,0x0aef,0x0b01,0x0b03,0x0b0c,0x0b0e,0x0b10,0x0b14,0x0b19,0x0b1e,0x0b30,0x0b31,0x0b34,0x0b38,0x0b43,0x0b50,0x0b52,0x0b56,0x0b5b,0x0b60,0x0b72,0x0b73,0x0b76,0x0b7a,0x0b85,0x0b87,0x0b8c 161f 0001 0002 | | .XXX[0x33] 1621 0003 0004 | | 1623 0005 0006 | | 1625 0007 0008 | | 1627 0009 000a | | 1629 000b 000c | | 162b 000c 000d | | 162d 000d 000e | | 162f 000f 0010 | | 1631 0011 0012 | | 1633 0013 0014 | | 1635 0015 0016 | | 1637 0017 0018 | | 1639 0019 001a | | 163b 001b 001c | | 163d 001d 001f | | 163f 0020 0021 | !| 1641 0022 0023 | " #| 1643 0024 001e | $ | 1645 0025 0026 | % &| 1647 0027 0029 | ' )| 1649 002a 002b | * +| 164b 002c 002d | , -| 164d 002e 0028 | . (| 164f 002f 0030 | / 0| 1651 0031 | 1 | 1652 ; -------------------------------------------------------------------------------------- 1652 ; Debug chain 1652 ; -------------------------------------------------------------------------------------- 1652 0008 0068 | h| .DBGLEN 0x0008,0x0068 1654 0ba3 0ba5 | | .DBGLNO 0x0ba3,0x0ba5,0x0ba7,0x0ba9,0x0bab,0x0bad,0x0baf,0x0bb1,0x0bb3,0x0bb9,0x0bba,0x0bbb,0x0bbc,0x0bbd,0x0bc2,0x0bc4,0x0bcb,0x0bcc,0x0bd2,0x0bd8,0x0bd9,0x0bde,0x0be0,0x0be7,0x0be8,0x0bee,0x0bf3,0x0c05,0x0c06,0x0c09,0x0c0f,0x0c10,0x0c11,0x0c12,0x0c13,0x0c19,0x0c1f,0x0c23,0x0c25,0x0c2b,0x0c2d,0x0c2f,0x0c35,0x0c39,0x0c3d,0x0c4f,0x0c51,0x0c5a,0x0c5c,0x0c5e,0x0c60,0x0c61,0x0c62,0x0c63,0x0c68,0x0c6a,0x0c6f,0x0c73,0x0c74,0x0c7a,0x0c7b,0x0c80,0x0c82,0x0c87,0x0c8b,0x0c8c,0x0c92,0x0ca4,0x0ca5,0x0ca8,0x0caf,0x0cb6,0x0cb7,0x0cbb,0x0cc3,0x0cca,0x0ccb,0x0ccf,0x0cd6,0x0ce3,0x0ce5,0x0ce7,0x0ce8,0x0ce9,0x0cea,0x0cef,0x0cf1,0x0cf6,0x0cfa,0x0cfb,0x0d01,0x0d02,0x0d07,0x0d09,0x0d0e,0x0d12,0x0d13,0x0d19,0x0d2b,0x0d2c,0x0d2f,0x0d35,0x0d37,0x0d3d,0x0d44,0x0d45,0x0d49,0x0d51,0x0d58,0x0d59,0x0d5d,0x0d64 16c4 0001 0002 | | .XXX[0x68] 16c6 0003 0003 | | 16c8 0004 0005 | | 16ca 0006 0007 | | 16cc 0008 0009 | | 16ce 000a 000b | | 16d0 000c 000d | | 16d2 000e 000f | | 16d4 0010 0011 | | 16d6 0012 0013 | | 16d8 0014 0015 | | 16da 0016 0016 | | 16dc 0017 0017 | | 16de 0018 0019 | | 16e0 001a 001b | | 16e2 001c 001d | | 16e4 001e 001f | | 16e6 0020 0021 | !| 16e8 0022 0023 | " #| 16ea 0024 0025 | $ %| 16ec 0026 0027 | & '| 16ee 0028 0028 | ( (| 16f0 0029 002a | ) *| 16f2 002b 002c | + ,| 16f4 002d 002e | - .| 16f6 002f 0030 | / 0| 16f8 0031 0032 | 1 2| 16fa 0033 0034 | 3 4| 16fc 0035 0036 | 5 6| 16fe 0037 0038 | 7 8| 1700 0039 003a | 9 :| 1702 003c 003d | < =| 1704 003e 003b | > ;| 1706 0040 0041 | @ A| 1708 0042 003f | B ?| 170a 0043 0044 | C D| 170c 0045 0046 | E F| 170e 0046 0047 | F G| 1710 0048 0049 | H I| 1712 004a 004b | J K| 1714 004c 004d | L M| 1716 004e 004f | N O| 1718 0050 0051 | P Q| 171a 0052 0053 | R S| 171c 0054 0055 | T U| 171e 0056 0057 | V W| 1720 0058 0059 | X Y| 1722 005a 005c | Z \| 1724 005d 005e | ] ^| 1726 005b 0060 | [ `| 1728 0061 0062 | a b| 172a 005f 0063 | _ c| 172c ; -------------------------------------------------------------------------------------- 172c ; Debug chain 172c ; -------------------------------------------------------------------------------------- 172c 0008 0033 | 3| .DBGLEN 0x0008,0x0033 172e 0d7b 0d7d | { }| .DBGLNO 0x0d7b,0x0d7d,0x0d7f,0x0d81,0x0d83,0x0d85,0x0d87,0x0d89,0x0d8b,0x0d91,0x0d93,0x0d97,0x0d9c,0x0d9e,0x0da2,0x0da6,0x0db8,0x0dba,0x0dbc,0x0dc1,0x0dc2,0x0dc3,0x0dc4,0x0dc5,0x0dcb,0x0dd1,0x0dd5,0x0dd7,0x0ddd,0x0ddf,0x0de1,0x0de7,0x0deb,0x0def,0x0e01,0x0e03,0x0e0c,0x0e0e,0x0e10,0x0e14,0x0e19,0x0e1e,0x0e30,0x0e31,0x0e34,0x0e38,0x0e43,0x0e50,0x0e52,0x0e56,0x0e5b,0x0e60,0x0e72,0x0e73,0x0e76,0x0e7a,0x0e85,0x0e87,0x0e8c 1769 0001 0002 | | .XXX[0x33] 176b 0003 0004 | | 176d 0005 0006 | | 176f 0007 0008 | | 1771 0009 000a | | 1773 000b 000c | | 1775 000c 000d | | 1777 000d 000e | | 1779 000f 0010 | | 177b 0011 0012 | | 177d 0013 0014 | | 177f 0015 0016 | | 1781 0017 0018 | | 1783 0019 001a | | 1785 001b 001c | | 1787 001d 001f | | 1789 0020 0021 | !| 178b 0022 0023 | " #| 178d 0024 001e | $ | 178f 0025 0026 | % &| 1791 0027 0029 | ' )| 1793 002a 002b | * +| 1795 002c 002d | , -| 1797 002e 0028 | . (| 1799 002f 0030 | / 0| 179b 0031 | 1 | 179c ; -------------------------------------------------------------------------------------- 179c ; Debug chain 179c ; -------------------------------------------------------------------------------------- 179c 0008 0068 | h| .DBGLEN 0x0008,0x0068 179e 0ea3 0ea5 | | .DBGLNO 0x0ea3,0x0ea5,0x0ea7,0x0ea9,0x0eab,0x0ead,0x0eaf,0x0eb1,0x0eb3,0x0eb9,0x0eba,0x0ebb,0x0ebc,0x0ebd,0x0ec2,0x0ec4,0x0ecb,0x0ecc,0x0ed2,0x0ed8,0x0ed9,0x0ede,0x0ee0,0x0ee7,0x0ee8,0x0eee,0x0ef3,0x0f05,0x0f06,0x0f09,0x0f0f,0x0f10,0x0f11,0x0f12,0x0f13,0x0f19,0x0f1f,0x0f23,0x0f25,0x0f2b,0x0f2d,0x0f2f,0x0f35,0x0f39,0x0f3d,0x0f4f,0x0f51,0x0f5a,0x0f5c,0x0f5e,0x0f60,0x0f61,0x0f62,0x0f63,0x0f68,0x0f6a,0x0f6f,0x0f73,0x0f74,0x0f7a,0x0f7b,0x0f80,0x0f82,0x0f87,0x0f8b,0x0f8c,0x0f92,0x0fa4,0x0fa5,0x0fa8,0x0faf,0x0fb6,0x0fb7,0x0fbb,0x0fc3,0x0fca,0x0fcb,0x0fcf,0x0fd6,0x0fe3,0x0fe5,0x0fe7,0x0fe8,0x0fe9,0x0fea,0x0fef,0x0ff1,0x0ff6,0x0ffa,0x0ffb,0x1001,0x1002,0x1007,0x1009,0x100e,0x1012,0x1013,0x1019,0x102b,0x102c,0x102f,0x1035,0x1037,0x103d,0x1044,0x1045,0x1049,0x1051,0x1058,0x1059,0x105d,0x1064 180e 0001 0002 | | .XXX[0x68] 1810 0003 0003 | | 1812 0004 0005 | | 1814 0006 0007 | | 1816 0008 0009 | | 1818 000a 000b | | 181a 000c 000d | | 181c 000e 000f | | 181e 0010 0011 | | 1820 0012 0013 | | 1822 0014 0015 | | 1824 0016 0016 | | 1826 0017 0017 | | 1828 0018 0019 | | 182a 001a 001b | | 182c 001c 001d | | 182e 001e 001f | | 1830 0020 0021 | !| 1832 0022 0023 | " #| 1834 0024 0025 | $ %| 1836 0026 0027 | & '| 1838 0028 0028 | ( (| 183a 0029 002a | ) *| 183c 002b 002c | + ,| 183e 002d 002e | - .| 1840 002f 0030 | / 0| 1842 0031 0032 | 1 2| 1844 0033 0034 | 3 4| 1846 0035 0036 | 5 6| 1848 0037 0038 | 7 8| 184a 0039 003a | 9 :| 184c 003c 003d | < =| 184e 003e 003b | > ;| 1850 0040 0041 | @ A| 1852 0042 003f | B ?| 1854 0043 0044 | C D| 1856 0045 0046 | E F| 1858 0046 0047 | F G| 185a 0048 0049 | H I| 185c 004a 004b | J K| 185e 004c 004d | L M| 1860 004e 004f | N O| 1862 0050 0051 | P Q| 1864 0052 0053 | R S| 1866 0054 0055 | T U| 1868 0056 0057 | V W| 186a 0058 0059 | X Y| 186c 005a 005c | Z \| 186e 005d 005e | ] ^| 1870 005b 0060 | [ `| 1872 0061 0062 | a b| 1874 005f 0063 | _ c| 1876 ; -------------------------------------------------------------------------------------- 1876 ; Debug chain 1876 ; -------------------------------------------------------------------------------------- 1876 0000 0001 | | .DBGLEN 0x0000,0x0001 1878 107b | { | .DBGLNO 0x107b 1879 ; -------------------------------------------------------------------------------------- 1879 ; Debug chain 1879 ; -------------------------------------------------------------------------------------- 1879 0000 0003 | | .DBGLEN 0x0000,0x0003 187b 1085 1091 | | .DBGLNO 0x1085,0x1091,0x1097 187e ; -------------------------------------------------------------------------------------- 187e ; Debug chain 187e ; -------------------------------------------------------------------------------------- 187e 0001 0003 | | .DBGLEN 0x0001,0x0003 1880 10a3 10a7 | | .DBGLNO 0x10a3,0x10a7,0x10aa,0x10ae 1884 ; -------------------------------------------------------------------------------------- 1884 ; Debug chain 1884 ; -------------------------------------------------------------------------------------- 1884 0000 0004 | | .DBGLEN 0x0000,0x0004 1886 10bb 10c2 | | .DBGLNO 0x10bb,0x10c2,0x10c6,0x10ca 188a ; -------------------------------------------------------------------------------------- 188a ; Debug chain 188a ; -------------------------------------------------------------------------------------- 188a 0000 0003 | | .DBGLEN 0x0000,0x0003 188c 10d3 10dc | | .DBGLNO 0x10d3,0x10dc,0x10e4 188f ; -------------------------------------------------------------------------------------- 188f ; Debug chain 188f ; -------------------------------------------------------------------------------------- 188f 0000 0004 | | .DBGLEN 0x0000,0x0004 1891 10eb 10f4 | | .DBGLNO 0x10eb,0x10f4,0x10fc,0x1100 1895 ; -------------------------------------------------------------------------------------- 1895 ; Debug chain 1895 ; -------------------------------------------------------------------------------------- 1895 0000 0003 | | .DBGLEN 0x0000,0x0003 1897 110b 1114 | | .DBGLNO 0x110b,0x1114,0x111c 189a ; -------------------------------------------------------------------------------------- 189a ; Debug chain 189a ; -------------------------------------------------------------------------------------- 189a 0000 0004 | | .DBGLEN 0x0000,0x0004 189c 1123 112c | # ,| .DBGLNO 0x1123,0x112c,0x1134,0x1138 18a0 ; -------------------------------------------------------------------------------------- 18a0 ; Debug chain 18a0 ; -------------------------------------------------------------------------------------- 18a0 0001 0003 | | .DBGLEN 0x0001,0x0003 18a2 1143 114a | C J| .DBGLNO 0x1143,0x114a,0x1153,0x1159 18a6 ; -------------------------------------------------------------------------------------- 18a6 ; Debug chain 18a6 ; -------------------------------------------------------------------------------------- 18a6 0000 0004 | | .DBGLEN 0x0000,0x0004 18a8 1163 1170 | c p| .DBGLNO 0x1163,0x1170,0x1176,0x117e 18ac 0000 0000 | | .BLANK 0000[0x154]