|
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: 7168 (0x1c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0c08 | | .CONST 0x0c08 ; 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 8008 | | .CONST 0x8008 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x8fb, index=0x0 0008 ; -------------------------------------------------------------------------------------- 0008 01e2 | | .CONST 0x01e2 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 007a | z | .CONST 0x007a ; Number of locals 000b INIT_0008: 000b INIT_0008: 000b 4802 |H | Short_Literal 0x2 000c 02cb | | Declare_Variable Entry 000d 4806 |H | Short_Literal 0x6 000e 02cb | | Declare_Variable Entry 000f 4801 |H | Short_Literal 0x1 0010 02cb | | Declare_Variable Entry 0011 4803 |H | Short_Literal 0x3 0012 02cb | | Declare_Variable Entry 0013 4805 |H | Short_Literal 0x5 0014 02cb | | Declare_Variable Entry 0015 4808 |H | Short_Literal 0x8 0016 02cb | | Declare_Variable Entry 0017 4807 |H | Short_Literal 0x7 0018 02cb | | Declare_Variable Entry 0019 4803 |H | Short_Literal 0x3 001a 02cb | | Declare_Variable Entry 001b 4808 |H | Short_Literal 0x8 001c 02cb | | Declare_Variable Entry 001d 4807 |H | Short_Literal 0x7 001e 02cb | | Declare_Variable Entry 001f 4801 |H | Short_Literal 0x1 0020 02cb | | Declare_Variable Entry 0021 4801 |H | Short_Literal 0x1 0022 02cb | | Declare_Variable Entry 0023 4801 |H | Short_Literal 0x1 0024 02cb | | Declare_Variable Entry 0025 4800 |H | Short_Literal 0x0 0026 02cb | | Declare_Variable Entry 0027 4802 |H | Short_Literal 0x2 0028 02cb | | Declare_Variable Entry 0029 4801 |H | Short_Literal 0x1 002a 02cb | | Declare_Variable Entry 002b 4801 |H | Short_Literal 0x1 002c 02cb | | Declare_Variable Entry 002d 4802 |H | Short_Literal 0x2 002e 02cb | | Declare_Variable Entry 002f 4801 |H | Short_Literal 0x1 0030 02cb | | Declare_Variable Entry 0031 4800 |H | Short_Literal 0x0 0032 02cb | | Declare_Variable Entry 0033 4803 |H | Short_Literal 0x3 0034 02cb | | Declare_Variable Entry 0035 00bf | | Action Accept_Activation 0036 0092 0bf7 | | Action Push_String_Extended,0xbf7 ; "Action not found" 0038 0093 0000 | | push_full_address 0x0 003a 61fd |a | Indirect_Literal Discrete,0x238,{0x80000000, 0x00010000} 003b 0273 | s | Execute Discrete,Plus 003c 0007 | | Action Break_Optional 003d 0093 0000 | | push_full_address 0x0 003f 61f4 |a | Indirect_Literal Discrete,0x234,{0x80000000, 0x00020000} 0040 0273 | s | Execute Discrete,Plus 0041 0007 | | Action Break_Optional 0042 e001 | | Load 0x0,0x1 0043 0007 | | Action Break_Optional 0044 029d 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call 0046 029d 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call 0048 029d 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call 004a 029d 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call 004c e002 | | Load 0x0,0x2 004d 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 004e 0337 | 7 | Declare_Variable Array 004f 4801 |H | Short_Literal 0x1 0050 4801 |H | Short_Literal 0x1 0051 00da | | Load_Top At_Offset_2 0052 01d6 | | Execute Vector,Field_Write 0053 4801 |H | Short_Literal 0x1 0054 4802 |H | Short_Literal 0x2 0055 00da | | Load_Top At_Offset_2 0056 01d6 | | Execute Vector,Field_Write 0057 4801 |H | Short_Literal 0x1 0058 4803 |H | Short_Literal 0x3 0059 00da | | Load_Top At_Offset_2 005a 01d6 | | Execute Vector,Field_Write 005b 4801 |H | Short_Literal 0x1 005c 4809 |H | Short_Literal 0x9 005d 00da | | Load_Top At_Offset_2 005e 01d6 | | Execute Vector,Field_Write 005f 4801 |H | Short_Literal 0x1 0060 4804 |H | Short_Literal 0x4 0061 00da | | Load_Top At_Offset_2 0062 01d6 | | Execute Vector,Field_Write 0063 4801 |H | Short_Literal 0x1 0064 4805 |H | Short_Literal 0x5 0065 00da | | Load_Top At_Offset_2 0066 01d6 | | Execute Vector,Field_Write 0067 4801 |H | Short_Literal 0x1 0068 4806 |H | Short_Literal 0x6 0069 00da | | Load_Top At_Offset_2 006a 01d6 | | Execute Vector,Field_Write 006b 4801 |H | Short_Literal 0x1 006c 4807 |H | Short_Literal 0x7 006d 00da | | Load_Top At_Offset_2 006e 01d6 | | Execute Vector,Field_Write 006f 4800 |H | Short_Literal 0x0 0070 4800 |H | Short_Literal 0x0 0071 00da | | Load_Top At_Offset_2 0072 01d6 | | Execute Vector,Field_Write 0073 4800 |H | Short_Literal 0x0 0074 4808 |H | Short_Literal 0x8 0075 00da | | Load_Top At_Offset_2 0076 01d6 | | Execute Vector,Field_Write 0077 480f |H | Short_Literal 0xf 0078 480a |H | Short_Literal 0xa 0079 4800 |H | Short_Literal 0x0 007a 00d9 | | Load_Top At_Offset_1 007b e22a | * | Load 0x1,0x2a 007c 01d6 | | Execute Vector,Field_Write 007d 3ffb |? | Loop_Increasing 0x79 007e e002 | | Load 0x0,0x2 007f 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0080 01c3 | | Execute Vector,Check_In_Type 0081 e002 | | Load 0x0,0x2 0082 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0083 e002 | | Load 0x0,0x2 0084 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0085 03f1 | | Declare_Variable Discrete,With_Value 0086 e002 | | Load 0x0,0x2 0087 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0088 0337 | 7 | Declare_Variable Array 0089 4801 |H | Short_Literal 0x1 008a 4803 |H | Short_Literal 0x3 008b 00da | | Load_Top At_Offset_2 008c 01d6 | | Execute Vector,Field_Write 008d 4802 |H | Short_Literal 0x2 008e 4800 |H | Short_Literal 0x0 008f 4800 |H | Short_Literal 0x0 0090 00d9 | | Load_Top At_Offset_1 0091 e22b | + | Load 0x1,0x2b 0092 01d6 | | Execute Vector,Field_Write 0093 3ffb |? | Loop_Increasing 0x8f 0094 480f |H | Short_Literal 0xf 0095 4804 |H | Short_Literal 0x4 0096 4800 |H | Short_Literal 0x0 0097 00d9 | | Load_Top At_Offset_1 0098 e22b | + | Load 0x1,0x2b 0099 01d6 | | Execute Vector,Field_Write 009a 3ffb |? | Loop_Increasing 0x96 009b e002 | | Load 0x0,0x2 009c 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 009d 01c3 | | Execute Vector,Check_In_Type 009e e002 | | Load 0x0,0x2 009f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00a0 e002 | | Load 0x0,0x2 00a1 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 00a2 03f1 | | Declare_Variable Discrete,With_Value 00a3 e002 | | Load 0x0,0x2 00a4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 00a5 0337 | 7 | Declare_Variable Array 00a6 4801 |H | Short_Literal 0x1 00a7 4801 |H | Short_Literal 0x1 00a8 00da | | Load_Top At_Offset_2 00a9 01d6 | | Execute Vector,Field_Write 00aa 4801 |H | Short_Literal 0x1 00ab 4802 |H | Short_Literal 0x2 00ac 00da | | Load_Top At_Offset_2 00ad 01d6 | | Execute Vector,Field_Write 00ae 4801 |H | Short_Literal 0x1 00af 4803 |H | Short_Literal 0x3 00b0 00da | | Load_Top At_Offset_2 00b1 01d6 | | Execute Vector,Field_Write 00b2 4801 |H | Short_Literal 0x1 00b3 4809 |H | Short_Literal 0x9 00b4 00da | | Load_Top At_Offset_2 00b5 01d6 | | Execute Vector,Field_Write 00b6 4801 |H | Short_Literal 0x1 00b7 4804 |H | Short_Literal 0x4 00b8 00da | | Load_Top At_Offset_2 00b9 01d6 | | Execute Vector,Field_Write 00ba 4801 |H | Short_Literal 0x1 00bb 4805 |H | Short_Literal 0x5 00bc 00da | | Load_Top At_Offset_2 00bd 01d6 | | Execute Vector,Field_Write 00be 4801 |H | Short_Literal 0x1 00bf 4806 |H | Short_Literal 0x6 00c0 00da | | Load_Top At_Offset_2 00c1 01d6 | | Execute Vector,Field_Write 00c2 4801 |H | Short_Literal 0x1 00c3 4807 |H | Short_Literal 0x7 00c4 00da | | Load_Top At_Offset_2 00c5 01d6 | | Execute Vector,Field_Write 00c6 4801 |H | Short_Literal 0x1 00c7 4808 |H | Short_Literal 0x8 00c8 00da | | Load_Top At_Offset_2 00c9 01d6 | | Execute Vector,Field_Write 00ca 4800 |H | Short_Literal 0x0 00cb 4800 |H | Short_Literal 0x0 00cc 00da | | Load_Top At_Offset_2 00cd 01d6 | | Execute Vector,Field_Write 00ce 480f |H | Short_Literal 0xf 00cf 480a |H | Short_Literal 0xa 00d0 4800 |H | Short_Literal 0x0 00d1 00d9 | | Load_Top At_Offset_1 00d2 e22c | , | Load 0x1,0x2c 00d3 01d6 | | Execute Vector,Field_Write 00d4 3ffb |? | Loop_Increasing 0xd0 00d5 e002 | | Load 0x0,0x2 00d6 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 00d7 01c3 | | Execute Vector,Check_In_Type 00d8 e002 | | Load 0x0,0x2 00d9 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00da e002 | | Load 0x0,0x2 00db 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 00dc 03f1 | | Declare_Variable Discrete,With_Value 00dd e002 | | Load 0x0,0x2 00de 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 00df 0337 | 7 | Declare_Variable Array 00e0 4801 |H | Short_Literal 0x1 00e1 480d |H | Short_Literal 0xd 00e2 00da | | Load_Top At_Offset_2 00e3 01d6 | | Execute Vector,Field_Write 00e4 480c |H | Short_Literal 0xc 00e5 4800 |H | Short_Literal 0x0 00e6 4800 |H | Short_Literal 0x0 00e7 00d9 | | Load_Top At_Offset_1 00e8 e22d | - | Load 0x1,0x2d 00e9 01d6 | | Execute Vector,Field_Write 00ea 3ffb |? | Loop_Increasing 0xe6 00eb 4800 |H | Short_Literal 0x0 00ec 480e |H | Short_Literal 0xe 00ed 00da | | Load_Top At_Offset_2 00ee 01d6 | | Execute Vector,Field_Write 00ef 4800 |H | Short_Literal 0x0 00f0 480f |H | Short_Literal 0xf 00f1 00da | | Load_Top At_Offset_2 00f2 01d6 | | Execute Vector,Field_Write 00f3 e002 | | Load 0x0,0x2 00f4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 00f5 01c3 | | Execute Vector,Check_In_Type 00f6 e002 | | Load 0x0,0x2 00f7 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00f8 e002 | | Load 0x0,0x2 00f9 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 00fa 03f1 | | Declare_Variable Discrete,With_Value 00fb e002 | | Load 0x0,0x2 00fc 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 00fd 0337 | 7 | Declare_Variable Array 00fe 4801 |H | Short_Literal 0x1 00ff 480e |H | Short_Literal 0xe 0100 00da | | Load_Top At_Offset_2 0101 01d6 | | Execute Vector,Field_Write 0102 4801 |H | Short_Literal 0x1 0103 480d |H | Short_Literal 0xd 0104 00da | | Load_Top At_Offset_2 0105 01d6 | | Execute Vector,Field_Write 0106 480c |H | Short_Literal 0xc 0107 4800 |H | Short_Literal 0x0 0108 4800 |H | Short_Literal 0x0 0109 00d9 | | Load_Top At_Offset_1 010a e22e | . | Load 0x1,0x2e 010b 01d6 | | Execute Vector,Field_Write 010c 3ffb |? | Loop_Increasing 0x108 010d 4800 |H | Short_Literal 0x0 010e 480f |H | Short_Literal 0xf 010f 00da | | Load_Top At_Offset_2 0110 01d6 | | Execute Vector,Field_Write 0111 e002 | | Load 0x0,0x2 0112 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0113 01c3 | | Execute Vector,Check_In_Type 0114 e002 | | Load 0x0,0x2 0115 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0116 e002 | | Load 0x0,0x2 0117 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0118 03f1 | | Declare_Variable Discrete,With_Value 0119 e002 | | Load 0x0,0x2 011a 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 011b 0337 | 7 | Declare_Variable Array 011c 4801 |H | Short_Literal 0x1 011d 480f |H | Short_Literal 0xf 011e 00da | | Load_Top At_Offset_2 011f 01d6 | | Execute Vector,Field_Write 0120 480e |H | Short_Literal 0xe 0121 4800 |H | Short_Literal 0x0 0122 4800 |H | Short_Literal 0x0 0123 00d9 | | Load_Top At_Offset_1 0124 e22f | / | Load 0x1,0x2f 0125 01d6 | | Execute Vector,Field_Write 0126 3ffb |? | Loop_Increasing 0x122 0127 e002 | | Load 0x0,0x2 0128 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0129 01c3 | | Execute Vector,Check_In_Type 012a e002 | | Load 0x0,0x2 012b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 012c e002 | | Load 0x0,0x2 012d 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 012e 03f1 | | Declare_Variable Discrete,With_Value 012f 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call 0131 029d 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call 0133 029d 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call 0135 a003 | | Store_Unchecked 0x0,0x3 0136 00c6 | | Action Check_Subprogram_Elaborated 0137 00e2 | | Load_Encached Integer_Cache 0138 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 0139 4800 |H | Short_Literal 0x0 013a 0093 0000 | | push_full_address 0x0 013c 60f3 |` | Indirect_Literal Discrete,0x230,{0x80000000, 0x00060000} 013d 0273 | s | Execute Discrete,Plus 013e e004 | | Load 0x0,0x4 013f 0273 | s | Execute Discrete,Plus 0140 e005 | | Load 0x0,0x5 0141 0273 | s | Execute Discrete,Plus 0142 4800 |H | Short_Literal 0x0 0143 0007 | | Action Break_Optional 0144 029d 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call 0146 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call 0148 a006 | | Store_Unchecked 0x0,0x6 0149 00c6 | | Action Check_Subprogram_Elaborated 014a 00e2 | | Load_Encached Integer_Cache 014b 00e2 | | Load_Encached Integer_Cache 014c 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 014d 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 014e 0093 0000 | | push_full_address 0x0 0150 60db |` | Indirect_Literal Discrete,0x22c,{0x80000000, 0x00050000} 0151 0273 | s | Execute Discrete,Plus 0152 e004 | | Load 0x0,0x4 0153 0273 | s | Execute Discrete,Plus 0154 e007 | | Load 0x0,0x7 0155 0273 | s | Execute Discrete,Plus 0156 4800 |H | Short_Literal 0x0 0157 0007 | | Action Break_Optional 0158 029d 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call 015a 029d 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call 015c 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call 015e 029d 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call 0160 029d 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call 0162 029d 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call 0164 029d 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call 0166 029d 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call 0168 029d 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call 016a 029d 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call 016c 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call 016e 029d 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call 0170 029d 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call 0172 029d 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call 0174 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call 0176 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call 0178 029d 061b | | Declare_Subprogram INIT_0618,For_Outer_Call 017a 029d 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call 017c 029d 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call 017e 029d 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call 0180 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call 0182 a006 | | Store_Unchecked 0x0,0x6 0183 00c6 | | Action Check_Subprogram_Elaborated 0184 00e2 | | Load_Encached Integer_Cache 0185 00e2 | | Load_Encached Integer_Cache 0186 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0187 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 0188 0093 0000 | | push_full_address 0x0 018a 609d |` | Indirect_Literal Discrete,0x228,{0x80000000, 0x00040000} 018b 0273 | s | Execute Discrete,Plus 018c e004 | | Load 0x0,0x4 018d 0273 | s | Execute Discrete,Plus 018e e008 | | Load 0x0,0x8 018f 0273 | s | Execute Discrete,Plus 0190 4800 |H | Short_Literal 0x0 0191 0007 | | Action Break_Optional 0192 029d 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call 0194 a003 | | Store_Unchecked 0x0,0x3 0195 00c6 | | Action Check_Subprogram_Elaborated 0196 00e2 | | Load_Encached Integer_Cache 0197 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b 0198 4800 |H | Short_Literal 0x0 0199 0093 0000 | | push_full_address 0x0 019b 6088 |` | Indirect_Literal Discrete,0x224,{0x80000000, 0x00030000} 019c 0273 | s | Execute Discrete,Plus 019d e004 | | Load 0x0,0x4 019e 0273 | s | Execute Discrete,Plus 019f e009 | | Load 0x0,0x9 01a0 0273 | s | Execute Discrete,Plus 01a1 4800 |H | Short_Literal 0x0 01a2 0007 | | Action Break_Optional 01a3 029d 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call 01a5 029d 0703 | | Declare_Subprogram INIT_0700,For_Outer_Call 01a7 029d 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call 01a9 029d 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call 01ab 029d 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call 01ad a006 | | Store_Unchecked 0x0,0x6 01ae 00c6 | | Action Check_Subprogram_Elaborated 01af 00e2 | | Load_Encached Integer_Cache 01b0 00e2 | | Load_Encached Integer_Cache 01b1 1d64 | d | Execute_Immediate Reference_Lex_1,0x64 01b2 1d65 | e | Execute_Immediate Reference_Lex_1,0x65 01b3 0093 0000 | | push_full_address 0x0 01b5 606a |`j | Indirect_Literal Discrete,0x220,{0x80000000, 0x00020000} 01b6 0273 | s | Execute Discrete,Plus 01b7 e004 | | Load 0x0,0x4 01b8 0273 | s | Execute Discrete,Plus 01b9 e00a | | Load 0x0,0xa 01ba 0273 | s | Execute Discrete,Plus 01bb 4800 |H | Short_Literal 0x0 01bc 0007 | | Action Break_Optional 01bd 029d 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call 01bf 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call 01c1 029d 080b | | Declare_Subprogram INIT_0808,For_Outer_Call 01c3 029d 081b | | Declare_Subprogram INIT_0818,For_Outer_Call 01c5 a003 | | Store_Unchecked 0x0,0x3 01c6 00c6 | | Action Check_Subprogram_Elaborated 01c7 e001 | | Load 0x0,0x1 01c8 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 01c9 4800 |H | Short_Literal 0x0 01ca 0093 0000 | | push_full_address 0x0 01cc 604f |`O | Indirect_Literal Discrete,0x21c,{0x80000000, 0x00010000} 01cd 0273 | s | Execute Discrete,Plus 01ce e004 | | Load 0x0,0x4 01cf 0273 | s | Execute Discrete,Plus 01d0 e00b | | Load 0x0,0xb 01d1 0273 | s | Execute Discrete,Plus 01d2 4800 |H | Short_Literal 0x0 01d3 0007 | | Action Break_Optional 01d4 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call 01d6 029d 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call 01d8 029d 0863 | c| Declare_Subprogram INIT_0860,For_Outer_Call 01da 029d 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call 01dc 4820 |H | Short_Literal 0x20 01dd 0299 08f3 | | Declare_Subprogram INIT_08f0,For_Accept 01df 029f 08fb | | Declare_Subprogram INIT_08f8,For_Call 01e1 00bc | | Action Signal_Activated 01e2 BODY_0008: 01e2 BODY_0008: 01e2 1d79 | y | Execute_Immediate Reference_Lex_1,0x79 01e3 1d20 | | Execute_Immediate Reference_Lex_1,0x20 01e4 0137 | 7 | Execute Entry,Rendezvous 01e5 00cf | | Action Mark_Auxiliary 01e6 4864 |Hd | Short_Literal 0x64 01e7 4801 |H | Short_Literal 0x1 01e8 0007 | | Action Break_Optional 01e9 4800 |H | Short_Literal 0x0 01ea 00d9 | | Load_Top At_Offset_1 01eb e00c | | Load 0x0,0xc 01ec 01d5 | | Execute Vector,Field_Reference 01ed 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01ee 00c8 | | Action Pop_Auxiliary_Range 01ef 3ff9 |? | Loop_Increasing 0x1e9 01f0 00ce | | Action Pop_Auxiliary 01f1 4801 |H | Short_Literal 0x1 01f2 a225 | % | Store_Unchecked 0x1,0x25 01f3 00cf | | Action Mark_Auxiliary 01f4 827a | z | Call 0x1,0x7a 01f5 00c9 | | Action Pop_Auxiliary_Loop 01f6 7ffd | | Jump 0x1f4 01f7 0000 | | .XXX[0x1] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0217 | | .CONST 0x0217 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 00db | | Load_Top At_Offset_3 01fc e002 | | Load 0x0,0x2 01fd 181e | | Execute Package,Field_Execute,Field_Number 0x1e 01fe e5fd | | Load 0x2,-0x3 01ff 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0200 00da | | Load_Top At_Offset_2 0201 800d | | Call 0x0,0xd 0202 7007 |p | Jump_Nonzero 0x20a 0203 00db | | Load_Top At_Offset_3 0204 00db | | Load_Top At_Offset_3 0205 e00e | | Load 0x0,0xe 0206 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0207 e002 | | Load 0x0,0x2 0208 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0209 4503 |E | Exit_Suprogram New_Top_Offset 0x3 020a 4801 |H | Short_Literal 0x1 020b 00db | | Load_Top At_Offset_3 020c 800f | | Call 0x0,0xf 020d 00da | | Load_Top At_Offset_2 020e 800d | | Call 0x0,0xd 020f 7006 |p | Jump_Nonzero 0x216 0210 00db | | Load_Top At_Offset_3 0211 00db | | Load_Top At_Offset_3 0212 e00e | | Load 0x0,0xe 0213 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0214 e002 | | Load 0x0,0x2 0215 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0216 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0217 TRAP_01f8: 0217 0007 | | Action Break_Optional 0218 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0219 0000 0000 | | .XXX[0x3] 021b 0000 | | 021c 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0220 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0224 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 0228 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 022c 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 0230 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 0234 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0238 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 023c 0000 0000 | | .BLANK 0000[0x4] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 00cf | | Action Mark_Auxiliary 0244 e010 | | Load 0x0,0x10 0245 4801 |H | Short_Literal 0x1 0246 0263 | c | Execute Discrete,Above_Bound 0247 7026 |p& | Jump_Nonzero 0x26e 0248 00d8 | | Load_Top At_Offset_0 0249 e011 | | Load 0x0,0x11 024a 01d5 | | Execute Vector,Field_Reference 024b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 024c e012 | | Load 0x0,0x12 024d 027e | ~ | Execute Discrete,Not_Equal 024e 681d |h | Jump_Zero 0x26c 024f 00d8 | | Load_Top At_Offset_0 0250 e011 | | Load 0x0,0x11 0251 01d5 | | Execute Vector,Field_Reference 0252 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0253 e013 | | Load 0x0,0x13 0254 027f | | Execute Discrete,Equal 0255 7007 |p | Jump_Nonzero 0x25d 0256 00d8 | | Load_Top At_Offset_0 0257 e011 | | Load 0x0,0x11 0258 01d5 | | Execute Vector,Field_Reference 0259 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 025a e5ff | | Load 0x2,-0x1 025b 027f | | Execute Discrete,Equal 025c 680f |h | Jump_Zero 0x26c 025d 00d8 | | Load_Top At_Offset_0 025e e011 | | Load 0x0,0x11 025f 01d5 | | Execute Vector,Field_Reference 0260 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0261 8014 | | Call 0x0,0x14 0262 027f | | Execute Discrete,Equal 0263 7006 |p | Jump_Nonzero 0x26a 0264 00d8 | | Load_Top At_Offset_0 0265 e011 | | Load 0x0,0x11 0266 01d5 | | Execute Vector,Field_Reference 0267 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0268 8015 | | Call 0x0,0x15 0269 7002 |p | Jump_Nonzero 0x26c 026a 4801 |H | Short_Literal 0x1 026b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 026c 00c8 | | Action Pop_Auxiliary_Range 026d 3fda |? | Loop_Increasing 0x248 026e 00ce | | Action Pop_Auxiliary 026f 4800 |H | Short_Literal 0x0 0270 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0271 0000 0000 | | .BLANK 0000[0x7] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b 00cf | | Action Mark_Auxiliary 027c e010 | | Load 0x0,0x10 027d 4801 |H | Short_Literal 0x1 027e 0263 | c | Execute Discrete,Above_Bound 027f 701f |p | Jump_Nonzero 0x29f 0280 00d8 | | Load_Top At_Offset_0 0281 e011 | | Load 0x0,0x11 0282 01d5 | | Execute Vector,Field_Reference 0283 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0284 e012 | | Load 0x0,0x12 0285 027e | ~ | Execute Discrete,Not_Equal 0286 6816 |h | Jump_Zero 0x29d 0287 00d8 | | Load_Top At_Offset_0 0288 e011 | | Load 0x0,0x11 0289 01d5 | | Execute Vector,Field_Reference 028a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 028b e013 | | Load 0x0,0x13 028c 027f | | Execute Discrete,Equal 028d 7007 |p | Jump_Nonzero 0x295 028e 00d8 | | Load_Top At_Offset_0 028f e011 | | Load 0x0,0x11 0290 01d5 | | Execute Vector,Field_Reference 0291 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0292 e5ff | | Load 0x2,-0x1 0293 027f | | Execute Discrete,Equal 0294 6808 |h | Jump_Zero 0x29d 0295 00d8 | | Load_Top At_Offset_0 0296 e011 | | Load 0x0,0x11 0297 01d5 | | Execute Vector,Field_Reference 0298 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0299 8015 | | Call 0x0,0x15 029a 6802 |h | Jump_Zero 0x29d 029b 4801 |H | Short_Literal 0x1 029c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 029d 00c8 | | Action Pop_Auxiliary_Range 029e 3fe1 |? | Loop_Increasing 0x280 029f 00ce | | Action Pop_Auxiliary 02a0 4800 |H | Short_Literal 0x0 02a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a2 0000 0000 | | .BLANK 0000[0x6] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab e5ff | | Load 0x2,-0x1 02ac e5fe | | Load 0x2,-0x2 02ad 0278 | x | Execute Discrete,Or 02ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02af 0831 | 1 | .XXX[0x1] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02bb | | .CONST 0x02bb ; Address of begin 02b1 0353 | S | .CONST 0x0353 ; Address of exception handler 02b2 0005 | | .CONST 0x0005 ; Number of locals 02b3 INIT_02b0: 02b3 e22f | / | Load 0x1,0x2f 02b4 0007 | | Action Break_Optional 02b5 00e1 | | Load_Encached Boolean_Cache 02b6 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 02b7 00e1 | | Load_Encached Boolean_Cache 02b8 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 02b9 029f 093b | ;| Declare_Subprogram INIT_0938,For_Call 02bb BODY_02b0: 02bb e016 | | Load 0x0,0x16 02bc 6804 |h | Jump_Zero 0x2c1 02bd e22a | * | Load 0x1,0x2a 02be 4801 |H | Short_Literal 0x1 02bf 4801 |H | Short_Literal 0x1 02c0 8405 | | Call 0x2,0x5 02c1 e5ff | | Load 0x2,-0x1 02c2 8017 | | Call 0x0,0x17 02c3 6804 |h | Jump_Zero 0x2c8 02c4 e22a | * | Load 0x1,0x2a 02c5 4800 |H | Short_Literal 0x0 02c6 4801 |H | Short_Literal 0x1 02c7 8405 | | Call 0x2,0x5 02c8 e5ff | | Load 0x2,-0x1 02c9 e018 | | Load 0x0,0x18 02ca 027f | | Execute Discrete,Equal 02cb 6804 |h | Jump_Zero 0x2d0 02cc e22a | * | Load 0x1,0x2a 02cd 4801 |H | Short_Literal 0x1 02ce 4800 |H | Short_Literal 0x0 02cf 8405 | | Call 0x2,0x5 02d0 e019 | | Load 0x0,0x19 02d1 6804 |h | Jump_Zero 0x2d6 02d2 e22a | * | Load 0x1,0x2a 02d3 4801 |H | Short_Literal 0x1 02d4 4800 |H | Short_Literal 0x0 02d5 8405 | | Call 0x2,0x5 02d6 e01a | | Load 0x0,0x1a 02d7 0c01 | | Execute_Immediate Greater_Equal,0x1 02d8 6817 |h | Jump_Zero 0x2f0 02d9 e5ff | | Load 0x2,-0x1 02da 801b | | Call 0x0,0x1b 02db 6805 |h | Jump_Zero 0x2e1 02dc e22c | , | Load 0x1,0x2c 02dd 4800 |H | Short_Literal 0x0 02de 4800 |H | Short_Literal 0x0 02df 8405 | | Call 0x2,0x5 02e0 780f |x | Jump 0x2f0 02e1 e5ff | | Load 0x2,-0x1 02e2 801c | | Call 0x0,0x1c 02e3 6805 |h | Jump_Zero 0x2e9 02e4 e22a | * | Load 0x1,0x2a 02e5 4800 |H | Short_Literal 0x0 02e6 4800 |H | Short_Literal 0x0 02e7 8405 | | Call 0x2,0x5 02e8 7807 |x | Jump 0x2f0 02e9 e5ff | | Load 0x2,-0x1 02ea 801d | | Call 0x0,0x1d 02eb 6804 |h | Jump_Zero 0x2f0 02ec e22b | + | Load 0x1,0x2b 02ed 4800 |H | Short_Literal 0x0 02ee 4800 |H | Short_Literal 0x0 02ef 8405 | | Call 0x2,0x5 02f0 e5fe | | Load 0x2,-0x2 02f1 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 02f2 6804 |h | Jump_Zero 0x2f7 02f3 e22a | * | Load 0x1,0x2a 02f4 4800 |H | Short_Literal 0x0 02f5 4800 |H | Short_Literal 0x0 02f6 8405 | | Call 0x2,0x5 02f7 e01e | | Load 0x0,0x1e 02f8 0c01 | | Execute_Immediate Greater_Equal,0x1 02f9 6825 |h% | Jump_Zero 0x31f 02fa e5ff | | Load 0x2,-0x1 02fb 801f | | Call 0x0,0x1f 02fc 6808 |h | Jump_Zero 0x305 02fd e22c | , | Load 0x1,0x2c 02fe 4800 |H | Short_Literal 0x0 02ff 4800 |H | Short_Literal 0x0 0300 8405 | | Call 0x2,0x5 0301 4801 |H | Short_Literal 0x1 0302 e5fe | | Load 0x2,-0x2 0303 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0304 781d |x | Jump 0x322 0305 e5ff | | Load 0x2,-0x1 0306 8020 | | Call 0x0,0x20 0307 6808 |h | Jump_Zero 0x310 0308 e22a | * | Load 0x1,0x2a 0309 4800 |H | Short_Literal 0x0 030a 4800 |H | Short_Literal 0x0 030b 8405 | | Call 0x2,0x5 030c 4801 |H | Short_Literal 0x1 030d e5fe | | Load 0x2,-0x2 030e 380e |8 | Execute Record,Field_Write,Field_Number 0xe 030f 7812 |x | Jump 0x322 0310 e5ff | | Load 0x2,-0x1 0311 8021 | ! | Call 0x0,0x21 0312 6808 |h | Jump_Zero 0x31b 0313 e22b | + | Load 0x1,0x2b 0314 4800 |H | Short_Literal 0x0 0315 4800 |H | Short_Literal 0x0 0316 8405 | | Call 0x2,0x5 0317 4801 |H | Short_Literal 0x1 0318 e5fe | | Load 0x2,-0x2 0319 380e |8 | Execute Record,Field_Write,Field_Number 0xe 031a 7807 |x | Jump 0x322 031b 4800 |H | Short_Literal 0x0 031c e5fe | | Load 0x2,-0x2 031d 380e |8 | Execute Record,Field_Write,Field_Number 0xe 031e 7803 |x | Jump 0x322 031f 4800 |H | Short_Literal 0x0 0320 e5fe | | Load 0x2,-0x2 0321 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0322 e5fe | | Load 0x2,-0x2 0323 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0324 6804 |h | Jump_Zero 0x329 0325 e22a | * | Load 0x1,0x2a 0326 4800 |H | Short_Literal 0x0 0327 4800 |H | Short_Literal 0x0 0328 8405 | | Call 0x2,0x5 0329 e5ff | | Load 0x2,-0x1 032a e022 | " | Load 0x0,0x22 032b 027f | | Execute Discrete,Equal 032c 6804 |h | Jump_Zero 0x331 032d e22c | , | Load 0x1,0x2c 032e 4801 |H | Short_Literal 0x1 032f 4800 |H | Short_Literal 0x0 0330 8405 | | Call 0x2,0x5 0331 e5fe | | Load 0x2,-0x2 0332 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0333 6804 |h | Jump_Zero 0x338 0334 e22e | . | Load 0x1,0x2e 0335 4801 |H | Short_Literal 0x1 0336 4801 |H | Short_Literal 0x1 0337 8405 | | Call 0x2,0x5 0338 e5ff | | Load 0x2,-0x1 0339 8227 | ' | Call 0x1,0x27 033a 6804 |h | Jump_Zero 0x33f 033b e22e | . | Load 0x1,0x2e 033c 4801 |H | Short_Literal 0x1 033d 4801 |H | Short_Literal 0x1 033e 8405 | | Call 0x2,0x5 033f e5ff | | Load 0x2,-0x1 0340 8228 | ( | Call 0x1,0x28 0341 6804 |h | Jump_Zero 0x346 0342 e22d | - | Load 0x1,0x2d 0343 4801 |H | Short_Literal 0x1 0344 4801 |H | Short_Literal 0x1 0345 8405 | | Call 0x2,0x5 0346 e5fe | | Load 0x2,-0x2 0347 e402 | | Load 0x2,0x2 0348 e002 | | Load 0x0,0x2 0349 181f | | Execute Package,Field_Execute,Field_Number 0x1f 034a e5ff | | Load 0x2,-0x1 034b 8226 | & | Call 0x1,0x26 034c 00d1 | | Pop_Control Pop_Count_1 034d 00d9 | | Load_Top At_Offset_1 034e 00db | | Load_Top At_Offset_3 034f e5ff | | Load 0x2,-0x1 0350 8023 | # | Call 0x0,0x23 0351 8024 | $ | Call 0x0,0x24 0352 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0353 TRAP_02b0: 0353 0007 | | Action Break_Optional 0354 e5ff | | Load 0x2,-0x1 0355 e002 | | Load 0x0,0x2 0356 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0357 7004 |p | Jump_Nonzero 0x35c 0358 4800 |H | Short_Literal 0x0 0359 4802 |H | Short_Literal 0x2 035a e5ff | | Load 0x2,-0x1 035b 8025 | % | Call 0x0,0x25 035c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 035d 0000 0000 | | .XXX[0x3] 035f 0000 | | 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 e026 | & | Load 0x0,0x26 0364 e5fe | | Load 0x2,-0x2 0365 e5ff | | Load 0x2,-0x1 0366 8230 | 0 | Call 0x1,0x30 0367 00d1 | | Pop_Control Pop_Count_1 0368 c026 | & | Store 0x0,0x26 0369 4502 |E | Exit_Suprogram New_Top_Offset 0x2 036a 0000 0000 | | .BLANK 0000[0x6] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 BODY_0370: 0373 INIT_0370: 0373 INIT_0370: 0373 e5fd | | Load 0x2,-0x3 0374 00e2 | | Load_Encached Integer_Cache 0375 025e | ^ | Execute Discrete,Convert 0376 e5fe | | Load 0x2,-0x2 0377 e5ff | | Load 0x2,-0x1 0378 e027 | ' | Load 0x0,0x27 0379 1b15 | | Execute Package,Field_Read,Field_Number 0x15 037a 00d9 | | Load_Top At_Offset_1 037b 00d0 | | Action Swap_Control 037c 0260 | ` | Execute Discrete,In_Type 037d 7001 |p | Jump_Nonzero 0x37f 037e 0801 | | Execute_Immediate Raise,0x1 037f 8230 | 0 | Call 0x1,0x30 0380 00d1 | | Pop_Control Pop_Count_1 0381 c5fd | | Store 0x2,-0x3 0382 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0383 0000 0000 | | .BLANK 0000[0x5] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 038b | | .CONST 0x038b ; Address of begin 0389 0004 | | .CONST 0x0004 ; Address of exception handler 038a 0001 | | .CONST 0x0001 ; Number of locals 038b BODY_0388: 038b INIT_0388: 038b e5fd | | Load 0x2,-0x3 038c 00d8 | | Load_Top At_Offset_0 038d 00e2 | | Load_Encached Integer_Cache 038e 0260 | ` | Execute Discrete,In_Type 038f 7001 |p | Jump_Nonzero 0x391 0390 0801 | | Execute_Immediate Raise,0x1 0391 e5fe | | Load 0x2,-0x2 0392 e5ff | | Load 0x2,-0x1 0393 e027 | ' | Load 0x0,0x27 0394 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0395 00d9 | | Load_Top At_Offset_1 0396 00d0 | | Action Swap_Control 0397 0260 | ` | Execute Discrete,In_Type 0398 7001 |p | Jump_Nonzero 0x39a 0399 0801 | | Execute_Immediate Raise,0x1 039a 8028 | ( | Call 0x0,0x28 039b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 039c 0000 0000 | | .BLANK 0000[0x4] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a5 | | .CONST 0x03a5 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0002 | | .CONST 0x0002 ; Number of locals 03a3 INIT_03a0: 03a3 029f 094b | K| Declare_Subprogram INIT_0948,For_Call 03a5 BODY_03a0: 03a5 00db | | Load_Top At_Offset_3 03a6 e013 | | Load 0x0,0x13 03a7 027f | | Execute Discrete,Equal 03a8 680a |h | Jump_Zero 0x3b3 03a9 e026 | & | Load 0x0,0x26 03aa 00d8 | | Load_Top At_Offset_0 03ab e23a | : | Load 0x1,0x3a 03ac e23b | ; | Load 0x1,0x3b 03ad 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 03ae 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 03af 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 03b0 8006 | | Call 0x0,0x6 03b1 c026 | & | Store 0x0,0x26 03b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03b3 8402 | | Call 0x2,0x2 03b4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03b5 0000 0000 | | .XXX[0x3] 03b7 0000 | | 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bf | | .CONST 0x03bf ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0003 | | .CONST 0x0003 ; Number of locals 03bb INIT_03b8: 03bb 029f 095b | [| Declare_Subprogram INIT_0958,For_Call 03bd 029f 0983 | | Declare_Subprogram INIT_0980,For_Call 03bf BODY_03b8: 03bf e5fe | | Load 0x2,-0x2 03c0 e029 | ) | Load 0x0,0x29 03c1 027f | | Execute Discrete,Equal 03c2 6802 |h | Jump_Zero 0x3c5 03c3 e02a | * | Load 0x0,0x2a 03c4 0257 | W | Execute Discrete,Raise 03c5 e5ff | | Load 0x2,-0x1 03c6 e013 | | Load 0x0,0x13 03c7 027f | | Execute Discrete,Equal 03c8 6826 |h& | Jump_Zero 0x3ef 03c9 00cf | | Action Mark_Auxiliary 03ca e02b | + | Load 0x0,0x2b 03cb 4801 |H | Short_Literal 0x1 03cc 0263 | c | Execute Discrete,Above_Bound 03cd 700d |p | Jump_Nonzero 0x3db 03ce 00d8 | | Load_Top At_Offset_0 03cf e02c | , | Load 0x0,0x2c 03d0 01d7 | | Execute Vector,Field_Read 03d1 e029 | ) | Load 0x0,0x29 03d2 027f | | Execute Discrete,Equal 03d3 6805 |h | Jump_Zero 0x3d9 03d4 00d8 | | Load_Top At_Offset_0 03d5 8402 | | Call 0x2,0x2 03d6 e013 | | Load 0x0,0x13 03d7 8240 | @ | Call 0x1,0x40 03d8 4507 |E | Exit_Suprogram New_Top_Offset 0x7 03d9 00c8 | | Action Pop_Auxiliary_Range 03da 3ff3 |? | Loop_Increasing 0x3ce 03db 00ce | | Action Pop_Auxiliary 03dc e016 | | Load 0x0,0x16 03dd 0f14 | | Execute_Immediate Equal,0x14 03de 6802 |h | Jump_Zero 0x3e1 03df e02d | - | Load 0x0,0x2d 03e0 0257 | W | Execute Discrete,Raise 03e1 e02b | + | Load 0x0,0x2b 03e2 0a01 | | Execute_Immediate Plus,0x1 03e3 00d8 | | Load_Top At_Offset_0 03e4 00e3 | | Load_Encached Natural_Cache 03e5 0260 | ` | Execute Discrete,In_Type 03e6 7001 |p | Jump_Nonzero 0x3e8 03e7 0801 | | Execute_Immediate Raise,0x1 03e8 8402 | | Call 0x2,0x2 03e9 e02b | + | Load 0x0,0x2b 03ea 0a01 | | Execute_Immediate Plus,0x1 03eb c02b | + | Store 0x0,0x2b 03ec e013 | | Load 0x0,0x13 03ed 8240 | @ | Call 0x1,0x40 03ee 4507 |E | Exit_Suprogram New_Top_Offset 0x7 03ef 00cf | | Action Mark_Auxiliary 03f0 e02e | . | Load 0x0,0x2e 03f1 4801 |H | Short_Literal 0x1 03f2 0263 | c | Execute Discrete,Above_Bound 03f3 700e |p | Jump_Nonzero 0x402 03f4 00d8 | | Load_Top At_Offset_0 03f5 e02f | / | Load 0x0,0x2f 03f6 01d5 | | Execute Vector,Field_Reference 03f7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03f8 e029 | ) | Load 0x0,0x29 03f9 027f | | Execute Discrete,Equal 03fa 6805 |h | Jump_Zero 0x400 03fb 00d8 | | Load_Top At_Offset_0 03fc 8403 | | Call 0x2,0x3 03fd e5ff | | Load 0x2,-0x1 03fe 8240 | @ | Call 0x1,0x40 03ff 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0400 00c8 | | Action Pop_Auxiliary_Range 0401 3ff2 |? | Loop_Increasing 0x3f4 0402 00ce | | Action Pop_Auxiliary 0403 e030 | 0 | Load 0x0,0x30 0404 0f1e | | Execute_Immediate Equal,0x1e 0405 6802 |h | Jump_Zero 0x408 0406 e031 | 1 | Load 0x0,0x31 0407 0257 | W | Execute Discrete,Raise 0408 e02e | . | Load 0x0,0x2e 0409 0a01 | | Execute_Immediate Plus,0x1 040a 00d8 | | Load_Top At_Offset_0 040b 00e3 | | Load_Encached Natural_Cache 040c 0260 | ` | Execute Discrete,In_Type 040d 7001 |p | Jump_Nonzero 0x40f 040e 0801 | | Execute_Immediate Raise,0x1 040f 8403 | | Call 0x2,0x3 0410 e02e | . | Load 0x0,0x2e 0411 0a01 | | Execute_Immediate Plus,0x1 0412 c02e | . | Store 0x0,0x2e 0413 e5ff | | Load 0x2,-0x1 0414 8240 | @ | Call 0x1,0x40 0415 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0416 0000 0000 | | .XXX[0x2] 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 041b | | .CONST 0x041b ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0001 | | .CONST 0x0001 ; Number of locals 041b BODY_0418: 041b INIT_0418: 041b 00da | | Load_Top At_Offset_2 041c c032 | 2 | Store 0x0,0x32 041d 4801 |H | Short_Literal 0x1 041e c019 | | Store 0x0,0x19 041f e013 | | Load 0x0,0x13 0420 8240 | @ | Call 0x1,0x40 0421 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0422 0000 0000 | | .BLANK 0000[0x6] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b 00db | | Load_Top At_Offset_3 042c e5fd | | Load 0x2,-0x3 042d 380a |8 | Execute Record,Field_Write,Field_Number 0xa 042e 4801 |H | Short_Literal 0x1 042f e5fd | | Load 0x2,-0x3 0430 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0431 e5fd | | Load 0x2,-0x3 0432 00db | | Load_Top At_Offset_3 0433 8231 | 1 | Call 0x1,0x31 0434 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0435 0000 0000 | | .XXX[0x3] 0437 0000 | | 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0001 | | .CONST 0x0001 ; Number of locals 043b BODY_0438: 043b INIT_0438: 043b e018 | | Load 0x0,0x18 043c e013 | | Load 0x0,0x13 043d 027f | | Execute Discrete,Equal 043e 7004 |p | Jump_Nonzero 0x443 043f e018 | | Load 0x0,0x18 0440 00db | | Load_Top At_Offset_3 0441 027f | | Execute Discrete,Equal 0442 680e |h | Jump_Zero 0x451 0443 e013 | | Load 0x0,0x13 0444 c018 | | Store 0x0,0x18 0445 00db | | Load_Top At_Offset_3 0446 c033 | 3 | Store 0x0,0x33 0447 e5fd | | Load 0x2,-0x3 0448 c034 | 4 | Store 0x0,0x34 0449 e5fc | | Load 0x2,-0x4 044a c035 | 5 | Store 0x0,0x35 044b 4800 |H | Short_Literal 0x0 044c e5fb | | Load 0x2,-0x5 044d 380b |8 | Execute Record,Field_Write,Field_Number 0xb 044e 00da | | Load_Top At_Offset_2 044f c018 | | Store 0x0,0x18 0450 7809 |x | Jump 0x45a 0451 e5fd | | Load 0x2,-0x3 0452 e5fb | | Load 0x2,-0x5 0453 380c |8 | Execute Record,Field_Write,Field_Number 0xc 0454 e5fc | | Load 0x2,-0x4 0455 e5fb | | Load 0x2,-0x5 0456 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0457 00db | | Load_Top At_Offset_3 0458 e5fb | | Load 0x2,-0x5 0459 380b |8 | Execute Record,Field_Write,Field_Number 0xb 045a e5fb | | Load 0x2,-0x5 045b 00db | | Load_Top At_Offset_3 045c 8231 | 1 | Call 0x1,0x31 045d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 045e 0000 0000 | | .XXX[0x2] 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0467 | g | .CONST 0x0467 ; Address of begin 0461 0004 | | .CONST 0x0004 ; Address of exception handler 0462 0003 | | .CONST 0x0003 ; Number of locals 0463 INIT_0460: 0463 029f 09b3 | | Declare_Subprogram INIT_09b0,For_Call 0465 029f 09db | | Declare_Subprogram INIT_09d8,For_Call 0467 BODY_0460: 0467 8403 | | Call 0x2,0x3 0468 4801 |H | Short_Literal 0x1 0469 e5f8 | | Load 0x2,-0x8 046a 380e |8 | Execute Record,Field_Write,Field_Number 0xe 046b e5f8 | | Load 0x2,-0x8 046c e5ff | | Load 0x2,-0x1 046d 8231 | 1 | Call 0x1,0x31 046e 4508 |E | Exit_Suprogram New_Top_Offset 0x8 046f 0000 | | .XXX[0x1] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 047e | ~ | .CONST 0x047e ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0005 | | .CONST 0x0005 ; Number of locals 0473 INIT_0470: 0473 e036 | 6 | Load 0x0,0x36 0474 0337 | 7 | Declare_Variable Array 0475 e037 | 7 | Load 0x0,0x37 0476 00d9 | | Load_Top At_Offset_1 0477 01d4 | | Execute Vector,Structure_Write 0478 00e3 | | Load_Encached Natural_Cache 0479 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 047a 029f 0a13 | | Declare_Subprogram INIT_0a10,For_Call 047c 029f 0a43 | C| Declare_Subprogram INIT_0a40,For_Call 047e BODY_0470: 047e e5fc | | Load 0x2,-0x4 047f e038 | 8 | Load 0x0,0x38 0480 017f | | Execute Record,Equal 0481 6801 |h | Jump_Zero 0x483 0482 781e |x | Jump 0x4a1 0483 e5fb | | Load 0x2,-0x5 0484 0f00 | | Execute_Immediate Equal,0x0 0485 680b |h | Jump_Zero 0x491 0486 00e3 | | Load_Encached Natural_Cache 0487 e402 | | Load 0x2,0x2 0488 e5fc | | Load 0x2,-0x4 0489 e5fa | | Load 0x2,-0x6 048a 8039 | 9 | Call 0x0,0x39 048b 00d1 | | Pop_Control Pop_Count_1 048c 005b | [ | Store_Top Discrete,At_Offset_3 048d 00da | | Load_Top At_Offset_2 048e 7012 |p | Jump_Nonzero 0x4a1 048f e02a | * | Load 0x0,0x2a 0490 0257 | W | Execute Discrete,Raise 0491 e5fb | | Load 0x2,-0x5 0492 e5fc | | Load 0x2,-0x4 0493 e5fa | | Load 0x2,-0x6 0494 803a | : | Call 0x0,0x3a 0495 4801 |H | Short_Literal 0x1 0496 e402 | | Load 0x2,0x2 0497 01d5 | | Execute Vector,Field_Reference 0498 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0499 4801 |H | Short_Literal 0x1 049a e402 | | Load 0x2,0x2 049b 01d5 | | Execute Vector,Field_Reference 049c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 049d 4801 |H | Short_Literal 0x1 049e e402 | | Load 0x2,0x2 049f 01d5 | | Execute Vector,Field_Reference 04a0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04a1 00da | | Load_Top At_Offset_2 04a2 7002 |p | Jump_Nonzero 0x4a5 04a3 4801 |H | Short_Literal 0x1 04a4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 04a5 8405 | | Call 0x2,0x5 04a6 e5ff | | Load 0x2,-0x1 04a7 8240 | @ | Call 0x1,0x40 04a8 4508 |E | Exit_Suprogram New_Top_Offset 0x8 04a9 0000 0000 | | .BLANK 0000[0x7] 04b0 ; -------------------------------------------------------------------------------------- 04b0 ; SUBPROGRAM 04b0 ; -------------------------------------------------------------------------------------- 04b0 04b3 | | .CONST 0x04b3 ; Address of begin 04b1 0004 | | .CONST 0x0004 ; Address of exception handler 04b2 0001 | | .CONST 0x0001 ; Number of locals 04b3 BODY_04b0: 04b3 INIT_04b0: 04b3 e022 | " | Load 0x0,0x22 04b4 e013 | | Load 0x0,0x13 04b5 027f | | Execute Discrete,Equal 04b6 7006 |p | Jump_Nonzero 0x4bd 04b7 e022 | " | Load 0x0,0x22 04b8 00db | | Load_Top At_Offset_3 04b9 027f | | Execute Discrete,Equal 04ba 7002 |p | Jump_Nonzero 0x4bd 04bb e03b | ; | Load 0x0,0x3b 04bc 0257 | W | Execute Discrete,Raise 04bd 00db | | Load_Top At_Offset_3 04be c03c | < | Store 0x0,0x3c 04bf e5fd | | Load 0x2,-0x3 04c0 c03d | = | Store 0x0,0x3d 04c1 00da | | Load_Top At_Offset_2 04c2 c022 | " | Store 0x0,0x22 04c3 00da | | Load_Top At_Offset_2 04c4 8240 | @ | Call 0x1,0x40 04c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04c6 0000 0000 | | .XXX[0x2] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cf | | .CONST 0x04cf ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0003 | | .CONST 0x0003 ; Number of locals 04cb INIT_04c8: 04cb 029f 0a93 | | Declare_Subprogram INIT_0a90,For_Call 04cd 029f 0ac3 | | Declare_Subprogram INIT_0ac0,For_Call 04cf BODY_04c8: 04cf 00cf | | Action Mark_Auxiliary 04d0 e010 | | Load 0x0,0x10 04d1 4801 |H | Short_Literal 0x1 04d2 0263 | c | Execute Discrete,Above_Bound 04d3 700b |p | Jump_Nonzero 0x4df 04d4 00d8 | | Load_Top At_Offset_0 04d5 e011 | | Load 0x0,0x11 04d6 01d5 | | Execute Vector,Field_Reference 04d7 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 04d8 e5f8 | | Load 0x2,-0x8 04d9 027f | | Execute Discrete,Equal 04da 6802 |h | Jump_Zero 0x4dd 04db e223 | # | Load 0x1,0x23 04dc 0257 | W | Execute Discrete,Raise 04dd 00c8 | | Action Pop_Auxiliary_Range 04de 3ff5 |? | Loop_Increasing 0x4d4 04df 00ce | | Action Pop_Auxiliary 04e0 8403 | | Call 0x2,0x3 04e1 e5ff | | Load 0x2,-0x1 04e2 8240 | @ | Call 0x1,0x40 04e3 4509 |E | Exit_Suprogram New_Top_Offset 0x9 04e4 0000 0000 | | .BLANK 0000[0x4] 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; SUBPROGRAM 04e8 ; -------------------------------------------------------------------------------------- 04e8 04eb | | .CONST 0x04eb ; Address of begin 04e9 0004 | | .CONST 0x0004 ; Address of exception handler 04ea 0001 | | .CONST 0x0001 ; Number of locals 04eb BODY_04e8: 04eb INIT_04e8: 04eb e5f9 | | Load 0x2,-0x7 04ec e5fa | | Load 0x2,-0x6 04ed 600a |` | Indirect_Literal Discrete,0x4f8,{0x00000000, 0x7fffffff} 04ee e5fb | | Load 0x2,-0x5 04ef e5fc | | Load 0x2,-0x4 04f0 e5fd | | Load 0x2,-0x3 04f1 e5fe | | Load 0x2,-0x2 04f2 e5ff | | Load 0x2,-0x1 04f3 8248 | H | Call 0x1,0x48 04f4 4508 |E | Exit_Suprogram New_Top_Offset 0x8 04f5 0000 0000 | | .XXX[0x3] 04f7 0000 | | 04f8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 04fc 0000 0000 | | .BLANK 0000[0x4] 0500 ; -------------------------------------------------------------------------------------- 0500 ; SUBPROGRAM 0500 ; -------------------------------------------------------------------------------------- 0500 0503 | | .CONST 0x0503 ; Address of begin 0501 0004 | | .CONST 0x0004 ; Address of exception handler 0502 0001 | | .CONST 0x0001 ; Number of locals 0503 BODY_0500: 0503 INIT_0500: 0503 00da | | Load_Top At_Offset_2 0504 e02c | , | Load 0x0,0x2c 0505 01d7 | | Execute Vector,Field_Read 0506 e029 | ) | Load 0x0,0x29 0507 027f | | Execute Discrete,Equal 0508 701e |p | Jump_Nonzero 0x527 0509 e029 | ) | Load 0x0,0x29 050a 00db | | Load_Top At_Offset_3 050b e02c | , | Load 0x0,0x2c 050c 01d6 | | Execute Vector,Field_Write 050d e016 | | Load 0x0,0x16 050e 0aff | | Execute_Immediate Plus,-0x1 050f c016 | | Store 0x0,0x16 0510 00da | | Load_Top At_Offset_2 0511 e02b | + | Load 0x0,0x2b 0512 027f | | Execute Discrete,Equal 0513 680f |h | Jump_Zero 0x523 0514 00cf | | Action Mark_Auxiliary 0515 e02b | + | Load 0x0,0x2b 0516 0aff | | Execute_Immediate Plus,-0x1 0517 c02b | + | Store 0x0,0x2b 0518 e02b | + | Load 0x0,0x2b 0519 6808 |h | Jump_Zero 0x522 051a e02b | + | Load 0x0,0x2b 051b e02c | , | Load 0x0,0x2c 051c 01d7 | | Execute Vector,Field_Read 051d e029 | ) | Load 0x0,0x29 051e 027f | | Execute Discrete,Equal 051f 6802 |h | Jump_Zero 0x522 0520 00c9 | | Action Pop_Auxiliary_Loop 0521 7ff3 | | Jump 0x515 0522 00ce | | Action Pop_Auxiliary 0523 e016 | | Load 0x0,0x16 0524 7002 |p | Jump_Nonzero 0x527 0525 e013 | | Load 0x0,0x13 0526 8240 | @ | Call 0x1,0x40 0527 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 052d | - | .CONST 0x052d ; Address of begin 0529 0004 | | .CONST 0x0004 ; Address of exception handler 052a 0002 | | .CONST 0x0002 ; Number of locals 052b INIT_0528: 052b 00e1 | | Load_Encached Boolean_Cache 052c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 052d BODY_0528: 052d 00cf | | Action Mark_Auxiliary 052e e02b | + | Load 0x0,0x2b 052f 4801 |H | Short_Literal 0x1 0530 0263 | c | Execute Discrete,Above_Bound 0531 702d |p- | Jump_Nonzero 0x55f 0532 00d8 | | Load_Top At_Offset_0 0533 e02c | , | Load 0x0,0x2c 0534 01d7 | | Execute Vector,Field_Read 0535 e029 | ) | Load 0x0,0x29 0536 027f | | Execute Discrete,Equal 0537 7025 |p% | Jump_Nonzero 0x55d 0538 00d8 | | Load_Top At_Offset_0 0539 e03e | > | Load 0x0,0x3e 053a 01d5 | | Execute Vector,Field_Reference 053b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 053c e5ff | | Load 0x2,-0x1 053d 027f | | Execute Discrete,Equal 053e 681e |h | Jump_Zero 0x55d 053f e029 | ) | Load 0x0,0x29 0540 00d9 | | Load_Top At_Offset_1 0541 e02c | , | Load 0x0,0x2c 0542 01d6 | | Execute Vector,Field_Write 0543 e016 | | Load 0x0,0x16 0544 0aff | | Execute_Immediate Plus,-0x1 0545 c016 | | Store 0x0,0x16 0546 4801 |H | Short_Literal 0x1 0547 a402 | | Store_Unchecked 0x2,0x2 0548 00d8 | | Load_Top At_Offset_0 0549 e02b | + | Load 0x0,0x2b 054a 027f | | Execute Discrete,Equal 054b 6811 |h | Jump_Zero 0x55d 054c 00cf | | Action Mark_Auxiliary 054d e02b | + | Load 0x0,0x2b 054e 0aff | | Execute_Immediate Plus,-0x1 054f c02b | + | Store 0x0,0x2b 0550 e02b | + | Load 0x0,0x2b 0551 6808 |h | Jump_Zero 0x55a 0552 e02b | + | Load 0x0,0x2b 0553 e02c | , | Load 0x0,0x2c 0554 01d7 | | Execute Vector,Field_Read 0555 e029 | ) | Load 0x0,0x29 0556 027f | | Execute Discrete,Equal 0557 6802 |h | Jump_Zero 0x55a 0558 00c9 | | Action Pop_Auxiliary_Loop 0559 7ff3 | | Jump 0x54d 055a 00ce | | Action Pop_Auxiliary 055b 00d2 | | Pop_Control Pop_Count_2 055c 7802 |x | Jump 0x55f 055d 00c8 | | Action Pop_Auxiliary_Range 055e 3fd3 |? | Loop_Increasing 0x532 055f 00c9 | | Action Pop_Auxiliary_Loop 0560 e02e | . | Load 0x0,0x2e 0561 4801 |H | Short_Literal 0x1 0562 0263 | c | Execute Discrete,Above_Bound 0563 7031 |p1 | Jump_Nonzero 0x595 0564 00d8 | | Load_Top At_Offset_0 0565 e02f | / | Load 0x0,0x2f 0566 01d5 | | Execute Vector,Field_Reference 0567 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0568 e029 | ) | Load 0x0,0x29 0569 027f | | Execute Discrete,Equal 056a 7028 |p( | Jump_Nonzero 0x593 056b 00d8 | | Load_Top At_Offset_0 056c e02f | / | Load 0x0,0x2f 056d 01d5 | | Execute Vector,Field_Reference 056e 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 056f e5ff | | Load 0x2,-0x1 0570 027f | | Execute Discrete,Equal 0571 6821 |h! | Jump_Zero 0x593 0572 e029 | ) | Load 0x0,0x29 0573 00d9 | | Load_Top At_Offset_1 0574 e02f | / | Load 0x0,0x2f 0575 01d5 | | Execute Vector,Field_Reference 0576 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0577 e030 | 0 | Load 0x0,0x30 0578 0aff | | Execute_Immediate Plus,-0x1 0579 c030 | 0 | Store 0x0,0x30 057a 00d8 | | Load_Top At_Offset_0 057b e02e | . | Load 0x0,0x2e 057c 027f | | Execute Discrete,Equal 057d 6810 |h | Jump_Zero 0x58e 057e 00cf | | Action Mark_Auxiliary 057f e02e | . | Load 0x0,0x2e 0580 0aff | | Execute_Immediate Plus,-0x1 0581 c02e | . | Store 0x0,0x2e 0582 e02e | . | Load 0x0,0x2e 0583 6809 |h | Jump_Zero 0x58d 0584 e02e | . | Load 0x0,0x2e 0585 e02f | / | Load 0x0,0x2f 0586 01d5 | | Execute Vector,Field_Reference 0587 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0588 e029 | ) | Load 0x0,0x29 0589 027f | | Execute Discrete,Equal 058a 6802 |h | Jump_Zero 0x58d 058b 00c9 | | Action Pop_Auxiliary_Loop 058c 7ff2 | | Jump 0x57f 058d 00ce | | Action Pop_Auxiliary 058e 00d8 | | Load_Top At_Offset_0 058f e02f | / | Load 0x0,0x2f 0590 01d5 | | Execute Vector,Field_Reference 0591 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0592 8240 | @ | Call 0x1,0x40 0593 00c8 | | Action Pop_Auxiliary_Range 0594 3fcf |? | Loop_Increasing 0x564 0595 00ce | | Action Pop_Auxiliary 0596 00d8 | | Load_Top At_Offset_0 0597 6804 |h | Jump_Zero 0x59c 0598 e016 | | Load 0x0,0x16 0599 7002 |p | Jump_Nonzero 0x59c 059a e013 | | Load 0x0,0x13 059b 8240 | @ | Call 0x1,0x40 059c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 059d 0000 0000 | | .XXX[0x3] 059f 0000 | | 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 e032 | 2 | Load 0x0,0x32 05a4 00db | | Load_Top At_Offset_3 05a5 027f | | Execute Discrete,Equal 05a6 6806 |h | Jump_Zero 0x5ad 05a7 4800 |H | Short_Literal 0x0 05a8 c019 | | Store 0x0,0x19 05a9 e012 | | Load 0x0,0x12 05aa c032 | 2 | Store 0x0,0x32 05ab e013 | | Load 0x0,0x13 05ac 8240 | @ | Call 0x1,0x40 05ad 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05ae 0000 0000 | | .XXX[0x2] 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b5 | | .CONST 0x05b5 ; Address of begin 05b1 0004 | | .CONST 0x0004 ; Address of exception handler 05b2 0002 | | .CONST 0x0002 ; Number of locals 05b3 INIT_05b0: 05b3 e002 | | Load 0x0,0x2 05b4 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 05b5 BODY_05b0: 05b5 e018 | | Load 0x0,0x18 05b6 e013 | | Load 0x0,0x13 05b7 027f | | Execute Discrete,Equal 05b8 700c |p | Jump_Nonzero 0x5c5 05b9 e035 | 5 | Load 0x0,0x35 05ba e5ff | | Load 0x2,-0x1 05bb 027f | | Execute Discrete,Equal 05bc 6808 |h | Jump_Zero 0x5c5 05bd e018 | | Load 0x0,0x18 05be 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 05bf e013 | | Load 0x0,0x13 05c0 c018 | | Store 0x0,0x18 05c1 e012 | | Load 0x0,0x12 05c2 c035 | 5 | Store 0x0,0x35 05c3 00d8 | | Load_Top At_Offset_0 05c4 8240 | @ | Call 0x1,0x40 05c5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05c6 0000 0000 | | .XXX[0x2] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cd | | .CONST 0x05cd ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0002 | | .CONST 0x0002 ; Number of locals 05cb INIT_05c8: 05cb e002 | | Load 0x0,0x2 05cc 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 05cd BODY_05c8: 05cd e022 | " | Load 0x0,0x22 05ce e013 | | Load 0x0,0x13 05cf 027f | | Execute Discrete,Equal 05d0 700c |p | Jump_Nonzero 0x5dd 05d1 00db | | Load_Top At_Offset_3 05d2 e03d | = | Load 0x0,0x3d 05d3 027e | ~ | Execute Discrete,Not_Equal 05d4 6802 |h | Jump_Zero 0x5d7 05d5 e224 | $ | Load 0x1,0x24 05d6 0257 | W | Execute Discrete,Raise 05d7 e022 | " | Load 0x0,0x22 05d8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 05d9 e013 | | Load 0x0,0x13 05da c022 | " | Store 0x0,0x22 05db 00d8 | | Load_Top At_Offset_0 05dc 8240 | @ | Call 0x1,0x40 05dd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05de 0000 0000 | | .XXX[0x2] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05e3 | | .CONST 0x05e3 ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 0001 | | .CONST 0x0001 ; Number of locals 05e3 BODY_05e0: 05e3 INIT_05e0: 05e3 00cf | | Action Mark_Auxiliary 05e4 e03f | ? | Load 0x0,0x3f 05e5 4801 |H | Short_Literal 0x1 05e6 0263 | c | Execute Discrete,Above_Bound 05e7 702a |p* | Jump_Nonzero 0x612 05e8 00d8 | | Load_Top At_Offset_0 05e9 e040 | @ | Load 0x0,0x40 05ea 01d5 | | Execute Vector,Field_Reference 05eb 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 05ec e5ff | | Load 0x2,-0x1 05ed 027f | | Execute Discrete,Equal 05ee 6821 |h! | Jump_Zero 0x610 05ef e012 | | Load 0x0,0x12 05f0 00d9 | | Load_Top At_Offset_1 05f1 e040 | @ | Load 0x0,0x40 05f2 01d5 | | Execute Vector,Field_Reference 05f3 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 05f4 e01e | | Load 0x0,0x1e 05f5 0aff | | Execute_Immediate Plus,-0x1 05f6 c01e | | Store 0x0,0x1e 05f7 00d8 | | Load_Top At_Offset_0 05f8 e03f | ? | Load 0x0,0x3f 05f9 027f | | Execute Discrete,Equal 05fa 6810 |h | Jump_Zero 0x60b 05fb 00cf | | Action Mark_Auxiliary 05fc e03f | ? | Load 0x0,0x3f 05fd 0aff | | Execute_Immediate Plus,-0x1 05fe c03f | ? | Store 0x0,0x3f 05ff e03f | ? | Load 0x0,0x3f 0600 6809 |h | Jump_Zero 0x60a 0601 e03f | ? | Load 0x0,0x3f 0602 e040 | @ | Load 0x0,0x40 0603 01d5 | | Execute Vector,Field_Reference 0604 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0605 e012 | | Load 0x0,0x12 0606 027e | ~ | Execute Discrete,Not_Equal 0607 7002 |p | Jump_Nonzero 0x60a 0608 00c9 | | Action Pop_Auxiliary_Loop 0609 7ff2 | | Jump 0x5fc 060a 00ce | | Action Pop_Auxiliary 060b 00d8 | | Load_Top At_Offset_0 060c e040 | @ | Load 0x0,0x40 060d 01d5 | | Execute Vector,Field_Reference 060e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 060f 8240 | @ | Call 0x1,0x40 0610 00c8 | | Action Pop_Auxiliary_Range 0611 3fd6 |? | Loop_Increasing 0x5e8 0612 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0613 0000 0000 | | .BLANK 0000[0x5] 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 061b | | .CONST 0x061b ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0001 | | .CONST 0x0001 ; Number of locals 061b BODY_0618: 061b INIT_0618: 061b 00cf | | Action Mark_Auxiliary 061c e041 | A | Load 0x0,0x41 061d 4801 |H | Short_Literal 0x1 061e 0263 | c | Execute Discrete,Above_Bound 061f 702a |p* | Jump_Nonzero 0x64a 0620 00d8 | | Load_Top At_Offset_0 0621 e042 | B | Load 0x0,0x42 0622 01d5 | | Execute Vector,Field_Reference 0623 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0624 e5ff | | Load 0x2,-0x1 0625 027f | | Execute Discrete,Equal 0626 6821 |h! | Jump_Zero 0x648 0627 e012 | | Load 0x0,0x12 0628 00d9 | | Load_Top At_Offset_1 0629 e042 | B | Load 0x0,0x42 062a 01d5 | | Execute Vector,Field_Reference 062b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 062c e01a | | Load 0x0,0x1a 062d 0aff | | Execute_Immediate Plus,-0x1 062e c01a | | Store 0x0,0x1a 062f 00d8 | | Load_Top At_Offset_0 0630 e041 | A | Load 0x0,0x41 0631 027f | | Execute Discrete,Equal 0632 6810 |h | Jump_Zero 0x643 0633 00cf | | Action Mark_Auxiliary 0634 e041 | A | Load 0x0,0x41 0635 0aff | | Execute_Immediate Plus,-0x1 0636 c041 | A | Store 0x0,0x41 0637 e041 | A | Load 0x0,0x41 0638 6809 |h | Jump_Zero 0x642 0639 e041 | A | Load 0x0,0x41 063a e042 | B | Load 0x0,0x42 063b 01d5 | | Execute Vector,Field_Reference 063c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 063d e012 | | Load 0x0,0x12 063e 027e | ~ | Execute Discrete,Not_Equal 063f 7002 |p | Jump_Nonzero 0x642 0640 00c9 | | Action Pop_Auxiliary_Loop 0641 7ff2 | | Jump 0x634 0642 00ce | | Action Pop_Auxiliary 0643 00d8 | | Load_Top At_Offset_0 0644 e042 | B | Load 0x0,0x42 0645 01d5 | | Execute Vector,Field_Reference 0646 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0647 8240 | @ | Call 0x1,0x40 0648 00c8 | | Action Pop_Auxiliary_Range 0649 3fd6 |? | Loop_Increasing 0x620 064a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 064b 0000 0000 | | .BLANK 0000[0x5] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0653 | S | .CONST 0x0653 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0001 | | .CONST 0x0001 ; Number of locals 0653 BODY_0650: 0653 INIT_0650: 0653 00cf | | Action Mark_Auxiliary 0654 e010 | | Load 0x0,0x10 0655 4801 |H | Short_Literal 0x1 0656 0263 | c | Execute Discrete,Above_Bound 0657 7031 |p1 | Jump_Nonzero 0x689 0658 00d8 | | Load_Top At_Offset_0 0659 e011 | | Load 0x0,0x11 065a 01d5 | | Execute Vector,Field_Reference 065b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 065c e012 | | Load 0x0,0x12 065d 027e | ~ | Execute Discrete,Not_Equal 065e 6828 |h( | Jump_Zero 0x687 065f 00d8 | | Load_Top At_Offset_0 0660 e011 | | Load 0x0,0x11 0661 01d5 | | Execute Vector,Field_Reference 0662 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0663 e5ff | | Load 0x2,-0x1 0664 027f | | Execute Discrete,Equal 0665 6821 |h! | Jump_Zero 0x687 0666 e012 | | Load 0x0,0x12 0667 00d9 | | Load_Top At_Offset_1 0668 e011 | | Load 0x0,0x11 0669 01d5 | | Execute Vector,Field_Reference 066a 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 066b e043 | C | Load 0x0,0x43 066c 0aff | | Execute_Immediate Plus,-0x1 066d c043 | C | Store 0x0,0x43 066e 00d8 | | Load_Top At_Offset_0 066f e010 | | Load 0x0,0x10 0670 027f | | Execute Discrete,Equal 0671 6810 |h | Jump_Zero 0x682 0672 00cf | | Action Mark_Auxiliary 0673 e010 | | Load 0x0,0x10 0674 0aff | | Execute_Immediate Plus,-0x1 0675 c010 | | Store 0x0,0x10 0676 e010 | | Load 0x0,0x10 0677 6809 |h | Jump_Zero 0x681 0678 e010 | | Load 0x0,0x10 0679 e011 | | Load 0x0,0x11 067a 01d5 | | Execute Vector,Field_Reference 067b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 067c e012 | | Load 0x0,0x12 067d 027e | ~ | Execute Discrete,Not_Equal 067e 7002 |p | Jump_Nonzero 0x681 067f 00c9 | | Action Pop_Auxiliary_Loop 0680 7ff2 | | Jump 0x673 0681 00ce | | Action Pop_Auxiliary 0682 00d8 | | Load_Top At_Offset_0 0683 e011 | | Load 0x0,0x11 0684 01d5 | | Execute Vector,Field_Reference 0685 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0686 8240 | @ | Call 0x1,0x40 0687 00c8 | | Action Pop_Auxiliary_Range 0688 3fcf |? | Loop_Increasing 0x658 0689 4502 |E | Exit_Suprogram New_Top_Offset 0x2 068a 0000 0000 | | .BLANK 0000[0x6] 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 0693 | | .CONST 0x0693 ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0001 | | .CONST 0x0001 ; Number of locals 0693 BODY_0690: 0693 INIT_0690: 0693 00db | | Load_Top At_Offset_3 0694 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0695 680e |h | Jump_Zero 0x6a4 0696 00db | | Load_Top At_Offset_3 0697 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0698 e5fd | | Load 0x2,-0x3 0699 027f | | Execute Discrete,Equal 069a 6809 |h | Jump_Zero 0x6a4 069b 4800 |H | Short_Literal 0x0 069c e5fe | | Load 0x2,-0x2 069d 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 069e e026 | & | Load 0x0,0x26 069f e5fe | | Load 0x2,-0x2 06a0 e5ff | | Load 0x2,-0x1 06a1 8230 | 0 | Call 0x1,0x30 06a2 00d1 | | Pop_Control Pop_Count_1 06a3 c026 | & | Store 0x0,0x26 06a4 00db | | Load_Top At_Offset_3 06a5 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 06a6 680e |h | Jump_Zero 0x6b5 06a7 00db | | Load_Top At_Offset_3 06a8 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 06a9 e5fd | | Load 0x2,-0x3 06aa 027f | | Execute Discrete,Equal 06ab 6809 |h | Jump_Zero 0x6b5 06ac 4800 |H | Short_Literal 0x0 06ad e5fe | | Load 0x2,-0x2 06ae 380b |8 | Execute Record,Field_Write,Field_Number 0xb 06af e026 | & | Load 0x0,0x26 06b0 e5fe | | Load 0x2,-0x2 06b1 e5ff | | Load 0x2,-0x1 06b2 8230 | 0 | Call 0x1,0x30 06b3 00d1 | | Pop_Control Pop_Count_1 06b4 c026 | & | Store 0x0,0x26 06b5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06b6 0000 0000 | | .XXX[0x2] 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06bb | | .CONST 0x06bb ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0001 | | .CONST 0x0001 ; Number of locals 06bb BODY_06b8: 06bb BODY_06b8: 06bb INIT_06b8: 06bb INIT_06b8: 06bb e5fd | | Load 0x2,-0x3 06bc 00e2 | | Load_Encached Integer_Cache 06bd 025e | ^ | Execute Discrete,Convert 06be e5fe | | Load 0x2,-0x2 06bf e5ff | | Load 0x2,-0x1 06c0 e027 | ' | Load 0x0,0x27 06c1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 06c2 00d9 | | Load_Top At_Offset_1 06c3 00d0 | | Action Swap_Control 06c4 0260 | ` | Execute Discrete,In_Type 06c5 7001 |p | Jump_Nonzero 0x6c7 06c6 0801 | | Execute_Immediate Raise,0x1 06c7 8252 | R | Call 0x1,0x52 06c8 00d1 | | Pop_Control Pop_Count_1 06c9 c5fd | | Store 0x2,-0x3 06ca 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06cb 0000 0000 | | .BLANK 0000[0x5] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06d3 | | .CONST 0x06d3 ; Address of begin 06d1 0004 | | .CONST 0x0004 ; Address of exception handler 06d2 0001 | | .CONST 0x0001 ; Number of locals 06d3 BODY_06d0: 06d3 INIT_06d0: 06d3 e5fd | | Load 0x2,-0x3 06d4 00d8 | | Load_Top At_Offset_0 06d5 00e2 | | Load_Encached Integer_Cache 06d6 0260 | ` | Execute Discrete,In_Type 06d7 7001 |p | Jump_Nonzero 0x6d9 06d8 0801 | | Execute_Immediate Raise,0x1 06d9 e5fe | | Load 0x2,-0x2 06da e5ff | | Load 0x2,-0x1 06db e027 | ' | Load 0x0,0x27 06dc 1b15 | | Execute Package,Field_Read,Field_Number 0x15 06dd 00d9 | | Load_Top At_Offset_1 06de 00d0 | | Action Swap_Control 06df 0260 | ` | Execute Discrete,In_Type 06e0 7001 |p | Jump_Nonzero 0x6e2 06e1 0801 | | Execute_Immediate Raise,0x1 06e2 8028 | ( | Call 0x0,0x28 06e3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 06e4 0000 0000 | | .BLANK 0000[0x4] 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06ee | | .CONST 0x06ee ; Address of begin 06e9 06f7 | | .CONST 0x06f7 ; Address of exception handler 06ea 0002 | | .CONST 0x0002 ; Number of locals 06eb INIT_06e8: 06eb 00db | | Load_Top At_Offset_3 06ec 00e2 | | Load_Encached Integer_Cache 06ed 03f1 | | Declare_Variable Discrete,With_Value 06ee BODY_06e8: 06ee 00d8 | | Load_Top At_Offset_0 06ef e5ff | | Load 0x2,-0x1 06f0 e25c | \ | Load 0x1,0x5c 06f1 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d 06f2 e25e | ^ | Load 0x1,0x5e 06f3 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 06f4 8003 | | Call 0x0,0x3 06f5 0059 | Y | Store_Top Discrete,At_Offset_1 06f6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06f7 TRAP_06e8: 06f7 0007 | | Action Break_Optional 06f8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06f9 0000 0000 | | .BLANK 0000[0x7] 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0708 | | .CONST 0x0708 ; Address of begin 0701 0004 | | .CONST 0x0004 ; Address of exception handler 0702 0003 | | .CONST 0x0003 ; Number of locals 0703 INIT_0700: 0703 00da | | Load_Top At_Offset_2 0704 00e2 | | Load_Encached Integer_Cache 0705 03f1 | | Declare_Variable Discrete,With_Value 0706 029f 0aeb | | Declare_Subprogram INIT_0ae8,For_Call 0708 BODY_0700: 0708 e044 | D | Load 0x0,0x44 0709 e5ff | | Load 0x2,-0x1 070a 027f | | Execute Discrete,Equal 070b 6804 |h | Jump_Zero 0x710 070c 4800 |H | Short_Literal 0x0 070d c045 | E | Store 0x0,0x45 070e e012 | | Load 0x0,0x12 070f c044 | D | Store 0x0,0x44 0710 e5ff | | Load 0x2,-0x1 0711 824b | K | Call 0x1,0x4b 0712 e5ff | | Load 0x2,-0x1 0713 824c | L | Call 0x1,0x4c 0714 e5ff | | Load 0x2,-0x1 0715 824d | M | Call 0x1,0x4d 0716 8403 | | Call 0x2,0x3 0717 e5ff | | Load 0x2,-0x1 0718 8251 | Q | Call 0x1,0x51 0719 e5ff | | Load 0x2,-0x1 071a 824f | O | Call 0x1,0x4f 071b e5ff | | Load 0x2,-0x1 071c 8250 | P | Call 0x1,0x50 071d 00d9 | | Load_Top At_Offset_1 071e e026 | & | Load 0x0,0x26 071f e255 | U | Load 0x1,0x55 0720 e256 | V | Load 0x1,0x56 0721 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 0722 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 0723 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 0724 8006 | | Call 0x0,0x6 0725 005a | Z | Store_Top Discrete,At_Offset_2 0726 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0727 0000 | | .XXX[0x1] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072b | + | .CONST 0x072b ; Address of begin 0729 0004 | | .CONST 0x0004 ; Address of exception handler 072a 0001 | | .CONST 0x0001 ; Number of locals 072b BODY_0728: 072b INIT_0728: 072b 4800 |H | Short_Literal 0x0 072c e5fe | | Load 0x2,-0x2 072d 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 072e 4800 |H | Short_Literal 0x0 072f e5fe | | Load 0x2,-0x2 0730 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0731 4800 |H | Short_Literal 0x0 0732 e5fe | | Load 0x2,-0x2 0733 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0734 4800 |H | Short_Literal 0x0 0735 e5fe | | Load 0x2,-0x2 0736 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0737 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 073b | ; | .CONST 0x073b ; Address of begin 0739 0004 | | .CONST 0x0004 ; Address of exception handler 073a 0001 | | .CONST 0x0001 ; Number of locals 073b BODY_0738: 073b INIT_0738: 073b e5fd | | Load 0x2,-0x3 073c 00e2 | | Load_Encached Integer_Cache 073d 025e | ^ | Execute Discrete,Convert 073e e5fe | | Load 0x2,-0x2 073f e5ff | | Load 0x2,-0x1 0740 e027 | ' | Load 0x0,0x27 0741 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0742 00d9 | | Load_Top At_Offset_1 0743 00d0 | | Action Swap_Control 0744 0260 | ` | Execute Discrete,In_Type 0745 7001 |p | Jump_Nonzero 0x747 0746 0801 | | Execute_Immediate Raise,0x1 0747 8263 | c | Call 0x1,0x63 0748 00d1 | | Pop_Control Pop_Count_1 0749 c5fd | | Store 0x2,-0x3 074a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 074b 0000 0000 | | .BLANK 0000[0x5] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 e5fd | | Load 0x2,-0x3 0754 00d8 | | Load_Top At_Offset_0 0755 00e2 | | Load_Encached Integer_Cache 0756 0260 | ` | Execute Discrete,In_Type 0757 7001 |p | Jump_Nonzero 0x759 0758 0801 | | Execute_Immediate Raise,0x1 0759 e5fe | | Load 0x2,-0x2 075a e5ff | | Load 0x2,-0x1 075b e027 | ' | Load 0x0,0x27 075c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 075d 00d9 | | Load_Top At_Offset_1 075e 00d0 | | Action Swap_Control 075f 0260 | ` | Execute Discrete,In_Type 0760 7001 |p | Jump_Nonzero 0x762 0761 0801 | | Execute_Immediate Raise,0x1 0762 8028 | ( | Call 0x0,0x28 0763 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0764 0000 0000 | | .BLANK 0000[0x4] 0768 ; -------------------------------------------------------------------------------------- 0768 ; SUBPROGRAM 0768 ; -------------------------------------------------------------------------------------- 0768 076b | k | .CONST 0x076b ; Address of begin 0769 0004 | | .CONST 0x0004 ; Address of exception handler 076a 0001 | | .CONST 0x0001 ; Number of locals 076b BODY_0768: 076b INIT_0768: 076b 4800 |H | Short_Literal 0x0 076c c019 | | Store 0x0,0x19 076d e013 | | Load 0x0,0x13 076e c018 | | Store 0x0,0x18 076f e013 | | Load 0x0,0x13 0770 c022 | " | Store 0x0,0x22 0771 4800 |H | Short_Literal 0x0 0772 c02e | . | Store 0x0,0x2e 0773 4800 |H | Short_Literal 0x0 0774 c030 | 0 | Store 0x0,0x30 0775 4800 |H | Short_Literal 0x0 0776 c02b | + | Store 0x0,0x2b 0777 4800 |H | Short_Literal 0x0 0778 c016 | | Store 0x0,0x16 0779 4800 |H | Short_Literal 0x0 077a c03f | ? | Store 0x0,0x3f 077b 4800 |H | Short_Literal 0x0 077c c01e | | Store 0x0,0x1e 077d 4800 |H | Short_Literal 0x0 077e c010 | | Store 0x0,0x10 077f 4800 |H | Short_Literal 0x0 0780 c043 | C | Store 0x0,0x43 0781 4800 |H | Short_Literal 0x0 0782 c041 | A | Store 0x0,0x41 0783 4800 |H | Short_Literal 0x0 0784 c01a | | Store 0x0,0x1a 0785 4800 |H | Short_Literal 0x0 0786 e046 | F | Load 0x0,0x46 0787 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0788 00cf | | Action Mark_Auxiliary 0789 e047 | G | Load 0x0,0x47 078a 01d9 | | Execute Vector,Reverse_Bounds 078b 0007 | | Action Break_Optional 078c 8048 | H | Call 0x0,0x48 078d 00d9 | | Load_Top At_Offset_1 078e e047 | G | Load 0x0,0x47 078f 01d6 | | Execute Vector,Field_Write 0790 00c8 | | Action Pop_Auxiliary_Range 0791 3ffa |? | Loop_Increasing 0x78c 0792 00ce | | Action Pop_Auxiliary 0793 e026 | & | Load 0x0,0x26 0794 00d8 | | Load_Top At_Offset_0 0795 e266 | f | Load 0x1,0x66 0796 e267 | g | Load 0x1,0x67 0797 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 0798 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 0799 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a 079a 8006 | | Call 0x0,0x6 079b c026 | & | Store 0x0,0x26 079c 8049 | I | Call 0x0,0x49 079d 8240 | @ | Call 0x1,0x40 079e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 079f 0000 | | .XXX[0x1] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a9 | | .CONST 0x07a9 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0003 | | .CONST 0x0003 ; Number of locals 07a3 INIT_07a0: 07a3 e04a | J | Load 0x0,0x4a 07a4 0322 | " | Declare_Variable Record 07a5 00d8 | | Load_Top At_Offset_0 07a6 1c00 | | Execute_Immediate Run_Utility,0x0 07a7 e04b | K | Load 0x0,0x4b 07a8 0007 | | Action Break_Optional 07a9 BODY_07a0: 07a9 e5fd | | Load 0x2,-0x3 07aa e04c | L | Load 0x0,0x4c 07ab 181a | | Execute Package,Field_Execute,Field_Number 0x1a 07ac c5fd | | Store 0x2,-0x3 07ad e5ff | | Load 0x2,-0x1 07ae e035 | 5 | Load 0x0,0x35 07af 027f | | Execute Discrete,Equal 07b0 6803 |h | Jump_Zero 0x7b4 07b1 e033 | 3 | Load 0x0,0x33 07b2 a5fe | | Store_Unchecked 0x2,-0x2 07b3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07b4 e5ff | | Load 0x2,-0x1 07b5 e03d | = | Load 0x0,0x3d 07b6 027f | | Execute Discrete,Equal 07b7 6803 |h | Jump_Zero 0x7bb 07b8 e03c | < | Load 0x0,0x3c 07b9 a5fe | | Store_Unchecked 0x2,-0x2 07ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07bb 00cf | | Action Mark_Auxiliary 07bc e02b | + | Load 0x0,0x2b 07bd 4801 |H | Short_Literal 0x1 07be 0263 | c | Execute Discrete,Above_Bound 07bf 700f |p | Jump_Nonzero 0x7cf 07c0 e5ff | | Load 0x2,-0x1 07c1 00d9 | | Load_Top At_Offset_1 07c2 e03e | > | Load 0x0,0x3e 07c3 01d5 | | Execute Vector,Field_Reference 07c4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 07c5 027f | | Execute Discrete,Equal 07c6 6806 |h | Jump_Zero 0x7cd 07c7 00d8 | | Load_Top At_Offset_0 07c8 e03e | > | Load 0x0,0x3e 07c9 01d5 | | Execute Vector,Field_Reference 07ca 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07cb a5fe | | Store_Unchecked 0x2,-0x2 07cc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07cd 00c8 | | Action Pop_Auxiliary_Range 07ce 3ff1 |? | Loop_Increasing 0x7c0 07cf 00c9 | | Action Pop_Auxiliary_Loop 07d0 e02e | . | Load 0x0,0x2e 07d1 4801 |H | Short_Literal 0x1 07d2 0263 | c | Execute Discrete,Above_Bound 07d3 700f |p | Jump_Nonzero 0x7e3 07d4 e5ff | | Load 0x2,-0x1 07d5 00d9 | | Load_Top At_Offset_1 07d6 e02f | / | Load 0x0,0x2f 07d7 01d5 | | Execute Vector,Field_Reference 07d8 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07d9 027f | | Execute Discrete,Equal 07da 6806 |h | Jump_Zero 0x7e1 07db 00d8 | | Load_Top At_Offset_0 07dc e02f | / | Load 0x0,0x2f 07dd 01d5 | | Execute Vector,Field_Reference 07de 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07df a5fe | | Store_Unchecked 0x2,-0x2 07e0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07e1 00c8 | | Action Pop_Auxiliary_Range 07e2 3ff1 |? | Loop_Increasing 0x7d4 07e3 00ce | | Action Pop_Auxiliary 07e4 e04b | K | Load 0x0,0x4b 07e5 804d | M | Call 0x0,0x4d 07e6 0039 | 9 | Store_Top Access,At_Offset_1 07e7 00cf | | Action Mark_Auxiliary 07e8 7812 |x | Jump 0x7fb 07e9 00d9 | | Load_Top At_Offset_1 07ea 804e | N | Call 0x0,0x4e 07eb 804f | O | Call 0x0,0x4f 07ec 00db | | Load_Top At_Offset_3 07ed 017d | } | Execute Record,Structure_Write 07ee e5ff | | Load 0x2,-0x1 07ef 00db | | Load_Top At_Offset_3 07f0 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 07f1 027f | | Execute Discrete,Equal 07f2 6804 |h | Jump_Zero 0x7f7 07f3 00da | | Load_Top At_Offset_2 07f4 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 07f5 a5fe | | Store_Unchecked 0x2,-0x2 07f6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07f7 00d9 | | Load_Top At_Offset_1 07f8 8050 | P | Call 0x0,0x50 07f9 003a | : | Store_Top Access,At_Offset_2 07fa 00c9 | | Action Pop_Auxiliary_Loop 07fb 00d9 | | Load_Top At_Offset_1 07fc 8051 | Q | Call 0x0,0x51 07fd 6feb |o | Jump_Zero 0x7e9 07fe 00ce | | Action Pop_Auxiliary 07ff 4800 |H | Short_Literal 0x0 0800 a5fe | | Store_Unchecked 0x2,-0x2 0801 e5fd | | Load 0x2,-0x3 0802 e222 | " | Load 0x1,0x22 0803 e04c | L | Load 0x0,0x4c 0804 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0805 c5fd | | Store 0x2,-0x3 0806 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0807 0000 | | .XXX[0x1] 0808 ; -------------------------------------------------------------------------------------- 0808 ; SUBPROGRAM 0808 ; -------------------------------------------------------------------------------------- 0808 080b | | .CONST 0x080b ; Address of begin 0809 0004 | | .CONST 0x0004 ; Address of exception handler 080a 0001 | | .CONST 0x0001 ; Number of locals 080b BODY_0808: 080b INIT_0808: 080b 00db | | Load_Top At_Offset_3 080c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 080d e5fd | | Load 0x2,-0x3 080e e00c | | Load 0x0,0xc 080f 01d5 | | Execute Vector,Field_Reference 0810 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0811 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0812 0000 0000 | | .BLANK 0000[0x6] 0818 ; -------------------------------------------------------------------------------------- 0818 ; SUBPROGRAM 0818 ; -------------------------------------------------------------------------------------- 0818 081b | | .CONST 0x081b ; Address of begin 0819 0004 | | .CONST 0x0004 ; Address of exception handler 081a 0001 | | .CONST 0x0001 ; Number of locals 081b BODY_0818: 081b INIT_0818: 081b e5fd | | Load 0x2,-0x3 081c e001 | | Load 0x0,0x1 081d 025e | ^ | Execute Discrete,Convert 081e e5fe | | Load 0x2,-0x2 081f e5ff | | Load 0x2,-0x1 0820 e027 | ' | Load 0x0,0x27 0821 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0822 00d9 | | Load_Top At_Offset_1 0823 00d0 | | Action Swap_Control 0824 0260 | ` | Execute Discrete,In_Type 0825 7001 |p | Jump_Nonzero 0x827 0826 0801 | | Execute_Immediate Raise,0x1 0827 826e | n | Call 0x1,0x6e 0828 00d1 | | Pop_Control Pop_Count_1 0829 c5fd | | Store 0x2,-0x3 082a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 082b 0000 0000 | | .BLANK 0000[0x5] 0830 ; -------------------------------------------------------------------------------------- 0830 ; SUBPROGRAM 0830 ; -------------------------------------------------------------------------------------- 0830 0836 | 6 | .CONST 0x0836 ; Address of begin 0831 0842 | B | .CONST 0x0842 ; Address of exception handler 0832 0002 | | .CONST 0x0002 ; Number of locals 0833 INIT_0830: 0833 00da | | Load_Top At_Offset_2 0834 e001 | | Load 0x0,0x1 0835 03f1 | | Declare_Variable Discrete,With_Value 0836 BODY_0830: 0836 00d8 | | Load_Top At_Offset_0 0837 e5ff | | Load 0x2,-0x1 0838 e00c | | Load 0x0,0xc 0839 01d5 | | Execute Vector,Field_Reference 083a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 083b e270 | p | Load 0x1,0x70 083c 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 083d e272 | r | Load 0x1,0x72 083e 1d73 | s | Execute_Immediate Reference_Lex_1,0x73 083f 8003 | | Call 0x0,0x3 0840 0059 | Y | Store_Top Discrete,At_Offset_1 0841 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0842 TRAP_0830: 0842 e052 | R | Load 0x0,0x52 0843 010f | | Execute Exception,Equal 0844 6801 |h | Jump_Zero 0x846 0845 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0846 0100 | | Execute Exception,Raise 0847 0000 | | .XXX[0x1] 0848 ; -------------------------------------------------------------------------------------- 0848 ; SUBPROGRAM 0848 ; -------------------------------------------------------------------------------------- 0848 084b | K | .CONST 0x084b ; Address of begin 0849 0004 | | .CONST 0x0004 ; Address of exception handler 084a 0001 | | .CONST 0x0001 ; Number of locals 084b BODY_0848: 084b INIT_0848: 084b 00da | | Load_Top At_Offset_2 084c e5fe | | Load 0x2,-0x2 084d e00c | | Load 0x0,0xc 084e 01d5 | | Execute Vector,Field_Reference 084f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0850 4801 |H | Short_Literal 0x1 0851 e5fe | | Load 0x2,-0x2 0852 e00c | | Load 0x0,0xc 0853 01d5 | | Execute Vector,Field_Reference 0854 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0855 4800 |H | Short_Literal 0x0 0856 e5fe | | Load 0x2,-0x2 0857 e00c | | Load 0x0,0xc 0858 01d5 | | Execute Vector,Field_Reference 0859 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 085a 00db | | Load_Top At_Offset_3 085b 8275 | u | Call 0x1,0x75 085c 00db | | Load_Top At_Offset_3 085d 00db | | Load_Top At_Offset_3 085e 8053 | S | Call 0x0,0x53 085f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0860 ; -------------------------------------------------------------------------------------- 0860 ; SUBPROGRAM 0860 ; -------------------------------------------------------------------------------------- 0860 0863 | c | .CONST 0x0863 ; Address of begin 0861 0004 | | .CONST 0x0004 ; Address of exception handler 0862 0001 | | .CONST 0x0001 ; Number of locals 0863 BODY_0860: 0863 INIT_0860: 0863 00cf | | Action Mark_Auxiliary 0864 4864 |Hd | Short_Literal 0x64 0865 4801 |H | Short_Literal 0x1 0866 0007 | | Action Break_Optional 0867 00d8 | | Load_Top At_Offset_0 0868 e00c | | Load 0x0,0xc 0869 01d5 | | Execute Vector,Field_Reference 086a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 086b 0d0f | | Execute_Immediate Less,0xf 086c 6809 |h | Jump_Zero 0x876 086d 00d8 | | Load_Top At_Offset_0 086e e00c | | Load 0x0,0xc 086f 01d5 | | Execute Vector,Field_Reference 0870 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0871 0a01 | | Execute_Immediate Plus,0x1 0872 00d9 | | Load_Top At_Offset_1 0873 e00c | | Load 0x0,0xc 0874 01d5 | | Execute Vector,Field_Reference 0875 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0876 00c8 | | Action Pop_Auxiliary_Range 0877 3fef |? | Loop_Increasing 0x867 0878 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0879 0000 0000 | | .BLANK 0000[0x7] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0886 | | .CONST 0x0886 ; Address of begin 0881 08e2 | | .CONST 0x08e2 ; Address of exception handler 0882 0003 | | .CONST 0x0003 ; Number of locals 0883 INIT_0880: 0883 00e2 | | Load_Encached Integer_Cache 0884 e002 | | Load 0x0,0x2 0885 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0886 BODY_0880: 0886 00cf | | Action Mark_Auxiliary 0887 4864 |Hd | Short_Literal 0x64 0888 4801 |H | Short_Literal 0x1 0889 0007 | | Action Break_Optional 088a 00d8 | | Load_Top At_Offset_0 088b e00c | | Load 0x0,0xc 088c 01d5 | | Execute Vector,Field_Reference 088d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 088e 7005 |p | Jump_Nonzero 0x894 088f 00d8 | | Load_Top At_Offset_0 0890 e5ff | | Load 0x2,-0x1 0891 8276 | v | Call 0x1,0x76 0892 00d8 | | Load_Top At_Offset_0 0893 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0894 00d8 | | Load_Top At_Offset_0 0895 e00c | | Load 0x0,0xc 0896 01d5 | | Execute Vector,Field_Reference 0897 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0898 a403 | | Store_Unchecked 0x2,0x3 0899 00db | | Load_Top At_Offset_3 089a e002 | | Load 0x0,0x2 089b 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 089c 7005 |p | Jump_Nonzero 0x8a2 089d 00d8 | | Load_Top At_Offset_0 089e e5ff | | Load 0x2,-0x1 089f 8276 | v | Call 0x1,0x76 08a0 00d8 | | Load_Top At_Offset_0 08a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a2 00db | | Load_Top At_Offset_3 08a3 e002 | | Load 0x0,0x2 08a4 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 08a5 0b0d | | Execute_Immediate Case_Compare,0xd 08a6 7003 |p | Jump_Nonzero 0x8aa 08a7 0f07 | | Execute_Immediate Equal,0x7 08a8 7002 |p | Jump_Nonzero 0x8ab 08a9 7809 |x | Jump 0x8b3 08aa 00d1 | | Pop_Control Pop_Count_1 08ab 4800 |H | Short_Literal 0x0 08ac e403 | | Load 0x2,0x3 08ad 8053 | S | Call 0x0,0x53 08ae 00d8 | | Load_Top At_Offset_0 08af e5ff | | Load 0x2,-0x1 08b0 8276 | v | Call 0x1,0x76 08b1 00d8 | | Load_Top At_Offset_0 08b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b3 00c8 | | Action Pop_Auxiliary_Range 08b4 3fd5 |? | Loop_Increasing 0x88a 08b5 00ce | | Action Pop_Auxiliary 08b6 4800 |H | Short_Literal 0x0 08b7 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08b8 00cf | | Action Mark_Auxiliary 08b9 e225 | % | Load 0x1,0x25 08ba 4864 |Hd | Short_Literal 0x64 08bb 026e | n | Execute Discrete,Modulo 08bc 0a01 | | Execute_Immediate Plus,0x1 08bd c225 | % | Store 0x1,0x25 08be e225 | % | Load 0x1,0x25 08bf e00c | | Load 0x0,0xc 08c0 01d5 | | Execute Vector,Field_Reference 08c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08c2 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 08c3 e225 | % | Load 0x1,0x25 08c4 e00c | | Load 0x0,0xc 08c5 01d5 | | Execute Vector,Field_Reference 08c6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 08c7 680d |h | Jump_Zero 0x8d5 08c8 e5ff | | Load 0x2,-0x1 08c9 e225 | % | Load 0x1,0x25 08ca e00c | | Load 0x0,0xc 08cb 01d5 | | Execute Vector,Field_Reference 08cc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 08cd 4800 |H | Short_Literal 0x0 08ce 00da | | Load_Top At_Offset_2 08cf 8053 | S | Call 0x0,0x53 08d0 e225 | % | Load 0x1,0x25 08d1 e5ff | | Load 0x2,-0x1 08d2 8276 | v | Call 0x1,0x76 08d3 e225 | % | Load 0x1,0x25 08d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08d5 00da | | Load_Top At_Offset_2 08d6 0a01 | | Execute_Immediate Plus,0x1 08d7 005b | [ | Store_Top Discrete,At_Offset_3 08d8 00da | | Load_Top At_Offset_2 08d9 0cc9 | | Execute_Immediate Greater_Equal,-0x37 08da 6805 |h | Jump_Zero 0x8e0 08db 8277 | w | Call 0x1,0x77 08dc 600b |` | Indirect_Literal Discrete,0x8e8,{0x00000000, 0x00002000} 08dd 00ba | | Action Initiate_Delay 08de 4800 |H | Short_Literal 0x0 08df 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 08e0 00c9 | | Action Pop_Auxiliary_Loop 08e1 7fd7 | | Jump 0x8b9 08e2 TRAP_0880: 08e2 0007 | | Action Break_Optional 08e3 4800 |H | Short_Literal 0x0 08e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e5 0000 0000 | | .XXX[0x3] 08e7 0000 | | 08e8 0000 0000 | | .LITERAL {0x00000000, 0x00002000} 08ec 0000 0000 | | .BLANK 0000[0x4] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 4100 |A | End_Rendezvous 0x0 08f4 0000 0000 | | .BLANK 0000[0x4] 08f8 ; -------------------------------------------------------------------------------------- 08f8 ; SUBPROGRAM 08f8 ; -------------------------------------------------------------------------------------- 08f8 092a | * | .CONST 0x092a ; Address of begin 08f9 0930 | 0 | .CONST 0x0930 ; Address of exception handler 08fa 0002 | | .CONST 0x0002 ; Number of locals 08fb INIT_08f8: 08fb 4821 495e |H!I^| Declare_Variable Select 0x000, 0x015, 08fd 4820 4960 |H I`| [0x000]: 0x001 = 0x0008, 08ff 481f 4961 |H Ia| [0x00d]: 0x17e = 0x0bf0, 0901 481e 4962 |H Ib| [0x00e]: 0x17c = 0x0be0, 0903 481d 4968 |H Ih| [0x00f]: 0x17b = 0x0bd8, 0905 481c 4969 |H Ii| [0x010]: 0x17a = 0x0bd0, 0907 481b 496a |H Ij| [0x011]: 0x178 = 0x0bc0, 0909 481a 496b |H Ik| [0x012]: 0x176 = 0x0bb0, 090b 4819 496c |H Il| [0x013]: 0x174 = 0x0ba0, 090d 4818 496d |H Im| [0x014]: 0x173 = 0x0b98, 090f 4817 496e |H In| [0x015]: 0x171 = 0x0b88, 0911 4816 496f |H Io| [0x016]: 0x16f = 0x0b78, 0913 4815 4971 |H Iq| [0x017]: 0x16e = 0x0b70, 0915 4814 4973 |H Is| [0x018]: 0x16d = 0x0b68, 0917 4813 4974 |H It| [0x019]: 0x16c = 0x0b60, 0919 4812 4976 |H Iv| [0x01a]: 0x16b = 0x0b58, 091b 4811 4978 |H Ix| [0x01b]: 0x16a = 0x0b50, 091d 4810 497a |H Iz| [0x01c]: 0x169 = 0x0b48, 091f 480f 497b |H I{| [0x01d]: 0x168 = 0x0b40, 0921 480e 497c |H I|| [0x01e]: 0x162 = 0x0b10, 0923 480d 497e |H I~| [0x01f]: 0x161 = 0x0b08, 0925 4800 4801 |H H | [0x020]: 0x160 = 0x0b00, 0927 4800 4815 |H H | [0x021]: 0x15e = 0x0af0 0929 02cf | | 092a BODY_08f8: 092a 00cf | | Action Mark_Auxiliary 092b 00d9 | | Load_Top At_Offset_1 092c 013f | ? | Execute Select,Rendezvous 092d 00d1 | | Pop_Control Pop_Count_1 092e 00c9 | | Action Pop_Auxiliary_Loop 092f 7ffb | | Jump 0x92b 0930 TRAP_08f8: 0930 0007 | | Action Break_Optional 0931 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0932 0000 0000 | | .BLANK 0000[0x6] 0938 ; -------------------------------------------------------------------------------------- 0938 ; SUBPROGRAM 0938 ; -------------------------------------------------------------------------------------- 0938 093b | ; | .CONST 0x093b ; Address of begin 0939 0004 | | .CONST 0x0004 ; Address of exception handler 093a 0001 | | .CONST 0x0001 ; Number of locals 093b BODY_0938: 093b INIT_0938: 093b 00da | | Load_Top At_Offset_2 093c e403 | | Load 0x2,0x3 093d 0279 | y | Execute Discrete,And 093e a403 | | Store_Unchecked 0x2,0x3 093f e404 | | Load 0x2,0x4 0940 e7fe | | Load 0x3,-0x2 0941 0279 | y | Execute Discrete,And 0942 a404 | | Store_Unchecked 0x2,0x4 0943 e7fd | | Load 0x3,-0x3 0944 e402 | | Load 0x2,0x2 0945 8229 | ) | Call 0x1,0x29 0946 a402 | | Store_Unchecked 0x2,0x2 0947 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 094b | K | .CONST 0x094b ; Address of begin 0949 0954 | T | .CONST 0x0954 ; Address of exception handler 094a 0001 | | .CONST 0x0001 ; Number of locals 094b BODY_0948: 094b INIT_0948: 094b e026 | & | Load 0x0,0x26 094c e5ff | | Load 0x2,-0x1 094d e233 | 3 | Load 0x1,0x33 094e 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 094f e235 | 5 | Load 0x1,0x35 0950 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 0951 8003 | | Call 0x0,0x3 0952 c026 | & | Store 0x0,0x26 0953 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0954 TRAP_0948: 0954 0007 | | Action Break_Optional 0955 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0956 0000 0000 | | .XXX[0x2] 0958 ; -------------------------------------------------------------------------------------- 0958 ; SUBPROGRAM 0958 ; -------------------------------------------------------------------------------------- 0958 095b | [ | .CONST 0x095b ; Address of begin 0959 0004 | | .CONST 0x0004 ; Address of exception handler 095a 0001 | | .CONST 0x0001 ; Number of locals 095b BODY_0958: 095b INIT_0958: 095b e5fc | | Load 0x2,-0x4 095c 00db | | Load_Top At_Offset_3 095d e03e | > | Load 0x0,0x3e 095e 01d5 | | Execute Vector,Field_Reference 095f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0960 e5fc | | Load 0x2,-0x4 0961 00db | | Load_Top At_Offset_3 0962 e03e | > | Load 0x0,0x3e 0963 01d5 | | Execute Vector,Field_Reference 0964 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0965 e5fd | | Load 0x2,-0x3 0966 00db | | Load_Top At_Offset_3 0967 e03e | > | Load 0x0,0x3e 0968 01d5 | | Execute Vector,Field_Reference 0969 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 096a e5fa | | Load 0x2,-0x6 096b 00db | | Load_Top At_Offset_3 096c e03e | > | Load 0x0,0x3e 096d 01d5 | | Execute Vector,Field_Reference 096e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 096f e5fb | | Load 0x2,-0x5 0970 00db | | Load_Top At_Offset_3 0971 e03e | > | Load 0x0,0x3e 0972 01d5 | | Execute Vector,Field_Reference 0973 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0974 e5fe | | Load 0x2,-0x2 0975 00db | | Load_Top At_Offset_3 0976 e02c | , | Load 0x0,0x2c 0977 01d6 | | Execute Vector,Field_Write 0978 e016 | | Load 0x0,0x16 0979 0a01 | | Execute_Immediate Plus,0x1 097a c016 | | Store 0x0,0x16 097b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 097c 0000 0000 | | .BLANK 0000[0x4] 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0983 | | .CONST 0x0983 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0001 | | .CONST 0x0001 ; Number of locals 0983 BODY_0980: 0983 INIT_0980: 0983 e5ff | | Load 0x2,-0x1 0984 00db | | Load_Top At_Offset_3 0985 e02f | / | Load 0x0,0x2f 0986 01d5 | | Execute Vector,Field_Reference 0987 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0988 e5fc | | Load 0x2,-0x4 0989 00db | | Load_Top At_Offset_3 098a e02f | / | Load 0x0,0x2f 098b 01d5 | | Execute Vector,Field_Reference 098c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 098d e5fc | | Load 0x2,-0x4 098e 00db | | Load_Top At_Offset_3 098f e02f | / | Load 0x0,0x2f 0990 01d5 | | Execute Vector,Field_Reference 0991 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0992 e5fd | | Load 0x2,-0x3 0993 00db | | Load_Top At_Offset_3 0994 e02f | / | Load 0x0,0x2f 0995 01d5 | | Execute Vector,Field_Reference 0996 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0997 e5fa | | Load 0x2,-0x6 0998 00db | | Load_Top At_Offset_3 0999 e02f | / | Load 0x0,0x2f 099a 01d5 | | Execute Vector,Field_Reference 099b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 099c e5fb | | Load 0x2,-0x5 099d 00db | | Load_Top At_Offset_3 099e e02f | / | Load 0x0,0x2f 099f 01d5 | | Execute Vector,Field_Reference 09a0 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 09a1 e5fe | | Load 0x2,-0x2 09a2 00db | | Load_Top At_Offset_3 09a3 e02f | / | Load 0x0,0x2f 09a4 01d5 | | Execute Vector,Field_Reference 09a5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 09a6 e030 | 0 | Load 0x0,0x30 09a7 0a01 | | Execute_Immediate Plus,0x1 09a8 c030 | 0 | Store 0x0,0x30 09a9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 09aa 0000 0000 | | .BLANK 0000[0x6] 09b0 ; -------------------------------------------------------------------------------------- 09b0 ; SUBPROGRAM 09b0 ; -------------------------------------------------------------------------------------- 09b0 09b3 | | .CONST 0x09b3 ; Address of begin 09b1 0004 | | .CONST 0x0004 ; Address of exception handler 09b2 0001 | | .CONST 0x0001 ; Number of locals 09b3 BODY_09b0: 09b3 INIT_09b0: 09b3 e5f9 | | Load 0x2,-0x7 09b4 00db | | Load_Top At_Offset_3 09b5 e040 | @ | Load 0x0,0x40 09b6 01d5 | | Execute Vector,Field_Reference 09b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 09b8 e5fe | | Load 0x2,-0x2 09b9 00db | | Load_Top At_Offset_3 09ba e040 | @ | Load 0x0,0x40 09bb 01d5 | | Execute Vector,Field_Reference 09bc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 09bd e5fd | | Load 0x2,-0x3 09be 00db | | Load_Top At_Offset_3 09bf e040 | @ | Load 0x0,0x40 09c0 01d5 | | Execute Vector,Field_Reference 09c1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 09c2 e5fc | | Load 0x2,-0x4 09c3 00db | | Load_Top At_Offset_3 09c4 e040 | @ | Load 0x0,0x40 09c5 01d5 | | Execute Vector,Field_Reference 09c6 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 09c7 e5fb | | Load 0x2,-0x5 09c8 00db | | Load_Top At_Offset_3 09c9 e040 | @ | Load 0x0,0x40 09ca 01d5 | | Execute Vector,Field_Reference 09cb 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 09cc e5fa | | Load 0x2,-0x6 09cd 00db | | Load_Top At_Offset_3 09ce e040 | @ | Load 0x0,0x40 09cf 01d5 | | Execute Vector,Field_Reference 09d0 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 09d1 e01e | | Load 0x0,0x1e 09d2 0a01 | | Execute_Immediate Plus,0x1 09d3 c01e | | Store 0x0,0x1e 09d4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 09d5 0000 0000 | | .XXX[0x3] 09d7 0000 | | 09d8 ; -------------------------------------------------------------------------------------- 09d8 ; SUBPROGRAM 09d8 ; -------------------------------------------------------------------------------------- 09d8 09db | | .CONST 0x09db ; Address of begin 09d9 0004 | | .CONST 0x0004 ; Address of exception handler 09da 0001 | | .CONST 0x0001 ; Number of locals 09db BODY_09d8: 09db INIT_09d8: 09db 00cf | | Action Mark_Auxiliary 09dc e03f | ? | Load 0x0,0x3f 09dd 4801 |H | Short_Literal 0x1 09de 0263 | c | Execute Discrete,Above_Bound 09df 700a |p | Jump_Nonzero 0x9ea 09e0 00d8 | | Load_Top At_Offset_0 09e1 e040 | @ | Load 0x0,0x40 09e2 01d5 | | Execute Vector,Field_Reference 09e3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 09e4 e5fa | | Load 0x2,-0x6 09e5 027f | | Execute Discrete,Equal 09e6 6801 |h | Jump_Zero 0x9e8 09e7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09e8 00c8 | | Action Pop_Auxiliary_Range 09e9 3ff6 |? | Loop_Increasing 0x9e0 09ea 00c9 | | Action Pop_Auxiliary_Loop 09eb e03f | ? | Load 0x0,0x3f 09ec 4801 |H | Short_Literal 0x1 09ed 0263 | c | Execute Discrete,Above_Bound 09ee 700c |p | Jump_Nonzero 0x9fb 09ef 00d8 | | Load_Top At_Offset_0 09f0 e040 | @ | Load 0x0,0x40 09f1 01d5 | | Execute Vector,Field_Reference 09f2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 09f3 e012 | | Load 0x0,0x12 09f4 027f | | Execute Discrete,Equal 09f5 6803 |h | Jump_Zero 0x9f9 09f6 00d8 | | Load_Top At_Offset_0 09f7 8402 | | Call 0x2,0x2 09f8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09f9 00c8 | | Action Pop_Auxiliary_Range 09fa 3ff4 |? | Loop_Increasing 0x9ef 09fb 00ce | | Action Pop_Auxiliary 09fc e01e | | Load 0x0,0x1e 09fd 0f14 | | Execute_Immediate Equal,0x14 09fe 6802 |h | Jump_Zero 0xa01 09ff e054 | T | Load 0x0,0x54 0a00 0257 | W | Execute Discrete,Raise 0a01 e03f | ? | Load 0x0,0x3f 0a02 0a01 | | Execute_Immediate Plus,0x1 0a03 00d8 | | Load_Top At_Offset_0 0a04 00e3 | | Load_Encached Natural_Cache 0a05 0260 | ` | Execute Discrete,In_Type 0a06 7001 |p | Jump_Nonzero 0xa08 0a07 0801 | | Execute_Immediate Raise,0x1 0a08 8402 | | Call 0x2,0x2 0a09 e03f | ? | Load 0x0,0x3f 0a0a 0a01 | | Execute_Immediate Plus,0x1 0a0b c03f | ? | Store 0x0,0x3f 0a0c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a0d 0000 0000 | | .XXX[0x3] 0a0f 0000 | | 0a10 ; -------------------------------------------------------------------------------------- 0a10 ; SUBPROGRAM 0a10 ; -------------------------------------------------------------------------------------- 0a10 0a13 | | .CONST 0x0a13 ; Address of begin 0a11 0004 | | .CONST 0x0004 ; Address of exception handler 0a12 0001 | | .CONST 0x0001 ; Number of locals 0a13 BODY_0a10: 0a13 INIT_0a10: 0a13 e5ff | | Load 0x2,-0x1 0a14 00db | | Load_Top At_Offset_3 0a15 e042 | B | Load 0x0,0x42 0a16 01d5 | | Execute Vector,Field_Reference 0a17 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0a18 e5fe | | Load 0x2,-0x2 0a19 00db | | Load_Top At_Offset_3 0a1a e042 | B | Load 0x0,0x42 0a1b 01d5 | | Execute Vector,Field_Reference 0a1c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0a1d e5fd | | Load 0x2,-0x3 0a1e 00db | | Load_Top At_Offset_3 0a1f e042 | B | Load 0x0,0x42 0a20 01d5 | | Execute Vector,Field_Reference 0a21 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0a22 00db | | Load_Top At_Offset_3 0a23 e402 | | Load 0x2,0x2 0a24 01d5 | | Execute Vector,Field_Reference 0a25 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a26 00db | | Load_Top At_Offset_3 0a27 e042 | B | Load 0x0,0x42 0a28 01d5 | | Execute Vector,Field_Reference 0a29 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a2a 00db | | Load_Top At_Offset_3 0a2b e402 | | Load 0x2,0x2 0a2c 01d5 | | Execute Vector,Field_Reference 0a2d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a2e 00db | | Load_Top At_Offset_3 0a2f e042 | B | Load 0x0,0x42 0a30 01d5 | | Execute Vector,Field_Reference 0a31 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0a32 e5f9 | | Load 0x2,-0x7 0a33 00db | | Load_Top At_Offset_3 0a34 e042 | B | Load 0x0,0x42 0a35 01d5 | | Execute Vector,Field_Reference 0a36 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0a37 e01a | | Load 0x0,0x1a 0a38 0a01 | | Execute_Immediate Plus,0x1 0a39 c01a | | Store 0x0,0x1a 0a3a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a3b 0000 0000 | | .BLANK 0000[0x5] 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; SUBPROGRAM 0a40 ; -------------------------------------------------------------------------------------- 0a40 0a45 | E | .CONST 0x0a45 ; Address of begin 0a41 0004 | | .CONST 0x0004 ; Address of exception handler 0a42 0003 | | .CONST 0x0003 ; Number of locals 0a43 INIT_0a40: 0a43 00e3 | | Load_Encached Natural_Cache 0a44 00e1 | | Load_Encached Boolean_Cache 0a45 BODY_0a40: 0a45 00cf | | Action Mark_Auxiliary 0a46 e041 | A | Load 0x0,0x41 0a47 4801 |H | Short_Literal 0x1 0a48 0263 | c | Execute Discrete,Above_Bound 0a49 700a |p | Jump_Nonzero 0xa54 0a4a 00d8 | | Load_Top At_Offset_0 0a4b e042 | B | Load 0x0,0x42 0a4c 01d5 | | Execute Vector,Field_Reference 0a4d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0a4e e5f9 | | Load 0x2,-0x7 0a4f 027f | | Execute Discrete,Equal 0a50 6801 |h | Jump_Zero 0xa52 0a51 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a52 00c8 | | Action Pop_Auxiliary_Range 0a53 3ff6 |? | Loop_Increasing 0xa4a 0a54 00ce | | Action Pop_Auxiliary 0a55 4801 |H | Short_Literal 0x1 0a56 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0a57 00cf | | Action Mark_Auxiliary 0a58 e403 | | Load 0x2,0x3 0a59 4801 |H | Short_Literal 0x1 0a5a 0263 | c | Execute Discrete,Above_Bound 0a5b 7030 |p0 | Jump_Nonzero 0xa8c 0a5c 4801 |H | Short_Literal 0x1 0a5d a603 | | Store_Unchecked 0x3,0x3 0a5e 00cf | | Action Mark_Auxiliary 0a5f e041 | A | Load 0x0,0x41 0a60 e602 | | Load 0x3,0x2 0a61 0263 | c | Execute Discrete,Above_Bound 0a62 7013 |p | Jump_Nonzero 0xa76 0a63 00d8 | | Load_Top At_Offset_0 0a64 e042 | B | Load 0x0,0x42 0a65 01d5 | | Execute Vector,Field_Reference 0a66 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0a67 e012 | | Load 0x0,0x12 0a68 027f | | Execute Discrete,Equal 0a69 680a |h | Jump_Zero 0xa74 0a6a 00db | | Load_Top At_Offset_3 0a6b 00d9 | | Load_Top At_Offset_1 0a6c 8404 | | Call 0x2,0x4 0a6d 00d8 | | Load_Top At_Offset_0 0a6e 0a01 | | Execute_Immediate Plus,0x1 0a6f c602 | | Store 0x3,0x2 0a70 4800 |H | Short_Literal 0x0 0a71 a603 | | Store_Unchecked 0x3,0x3 0a72 00d2 | | Pop_Control Pop_Count_2 0a73 7802 |x | Jump 0xa76 0a74 00c8 | | Action Pop_Auxiliary_Range 0a75 3fed |? | Loop_Increasing 0xa63 0a76 00ce | | Action Pop_Auxiliary 0a77 00db | | Load_Top At_Offset_3 0a78 6811 |h | Jump_Zero 0xa8a 0a79 e01a | | Load 0x0,0x1a 0a7a 0f14 | | Execute_Immediate Equal,0x14 0a7b 6802 |h | Jump_Zero 0xa7e 0a7c e055 | U | Load 0x0,0x55 0a7d 0257 | W | Execute Discrete,Raise 0a7e 00d8 | | Load_Top At_Offset_0 0a7f e041 | A | Load 0x0,0x41 0a80 0a01 | | Execute_Immediate Plus,0x1 0a81 00d8 | | Load_Top At_Offset_0 0a82 00e3 | | Load_Encached Natural_Cache 0a83 0260 | ` | Execute Discrete,In_Type 0a84 7001 |p | Jump_Nonzero 0xa86 0a85 0801 | | Execute_Immediate Raise,0x1 0a86 8404 | | Call 0x2,0x4 0a87 e041 | A | Load 0x0,0x41 0a88 0a01 | | Execute_Immediate Plus,0x1 0a89 c041 | A | Store 0x0,0x41 0a8a 00c8 | | Action Pop_Auxiliary_Range 0a8b 3fd0 |? | Loop_Increasing 0xa5c 0a8c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a8d 0000 0000 | | .XXX[0x3] 0a8f 0000 | | 0a90 ; -------------------------------------------------------------------------------------- 0a90 ; SUBPROGRAM 0a90 ; -------------------------------------------------------------------------------------- 0a90 0a93 | | .CONST 0x0a93 ; Address of begin 0a91 0004 | | .CONST 0x0004 ; Address of exception handler 0a92 0001 | | .CONST 0x0001 ; Number of locals 0a93 BODY_0a90: 0a93 INIT_0a90: 0a93 e5ff | | Load 0x2,-0x1 0a94 00db | | Load_Top At_Offset_3 0a95 e011 | | Load 0x0,0x11 0a96 01d5 | | Execute Vector,Field_Reference 0a97 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0a98 e5fe | | Load 0x2,-0x2 0a99 00db | | Load_Top At_Offset_3 0a9a e011 | | Load 0x0,0x11 0a9b 01d5 | | Execute Vector,Field_Reference 0a9c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0a9d e5fa | | Load 0x2,-0x6 0a9e 00db | | Load_Top At_Offset_3 0a9f e011 | | Load 0x0,0x11 0aa0 01d5 | | Execute Vector,Field_Reference 0aa1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0aa2 e5fd | | Load 0x2,-0x3 0aa3 00db | | Load_Top At_Offset_3 0aa4 e011 | | Load 0x0,0x11 0aa5 01d5 | | Execute Vector,Field_Reference 0aa6 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0aa7 e5fc | | Load 0x2,-0x4 0aa8 00db | | Load_Top At_Offset_3 0aa9 e011 | | Load 0x0,0x11 0aaa 01d5 | | Execute Vector,Field_Reference 0aab 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0aac e5fb | | Load 0x2,-0x5 0aad 00db | | Load_Top At_Offset_3 0aae e011 | | Load 0x0,0x11 0aaf 01d5 | | Execute Vector,Field_Reference 0ab0 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0ab1 e5f9 | | Load 0x2,-0x7 0ab2 00db | | Load_Top At_Offset_3 0ab3 e011 | | Load 0x0,0x11 0ab4 01d5 | | Execute Vector,Field_Reference 0ab5 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0ab6 e5f8 | | Load 0x2,-0x8 0ab7 00db | | Load_Top At_Offset_3 0ab8 e011 | | Load 0x0,0x11 0ab9 01d5 | | Execute Vector,Field_Reference 0aba 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0abb e043 | C | Load 0x0,0x43 0abc 0a01 | | Execute_Immediate Plus,0x1 0abd c043 | C | Store 0x0,0x43 0abe 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0abf 0000 | | .XXX[0x1] 0ac0 ; -------------------------------------------------------------------------------------- 0ac0 ; SUBPROGRAM 0ac0 ; -------------------------------------------------------------------------------------- 0ac0 0ac3 | | .CONST 0x0ac3 ; Address of begin 0ac1 0004 | | .CONST 0x0004 ; Address of exception handler 0ac2 0001 | | .CONST 0x0001 ; Number of locals 0ac3 BODY_0ac0: 0ac3 INIT_0ac0: 0ac3 00cf | | Action Mark_Auxiliary 0ac4 e010 | | Load 0x0,0x10 0ac5 4801 |H | Short_Literal 0x1 0ac6 0263 | c | Execute Discrete,Above_Bound 0ac7 700c |p | Jump_Nonzero 0xad4 0ac8 00d8 | | Load_Top At_Offset_0 0ac9 e011 | | Load 0x0,0x11 0aca 01d5 | | Execute Vector,Field_Reference 0acb 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0acc e012 | | Load 0x0,0x12 0acd 027f | | Execute Discrete,Equal 0ace 6803 |h | Jump_Zero 0xad2 0acf 00d8 | | Load_Top At_Offset_0 0ad0 8402 | | Call 0x2,0x2 0ad1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ad2 00c8 | | Action Pop_Auxiliary_Range 0ad3 3ff4 |? | Loop_Increasing 0xac8 0ad4 00ce | | Action Pop_Auxiliary 0ad5 e043 | C | Load 0x0,0x43 0ad6 0f28 | ( | Execute_Immediate Equal,0x28 0ad7 6802 |h | Jump_Zero 0xada 0ad8 e056 | V | Load 0x0,0x56 0ad9 0257 | W | Execute Discrete,Raise 0ada e010 | | Load 0x0,0x10 0adb 0a01 | | Execute_Immediate Plus,0x1 0adc 00d8 | | Load_Top At_Offset_0 0add 00e3 | | Load_Encached Natural_Cache 0ade 0260 | ` | Execute Discrete,In_Type 0adf 7001 |p | Jump_Nonzero 0xae1 0ae0 0801 | | Execute_Immediate Raise,0x1 0ae1 8402 | | Call 0x2,0x2 0ae2 e010 | | Load 0x0,0x10 0ae3 0a01 | | Execute_Immediate Plus,0x1 0ae4 c010 | | Store 0x0,0x10 0ae5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ae6 0000 0000 | | .XXX[0x2] 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 ; SUBPROGRAM 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 0aeb | | .CONST 0x0aeb ; Address of begin 0ae9 0aee | | .CONST 0x0aee ; Address of exception handler 0aea 0001 | | .CONST 0x0001 ; Number of locals 0aeb BODY_0ae8: 0aeb INIT_0ae8: 0aeb e5ff | | Load 0x2,-0x1 0aec 824e | N | Call 0x1,0x4e 0aed 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0aee TRAP_0ae8: 0aee 0007 | | Action Break_Optional 0aef 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0af0 ; -------------------------------------------------------------------------------------- 0af0 ; SUBPROGRAM 0af0 ; See instruction 0x02cf at 0x8fb, index=0x21 0af0 ; -------------------------------------------------------------------------------------- 0af0 0af3 | | .CONST 0x0af3 ; Address of begin 0af1 0004 | | .CONST 0x0004 ; Address of exception handler 0af2 0001 | | .CONST 0x0001 ; Number of locals 0af3 BODY_0af0: 0af3 INIT_0af0: 0af3 e7fc | | Load 0x3,-0x4 0af4 00e3 | | Load_Encached Natural_Cache 0af5 e7fe | | Load 0x3,-0x2 0af6 826d | m | Call 0x1,0x6d 0af7 c7fd | | Store 0x3,-0x3 0af8 c7fc | | Store 0x3,-0x4 0af9 4102 |A | End_Rendezvous 0x2 0afa 0000 0000 | | .BLANK 0000[0x6] 0b00 ; -------------------------------------------------------------------------------------- 0b00 ; SUBPROGRAM 0b00 ; See instruction 0x02cf at 0x8fb, index=0x20 0b00 ; -------------------------------------------------------------------------------------- 0b00 0b03 | | .CONST 0x0b03 ; Address of begin 0b01 0004 | | .CONST 0x0004 ; Address of exception handler 0b02 0001 | | .CONST 0x0001 ; Number of locals 0b03 BODY_0b00: 0b03 INIT_0b00: 0b03 4100 |A | End_Rendezvous 0x0 0b04 0000 0000 | | .BLANK 0000[0x4] 0b08 ; -------------------------------------------------------------------------------------- 0b08 ; SUBPROGRAM 0b08 ; See instruction 0x02cf at 0x8fb, index=0x1f 0b08 ; -------------------------------------------------------------------------------------- 0b08 0b0b | | .CONST 0x0b0b ; Address of begin 0b09 0004 | | .CONST 0x0004 ; Address of exception handler 0b0a 0001 | | .CONST 0x0001 ; Number of locals 0b0b BODY_0b08: 0b0b INIT_0b08: 0b0b 00db | | Load_Top At_Offset_3 0b0c 824a | J | Call 0x1,0x4a 0b0d 4100 |A | End_Rendezvous 0x0 0b0e 0000 0000 | | .XXX[0x2] 0b10 ; -------------------------------------------------------------------------------------- 0b10 ; SUBPROGRAM 0b10 ; See instruction 0x02cf at 0x8fb, index=0x1e 0b10 ; -------------------------------------------------------------------------------------- 0b10 0b13 | | .CONST 0x0b13 ; Address of begin 0b11 0004 | | .CONST 0x0004 ; Address of exception handler 0b12 0001 | | .CONST 0x0001 ; Number of locals 0b13 BODY_0b10: 0b13 INIT_0b10: 0b13 00db | | Load_Top At_Offset_3 0b14 e03e | > | Load 0x0,0x3e 0b15 01d5 | | Execute Vector,Field_Reference 0b16 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b17 0f01 | | Execute_Immediate Equal,0x1 0b18 6814 |h | Jump_Zero 0xb2d 0b19 00db | | Load_Top At_Offset_3 0b1a e03e | > | Load 0x0,0x3e 0b1b 01d5 | | Execute Vector,Field_Reference 0b1c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0b1d a7fd | | Store_Unchecked 0x3,-0x3 0b1e 00db | | Load_Top At_Offset_3 0b1f e03e | > | Load 0x0,0x3e 0b20 01d5 | | Execute Vector,Field_Reference 0b21 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b22 6801 |h | Jump_Zero 0xb24 0b23 4101 |A | End_Rendezvous 0x1 0b24 00db | | Load_Top At_Offset_3 0b25 e03e | > | Load 0x0,0x3e 0b26 01d5 | | Execute Vector,Field_Reference 0b27 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b28 e7fe | | Load 0x3,-0x2 0b29 e03e | > | Load 0x0,0x3e 0b2a 01d5 | | Execute Vector,Field_Reference 0b2b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b2c 4101 |A | End_Rendezvous 0x1 0b2d e012 | | Load 0x0,0x12 0b2e a7fd | | Store_Unchecked 0x3,-0x3 0b2f 00db | | Load_Top At_Offset_3 0b30 e03e | > | Load 0x0,0x3e 0b31 01d5 | | Execute Vector,Field_Reference 0b32 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b33 0aff | | Execute_Immediate Plus,-0x1 0b34 e7fe | | Load 0x3,-0x2 0b35 e03e | > | Load 0x0,0x3e 0b36 01d5 | | Execute Vector,Field_Reference 0b37 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b38 4101 |A | End_Rendezvous 0x1 0b39 0000 0000 | | .BLANK 0000[0x7] 0b40 ; -------------------------------------------------------------------------------------- 0b40 ; SUBPROGRAM 0b40 ; See instruction 0x02cf at 0x8fb, index=0x1d 0b40 ; -------------------------------------------------------------------------------------- 0b40 0b43 | C | .CONST 0x0b43 ; Address of begin 0b41 0004 | | .CONST 0x0004 ; Address of exception handler 0b42 0001 | | .CONST 0x0001 ; Number of locals 0b43 BODY_0b40: 0b43 INIT_0b40: 0b43 00db | | Load_Top At_Offset_3 0b44 8240 | @ | Call 0x1,0x40 0b45 4100 |A | End_Rendezvous 0x0 0b46 0000 0000 | | .XXX[0x2] 0b48 ; -------------------------------------------------------------------------------------- 0b48 ; SUBPROGRAM 0b48 ; See instruction 0x02cf at 0x8fb, index=0x1c 0b48 ; -------------------------------------------------------------------------------------- 0b48 0b4b | K | .CONST 0x0b4b ; Address of begin 0b49 0004 | | .CONST 0x0004 ; Address of exception handler 0b4a 0001 | | .CONST 0x0001 ; Number of locals 0b4b BODY_0b48: 0b4b INIT_0b48: 0b4b 00db | | Load_Top At_Offset_3 0b4c 824b | K | Call 0x1,0x4b 0b4d 4100 |A | End_Rendezvous 0x0 0b4e 0000 0000 | | .XXX[0x2] 0b50 ; -------------------------------------------------------------------------------------- 0b50 ; SUBPROGRAM 0b50 ; See instruction 0x02cf at 0x8fb, index=0x1b 0b50 ; -------------------------------------------------------------------------------------- 0b50 0b53 | S | .CONST 0x0b53 ; Address of begin 0b51 0004 | | .CONST 0x0004 ; Address of exception handler 0b52 0001 | | .CONST 0x0001 ; Number of locals 0b53 BODY_0b50: 0b53 INIT_0b50: 0b53 e7fd | | Load 0x3,-0x3 0b54 e7fe | | Load 0x3,-0x2 0b55 8261 | a | Call 0x1,0x61 0b56 4100 |A | End_Rendezvous 0x0 0b57 0000 | | .XXX[0x1] 0b58 ; -------------------------------------------------------------------------------------- 0b58 ; SUBPROGRAM 0b58 ; See instruction 0x02cf at 0x8fb, index=0x1a 0b58 ; -------------------------------------------------------------------------------------- 0b58 0b5b | [ | .CONST 0x0b5b ; Address of begin 0b59 0004 | | .CONST 0x0004 ; Address of exception handler 0b5a 0001 | | .CONST 0x0001 ; Number of locals 0b5b BODY_0b58: 0b5b INIT_0b58: 0b5b 826c | l | Call 0x1,0x6c 0b5c 4100 |A | End_Rendezvous 0x0 0b5d 0000 0000 | | .XXX[0x3] 0b5f 0000 | | 0b60 ; -------------------------------------------------------------------------------------- 0b60 ; SUBPROGRAM 0b60 ; See instruction 0x02cf at 0x8fb, index=0x19 0b60 ; -------------------------------------------------------------------------------------- 0b60 0b63 | c | .CONST 0x0b63 ; Address of begin 0b61 0004 | | .CONST 0x0004 ; Address of exception handler 0b62 0001 | | .CONST 0x0001 ; Number of locals 0b63 BODY_0b60: 0b63 INIT_0b60: 0b63 00db | | Load_Top At_Offset_3 0b64 824e | N | Call 0x1,0x4e 0b65 4100 |A | End_Rendezvous 0x0 0b66 0000 0000 | | .XXX[0x2] 0b68 ; -------------------------------------------------------------------------------------- 0b68 ; SUBPROGRAM 0b68 ; See instruction 0x02cf at 0x8fb, index=0x18 0b68 ; -------------------------------------------------------------------------------------- 0b68 0b6b | k | .CONST 0x0b6b ; Address of begin 0b69 0004 | | .CONST 0x0004 ; Address of exception handler 0b6a 0001 | | .CONST 0x0001 ; Number of locals 0b6b BODY_0b68: 0b6b INIT_0b68: 0b6b 00db | | Load_Top At_Offset_3 0b6c 8262 | b | Call 0x1,0x62 0b6d 4100 |A | End_Rendezvous 0x0 0b6e 0000 0000 | | .XXX[0x2] 0b70 ; -------------------------------------------------------------------------------------- 0b70 ; SUBPROGRAM 0b70 ; See instruction 0x02cf at 0x8fb, index=0x17 0b70 ; -------------------------------------------------------------------------------------- 0b70 0b73 | s | .CONST 0x0b73 ; Address of begin 0b71 0004 | | .CONST 0x0004 ; Address of exception handler 0b72 0001 | | .CONST 0x0001 ; Number of locals 0b73 BODY_0b70: 0b73 INIT_0b70: 0b73 00db | | Load_Top At_Offset_3 0b74 824c | L | Call 0x1,0x4c 0b75 4100 |A | End_Rendezvous 0x0 0b76 0000 0000 | | .XXX[0x2] 0b78 ; -------------------------------------------------------------------------------------- 0b78 ; SUBPROGRAM 0b78 ; See instruction 0x02cf at 0x8fb, index=0x16 0b78 ; -------------------------------------------------------------------------------------- 0b78 0b7b | { | .CONST 0x0b7b ; Address of begin 0b79 0004 | | .CONST 0x0004 ; Address of exception handler 0b7a 0001 | | .CONST 0x0001 ; Number of locals 0b7b BODY_0b78: 0b7b INIT_0b78: 0b7b e7f8 | | Load 0x3,-0x8 0b7c e7f9 | | Load 0x3,-0x7 0b7d e7fa | | Load 0x3,-0x6 0b7e e7fb | | Load 0x3,-0x5 0b7f e7fc | | Load 0x3,-0x4 0b80 e7fd | | Load 0x3,-0x3 0b81 e7fe | | Load 0x3,-0x2 0b82 8249 | I | Call 0x1,0x49 0b83 4100 |A | End_Rendezvous 0x0 0b84 0000 0000 | | .BLANK 0000[0x4] 0b88 ; -------------------------------------------------------------------------------------- 0b88 ; SUBPROGRAM 0b88 ; See instruction 0x02cf at 0x8fb, index=0x15 0b88 ; -------------------------------------------------------------------------------------- 0b88 0b8b | | .CONST 0x0b8b ; Address of begin 0b89 0004 | | .CONST 0x0004 ; Address of exception handler 0b8a 0001 | | .CONST 0x0001 ; Number of locals 0b8b BODY_0b88: 0b8b INIT_0b88: 0b8b e7f7 | | Load 0x3,-0x9 0b8c e7f8 | | Load 0x3,-0x8 0b8d e7f9 | | Load 0x3,-0x7 0b8e e7fa | | Load 0x3,-0x6 0b8f e7fb | | Load 0x3,-0x5 0b90 e7fc | | Load 0x3,-0x4 0b91 e7fd | | Load 0x3,-0x3 0b92 e7fe | | Load 0x3,-0x2 0b93 8248 | H | Call 0x1,0x48 0b94 4100 |A | End_Rendezvous 0x0 0b95 0000 0000 | | .XXX[0x3] 0b97 0000 | | 0b98 ; -------------------------------------------------------------------------------------- 0b98 ; SUBPROGRAM 0b98 ; See instruction 0x02cf at 0x8fb, index=0x14 0b98 ; -------------------------------------------------------------------------------------- 0b98 0b9b | | .CONST 0x0b9b ; Address of begin 0b99 0004 | | .CONST 0x0004 ; Address of exception handler 0b9a 0001 | | .CONST 0x0001 ; Number of locals 0b9b BODY_0b98: 0b9b INIT_0b98: 0b9b e7fc | | Load 0x3,-0x4 0b9c e7fd | | Load 0x3,-0x3 0b9d e7fe | | Load 0x3,-0x2 0b9e 8247 | G | Call 0x1,0x47 0b9f 4100 |A | End_Rendezvous 0x0 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 ; SUBPROGRAM 0ba0 ; See instruction 0x02cf at 0x8fb, index=0x13 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 0ba3 | | .CONST 0x0ba3 ; Address of begin 0ba1 0004 | | .CONST 0x0004 ; Address of exception handler 0ba2 0001 | | .CONST 0x0001 ; Number of locals 0ba3 BODY_0ba0: 0ba3 INIT_0ba0: 0ba3 e7f8 | | Load 0x3,-0x8 0ba4 e7f9 | | Load 0x3,-0x7 0ba5 e7fa | | Load 0x3,-0x6 0ba6 e7fb | | Load 0x3,-0x5 0ba7 e7fc | | Load 0x3,-0x4 0ba8 e7fd | | Load 0x3,-0x3 0ba9 e7fe | | Load 0x3,-0x2 0baa 8246 | F | Call 0x1,0x46 0bab 4100 |A | End_Rendezvous 0x0 0bac 0000 0000 | | .BLANK 0000[0x4] 0bb0 ; -------------------------------------------------------------------------------------- 0bb0 ; SUBPROGRAM 0bb0 ; See instruction 0x02cf at 0x8fb, index=0x12 0bb0 ; -------------------------------------------------------------------------------------- 0bb0 0bb3 | | .CONST 0x0bb3 ; Address of begin 0bb1 0004 | | .CONST 0x0004 ; Address of exception handler 0bb2 0001 | | .CONST 0x0001 ; Number of locals 0bb3 BODY_0bb0: 0bb3 INIT_0bb0: 0bb3 e7f7 | | Load 0x3,-0x9 0bb4 e7f8 | | Load 0x3,-0x8 0bb5 e7f9 | | Load 0x3,-0x7 0bb6 e7fa | | Load 0x3,-0x6 0bb7 e7fb | | Load 0x3,-0x5 0bb8 e7fc | | Load 0x3,-0x4 0bb9 e7fd | | Load 0x3,-0x3 0bba e7fe | | Load 0x3,-0x2 0bbb 8245 | E | Call 0x1,0x45 0bbc 4101 |A | End_Rendezvous 0x1 0bbd 0000 0000 | | .XXX[0x3] 0bbf 0000 | | 0bc0 ; -------------------------------------------------------------------------------------- 0bc0 ; SUBPROGRAM 0bc0 ; See instruction 0x02cf at 0x8fb, index=0x11 0bc0 ; -------------------------------------------------------------------------------------- 0bc0 0bc3 | | .CONST 0x0bc3 ; Address of begin 0bc1 0004 | | .CONST 0x0004 ; Address of exception handler 0bc2 0001 | | .CONST 0x0001 ; Number of locals 0bc3 BODY_0bc0: 0bc3 INIT_0bc0: 0bc3 e7fa | | Load 0x3,-0x6 0bc4 e7fb | | Load 0x3,-0x5 0bc5 e7fc | | Load 0x3,-0x4 0bc6 e7fd | | Load 0x3,-0x3 0bc7 e7fe | | Load 0x3,-0x2 0bc8 8244 | D | Call 0x1,0x44 0bc9 4101 |A | End_Rendezvous 0x1 0bca 0000 0000 | | .BLANK 0000[0x6] 0bd0 ; -------------------------------------------------------------------------------------- 0bd0 ; SUBPROGRAM 0bd0 ; See instruction 0x02cf at 0x8fb, index=0x10 0bd0 ; -------------------------------------------------------------------------------------- 0bd0 0bd3 | | .CONST 0x0bd3 ; Address of begin 0bd1 0004 | | .CONST 0x0004 ; Address of exception handler 0bd2 0001 | | .CONST 0x0001 ; Number of locals 0bd3 BODY_0bd0: 0bd3 INIT_0bd0: 0bd3 e7fd | | Load 0x3,-0x3 0bd4 e7fc | | Load 0x3,-0x4 0bd5 e7fe | | Load 0x3,-0x2 0bd6 8243 | C | Call 0x1,0x43 0bd7 4102 |A | End_Rendezvous 0x2 0bd8 ; -------------------------------------------------------------------------------------- 0bd8 ; SUBPROGRAM 0bd8 ; See instruction 0x02cf at 0x8fb, index=0xf 0bd8 ; -------------------------------------------------------------------------------------- 0bd8 0bdb | | .CONST 0x0bdb ; Address of begin 0bd9 0004 | | .CONST 0x0004 ; Address of exception handler 0bda 0001 | | .CONST 0x0001 ; Number of locals 0bdb BODY_0bd8: 0bdb INIT_0bd8: 0bdb 00db | | Load_Top At_Offset_3 0bdc 8242 | B | Call 0x1,0x42 0bdd 4100 |A | End_Rendezvous 0x0 0bde 0000 0000 | | .XXX[0x2] 0be0 ; -------------------------------------------------------------------------------------- 0be0 ; SUBPROGRAM 0be0 ; See instruction 0x02cf at 0x8fb, index=0xe 0be0 ; -------------------------------------------------------------------------------------- 0be0 0be3 | | .CONST 0x0be3 ; Address of begin 0be1 0004 | | .CONST 0x0004 ; Address of exception handler 0be2 0001 | | .CONST 0x0001 ; Number of locals 0be3 BODY_0be0: 0be3 INIT_0be0: 0be3 e7f9 | | Load 0x3,-0x7 0be4 e7fa | | Load 0x3,-0x6 0be5 e7fb | | Load 0x3,-0x5 0be6 e7fc | | Load 0x3,-0x4 0be7 e7fd | | Load 0x3,-0x3 0be8 e7fe | | Load 0x3,-0x2 0be9 8241 | A | Call 0x1,0x41 0bea 4100 |A | End_Rendezvous 0x0 0beb 0000 0000 | | .BLANK 0000[0x5] 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 ; SUBPROGRAM 0bf0 ; See instruction 0x02cf at 0x8fb, index=0xd 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 0bf3 | | .CONST 0x0bf3 ; Address of begin 0bf1 0004 | | .CONST 0x0004 ; Address of exception handler 0bf2 0001 | | .CONST 0x0001 ; Number of locals 0bf3 BODY_0bf0: 0bf3 INIT_0bf0: 0bf3 00db | | Load_Top At_Offset_3 0bf4 8278 | x | Call 0x1,0x78 0bf5 a7fd | | Store_Unchecked 0x3,-0x3 0bf6 4101 |A | End_Rendezvous 0x1 0bf7 ; -------------------------------------------------------------------------------------- 0bf7 ; STRING TABLE 0bf7 ; -------------------------------------------------------------------------------------- 0bf7 0004 | | .STRTAB 0x0004->0x0bf9 ; "Action not found" 0bf8 0012 | | .STREND 0x0012->0x0c01 0bf9 4163 7469 |Acti| .STRTAB_STRINGS 0c01 0000 0000 | | .BLANK 0000[0x7] 0c08 ; -------------------------------------------------------------------------------------- 0c08 ; Debug Table 0c08 ; -------------------------------------------------------------------------------------- 0c08 0004 000d | | .DEBUG4 0x0004,0x000d,0x0415,0x0000,0x0001,0x0000 0c0e 383a ba10 |8: | .XXX[0x113] 0c10 3bb4 b732 |; 2| 0c12 37bb 9710 |7 | 0c14 2132 b1b0 |!2 | 0c16 bab9 b290 | | 0c18 3a34 3290 |:42 | 0c1a 3234 b9b8 |24 | 0c1c 3630 bc90 |60 | 0c1e 34b9 9030 |4 0| 0c20 903a 32bc | :2 | 0c22 3a3a b0b6 |:: | 0c24 0000 0015 | | 0c26 8000 001f | | 0c28 9030 b710 | 0 | 0c2a 22b7 3b34 |" ;4| 0c2c b937 b736 | 7 6| 0c2e b2b7 3a10 | : | 0c30 37ba ba38 |7 8| 0c32 3aba 103b |: ;| 0c34 b4b7 3237 | 27| 0c36 bb97 1021 | !| 0c38 32b1 b0ba |2 | 0c3a b9b2 903a | :| 0c3c 3432 9032 |42 2| 0c3e 34b9 b836 |4 6| 0c40 30bc 9034 |0 4| 0c42 b990 3090 | 0 | 0c44 3a32 bc3a |:2 :| 0c46 3ab0 b600 |: | 0c48 0000 1580 | | 0c4a 0000 1f90 | | 0c4c 30b7 1022 |0 "| 0c4e b73b 34b9 | ;4 | 0c50 37b7 36b2 |7 6 | 0c52 b73a 1037 | : 7| 0c54 baba 383a | 8:| 0c56 ba10 3bb4 | ; | 0c58 b732 37bb | 27 | 0c5a 9710 2132 | !2| 0c5c b1b0 bab9 | | 0c5e b290 3a34 | :4| 0c60 3290 3234 |2 24| 0c62 b9b8 3630 | 60| 0c64 bc90 34b9 | 4 | 0c66 9030 903a | 0 :| 0c68 32bc 3a3a |2 ::| 0c6a b0b6 0000 | | 0c6c 0036 0000 | 6 | 0c6e 0020 b932 | 2| 0c70 b839 32b9 | 92 | 0c72 b2b7 3a30 | :0| 0c74 ba34 b7b7 | 4 | 0c76 1030 b732 | 0 2| 0c78 1037 37ba | 77 | 0c7a 1030 b710 | 0 | 0c7c 30b1 ba3a |0 :| 0c7e b0b6 1039 | 9| 0c80 b2b0 b931 | 1| 0c82 b436 34b9 | 64 | 0c84 ba16 103c | <| 0c86 b7ba 9031 | 1| 0c88 b0b7 3737 | 77| 0c8a ba10 32b2 | 2 | 0c8c 34ba 103c |4 <| 0c8e b7ba b900 | | 0c90 0000 3580 | 5 | 0c92 0000 2110 | ! | 0c94 3932 b839 |92 9| 0c96 32b9 b2b7 |2 | 0c98 3a30 ba34 |:0 4| 0c9a b7b7 1030 | 0| 0c9c b732 1037 | 2 7| 0c9e 37ba 1030 |7 0| 0ca0 b710 30b1 | 0 | 0ca2 ba3a b0b6 | : | 0ca4 1039 b2b0 | 9 | 0ca6 b931 b436 | 1 6| 0ca8 34b9 ba16 |4 | 0caa 103c b7ba | < | 0cac 9031 b0b7 | 1 | 0cae 3737 ba10 |77 | 0cb0 32b2 34ba |2 4 | 0cb2 103c b7ba | < | 0cb4 b900 0000 | | 0cb6 3580 0000 |5 | 0cb8 2110 3932 |! 92| 0cba b839 32b9 | 92 | 0cbc b2b7 3a30 | :0| 0cbe ba34 b7b7 | 4 | 0cc0 1030 b732 | 0 2| 0cc2 1037 37ba | 77 | 0cc4 1030 b710 | 0 | 0cc6 30b1 ba3a |0 :| 0cc8 b0b6 1039 | 9| 0cca b2b0 b931 | 1| 0ccc b436 34b9 | 64 | 0cce ba16 103c | <| 0cd0 b7ba 9031 | 1| 0cd2 b0b7 3737 | 77| 0cd4 ba10 32b2 | 2 | 0cd6 34ba 103c |4 <| 0cd8 b7ba b900 | | 0cda 0000 1780 | | 0cdc 0000 12b9 | | 0cde b2b0 b931 | 1| 0ce0 b436 34b9 | 64 | 0ce2 ba10 3234 | 24| 0ce4 b932 b1ba | 2 | 0ce6 363c 9033 |6< 3| 0ce8 3937 b690 |97 | 0cea 3a34 34b9 |:44 | 0cec 903b b4b7 | ; | 0cee 3237 bb97 |27 | 0cf0 0000 0017 | | 0cf2 0000 0013 | | 0cf4 1039 b2b0 | 9 | 0cf6 b931 b436 | 1 6| 0cf8 34b9 ba10 |4 | 0cfa 3234 b932 |24 2| 0cfc b1ba 363c | 6<| 0cfe 9033 3937 | 397| 0d00 b690 3a34 | :4| 0d02 34b9 903b |4 ;| 0d04 b4b7 3237 | 27| 0d06 bb97 0000 | | 0d08 0017 0000 | | 0d0a 0013 1039 | 9| 0d0c b2b0 b931 | 1| 0d0e b436 34b9 | 64 | 0d10 ba10 3234 | 24| 0d12 b932 b1ba | 2 | 0d14 363c 9033 |6< 3| 0d16 3937 b690 |97 | 0d18 3a34 34b9 |:44 | 0d1a 903b b4b7 | ; | 0d1c 3237 bb97 |27 | 0d1e 0000 0000 | | 0d20 8000 | | 0d21 0000 0000 | | .BLANK 0000[0x4] 0d25 002a 8000 | * | .XXX[0xdb] 0d27 0000 0000 | | 0d29 002a 0000 | * | 0d2b 002b 8000 | + | 0d2d 0022 aa37 | " 7| 0d2f 9037 b832 | 7 2| 0d31 b710 3cb7 | < | 0d33 bab9 1039 | 9| 0d35 b2b0 b931 | 1| 0d37 b436 34b9 | 64 | 0d39 ba10 3337 | 37| 0d3b b910 32b2 | 2 | 0d3d 34ba 34b7 |4 4 | 0d3f 3396 103a |3 :| 0d41 b9b2 903a | :| 0d43 3432 9029 |42 )| 0d45 b437 bbaf | 7 | 0d47 a634 b9ba | 4 | 0d49 1038 3937 | 897| 0d4b b1b2 b23a | :| 0d4d b932 9710 | 2 | 0d4f 2a34 3280 |*42 | 0d51 0000 2b00 | + | 0d53 0000 2310 | # | 0d55 2a37 9037 |*7 7| 0d57 b832 b710 | 2 | 0d59 3cb7 bab9 |< | 0d5b 1039 b2b0 | 9 | 0d5d b931 b436 | 1 6| 0d5f 34b9 ba10 |4 | 0d61 3337 b910 |37 | 0d63 32b2 34ba |2 4 | 0d65 34b7 3396 |4 3 | 0d67 103a b9b2 | : | 0d69 903a 3432 | :42| 0d6b 9029 b437 | ) 7| 0d6d bbaf a634 | 4| 0d6f b9ba 1038 | 8| 0d71 3937 b1b2 |97 | 0d73 b23a b932 | : 2| 0d75 9710 2a34 | *4| 0d77 3280 0000 |2 | 0d79 2b00 0000 |+ | 0d7b 2310 2a37 |# *7| 0d7d 9037 b832 | 7 2| 0d7f b710 3cb7 | < | 0d81 bab9 1039 | 9| 0d83 b2b0 b931 | 1| 0d85 b436 34b9 | 64 | 0d87 ba10 3337 | 37| 0d89 b910 32b2 | 2 | 0d8b 34ba 34b7 |4 4 | 0d8d 3396 103a |3 :| 0d8f b9b2 903a | :| 0d91 3432 9029 |42 )| 0d93 b437 bbaf | 7 | 0d95 a634 b9ba | 4 | 0d97 1038 3937 | 897| 0d99 b1b2 b23a | :| 0d9b b932 9710 | 2 | 0d9d 2a34 3280 |*42 | 0d9f 0000 0f00 | | 0da1 0000 2529 | %)| 0da3 b437 bbaf | 7 | 0da5 a634 b9ba | 4 | 0da7 1038 3937 | 897| 0da9 b1b2 b23a | :| 0dab b932 9032 | 2 2| 0dad 34b9 b836 |4 6| 0daf 30bc b990 |0 | 0db1 3cb7 bab9 |< | 0db3 1039 b2b0 | 9 | 0db5 b931 b436 | 1 6| 0db7 34b9 ba10 |4 | 0db9 34b7 1030 |4 0| 0dbb 903b b4b7 | ; | 0dbd 3237 bb97 |27 | 0dbf 1023 3937 | #97| 0dc1 b690 3a34 | :4| 0dc3 34b9 903b |4 ;| 0dc5 b4b7 3237 | 27| 0dc7 bb80 0000 | | 0dc9 0e80 0000 | | 0dcb 2590 29b4 |% ) | 0dcd 37bb afa6 |7 | 0dcf 34b9 ba10 |4 | 0dd1 3839 37b1 |897 | 0dd3 b2b2 3ab9 | : | 0dd5 3290 3234 |2 24| 0dd7 b9b8 3630 | 60| 0dd9 bcb9 903c | <| 0ddb b7ba b910 | | 0ddd 39b2 b0b9 |9 | 0ddf 31b4 3634 |1 64| 0de1 b9ba 1034 | 4| 0de3 b710 3090 | 0 | 0de5 3bb4 b732 |; 2| 0de7 37bb 9710 |7 | 0de9 2339 37b6 |#97 | 0deb 903a 3434 | :44| 0ded b990 3bb4 | ; | 0def b732 37bb | 27 | 0df1 8000 000e | | 0df3 8000 0025 | %| 0df5 9029 b437 | ) 7| 0df7 bbaf a634 | 4| 0df9 b9ba 1038 | 8| 0dfb 3937 b1b2 |97 | 0dfd b23a b932 | : 2| 0dff 9032 | 2 |