|
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: 8192 (0x2000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0cb8 | | .CONST 0x0cb8 ; 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 0007 | | .CONST 0x0007 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0100 | | .CONST 0x0100 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0044 | D | .CONST 0x0044 ; Number of locals 000b INIT_0008: 000b 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 0093 0000 | | push_full_address 0x0 0010 62ef |b | Indirect_Literal Discrete,0x300,{0x80000000, 0x00010000} 0011 0273 | s | Execute Discrete,Plus 0012 0007 | | Action Break_Optional 0013 e002 | | Load 0x0,0x2 0014 0007 | | Action Break_Optional 0015 4800 |H | Short_Literal 0x0 0016 4803 |H | Short_Literal 0x3 0017 4800 |H | Short_Literal 0x0 0018 4803 |H | Short_Literal 0x3 0019 00e6 | | Load_Encached Float_Cache 001a 02a0 | | Declare_Subprogram Null_Subprogram 001b 4802 |H | Short_Literal 0x2 001c 035d | ] | Declare_Type Array,Defined 001d e003 | | Load 0x0,0x3 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 4818 |H | Short_Literal 0x18 0020 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0021 00e3 | | Load_Encached Natural_Cache 0022 0266 | f | Execute Discrete,Bounds 0023 00da | | Load_Top At_Offset_2 0024 02a0 | | Declare_Subprogram Null_Subprogram 0025 4801 |H | Short_Literal 0x1 0026 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0027 4801 |H | Short_Literal 0x1 0028 4803 |H | Short_Literal 0x3 0029 00da | | Load_Top At_Offset_2 002a 0334 | 4 | Declare_Variable Array,With_Constraint 002b e004 | | Load 0x0,0x4 002c 00db | | Load_Top At_Offset_3 002d 03b6 | | Declare_Variable Access,By_Allocation,With_Value 002e 4801 |H | Short_Literal 0x1 002f 00da | | Load_Top At_Offset_2 0030 01d6 | | Execute Vector,Field_Write 0031 e005 | | Load 0x0,0x5 0032 00db | | Load_Top At_Offset_3 0033 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0034 4802 |H | Short_Literal 0x2 0035 00da | | Load_Top At_Offset_2 0036 01d6 | | Execute Vector,Field_Write 0037 e006 | | Load 0x0,0x6 0038 00db | | Load_Top At_Offset_3 0039 03b6 | | Declare_Variable Access,By_Allocation,With_Value 003a 4803 |H | Short_Literal 0x3 003b 00da | | Load_Top At_Offset_2 003c 01d6 | | Execute Vector,Field_Write 003d e007 | | Load 0x0,0x7 003e 02a0 | | Declare_Subprogram Null_Subprogram 003f 4818 |H | Short_Literal 0x18 0040 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0041 e008 | | Load 0x0,0x8 0042 02a0 | | Declare_Subprogram Null_Subprogram 0043 4818 |H | Short_Literal 0x18 0044 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0045 e009 | | Load 0x0,0x9 0046 02a0 | | Declare_Subprogram Null_Subprogram 0047 4818 |H | Short_Literal 0x18 0048 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0049 e00a | | Load 0x0,0xa 004a 02a0 | | Declare_Subprogram Null_Subprogram 004b 4818 |H | Short_Literal 0x18 004c 03d3 | | Declare_Type Access,Defined,Accesses_Protected 004d e00b | | Load 0x0,0xb 004e 00d8 | | Load_Top At_Offset_0 004f e00c | | Load 0x0,0xc 0050 e00d | | Load 0x0,0xd 0051 e214 | | Load 0x1,0x14 0052 e215 | | Load 0x1,0x15 0053 02a0 | | Declare_Subprogram Null_Subprogram 0054 4806 |H | Short_Literal 0x6 0055 032d | - | Declare_Type Record,Defined 0056 e00c | | Load 0x0,0xc 0057 0266 | f | Execute Discrete,Bounds 0058 00da | | Load_Top At_Offset_2 0059 02a0 | | Declare_Subprogram Null_Subprogram 005a 4801 |H | Short_Literal 0x1 005b 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 005c e00c | | Load 0x0,0xc 005d 00d8 | | Load_Top At_Offset_0 005e e00c | | Load 0x0,0xc 005f 00d8 | | Load_Top At_Offset_0 0060 e216 | | Load 0x1,0x16 0061 4800 |H | Short_Literal 0x0 0062 4800 |H | Short_Literal 0x0 0063 e008 | | Load 0x0,0x8 0064 035b | [ | Declare_Type Array,Constrained 0065 e00c | | Load 0x0,0xc 0066 4800 |H | Short_Literal 0x0 0067 4801 |H | Short_Literal 0x1 0068 e219 | | Load 0x1,0x19 0069 035b | [ | Declare_Type Array,Constrained 006a e00c | | Load 0x0,0xc 006b 00d8 | | Load_Top At_Offset_0 006c 02a0 | | Declare_Subprogram Null_Subprogram 006d 480a |H | Short_Literal 0xa 006e 032d | - | Declare_Type Record,Defined 006f 00d8 | | Load_Top At_Offset_0 0070 0322 | " | Declare_Variable Record 0071 e00c | | Load 0x0,0xc 0072 0266 | f | Execute Discrete,Bounds 0073 e00c | | Load 0x0,0xc 0074 0266 | f | Execute Discrete,Bounds 0075 e00e | | Load 0x0,0xe 0076 02a0 | | Declare_Subprogram Null_Subprogram 0077 4802 |H | Short_Literal 0x2 0078 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0079 4800 |H | Short_Literal 0x0 007a 4877 |Hw | Short_Literal 0x77 007b 4800 |H | Short_Literal 0x0 007c 4877 |Hw | Short_Literal 0x77 007d e21c | | Load 0x1,0x1c 007e 035b | [ | Declare_Type Array,Constrained 007f 0337 | 7 | Declare_Variable Array 0080 4800 |H | Short_Literal 0x0 0081 4877 |Hw | Short_Literal 0x77 0082 4800 |H | Short_Literal 0x0 0083 4877 |Hw | Short_Literal 0x77 0084 e21c | | Load 0x1,0x1c 0085 035b | [ | Declare_Type Array,Constrained 0086 0337 | 7 | Declare_Variable Array 0087 00d8 | | Load_Top At_Offset_0 0088 0335 | 5 | Declare_Variable Array,Duplicate 0089 00cd | | Action Spare6_Action 008a 4877 |Hw | Short_Literal 0x77 008b 4800 |H | Short_Literal 0x0 008c 4877 |Hw | Short_Literal 0x77 008d 4800 |H | Short_Literal 0x0 008e 4800 |H | Short_Literal 0x0 008f 00d9 | | Load_Top At_Offset_1 0090 e221 | ! | Load 0x1,0x21 0091 e21f | | Load 0x1,0x1f 0092 01a6 | | Execute Matrix,Field_Write 0093 3ffa |? | Loop_Increasing 0x8e 0094 3ff7 |? | Loop_Increasing 0x8c 0095 00d9 | | Load_Top At_Offset_1 0096 01a4 | | Execute Matrix,Structure_Write 0097 e00f | | Load 0x0,0xf 0098 0322 | " | Declare_Variable Record 0099 00d8 | | Load_Top At_Offset_0 009a 1c00 | | Execute_Immediate Run_Utility,0x0 009b e00f | | Load 0x0,0xf 009c 0322 | " | Declare_Variable Record 009d 00d8 | | Load_Top At_Offset_0 009e 1c00 | | Execute_Immediate Run_Utility,0x0 009f e010 | | Load 0x0,0x10 00a0 0007 | | Action Break_Optional 00a1 e011 | | Load 0x0,0x11 00a2 0322 | " | Declare_Variable Record 00a3 e012 | | Load 0x0,0x12 00a4 0007 | | Action Break_Optional 00a5 e012 | | Load 0x0,0x12 00a6 0007 | | Action Break_Optional 00a7 e013 | | Load 0x0,0x13 00a8 0322 | " | Declare_Variable Record 00a9 e014 | | Load 0x0,0x14 00aa 0007 | | Action Break_Optional 00ab 00e1 | | Load_Encached Boolean_Cache 00ac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00ad 00e1 | | Load_Encached Boolean_Cache 00ae 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00af 00e1 | | Load_Encached Boolean_Cache 00b0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00b1 00e7 | | Load_Encached Duration_Cache 00b2 6249 |bI | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x00028000} 00b3 00e7 | | Load_Encached Duration_Cache 00b4 03f1 | | Declare_Variable Discrete,With_Value 00b5 e00c | | Load 0x0,0xc 00b6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00b7 e217 | | Load 0x1,0x17 00b8 0007 | | Action Break_Optional 00b9 00e1 | | Load_Encached Boolean_Cache 00ba 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00bb 00e1 | | Load_Encached Boolean_Cache 00bc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 00bd e210 | | Load 0x1,0x10 00be 0337 | 7 | Declare_Variable Array 00bf e015 | | Load 0x0,0x15 00c0 0337 | 7 | Declare_Variable Array 00c1 00e1 | | Load_Encached Boolean_Cache 00c2 00e6 | | Load_Encached Float_Cache 00c3 00e6 | | Load_Encached Float_Cache 00c4 029b 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Unelaborated 00c6 029b 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Unelaborated 00c8 029b 058b | | Declare_Subprogram INIT_0588,For_Outer_Call,Unelaborated 00ca 029b 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Unelaborated 00cc 029b 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Unelaborated 00ce 029b 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call,Unelaborated 00d0 029b 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Unelaborated 00d2 029b 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call,Unelaborated 00d4 029b 074b | K| Declare_Subprogram INIT_0748,For_Outer_Call,Unelaborated 00d6 029b 07cb | | Declare_Subprogram INIT_07c8,For_Outer_Call,Unelaborated 00d8 029b 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call,Unelaborated 00da 029b 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Unelaborated 00dc 029b 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call,Unelaborated 00de 1d0d | | Execute_Immediate Reference_Lex_1,0xd 00df 00c7 | | Action Elaborate_Subprogram 00e0 029d 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call 00e2 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 00e3 00c7 | | Action Elaborate_Subprogram 00e4 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 00e5 00c7 | | Action Elaborate_Subprogram 00e6 029d 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call 00e8 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 00e9 00c7 | | Action Elaborate_Subprogram 00ea 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 00eb 00c7 | | Action Elaborate_Subprogram 00ec 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 00ed 00c7 | | Action Elaborate_Subprogram 00ee 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 00ef 00c7 | | Action Elaborate_Subprogram 00f0 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 00f1 00c7 | | Action Elaborate_Subprogram 00f2 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 00f3 00c7 | | Action Elaborate_Subprogram 00f4 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 00f5 00c7 | | Action Elaborate_Subprogram 00f6 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 00f7 00c7 | | Action Elaborate_Subprogram 00f8 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 00f9 00c7 | | Action Elaborate_Subprogram 00fa 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 00fb 00c7 | | Action Elaborate_Subprogram 00fc 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 00fd 00c7 | | Action Elaborate_Subprogram 00fe 029f 08eb | | Declare_Subprogram INIT_08e8,For_Call 0100 BODY_0008: 0100 8244 | D | Call 0x1,0x44 0101 00bc | | Action Signal_Activated 0102 00bb | | Action Signal_Completion 0103 0000 0000 | | .BLANK 0000[0x5] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 0145 | E | .CONST 0x0145 ; Address of begin 0109 02f1 | | .CONST 0x02f1 ; Address of exception handler 010a 0019 | | .CONST 0x0019 ; Number of locals 010b INIT_0108: 010b e00d | | Load 0x0,0xd 010c 0007 | | Action Break_Optional 010d e00d | | Load 0x0,0xd 010e 0007 | | Action Break_Optional 010f e00b | | Load 0x0,0xb 0110 0007 | | Action Break_Optional 0111 e00b | | Load 0x0,0xb 0112 0007 | | Action Break_Optional 0113 e012 | | Load 0x0,0x12 0114 0007 | | Action Break_Optional 0115 e012 | | Load 0x0,0x12 0116 0007 | | Action Break_Optional 0117 e016 | | Load 0x0,0x16 0118 0322 | " | Declare_Variable Record 0119 00d8 | | Load_Top At_Offset_0 011a 1c00 | | Execute_Immediate Run_Utility,0x0 011b e017 | | Load 0x0,0x17 011c 0322 | " | Declare_Variable Record 011d 00d8 | | Load_Top At_Offset_0 011e 1c00 | | Execute_Immediate Run_Utility,0x0 011f e211 | | Load 0x1,0x11 0120 0007 | | Action Break_Optional 0121 e00b | | Load 0x0,0xb 0122 0007 | | Action Break_Optional 0123 e00b | | Load 0x0,0xb 0124 0007 | | Action Break_Optional 0125 e00b | | Load 0x0,0xb 0126 0007 | | Action Break_Optional 0127 e00b | | Load 0x0,0xb 0128 0007 | | Action Break_Optional 0129 e012 | | Load 0x0,0x12 012a 0007 | | Action Break_Optional 012b e012 | | Load 0x0,0x12 012c 0007 | | Action Break_Optional 012d e018 | | Load 0x0,0x18 012e 02ff | | Declare_Variable Variant_Record 012f 00d8 | | Load_Top At_Offset_0 0130 1c00 | | Execute_Immediate Run_Utility,0x0 0131 e019 | | Load 0x0,0x19 0132 0322 | " | Declare_Variable Record 0133 00d8 | | Load_Top At_Offset_0 0134 1c00 | | Execute_Immediate Run_Utility,0x0 0135 e01a | | Load 0x0,0x1a 0136 0322 | " | Declare_Variable Record 0137 00d8 | | Load_Top At_Offset_0 0138 1c00 | | Execute_Immediate Run_Utility,0x0 0139 e01b | | Load 0x0,0x1b 013a 0007 | | Action Break_Optional 013b e5ff | | Load 0x2,-0x1 013c 801c | | Call 0x0,0x1c 013d 029f 092b | +| Declare_Subprogram INIT_0928,For_Call 013f 029f 0983 | | Declare_Subprogram INIT_0980,For_Call 0141 029f 09c3 | | Declare_Subprogram INIT_09c0,For_Call 0143 029f 09e3 | | Declare_Subprogram INIT_09e0,For_Call 0145 BODY_0108: 0145 8416 | | Call 0x2,0x16 0146 e5f6 | | Load 0x2,-0xa 0147 a229 | ) | Store_Unchecked 0x1,0x29 0148 e5fd | | Load 0x2,-0x3 0149 a22f | / | Store_Unchecked 0x1,0x2f 014a e5fc | | Load 0x2,-0x4 014b a22e | . | Store_Unchecked 0x1,0x2e 014c e5f7 | | Load 0x2,-0x9 014d a22a | * | Store_Unchecked 0x1,0x2a 014e e5fe | | Load 0x2,-0x2 014f 8237 | 7 | Call 0x1,0x37 0150 a40a | | Store_Unchecked 0x2,0xa 0151 e5f4 | | Load 0x2,-0xc 0152 6802 |h | Jump_Zero 0x155 0153 8239 | 9 | Call 0x1,0x39 0154 450d |E | Exit_Suprogram New_Top_Offset 0xd 0155 e22e | . | Load 0x1,0x2e 0156 7005 |p | Jump_Nonzero 0x15c 0157 e22f | / | Load 0x1,0x2f 0158 7003 |p | Jump_Nonzero 0x15c 0159 0092 0c41 | A| Action Push_String_Extended,0xc41 ; "nothing to draw" 015b 823a | : | Call 0x1,0x3a 015c e413 | | Load 0x2,0x13 015d e010 | | Load 0x0,0x10 015e e415 | | Load 0x2,0x15 015f 801d | | Call 0x0,0x1d 0160 c221 | ! | Store 0x1,0x21 0161 00d1 | | Pop_Control Pop_Count_1 0162 e221 | ! | Load 0x1,0x21 0163 e010 | | Load 0x0,0x10 0164 022f | / | Execute Access,Equal 0165 6807 |h | Jump_Zero 0x16d 0166 0092 0c42 | B| Action Push_String_Extended,0xc42 ; "Cannot open display:" 0168 e413 | | Load 0x2,0x13 0169 801e | | Call 0x0,0x1e 016a 801f | | Call 0x0,0x1f 016b 01cc | | Execute Vector,Catenate 016c 823a | : | Call 0x1,0x3a 016d e5fa | | Load 0x2,-0x6 016e 680b |h | Jump_Zero 0x17a 016f e221 | ! | Load 0x1,0x21 0170 8020 | | Call 0x0,0x20 0171 e221 | ! | Load 0x1,0x21 0172 8021 | ! | Call 0x0,0x21 0173 a402 | | Store_Unchecked 0x2,0x2 0174 e221 | ! | Load 0x1,0x21 0175 8020 | | Call 0x0,0x20 0176 e221 | ! | Load 0x1,0x21 0177 8022 | " | Call 0x0,0x22 0178 a403 | | Store_Unchecked 0x2,0x3 0179 780a |x | Jump 0x184 017a e221 | ! | Load 0x1,0x21 017b 8020 | | Call 0x0,0x20 017c e221 | ! | Load 0x1,0x21 017d 8022 | " | Call 0x0,0x22 017e a402 | | Store_Unchecked 0x2,0x2 017f e221 | ! | Load 0x1,0x21 0180 8020 | | Call 0x0,0x20 0181 e221 | ! | Load 0x1,0x21 0182 8021 | ! | Call 0x0,0x21 0183 a403 | | Store_Unchecked 0x2,0x3 0184 e5f5 | | Load 0x2,-0xb 0185 6813 |h | Jump_Zero 0x199 0186 e221 | ! | Load 0x1,0x21 0187 8023 | # | Call 0x0,0x23 0188 e222 | " | Load 0x1,0x22 0189 017d | } | Execute Record,Structure_Write 018a 4800 |H | Short_Literal 0x0 018b a404 | | Store_Unchecked 0x2,0x4 018c 4800 |H | Short_Literal 0x0 018d a405 | | Store_Unchecked 0x2,0x5 018e e221 | ! | Load 0x1,0x21 018f 8020 | | Call 0x0,0x20 0190 e221 | ! | Load 0x1,0x21 0191 8024 | $ | Call 0x0,0x24 0192 a406 | | Store_Unchecked 0x2,0x6 0193 e221 | ! | Load 0x1,0x21 0194 8020 | | Call 0x0,0x20 0195 e221 | ! | Load 0x1,0x21 0196 8025 | % | Call 0x0,0x25 0197 a407 | | Store_Unchecked 0x2,0x7 0198 78aa |x | Jump 0x243 0199 4abc |J | Short_Literal 0x2bc 019a a406 | | Store_Unchecked 0x2,0x6 019b 49f4 |I | Short_Literal 0x1f4 019c a407 | | Store_Unchecked 0x2,0x7 019d e221 | ! | Load 0x1,0x21 019e 8020 | | Call 0x0,0x20 019f e221 | ! | Load 0x1,0x21 01a0 8024 | $ | Call 0x0,0x24 01a1 e406 | | Load 0x2,0x6 01a2 0272 | r | Execute Discrete,Minus 01a3 00d8 | | Load_Top At_Offset_0 01a4 e00b | | Load 0x0,0xb 01a5 0260 | ` | Execute Discrete,In_Type 01a6 7001 |p | Jump_Nonzero 0x1a8 01a7 0801 | | Execute_Immediate Raise,0x1 01a8 09ff | | Execute_Immediate Binary_Scale,-0x1 01a9 c404 | | Store 0x2,0x4 01aa e221 | ! | Load 0x1,0x21 01ab 8020 | | Call 0x0,0x20 01ac e221 | ! | Load 0x1,0x21 01ad 8025 | % | Call 0x0,0x25 01ae e407 | | Load 0x2,0x7 01af 0272 | r | Execute Discrete,Minus 01b0 00d8 | | Load_Top At_Offset_0 01b1 e00b | | Load 0x0,0xb 01b2 0260 | ` | Execute Discrete,In_Type 01b3 7001 |p | Jump_Nonzero 0x1b5 01b4 0801 | | Execute_Immediate Raise,0x1 01b5 09ff | | Execute_Immediate Binary_Scale,-0x1 01b6 c405 | | Store 0x2,0x5 01b7 e5fb | | Load 0x2,-0x5 01b8 4800 |H | Short_Literal 0x0 01b9 00e5 | | Load_Encached Long_Integer_Cache 01ba 00d9 | | Load_Top At_Offset_1 01bb 0267 | g | Execute Discrete,Predecessor 01bc e026 | & | Load 0x0,0x26 01bd 0334 | 4 | Declare_Variable Array,With_Constraint 01be 01de | | Execute Vector,Not_Equal 01bf 6801 |h | Jump_Zero 0x1c1 01c0 8417 | | Call 0x2,0x17 01c1 e027 | ' | Load 0x0,0x27 01c2 0337 | 7 | Declare_Variable Array 01c3 4801 |H | Short_Literal 0x1 01c4 481d |H | Short_Literal 0x1d 01c5 00da | | Load_Top At_Offset_2 01c6 01d6 | | Execute Vector,Field_Write 01c7 481c |H | Short_Literal 0x1c 01c8 4800 |H | Short_Literal 0x0 01c9 4800 |H | Short_Literal 0x0 01ca 00d9 | | Load_Top At_Offset_1 01cb e41a | | Load 0x2,0x1a 01cc 01d6 | | Execute Vector,Field_Write 01cd 3ffb |? | Loop_Increasing 0x1c9 01ce 4800 |H | Short_Literal 0x0 01cf 481e |H | Short_Literal 0x1e 01d0 00da | | Load_Top At_Offset_2 01d1 01d6 | | Execute Vector,Field_Write 01d2 4800 |H | Short_Literal 0x0 01d3 481f |H | Short_Literal 0x1f 01d4 00da | | Load_Top At_Offset_2 01d5 01d6 | | Execute Vector,Field_Write 01d6 e027 | ' | Load 0x0,0x27 01d7 01c3 | | Execute Vector,Check_In_Type 01d8 e408 | | Load 0x2,0x8 01d9 380b |8 | Execute Record,Field_Write,Field_Number 0xb 01da e403 | | Load 0x2,0x3 01db e408 | | Load 0x2,0x8 01dc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01dd e402 | | Load 0x2,0x2 01de e408 | | Load 0x2,0x8 01df 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01e0 e408 | | Load 0x2,0x8 01e1 e028 | ( | Load 0x0,0x28 01e2 0337 | 7 | Declare_Variable Array 01e3 4801 |H | Short_Literal 0x1 01e4 4814 |H | Short_Literal 0x14 01e5 00da | | Load_Top At_Offset_2 01e6 01d6 | | Execute Vector,Field_Write 01e7 4801 |H | Short_Literal 0x1 01e8 481e |H | Short_Literal 0x1e 01e9 00da | | Load_Top At_Offset_2 01ea 01d6 | | Execute Vector,Field_Write 01eb 4801 |H | Short_Literal 0x1 01ec 481c |H | Short_Literal 0x1c 01ed 00da | | Load_Top At_Offset_2 01ee 01d6 | | Execute Vector,Field_Write 01ef 4813 |H | Short_Literal 0x13 01f0 4800 |H | Short_Literal 0x0 01f1 4800 |H | Short_Literal 0x0 01f2 00d9 | | Load_Top At_Offset_1 01f3 e41b | | Load 0x2,0x1b 01f4 01d6 | | Execute Vector,Field_Write 01f5 3ffb |? | Loop_Increasing 0x1f1 01f6 481b |H | Short_Literal 0x1b 01f7 4815 |H | Short_Literal 0x15 01f8 4800 |H | Short_Literal 0x0 01f9 00d9 | | Load_Top At_Offset_1 01fa e41b | | Load 0x2,0x1b 01fb 01d6 | | Execute Vector,Field_Write 01fc 3ffb |? | Loop_Increasing 0x1f8 01fd 4800 |H | Short_Literal 0x0 01fe 481d |H | Short_Literal 0x1d 01ff 00da | | Load_Top At_Offset_2 0200 01d6 | | Execute Vector,Field_Write 0201 4800 |H | Short_Literal 0x0 0202 481f |H | Short_Literal 0x1f 0203 00da | | Load_Top At_Offset_2 0204 01d6 | | Execute Vector,Field_Write 0205 e028 | ( | Load 0x0,0x28 0206 01c3 | | Execute Vector,Check_In_Type 0207 e221 | ! | Load 0x1,0x21 0208 8020 | | Call 0x0,0x20 0209 e221 | ! | Load 0x1,0x21 020a 8029 | ) | Call 0x0,0x29 020b 4801 |H | Short_Literal 0x1 020c e221 | ! | Load 0x1,0x21 020d 8020 | | Call 0x0,0x20 020e e221 | ! | Load 0x1,0x21 020f 802a | * | Call 0x0,0x2a 0210 4800 |H | Short_Literal 0x0 0211 e407 | | Load 0x2,0x7 0212 00d8 | | Load_Top At_Offset_0 0213 e02b | + | Load 0x0,0x2b 0214 0260 | ` | Execute Discrete,In_Type 0215 7001 |p | Jump_Nonzero 0x217 0216 0801 | | Execute_Immediate Raise,0x1 0217 e406 | | Load 0x2,0x6 0218 00d8 | | Load_Top At_Offset_0 0219 e02b | + | Load 0x0,0x2b 021a 0260 | ` | Execute Discrete,In_Type 021b 7001 |p | Jump_Nonzero 0x21d 021c 0801 | | Execute_Immediate Raise,0x1 021d e405 | | Load 0x2,0x5 021e e404 | | Load 0x2,0x4 021f e221 | ! | Load 0x1,0x21 0220 8023 | # | Call 0x0,0x23 0221 e221 | ! | Load 0x1,0x21 0222 802c | , | Call 0x0,0x2c 0223 e222 | " | Load 0x1,0x22 0224 017d | } | Execute Record,Structure_Write 0225 e02d | - | Load 0x0,0x2d 0226 4800 |H | Short_Literal 0x0 0227 4802 |H | Short_Literal 0x2 0228 e026 | & | Load 0x0,0x26 0229 0334 | 4 | Declare_Variable Array,With_Constraint 022a 50d9 |P | Indirect_Literal Any,0x304,{0x49636f00, 0x00000000} 022b e222 | " | Load 0x1,0x22 022c e221 | ! | Load 0x1,0x21 022d 802e | . | Call 0x0,0x2e 022e e222 | " | Load 0x1,0x22 022f e221 | ! | Load 0x1,0x21 0230 802f | / | Call 0x0,0x2f 0231 e01b | | Load 0x0,0x1b 0232 e409 | | Load 0x2,0x9 0233 e222 | " | Load 0x1,0x22 0234 e221 | ! | Load 0x1,0x21 0235 8030 | 0 | Call 0x0,0x30 0236 00d1 | | Pop_Control Pop_Count_1 0237 c414 | | Store 0x2,0x14 0238 e414 | | Load 0x2,0x14 0239 7003 |p | Jump_Nonzero 0x23d 023a 0092 0c43 | C| Action Push_String_Extended,0xc43 ; "cant get window attributes (size)" 023c 823a | : | Call 0x1,0x3a 023d e409 | | Load 0x2,0x9 023e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 023f a223 | # | Store_Unchecked 0x1,0x23 0240 e409 | | Load 0x2,0x9 0241 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0242 a224 | $ | Store_Unchecked 0x1,0x24 0243 e031 | 1 | Load 0x0,0x31 0244 e032 | 2 | Load 0x0,0x32 0245 e222 | " | Load 0x1,0x22 0246 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0247 e221 | ! | Load 0x1,0x21 0248 8033 | 3 | Call 0x0,0x33 0249 a226 | & | Store_Unchecked 0x1,0x26 024a e402 | | Load 0x2,0x2 024b e226 | & | Load 0x1,0x26 024c e221 | ! | Load 0x1,0x21 024d 8034 | 4 | Call 0x0,0x34 024e e403 | | Load 0x2,0x3 024f e226 | & | Load 0x1,0x26 0250 e221 | ! | Load 0x1,0x21 0251 8035 | 5 | Call 0x0,0x35 0252 e5f8 | | Load 0x2,-0x8 0253 6830 |h0 | Jump_Zero 0x284 0254 4802 |H | Short_Literal 0x2 0255 e412 | | Load 0x2,0x12 0256 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0257 e5f8 | | Load 0x2,-0x8 0258 00d8 | | Load_Top At_Offset_0 0259 e036 | 6 | Load 0x0,0x36 025a 0260 | ` | Execute Discrete,In_Type 025b 7001 |p | Jump_Nonzero 0x25d 025c 0801 | | Execute_Immediate Raise,0x1 025d e412 | | Load 0x2,0x12 025e 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 025f e412 | | Load 0x2,0x12 0260 e037 | 7 | Load 0x0,0x37 0261 0337 | 7 | Declare_Variable Array 0262 4801 |H | Short_Literal 0x1 0263 481a |H | Short_Literal 0x1a 0264 00da | | Load_Top At_Offset_2 0265 01d6 | | Execute Vector,Field_Write 0266 4801 |H | Short_Literal 0x1 0267 480a |H | Short_Literal 0xa 0268 00da | | Load_Top At_Offset_2 0269 01d6 | | Execute Vector,Field_Write 026a 4809 |H | Short_Literal 0x9 026b 4800 |H | Short_Literal 0x0 026c 4800 |H | Short_Literal 0x0 026d 00d9 | | Load_Top At_Offset_1 026e e41b | | Load 0x2,0x1b 026f 01d6 | | Execute Vector,Field_Write 0270 3ffb |? | Loop_Increasing 0x26c 0271 4819 |H | Short_Literal 0x19 0272 480b |H | Short_Literal 0xb 0273 4800 |H | Short_Literal 0x0 0274 00d9 | | Load_Top At_Offset_1 0275 e41b | | Load 0x2,0x1b 0276 01d6 | | Execute Vector,Field_Write 0277 3ffb |? | Loop_Increasing 0x273 0278 481f |H | Short_Literal 0x1f 0279 481b |H | Short_Literal 0x1b 027a 4800 |H | Short_Literal 0x0 027b 00d9 | | Load_Top At_Offset_1 027c e41b | | Load 0x2,0x1b 027d 01d6 | | Execute Vector,Field_Write 027e 3ffb |? | Loop_Increasing 0x27a 027f e037 | 7 | Load 0x0,0x37 0280 01c3 | | Execute Vector,Check_In_Type 0281 e226 | & | Load 0x1,0x26 0282 e221 | ! | Load 0x1,0x21 0283 8038 | 8 | Call 0x0,0x38 0284 e22e | . | Load 0x1,0x2e 0285 6822 |h" | Jump_Zero 0x2a8 0286 e22c | , | Load 0x1,0x2c 0287 0c01 | | Execute_Immediate Greater_Equal,0x1 0288 681f |h | Jump_Zero 0x2a8 0289 8418 | | Call 0x2,0x18 028a 00cf | | Action Mark_Auxiliary 028b e22d | - | Load 0x1,0x2d 028c 0227 | ' | Execute Access,All_Reference 028d 01d9 | | Execute Vector,Reverse_Bounds 028e 0263 | c | Execute Discrete,Above_Bound 028f 700f |p | Jump_Nonzero 0x29f 0290 00d8 | | Load_Top At_Offset_0 0291 e22d | - | Load 0x1,0x2d 0292 0227 | ' | Execute Access,All_Reference 0293 01d7 | | Execute Vector,Field_Read 0294 0227 | ' | Execute Access,All_Reference 0295 00d9 | | Load_Top At_Offset_1 0296 0a01 | | Execute_Immediate Plus,0x1 0297 00d8 | | Load_Top At_Offset_0 0298 e00c | | Load 0x0,0xc 0299 0260 | ` | Execute Discrete,In_Type 029a 7001 |p | Jump_Nonzero 0x29c 029b 0801 | | Execute_Immediate Raise,0x1 029c 823f | ? | Call 0x1,0x3f 029d 00c8 | | Action Pop_Auxiliary_Range 029e 3ff1 |? | Loop_Increasing 0x290 029f 00ce | | Action Pop_Auxiliary 02a0 e229 | ) | Load 0x1,0x29 02a1 6803 |h | Jump_Zero 0x2a5 02a2 4801 |H | Short_Literal 0x1 02a3 8240 | @ | Call 0x1,0x40 02a4 780b |x | Jump 0x2b0 02a5 4800 |H | Short_Literal 0x0 02a6 8240 | @ | Call 0x1,0x40 02a7 7808 |x | Jump 0x2b0 02a8 e229 | ) | Load 0x1,0x29 02a9 7002 |p | Jump_Nonzero 0x2ac 02aa e22e | . | Load 0x1,0x2e 02ab 6804 |h | Jump_Zero 0x2b0 02ac 4801 |H | Short_Literal 0x1 02ad e403 | | Load 0x2,0x3 02ae e402 | | Load 0x2,0x2 02af 823c | < | Call 0x1,0x3c 02b0 e22c | , | Load 0x1,0x2c 02b1 7002 |p | Jump_Nonzero 0x2b4 02b2 4801 |H | Short_Literal 0x1 02b3 a22c | , | Store_Unchecked 0x1,0x2c 02b4 e228 | ( | Load 0x1,0x28 02b5 6803 |h | Jump_Zero 0x2b9 02b6 4800 |H | Short_Literal 0x0 02b7 e221 | ! | Load 0x1,0x21 02b8 8039 | 9 | Call 0x0,0x39 02b9 4896 |H | Short_Literal 0x96 02ba a40f | | Store_Unchecked 0x2,0xf 02bb 4896 |H | Short_Literal 0x96 02bc a410 | | Store_Unchecked 0x2,0x10 02bd e406 | | Load 0x2,0x6 02be e40f | | Load 0x2,0xf 02bf 0272 | r | Execute Discrete,Minus 02c0 00d8 | | Load_Top At_Offset_0 02c1 e00d | | Load 0x0,0xd 02c2 0260 | ` | Execute Discrete,In_Type 02c3 7001 |p | Jump_Nonzero 0x2c5 02c4 0801 | | Execute_Immediate Raise,0x1 02c5 5832 |X2 | Indirect_Literal Float,0x2f8,255.0 02c6 e20f | | Load 0x1,0xf 02c7 803a | : | Call 0x0,0x3a 02c8 023b | ; | Execute Float,Times 02c9 0235 | 5 | Execute Float,Round_To_Discrete 02ca e00d | | Load 0x0,0xd 02cb 025e | ^ | Execute Discrete,Convert 02cc 0271 | q | Execute Discrete,Times 02cd 09f8 | | Execute_Immediate Binary_Scale,-0x8 02ce 00d8 | | Load_Top At_Offset_0 02cf e00b | | Load 0x0,0xb 02d0 0260 | ` | Execute Discrete,In_Type 02d1 7001 |p | Jump_Nonzero 0x2d3 02d2 0801 | | Execute_Immediate Raise,0x1 02d3 a40b | | Store_Unchecked 0x2,0xb 02d4 e407 | | Load 0x2,0x7 02d5 e410 | | Load 0x2,0x10 02d6 0272 | r | Execute Discrete,Minus 02d7 00d8 | | Load_Top At_Offset_0 02d8 e00d | | Load 0x0,0xd 02d9 0260 | ` | Execute Discrete,In_Type 02da 7001 |p | Jump_Nonzero 0x2dc 02db 0801 | | Execute_Immediate Raise,0x1 02dc 581b |X | Indirect_Literal Float,0x2f8,255.0 02dd e20f | | Load 0x1,0xf 02de 803a | : | Call 0x0,0x3a 02df 023b | ; | Execute Float,Times 02e0 0235 | 5 | Execute Float,Round_To_Discrete 02e1 e00d | | Load 0x0,0xd 02e2 025e | ^ | Execute Discrete,Convert 02e3 0271 | q | Execute Discrete,Times 02e4 09f8 | | Execute_Immediate Binary_Scale,-0x8 02e5 00d8 | | Load_Top At_Offset_0 02e6 e00b | | Load 0x0,0xb 02e7 0260 | ` | Execute Discrete,In_Type 02e8 7001 |p | Jump_Nonzero 0x2ea 02e9 0801 | | Execute_Immediate Raise,0x1 02ea a40c | | Store_Unchecked 0x2,0xc 02eb 480d |H | Short_Literal 0xd 02ec a40d | | Store_Unchecked 0x2,0xd 02ed 4809 |H | Short_Literal 0x9 02ee a40e | | Store_Unchecked 0x2,0xe 02ef 8419 | | Call 0x2,0x19 02f0 450d |E | Exit_Suprogram New_Top_Offset 0xd 02f1 TRAP_0108: 02f1 e20e | | Load 0x1,0xe 02f2 010f | | Execute Exception,Equal 02f3 6802 |h | Jump_Zero 0x2f6 02f4 0008 | | Action Idle 02f5 450d |E | Exit_Suprogram New_Top_Offset 0xd 02f6 0100 | | Execute Exception,Raise 02f7 0000 | | .XXX[0x1] 02f8 406f e000 |@o | .DBL 255.0 02fa 0000 0000 | | 02fc 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 0300 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0304 4963 6f00 |Ico | .LITERAL {0x49636f00, 0x00000000} 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030b | | .CONST 0x030b ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0001 | | .CONST 0x0001 ; Number of locals 030b BODY_0308: 030b INIT_0308: 030b 00cf | | Action Mark_Auxiliary 030c 4803 |H | Short_Literal 0x3 030d 4800 |H | Short_Literal 0x0 030e 00cf | | Action Mark_Auxiliary 030f 4803 |H | Short_Literal 0x3 0310 4800 |H | Short_Literal 0x0 0311 0007 | | Action Break_Optional 0312 4800 |H | Short_Literal 0x0 0313 e404 | | Load 0x2,0x4 0314 e5ff | | Load 0x2,-0x1 0315 01a7 | | Execute Matrix,Field_Read 0316 00d9 | | Load_Top At_Offset_1 0317 4800 |H | Short_Literal 0x0 0318 e5fe | | Load 0x2,-0x2 0319 01a7 | | Execute Matrix,Field_Read 031a 023b | ; | Execute Float,Times 031b 4801 |H | Short_Literal 0x1 031c e404 | | Load 0x2,0x4 031d e5ff | | Load 0x2,-0x1 031e 01a7 | | Execute Matrix,Field_Read 031f 00da | | Load_Top At_Offset_2 0320 4801 |H | Short_Literal 0x1 0321 e5fe | | Load 0x2,-0x2 0322 01a7 | | Execute Matrix,Field_Read 0323 023b | ; | Execute Float,Times 0324 023d | = | Execute Float,Plus 0325 4802 |H | Short_Literal 0x2 0326 e404 | | Load 0x2,0x4 0327 e5ff | | Load 0x2,-0x1 0328 01a7 | | Execute Matrix,Field_Read 0329 00da | | Load_Top At_Offset_2 032a 4802 |H | Short_Literal 0x2 032b e5fe | | Load 0x2,-0x2 032c 01a7 | | Execute Matrix,Field_Read 032d 023b | ; | Execute Float,Times 032e 023d | = | Execute Float,Plus 032f 4803 |H | Short_Literal 0x3 0330 e404 | | Load 0x2,0x4 0331 e5ff | | Load 0x2,-0x1 0332 01a7 | | Execute Matrix,Field_Read 0333 00da | | Load_Top At_Offset_2 0334 4803 |H | Short_Literal 0x3 0335 e5fe | | Load 0x2,-0x2 0336 01a7 | | Execute Matrix,Field_Read 0337 023b | ; | Execute Float,Times 0338 023d | = | Execute Float,Plus 0339 00d9 | | Load_Top At_Offset_1 033a e404 | | Load 0x2,0x4 033b e5fd | | Load 0x2,-0x3 033c 01a6 | | Execute Matrix,Field_Write 033d 00c8 | | Action Pop_Auxiliary_Range 033e 3fd3 |? | Loop_Increasing 0x312 033f 00ce | | Action Pop_Auxiliary 0340 00c8 | | Action Pop_Auxiliary_Range 0341 3fcc |? | Loop_Increasing 0x30e 0342 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0343 0000 0000 | | .BLANK 0000[0x5] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 0383 | | .CONST 0x0383 ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0013 | | .CONST 0x0013 ; Number of locals 034b INIT_0348: 034b e03b | ; | Load 0x0,0x3b 034c 00db | | Load_Top At_Offset_3 034d 0227 | ' | Execute Access,All_Reference 034e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 034f 0039 | 9 | Store_Top Access,At_Offset_1 0350 00db | | Load_Top At_Offset_3 0351 0227 | ' | Execute Access,All_Reference 0352 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0353 e00c | | Load 0x0,0xc 0354 03f1 | | Declare_Variable Discrete,With_Value 0355 e03c | < | Load 0x0,0x3c 0356 e5ff | | Load 0x2,-0x1 0357 0227 | ' | Execute Access,All_Reference 0358 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0359 0039 | 9 | Store_Top Access,At_Offset_1 035a e5ff | | Load 0x2,-0x1 035b 0227 | ' | Execute Access,All_Reference 035c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 035d e00c | | Load 0x0,0xc 035e 03f1 | | Declare_Variable Discrete,With_Value 035f e00c | | Load 0x0,0xc 0360 0007 | | Action Break_Optional 0361 e00c | | Load 0x0,0xc 0362 0007 | | Action Break_Optional 0363 e00c | | Load 0x0,0xc 0364 0007 | | Action Break_Optional 0365 e00c | | Load 0x0,0xc 0366 0007 | | Action Break_Optional 0367 e00c | | Load 0x0,0xc 0368 0007 | | Action Break_Optional 0369 4800 |H | Short_Literal 0x0 036a 4877 |Hw | Short_Literal 0x77 036b e03d | = | Load 0x0,0x3d 036c 035b | [ | Declare_Type Array,Constrained 036d 0337 | 7 | Declare_Variable Array 036e 4800 |H | Short_Literal 0x0 036f 48b3 |H | Short_Literal 0xb3 0370 e03e | > | Load 0x0,0x3e 0371 035b | [ | Declare_Type Array,Constrained 0372 0337 | 7 | Declare_Variable Array 0373 e00c | | Load 0x0,0xc 0374 0007 | | Action Break_Optional 0375 e00c | | Load 0x0,0xc 0376 0007 | | Action Break_Optional 0377 e00c | | Load 0x0,0xc 0378 0007 | | Action Break_Optional 0379 e00c | | Load 0x0,0xc 037a 0007 | | Action Break_Optional 037b 00e6 | | Load_Encached Float_Cache 037c 4800 |H | Short_Literal 0x0 037d 4813 |H | Short_Literal 0x13 037e e03d | = | Load 0x0,0x3d 037f 035b | [ | Declare_Type Array,Constrained 0380 0337 | 7 | Declare_Variable Array 0381 029f 0a4b | K| Declare_Subprogram INIT_0a48,For_Call 0383 BODY_0348: 0383 e227 | ' | Load 0x1,0x27 0384 7001 |p | Jump_Nonzero 0x386 0385 8413 | | Call 0x2,0x13 0386 e232 | 2 | Load 0x1,0x32 0387 0f00 | | Execute_Immediate Equal,0x0 0388 a232 | 2 | Store_Unchecked 0x1,0x32 0389 e232 | 2 | Load 0x1,0x32 038a e231 | 1 | Load 0x1,0x31 038b 01d5 | | Execute Vector,Field_Reference 038c 00d8 | | Load_Top At_Offset_0 038d e232 | 2 | Load 0x1,0x32 038e 0f00 | | Execute_Immediate Equal,0x0 038f e231 | 1 | Load 0x1,0x31 0390 01d5 | | Execute Vector,Field_Reference 0391 e230 | 0 | Load 0x1,0x30 0392 e403 | | Load 0x2,0x3 0393 823d | = | Call 0x1,0x3d 0394 00d2 | | Pop_Control Pop_Count_2 0395 e232 | 2 | Load 0x1,0x32 0396 e231 | 1 | Load 0x1,0x31 0397 01d5 | | Execute Vector,Field_Reference 0398 01dd | | Execute Vector,First 0399 c40a | | Store 0x2,0xa 039a 4800 |H | Short_Literal 0x0 039b a408 | | Store_Unchecked 0x2,0x8 039c 00cf | | Action Mark_Auxiliary 039d 4800 |H | Short_Literal 0x0 039e e403 | | Load 0x2,0x3 039f 0aff | | Execute_Immediate Plus,-0x1 03a0 0264 | d | Execute Discrete,Below_Bound 03a1 702e |p. | Jump_Nonzero 0x3d0 03a2 e40a | | Load 0x2,0xa 03a3 e232 | 2 | Load 0x1,0x32 03a4 e231 | 1 | Load 0x1,0x31 03a5 01d5 | | Execute Vector,Field_Reference 03a6 01d5 | | Execute Vector,Field_Reference 03a7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03a8 59d7 |Y | Indirect_Literal Float,0x580,1.0 03a9 023d | = | Execute Float,Plus 03aa e233 | 3 | Load 0x1,0x33 03ab 023b | ; | Execute Float,Times 03ac 0235 | 5 | Execute Float,Round_To_Discrete 03ad e00b | | Load 0x0,0xb 03ae 025e | ^ | Execute Discrete,Convert 03af e5fc | | Load 0x2,-0x4 03b0 0273 | s | Execute Discrete,Plus 03b1 e408 | | Load 0x2,0x8 03b2 e40b | | Load 0x2,0xb 03b3 01d5 | | Execute Vector,Field_Reference 03b4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03b5 e40a | | Load 0x2,0xa 03b6 e232 | 2 | Load 0x1,0x32 03b7 e231 | 1 | Load 0x1,0x31 03b8 01d5 | | Execute Vector,Field_Reference 03b9 01d5 | | Execute Vector,Field_Reference 03ba 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03bb 59c4 |Y | Indirect_Literal Float,0x580,1.0 03bc 023d | = | Execute Float,Plus 03bd e234 | 4 | Load 0x1,0x34 03be 023b | ; | Execute Float,Times 03bf 0235 | 5 | Execute Float,Round_To_Discrete 03c0 e00b | | Load 0x0,0xb 03c1 025e | ^ | Execute Discrete,Convert 03c2 e5fb | | Load 0x2,-0x5 03c3 0273 | s | Execute Discrete,Plus 03c4 e408 | | Load 0x2,0x8 03c5 e40b | | Load 0x2,0xb 03c6 01d5 | | Execute Vector,Field_Reference 03c7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03c8 e40a | | Load 0x2,0xa 03c9 0a01 | | Execute_Immediate Plus,0x1 03ca c40a | | Store 0x2,0xa 03cb e408 | | Load 0x2,0x8 03cc 0a01 | | Execute_Immediate Plus,0x1 03cd c408 | | Store 0x2,0x8 03ce 00c8 | | Action Pop_Auxiliary_Range 03cf 37d2 |7 | Loop_Decreasing 0x3a2 03d0 00ce | | Action Pop_Auxiliary 03d1 e232 | 2 | Load 0x1,0x32 03d2 e231 | 1 | Load 0x1,0x31 03d3 01d5 | | Execute Vector,Field_Reference 03d4 01dd | | Execute Vector,First 03d5 c40a | | Store 0x2,0xa 03d6 4800 |H | Short_Literal 0x0 03d7 a408 | | Store_Unchecked 0x2,0x8 03d8 e404 | | Load 0x2,0x4 03d9 0227 | ' | Execute Access,All_Reference 03da 01dd | | Execute Vector,First 03db c40d | | Store 0x2,0xd 03dc 4800 |H | Short_Literal 0x0 03dd a409 | | Store_Unchecked 0x2,0x9 03de e21e | | Load 0x1,0x1e 03df e21d | | Load 0x1,0x1d 03e0 01a4 | | Execute Matrix,Structure_Write 03e1 e229 | ) | Load 0x1,0x29 03e2 6803 |h | Jump_Zero 0x3e6 03e3 e21b | | Load 0x1,0x1b 03e4 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 03e5 8241 | A | Call 0x1,0x41 03e6 e22e | . | Load 0x1,0x2e 03e7 682e |h. | Jump_Zero 0x416 03e8 e229 | ) | Load 0x1,0x29 03e9 681b |h | Jump_Zero 0x405 03ea e5f9 | | Load 0x2,-0x7 03eb 0a01 | | Execute_Immediate Plus,0x1 03ec 00d8 | | Load_Top At_Offset_0 03ed e012 | | Load 0x0,0x12 03ee 0260 | ` | Execute Discrete,In_Type 03ef 7001 |p | Jump_Nonzero 0x3f1 03f0 0801 | | Execute_Immediate Raise,0x1 03f1 e5fa | | Load 0x2,-0x6 03f2 0a01 | | Execute_Immediate Plus,0x1 03f3 00d8 | | Load_Top At_Offset_0 03f4 e012 | | Load 0x0,0x12 03f5 0260 | ` | Execute Discrete,In_Type 03f6 7001 |p | Jump_Nonzero 0x3f8 03f7 0801 | | Execute_Immediate Raise,0x1 03f8 e21b | | Load 0x1,0x1b 03f9 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 03fa e21b | | Load 0x1,0x1b 03fb 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 03fc 01d5 | | Execute Vector,Field_Reference 03fd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03fe e21b | | Load 0x1,0x1b 03ff 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0400 e21b | | Load 0x1,0x1b 0401 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0402 01d5 | | Execute Vector,Field_Reference 0403 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0404 8243 | C | Call 0x1,0x43 0405 e5f9 | | Load 0x2,-0x7 0406 0a01 | | Execute_Immediate Plus,0x1 0407 00d8 | | Load_Top At_Offset_0 0408 e012 | | Load 0x0,0x12 0409 0260 | ` | Execute Discrete,In_Type 040a 7001 |p | Jump_Nonzero 0x40c 040b 0801 | | Execute_Immediate Raise,0x1 040c e5fa | | Load 0x2,-0x6 040d 0a01 | | Execute_Immediate Plus,0x1 040e 00d8 | | Load_Top At_Offset_0 040f e012 | | Load 0x0,0x12 0410 0260 | ` | Execute Discrete,In_Type 0411 7001 |p | Jump_Nonzero 0x413 0412 0801 | | Execute_Immediate Raise,0x1 0413 e5f7 | | Load 0x2,-0x9 0414 e5f8 | | Load 0x2,-0x8 0415 8243 | C | Call 0x1,0x43 0416 e228 | ( | Load 0x1,0x28 0417 6803 |h | Jump_Zero 0x41b 0418 4800 |H | Short_Literal 0x0 0419 e221 | ! | Load 0x1,0x21 041a 8039 | 9 | Call 0x0,0x39 041b 00cf | | Action Mark_Auxiliary 041c 4800 |H | Short_Literal 0x0 041d e405 | | Load 0x2,0x5 041e 0aff | | Execute_Immediate Plus,-0x1 041f 0264 | d | Execute Discrete,Below_Bound 0420 70d7 |p | Jump_Nonzero 0x4f8 0421 e40d | | Load 0x2,0xd 0422 e404 | | Load 0x2,0x4 0423 0227 | ' | Execute Access,All_Reference 0424 01d7 | | Execute Vector,Field_Read 0425 a410 | | Store_Unchecked 0x2,0x10 0426 e40d | | Load 0x2,0xd 0427 0a01 | | Execute_Immediate Plus,0x1 0428 c40d | | Store 0x2,0xd 0429 5952 |YR | Indirect_Literal Float,0x57c,0.0 042a a411 | | Store_Unchecked 0x2,0x11 042b 00cf | | Action Mark_Auxiliary 042c e410 | | Load 0x2,0x10 042d 0aff | | Execute_Immediate Plus,-0x1 042e 4800 |H | Short_Literal 0x0 042f 0263 | c | Execute Discrete,Above_Bound 0430 7014 |p | Jump_Nonzero 0x445 0431 e40d | | Load 0x2,0xd 0432 00d9 | | Load_Top At_Offset_1 0433 0273 | s | Execute Discrete,Plus 0434 e404 | | Load 0x2,0x4 0435 0227 | ' | Execute Access,All_Reference 0436 01d7 | | Execute Vector,Field_Read 0437 a406 | | Store_Unchecked 0x2,0x6 0438 e411 | | Load 0x2,0x11 0439 e40a | | Load 0x2,0xa 043a e406 | | Load 0x2,0x6 043b 0273 | s | Execute Discrete,Plus 043c e232 | 2 | Load 0x1,0x32 043d e231 | 1 | Load 0x1,0x31 043e 01d5 | | Execute Vector,Field_Reference 043f 01d5 | | Execute Vector,Field_Reference 0440 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0441 023d | = | Execute Float,Plus 0442 a411 | | Store_Unchecked 0x2,0x11 0443 00c8 | | Action Pop_Auxiliary_Range 0444 3fec |? | Loop_Increasing 0x431 0445 00ce | | Action Pop_Auxiliary 0446 e411 | | Load 0x2,0x11 0447 014b | K | Execute Float,Less_Zero 0448 6801 |h | Jump_Zero 0x44a 0449 78a6 |x | Jump 0x4f0 044a e22e | . | Load 0x1,0x2e 044b 6846 |hF | Jump_Zero 0x492 044c e22c | , | Load 0x1,0x2c 044d 6806 |h | Jump_Zero 0x454 044e 00d8 | | Load_Top At_Offset_0 044f e22c | , | Load 0x1,0x2c 0450 026f | o | Execute Discrete,Remainder 0451 0a01 | | Execute_Immediate Plus,0x1 0452 c40e | | Store 0x2,0xe 0453 7802 |x | Jump 0x456 0454 4801 |H | Short_Literal 0x1 0455 a40e | | Store_Unchecked 0x2,0xe 0456 e40e | | Load 0x2,0xe 0457 e21b | | Load 0x1,0x1b 0458 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0459 e21b | | Load 0x1,0x1b 045a 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 045b 01d5 | | Execute Vector,Field_Reference 045c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 045d 0227 | ' | Execute Access,All_Reference 045e 01d7 | | Execute Vector,Field_Read 045f e5fd | | Load 0x2,-0x3 0460 e221 | ! | Load 0x1,0x21 0461 8034 | 4 | Call 0x0,0x34 0462 00cf | | Action Mark_Auxiliary 0463 e410 | | Load 0x2,0x10 0464 0aff | | Execute_Immediate Plus,-0x1 0465 4800 |H | Short_Literal 0x0 0466 0263 | c | Execute Discrete,Above_Bound 0467 701d |p | Jump_Nonzero 0x485 0468 e40d | | Load 0x2,0xd 0469 00d9 | | Load_Top At_Offset_1 046a 0273 | s | Execute Discrete,Plus 046b e404 | | Load 0x2,0x4 046c 0227 | ' | Execute Access,All_Reference 046d 01d7 | | Execute Vector,Field_Read 046e a406 | | Store_Unchecked 0x2,0x6 046f e408 | | Load 0x2,0x8 0470 e406 | | Load 0x2,0x6 0471 0273 | s | Execute Discrete,Plus 0472 e40b | | Load 0x2,0xb 0473 01d5 | | Execute Vector,Field_Reference 0474 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0475 00d9 | | Load_Top At_Offset_1 0476 e412 | | Load 0x2,0x12 0477 01d5 | | Execute Vector,Field_Reference 0478 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0479 e408 | | Load 0x2,0x8 047a e406 | | Load 0x2,0x6 047b 0273 | s | Execute Discrete,Plus 047c e40b | | Load 0x2,0xb 047d 01d5 | | Execute Vector,Field_Reference 047e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 047f 00d9 | | Load_Top At_Offset_1 0480 e412 | | Load 0x2,0x12 0481 01d5 | | Execute Vector,Field_Reference 0482 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0483 00c8 | | Action Pop_Auxiliary_Range 0484 3fe3 |? | Loop_Increasing 0x468 0485 00ce | | Action Pop_Auxiliary 0486 4800 |H | Short_Literal 0x0 0487 4802 |H | Short_Literal 0x2 0488 4800 |H | Short_Literal 0x0 0489 e410 | | Load 0x2,0x10 048a 0aff | | Execute_Immediate Plus,-0x1 048b e412 | | Load 0x2,0x12 048c 01cf | | Execute Vector,Slice_Read 048d e5fd | | Load 0x2,-0x3 048e e5fe | | Load 0x2,-0x2 048f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0490 e221 | ! | Load 0x1,0x21 0491 803f | ? | Call 0x0,0x3f 0492 e22f | / | Load 0x1,0x2f 0493 685c |h\ | Jump_Zero 0x4f0 0494 00cf | | Action Mark_Auxiliary 0495 e410 | | Load 0x2,0x10 0496 0aff | | Execute_Immediate Plus,-0x1 0497 4800 |H | Short_Literal 0x0 0498 0263 | c | Execute Discrete,Above_Bound 0499 7055 |pU | Jump_Nonzero 0x4ef 049a 00d8 | | Load_Top At_Offset_0 049b e410 | | Load 0x2,0x10 049c 0aff | | Execute_Immediate Plus,-0x1 049d 027c | | | Execute Discrete,Less 049e 6804 |h | Jump_Zero 0x4a3 049f 00d8 | | Load_Top At_Offset_0 04a0 0a01 | | Execute_Immediate Plus,0x1 04a1 c40f | | Store 0x2,0xf 04a2 7802 |x | Jump 0x4a5 04a3 4800 |H | Short_Literal 0x0 04a4 a40f | | Store_Unchecked 0x2,0xf 04a5 e40d | | Load 0x2,0xd 04a6 00d9 | | Load_Top At_Offset_1 04a7 0273 | s | Execute Discrete,Plus 04a8 e404 | | Load 0x2,0x4 04a9 0227 | ' | Execute Access,All_Reference 04aa 01d7 | | Execute Vector,Field_Read 04ab a406 | | Store_Unchecked 0x2,0x6 04ac e40d | | Load 0x2,0xd 04ad e40f | | Load 0x2,0xf 04ae 0273 | s | Execute Discrete,Plus 04af e404 | | Load 0x2,0x4 04b0 0227 | ' | Execute Access,All_Reference 04b1 01d7 | | Execute Vector,Field_Read 04b2 a407 | | Store_Unchecked 0x2,0x7 04b3 e407 | | Load 0x2,0x7 04b4 e406 | | Load 0x2,0x6 04b5 e21d | | Load 0x1,0x1d 04b6 01a7 | | Execute Matrix,Field_Read 04b7 7035 |p5 | Jump_Nonzero 0x4ed 04b8 4801 |H | Short_Literal 0x1 04b9 e407 | | Load 0x2,0x7 04ba e406 | | Load 0x2,0x6 04bb e21d | | Load 0x1,0x1d 04bc 01a6 | | Execute Matrix,Field_Write 04bd 4801 |H | Short_Literal 0x1 04be e406 | | Load 0x2,0x6 04bf e407 | | Load 0x2,0x7 04c0 e21d | | Load 0x1,0x1d 04c1 01a6 | | Execute Matrix,Field_Write 04c2 e408 | | Load 0x2,0x8 04c3 e406 | | Load 0x2,0x6 04c4 0273 | s | Execute Discrete,Plus 04c5 e40b | | Load 0x2,0xb 04c6 01d5 | | Execute Vector,Field_Reference 04c7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04c8 e409 | | Load 0x2,0x9 04c9 e40c | | Load 0x2,0xc 04ca 01d5 | | Execute Vector,Field_Reference 04cb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04cc e408 | | Load 0x2,0x8 04cd e406 | | Load 0x2,0x6 04ce 0273 | s | Execute Discrete,Plus 04cf e40b | | Load 0x2,0xb 04d0 01d5 | | Execute Vector,Field_Reference 04d1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04d2 e409 | | Load 0x2,0x9 04d3 e40c | | Load 0x2,0xc 04d4 01d5 | | Execute Vector,Field_Reference 04d5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04d6 e408 | | Load 0x2,0x8 04d7 e407 | | Load 0x2,0x7 04d8 0273 | s | Execute Discrete,Plus 04d9 e40b | | Load 0x2,0xb 04da 01d5 | | Execute Vector,Field_Reference 04db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04dc e409 | | Load 0x2,0x9 04dd e40c | | Load 0x2,0xc 04de 01d5 | | Execute Vector,Field_Reference 04df 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04e0 e408 | | Load 0x2,0x8 04e1 e407 | | Load 0x2,0x7 04e2 0273 | s | Execute Discrete,Plus 04e3 e40b | | Load 0x2,0xb 04e4 01d5 | | Execute Vector,Field_Reference 04e5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04e6 e409 | | Load 0x2,0x9 04e7 e40c | | Load 0x2,0xc 04e8 01d5 | | Execute Vector,Field_Reference 04e9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 04ea e409 | | Load 0x2,0x9 04eb 0a01 | | Execute_Immediate Plus,0x1 04ec c409 | | Store 0x2,0x9 04ed 00c8 | | Action Pop_Auxiliary_Range 04ee 3fab |? | Loop_Increasing 0x49a 04ef 00ce | | Action Pop_Auxiliary 04f0 0008 | | Action Idle 04f1 0007 | | Action Break_Optional 04f2 e40d | | Load 0x2,0xd 04f3 e410 | | Load 0x2,0x10 04f4 0273 | s | Execute Discrete,Plus 04f5 c40d | | Store 0x2,0xd 04f6 00c8 | | Action Pop_Auxiliary_Range 04f7 3729 |7) | Loop_Decreasing 0x421 04f8 00ce | | Action Pop_Auxiliary 04f9 e22f | / | Load 0x1,0x2f 04fa 6859 |hY | Jump_Zero 0x554 04fb e22e | . | Load 0x1,0x2e 04fc 680d |h | Jump_Zero 0x50a 04fd 4800 |H | Short_Literal 0x0 04fe e21b | | Load 0x1,0x1b 04ff 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0500 e21b | | Load 0x1,0x1b 0501 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0502 01d5 | | Execute Vector,Field_Reference 0503 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0504 0227 | ' | Execute Access,All_Reference 0505 01d7 | | Execute Vector,Field_Read 0506 e5fd | | Load 0x2,-0x3 0507 e221 | ! | Load 0x1,0x21 0508 8034 | 4 | Call 0x0,0x34 0509 7840 |x@ | Jump 0x54a 050a e229 | ) | Load 0x1,0x29 050b 681b |h | Jump_Zero 0x527 050c e5f9 | | Load 0x2,-0x7 050d 0a01 | | Execute_Immediate Plus,0x1 050e 00d8 | | Load_Top At_Offset_0 050f e012 | | Load 0x0,0x12 0510 0260 | ` | Execute Discrete,In_Type 0511 7001 |p | Jump_Nonzero 0x513 0512 0801 | | Execute_Immediate Raise,0x1 0513 e5fa | | Load 0x2,-0x6 0514 0a01 | | Execute_Immediate Plus,0x1 0515 00d8 | | Load_Top At_Offset_0 0516 e012 | | Load 0x0,0x12 0517 0260 | ` | Execute Discrete,In_Type 0518 7001 |p | Jump_Nonzero 0x51a 0519 0801 | | Execute_Immediate Raise,0x1 051a e21b | | Load 0x1,0x1b 051b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 051c e21b | | Load 0x1,0x1b 051d 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 051e 01d5 | | Execute Vector,Field_Reference 051f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0520 e21b | | Load 0x1,0x1b 0521 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0522 e21b | | Load 0x1,0x1b 0523 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0524 01d5 | | Execute Vector,Field_Reference 0525 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0526 8243 | C | Call 0x1,0x43 0527 e5f9 | | Load 0x2,-0x7 0528 0a01 | | Execute_Immediate Plus,0x1 0529 00d8 | | Load_Top At_Offset_0 052a e012 | | Load 0x0,0x12 052b 0260 | ` | Execute Discrete,In_Type 052c 7001 |p | Jump_Nonzero 0x52e 052d 0801 | | Execute_Immediate Raise,0x1 052e e5fa | | Load 0x2,-0x6 052f 0a01 | | Execute_Immediate Plus,0x1 0530 00d8 | | Load_Top At_Offset_0 0531 e012 | | Load 0x0,0x12 0532 0260 | ` | Execute Discrete,In_Type 0533 7001 |p | Jump_Nonzero 0x535 0534 0801 | | Execute_Immediate Raise,0x1 0535 e5f7 | | Load 0x2,-0x9 0536 e5f8 | | Load 0x2,-0x8 0537 8243 | C | Call 0x1,0x43 0538 e229 | ) | Load 0x1,0x29 0539 7002 |p | Jump_Nonzero 0x53c 053a e22e | . | Load 0x1,0x2e 053b 680e |h | Jump_Zero 0x54a 053c e21b | | Load 0x1,0x1b 053d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 053e 0aff | | Execute_Immediate Plus,-0x1 053f e21b | | Load 0x1,0x1b 0540 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0541 e21b | | Load 0x1,0x1b 0542 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0543 01d5 | | Execute Vector,Field_Reference 0544 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0545 0227 | ' | Execute Access,All_Reference 0546 01d7 | | Execute Vector,Field_Read 0547 e5fd | | Load 0x2,-0x3 0548 e221 | ! | Load 0x1,0x21 0549 8034 | 4 | Call 0x0,0x34 054a 4800 |H | Short_Literal 0x0 054b e409 | | Load 0x2,0x9 054c 0aff | | Execute_Immediate Plus,-0x1 054d e40c | | Load 0x2,0xc 054e 01cf | | Execute Vector,Slice_Read 054f e5fd | | Load 0x2,-0x3 0550 e5fe | | Load 0x2,-0x2 0551 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0552 e221 | ! | Load 0x1,0x21 0553 8040 | @ | Call 0x0,0x40 0554 e228 | ( | Load 0x1,0x28 0555 6803 |h | Jump_Zero 0x559 0556 4800 |H | Short_Literal 0x0 0557 e221 | ! | Load 0x1,0x21 0558 8039 | 9 | Call 0x0,0x39 0559 e229 | ) | Load 0x1,0x29 055a 6811 |h | Jump_Zero 0x56c 055b e5fc | | Load 0x2,-0x4 055c e21b | | Load 0x1,0x1b 055d 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 055e e21b | | Load 0x1,0x1b 055f 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0560 01d5 | | Execute Vector,Field_Reference 0561 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0562 e5fb | | Load 0x2,-0x5 0563 e21b | | Load 0x1,0x1b 0564 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0565 e21b | | Load 0x1,0x1b 0566 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0567 01d5 | | Execute Vector,Field_Reference 0568 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0569 e21b | | Load 0x1,0x1b 056a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 056b 8240 | @ | Call 0x1,0x40 056c e229 | ) | Load 0x1,0x29 056d 6806 |h | Jump_Zero 0x574 056e 4801 |H | Short_Literal 0x1 056f e21b | | Load 0x1,0x1b 0570 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0571 0272 | r | Execute Discrete,Minus 0572 e21b | | Load 0x1,0x1b 0573 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0574 e22a | * | Load 0x1,0x2a 0575 6802 |h | Jump_Zero 0x578 0576 e22a | * | Load 0x1,0x2a 0577 00ba | | Action Initiate_Delay 0578 450a |E | Exit_Suprogram New_Top_Offset 0xa 0579 0000 0000 | | .XXX[0x3] 057b 0000 | | 057c 0000 0000 | | .DBL 0.0 057e 0000 0000 | | 0580 3ff0 0000 |? | .DBL 1.0 0582 0000 0000 | | 0584 0000 0000 | | .BLANK 0000[0x4] 0588 ; -------------------------------------------------------------------------------------- 0588 ; SUBPROGRAM 0588 ; -------------------------------------------------------------------------------------- 0588 058d | | .CONST 0x058d ; Address of begin 0589 0004 | | .CONST 0x0004 ; Address of exception handler 058a 0002 | | .CONST 0x0002 ; Number of locals 058b INIT_0588: 058b 029f 0a83 | | Declare_Subprogram INIT_0a80,For_Call 058d BODY_0588: 058d 00cf | | Action Mark_Auxiliary 058e e213 | | Load 0x1,0x13 058f 01d9 | | Execute Vector,Reverse_Bounds 0590 0007 | | Action Break_Optional 0591 e5ff | | Load 0x2,-0x1 0592 00d9 | | Load_Top At_Offset_1 0593 e213 | | Load 0x1,0x13 0594 01d7 | | Execute Vector,Field_Read 0595 0227 | ' | Execute Access,All_Reference 0596 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0597 0227 | ' | Execute Access,All_Reference 0598 8402 | | Call 0x2,0x2 0599 7009 |p | Jump_Nonzero 0x5a3 059a e5ff | | Load 0x2,-0x1 059b 00d9 | | Load_Top At_Offset_1 059c e213 | | Load 0x1,0x13 059d 01d7 | | Execute Vector,Field_Read 059e 0227 | ' | Execute Access,All_Reference 059f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05a0 0227 | ' | Execute Access,All_Reference 05a1 8402 | | Call 0x2,0x2 05a2 6804 |h | Jump_Zero 0x5a7 05a3 00d8 | | Load_Top At_Offset_0 05a4 e213 | | Load 0x1,0x13 05a5 01d7 | | Execute Vector,Field_Read 05a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a7 00c8 | | Action Pop_Auxiliary_Range 05a8 3fe8 |? | Loop_Increasing 0x591 05a9 00ce | | Action Pop_Auxiliary 05aa 0092 0c44 | D| Action Push_String_Extended,0xc44 ; "can't find object " 05ac e5ff | | Load 0x2,-0x1 05ad 01cc | | Execute Vector,Catenate 05ae 823a | : | Call 0x1,0x3a 05af 0831 | 1 | Execute_Immediate Raise,0x31 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b5 | | .CONST 0x05b5 ; Address of begin 05b1 0004 | | .CONST 0x0004 ; Address of exception handler 05b2 0003 | | .CONST 0x0003 ; Number of locals 05b3 INIT_05b0: 05b3 00e6 | | Load_Encached Float_Cache 05b4 00e6 | | Load_Encached Float_Cache 05b5 BODY_05b0: 05b5 e5fd | | Load 0x2,-0x3 05b6 823b | ; | Call 0x1,0x3b 05b7 00d1 | | Pop_Control Pop_Count_1 05b8 e5fe | | Load 0x2,-0x2 05b9 8041 | A | Call 0x0,0x41 05ba 0042 | B | Store_Top_Unchecked Float,At_Offset_2 05bb e5fe | | Load 0x2,-0x2 05bc 8042 | B | Call 0x0,0x42 05bd 0041 | A | Store_Top_Unchecked Float,At_Offset_1 05be e5ff | | Load 0x2,-0x1 05bf 0b78 | x | Execute_Immediate Case_Compare,0x78 05c0 7005 |p | Jump_Nonzero 0x5c6 05c1 0b79 | y | Execute_Immediate Case_Compare,0x79 05c2 701a |p | Jump_Nonzero 0x5dd 05c3 0f7a | z | Execute_Immediate Equal,0x7a 05c4 702f |p/ | Jump_Nonzero 0x5f4 05c5 08e2 | | Execute_Immediate Raise,0xe2 05c6 00d1 | | Pop_Control Pop_Count_1 05c7 00d8 | | Load_Top At_Offset_0 05c8 4801 |H | Short_Literal 0x1 05c9 4801 |H | Short_Literal 0x1 05ca e5fd | | Load 0x2,-0x3 05cb 01a6 | | Execute Matrix,Field_Write 05cc 00d8 | | Load_Top At_Offset_0 05cd 4802 |H | Short_Literal 0x2 05ce 4802 |H | Short_Literal 0x2 05cf e5fd | | Load 0x2,-0x3 05d0 01a6 | | Execute Matrix,Field_Write 05d1 00d9 | | Load_Top At_Offset_1 05d2 4802 |H | Short_Literal 0x2 05d3 4801 |H | Short_Literal 0x1 05d4 e5fd | | Load 0x2,-0x3 05d5 01a6 | | Execute Matrix,Field_Write 05d6 00d9 | | Load_Top At_Offset_1 05d7 023f | ? | Execute Float,Unary_Minus 05d8 4801 |H | Short_Literal 0x1 05d9 4802 |H | Short_Literal 0x2 05da e5fd | | Load 0x2,-0x3 05db 01a6 | | Execute Matrix,Field_Write 05dc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05dd 00d1 | | Pop_Control Pop_Count_1 05de 00d8 | | Load_Top At_Offset_0 05df 4800 |H | Short_Literal 0x0 05e0 4800 |H | Short_Literal 0x0 05e1 e5fd | | Load 0x2,-0x3 05e2 01a6 | | Execute Matrix,Field_Write 05e3 00d8 | | Load_Top At_Offset_0 05e4 4802 |H | Short_Literal 0x2 05e5 4802 |H | Short_Literal 0x2 05e6 e5fd | | Load 0x2,-0x3 05e7 01a6 | | Execute Matrix,Field_Write 05e8 00d9 | | Load_Top At_Offset_1 05e9 4800 |H | Short_Literal 0x0 05ea 4802 |H | Short_Literal 0x2 05eb e5fd | | Load 0x2,-0x3 05ec 01a6 | | Execute Matrix,Field_Write 05ed 00d9 | | Load_Top At_Offset_1 05ee 023f | ? | Execute Float,Unary_Minus 05ef 4802 |H | Short_Literal 0x2 05f0 4800 |H | Short_Literal 0x0 05f1 e5fd | | Load 0x2,-0x3 05f2 01a6 | | Execute Matrix,Field_Write 05f3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05f4 00d8 | | Load_Top At_Offset_0 05f5 4800 |H | Short_Literal 0x0 05f6 4800 |H | Short_Literal 0x0 05f7 e5fd | | Load 0x2,-0x3 05f8 01a6 | | Execute Matrix,Field_Write 05f9 00d8 | | Load_Top At_Offset_0 05fa 4801 |H | Short_Literal 0x1 05fb 4801 |H | Short_Literal 0x1 05fc e5fd | | Load 0x2,-0x3 05fd 01a6 | | Execute Matrix,Field_Write 05fe 00d9 | | Load_Top At_Offset_1 05ff 4801 |H | Short_Literal 0x1 0600 4800 |H | Short_Literal 0x0 0601 e5fd | | Load 0x2,-0x3 0602 01a6 | | Execute Matrix,Field_Write 0603 00d9 | | Load_Top At_Offset_1 0604 023f | ? | Execute Float,Unary_Minus 0605 4800 |H | Short_Literal 0x0 0606 4801 |H | Short_Literal 0x1 0607 e5fd | | Load 0x2,-0x3 0608 01a6 | | Execute Matrix,Field_Write 0609 4503 |E | Exit_Suprogram New_Top_Offset 0x3 060a 0000 0000 | | .BLANK 0000[0x6] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0613 | | .CONST 0x0613 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0001 | | .CONST 0x0001 ; Number of locals 0613 BODY_0610: 0613 INIT_0610: 0613 0092 0c45 | E| Action Push_String_Extended,0xc45 ; "Name Short Name #Vert. #Edges #Faces Dual" 0615 e043 | C | Load 0x0,0x43 0616 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0617 00cf | | Action Mark_Auxiliary 0618 e213 | | Load 0x1,0x13 0619 01d9 | | Execute Vector,Reverse_Bounds 061a 0007 | | Action Break_Optional 061b 4810 |H | Short_Literal 0x10 061c 00d9 | | Load_Top At_Offset_1 061d e213 | | Load 0x1,0x13 061e 01d7 | | Execute Vector,Field_Read 061f 0227 | ' | Execute Access,All_Reference 0620 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0621 0227 | ' | Execute Access,All_Reference 0622 8242 | B | Call 0x1,0x42 0623 e043 | C | Load 0x0,0x43 0624 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0625 480c |H | Short_Literal 0xc 0626 00d9 | | Load_Top At_Offset_1 0627 e213 | | Load 0x1,0x13 0628 01d7 | | Execute Vector,Field_Read 0629 0227 | ' | Execute Access,All_Reference 062a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 062b 0227 | ' | Execute Access,All_Reference 062c 8242 | B | Call 0x1,0x42 062d e043 | C | Load 0x0,0x43 062e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 062f e044 | D | Load 0x0,0x44 0630 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0631 4806 |H | Short_Literal 0x6 0632 00da | | Load_Top At_Offset_2 0633 e213 | | Load 0x1,0x13 0634 01d7 | | Execute Vector,Field_Read 0635 0227 | ' | Execute Access,All_Reference 0636 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0637 e044 | D | Load 0x0,0x44 0638 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0639 e044 | D | Load 0x0,0x44 063a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 063b 4808 |H | Short_Literal 0x8 063c 00da | | Load_Top At_Offset_2 063d e213 | | Load 0x1,0x13 063e 01d7 | | Execute Vector,Field_Read 063f 0227 | ' | Execute Access,All_Reference 0640 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0641 e044 | D | Load 0x0,0x44 0642 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0643 e044 | D | Load 0x0,0x44 0644 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0645 4808 |H | Short_Literal 0x8 0646 00da | | Load_Top At_Offset_2 0647 e213 | | Load 0x1,0x13 0648 01d7 | | Execute Vector,Field_Read 0649 0227 | ' | Execute Access,All_Reference 064a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 064b e044 | D | Load 0x0,0x44 064c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 064d 00d8 | | Load_Top At_Offset_0 064e e213 | | Load 0x1,0x13 064f 01d7 | | Execute Vector,Field_Read 0650 0227 | ' | Execute Access,All_Reference 0651 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0652 0227 | ' | Execute Access,All_Reference 0653 e043 | C | Load 0x0,0x43 0654 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0655 00c8 | | Action Pop_Auxiliary_Range 0656 3fc4 |? | Loop_Increasing 0x61b 0657 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b 0092 0c46 | F| Action Push_String_Extended,0xc46 ; "ico: " 065d 00db | | Load_Top At_Offset_3 065e 01cc | | Execute Vector,Catenate 065f e043 | C | Load 0x0,0x43 0660 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0661 e20e | | Load 0x1,0xe 0662 0257 | W | Execute Discrete,Raise 0663 0000 0000 | | .BLANK 0000[0x5] 0668 ; -------------------------------------------------------------------------------------- 0668 ; SUBPROGRAM 0668 ; -------------------------------------------------------------------------------------- 0668 066b | k | .CONST 0x066b ; Address of begin 0669 0004 | | .CONST 0x0004 ; Address of exception handler 066a 0001 | | .CONST 0x0001 ; Number of locals 066b BODY_0668: 066b INIT_0668: 066b 00cf | | Action Mark_Auxiliary 066c 4800 |H | Short_Literal 0x0 066d 4803 |H | Short_Literal 0x3 066e 00cf | | Action Mark_Auxiliary 066f 4800 |H | Short_Literal 0x0 0670 4803 |H | Short_Literal 0x3 0671 0007 | | Action Break_Optional 0672 5815 |X | Indirect_Literal Float,0x688,0.0 0673 00d9 | | Load_Top At_Offset_1 0674 e404 | | Load 0x2,0x4 0675 e5ff | | Load 0x2,-0x1 0676 01a6 | | Execute Matrix,Field_Write 0677 00c8 | | Action Pop_Auxiliary_Range 0678 37f9 |7 | Loop_Decreasing 0x672 0679 00ce | | Action Pop_Auxiliary 067a 5809 |X | Indirect_Literal Float,0x684,1.0 067b 00d9 | | Load_Top At_Offset_1 067c 00da | | Load_Top At_Offset_2 067d e5ff | | Load 0x2,-0x1 067e 01a6 | | Execute Matrix,Field_Write 067f 00c8 | | Action Pop_Auxiliary_Range 0680 37ed |7 | Loop_Decreasing 0x66e 0681 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0682 0000 0000 | | .XXX[0x2] 0684 3ff0 0000 |? | .DBL 1.0 0686 0000 0000 | | 0688 0000 0000 | | .DBL 0.0 068a 0000 0000 | | 068c 0000 0000 | | .BLANK 0000[0x4] 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 069e | | .CONST 0x069e ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0007 | | .CONST 0x0007 ; Number of locals 0693 INIT_0690: 0693 e00c | | Load 0x0,0xc 0694 0007 | | Action Break_Optional 0695 e00c | | Load 0x0,0xc 0696 0007 | | Action Break_Optional 0697 e00c | | Load 0x0,0xc 0698 0007 | | Action Break_Optional 0699 e01b | | Load 0x0,0x1b 069a 029f 0adb | | Declare_Subprogram INIT_0ad8,For_Call 069c 029f 0b03 | | Declare_Subprogram INIT_0b00,For_Call 069e BODY_0690: 069e e5fd | | Load 0x2,-0x3 069f e21b | | Load 0x1,0x1b 06a0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 06a1 4801 |H | Short_Literal 0x1 06a2 e5fd | | Load 0x2,-0x3 06a3 0253 | S | Execute Discrete,Binary_Scale 06a4 e21b | | Load 0x1,0x1b 06a5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 06a6 e229 | ) | Load 0x1,0x29 06a7 680a |h | Jump_Zero 0x6b2 06a8 e5fd | | Load 0x2,-0x3 06a9 0901 | | Execute_Immediate Binary_Scale,0x1 06aa 00d8 | | Load_Top At_Offset_0 06ab e00d | | Load 0x0,0xd 06ac 0260 | ` | Execute Discrete,In_Type 06ad 7001 |p | Jump_Nonzero 0x6af 06ae 0801 | | Execute_Immediate Raise,0x1 06af e21b | | Load 0x1,0x1b 06b0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 06b1 7803 |x | Jump 0x6b5 06b2 e5fd | | Load 0x2,-0x3 06b3 e21b | | Load 0x1,0x1b 06b4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 06b5 4801 |H | Short_Literal 0x1 06b6 e21b | | Load 0x1,0x1b 06b7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 06b8 0253 | S | Execute Discrete,Binary_Scale 06b9 e21b | | Load 0x1,0x1b 06ba 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 06bb 4800 |H | Short_Literal 0x0 06bc e21b | | Load 0x1,0x1b 06bd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 06be 0aff | | Execute_Immediate Plus,-0x1 06bf e216 | | Load 0x1,0x16 06c0 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 06c1 e21b | | Load 0x1,0x1b 06c2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 06c3 4800 |H | Short_Literal 0x0 06c4 e21b | | Load 0x1,0x1b 06c5 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 06c6 e229 | ) | Load 0x1,0x29 06c7 6803 |h | Jump_Zero 0x6cb 06c8 4802 |H | Short_Literal 0x2 06c9 a404 | | Store_Unchecked 0x2,0x4 06ca 7802 |x | Jump 0x6cd 06cb 4801 |H | Short_Literal 0x1 06cc a404 | | Store_Unchecked 0x2,0x4 06cd 00cf | | Action Mark_Auxiliary 06ce e404 | | Load 0x2,0x4 06cf 0aff | | Execute_Immediate Plus,-0x1 06d0 4800 |H | Short_Literal 0x0 06d1 0263 | c | Execute Discrete,Above_Bound 06d2 7003 |p | Jump_Nonzero 0x6d6 06d3 8406 | | Call 0x2,0x6 06d4 00c8 | | Action Pop_Auxiliary_Range 06d5 3ffd |? | Loop_Increasing 0x6d3 06d6 00ce | | Action Pop_Auxiliary 06d7 e221 | ! | Load 0x1,0x21 06d8 8020 | | Call 0x0,0x20 06d9 e221 | ! | Load 0x1,0x21 06da 8045 | E | Call 0x0,0x45 06db e225 | % | Load 0x1,0x25 06dc 017d | } | Execute Record,Structure_Write 06dd e225 | % | Load 0x1,0x25 06de e046 | F | Load 0x0,0x46 06df 017f | | Execute Record,Equal 06e0 6803 |h | Jump_Zero 0x6e4 06e1 0092 0c47 | G| Action Push_String_Extended,0xc47 ; "can't get default colormap" 06e3 823a | : | Call 0x1,0x3a 06e4 e21b | | Load 0x1,0x1b 06e5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 06e6 4800 |H | Short_Literal 0x0 06e7 4800 |H | Short_Literal 0x0 06e8 00da | | Load_Top At_Offset_2 06e9 035b | [ | Declare_Type Array,Constrained 06ea 00d0 | | Action Swap_Control 06eb 01cd | | Execute Vector,Slice_Reference 06ec e21b | | Load 0x1,0x1b 06ed 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 06ee 0229 | ) | Execute Access,All_Read 06ef e01b | | Load 0x0,0x1b 06f0 00da | | Load_Top At_Offset_2 06f1 00da | | Load_Top At_Offset_2 06f2 4800 |H | Short_Literal 0x0 06f3 e225 | % | Load 0x1,0x25 06f4 e221 | ! | Load 0x1,0x21 06f5 8047 | G | Call 0x0,0x47 06f6 00d2 | | Pop_Control Pop_Count_2 06f7 c405 | | Store 0x2,0x5 06f8 00d2 | | Pop_Control Pop_Count_2 06f9 00da | | Load_Top At_Offset_2 06fa 7003 |p | Jump_Nonzero 0x6fe 06fb 0092 0c48 | H| Action Push_String_Extended,0xc48 ; "can't allocate color planes" 06fd 823a | : | Call 0x1,0x3a 06fe e5ff | | Load 0x2,-0x1 06ff e220 | | Load 0x1,0x20 0700 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0701 e5fe | | Load 0x2,-0x2 0702 e21f | | Load 0x1,0x1f 0703 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0704 e220 | | Load 0x1,0x20 0705 e225 | % | Load 0x1,0x25 0706 e221 | ! | Load 0x1,0x21 0707 8048 | H | Call 0x0,0x48 0708 00d1 | | Pop_Control Pop_Count_1 0709 e21f | | Load 0x1,0x1f 070a e225 | % | Load 0x1,0x25 070b e221 | ! | Load 0x1,0x21 070c 8048 | H | Call 0x0,0x48 070d 00d1 | | Pop_Control Pop_Count_1 070e e21f | | Load 0x1,0x1f 070f 4800 |H | Short_Literal 0x0 0710 823e | > | Call 0x1,0x3e 0711 e220 | | Load 0x1,0x20 0712 4801 |H | Short_Literal 0x1 0713 823e | > | Call 0x1,0x3e 0714 00cf | | Action Mark_Auxiliary 0715 e404 | | Load 0x2,0x4 0716 0aff | | Execute_Immediate Plus,-0x1 0717 4800 |H | Short_Literal 0x0 0718 0263 | c | Execute Discrete,Above_Bound 0719 7003 |p | Jump_Nonzero 0x71d 071a 8407 | | Call 0x2,0x7 071b 00c8 | | Action Pop_Auxiliary_Range 071c 3ffd |? | Loop_Increasing 0x71a 071d 00ce | | Action Pop_Auxiliary 071e 4800 |H | Short_Literal 0x0 071f 8241 | A | Call 0x1,0x41 0720 4800 |H | Short_Literal 0x0 0721 4800 |H | Short_Literal 0x0 0722 e21b | | Load 0x1,0x1b 0723 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0724 01d5 | | Execute Vector,Field_Reference 0725 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0726 0227 | ' | Execute Access,All_Reference 0727 01d7 | | Execute Vector,Field_Read 0728 e226 | & | Load 0x1,0x26 0729 e221 | ! | Load 0x1,0x21 072a 8035 | 5 | Call 0x0,0x35 072b 4fff |O | Short_Literal -0x1 072c e226 | & | Load 0x1,0x26 072d e221 | ! | Load 0x1,0x21 072e 8049 | I | Call 0x0,0x49 072f e224 | $ | Load 0x1,0x24 0730 e223 | # | Load 0x1,0x23 0731 4800 |H | Short_Literal 0x0 0732 4800 |H | Short_Literal 0x0 0733 8243 | C | Call 0x1,0x43 0734 e22b | + | Load 0x1,0x2b 0735 00ba | | Action Initiate_Delay 0736 4800 |H | Short_Literal 0x0 0737 e221 | ! | Load 0x1,0x21 0738 8039 | 9 | Call 0x0,0x39 0739 e229 | ) | Load 0x1,0x29 073a 6803 |h | Jump_Zero 0x73e 073b 4801 |H | Short_Literal 0x1 073c 8240 | @ | Call 0x1,0x40 073d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 073e 4800 |H | Short_Literal 0x0 073f 8240 | @ | Call 0x1,0x40 0740 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0741 0000 0000 | | .BLANK 0000[0x7] 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 0753 | S | .CONST 0x0753 ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0003 | | .CONST 0x0003 ; Number of locals 074b INIT_0748: 074b e5fd | | Load 0x2,-0x3 074c 01dd | | Execute Vector,First 074d e00c | | Load 0x0,0xc 074e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 074f e5fc | | Load 0x2,-0x4 0750 01dd | | Execute Vector,First 0751 e00c | | Load 0x0,0xc 0752 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0753 BODY_0748: 0753 00cf | | Action Mark_Auxiliary 0754 e5ff | | Load 0x2,-0x1 0755 4801 |H | Short_Literal 0x1 0756 0263 | c | Execute Discrete,Above_Bound 0757 706b |pk | Jump_Nonzero 0x7c3 0758 e402 | | Load 0x2,0x2 0759 e5fd | | Load 0x2,-0x3 075a 01d5 | | Execute Vector,Field_Reference 075b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 075c 4800 |H | Short_Literal 0x0 075d 4800 |H | Short_Literal 0x0 075e e5fe | | Load 0x2,-0x2 075f 01a7 | | Execute Matrix,Field_Read 0760 023b | ; | Execute Float,Times 0761 e402 | | Load 0x2,0x2 0762 e5fd | | Load 0x2,-0x3 0763 01d5 | | Execute Vector,Field_Reference 0764 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0765 4800 |H | Short_Literal 0x0 0766 4801 |H | Short_Literal 0x1 0767 e5fe | | Load 0x2,-0x2 0768 01a7 | | Execute Matrix,Field_Read 0769 023b | ; | Execute Float,Times 076a 023d | = | Execute Float,Plus 076b e402 | | Load 0x2,0x2 076c e5fd | | Load 0x2,-0x3 076d 01d5 | | Execute Vector,Field_Reference 076e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 076f 4800 |H | Short_Literal 0x0 0770 4802 |H | Short_Literal 0x2 0771 e5fe | | Load 0x2,-0x2 0772 01a7 | | Execute Matrix,Field_Read 0773 023b | ; | Execute Float,Times 0774 023d | = | Execute Float,Plus 0775 e403 | | Load 0x2,0x3 0776 e5fc | | Load 0x2,-0x4 0777 01d5 | | Execute Vector,Field_Reference 0778 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0779 e402 | | Load 0x2,0x2 077a e5fd | | Load 0x2,-0x3 077b 01d5 | | Execute Vector,Field_Reference 077c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 077d 4801 |H | Short_Literal 0x1 077e 4800 |H | Short_Literal 0x0 077f e5fe | | Load 0x2,-0x2 0780 01a7 | | Execute Matrix,Field_Read 0781 023b | ; | Execute Float,Times 0782 e402 | | Load 0x2,0x2 0783 e5fd | | Load 0x2,-0x3 0784 01d5 | | Execute Vector,Field_Reference 0785 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0786 4801 |H | Short_Literal 0x1 0787 4801 |H | Short_Literal 0x1 0788 e5fe | | Load 0x2,-0x2 0789 01a7 | | Execute Matrix,Field_Read 078a 023b | ; | Execute Float,Times 078b 023d | = | Execute Float,Plus 078c e402 | | Load 0x2,0x2 078d e5fd | | Load 0x2,-0x3 078e 01d5 | | Execute Vector,Field_Reference 078f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0790 4801 |H | Short_Literal 0x1 0791 4802 |H | Short_Literal 0x2 0792 e5fe | | Load 0x2,-0x2 0793 01a7 | | Execute Matrix,Field_Read 0794 023b | ; | Execute Float,Times 0795 023d | = | Execute Float,Plus 0796 e403 | | Load 0x2,0x3 0797 e5fc | | Load 0x2,-0x4 0798 01d5 | | Execute Vector,Field_Reference 0799 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 079a e402 | | Load 0x2,0x2 079b e5fd | | Load 0x2,-0x3 079c 01d5 | | Execute Vector,Field_Reference 079d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 079e 4802 |H | Short_Literal 0x2 079f 4800 |H | Short_Literal 0x0 07a0 e5fe | | Load 0x2,-0x2 07a1 01a7 | | Execute Matrix,Field_Read 07a2 023b | ; | Execute Float,Times 07a3 e402 | | Load 0x2,0x2 07a4 e5fd | | Load 0x2,-0x3 07a5 01d5 | | Execute Vector,Field_Reference 07a6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07a7 4802 |H | Short_Literal 0x2 07a8 4801 |H | Short_Literal 0x1 07a9 e5fe | | Load 0x2,-0x2 07aa 01a7 | | Execute Matrix,Field_Read 07ab 023b | ; | Execute Float,Times 07ac 023d | = | Execute Float,Plus 07ad e402 | | Load 0x2,0x2 07ae e5fd | | Load 0x2,-0x3 07af 01d5 | | Execute Vector,Field_Reference 07b0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07b1 4802 |H | Short_Literal 0x2 07b2 4802 |H | Short_Literal 0x2 07b3 e5fe | | Load 0x2,-0x2 07b4 01a7 | | Execute Matrix,Field_Read 07b5 023b | ; | Execute Float,Times 07b6 023d | = | Execute Float,Plus 07b7 e403 | | Load 0x2,0x3 07b8 e5fc | | Load 0x2,-0x4 07b9 01d5 | | Execute Vector,Field_Reference 07ba 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 07bb e402 | | Load 0x2,0x2 07bc 0a01 | | Execute_Immediate Plus,0x1 07bd c402 | | Store 0x2,0x2 07be 00db | | Load_Top At_Offset_3 07bf 0a01 | | Execute_Immediate Plus,0x1 07c0 c403 | | Store 0x2,0x3 07c1 00c8 | | Action Pop_Auxiliary_Range 07c2 3f95 |? | Loop_Increasing 0x758 07c3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 07c4 0000 0000 | | .BLANK 0000[0x4] 07c8 ; -------------------------------------------------------------------------------------- 07c8 ; SUBPROGRAM 07c8 ; -------------------------------------------------------------------------------------- 07c8 07d2 | | .CONST 0x07d2 ; Address of begin 07c9 0004 | | .CONST 0x0004 ; Address of exception handler 07ca 0005 | | .CONST 0x0005 ; Number of locals 07cb INIT_07c8: 07cb e00c | | Load 0x0,0xc 07cc 0007 | | Action Break_Optional 07cd e00d | | Load 0x0,0xd 07ce 0007 | | Action Break_Optional 07cf e00c | | Load 0x0,0xc 07d0 029f 0bf3 | | Declare_Subprogram INIT_0bf0,For_Call 07d2 BODY_07c8: 07d2 e229 | ) | Load 0x1,0x29 07d3 6803 |h | Jump_Zero 0x7d7 07d4 4802 |H | Short_Literal 0x2 07d5 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 07d6 7802 |x | Jump 0x7d9 07d7 4801 |H | Short_Literal 0x1 07d8 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 07d9 00cf | | Action Mark_Auxiliary 07da 00da | | Load_Top At_Offset_2 07db 0aff | | Execute_Immediate Plus,-0x1 07dc 4800 |H | Short_Literal 0x0 07dd 0263 | c | Execute Discrete,Above_Bound 07de 7003 |p | Jump_Nonzero 0x7e2 07df 8405 | | Call 0x2,0x5 07e0 00c8 | | Action Pop_Auxiliary_Range 07e1 3ffd |? | Loop_Increasing 0x7df 07e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 07e3 0000 0000 | | .BLANK 0000[0x5] 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07f5 | | .CONST 0x07f5 ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0004 | | .CONST 0x0004 ; Number of locals 07eb INIT_07e8: 07eb e01b | | Load 0x0,0x1b 07ec 0007 | | Action Break_Optional 07ed e00f | | Load 0x0,0xf 07ee 0322 | " | Declare_Variable Record 07ef 00d8 | | Load_Top At_Offset_0 07f0 1c00 | | Execute_Immediate Run_Utility,0x0 07f1 e00f | | Load 0x0,0xf 07f2 0322 | " | Declare_Variable Record 07f3 00d8 | | Load_Top At_Offset_0 07f4 1c00 | | Execute_Immediate Run_Utility,0x0 07f5 BODY_07e8: 07f5 e01b | | Load 0x0,0x1b 07f6 00d9 | | Load_Top At_Offset_1 07f7 00db | | Load_Top At_Offset_3 07f8 e5fe | | Load 0x2,-0x2 07f9 e225 | % | Load 0x1,0x25 07fa e221 | ! | Load 0x1,0x21 07fb 804a | J | Call 0x0,0x4a 07fc 00d2 | | Pop_Control Pop_Count_2 07fd 005b | [ | Store_Top Discrete,At_Offset_3 07fe 00da | | Load_Top At_Offset_2 07ff 7006 |p | Jump_Nonzero 0x806 0800 0092 0c49 | I| Action Push_String_Extended,0xc49 ; "no such color " 0802 e5fe | | Load 0x2,-0x2 0803 801f | | Call 0x0,0x1f 0804 01cc | | Execute Vector,Catenate 0805 823a | : | Call 0x1,0x3a 0806 00d8 | | Load_Top At_Offset_0 0807 e5ff | | Load 0x2,-0x1 0808 823e | > | Call 0x1,0x3e 0809 4503 |E | Exit_Suprogram New_Top_Offset 0x3 080a 0000 0000 | | .BLANK 0000[0x6] 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 0813 | | .CONST 0x0813 ; Address of begin 0811 0004 | | .CONST 0x0004 ; Address of exception handler 0812 0001 | | .CONST 0x0001 ; Number of locals 0813 BODY_0810: 0813 INIT_0810: 0813 00da | | Load_Top At_Offset_2 0814 e21b | | Load 0x1,0x1b 0815 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0816 e21b | | Load 0x1,0x1b 0817 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0818 e21b | | Load 0x1,0x1b 0819 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 081a 01d5 | | Execute Vector,Field_Reference 081b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 081c 0227 | ' | Execute Access,All_Reference 081d e225 | % | Load 0x1,0x25 081e e221 | ! | Load 0x1,0x21 081f 804b | K | Call 0x0,0x4b 0820 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0821 0000 0000 | | .BLANK 0000[0x7] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 0831 | 1 | .CONST 0x0831 ; Address of begin 0829 0004 | | .CONST 0x0004 ; Address of exception handler 082a 0003 | | .CONST 0x0003 ; Number of locals 082b INIT_0828: 082b e019 | | Load 0x0,0x19 082c 0322 | " | Declare_Variable Record 082d 00d8 | | Load_Top At_Offset_0 082e 1c00 | | Execute_Immediate Run_Utility,0x0 082f e037 | 7 | Load 0x0,0x37 0830 0337 | 7 | Declare_Variable Array 0831 BODY_0828: 0831 e5ff | | Load 0x2,-0x1 0832 e21b | | Load 0x1,0x1b 0833 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0834 e21b | | Load 0x1,0x1b 0835 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0836 e21b | | Load 0x1,0x1b 0837 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0838 01d5 | | Execute Vector,Field_Reference 0839 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 083a 00da | | Load_Top At_Offset_2 083b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 083c e21b | | Load 0x1,0x1b 083d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 083e 0aff | | Execute_Immediate Plus,-0x1 083f e21b | | Load 0x1,0x1b 0840 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0841 e21b | | Load 0x1,0x1b 0842 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0843 01d5 | | Execute Vector,Field_Reference 0844 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0845 0227 | ' | Execute Access,All_Reference 0846 01d7 | | Execute Vector,Field_Read 0847 00da | | Load_Top At_Offset_2 0848 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0849 4800 |H | Short_Literal 0x0 084a e21b | | Load 0x1,0x1b 084b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 084c e21b | | Load 0x1,0x1b 084d 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 084e 01d5 | | Execute Vector,Field_Reference 084f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0850 0227 | ' | Execute Access,All_Reference 0851 01d7 | | Execute Vector,Field_Read 0852 00da | | Load_Top At_Offset_2 0853 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0854 e037 | 7 | Load 0x0,0x37 0855 0337 | 7 | Declare_Variable Array 0856 4801 |H | Short_Literal 0x1 0857 481d |H | Short_Literal 0x1d 0858 00da | | Load_Top At_Offset_2 0859 01d6 | | Execute Vector,Field_Write 085a 4801 |H | Short_Literal 0x1 085b 481c |H | Short_Literal 0x1c 085c 00da | | Load_Top At_Offset_2 085d 01d6 | | Execute Vector,Field_Write 085e 481b |H | Short_Literal 0x1b 085f 4800 |H | Short_Literal 0x0 0860 4800 |H | Short_Literal 0x0 0861 00d9 | | Load_Top At_Offset_1 0862 e404 | | Load 0x2,0x4 0863 01d6 | | Execute Vector,Field_Write 0864 3ffb |? | Loop_Increasing 0x860 0865 4800 |H | Short_Literal 0x0 0866 481e |H | Short_Literal 0x1e 0867 00da | | Load_Top At_Offset_2 0868 01d6 | | Execute Vector,Field_Write 0869 4800 |H | Short_Literal 0x0 086a 481f |H | Short_Literal 0x1f 086b 00da | | Load_Top At_Offset_2 086c 01d6 | | Execute Vector,Field_Write 086d e037 | 7 | Load 0x0,0x37 086e 01c3 | | Execute Vector,Check_In_Type 086f 00d9 | | Load_Top At_Offset_1 0870 01d4 | | Execute Vector,Structure_Write 0871 e229 | ) | Load 0x1,0x29 0872 6804 |h | Jump_Zero 0x877 0873 4801 |H | Short_Literal 0x1 0874 481e |H | Short_Literal 0x1e 0875 00da | | Load_Top At_Offset_2 0876 01d6 | | Execute Vector,Field_Write 0877 00d9 | | Load_Top At_Offset_1 0878 00d9 | | Load_Top At_Offset_1 0879 e226 | & | Load 0x1,0x26 087a e221 | ! | Load 0x1,0x21 087b 8038 | 8 | Call 0x0,0x38 087c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 087d 0000 0000 | | .XXX[0x3] 087f 0000 | | 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0896 | | .CONST 0x0896 ; Address of begin 0881 0004 | | .CONST 0x0004 ; Address of exception handler 0882 0002 | | .CONST 0x0002 ; Number of locals 0883 INIT_0880: 0883 4801 |H | Short_Literal 0x1 0884 e5fe | | Load 0x2,-0x2 0885 00e9 | | Load_Encached String_Cache 0886 035b | [ | Declare_Type Array,Constrained 0887 0337 | 7 | Declare_Variable Array 0888 00d8 | | Load_Top At_Offset_0 0889 0335 | 5 | Declare_Variable Array,Duplicate 088a 00cd | | Action Spare6_Action 088b 00d9 | | Load_Top At_Offset_1 088c 01d9 | | Execute Vector,Reverse_Bounds 088d 0263 | c | Execute Discrete,Above_Bound 088e 7005 |p | Jump_Nonzero 0x894 088f 4820 |H | Short_Literal 0x20 0890 00d9 | | Load_Top At_Offset_1 0891 e403 | | Load 0x2,0x3 0892 01d6 | | Execute Vector,Field_Write 0893 3ffb |? | Loop_Increasing 0x88f 0894 00d9 | | Load_Top At_Offset_1 0895 01d4 | | Execute Vector,Structure_Write 0896 BODY_0880: 0896 00db | | Load_Top At_Offset_3 0897 01db | | Execute Vector,Length 0898 e5fe | | Load 0x2,-0x2 0899 027c | | | Execute Discrete,Less 089a 680c |h | Jump_Zero 0x8a7 089b 00db | | Load_Top At_Offset_3 089c 4801 |H | Short_Literal 0x1 089d e5ff | | Load 0x2,-0x1 089e 01db | | Execute Vector,Length 089f 00d8 | | Load_Top At_Offset_0 08a0 00e2 | | Load_Encached Integer_Cache 08a1 0260 | ` | Execute Discrete,In_Type 08a2 7001 |p | Jump_Nonzero 0x8a4 08a3 0801 | | Execute_Immediate Raise,0x1 08a4 00db | | Load_Top At_Offset_3 08a5 01ce | | Execute Vector,Slice_Write 08a6 7810 |x | Jump 0x8b7 08a7 00db | | Load_Top At_Offset_3 08a8 01dd | | Execute Vector,First 08a9 e5ff | | Load 0x2,-0x1 08aa 01dd | | Execute Vector,First 08ab 0aff | | Execute_Immediate Plus,-0x1 08ac e5fe | | Load 0x2,-0x2 08ad 0273 | s | Execute Discrete,Plus 08ae 00d8 | | Load_Top At_Offset_0 08af 00e2 | | Load_Encached Integer_Cache 08b0 0260 | ` | Execute Discrete,In_Type 08b1 7001 |p | Jump_Nonzero 0x8b3 08b2 0801 | | Execute_Immediate Raise,0x1 08b3 e5ff | | Load 0x2,-0x1 08b4 01cf | | Execute Vector,Slice_Read 08b5 00d9 | | Load_Top At_Offset_1 08b6 01d4 | | Execute Vector,Structure_Write 08b7 00d8 | | Load_Top At_Offset_0 08b8 00e9 | | Load_Encached String_Cache 08b9 01c6 | | Execute Vector,Convert_To_Formal 08ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08bb 0000 0000 | | .BLANK 0000[0x5] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08c3 | | .CONST 0x08c3 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0001 | | .CONST 0x0001 ; Number of locals 08c3 BODY_08c0: 08c3 INIT_08c0: 08c3 e229 | ) | Load 0x1,0x29 08c4 7002 |p | Jump_Nonzero 0x8c7 08c5 e22e | . | Load 0x1,0x2e 08c6 6816 |h | Jump_Zero 0x8dd 08c7 4800 |H | Short_Literal 0x0 08c8 e21b | | Load 0x1,0x1b 08c9 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 08ca e21b | | Load 0x1,0x1b 08cb 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 08cc 01d5 | | Execute Vector,Field_Reference 08cd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 08ce 0227 | ' | Execute Access,All_Reference 08cf 01d7 | | Execute Vector,Field_Read 08d0 e226 | & | Load 0x1,0x26 08d1 e221 | ! | Load 0x1,0x21 08d2 8034 | 4 | Call 0x0,0x34 08d3 e5fc | | Load 0x2,-0x4 08d4 e5fd | | Load 0x2,-0x3 08d5 e5fe | | Load 0x2,-0x2 08d6 e5ff | | Load 0x2,-0x1 08d7 e226 | & | Load 0x1,0x26 08d8 e222 | " | Load 0x1,0x22 08d9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 08da e221 | ! | Load 0x1,0x21 08db 804c | L | Call 0x0,0x4c 08dc 4505 |E | Exit_Suprogram New_Top_Offset 0x5 08dd 4800 |H | Short_Literal 0x0 08de e5fc | | Load 0x2,-0x4 08df e5fd | | Load 0x2,-0x3 08e0 e5fe | | Load 0x2,-0x2 08e1 e5ff | | Load 0x2,-0x1 08e2 e222 | " | Load 0x1,0x22 08e3 e221 | ! | Load 0x1,0x21 08e4 804d | M | Call 0x0,0x4d 08e5 4505 |E | Exit_Suprogram New_Top_Offset 0x5 08e6 0000 0000 | | .XXX[0x2] 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; SUBPROGRAM 08e8 ; -------------------------------------------------------------------------------------- 08e8 08f3 | | .CONST 0x08f3 ; Address of begin 08e9 0004 | | .CONST 0x0004 ; Address of exception handler 08ea 0003 | | .CONST 0x0003 ; Number of locals 08eb INIT_08e8: 08eb e04e | N | Load 0x0,0x4e 08ec 1812 | | Execute Package,Field_Execute,Field_Number 0x12 08ed e04e | N | Load 0x0,0x4e 08ee 1816 | | Execute Package,Field_Execute,Field_Number 0x16 08ef e04e | N | Load 0x0,0x4e 08f0 1b11 | | Execute Package,Field_Read,Field_Number 0x11 08f1 03f1 | | Declare_Variable Discrete,With_Value 08f2 00e3 | | Load_Encached Natural_Cache 08f3 BODY_08e8: 08f3 00d9 | | Load_Top At_Offset_1 08f4 602f |`/ | Indirect_Literal Discrete,0x924,{0x00000000, 0x00320000} 08f5 0270 | p | Execute Discrete,Divide 08f6 00d8 | | Load_Top At_Offset_0 08f7 00e3 | | Load_Encached Natural_Cache 08f8 0260 | ` | Execute Discrete,In_Type 08f9 7001 |p | Jump_Nonzero 0x8fb 08fa 0801 | | Execute_Immediate Raise,0x1 08fb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 08fc 00d9 | | Load_Top At_Offset_1 08fd 4ff1 |O | Short_Literal -0xf 08fe 00da | | Load_Top At_Offset_2 08ff 090f | | Execute_Immediate Binary_Scale,0xf 0900 6023 |`# | Indirect_Literal Discrete,0x924,{0x00000000, 0x00320000} 0901 0141 | A | Execute Discrete,Multiply_And_Scale 0902 00d8 | | Load_Top At_Offset_0 0903 00e7 | | Load_Encached Duration_Cache 0904 0260 | ` | Execute Discrete,In_Type 0905 7001 |p | Jump_Nonzero 0x907 0906 0801 | | Execute_Immediate Raise,0x1 0907 0272 | r | Execute Discrete,Minus 0908 00d8 | | Load_Top At_Offset_0 0909 e04e | N | Load 0x0,0x4e 090a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 090b 0260 | ` | Execute Discrete,In_Type 090c 7001 |p | Jump_Nonzero 0x90e 090d 0801 | | Execute_Immediate Raise,0x1 090e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 090f 00d9 | | Load_Top At_Offset_1 0910 0237 | 7 | Execute Float,Convert_From_Discrete 0911 580e |X | Indirect_Literal Float,0x920,3.0517578125e-05 0912 023b | ; | Execute Float,Times 0913 5808 |X | Indirect_Literal Float,0x91c,21262214.0 0914 023b | ; | Execute Float,Times 0915 0235 | 5 | Execute Float,Round_To_Discrete 0916 e00c | | Load 0x0,0xc 0917 025e | ^ | Execute Discrete,Convert 0918 804f | O | Call 0x0,0x4f 0919 a20f | | Store_Unchecked 0x1,0xf 091a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 091b 0000 | | .XXX[0x1] 091c 4174 46f8 |AtF | .DBL 21262214.0 091e 6000 0000 |` | 0920 3f00 0000 |? | .DBL 3.0517578125e-05 0922 0000 0000 | | 0924 0000 0000 | | .LITERAL {0x00000000, 0x00320000} 0928 ; -------------------------------------------------------------------------------------- 0928 ; SUBPROGRAM 0928 ; -------------------------------------------------------------------------------------- 0928 092d | - | .CONST 0x092d ; Address of begin 0929 0004 | | .CONST 0x0004 ; Address of exception handler 092a 0002 | | .CONST 0x0002 ; Number of locals 092b INIT_0928: 092b e00c | | Load 0x0,0xc 092c 0007 | | Action Break_Optional 092d BODY_0928: 092d 4800 |H | Short_Literal 0x0 092e a22c | , | Store_Unchecked 0x1,0x2c 092f 00cf | | Action Mark_Auxiliary 0930 e5f9 | | Load 0x2,-0x7 0931 01d9 | | Execute Vector,Reverse_Bounds 0932 0263 | c | Execute Discrete,Above_Bound 0933 700a |p | Jump_Nonzero 0x93e 0934 00d8 | | Load_Top At_Offset_0 0935 e5f9 | | Load 0x2,-0x7 0936 01d7 | | Execute Vector,Field_Read 0937 0f2c | , | Execute_Immediate Equal,0x2c 0938 6803 |h | Jump_Zero 0x93c 0939 e22c | , | Load 0x1,0x2c 093a 0a01 | | Execute_Immediate Plus,0x1 093b c22c | , | Store 0x1,0x2c 093c 00c8 | | Action Pop_Auxiliary_Range 093d 3ff6 |? | Loop_Increasing 0x934 093e 00ce | | Action Pop_Auxiliary 093f e5f9 | | Load 0x2,-0x7 0940 01db | | Execute Vector,Length 0941 0c01 | | Execute_Immediate Greater_Equal,0x1 0942 683b |h; | Jump_Zero 0x97e 0943 4800 |H | Short_Literal 0x0 0944 e22c | , | Load 0x1,0x2c 0945 e217 | | Load 0x1,0x17 0946 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0947 a22d | - | Store_Unchecked 0x1,0x2d 0948 4800 |H | Short_Literal 0x0 0949 a22c | , | Store_Unchecked 0x1,0x2c 094a e5f9 | | Load 0x2,-0x7 094b 01dd | | Execute Vector,First 094c 0059 | Y | Store_Top Discrete,At_Offset_1 094d 00cf | | Action Mark_Auxiliary 094e e5f9 | | Load 0x2,-0x7 094f 01d9 | | Execute Vector,Reverse_Bounds 0950 0263 | c | Execute Discrete,Above_Bound 0951 702b |p+ | Jump_Nonzero 0x97d 0952 00d8 | | Load_Top At_Offset_0 0953 e5f9 | | Load 0x2,-0x7 0954 01d7 | | Execute Vector,Field_Read 0955 0f2c | , | Execute_Immediate Equal,0x2c 0956 6812 |h | Jump_Zero 0x969 0957 00db | | Load_Top At_Offset_3 0958 00d9 | | Load_Top At_Offset_1 0959 0aff | | Execute_Immediate Plus,-0x1 095a e5f9 | | Load 0x2,-0x7 095b 01cf | | Execute Vector,Slice_Read 095c e050 | P | Load 0x0,0x50 095d 03b6 | | Declare_Variable Access,By_Allocation,With_Value 095e e22c | , | Load 0x1,0x2c 095f e22d | - | Load 0x1,0x2d 0960 0227 | ' | Execute Access,All_Reference 0961 01d6 | | Execute Vector,Field_Write 0962 00d8 | | Load_Top At_Offset_0 0963 0a01 | | Execute_Immediate Plus,0x1 0964 c602 | | Store 0x3,0x2 0965 e22c | , | Load 0x1,0x2c 0966 0a01 | | Execute_Immediate Plus,0x1 0967 c22c | , | Store 0x1,0x2c 0968 7812 |x | Jump 0x97b 0969 00d8 | | Load_Top At_Offset_0 096a e5f9 | | Load 0x2,-0x7 096b 01dc | | Execute Vector,Last 096c 027f | | Execute Discrete,Equal 096d 680d |h | Jump_Zero 0x97b 096e 00db | | Load_Top At_Offset_3 096f 00d9 | | Load_Top At_Offset_1 0970 e5f9 | | Load 0x2,-0x7 0971 01cf | | Execute Vector,Slice_Read 0972 e050 | P | Load 0x0,0x50 0973 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0974 e22c | , | Load 0x1,0x2c 0975 e22d | - | Load 0x1,0x2d 0976 0227 | ' | Execute Access,All_Reference 0977 01d6 | | Execute Vector,Field_Write 0978 e22c | , | Load 0x1,0x2c 0979 0a01 | | Execute_Immediate Plus,0x1 097a c22c | , | Store 0x1,0x2c 097b 00c8 | | Action Pop_Auxiliary_Range 097c 3fd5 |? | Loop_Increasing 0x952 097d 00ce | | Action Pop_Auxiliary 097e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 097f 0000 | | .XXX[0x1] 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0985 | | .CONST 0x0985 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0002 | | .CONST 0x0002 ; Number of locals 0983 INIT_0980: 0983 e051 | Q | Load 0x0,0x51 0984 0337 | 7 | Declare_Variable Array 0985 BODY_0980: 0985 00d8 | | Load_Top At_Offset_0 0986 e407 | | Load 0x2,0x7 0987 e406 | | Load 0x2,0x6 0988 e405 | | Load 0x2,0x5 0989 e404 | | Load 0x2,0x4 098a e5fb | | Load 0x2,-0x5 098b 8052 | R | Call 0x0,0x52 098c c404 | | Store 0x2,0x4 098d c405 | | Store 0x2,0x5 098e c406 | | Store 0x2,0x6 098f c407 | | Store 0x2,0x7 0990 00d1 | | Pop_Control Pop_Count_1 0991 481b |H | Short_Literal 0x1b 0992 00d9 | | Load_Top At_Offset_1 0993 01d7 | | Execute Vector,Field_Read 0994 6813 |h | Jump_Zero 0x9a8 0995 e221 | ! | Load 0x1,0x21 0996 8020 | | Call 0x0,0x20 0997 e221 | ! | Load 0x1,0x21 0998 8024 | $ | Call 0x0,0x24 0999 00d8 | | Load_Top At_Offset_0 099a e00b | | Load 0x0,0xb 099b 0260 | ` | Execute Discrete,In_Type 099c 7001 |p | Jump_Nonzero 0x99e 099d 0801 | | Execute_Immediate Raise,0x1 099e e404 | | Load 0x2,0x4 099f 0272 | r | Execute Discrete,Minus 09a0 e406 | | Load 0x2,0x6 09a1 00d8 | | Load_Top At_Offset_0 09a2 e00b | | Load 0x0,0xb 09a3 0260 | ` | Execute Discrete,In_Type 09a4 7001 |p | Jump_Nonzero 0x9a6 09a5 0801 | | Execute_Immediate Raise,0x1 09a6 0272 | r | Execute Discrete,Minus 09a7 c404 | | Store 0x2,0x4 09a8 481a |H | Short_Literal 0x1a 09a9 00d9 | | Load_Top At_Offset_1 09aa 01d7 | | Execute Vector,Field_Read 09ab 6813 |h | Jump_Zero 0x9bf 09ac e221 | ! | Load 0x1,0x21 09ad 8020 | | Call 0x0,0x20 09ae e221 | ! | Load 0x1,0x21 09af 8025 | % | Call 0x0,0x25 09b0 00d8 | | Load_Top At_Offset_0 09b1 e00b | | Load 0x0,0xb 09b2 0260 | ` | Execute Discrete,In_Type 09b3 7001 |p | Jump_Nonzero 0x9b5 09b4 0801 | | Execute_Immediate Raise,0x1 09b5 e405 | | Load 0x2,0x5 09b6 0272 | r | Execute Discrete,Minus 09b7 e407 | | Load 0x2,0x7 09b8 00d8 | | Load_Top At_Offset_0 09b9 e00b | | Load 0x0,0xb 09ba 0260 | ` | Execute Discrete,In_Type 09bb 7001 |p | Jump_Nonzero 0x9bd 09bc 0801 | | Execute_Immediate Raise,0x1 09bd 0272 | r | Execute Discrete,Minus 09be c405 | | Store 0x2,0x5 09bf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09c0 ; -------------------------------------------------------------------------------------- 09c0 ; SUBPROGRAM 09c0 ; -------------------------------------------------------------------------------------- 09c0 09c6 | | .CONST 0x09c6 ; Address of begin 09c1 0004 | | .CONST 0x0004 ; Address of exception handler 09c2 0003 | | .CONST 0x0003 ; Number of locals 09c3 INIT_09c0: 09c3 e00c | | Load 0x0,0xc 09c4 0007 | | Action Break_Optional 09c5 00e3 | | Load_Encached Natural_Cache 09c6 BODY_09c0: 09c6 4800 |H | Short_Literal 0x0 09c7 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09c8 e22c | , | Load 0x1,0x2c 09c9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 09ca 00cf | | Action Mark_Auxiliary 09cb 7807 |x | Jump 0x9d3 09cc 00d9 | | Load_Top At_Offset_1 09cd 0a01 | | Execute_Immediate Plus,0x1 09ce 005a | Z | Store_Top Discrete,At_Offset_2 09cf 00da | | Load_Top At_Offset_2 09d0 09ff | | Execute_Immediate Binary_Scale,-0x1 09d1 005b | [ | Store_Top Discrete,At_Offset_3 09d2 00c9 | | Action Pop_Auxiliary_Loop 09d3 00da | | Load_Top At_Offset_2 09d4 77f7 |w | Jump_Nonzero 0x9cc 09d5 00ce | | Action Pop_Auxiliary 09d6 00d8 | | Load_Top At_Offset_0 09d7 e403 | | Load 0x2,0x3 09d8 e402 | | Load 0x2,0x2 09d9 823c | < | Call 0x1,0x3c 09da 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09db 0000 0000 | | .BLANK 0000[0x5] 09e0 ; -------------------------------------------------------------------------------------- 09e0 ; SUBPROGRAM 09e0 ; -------------------------------------------------------------------------------------- 09e0 09e6 | | .CONST 0x09e6 ; Address of begin 09e1 0004 | | .CONST 0x0004 ; Address of exception handler 09e2 0003 | | .CONST 0x0003 ; Number of locals 09e3 INIT_09e0: 09e3 e00b | | Load 0x0,0xb 09e4 0007 | | Action Break_Optional 09e5 e00b | | Load 0x0,0xb 09e6 BODY_09e0: 09e6 00cf | | Action Mark_Auxiliary 09e7 0007 | | Action Break_Optional 09e8 e221 | ! | Load 0x1,0x21 09e9 8053 | S | Call 0x0,0x53 09ea 680e |h | Jump_Zero 0x9f9 09eb e411 | | Load 0x2,0x11 09ec e221 | ! | Load 0x1,0x21 09ed 8054 | T | Call 0x0,0x54 09ee 00d1 | | Pop_Control Pop_Count_1 09ef e411 | | Load 0x2,0x11 09f0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 09f1 0f04 | | Execute_Immediate Equal,0x4 09f2 6806 |h | Jump_Zero 0x9f9 09f3 e411 | | Load 0x2,0x11 09f4 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 09f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09f6 0f02 | | Execute_Immediate Equal,0x2 09f7 6801 |h | Jump_Zero 0x9f9 09f8 7844 |xD | Jump 0xa3d 09f9 e40b | | Load 0x2,0xb 09fa 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 09fb e40c | | Load 0x2,0xc 09fc 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 09fd e40b | | Load 0x2,0xb 09fe e40d | | Load 0x2,0xd 09ff 0273 | s | Execute Discrete,Plus 0a00 c40b | | Store 0x2,0xb 0a01 e40b | | Load 0x2,0xb 0a02 0d00 | | Execute_Immediate Less,0x0 0a03 700b |p | Jump_Nonzero 0xa0f 0a04 e40b | | Load 0x2,0xb 0a05 00d8 | | Load_Top At_Offset_0 0a06 e012 | | Load 0x0,0x12 0a07 0260 | ` | Execute Discrete,In_Type 0a08 7001 |p | Jump_Nonzero 0xa0a 0a09 0801 | | Execute_Immediate Raise,0x1 0a0a e40f | | Load 0x2,0xf 0a0b 0273 | s | Execute Discrete,Plus 0a0c e406 | | Load 0x2,0x6 0a0d 027d | } | Execute Discrete,Greater 0a0e 6808 |h | Jump_Zero 0xa17 0a0f e40b | | Load 0x2,0xb 0a10 e40d | | Load 0x2,0xd 0a11 0901 | | Execute_Immediate Binary_Scale,0x1 0a12 0272 | r | Execute Discrete,Minus 0a13 c40b | | Store 0x2,0xb 0a14 e40d | | Load 0x2,0xd 0a15 0275 | u | Execute Discrete,Unary_Minus 0a16 c40d | | Store 0x2,0xd 0a17 e40c | | Load 0x2,0xc 0a18 e40e | | Load 0x2,0xe 0a19 0273 | s | Execute Discrete,Plus 0a1a c40c | | Store 0x2,0xc 0a1b e40c | | Load 0x2,0xc 0a1c 0d00 | | Execute_Immediate Less,0x0 0a1d 700b |p | Jump_Nonzero 0xa29 0a1e e40c | | Load 0x2,0xc 0a1f 00d8 | | Load_Top At_Offset_0 0a20 e012 | | Load 0x0,0x12 0a21 0260 | ` | Execute Discrete,In_Type 0a22 7001 |p | Jump_Nonzero 0xa24 0a23 0801 | | Execute_Immediate Raise,0x1 0a24 e410 | | Load 0x2,0x10 0a25 0273 | s | Execute Discrete,Plus 0a26 e407 | | Load 0x2,0x7 0a27 027d | } | Execute Discrete,Greater 0a28 6808 |h | Jump_Zero 0xa31 0a29 e40c | | Load 0x2,0xc 0a2a e40e | | Load 0x2,0xe 0a2b 0901 | | Execute_Immediate Binary_Scale,0x1 0a2c 0272 | r | Execute Discrete,Minus 0a2d c40c | | Store 0x2,0xc 0a2e e40e | | Load 0x2,0xe 0a2f 0275 | u | Execute Discrete,Unary_Minus 0a30 c40e | | Store 0x2,0xe 0a31 00d9 | | Load_Top At_Offset_1 0a32 00db | | Load_Top At_Offset_3 0a33 e410 | | Load 0x2,0x10 0a34 e40f | | Load 0x2,0xf 0a35 e40c | | Load 0x2,0xc 0a36 e40b | | Load 0x2,0xb 0a37 e226 | & | Load 0x1,0x26 0a38 e222 | " | Load 0x1,0x22 0a39 e40a | | Load 0x2,0xa 0a3a 8236 | 6 | Call 0x1,0x36 0a3b 00c9 | | Action Pop_Auxiliary_Loop 0a3c 7fab | | Jump 0x9e8 0a3d 00ce | | Action Pop_Auxiliary 0a3e e221 | ! | Load 0x1,0x21 0a3f 8055 | U | Call 0x0,0x55 0a40 c221 | ! | Store 0x1,0x21 0a41 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a42 0000 0000 | | .BLANK 0000[0x6] 0a48 ; -------------------------------------------------------------------------------------- 0a48 ; SUBPROGRAM 0a48 ; -------------------------------------------------------------------------------------- 0a48 0a4f | O | .CONST 0x0a4f ; Address of begin 0a49 0004 | | .CONST 0x0004 ; Address of exception handler 0a4a 0003 | | .CONST 0x0003 ; Number of locals 0a4b INIT_0a48: 0a4b e210 | | Load 0x1,0x10 0a4c 0337 | 7 | Declare_Variable Array 0a4d e210 | | Load 0x1,0x10 0a4e 0337 | 7 | Declare_Variable Array 0a4f BODY_0a48: 0a4f 00d9 | | Load_Top At_Offset_1 0a50 582b |X+ | Indirect_Literal Float,0xa7c,0.08726666666666666 0a51 4878 |Hx | Short_Literal 0x78 0a52 8238 | 8 | Call 0x1,0x38 0a53 00d1 | | Pop_Control Pop_Count_1 0a54 00d8 | | Load_Top At_Offset_0 0a55 5826 |X& | Indirect_Literal Float,0xa7c,0.08726666666666666 0a56 4879 |Hy | Short_Literal 0x79 0a57 8238 | 8 | Call 0x1,0x38 0a58 00d1 | | Pop_Control Pop_Count_1 0a59 e230 | 0 | Load 0x1,0x30 0a5a 00d9 | | Load_Top At_Offset_1 0a5b 00db | | Load_Top At_Offset_3 0a5c 8235 | 5 | Call 0x1,0x35 0a5d 00d1 | | Pop_Control Pop_Count_1 0a5e e402 | | Load 0x2,0x2 0a5f 0227 | ' | Execute Access,All_Reference 0a60 4800 |H | Short_Literal 0x0 0a61 e403 | | Load 0x2,0x3 0a62 0aff | | Execute_Immediate Plus,-0x1 0a63 4800 |H | Short_Literal 0x0 0a64 e231 | 1 | Load 0x1,0x31 0a65 01d5 | | Execute Vector,Field_Reference 0a66 01ce | | Execute Vector,Slice_Write 0a67 4800 |H | Short_Literal 0x0 0a68 a232 | 2 | Store_Unchecked 0x1,0x32 0a69 e5fa | | Load 0x2,-0x6 0a6a 0237 | 7 | Execute Float,Convert_From_Discrete 0a6b 580c |X | Indirect_Literal Float,0xa78,2.0 0a6c 023a | : | Execute Float,Divide 0a6d a233 | 3 | Store_Unchecked 0x1,0x33 0a6e e5f9 | | Load 0x2,-0x7 0a6f 0237 | 7 | Execute Float,Convert_From_Discrete 0a70 5807 |X | Indirect_Literal Float,0xa78,2.0 0a71 023a | : | Execute Float,Divide 0a72 a234 | 4 | Store_Unchecked 0x1,0x34 0a73 4801 |H | Short_Literal 0x1 0a74 a227 | ' | Store_Unchecked 0x1,0x27 0a75 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a76 0000 0000 | | .XXX[0x2] 0a78 4000 0000 |@ | .DBL 2.0 0a7a 0000 0000 | | 0a7c 3fb6 571b |? W | .DBL 0.08726666666666666 0a7e b75d 4094 | ]@ | 0a80 ; -------------------------------------------------------------------------------------- 0a80 ; SUBPROGRAM 0a80 ; -------------------------------------------------------------------------------------- 0a80 0a85 | | .CONST 0x0a85 ; Address of begin 0a81 0004 | | .CONST 0x0004 ; Address of exception handler 0a82 0003 | | .CONST 0x0003 ; Number of locals 0a83 INIT_0a80: 0a83 00e8 | | Load_Encached Character_Cache 0a84 00e8 | | Load_Encached Character_Cache 0a85 BODY_0a80: 0a85 e7ff | | Load 0x3,-0x1 0a86 01db | | Execute Vector,Length 0a87 e7fe | | Load 0x3,-0x2 0a88 01db | | Execute Vector,Length 0a89 027e | ~ | Execute Discrete,Not_Equal 0a8a 6802 |h | Jump_Zero 0xa8d 0a8b 4800 |H | Short_Literal 0x0 0a8c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a8d 00cf | | Action Mark_Auxiliary 0a8e e7ff | | Load 0x3,-0x1 0a8f 01db | | Execute Vector,Length 0a90 0aff | | Execute_Immediate Plus,-0x1 0a91 00d8 | | Load_Top At_Offset_0 0a92 00e2 | | Load_Encached Integer_Cache 0a93 0260 | ` | Execute Discrete,In_Type 0a94 7001 |p | Jump_Nonzero 0xa96 0a95 0801 | | Execute_Immediate Raise,0x1 0a96 4800 |H | Short_Literal 0x0 0a97 00e3 | | Load_Encached Natural_Cache 0a98 025c | \ | QQucode_0x025c 0a99 0263 | c | Execute Discrete,Above_Bound 0a9a 7034 |p4 | Jump_Nonzero 0xacf 0a9b e7ff | | Load 0x3,-0x1 0a9c 01dd | | Execute Vector,First 0a9d 00d9 | | Load_Top At_Offset_1 0a9e 0273 | s | Execute Discrete,Plus 0a9f e7ff | | Load 0x3,-0x1 0aa0 01d7 | | Execute Vector,Field_Read 0aa1 a602 | | Store_Unchecked 0x3,0x2 0aa2 e7fe | | Load 0x3,-0x2 0aa3 01dd | | Execute Vector,First 0aa4 00d9 | | Load_Top At_Offset_1 0aa5 0273 | s | Execute Discrete,Plus 0aa6 e7fe | | Load 0x3,-0x2 0aa7 01d7 | | Execute Vector,Field_Read 0aa8 a603 | | Store_Unchecked 0x3,0x3 0aa9 e602 | | Load 0x3,0x2 0aaa e603 | | Load 0x3,0x3 0aab 027e | ~ | Execute Discrete,Not_Equal 0aac 6820 |h | Jump_Zero 0xacd 0aad e602 | | Load 0x3,0x2 0aae 4861 |Ha | Short_Literal 0x61 0aaf 487a |Hz | Short_Literal 0x7a 0ab0 0262 | b | Execute Discrete,In_Range 0ab1 6808 |h | Jump_Zero 0xaba 0ab2 e602 | | Load 0x3,0x2 0ab3 0ae0 | | Execute_Immediate Plus,-0x20 0ab4 00d8 | | Load_Top At_Offset_0 0ab5 00e8 | | Load_Encached Character_Cache 0ab6 0260 | ` | Execute Discrete,In_Type 0ab7 7001 |p | Jump_Nonzero 0xab9 0ab8 0801 | | Execute_Immediate Raise,0x1 0ab9 a602 | | Store_Unchecked 0x3,0x2 0aba 00db | | Load_Top At_Offset_3 0abb 4861 |Ha | Short_Literal 0x61 0abc 487a |Hz | Short_Literal 0x7a 0abd 0262 | b | Execute Discrete,In_Range 0abe 6808 |h | Jump_Zero 0xac7 0abf 00db | | Load_Top At_Offset_3 0ac0 0ae0 | | Execute_Immediate Plus,-0x20 0ac1 00d8 | | Load_Top At_Offset_0 0ac2 00e8 | | Load_Encached Character_Cache 0ac3 0260 | ` | Execute Discrete,In_Type 0ac4 7001 |p | Jump_Nonzero 0xac6 0ac5 0801 | | Execute_Immediate Raise,0x1 0ac6 a603 | | Store_Unchecked 0x3,0x3 0ac7 e602 | | Load 0x3,0x2 0ac8 e603 | | Load 0x3,0x3 0ac9 027e | ~ | Execute Discrete,Not_Equal 0aca 6802 |h | Jump_Zero 0xacd 0acb 4800 |H | Short_Literal 0x0 0acc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0acd 00c8 | | Action Pop_Auxiliary_Range 0ace 3fcc |? | Loop_Increasing 0xa9b 0acf 00ce | | Action Pop_Auxiliary 0ad0 4801 |H | Short_Literal 0x1 0ad1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ad2 0000 0000 | | .BLANK 0000[0x6] 0ad8 ; -------------------------------------------------------------------------------------- 0ad8 ; SUBPROGRAM 0ad8 ; -------------------------------------------------------------------------------------- 0ad8 0ae0 | | .CONST 0x0ae0 ; Address of begin 0ad9 0004 | | .CONST 0x0004 ; Address of exception handler 0ada 0002 | | .CONST 0x0002 ; Number of locals 0adb INIT_0ad8: 0adb e40a | | Load 0x2,0xa 0adc e21b | | Load 0x1,0x1b 0add 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0ade 01d5 | | Execute Vector,Field_Reference 0adf 0007 | | Action Break_Optional 0ae0 BODY_0ad8: 0ae0 e21b | | Load 0x1,0x1b 0ae1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0ae2 0227 | ' | Execute Access,All_Reference 0ae3 01dd | | Execute Vector,First 0ae4 e40a | | Load 0x2,0xa 0ae5 e5fd | | Load 0x2,-0x3 0ae6 0271 | q | Execute Discrete,Times 0ae7 0273 | s | Execute Discrete,Plus 0ae8 00d9 | | Load_Top At_Offset_1 0ae9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0aea 4800 |H | Short_Literal 0x0 0aeb e21b | | Load 0x1,0x1b 0aec 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0aed 0aff | | Execute_Immediate Plus,-0x1 0aee e214 | | Load 0x1,0x14 0aef 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0af0 00d8 | | Load_Top At_Offset_0 0af1 0227 | ' | Execute Access,All_Reference 0af2 1c00 | | Execute_Immediate Run_Utility,0x0 0af3 00d9 | | Load_Top At_Offset_1 0af4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0af5 4800 |H | Short_Literal 0x0 0af6 e21b | | Load 0x1,0x1b 0af7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0af8 0aff | | Execute_Immediate Plus,-0x1 0af9 e215 | | Load 0x1,0x15 0afa 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0afb 00d9 | | Load_Top At_Offset_1 0afc 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0afd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0afe 0000 0000 | | .XXX[0x2] 0b00 ; -------------------------------------------------------------------------------------- 0b00 ; SUBPROGRAM 0b00 ; -------------------------------------------------------------------------------------- 0b00 0b0c | | .CONST 0x0b0c ; Address of begin 0b01 0004 | | .CONST 0x0004 ; Address of exception handler 0b02 0004 | | .CONST 0x0004 ; Number of locals 0b03 INIT_0b00: 0b03 e40a | | Load 0x2,0xa 0b04 e21b | | Load 0x1,0x1b 0b05 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0b06 01d5 | | Execute Vector,Field_Reference 0b07 0007 | | Action Break_Optional 0b08 e00c | | Load 0x0,0xc 0b09 0007 | | Action Break_Optional 0b0a e00c | | Load 0x0,0xc 0b0b 0007 | | Action Break_Optional 0b0c BODY_0b00: 0b0c e229 | ) | Load 0x1,0x29 0b0d 6804 |h | Jump_Zero 0xb12 0b0e e21b | | Load 0x1,0x1b 0b0f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b10 a404 | | Store_Unchecked 0x2,0x4 0b11 7802 |x | Jump 0xb14 0b12 4801 |H | Short_Literal 0x1 0b13 a404 | | Store_Unchecked 0x2,0x4 0b14 00cf | | Action Mark_Auxiliary 0b15 e404 | | Load 0x2,0x4 0b16 0aff | | Execute_Immediate Plus,-0x1 0b17 4800 |H | Short_Literal 0x0 0b18 0263 | c | Execute Discrete,Above_Bound 0b19 707a |pz | Jump_Nonzero 0xb94 0b1a 00cf | | Action Mark_Auxiliary 0b1b e21b | | Load 0x1,0x1b 0b1c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b1d 0aff | | Execute_Immediate Plus,-0x1 0b1e 4800 |H | Short_Literal 0x0 0b1f 0263 | c | Execute Discrete,Above_Bound 0b20 7070 |pp | Jump_Nonzero 0xb91 0b21 00d8 | | Load_Top At_Offset_0 0b22 e607 | | Load 0x3,0x7 0b23 4801 |H | Short_Literal 0x1 0b24 e21b | | Load 0x1,0x1b 0b25 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b26 0253 | S | Execute Discrete,Binary_Scale 0b27 0271 | q | Execute Discrete,Times 0b28 00d8 | | Load_Top At_Offset_0 0b29 e00c | | Load 0x0,0xc 0b2a 0260 | ` | Execute Discrete,In_Type 0b2b 7001 |p | Jump_Nonzero 0xb2d 0b2c 0801 | | Execute_Immediate Raise,0x1 0b2d 8056 | V | Call 0x0,0x56 0b2e c603 | | Store 0x3,0x3 0b2f e40a | | Load 0x2,0xa 0b30 7003 |p | Jump_Nonzero 0xb34 0b31 e603 | | Load 0x3,0x3 0b32 a604 | | Store_Unchecked 0x3,0x4 0b33 780e |x | Jump 0xb42 0b34 00db | | Load_Top At_Offset_3 0b35 00d9 | | Load_Top At_Offset_1 0b36 4801 |H | Short_Literal 0x1 0b37 e21b | | Load 0x1,0x1b 0b38 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b39 0253 | S | Execute Discrete,Binary_Scale 0b3a 0271 | q | Execute Discrete,Times 0b3b 00d8 | | Load_Top At_Offset_0 0b3c e00c | | Load 0x0,0xc 0b3d 0260 | ` | Execute Discrete,In_Type 0b3e 7001 |p | Jump_Nonzero 0xb40 0b3f 0801 | | Execute_Immediate Raise,0x1 0b40 8056 | V | Call 0x0,0x56 0b41 c604 | | Store 0x3,0x4 0b42 4800 |H | Short_Literal 0x0 0b43 e21b | | Load 0x1,0x1b 0b44 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0b45 01d7 | | Execute Vector,Field_Read 0b46 e604 | | Load 0x3,0x4 0b47 e602 | | Load 0x3,0x2 0b48 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b49 0227 | ' | Execute Access,All_Reference 0b4a 01d5 | | Execute Vector,Field_Reference 0b4b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b4c 4800 |H | Short_Literal 0x0 0b4d a402 | | Store_Unchecked 0x2,0x2 0b4e e603 | | Load 0x3,0x3 0b4f a403 | | Store_Unchecked 0x2,0x3 0b50 00cf | | Action Mark_Auxiliary 0b51 781d |x | Jump 0xb6f 0b52 e403 | | Load 0x2,0x3 0b53 4802 |H | Short_Literal 0x2 0b54 026f | o | Execute Discrete,Remainder 0b55 6812 |h | Jump_Zero 0xb68 0b56 e402 | | Load 0x2,0x2 0b57 e21b | | Load 0x1,0x1b 0b58 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b59 0227 | ' | Execute Access,All_Reference 0b5a 01d7 | | Execute Vector,Field_Read 0b5b e604 | | Load 0x3,0x4 0b5c e602 | | Load 0x3,0x2 0b5d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b5e 0227 | ' | Execute Access,All_Reference 0b5f 01d5 | | Execute Vector,Field_Reference 0b60 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b61 8056 | V | Call 0x0,0x56 0b62 e604 | | Load 0x3,0x4 0b63 e602 | | Load 0x3,0x2 0b64 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b65 0227 | ' | Execute Access,All_Reference 0b66 01d5 | | Execute Vector,Field_Reference 0b67 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b68 e402 | | Load 0x2,0x2 0b69 0a01 | | Execute_Immediate Plus,0x1 0b6a c402 | | Store 0x2,0x2 0b6b e403 | | Load 0x2,0x3 0b6c 09ff | | Execute_Immediate Binary_Scale,-0x1 0b6d c403 | | Store 0x2,0x3 0b6e 00c9 | | Action Pop_Auxiliary_Loop 0b6f e403 | | Load 0x2,0x3 0b70 77e1 |w | Jump_Nonzero 0xb52 0b71 00ce | | Action Pop_Auxiliary 0b72 e057 | W | Load 0x0,0x57 0b73 0337 | 7 | Declare_Variable Array 0b74 4801 |H | Short_Literal 0x1 0b75 4807 |H | Short_Literal 0x7 0b76 00da | | Load_Top At_Offset_2 0b77 01d6 | | Execute Vector,Field_Write 0b78 4801 |H | Short_Literal 0x1 0b79 4806 |H | Short_Literal 0x6 0b7a 00da | | Load_Top At_Offset_2 0b7b 01d6 | | Execute Vector,Field_Write 0b7c 4801 |H | Short_Literal 0x1 0b7d 4805 |H | Short_Literal 0x5 0b7e 00da | | Load_Top At_Offset_2 0b7f 01d6 | | Execute Vector,Field_Write 0b80 4804 |H | Short_Literal 0x4 0b81 4800 |H | Short_Literal 0x0 0b82 4800 |H | Short_Literal 0x0 0b83 00d9 | | Load_Top At_Offset_1 0b84 e60b | | Load 0x3,0xb 0b85 01d6 | | Execute Vector,Field_Write 0b86 3ffb |? | Loop_Increasing 0xb82 0b87 e057 | W | Load 0x0,0x57 0b88 01c3 | | Execute Vector,Check_In_Type 0b89 e604 | | Load 0x3,0x4 0b8a e602 | | Load 0x3,0x2 0b8b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b8c 0227 | ' | Execute Access,All_Reference 0b8d 01d5 | | Execute Vector,Field_Reference 0b8e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0b8f 00c8 | | Action Pop_Auxiliary_Range 0b90 3f90 |? | Loop_Increasing 0xb21 0b91 00ce | | Action Pop_Auxiliary 0b92 00c8 | | Action Pop_Auxiliary_Range 0b93 3f86 |? | Loop_Increasing 0xb1a 0b94 00ce | | Action Pop_Auxiliary 0b95 4800 |H | Short_Literal 0x0 0b96 00db | | Load_Top At_Offset_3 0b97 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b98 4800 |H | Short_Literal 0x0 0b99 00db | | Load_Top At_Offset_3 0b9a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0b9b 4800 |H | Short_Literal 0x0 0b9c 00db | | Load_Top At_Offset_3 0b9d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0b9e 00cf | | Action Mark_Auxiliary 0b9f e5fd | | Load 0x2,-0x3 0ba0 0aff | | Execute_Immediate Plus,-0x1 0ba1 4800 |H | Short_Literal 0x0 0ba2 0263 | c | Execute Discrete,Above_Bound 0ba3 700f |p | Jump_Nonzero 0xbb3 0ba4 e602 | | Load 0x3,0x2 0ba5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ba6 00d9 | | Load_Top At_Offset_1 0ba7 0273 | s | Execute Discrete,Plus 0ba8 e21b | | Load 0x1,0x1b 0ba9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0baa 0227 | ' | Execute Access,All_Reference 0bab 01d7 | | Execute Vector,Field_Read 0bac e602 | | Load 0x3,0x2 0bad 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0bae 8056 | V | Call 0x0,0x56 0baf e602 | | Load 0x3,0x2 0bb0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0bb1 00c8 | | Action Pop_Auxiliary_Range 0bb2 3ff1 |? | Loop_Increasing 0xba4 0bb3 00c9 | | Action Pop_Auxiliary_Loop 0bb4 e21b | | Load 0x1,0x1b 0bb5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0bb6 0aff | | Execute_Immediate Plus,-0x1 0bb7 4800 |H | Short_Literal 0x0 0bb8 0263 | c | Execute Discrete,Above_Bound 0bb9 7032 |p2 | Jump_Nonzero 0xbec 0bba 4800 |H | Short_Literal 0x0 0bbb e21b | | Load 0x1,0x1b 0bbc 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0bbd 01d7 | | Execute Vector,Field_Read 0bbe 00d9 | | Load_Top At_Offset_1 0bbf e602 | | Load 0x3,0x2 0bc0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0bc1 0227 | ' | Execute Access,All_Reference 0bc2 01d6 | | Execute Vector,Field_Write 0bc3 4800 |H | Short_Literal 0x0 0bc4 a402 | | Store_Unchecked 0x2,0x2 0bc5 00d8 | | Load_Top At_Offset_0 0bc6 a403 | | Store_Unchecked 0x2,0x3 0bc7 00cf | | Action Mark_Auxiliary 0bc8 781e |x | Jump 0xbe7 0bc9 e403 | | Load 0x2,0x3 0bca 4802 |H | Short_Literal 0x2 0bcb 026f | o | Execute Discrete,Remainder 0bcc 6813 |h | Jump_Zero 0xbe0 0bcd e602 | | Load 0x3,0x2 0bce 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0bcf e402 | | Load 0x2,0x2 0bd0 0273 | s | Execute Discrete,Plus 0bd1 e21b | | Load 0x1,0x1b 0bd2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0bd3 0227 | ' | Execute Access,All_Reference 0bd4 01d7 | | Execute Vector,Field_Read 0bd5 00da | | Load_Top At_Offset_2 0bd6 e602 | | Load 0x3,0x2 0bd7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0bd8 0227 | ' | Execute Access,All_Reference 0bd9 01d7 | | Execute Vector,Field_Read 0bda 8056 | V | Call 0x0,0x56 0bdb 00da | | Load_Top At_Offset_2 0bdc e602 | | Load 0x3,0x2 0bdd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0bde 0227 | ' | Execute Access,All_Reference 0bdf 01d6 | | Execute Vector,Field_Write 0be0 e402 | | Load 0x2,0x2 0be1 0a01 | | Execute_Immediate Plus,0x1 0be2 c402 | | Store 0x2,0x2 0be3 e403 | | Load 0x2,0x3 0be4 09ff | | Execute_Immediate Binary_Scale,-0x1 0be5 c403 | | Store 0x2,0x3 0be6 00c9 | | Action Pop_Auxiliary_Loop 0be7 e403 | | Load 0x2,0x3 0be8 77e0 |w | Jump_Nonzero 0xbc9 0be9 00ce | | Action Pop_Auxiliary 0bea 00c8 | | Action Pop_Auxiliary_Range 0beb 3fce |? | Loop_Increasing 0xbba 0bec 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0bed 0000 0000 | | .XXX[0x3] 0bef 0000 | | 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 ; SUBPROGRAM 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 0bf8 | | .CONST 0x0bf8 ; Address of begin 0bf1 0004 | | .CONST 0x0004 ; Address of exception handler 0bf2 0002 | | .CONST 0x0002 ; Number of locals 0bf3 INIT_0bf0: 0bf3 e408 | | Load 0x2,0x8 0bf4 e21b | | Load 0x1,0x1b 0bf5 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0bf6 01d5 | | Execute Vector,Field_Reference 0bf7 0007 | | Action Break_Optional 0bf8 BODY_0bf0: 0bf8 e229 | ) | Load 0x1,0x29 0bf9 6804 |h | Jump_Zero 0xbfe 0bfa e21b | | Load 0x1,0x1b 0bfb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0bfc a404 | | Store_Unchecked 0x2,0x4 0bfd 7802 |x | Jump 0xc00 0bfe 4801 |H | Short_Literal 0x1 0bff a404 | | Store_Unchecked 0x2,0x4 0c00 00cf | | Action Mark_Auxiliary 0c01 e404 | | Load 0x2,0x4 0c02 0aff | | Execute_Immediate Plus,-0x1 0c03 4800 |H | Short_Literal 0x0 0c04 0263 | c | Execute Discrete,Above_Bound 0c05 703a |p: | Jump_Nonzero 0xc40 0c06 e5ff | | Load 0x2,-0x1 0c07 00d9 | | Load_Top At_Offset_1 0c08 e21b | | Load 0x1,0x1b 0c09 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c0a 0271 | q | Execute Discrete,Times 0c0b 0273 | s | Execute Discrete,Plus 0c0c c402 | | Store 0x2,0x2 0c0d e402 | | Load 0x2,0x2 0c0e e602 | | Load 0x3,0x2 0c0f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c10 0227 | ' | Execute Access,All_Reference 0c11 01d5 | | Execute Vector,Field_Reference 0c12 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c13 a403 | | Store_Unchecked 0x2,0x3 0c14 e5fe | | Load 0x2,-0x2 0c15 e402 | | Load 0x2,0x2 0c16 e602 | | Load 0x3,0x2 0c17 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c18 0227 | ' | Execute Access,All_Reference 0c19 01d6 | | Execute Vector,Field_Write 0c1a e403 | | Load 0x2,0x3 0c1b e402 | | Load 0x2,0x2 0c1c e602 | | Load 0x3,0x2 0c1d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c1e 0227 | ' | Execute Access,All_Reference 0c1f 01d5 | | Execute Vector,Field_Reference 0c20 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0c21 e057 | W | Load 0x0,0x57 0c22 0337 | 7 | Declare_Variable Array 0c23 4801 |H | Short_Literal 0x1 0c24 4807 |H | Short_Literal 0x7 0c25 00da | | Load_Top At_Offset_2 0c26 01d6 | | Execute Vector,Field_Write 0c27 4801 |H | Short_Literal 0x1 0c28 4806 |H | Short_Literal 0x6 0c29 00da | | Load_Top At_Offset_2 0c2a 01d6 | | Execute Vector,Field_Write 0c2b 4801 |H | Short_Literal 0x1 0c2c 4805 |H | Short_Literal 0x5 0c2d 00da | | Load_Top At_Offset_2 0c2e 01d6 | | Execute Vector,Field_Write 0c2f 4804 |H | Short_Literal 0x4 0c30 4800 |H | Short_Literal 0x0 0c31 4800 |H | Short_Literal 0x0 0c32 00d9 | | Load_Top At_Offset_1 0c33 e606 | | Load 0x3,0x6 0c34 01d6 | | Execute Vector,Field_Write 0c35 3ffb |? | Loop_Increasing 0xc31 0c36 e057 | W | Load 0x0,0x57 0c37 01c3 | | Execute Vector,Check_In_Type 0c38 e402 | | Load 0x2,0x2 0c39 e602 | | Load 0x3,0x2 0c3a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c3b 0227 | ' | Execute Access,All_Reference 0c3c 01d5 | | Execute Vector,Field_Reference 0c3d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0c3e 00c8 | | Action Pop_Auxiliary_Range 0c3f 3fc6 |? | Loop_Increasing 0xc06 0c40 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c41 ; -------------------------------------------------------------------------------------- 0c41 ; STRING TABLE 0c41 ; -------------------------------------------------------------------------------------- 0c41 0014 | | .STRTAB 0x0014->0x0c4b ; "nothing to draw" 0c42 0021 | ! | .STRTAB 0x0021->0x0c52 ; "Cannot open display:" 0c43 0033 | 3 | .STRTAB 0x0033->0x0c5c ; "cant get window attributes (size)" 0c44 0052 | R | .STRTAB 0x0052->0x0c6d ; "can't find object " 0c45 0062 | b | .STRTAB 0x0062->0x0c76 ; "Name Short Name #Vert. #Edges #Faces Dual" 0c46 009a | | .STRTAB 0x009a->0x0c93 ; "ico: " 0c47 009d | | .STRTAB 0x009d->0x0c95 ; "can't get default colormap" 0c48 00b5 | | .STRTAB 0x00b5->0x0ca2 ; "can't allocate color planes" 0c49 00ce | | .STRTAB 0x00ce->0x0cb0 ; "no such color " 0c4a 00da | | .STREND 0x00da->0x0cb7 0c4b 6e6f 7468 |noth| .STRTAB_STRINGS 0cb7 0000 | | .XXX[0x1] 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 ; Debug Table 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6887,0x0000,0x0001,0x001c 0cbe 000b 0d2e | .| .DBG4T 0x000b,0x0d2e,0x8000,0x0000 0cc2 000e 0d31 | 1| .DBG4T 0x000e,0x0d31,0x8000,0x0000 0cc6 010b 0d78 | x| .DBG4T 0x010b,0x0d78,0x0001,0x0000 0cca 030b 0dd4 | | .DBG4T 0x030b,0x0dd4,0x0001,0x0000 0cce 034b 0dd9 | K | .DBG4T 0x034b,0x0dd9,0x0001,0x0000 0cd2 058b 0e3b | ;| .DBG4T 0x058b,0x0e3b,0x0002,0x0000 0cd6 05b3 0e42 | B| .DBG4T 0x05b3,0x0e42,0x0001,0x4000 0cda 0613 0e68 | h| .DBG4T 0x0613,0x0e68,0x0001,0x0000 0cde 065b 0e72 | [ r| .DBG4T 0x065b,0x0e72,0x0001,0x0000 0ce2 066b 0e76 | k v| .DBG4T 0x066b,0x0e76,0x0001,0x0000 0ce6 0693 0e7c | || .DBG4T 0x0693,0x0e7c,0x0001,0x0000 0cea 074b 0ea6 | K | .DBG4T 0x074b,0x0ea6,0x0001,0x0000 0cee 07cb 0eb0 | | .DBG4T 0x07cb,0x0eb0,0x0001,0x0000 0cf2 07eb 0eba | | .DBG4T 0x07eb,0x0eba,0x0001,0x0000 0cf6 0813 0ec3 | | .DBG4T 0x0813,0x0ec3,0x0001,0x0000 0cfa 082b 0ec7 | + | .DBG4T 0x082b,0x0ec7,0x0001,0x0000 0cfe 0883 0ed3 | | .DBG4T 0x0883,0x0ed3,0x0002,0x0000 0d02 08c3 0eda | | .DBG4T 0x08c3,0x0eda,0x0001,0x0000 0d06 08eb 0ee0 | | .DBG4T 0x08eb,0x0ee0,0x0004,0x0000 0d0a 092b 0ee7 | + | .DBG4T 0x092b,0x0ee7,0x0004,0x0000 0d0e 0983 0efa | | .DBG4T 0x0983,0x0efa,0x0004,0x0000 0d12 09c3 0f02 | | .DBG4T 0x09c3,0x0f02,0x0004,0x4000 0d16 09e3 0f12 | | .DBG4T 0x09e3,0x0f12,0x0004,0x0000 0d1a 0a4b 0f27 | K '| .DBG4T 0x0a4b,0x0f27,0x0004,0x0000 0d1e 0a83 0f33 | 3| .DBG4T 0x0a83,0x0f33,0x0002,0x0000 0d22 0adb 0f44 | D| .DBG4T 0x0adb,0x0f44,0x0004,0x0000 0d26 0b03 0f4a | J| .DBG4T 0x0b03,0x0f4a,0x0004,0x4000 0d2a 0bf3 0f8f | | .DBG4T 0x0bf3,0x0f8f,0x0004,0x0000 0d2e ; -------------------------------------------------------------------------------------- 0d2e ; Debug chain 0d2e ; -------------------------------------------------------------------------------------- 0d2e 0001 0000 | | .DBGLEN 0x0001,0x0000 0d30 000b | | .DBGLNO 0x000b 0d31 ; -------------------------------------------------------------------------------------- 0d31 ; Debug chain 0d31 ; -------------------------------------------------------------------------------------- 0d31 0044 0001 | D | .DBGLEN 0x0044,0x0001 0d33 000e 0013 | | .DBGLNO 0x000e,0x0013,0x0015,0x001d,0x0021,0x0027,0x003d,0x0041,0x0045,0x0049,0x004d,0x0056,0x005c,0x006f,0x0071,0x0079,0x0080,0x0097,0x009b,0x009f,0x00a1,0x00a3,0x00a5,0x00a7,0x00a9,0x00ab,0x00ad,0x00af,0x00b1,0x00b2,0x00b5,0x00b7,0x00b9,0x00bb,0x00bd,0x00bf,0x00c1,0x00c2,0x00c3,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,0x0100 0d78 ; -------------------------------------------------------------------------------------- 0d78 ; Debug chain 0d78 ; -------------------------------------------------------------------------------------- 0d78 0014 0046 | F| .DBGLEN 0x0014,0x0046 0d7a 010b 010d | | .DBGLNO 0x010b,0x010d,0x010f,0x0111,0x0113,0x0115,0x0117,0x011b,0x011f,0x0121,0x0123,0x0125,0x0127,0x0129,0x012b,0x012d,0x0131,0x0135,0x0139,0x013b,0x0145,0x0146,0x0148,0x014a,0x014c,0x014e,0x0151,0x0153,0x0154,0x0155,0x0159,0x015c,0x0162,0x0166,0x016d,0x016f,0x0174,0x017a,0x017f,0x0184,0x0186,0x018a,0x018c,0x018e,0x0193,0x0199,0x019b,0x019d,0x01aa,0x01b7,0x01c0,0x01c1,0x01da,0x01dd,0x01e0,0x0225,0x022e,0x0231,0x0238,0x023a,0x023d,0x0240,0x0243,0x024a,0x024e,0x0252,0x0254,0x0257,0x025f,0x0284,0x0289,0x028b,0x0290,0x02a0,0x02a2,0x02a5,0x02a8,0x02ac,0x02b0,0x02b2,0x02b4,0x02b6,0x02b9,0x02bb,0x02bd,0x02d4,0x02eb,0x02ed,0x02ef,0x02f4 0dd4 ; -------------------------------------------------------------------------------------- 0dd4 ; Debug chain 0dd4 ; -------------------------------------------------------------------------------------- 0dd4 0000 0003 | | .DBGLEN 0x0000,0x0003 0dd6 030c 030f | | .DBGLNO 0x030c,0x030f,0x0312 0dd9 ; -------------------------------------------------------------------------------------- 0dd9 ; Debug chain 0dd9 ; -------------------------------------------------------------------------------------- 0dd9 0011 004f | O| .DBGLEN 0x0011,0x004f 0ddb 034b 0350 | K P| .DBGLNO 0x034b,0x0350,0x0355,0x035a,0x035f,0x0361,0x0363,0x0365,0x0367,0x0369,0x036e,0x0373,0x0375,0x0377,0x0379,0x037b,0x037c,0x0383,0x0385,0x0386,0x0389,0x0395,0x039a,0x039d,0x03a2,0x03b5,0x03c8,0x03cb,0x03d1,0x03d6,0x03d8,0x03dc,0x03de,0x03e1,0x03e3,0x03e6,0x03e8,0x03ea,0x0405,0x0416,0x0418,0x041c,0x0421,0x0426,0x0429,0x042c,0x0431,0x0438,0x0446,0x0449,0x044a,0x044c,0x044e,0x0454,0x0456,0x0463,0x0468,0x046f,0x0479,0x0486,0x0492,0x0495,0x049a,0x049f,0x04a3,0x04a5,0x04ac,0x04b3,0x04b8,0x04bd,0x04c2,0x04cc,0x04d6,0x04e0,0x04ea,0x04f0,0x04f2,0x04f9,0x04fb,0x04fd,0x050a,0x050c,0x0527,0x0538,0x053c,0x054a,0x0554,0x0556,0x0559,0x055b,0x0562,0x0569,0x056c,0x056e,0x0574,0x0576 0e3b ; -------------------------------------------------------------------------------------- 0e3b ; Debug chain 0e3b ; -------------------------------------------------------------------------------------- 0e3b 0001 0004 | | .DBGLEN 0x0001,0x0004 0e3d 058b 058e | | .DBGLNO 0x058b,0x058e,0x0591,0x05a3,0x05aa 0e42 ; -------------------------------------------------------------------------------------- 0e42 ; Debug chain 0e42 ; -------------------------------------------------------------------------------------- 0e42 0002 0011 | | .DBGLEN 0x0002,0x0011 0e44 05b3 05b4 | | .DBGLNO 0x05b3,0x05b4,0x05b5,0x05b8,0x05bb,0x05be,0x05c5,0x05c7,0x05cc,0x05d1,0x05d6,0x05de,0x05e3,0x05e8,0x05ed,0x05f4,0x05f9,0x05fe,0x0603 0e57 0001 0002 | | .XXX[0x11] 0e59 0003 0004 | | 0e5b 0011 0005 | | 0e5d 0006 0007 | | 0e5f 0008 0009 | | 0e61 000a 000b | | 0e63 000c 000d | | 0e65 000e 000f | | 0e67 0010 | | 0e68 ; -------------------------------------------------------------------------------------- 0e68 ; Debug chain 0e68 ; -------------------------------------------------------------------------------------- 0e68 0000 0008 | | .DBGLEN 0x0000,0x0008 0e6a 0613 0618 | | .DBGLNO 0x0613,0x0618,0x061b,0x0625,0x062f,0x0639,0x0643,0x064d 0e72 ; -------------------------------------------------------------------------------------- 0e72 ; Debug chain 0e72 ; -------------------------------------------------------------------------------------- 0e72 0000 0002 | | .DBGLEN 0x0000,0x0002 0e74 065b 0661 | [ a| .DBGLNO 0x065b,0x0661 0e76 ; -------------------------------------------------------------------------------------- 0e76 ; Debug chain 0e76 ; -------------------------------------------------------------------------------------- 0e76 0000 0004 | | .DBGLEN 0x0000,0x0004 0e78 066c 066f | l o| .DBGLNO 0x066c,0x066f,0x0672,0x067a 0e7c ; -------------------------------------------------------------------------------------- 0e7c ; Debug chain 0e7c ; -------------------------------------------------------------------------------------- 0e7c 0004 0024 | $| .DBGLEN 0x0004,0x0024 0e7e 0693 0695 | | .DBGLNO 0x0693,0x0695,0x0697,0x0699,0x069e,0x06a1,0x06a6,0x06a8,0x06b2,0x06b5,0x06bb,0x06c3,0x06c6,0x06c8,0x06cb,0x06ce,0x06d3,0x06d7,0x06dd,0x06e1,0x06e4,0x06f9,0x06fb,0x06fe,0x0701,0x0704,0x0709,0x070e,0x0711,0x0715,0x071a,0x071e,0x0720,0x072b,0x072f,0x0734,0x0736,0x0739,0x073b,0x073e 0ea6 ; -------------------------------------------------------------------------------------- 0ea6 ; Debug chain 0ea6 ; -------------------------------------------------------------------------------------- 0ea6 0002 0006 | | .DBGLEN 0x0002,0x0006 0ea8 074b 074f | K O| .DBGLNO 0x074b,0x074f,0x0754,0x0758,0x0779,0x079a,0x07bb,0x07be 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 ; Debug chain 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 0003 0005 | | .DBGLEN 0x0003,0x0005 0eb2 07cb 07cd | | .DBGLNO 0x07cb,0x07cd,0x07cf,0x07d2,0x07d4,0x07d7,0x07da,0x07df 0eba ; -------------------------------------------------------------------------------------- 0eba ; Debug chain 0eba ; -------------------------------------------------------------------------------------- 0eba 0003 0004 | | .DBGLEN 0x0003,0x0004 0ebc 07eb 07ed | | .DBGLNO 0x07eb,0x07ed,0x07f1,0x07f5,0x07fe,0x0800,0x0806 0ec3 ; -------------------------------------------------------------------------------------- 0ec3 ; Debug chain 0ec3 ; -------------------------------------------------------------------------------------- 0ec3 0000 0002 | | .DBGLEN 0x0000,0x0002 0ec5 0813 0816 | | .DBGLNO 0x0813,0x0816 0ec7 ; -------------------------------------------------------------------------------------- 0ec7 ; Debug chain 0ec7 ; -------------------------------------------------------------------------------------- 0ec7 0002 0008 | | .DBGLEN 0x0002,0x0008 0ec9 082b 082f | + /| .DBGLNO 0x082b,0x082f,0x0831,0x0834,0x083c,0x0849,0x0854,0x0871,0x0873,0x0877 0ed3 ; -------------------------------------------------------------------------------------- 0ed3 ; Debug chain 0ed3 ; -------------------------------------------------------------------------------------- 0ed3 0001 0004 | | .DBGLEN 0x0001,0x0004 0ed5 0883 0896 | | .DBGLNO 0x0883,0x0896,0x089b,0x08a7,0x08b7 0eda ; -------------------------------------------------------------------------------------- 0eda ; Debug chain 0eda ; -------------------------------------------------------------------------------------- 0eda 0000 0004 | | .DBGLEN 0x0000,0x0004 0edc 08c3 08c7 | | .DBGLNO 0x08c3,0x08c7,0x08d3,0x08dd 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 ; Debug chain 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 0002 0003 | | .DBGLEN 0x0002,0x0003 0ee2 08eb 08f2 | | .DBGLNO 0x08eb,0x08f2,0x08f3,0x08fc,0x090f 0ee7 ; -------------------------------------------------------------------------------------- 0ee7 ; Debug chain 0ee7 ; -------------------------------------------------------------------------------------- 0ee7 0001 0010 | | .DBGLEN 0x0001,0x0010 0ee9 092b 092d | + -| .DBGLNO 0x092b,0x092d,0x0930,0x0934,0x0939,0x093f,0x0943,0x0948,0x094a,0x094e,0x0952,0x0957,0x0962,0x0965,0x0969,0x096e,0x0978 0efa ; -------------------------------------------------------------------------------------- 0efa ; Debug chain 0efa ; -------------------------------------------------------------------------------------- 0efa 0001 0005 | | .DBGLEN 0x0001,0x0005 0efc 0983 0985 | | .DBGLNO 0x0983,0x0985,0x0991,0x0995,0x09a8,0x09ac 0f02 ; -------------------------------------------------------------------------------------- 0f02 ; Debug chain 0f02 ; -------------------------------------------------------------------------------------- 0f02 0002 0006 | | .DBGLEN 0x0002,0x0006 0f04 09c3 09c5 | | .DBGLNO 0x09c3,0x09c5,0x09c6,0x09c8,0x09cc,0x09cf,0x09d3,0x09d6 0f0c 0001 0002 | | .XXX[0x6] 0f0e 0004 0005 | | 0f10 0003 0006 | | 0f12 ; -------------------------------------------------------------------------------------- 0f12 ; Debug chain 0f12 ; -------------------------------------------------------------------------------------- 0f12 0002 0011 | | .DBGLEN 0x0002,0x0011 0f14 09e3 09e5 | | .DBGLNO 0x09e3,0x09e5,0x09e7,0x09e8,0x09eb,0x09ef,0x09f8,0x09f9,0x09fb,0x09fd,0x0a01,0x0a0f,0x0a14,0x0a17,0x0a1b,0x0a29,0x0a2e,0x0a31,0x0a3e 0f27 ; -------------------------------------------------------------------------------------- 0f27 ; Debug chain 0f27 ; -------------------------------------------------------------------------------------- 0f27 0002 0008 | | .DBGLEN 0x0002,0x0008 0f29 0a4b 0a4d | K M| .DBGLNO 0x0a4b,0x0a4d,0x0a4f,0x0a54,0x0a59,0x0a5e,0x0a67,0x0a69,0x0a6e,0x0a73 0f33 ; -------------------------------------------------------------------------------------- 0f33 ; Debug chain 0f33 ; -------------------------------------------------------------------------------------- 0f33 0002 000d | | .DBGLEN 0x0002,0x000d 0f35 0a83 0a84 | | .DBGLNO 0x0a83,0x0a84,0x0a85,0x0a8b,0x0a8e,0x0a9b,0x0aa2,0x0aa9,0x0aad,0x0ab2,0x0aba,0x0abf,0x0ac7,0x0acb,0x0ad0 0f44 ; -------------------------------------------------------------------------------------- 0f44 ; Debug chain 0f44 ; -------------------------------------------------------------------------------------- 0f44 0001 0003 | | .DBGLEN 0x0001,0x0003 0f46 0adb 0ae0 | | .DBGLNO 0x0adb,0x0ae0,0x0aea,0x0af5 0f4a ; -------------------------------------------------------------------------------------- 0f4a ; Debug chain 0f4a ; -------------------------------------------------------------------------------------- 0f4a 0003 0020 | | .DBGLEN 0x0003,0x0020 0f4c 0b03 0b08 | | .DBGLNO 0x0b03,0x0b08,0x0b0a,0x0b0c,0x0b0e,0x0b12,0x0b15,0x0b1b,0x0b21,0x0b2f,0x0b31,0x0b34,0x0b42,0x0b4c,0x0b4e,0x0b52,0x0b56,0x0b68,0x0b6b,0x0b6f,0x0b72,0x0b95,0x0b98,0x0b9b,0x0b9f,0x0ba4,0x0bb4,0x0bba,0x0bc3,0x0bc5,0x0bc9,0x0bcd,0x0be0,0x0be3,0x0be7 0f6f 0001 0002 | | .XXX[0x20] 0f71 0003 0004 | | 0f73 0005 0006 | | 0f75 0007 0008 | | 0f77 0009 000a | | 0f79 000b 000c | | 0f7b 000e 000f | | 0f7d 0010 0011 | | 0f7f 000d 0012 | | 0f81 0013 0014 | | 0f83 0015 0016 | | 0f85 0017 0018 | | 0f87 0019 001a | | 0f89 001b 001d | | 0f8b 001e 001f | | 0f8d 0020 001c | | 0f8f ; -------------------------------------------------------------------------------------- 0f8f ; Debug chain 0f8f ; -------------------------------------------------------------------------------------- 0f8f 0001 0009 | | .DBGLEN 0x0001,0x0009 0f91 0bf3 0bf8 | | .DBGLNO 0x0bf3,0x0bf8,0x0bfa,0x0bfe,0x0c01,0x0c06,0x0c0d,0x0c14,0x0c1a,0x0c21 0f9b 0000 0000 | | .BLANK 0000[0x65]