|
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: 9216 (0x2400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦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 0ce0 | | .CONST 0x0ce0 ; 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 0008 | | .CONST 0x0008 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0146 | F | .CONST 0x0146 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0032 | 2 | .CONST 0x0032 ; Number of locals 000b INIT_0008: 000b 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 000d 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated 000f 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 0011 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0013 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0015 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0017 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 0019 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 001b 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 001d 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 001f 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0021 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated 0023 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 0025 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0027 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 0029 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 002b 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated 002d 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 002f 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated 0031 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0033 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 0035 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated 0037 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated 0039 029a 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Visible,Unelaborated 003b 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 003d 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated 003f 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated 0041 029a 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call,Visible,Unelaborated 0043 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated 0045 00bf | | Action Accept_Activation 0046 e002 | | Load 0x0,0x2 0047 0322 | " | Declare_Variable Record 0048 4803 |H | Short_Literal 0x3 0049 00d9 | | Load_Top At_Offset_1 004a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 004b 4fff |O | Short_Literal -0x1 004c 00d9 | | Load_Top At_Offset_1 004d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 004e 4800 |H | Short_Literal 0x0 004f 00d9 | | Load_Top At_Offset_1 0050 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0051 4801 |H | Short_Literal 0x1 0052 00d9 | | Load_Top At_Offset_1 0053 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0054 4800 |H | Short_Literal 0x0 0055 00d9 | | Load_Top At_Offset_1 0056 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0057 4800 |H | Short_Literal 0x0 0058 00d9 | | Load_Top At_Offset_1 0059 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 005a 4801 |H | Short_Literal 0x1 005b 00d9 | | Load_Top At_Offset_1 005c 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 005d 4800 |H | Short_Literal 0x0 005e 00d9 | | Load_Top At_Offset_1 005f 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0060 4800 |H | Short_Literal 0x0 0061 00d9 | | Load_Top At_Offset_1 0062 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0063 4800 |H | Short_Literal 0x0 0064 00d9 | | Load_Top At_Offset_1 0065 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0066 4801 |H | Short_Literal 0x1 0067 00d9 | | Load_Top At_Offset_1 0068 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0069 00d8 | | Load_Top At_Offset_0 006a 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 006b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 006c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 006d 4fff |O | Short_Literal -0x1 006e 00d0 | | Action Swap_Control 006f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0070 00d8 | | Load_Top At_Offset_0 0071 340c |4 | Execute Record,Field_Reference,Field_Number 0xc 0072 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0073 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0074 4fff |O | Short_Literal -0x1 0075 00d0 | | Action Swap_Control 0076 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0077 4800 |H | Short_Literal 0x0 0078 00d9 | | Load_Top At_Offset_1 0079 380d |8 | Execute Record,Field_Write,Field_Number 0xd 007a 4800 |H | Short_Literal 0x0 007b 00d9 | | Load_Top At_Offset_1 007c 380e |8 | Execute Record,Field_Write,Field_Number 0xe 007d 00d8 | | Load_Top At_Offset_0 007e 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 007f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0080 4fff |O | Short_Literal -0x1 0081 00d0 | | Action Swap_Control 0082 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0083 4800 |H | Short_Literal 0x0 0084 00d9 | | Load_Top At_Offset_1 0085 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 0086 4801 |H | Short_Literal 0x1 0087 00d9 | | Load_Top At_Offset_1 0088 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0089 4800 |H | Short_Literal 0x0 008a 00d9 | | Load_Top At_Offset_1 008b 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 008c 4800 |H | Short_Literal 0x0 008d 00d9 | | Load_Top At_Offset_1 008e 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 008f e003 | | Load 0x0,0x3 0090 00d9 | | Load_Top At_Offset_1 0091 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 0092 4800 |H | Short_Literal 0x0 0093 00d9 | | Load_Top At_Offset_1 0094 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 0095 4804 |H | Short_Literal 0x4 0096 00d9 | | Load_Top At_Offset_1 0097 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 0098 e004 | | Load 0x0,0x4 0099 0337 | 7 | Declare_Variable Array 009a 4801 |H | Short_Literal 0x1 009b 481f |H | Short_Literal 0x1f 009c 00da | | Load_Top At_Offset_2 009d 01d6 | | Execute Vector,Field_Write 009e 4801 |H | Short_Literal 0x1 009f 481e |H | Short_Literal 0x1e 00a0 00da | | Load_Top At_Offset_2 00a1 01d6 | | Execute Vector,Field_Write 00a2 4801 |H | Short_Literal 0x1 00a3 481d |H | Short_Literal 0x1d 00a4 00da | | Load_Top At_Offset_2 00a5 01d6 | | Execute Vector,Field_Write 00a6 4801 |H | Short_Literal 0x1 00a7 481c |H | Short_Literal 0x1c 00a8 00da | | Load_Top At_Offset_2 00a9 01d6 | | Execute Vector,Field_Write 00aa 4801 |H | Short_Literal 0x1 00ab 481b |H | Short_Literal 0x1b 00ac 00da | | Load_Top At_Offset_2 00ad 01d6 | | Execute Vector,Field_Write 00ae 4801 |H | Short_Literal 0x1 00af 481a |H | Short_Literal 0x1a 00b0 00da | | Load_Top At_Offset_2 00b1 01d6 | | Execute Vector,Field_Write 00b2 4801 |H | Short_Literal 0x1 00b3 4819 |H | Short_Literal 0x19 00b4 00da | | Load_Top At_Offset_2 00b5 01d6 | | Execute Vector,Field_Write 00b6 4801 |H | Short_Literal 0x1 00b7 4818 |H | Short_Literal 0x18 00b8 00da | | Load_Top At_Offset_2 00b9 01d6 | | Execute Vector,Field_Write 00ba 4801 |H | Short_Literal 0x1 00bb 4817 |H | Short_Literal 0x17 00bc 00da | | Load_Top At_Offset_2 00bd 01d6 | | Execute Vector,Field_Write 00be 4801 |H | Short_Literal 0x1 00bf 4816 |H | Short_Literal 0x16 00c0 00da | | Load_Top At_Offset_2 00c1 01d6 | | Execute Vector,Field_Write 00c2 4801 |H | Short_Literal 0x1 00c3 4815 |H | Short_Literal 0x15 00c4 00da | | Load_Top At_Offset_2 00c5 01d6 | | Execute Vector,Field_Write 00c6 4801 |H | Short_Literal 0x1 00c7 4814 |H | Short_Literal 0x14 00c8 00da | | Load_Top At_Offset_2 00c9 01d6 | | Execute Vector,Field_Write 00ca 4801 |H | Short_Literal 0x1 00cb 4813 |H | Short_Literal 0x13 00cc 00da | | Load_Top At_Offset_2 00cd 01d6 | | Execute Vector,Field_Write 00ce 4801 |H | Short_Literal 0x1 00cf 4812 |H | Short_Literal 0x12 00d0 00da | | Load_Top At_Offset_2 00d1 01d6 | | Execute Vector,Field_Write 00d2 4801 |H | Short_Literal 0x1 00d3 4811 |H | Short_Literal 0x11 00d4 00da | | Load_Top At_Offset_2 00d5 01d6 | | Execute Vector,Field_Write 00d6 4801 |H | Short_Literal 0x1 00d7 4810 |H | Short_Literal 0x10 00d8 00da | | Load_Top At_Offset_2 00d9 01d6 | | Execute Vector,Field_Write 00da 4801 |H | Short_Literal 0x1 00db 480f |H | Short_Literal 0xf 00dc 00da | | Load_Top At_Offset_2 00dd 01d6 | | Execute Vector,Field_Write 00de 4801 |H | Short_Literal 0x1 00df 480e |H | Short_Literal 0xe 00e0 00da | | Load_Top At_Offset_2 00e1 01d6 | | Execute Vector,Field_Write 00e2 4801 |H | Short_Literal 0x1 00e3 480d |H | Short_Literal 0xd 00e4 00da | | Load_Top At_Offset_2 00e5 01d6 | | Execute Vector,Field_Write 00e6 4801 |H | Short_Literal 0x1 00e7 480b |H | Short_Literal 0xb 00e8 00da | | Load_Top At_Offset_2 00e9 01d6 | | Execute Vector,Field_Write 00ea 4801 |H | Short_Literal 0x1 00eb 4809 |H | Short_Literal 0x9 00ec 00da | | Load_Top At_Offset_2 00ed 01d6 | | Execute Vector,Field_Write 00ee 4808 |H | Short_Literal 0x8 00ef 4800 |H | Short_Literal 0x0 00f0 4800 |H | Short_Literal 0x0 00f1 00d9 | | Load_Top At_Offset_1 00f2 e22b | + | Load 0x1,0x2b 00f3 01d6 | | Execute Vector,Field_Write 00f4 3ffb |? | Loop_Increasing 0xf0 00f5 4800 |H | Short_Literal 0x0 00f6 480a |H | Short_Literal 0xa 00f7 00da | | Load_Top At_Offset_2 00f8 01d6 | | Execute Vector,Field_Write 00f9 4800 |H | Short_Literal 0x0 00fa 480c |H | Short_Literal 0xc 00fb 00da | | Load_Top At_Offset_2 00fc 01d6 | | Execute Vector,Field_Write 00fd e004 | | Load 0x0,0x4 00fe 01c3 | | Execute Vector,Check_In_Type 00ff 0007 | | Action Break_Optional 0100 a005 | | Store_Unchecked 0x0,0x5 0101 00c6 | | Action Check_Subprogram_Elaborated 0102 e006 | | Load 0x0,0x6 0103 e007 | | Load 0x0,0x7 0104 e008 | | Load 0x0,0x8 0105 e009 | | Load 0x0,0x9 0106 4800 |H | Short_Literal 0x0 0107 0007 | | Action Break_Optional 0108 029d 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call 010a 1d0d | | Execute_Immediate Reference_Lex_1,0xd 010b 00c7 | | Action Elaborate_Subprogram 010c 1d0e | | Execute_Immediate Reference_Lex_1,0xe 010d 00c7 | | Action Elaborate_Subprogram 010e 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call 0110 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0111 00c7 | | Action Elaborate_Subprogram 0112 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0113 00c7 | | Action Elaborate_Subprogram 0114 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0115 00c7 | | Action Elaborate_Subprogram 0116 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0117 00c7 | | Action Elaborate_Subprogram 0118 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0119 00c7 | | Action Elaborate_Subprogram 011a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 011b 00c7 | | Action Elaborate_Subprogram 011c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 011d 00c7 | | Action Elaborate_Subprogram 011e 1d16 | | Execute_Immediate Reference_Lex_1,0x16 011f 00c7 | | Action Elaborate_Subprogram 0120 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0121 00c7 | | Action Elaborate_Subprogram 0122 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0123 00c7 | | Action Elaborate_Subprogram 0124 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0125 00c7 | | Action Elaborate_Subprogram 0126 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0127 00c7 | | Action Elaborate_Subprogram 0128 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0129 00c7 | | Action Elaborate_Subprogram 012a 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 012b 00c7 | | Action Elaborate_Subprogram 012c 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 012d 00c7 | | Action Elaborate_Subprogram 012e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 012f 00c7 | | Action Elaborate_Subprogram 0130 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0131 00c7 | | Action Elaborate_Subprogram 0132 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0133 00c7 | | Action Elaborate_Subprogram 0134 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0135 00c7 | | Action Elaborate_Subprogram 0136 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0137 00c7 | | Action Elaborate_Subprogram 0138 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0139 00c7 | | Action Elaborate_Subprogram 013a 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 013b 00c7 | | Action Elaborate_Subprogram 013c 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 013d 00c7 | | Action Elaborate_Subprogram 013e 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 013f 00c7 | | Action Elaborate_Subprogram 0140 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0141 00c7 | | Action Elaborate_Subprogram 0142 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0143 00c7 | | Action Elaborate_Subprogram 0144 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0145 00c7 | | Action Elaborate_Subprogram 0146 BODY_0008: 0146 00bc | | Action Signal_Activated 0147 00bb | | Action Signal_Completion 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0150 | P | .CONST 0x0150 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0003 | | .CONST 0x0003 ; Number of locals 014b INIT_0148: 014b e5fd | | Load 0x2,-0x3 014c e00a | | Load 0x0,0xa 014d 01d3 | | Execute Vector,And 014e 029f 090b | | Declare_Subprogram INIT_0908,For_Call 0150 BODY_0148: 0150 00d9 | | Load_Top At_Offset_1 0151 e00b | | Load 0x0,0xb 0152 01df | | Execute Vector,Equal 0153 7003 |p | Jump_Nonzero 0x157 0154 e5ff | | Load 0x2,-0x1 0155 800c | | Call 0x0,0xc 0156 8403 | | Call 0x2,0x3 0157 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 016a | j | .CONST 0x016a ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0006 | | .CONST 0x0006 ; Number of locals 015b INIT_0158: 015b e5fc | | Load 0x2,-0x4 015c 0227 | ' | Execute Access,All_Reference 015d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 015e 0007 | | Action Break_Optional 015f e5fe | | Load 0x2,-0x2 0160 0227 | ' | Execute Access,All_Reference 0161 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0162 0007 | | Action Break_Optional 0163 e00d | | Load 0x0,0xd 0164 0007 | | Action Break_Optional 0165 e5fd | | Load 0x2,-0x3 0166 e00a | | Load 0x0,0xa 0167 01d3 | | Execute Vector,And 0168 029f 0953 | S| Declare_Subprogram INIT_0950,For_Call 016a BODY_0158: 016a e5ff | | Load 0x2,-0x1 016b 800c | | Call 0x0,0xc 016c 8406 | | Call 0x2,0x6 016d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 016e 0000 0000 | | .XXX[0x2] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 017e | ~ | .CONST 0x017e ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0006 | | .CONST 0x0006 ; Number of locals 0173 INIT_0170: 0173 e007 | | Load 0x0,0x7 0174 0007 | | Action Break_Optional 0175 e00d | | Load 0x0,0xd 0176 0007 | | Action Break_Optional 0177 e00e | | Load 0x0,0xe 0178 0007 | | Action Break_Optional 0179 e5fd | | Load 0x2,-0x3 017a e00a | | Load 0x0,0xa 017b 01d3 | | Execute Vector,And 017c 029f 0a7b | {| Declare_Subprogram INIT_0a78,For_Call 017e BODY_0170: 017e e5ff | | Load 0x2,-0x1 017f 800c | | Call 0x0,0xc 0180 8406 | | Call 0x2,0x6 0181 0831 | 1 | Execute_Immediate Raise,0x31 0182 0000 0000 | | .BLANK 0000[0x6] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018e | | .CONST 0x018e ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0003 | | .CONST 0x0003 ; Number of locals 018b INIT_0188: 018b e00d | | Load 0x0,0xd 018c 029f 0b3b | ;| Declare_Subprogram INIT_0b38,For_Call 018e BODY_0188: 018e e5fe | | Load 0x2,-0x2 018f e007 | | Load 0x0,0x7 0190 022f | / | Execute Access,Equal 0191 6801 |h | Jump_Zero 0x193 0192 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0193 e5ff | | Load 0x2,-0x1 0194 800c | | Call 0x0,0xc 0195 8403 | | Call 0x2,0x3 0196 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0197 0000 | | .XXX[0x1] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 019c 0227 | ' | Execute Access,All_Reference 019d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 019e 0320 | | Declare_Variable Record,Duplicate 019f 00cd | | Action Spare6_Action 01a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a1 0000 0000 | | .BLANK 0000[0x7] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab e5fd | | Load 0x2,-0x3 01ac e22b | + | Load 0x1,0x2b 01ad 01d3 | | Execute Vector,And 01ae e5fd | | Load 0x2,-0x3 01af 01df | | Execute Vector,Equal 01b0 7002 |p | Jump_Nonzero 0x1b3 01b1 4800 |H | Short_Literal 0x0 01b2 a5fb | | Store_Unchecked 0x2,-0x5 01b3 481f |H | Short_Literal 0x1f 01b4 e5fd | | Load 0x2,-0x3 01b5 01d7 | | Execute Vector,Field_Read 01b6 6806 |h | Jump_Zero 0x1bd 01b7 00db | | Load_Top At_Offset_3 01b8 0227 | ' | Execute Access,All_Reference 01b9 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01ba 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01bb e5fc | | Load 0x2,-0x4 01bc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01bd 481e |H | Short_Literal 0x1e 01be e5fd | | Load 0x2,-0x3 01bf 01d7 | | Execute Vector,Field_Read 01c0 6806 |h | Jump_Zero 0x1c7 01c1 00db | | Load_Top At_Offset_3 01c2 0227 | ' | Execute Access,All_Reference 01c3 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01c4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01c5 e5fc | | Load 0x2,-0x4 01c6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01c7 481d |H | Short_Literal 0x1d 01c8 e5fd | | Load 0x2,-0x3 01c9 01d7 | | Execute Vector,Field_Read 01ca 6806 |h | Jump_Zero 0x1d1 01cb 00db | | Load_Top At_Offset_3 01cc 0227 | ' | Execute Access,All_Reference 01cd 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01ce 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01cf e5fc | | Load 0x2,-0x4 01d0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01d1 481c |H | Short_Literal 0x1c 01d2 e5fd | | Load 0x2,-0x3 01d3 01d7 | | Execute Vector,Field_Read 01d4 6806 |h | Jump_Zero 0x1db 01d5 00db | | Load_Top At_Offset_3 01d6 0227 | ' | Execute Access,All_Reference 01d7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01d8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01d9 e5fc | | Load 0x2,-0x4 01da 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01db 481b |H | Short_Literal 0x1b 01dc e5fd | | Load 0x2,-0x3 01dd 01d7 | | Execute Vector,Field_Read 01de 6806 |h | Jump_Zero 0x1e5 01df 00db | | Load_Top At_Offset_3 01e0 0227 | ' | Execute Access,All_Reference 01e1 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01e2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 01e3 e5fc | | Load 0x2,-0x4 01e4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 01e5 481a |H | Short_Literal 0x1a 01e6 e5fd | | Load 0x2,-0x3 01e7 01d7 | | Execute Vector,Field_Read 01e8 6806 |h | Jump_Zero 0x1ef 01e9 00db | | Load_Top At_Offset_3 01ea 0227 | ' | Execute Access,All_Reference 01eb 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01ec 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 01ed e5fc | | Load 0x2,-0x4 01ee 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 01ef 4819 |H | Short_Literal 0x19 01f0 e5fd | | Load 0x2,-0x3 01f1 01d7 | | Execute Vector,Field_Read 01f2 6806 |h | Jump_Zero 0x1f9 01f3 00db | | Load_Top At_Offset_3 01f4 0227 | ' | Execute Access,All_Reference 01f5 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 01f6 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 01f7 e5fc | | Load 0x2,-0x4 01f8 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 01f9 4818 |H | Short_Literal 0x18 01fa e5fd | | Load 0x2,-0x3 01fb 01d7 | | Execute Vector,Field_Read 01fc 6806 |h | Jump_Zero 0x203 01fd 00db | | Load_Top At_Offset_3 01fe 0227 | ' | Execute Access,All_Reference 01ff 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0200 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0201 e5fc | | Load 0x2,-0x4 0202 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0203 4817 |H | Short_Literal 0x17 0204 e5fd | | Load 0x2,-0x3 0205 01d7 | | Execute Vector,Field_Read 0206 6806 |h | Jump_Zero 0x20d 0207 00db | | Load_Top At_Offset_3 0208 0227 | ' | Execute Access,All_Reference 0209 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 020a 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 020b e5fc | | Load 0x2,-0x4 020c 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 020d 4816 |H | Short_Literal 0x16 020e e5fd | | Load 0x2,-0x3 020f 01d7 | | Execute Vector,Field_Read 0210 6806 |h | Jump_Zero 0x217 0211 00db | | Load_Top At_Offset_3 0212 0227 | ' | Execute Access,All_Reference 0213 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0214 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0215 e5fc | | Load 0x2,-0x4 0216 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0217 4815 |H | Short_Literal 0x15 0218 e5fd | | Load 0x2,-0x3 0219 01d7 | | Execute Vector,Field_Read 021a 6806 |h | Jump_Zero 0x221 021b 00db | | Load_Top At_Offset_3 021c 0227 | ' | Execute Access,All_Reference 021d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 021e 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 021f e5fc | | Load 0x2,-0x4 0220 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0221 4814 |H | Short_Literal 0x14 0222 e5fd | | Load 0x2,-0x3 0223 01d7 | | Execute Vector,Field_Read 0224 6806 |h | Jump_Zero 0x22b 0225 00db | | Load_Top At_Offset_3 0226 0227 | ' | Execute Access,All_Reference 0227 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0228 340c |4 | Execute Record,Field_Reference,Field_Number 0xc 0229 e5fc | | Load 0x2,-0x4 022a 380c |8 | Execute Record,Field_Write,Field_Number 0xc 022b 4813 |H | Short_Literal 0x13 022c e5fd | | Load 0x2,-0x3 022d 01d7 | | Execute Vector,Field_Read 022e 6806 |h | Jump_Zero 0x235 022f 00db | | Load_Top At_Offset_3 0230 0227 | ' | Execute Access,All_Reference 0231 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0232 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0233 e5fc | | Load 0x2,-0x4 0234 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0235 4812 |H | Short_Literal 0x12 0236 e5fd | | Load 0x2,-0x3 0237 01d7 | | Execute Vector,Field_Read 0238 6806 |h | Jump_Zero 0x23f 0239 00db | | Load_Top At_Offset_3 023a 0227 | ' | Execute Access,All_Reference 023b 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 023c 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 023d e5fc | | Load 0x2,-0x4 023e 380e |8 | Execute Record,Field_Write,Field_Number 0xe 023f 4811 |H | Short_Literal 0x11 0240 e5fd | | Load 0x2,-0x3 0241 01d7 | | Execute Vector,Field_Read 0242 6806 |h | Jump_Zero 0x249 0243 00db | | Load_Top At_Offset_3 0244 0227 | ' | Execute Access,All_Reference 0245 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0246 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 0247 e5fc | | Load 0x2,-0x4 0248 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0249 4810 |H | Short_Literal 0x10 024a e5fd | | Load 0x2,-0x3 024b 01d7 | | Execute Vector,Field_Read 024c 6806 |h | Jump_Zero 0x253 024d 00db | | Load_Top At_Offset_3 024e 0227 | ' | Execute Access,All_Reference 024f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0250 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0251 e5fc | | Load 0x2,-0x4 0252 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 0253 480f |H | Short_Literal 0xf 0254 e5fd | | Load 0x2,-0x3 0255 01d7 | | Execute Vector,Field_Read 0256 6806 |h | Jump_Zero 0x25d 0257 00db | | Load_Top At_Offset_3 0258 0227 | ' | Execute Access,All_Reference 0259 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 025a 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 025b e5fc | | Load 0x2,-0x4 025c 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 025d 480e |H | Short_Literal 0xe 025e e5fd | | Load 0x2,-0x3 025f 01d7 | | Execute Vector,Field_Read 0260 6806 |h | Jump_Zero 0x267 0261 00db | | Load_Top At_Offset_3 0262 0227 | ' | Execute Access,All_Reference 0263 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0264 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0265 e5fc | | Load 0x2,-0x4 0266 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0267 480d |H | Short_Literal 0xd 0268 e5fd | | Load 0x2,-0x3 0269 01d7 | | Execute Vector,Field_Read 026a 6806 |h | Jump_Zero 0x271 026b 00db | | Load_Top At_Offset_3 026c 0227 | ' | Execute Access,All_Reference 026d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 026e 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 026f e5fc | | Load 0x2,-0x4 0270 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 0271 480b |H | Short_Literal 0xb 0272 e5fd | | Load 0x2,-0x3 0273 01d7 | | Execute Vector,Field_Read 0274 6806 |h | Jump_Zero 0x27b 0275 00db | | Load_Top At_Offset_3 0276 0227 | ' | Execute Access,All_Reference 0277 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0278 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0279 e5fc | | Load 0x2,-0x4 027a 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 027b 4809 |H | Short_Literal 0x9 027c e5fd | | Load 0x2,-0x3 027d 01d7 | | Execute Vector,Field_Read 027e 6806 |h | Jump_Zero 0x285 027f 00db | | Load_Top At_Offset_3 0280 0227 | ' | Execute Access,All_Reference 0281 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0282 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0283 e5fc | | Load 0x2,-0x4 0284 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0285 4801 |H | Short_Literal 0x1 0286 a5fb | | Store_Unchecked 0x2,-0x5 0287 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 0292 | | .CONST 0x0292 ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0004 | | .CONST 0x0004 ; Number of locals 028b INIT_0288: 028b e00f | | Load 0x0,0xf 028c 02ff | | Declare_Variable Variant_Record 028d 00d8 | | Load_Top At_Offset_0 028e 1c00 | | Execute_Immediate Run_Utility,0x0 028f e010 | | Load 0x0,0x10 0290 029f 0b93 | | Declare_Subprogram INIT_0b90,For_Call 0292 BODY_0288: 0292 e5ff | | Load 0x2,-0x1 0293 800c | | Call 0x0,0xc 0294 8404 | | Call 0x2,0x4 0295 4801 |H | Short_Literal 0x1 0296 a5f8 | | Store_Unchecked 0x2,-0x8 0297 e5ff | | Load 0x2,-0x1 0298 8011 | | Call 0x0,0x11 0299 e5ff | | Load 0x2,-0x1 029a 8012 | | Call 0x0,0x12 029b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 029c 0000 0000 | | .BLANK 0000[0x4] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02a3 | | .CONST 0x02a3 ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0001 | | .CONST 0x0001 ; Number of locals 02a3 BODY_02a0: 02a3 INIT_02a0: 02a3 e010 | | Load 0x0,0x10 02a4 e013 | | Load 0x0,0x13 02a5 00d8 | | Load_Top At_Offset_0 02a6 e5fc | | Load 0x2,-0x4 02a7 e5fd | | Load 0x2,-0x3 02a8 e5fe | | Load 0x2,-0x2 02a9 4802 |H | Short_Literal 0x2 02aa e5ff | | Load 0x2,-0x1 02ab 8213 | | Call 0x1,0x13 02ac c5fb | | Store 0x2,-0x5 02ad c5fa | | Store 0x2,-0x6 02ae c5f9 | | Store 0x2,-0x7 02af 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 e010 | | Load 0x0,0x10 02b4 e013 | | Load 0x0,0x13 02b5 00d8 | | Load_Top At_Offset_0 02b6 e5fc | | Load 0x2,-0x4 02b7 e5fd | | Load 0x2,-0x3 02b8 e5fe | | Load 0x2,-0x2 02b9 4801 |H | Short_Literal 0x1 02ba e5ff | | Load 0x2,-0x1 02bb 8213 | | Call 0x1,0x13 02bc c5fb | | Store 0x2,-0x5 02bd c5fa | | Store 0x2,-0x6 02be c5f9 | | Store 0x2,-0x7 02bf 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 00da | | Load_Top At_Offset_2 02c4 800c | | Call 0x0,0xc 02c5 00db | | Load_Top At_Offset_3 02c6 0227 | ' | Execute Access,All_Reference 02c7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 02c8 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 02c9 e5fd | | Load 0x2,-0x3 02ca 027f | | Execute Discrete,Equal 02cb 700b |p | Jump_Nonzero 0x2d7 02cc e5fd | | Load 0x2,-0x3 02cd e5fe | | Load 0x2,-0x2 02ce 0227 | ' | Execute Access,All_Reference 02cf 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 02d0 380a |8 | Execute Record,Field_Write,Field_Number 0xa 02d1 4801 |H | Short_Literal 0x1 02d2 4809 |H | Short_Literal 0x9 02d3 e5fe | | Load 0x2,-0x2 02d4 0227 | ' | Execute Access,All_Reference 02d5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 02d6 01d6 | | Execute Vector,Field_Write 02d7 00da | | Load_Top At_Offset_2 02d8 8011 | | Call 0x0,0x11 02d9 00da | | Load_Top At_Offset_2 02da 8012 | | Call 0x0,0x12 02db 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02dc 0000 0000 | | .BLANK 0000[0x4] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 800c | | Call 0x0,0xc 02e5 00db | | Load_Top At_Offset_3 02e6 0227 | ' | Execute Access,All_Reference 02e7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 02e8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02e9 e5fd | | Load 0x2,-0x3 02ea 027f | | Execute Discrete,Equal 02eb 700b |p | Jump_Nonzero 0x2f7 02ec e5fd | | Load 0x2,-0x3 02ed e5fe | | Load 0x2,-0x2 02ee 0227 | ' | Execute Access,All_Reference 02ef 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 02f0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02f1 4801 |H | Short_Literal 0x1 02f2 481c |H | Short_Literal 0x1c 02f3 e5fe | | Load 0x2,-0x2 02f4 0227 | ' | Execute Access,All_Reference 02f5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 02f6 01d6 | | Execute Vector,Field_Write 02f7 00da | | Load_Top At_Offset_2 02f8 8011 | | Call 0x0,0x11 02f9 00da | | Load_Top At_Offset_2 02fa 8012 | | Call 0x0,0x12 02fb 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02fc 0000 0000 | | .BLANK 0000[0x4] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 00da | | Load_Top At_Offset_2 0304 800c | | Call 0x0,0xc 0305 e5fd | | Load 0x2,-0x3 0306 e5fe | | Load 0x2,-0x2 0307 0227 | ' | Execute Access,All_Reference 0308 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0309 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 030a 4801 |H | Short_Literal 0x1 030b 480c |H | Short_Literal 0xc 030c e5fe | | Load 0x2,-0x2 030d 0227 | ' | Execute Access,All_Reference 030e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 030f 01d6 | | Execute Vector,Field_Write 0310 4800 |H | Short_Literal 0x0 0311 e5fe | | Load 0x2,-0x2 0312 0227 | ' | Execute Access,All_Reference 0313 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0314 00db | | Load_Top At_Offset_3 0315 00db | | Load_Top At_Offset_3 0316 8229 | ) | Call 0x1,0x29 0317 00da | | Load_Top At_Offset_2 0318 8011 | | Call 0x0,0x11 0319 00da | | Load_Top At_Offset_2 031a 8012 | | Call 0x0,0x12 031b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 031c 0000 0000 | | .BLANK 0000[0x4] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0327 | ' | .CONST 0x0327 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0002 | | .CONST 0x0002 ; Number of locals 0323 INIT_0320: 0323 00db | | Load_Top At_Offset_3 0324 0227 | ' | Execute Access,All_Reference 0325 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0326 0007 | | Action Break_Optional 0327 BODY_0320: 0327 00db | | Load_Top At_Offset_3 0328 800c | | Call 0x0,0xc 0329 e5fd | | Load 0x2,-0x3 032a 00d9 | | Load_Top At_Offset_1 032b 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 032c 027e | ~ | Execute Discrete,Not_Equal 032d 6809 |h | Jump_Zero 0x337 032e e5fd | | Load 0x2,-0x3 032f 00d9 | | Load_Top At_Offset_1 0330 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0331 4801 |H | Short_Literal 0x1 0332 480e |H | Short_Literal 0xe 0333 e5fe | | Load 0x2,-0x2 0334 0227 | ' | Execute Access,All_Reference 0335 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0336 01d6 | | Execute Vector,Field_Write 0337 e5fc | | Load 0x2,-0x4 0338 00d9 | | Load_Top At_Offset_1 0339 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 033a 027e | ~ | Execute Discrete,Not_Equal 033b 6809 |h | Jump_Zero 0x345 033c e5fc | | Load 0x2,-0x4 033d 00d9 | | Load_Top At_Offset_1 033e 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 033f 4801 |H | Short_Literal 0x1 0340 480d |H | Short_Literal 0xd 0341 e5fe | | Load 0x2,-0x2 0342 0227 | ' | Execute Access,All_Reference 0343 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0344 01d6 | | Execute Vector,Field_Write 0345 00db | | Load_Top At_Offset_3 0346 8011 | | Call 0x0,0x11 0347 00db | | Load_Top At_Offset_3 0348 8012 | | Call 0x0,0x12 0349 4505 |E | Exit_Suprogram New_Top_Offset 0x5 034a 0000 0000 | | .BLANK 0000[0x6] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0355 | U | .CONST 0x0355 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0002 | | .CONST 0x0002 ; Number of locals 0353 INIT_0350: 0353 029f 0bdb | | Declare_Subprogram INIT_0bd8,For_Call 0355 BODY_0350: 0355 00db | | Load_Top At_Offset_3 0356 800c | | Call 0x0,0xc 0357 8402 | | Call 0x2,0x2 0358 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0359 0000 0000 | | .BLANK 0000[0x7] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0365 | e | .CONST 0x0365 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0002 | | .CONST 0x0002 ; Number of locals 0363 INIT_0360: 0363 029f 0c53 | S| Declare_Subprogram INIT_0c50,For_Call 0365 BODY_0360: 0365 00db | | Load_Top At_Offset_3 0366 800c | | Call 0x0,0xc 0367 8402 | | Call 0x2,0x2 0368 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0369 0000 0000 | | .BLANK 0000[0x7] 0370 ; -------------------------------------------------------------------------------------- 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 INIT_0370: 0373 00da | | Load_Top At_Offset_2 0374 800c | | Call 0x0,0xc 0375 00db | | Load_Top At_Offset_3 0376 0227 | ' | Execute Access,All_Reference 0377 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0378 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0379 e5fd | | Load 0x2,-0x3 037a 027f | | Execute Discrete,Equal 037b 700b |p | Jump_Nonzero 0x387 037c e5fd | | Load 0x2,-0x3 037d e5fe | | Load 0x2,-0x2 037e 0227 | ' | Execute Access,All_Reference 037f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0380 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0381 4801 |H | Short_Literal 0x1 0382 4816 |H | Short_Literal 0x16 0383 e5fe | | Load 0x2,-0x2 0384 0227 | ' | Execute Access,All_Reference 0385 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0386 01d6 | | Execute Vector,Field_Write 0387 00da | | Load_Top At_Offset_2 0388 8011 | | Call 0x0,0x11 0389 00da | | Load_Top At_Offset_2 038a 8012 | | Call 0x0,0x12 038b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 038c 0000 0000 | | .BLANK 0000[0x4] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 0393 | | .CONST 0x0393 ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0001 | | .CONST 0x0001 ; Number of locals 0393 BODY_0390: 0393 INIT_0390: 0393 00da | | Load_Top At_Offset_2 0394 800c | | Call 0x0,0xc 0395 00db | | Load_Top At_Offset_3 0396 0227 | ' | Execute Access,All_Reference 0397 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0398 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0399 e5fd | | Load 0x2,-0x3 039a 027f | | Execute Discrete,Equal 039b 700b |p | Jump_Nonzero 0x3a7 039c e5fd | | Load 0x2,-0x3 039d e5fe | | Load 0x2,-0x2 039e 0227 | ' | Execute Access,All_Reference 039f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 03a0 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 03a1 4801 |H | Short_Literal 0x1 03a2 4817 |H | Short_Literal 0x17 03a3 e5fe | | Load 0x2,-0x2 03a4 0227 | ' | Execute Access,All_Reference 03a5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 03a6 01d6 | | Execute Vector,Field_Write 03a7 00da | | Load_Top At_Offset_2 03a8 8011 | | Call 0x0,0x11 03a9 00da | | Load_Top At_Offset_2 03aa 8012 | | Call 0x0,0x12 03ab 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03ac 0000 0000 | | .BLANK 0000[0x4] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b3 | | .CONST 0x03b3 ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0001 | | .CONST 0x0001 ; Number of locals 03b3 BODY_03b0: 03b3 INIT_03b0: 03b3 00da | | Load_Top At_Offset_2 03b4 800c | | Call 0x0,0xc 03b5 00db | | Load_Top At_Offset_3 03b6 0227 | ' | Execute Access,All_Reference 03b7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 03b8 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 03b9 e5fd | | Load 0x2,-0x3 03ba 017f | | Execute Record,Equal 03bb 700e |p | Jump_Nonzero 0x3ca 03bc e5fd | | Load 0x2,-0x3 03bd e5fe | | Load 0x2,-0x2 03be 0227 | ' | Execute Access,All_Reference 03bf 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 03c0 380f |8 | Execute Record,Field_Write,Field_Number 0xf 03c1 4801 |H | Short_Literal 0x1 03c2 4811 |H | Short_Literal 0x11 03c3 e5fe | | Load 0x2,-0x2 03c4 0227 | ' | Execute Access,All_Reference 03c5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 03c6 01d6 | | Execute Vector,Field_Write 03c7 00db | | Load_Top At_Offset_3 03c8 00db | | Load_Top At_Offset_3 03c9 8229 | ) | Call 0x1,0x29 03ca 00da | | Load_Top At_Offset_2 03cb 8011 | | Call 0x0,0x11 03cc 00da | | Load_Top At_Offset_2 03cd 8012 | | Call 0x0,0x12 03ce 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03cf 0000 | | .XXX[0x1] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03d3 | | .CONST 0x03d3 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0001 | | .CONST 0x0001 ; Number of locals 03d3 BODY_03d0: 03d3 INIT_03d0: 03d3 00da | | Load_Top At_Offset_2 03d4 800c | | Call 0x0,0xc 03d5 00db | | Load_Top At_Offset_3 03d6 0227 | ' | Execute Access,All_Reference 03d7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 03d8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03d9 e5fd | | Load 0x2,-0x3 03da 027f | | Execute Discrete,Equal 03db 700b |p | Jump_Nonzero 0x3e7 03dc e5fd | | Load 0x2,-0x3 03dd e5fe | | Load 0x2,-0x2 03de 0227 | ' | Execute Access,All_Reference 03df 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 03e0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03e1 4801 |H | Short_Literal 0x1 03e2 481d |H | Short_Literal 0x1d 03e3 e5fe | | Load 0x2,-0x2 03e4 0227 | ' | Execute Access,All_Reference 03e5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 03e6 01d6 | | Execute Vector,Field_Write 03e7 00da | | Load_Top At_Offset_2 03e8 8011 | | Call 0x0,0x11 03e9 00da | | Load_Top At_Offset_2 03ea 8012 | | Call 0x0,0x12 03eb 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03ec 0000 0000 | | .BLANK 0000[0x4] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 800c | | Call 0x0,0xc 03f5 00db | | Load_Top At_Offset_3 03f6 0227 | ' | Execute Access,All_Reference 03f7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 03f8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03f9 e5fd | | Load 0x2,-0x3 03fa 027f | | Execute Discrete,Equal 03fb 700b |p | Jump_Nonzero 0x407 03fc e5fd | | Load 0x2,-0x3 03fd e5fe | | Load 0x2,-0x2 03fe 0227 | ' | Execute Access,All_Reference 03ff 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0400 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0401 4801 |H | Short_Literal 0x1 0402 481f |H | Short_Literal 0x1f 0403 e5fe | | Load 0x2,-0x2 0404 0227 | ' | Execute Access,All_Reference 0405 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0406 01d6 | | Execute Vector,Field_Write 0407 00da | | Load_Top At_Offset_2 0408 8011 | | Call 0x0,0x11 0409 00da | | Load_Top At_Offset_2 040a 8012 | | Call 0x0,0x12 040b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 040c 0000 0000 | | .BLANK 0000[0x4] 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0413 | | .CONST 0x0413 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0001 | | .CONST 0x0001 ; Number of locals 0413 BODY_0410: 0413 INIT_0410: 0413 00da | | Load_Top At_Offset_2 0414 800c | | Call 0x0,0xc 0415 00db | | Load_Top At_Offset_3 0416 0227 | ' | Execute Access,All_Reference 0417 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0418 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 0419 e5fd | | Load 0x2,-0x3 041a 027e | ~ | Execute Discrete,Not_Equal 041b 680b |h | Jump_Zero 0x427 041c e5fd | | Load 0x2,-0x3 041d e5fe | | Load 0x2,-0x2 041e 0227 | ' | Execute Access,All_Reference 041f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0420 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0421 4801 |H | Short_Literal 0x1 0422 480f |H | Short_Literal 0xf 0423 e5fe | | Load 0x2,-0x2 0424 0227 | ' | Execute Access,All_Reference 0425 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0426 01d6 | | Execute Vector,Field_Write 0427 00da | | Load_Top At_Offset_2 0428 8011 | | Call 0x0,0x11 0429 00da | | Load_Top At_Offset_2 042a 8012 | | Call 0x0,0x12 042b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 042c 0000 0000 | | .BLANK 0000[0x4] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0437 | 7 | .CONST 0x0437 ; Address of begin 0431 0004 | | .CONST 0x0004 ; Address of exception handler 0432 0002 | | .CONST 0x0002 ; Number of locals 0433 INIT_0430: 0433 00db | | Load_Top At_Offset_3 0434 0227 | ' | Execute Access,All_Reference 0435 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0436 0007 | | Action Break_Optional 0437 BODY_0430: 0437 00db | | Load_Top At_Offset_3 0438 800c | | Call 0x0,0xc 0439 e5fd | | Load 0x2,-0x3 043a 00d9 | | Load_Top At_Offset_1 043b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 043c 027e | ~ | Execute Discrete,Not_Equal 043d 6809 |h | Jump_Zero 0x447 043e e5fd | | Load 0x2,-0x3 043f 00d9 | | Load_Top At_Offset_1 0440 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0441 4801 |H | Short_Literal 0x1 0442 481b |H | Short_Literal 0x1b 0443 e5fe | | Load 0x2,-0x2 0444 0227 | ' | Execute Access,All_Reference 0445 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0446 01d6 | | Execute Vector,Field_Write 0447 e5fc | | Load 0x2,-0x4 0448 00d9 | | Load_Top At_Offset_1 0449 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 044a 027f | | Execute Discrete,Equal 044b 7009 |p | Jump_Nonzero 0x455 044c e5fc | | Load 0x2,-0x4 044d 00d9 | | Load_Top At_Offset_1 044e 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 044f 4801 |H | Short_Literal 0x1 0450 481a |H | Short_Literal 0x1a 0451 e5fe | | Load 0x2,-0x2 0452 0227 | ' | Execute Access,All_Reference 0453 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0454 01d6 | | Execute Vector,Field_Write 0455 e5fb | | Load 0x2,-0x5 0456 00d9 | | Load_Top At_Offset_1 0457 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0458 027f | | Execute Discrete,Equal 0459 7009 |p | Jump_Nonzero 0x463 045a e5fb | | Load 0x2,-0x5 045b 00d9 | | Load_Top At_Offset_1 045c 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 045d 4801 |H | Short_Literal 0x1 045e 4819 |H | Short_Literal 0x19 045f e5fe | | Load 0x2,-0x2 0460 0227 | ' | Execute Access,All_Reference 0461 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0462 01d6 | | Execute Vector,Field_Write 0463 e5fa | | Load 0x2,-0x6 0464 00d9 | | Load_Top At_Offset_1 0465 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0466 027f | | Execute Discrete,Equal 0467 7009 |p | Jump_Nonzero 0x471 0468 e5fa | | Load 0x2,-0x6 0469 00d9 | | Load_Top At_Offset_1 046a 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 046b 4801 |H | Short_Literal 0x1 046c 4818 |H | Short_Literal 0x18 046d e5fe | | Load 0x2,-0x2 046e 0227 | ' | Execute Access,All_Reference 046f 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0470 01d6 | | Execute Vector,Field_Write 0471 00db | | Load_Top At_Offset_3 0472 8011 | | Call 0x0,0x11 0473 00db | | Load_Top At_Offset_3 0474 8012 | | Call 0x0,0x12 0475 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0476 0000 0000 | | .XXX[0x2] 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 0004 | | .CONST 0x0004 ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b 00da | | Load_Top At_Offset_2 047c 800c | | Call 0x0,0xc 047d 00db | | Load_Top At_Offset_3 047e 0227 | ' | Execute Access,All_Reference 047f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0480 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0481 e5fd | | Load 0x2,-0x3 0482 027f | | Execute Discrete,Equal 0483 700b |p | Jump_Nonzero 0x48f 0484 e5fd | | Load 0x2,-0x3 0485 e5fe | | Load 0x2,-0x2 0486 0227 | ' | Execute Access,All_Reference 0487 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0488 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0489 4801 |H | Short_Literal 0x1 048a 481e |H | Short_Literal 0x1e 048b e5fe | | Load 0x2,-0x2 048c 0227 | ' | Execute Access,All_Reference 048d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 048e 01d6 | | Execute Vector,Field_Write 048f 00da | | Load_Top At_Offset_2 0490 8011 | | Call 0x0,0x11 0491 00da | | Load_Top At_Offset_2 0492 8012 | | Call 0x0,0x12 0493 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0494 0000 0000 | | .BLANK 0000[0x4] 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049f | | .CONST 0x049f ; Address of begin 0499 0004 | | .CONST 0x0004 ; Address of exception handler 049a 0002 | | .CONST 0x0002 ; Number of locals 049b INIT_0498: 049b 00db | | Load_Top At_Offset_3 049c 0227 | ' | Execute Access,All_Reference 049d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 049e 0007 | | Action Break_Optional 049f BODY_0498: 049f 00db | | Load_Top At_Offset_3 04a0 800c | | Call 0x0,0xc 04a1 e5fb | | Load 0x2,-0x5 04a2 00d9 | | Load_Top At_Offset_1 04a3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04a4 027f | | Execute Discrete,Equal 04a5 7009 |p | Jump_Nonzero 0x4af 04a6 e5fb | | Load 0x2,-0x5 04a7 00d9 | | Load_Top At_Offset_1 04a8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04a9 4801 |H | Short_Literal 0x1 04aa 481f |H | Short_Literal 0x1f 04ab e5fe | | Load 0x2,-0x2 04ac 0227 | ' | Execute Access,All_Reference 04ad 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 04ae 01d6 | | Execute Vector,Field_Write 04af e5fa | | Load 0x2,-0x6 04b0 00d9 | | Load_Top At_Offset_1 04b1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b2 027f | | Execute Discrete,Equal 04b3 7009 |p | Jump_Nonzero 0x4bd 04b4 e5fa | | Load 0x2,-0x6 04b5 00d9 | | Load_Top At_Offset_1 04b6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04b7 4801 |H | Short_Literal 0x1 04b8 481e |H | Short_Literal 0x1e 04b9 e5fe | | Load 0x2,-0x2 04ba 0227 | ' | Execute Access,All_Reference 04bb 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 04bc 01d6 | | Execute Vector,Field_Write 04bd e5fd | | Load 0x2,-0x3 04be 00d9 | | Load_Top At_Offset_1 04bf 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04c0 027f | | Execute Discrete,Equal 04c1 7009 |p | Jump_Nonzero 0x4cb 04c2 e5fd | | Load 0x2,-0x3 04c3 00d9 | | Load_Top At_Offset_1 04c4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04c5 4801 |H | Short_Literal 0x1 04c6 481d |H | Short_Literal 0x1d 04c7 e5fe | | Load 0x2,-0x2 04c8 0227 | ' | Execute Access,All_Reference 04c9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 04ca 01d6 | | Execute Vector,Field_Write 04cb e5fc | | Load 0x2,-0x4 04cc 00d9 | | Load_Top At_Offset_1 04cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 04ce 027f | | Execute Discrete,Equal 04cf 7009 |p | Jump_Nonzero 0x4d9 04d0 e5fc | | Load 0x2,-0x4 04d1 00d9 | | Load_Top At_Offset_1 04d2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 04d3 4801 |H | Short_Literal 0x1 04d4 481c |H | Short_Literal 0x1c 04d5 e5fe | | Load 0x2,-0x2 04d6 0227 | ' | Execute Access,All_Reference 04d7 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 04d8 01d6 | | Execute Vector,Field_Write 04d9 00db | | Load_Top At_Offset_3 04da 8011 | | Call 0x0,0x11 04db 00db | | Load_Top At_Offset_3 04dc 8012 | | Call 0x0,0x12 04dd 4507 |E | Exit_Suprogram New_Top_Offset 0x7 04de 0000 0000 | | .XXX[0x2] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e5 | | .CONST 0x04e5 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0002 | | .CONST 0x0002 ; Number of locals 04e3 INIT_04e0: 04e3 029f 0cc3 | | Declare_Subprogram INIT_0cc0,For_Call 04e5 BODY_04e0: 04e5 00db | | Load_Top At_Offset_3 04e6 800c | | Call 0x0,0xc 04e7 8402 | | Call 0x2,0x2 04e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04e9 0000 0000 | | .BLANK 0000[0x7] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 04f3 | | .CONST 0x04f3 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0001 | | .CONST 0x0001 ; Number of locals 04f3 BODY_04f0: 04f3 INIT_04f0: 04f3 00da | | Load_Top At_Offset_2 04f4 800c | | Call 0x0,0xc 04f5 00db | | Load_Top At_Offset_3 04f6 0227 | ' | Execute Access,All_Reference 04f7 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 04f8 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 04f9 e5fd | | Load 0x2,-0x3 04fa 027f | | Execute Discrete,Equal 04fb 700b |p | Jump_Nonzero 0x507 04fc e5fd | | Load 0x2,-0x3 04fd e5fe | | Load 0x2,-0x2 04fe 0227 | ' | Execute Access,All_Reference 04ff 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0500 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 0501 4801 |H | Short_Literal 0x1 0502 4810 |H | Short_Literal 0x10 0503 e5fe | | Load 0x2,-0x2 0504 0227 | ' | Execute Access,All_Reference 0505 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0506 01d6 | | Execute Vector,Field_Write 0507 00da | | Load_Top At_Offset_2 0508 8011 | | Call 0x0,0x11 0509 00da | | Load_Top At_Offset_2 050a 8012 | | Call 0x0,0x12 050b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 050c 0000 0000 | | .BLANK 0000[0x4] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 0513 | | .CONST 0x0513 ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0001 | | .CONST 0x0001 ; Number of locals 0513 BODY_0510: 0513 INIT_0510: 0513 00da | | Load_Top At_Offset_2 0514 800c | | Call 0x0,0xc 0515 e5fd | | Load 0x2,-0x3 0516 e5fe | | Load 0x2,-0x2 0517 0227 | ' | Execute Access,All_Reference 0518 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0519 380b |8 | Execute Record,Field_Write,Field_Number 0xb 051a 4801 |H | Short_Literal 0x1 051b 4815 |H | Short_Literal 0x15 051c e5fe | | Load 0x2,-0x2 051d 0227 | ' | Execute Access,All_Reference 051e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 051f 01d6 | | Execute Vector,Field_Write 0520 00db | | Load_Top At_Offset_3 0521 00db | | Load_Top At_Offset_3 0522 8229 | ) | Call 0x1,0x29 0523 00da | | Load_Top At_Offset_2 0524 8011 | | Call 0x0,0x11 0525 00da | | Load_Top At_Offset_2 0526 8012 | | Call 0x0,0x12 0527 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 052f | / | .CONST 0x052f ; Address of begin 0529 0004 | | .CONST 0x0004 ; Address of exception handler 052a 0002 | | .CONST 0x0002 ; Number of locals 052b INIT_0528: 052b 00db | | Load_Top At_Offset_3 052c 0227 | ' | Execute Access,All_Reference 052d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 052e 0007 | | Action Break_Optional 052f BODY_0528: 052f 00db | | Load_Top At_Offset_3 0530 800c | | Call 0x0,0xc 0531 e5fd | | Load 0x2,-0x3 0532 00d9 | | Load_Top At_Offset_1 0533 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0534 027e | ~ | Execute Discrete,Not_Equal 0535 6809 |h | Jump_Zero 0x53f 0536 e5fd | | Load 0x2,-0x3 0537 00d9 | | Load_Top At_Offset_1 0538 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0539 4801 |H | Short_Literal 0x1 053a 4813 |H | Short_Literal 0x13 053b e5fe | | Load 0x2,-0x2 053c 0227 | ' | Execute Access,All_Reference 053d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 053e 01d6 | | Execute Vector,Field_Write 053f e5fc | | Load 0x2,-0x4 0540 00d9 | | Load_Top At_Offset_1 0541 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0542 027e | ~ | Execute Discrete,Not_Equal 0543 6809 |h | Jump_Zero 0x54d 0544 e5fc | | Load 0x2,-0x4 0545 00d9 | | Load_Top At_Offset_1 0546 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0547 4801 |H | Short_Literal 0x1 0548 4812 |H | Short_Literal 0x12 0549 e5fe | | Load 0x2,-0x2 054a 0227 | ' | Execute Access,All_Reference 054b 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 054c 01d6 | | Execute Vector,Field_Write 054d 00db | | Load_Top At_Offset_3 054e 8011 | | Call 0x0,0x11 054f 00db | | Load_Top At_Offset_3 0550 8012 | | Call 0x0,0x12 0551 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0552 0000 0000 | | .BLANK 0000[0x6] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 0568 | h | .CONST 0x0568 ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0005 | | .CONST 0x0005 ; Number of locals 055b INIT_0558: 055b 00db | | Load_Top At_Offset_3 055c 0007 | | Action Break_Optional 055d e00d | | Load 0x0,0xd 055e 0007 | | Action Break_Optional 055f e00e | | Load 0x0,0xe 0560 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0561 e004 | | Load 0x0,0x4 0562 0337 | 7 | Declare_Variable Array 0563 00db | | Load_Top At_Offset_3 0564 0227 | ' | Execute Access,All_Reference 0565 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0566 00d9 | | Load_Top At_Offset_1 0567 01d4 | | Execute Vector,Structure_Write 0568 BODY_0558: 0568 00d8 | | Load_Top At_Offset_0 0569 e00b | | Load 0x0,0xb 056a 01df | | Execute Vector,Equal 056b 6801 |h | Jump_Zero 0x56d 056c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 056d e00b | | Load 0x0,0xb 056e e402 | | Load 0x2,0x2 056f 0227 | ' | Execute Access,All_Reference 0570 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0571 00cf | | Action Mark_Auxiliary 0572 00d9 | | Load_Top At_Offset_1 0573 01d9 | | Execute Vector,Reverse_Bounds 0574 0007 | | Action Break_Optional 0575 00d8 | | Load_Top At_Offset_0 0576 e405 | | Load 0x2,0x5 0577 01d7 | | Execute Vector,Field_Read 0578 6803 |h | Jump_Zero 0x57c 0579 e404 | | Load 0x2,0x4 057a 0a01 | | Execute_Immediate Plus,0x1 057b c404 | | Store 0x2,0x4 057c 00c8 | | Action Pop_Auxiliary_Range 057d 3ff7 |? | Loop_Increasing 0x575 057e 00ce | | Action Pop_Auxiliary 057f 00d9 | | Load_Top At_Offset_1 0580 0902 | | Execute_Immediate Binary_Scale,0x2 0581 00d8 | | Load_Top At_Offset_0 0582 e00e | | Load 0x0,0xe 0583 0260 | ` | Execute Discrete,In_Type 0584 7001 |p | Jump_Nonzero 0x586 0585 0801 | | Execute_Immediate Raise,0x1 0586 e014 | | Load 0x0,0x14 0587 0322 | " | Declare_Variable Record 0588 4838 |H8 | Short_Literal 0x38 0589 00d9 | | Load_Top At_Offset_1 058a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 058b e014 | | Load 0x0,0x14 058c 012c | , | Execute Any,Size 058d 09fb | | Execute_Immediate Binary_Scale,-0x5 058e e404 | | Load 0x2,0x4 058f 00d8 | | Load_Top At_Offset_0 0590 e013 | | Load 0x0,0x13 0591 0260 | ` | Execute Discrete,In_Type 0592 7001 |p | Jump_Nonzero 0x594 0593 0801 | | Execute_Immediate Raise,0x1 0594 0273 | s | Execute Discrete,Plus 0595 00d9 | | Load_Top At_Offset_1 0596 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0597 4800 |H | Short_Literal 0x0 0598 00d9 | | Load_Top At_Offset_1 0599 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 059a e402 | | Load 0x2,0x2 059b 0227 | ' | Execute Access,All_Reference 059c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 059d 00d9 | | Load_Top At_Offset_1 059e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 059f 00da | | Load_Top At_Offset_2 05a0 e014 | | Load 0x0,0x14 05a1 3004 |0 | Execute Record,Field_Type,Field_Number 0x4 05a2 0119 | | Execute Any,Check_In_Formal_Type 05a3 00d9 | | Load_Top At_Offset_1 05a4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 05a5 e5ff | | Load 0x2,-0x1 05a6 e015 | | Load 0x0,0x15 05a7 a016 | | Store_Unchecked 0x0,0x16 05a8 e017 | | Load 0x0,0x17 05a9 e018 | | Load 0x0,0x18 05aa a019 | | Store_Unchecked 0x0,0x19 05ab 801a | | Call 0x0,0x1a 05ac 00db | | Load_Top At_Offset_3 05ad 0227 | ' | Execute Access,All_Reference 05ae 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 05af 00d9 | | Load_Top At_Offset_1 05b0 e5ff | | Load 0x2,-0x1 05b1 8232 | 2 | Call 0x1,0x32 05b2 e5ff | | Load 0x2,-0x1 05b3 0227 | ' | Execute Access,All_Reference 05b4 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25 05b5 003b | ; | Store_Top Access,At_Offset_3 05b6 00cf | | Action Mark_Auxiliary 05b7 7815 |x | Jump 0x5cd 05b8 00db | | Load_Top At_Offset_3 05b9 0227 | ' | Execute Access,All_Reference 05ba 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 05bb e01b | | Load 0x0,0x1b 05bc 022e | . | Execute Access,Not_Equal 05bd 680a |h | Jump_Zero 0x5c8 05be 00db | | Load_Top At_Offset_3 05bf 0227 | ' | Execute Access,All_Reference 05c0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 05c1 e402 | | Load 0x2,0x2 05c2 e5ff | | Load 0x2,-0x1 05c3 e403 | | Load 0x2,0x3 05c4 0227 | ' | Execute Access,All_Reference 05c5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 05c6 801c | | Call 0x0,0x1c 05c7 801d | | Call 0x0,0x1d 05c8 00db | | Load_Top At_Offset_3 05c9 0227 | ' | Execute Access,All_Reference 05ca 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05cb a403 | | Store_Unchecked 0x2,0x3 05cc 00c9 | | Action Pop_Auxiliary_Loop 05cd 00db | | Load_Top At_Offset_3 05ce 77e9 |w | Jump_Nonzero 0x5b8 05cf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d7 | | .CONST 0x05d7 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0002 | | .CONST 0x0002 ; Number of locals 05d3 INIT_05d0: 05d3 00da | | Load_Top At_Offset_2 05d4 0227 | ' | Execute Access,All_Reference 05d5 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 05d6 0007 | | Action Break_Optional 05d7 BODY_05d0: 05d7 481f |H | Short_Literal 0x1f 05d8 e5fe | | Load 0x2,-0x2 05d9 01d7 | | Execute Vector,Field_Read 05da 6810 |h | Jump_Zero 0x5eb 05db 00d8 | | Load_Top At_Offset_0 05dc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05dd e5fd | | Load 0x2,-0x3 05de 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05df 027f | | Execute Discrete,Equal 05e0 700a |p | Jump_Nonzero 0x5eb 05e1 e5fd | | Load 0x2,-0x3 05e2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05e3 00d9 | | Load_Top At_Offset_1 05e4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05e5 4801 |H | Short_Literal 0x1 05e6 481f |H | Short_Literal 0x1f 05e7 e5ff | | Load 0x2,-0x1 05e8 0227 | ' | Execute Access,All_Reference 05e9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 05ea 01d6 | | Execute Vector,Field_Write 05eb 481e |H | Short_Literal 0x1e 05ec e5fe | | Load 0x2,-0x2 05ed 01d7 | | Execute Vector,Field_Read 05ee 6810 |h | Jump_Zero 0x5ff 05ef 00d8 | | Load_Top At_Offset_0 05f0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05f1 e5fd | | Load 0x2,-0x3 05f2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05f3 027f | | Execute Discrete,Equal 05f4 700a |p | Jump_Nonzero 0x5ff 05f5 e5fd | | Load 0x2,-0x3 05f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05f7 00d9 | | Load_Top At_Offset_1 05f8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 05f9 4801 |H | Short_Literal 0x1 05fa 481e |H | Short_Literal 0x1e 05fb e5ff | | Load 0x2,-0x1 05fc 0227 | ' | Execute Access,All_Reference 05fd 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 05fe 01d6 | | Execute Vector,Field_Write 05ff 481d |H | Short_Literal 0x1d 0600 e5fe | | Load 0x2,-0x2 0601 01d7 | | Execute Vector,Field_Read 0602 6810 |h | Jump_Zero 0x613 0603 00d8 | | Load_Top At_Offset_0 0604 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0605 e5fd | | Load 0x2,-0x3 0606 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0607 027f | | Execute Discrete,Equal 0608 700a |p | Jump_Nonzero 0x613 0609 e5fd | | Load 0x2,-0x3 060a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 060b 00d9 | | Load_Top At_Offset_1 060c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 060d 4801 |H | Short_Literal 0x1 060e 481d |H | Short_Literal 0x1d 060f e5ff | | Load 0x2,-0x1 0610 0227 | ' | Execute Access,All_Reference 0611 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0612 01d6 | | Execute Vector,Field_Write 0613 481c |H | Short_Literal 0x1c 0614 e5fe | | Load 0x2,-0x2 0615 01d7 | | Execute Vector,Field_Read 0616 6810 |h | Jump_Zero 0x627 0617 00d8 | | Load_Top At_Offset_0 0618 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0619 e5fd | | Load 0x2,-0x3 061a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 061b 027f | | Execute Discrete,Equal 061c 700a |p | Jump_Nonzero 0x627 061d e5fd | | Load 0x2,-0x3 061e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 061f 00d9 | | Load_Top At_Offset_1 0620 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0621 4801 |H | Short_Literal 0x1 0622 481c |H | Short_Literal 0x1c 0623 e5ff | | Load 0x2,-0x1 0624 0227 | ' | Execute Access,All_Reference 0625 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0626 01d6 | | Execute Vector,Field_Write 0627 481b |H | Short_Literal 0x1b 0628 e5fe | | Load 0x2,-0x2 0629 01d7 | | Execute Vector,Field_Read 062a 6810 |h | Jump_Zero 0x63b 062b 00d8 | | Load_Top At_Offset_0 062c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 062d e5fd | | Load 0x2,-0x3 062e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 062f 027e | ~ | Execute Discrete,Not_Equal 0630 680a |h | Jump_Zero 0x63b 0631 e5fd | | Load 0x2,-0x3 0632 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0633 00d9 | | Load_Top At_Offset_1 0634 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0635 4801 |H | Short_Literal 0x1 0636 481b |H | Short_Literal 0x1b 0637 e5ff | | Load 0x2,-0x1 0638 0227 | ' | Execute Access,All_Reference 0639 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 063a 01d6 | | Execute Vector,Field_Write 063b 481a |H | Short_Literal 0x1a 063c e5fe | | Load 0x2,-0x2 063d 01d7 | | Execute Vector,Field_Read 063e 6810 |h | Jump_Zero 0x64f 063f 00d8 | | Load_Top At_Offset_0 0640 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0641 e5fd | | Load 0x2,-0x3 0642 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0643 027f | | Execute Discrete,Equal 0644 700a |p | Jump_Nonzero 0x64f 0645 e5fd | | Load 0x2,-0x3 0646 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0647 00d9 | | Load_Top At_Offset_1 0648 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0649 4801 |H | Short_Literal 0x1 064a 481a |H | Short_Literal 0x1a 064b e5ff | | Load 0x2,-0x1 064c 0227 | ' | Execute Access,All_Reference 064d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 064e 01d6 | | Execute Vector,Field_Write 064f 4819 |H | Short_Literal 0x19 0650 e5fe | | Load 0x2,-0x2 0651 01d7 | | Execute Vector,Field_Read 0652 6810 |h | Jump_Zero 0x663 0653 00d8 | | Load_Top At_Offset_0 0654 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0655 e5fd | | Load 0x2,-0x3 0656 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0657 027f | | Execute Discrete,Equal 0658 700a |p | Jump_Nonzero 0x663 0659 e5fd | | Load 0x2,-0x3 065a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 065b 00d9 | | Load_Top At_Offset_1 065c 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 065d 4801 |H | Short_Literal 0x1 065e 4819 |H | Short_Literal 0x19 065f e5ff | | Load 0x2,-0x1 0660 0227 | ' | Execute Access,All_Reference 0661 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0662 01d6 | | Execute Vector,Field_Write 0663 4818 |H | Short_Literal 0x18 0664 e5fe | | Load 0x2,-0x2 0665 01d7 | | Execute Vector,Field_Read 0666 6810 |h | Jump_Zero 0x677 0667 00d8 | | Load_Top At_Offset_0 0668 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0669 e5fd | | Load 0x2,-0x3 066a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 066b 027f | | Execute Discrete,Equal 066c 700a |p | Jump_Nonzero 0x677 066d e5fd | | Load 0x2,-0x3 066e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 066f 00d9 | | Load_Top At_Offset_1 0670 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0671 4801 |H | Short_Literal 0x1 0672 4818 |H | Short_Literal 0x18 0673 e5ff | | Load 0x2,-0x1 0674 0227 | ' | Execute Access,All_Reference 0675 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0676 01d6 | | Execute Vector,Field_Write 0677 4817 |H | Short_Literal 0x17 0678 e5fe | | Load 0x2,-0x2 0679 01d7 | | Execute Vector,Field_Read 067a 6810 |h | Jump_Zero 0x68b 067b 00d8 | | Load_Top At_Offset_0 067c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 067d e5fd | | Load 0x2,-0x3 067e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 067f 027f | | Execute Discrete,Equal 0680 700a |p | Jump_Nonzero 0x68b 0681 e5fd | | Load 0x2,-0x3 0682 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0683 00d9 | | Load_Top At_Offset_1 0684 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0685 4801 |H | Short_Literal 0x1 0686 4817 |H | Short_Literal 0x17 0687 e5ff | | Load 0x2,-0x1 0688 0227 | ' | Execute Access,All_Reference 0689 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 068a 01d6 | | Execute Vector,Field_Write 068b 4816 |H | Short_Literal 0x16 068c e5fe | | Load 0x2,-0x2 068d 01d7 | | Execute Vector,Field_Read 068e 6810 |h | Jump_Zero 0x69f 068f 00d8 | | Load_Top At_Offset_0 0690 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0691 e5fd | | Load 0x2,-0x3 0692 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0693 027f | | Execute Discrete,Equal 0694 700a |p | Jump_Nonzero 0x69f 0695 e5fd | | Load 0x2,-0x3 0696 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0697 00d9 | | Load_Top At_Offset_1 0698 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0699 4801 |H | Short_Literal 0x1 069a 4816 |H | Short_Literal 0x16 069b e5ff | | Load 0x2,-0x1 069c 0227 | ' | Execute Access,All_Reference 069d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 069e 01d6 | | Execute Vector,Field_Write 069f 4809 |H | Short_Literal 0x9 06a0 e5fe | | Load 0x2,-0x2 06a1 01d7 | | Execute Vector,Field_Read 06a2 6810 |h | Jump_Zero 0x6b3 06a3 00d8 | | Load_Top At_Offset_0 06a4 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 06a5 e5fd | | Load 0x2,-0x3 06a6 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 06a7 027f | | Execute Discrete,Equal 06a8 700a |p | Jump_Nonzero 0x6b3 06a9 e5fd | | Load 0x2,-0x3 06aa 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 06ab 00d9 | | Load_Top At_Offset_1 06ac 380a |8 | Execute Record,Field_Write,Field_Number 0xa 06ad 4801 |H | Short_Literal 0x1 06ae 4809 |H | Short_Literal 0x9 06af e5ff | | Load 0x2,-0x1 06b0 0227 | ' | Execute Access,All_Reference 06b1 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06b2 01d6 | | Execute Vector,Field_Write 06b3 4815 |H | Short_Literal 0x15 06b4 e5fe | | Load 0x2,-0x2 06b5 01d7 | | Execute Vector,Field_Read 06b6 680a |h | Jump_Zero 0x6c1 06b7 e5fd | | Load 0x2,-0x3 06b8 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 06b9 00d9 | | Load_Top At_Offset_1 06ba 380b |8 | Execute Record,Field_Write,Field_Number 0xb 06bb 4801 |H | Short_Literal 0x1 06bc 4815 |H | Short_Literal 0x15 06bd e5ff | | Load 0x2,-0x1 06be 0227 | ' | Execute Access,All_Reference 06bf 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06c0 01d6 | | Execute Vector,Field_Write 06c1 4814 |H | Short_Literal 0x14 06c2 e5fe | | Load 0x2,-0x2 06c3 01d7 | | Execute Vector,Field_Read 06c4 680a |h | Jump_Zero 0x6cf 06c5 e5fd | | Load 0x2,-0x3 06c6 340c |4 | Execute Record,Field_Reference,Field_Number 0xc 06c7 00d9 | | Load_Top At_Offset_1 06c8 380c |8 | Execute Record,Field_Write,Field_Number 0xc 06c9 4801 |H | Short_Literal 0x1 06ca 4814 |H | Short_Literal 0x14 06cb e5ff | | Load 0x2,-0x1 06cc 0227 | ' | Execute Access,All_Reference 06cd 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06ce 01d6 | | Execute Vector,Field_Write 06cf 4813 |H | Short_Literal 0x13 06d0 e5fe | | Load 0x2,-0x2 06d1 01d7 | | Execute Vector,Field_Read 06d2 6810 |h | Jump_Zero 0x6e3 06d3 00d8 | | Load_Top At_Offset_0 06d4 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 06d5 e5fd | | Load 0x2,-0x3 06d6 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 06d7 027e | ~ | Execute Discrete,Not_Equal 06d8 680a |h | Jump_Zero 0x6e3 06d9 e5fd | | Load 0x2,-0x3 06da 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 06db 00d9 | | Load_Top At_Offset_1 06dc 380d |8 | Execute Record,Field_Write,Field_Number 0xd 06dd 4801 |H | Short_Literal 0x1 06de 4813 |H | Short_Literal 0x13 06df e5ff | | Load 0x2,-0x1 06e0 0227 | ' | Execute Access,All_Reference 06e1 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06e2 01d6 | | Execute Vector,Field_Write 06e3 4812 |H | Short_Literal 0x12 06e4 e5fe | | Load 0x2,-0x2 06e5 01d7 | | Execute Vector,Field_Read 06e6 6810 |h | Jump_Zero 0x6f7 06e7 00d8 | | Load_Top At_Offset_0 06e8 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 06e9 e5fd | | Load 0x2,-0x3 06ea 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 06eb 027e | ~ | Execute Discrete,Not_Equal 06ec 680a |h | Jump_Zero 0x6f7 06ed e5fd | | Load 0x2,-0x3 06ee 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 06ef 00d9 | | Load_Top At_Offset_1 06f0 380e |8 | Execute Record,Field_Write,Field_Number 0xe 06f1 4801 |H | Short_Literal 0x1 06f2 4812 |H | Short_Literal 0x12 06f3 e5ff | | Load 0x2,-0x1 06f4 0227 | ' | Execute Access,All_Reference 06f5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06f6 01d6 | | Execute Vector,Field_Write 06f7 4811 |H | Short_Literal 0x11 06f8 e5fe | | Load 0x2,-0x2 06f9 01d7 | | Execute Vector,Field_Read 06fa 6810 |h | Jump_Zero 0x70b 06fb 00d8 | | Load_Top At_Offset_0 06fc 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 06fd e5fd | | Load 0x2,-0x3 06fe 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 06ff 017f | | Execute Record,Equal 0700 700a |p | Jump_Nonzero 0x70b 0701 e5fd | | Load 0x2,-0x3 0702 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 0703 00d9 | | Load_Top At_Offset_1 0704 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0705 4801 |H | Short_Literal 0x1 0706 4811 |H | Short_Literal 0x11 0707 e5ff | | Load 0x2,-0x1 0708 0227 | ' | Execute Access,All_Reference 0709 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 070a 01d6 | | Execute Vector,Field_Write 070b 4810 |H | Short_Literal 0x10 070c e5fe | | Load 0x2,-0x2 070d 01d7 | | Execute Vector,Field_Read 070e 6810 |h | Jump_Zero 0x71f 070f 00d8 | | Load_Top At_Offset_0 0710 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0711 e5fd | | Load 0x2,-0x3 0712 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0713 027f | | Execute Discrete,Equal 0714 700a |p | Jump_Nonzero 0x71f 0715 e5fd | | Load 0x2,-0x3 0716 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0717 00d9 | | Load_Top At_Offset_1 0718 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 0719 4801 |H | Short_Literal 0x1 071a 4810 |H | Short_Literal 0x10 071b e5ff | | Load 0x2,-0x1 071c 0227 | ' | Execute Access,All_Reference 071d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 071e 01d6 | | Execute Vector,Field_Write 071f 480f |H | Short_Literal 0xf 0720 e5fe | | Load 0x2,-0x2 0721 01d7 | | Execute Vector,Field_Read 0722 6810 |h | Jump_Zero 0x733 0723 00d8 | | Load_Top At_Offset_0 0724 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 0725 e5fd | | Load 0x2,-0x3 0726 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 0727 027e | ~ | Execute Discrete,Not_Equal 0728 680a |h | Jump_Zero 0x733 0729 e5fd | | Load 0x2,-0x3 072a 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 072b 00d9 | | Load_Top At_Offset_1 072c 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 072d 4801 |H | Short_Literal 0x1 072e 480f |H | Short_Literal 0xf 072f e5ff | | Load 0x2,-0x1 0730 0227 | ' | Execute Access,All_Reference 0731 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0732 01d6 | | Execute Vector,Field_Write 0733 480e |H | Short_Literal 0xe 0734 e5fe | | Load 0x2,-0x2 0735 01d7 | | Execute Vector,Field_Read 0736 6810 |h | Jump_Zero 0x747 0737 00d8 | | Load_Top At_Offset_0 0738 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0739 e5fd | | Load 0x2,-0x3 073a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 073b 027e | ~ | Execute Discrete,Not_Equal 073c 680a |h | Jump_Zero 0x747 073d e5fd | | Load 0x2,-0x3 073e 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 073f 00d9 | | Load_Top At_Offset_1 0740 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0741 4801 |H | Short_Literal 0x1 0742 480e |H | Short_Literal 0xe 0743 e5ff | | Load 0x2,-0x1 0744 0227 | ' | Execute Access,All_Reference 0745 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0746 01d6 | | Execute Vector,Field_Write 0747 480d |H | Short_Literal 0xd 0748 e5fe | | Load 0x2,-0x2 0749 01d7 | | Execute Vector,Field_Read 074a 6810 |h | Jump_Zero 0x75b 074b 00d8 | | Load_Top At_Offset_0 074c 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 074d e5fd | | Load 0x2,-0x3 074e 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 074f 027e | ~ | Execute Discrete,Not_Equal 0750 680a |h | Jump_Zero 0x75b 0751 e5fd | | Load 0x2,-0x3 0752 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 0753 00d9 | | Load_Top At_Offset_1 0754 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 0755 4801 |H | Short_Literal 0x1 0756 480d |H | Short_Literal 0xd 0757 e5ff | | Load 0x2,-0x1 0758 0227 | ' | Execute Access,All_Reference 0759 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 075a 01d6 | | Execute Vector,Field_Write 075b 480c |H | Short_Literal 0xc 075c e5fe | | Load 0x2,-0x2 075d 01d7 | | Execute Vector,Field_Read 075e 680e |h | Jump_Zero 0x76d 075f e5fd | | Load 0x2,-0x3 0760 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 0761 00d9 | | Load_Top At_Offset_1 0762 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 0763 4801 |H | Short_Literal 0x1 0764 480c |H | Short_Literal 0xc 0765 e5ff | | Load 0x2,-0x1 0766 0227 | ' | Execute Access,All_Reference 0767 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0768 01d6 | | Execute Vector,Field_Write 0769 4800 |H | Short_Literal 0x0 076a e5ff | | Load 0x2,-0x1 076b 0227 | ' | Execute Access,All_Reference 076c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 076d 480b |H | Short_Literal 0xb 076e e5fe | | Load 0x2,-0x2 076f 01d7 | | Execute Vector,Field_Read 0770 6810 |h | Jump_Zero 0x781 0771 00d8 | | Load_Top At_Offset_0 0772 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0773 e5fd | | Load 0x2,-0x3 0774 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0775 027e | ~ | Execute Discrete,Not_Equal 0776 680a |h | Jump_Zero 0x781 0777 e5fd | | Load 0x2,-0x3 0778 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0779 00d9 | | Load_Top At_Offset_1 077a 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 077b 4801 |H | Short_Literal 0x1 077c 480b |H | Short_Literal 0xb 077d e5ff | | Load 0x2,-0x1 077e 0227 | ' | Execute Access,All_Reference 077f 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0780 01d6 | | Execute Vector,Field_Write 0781 480a |H | Short_Literal 0xa 0782 e5fe | | Load 0x2,-0x2 0783 01d7 | | Execute Vector,Field_Read 0784 6819 |h | Jump_Zero 0x79e 0785 00d8 | | Load_Top At_Offset_0 0786 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0787 e5fd | | Load 0x2,-0x3 0788 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0789 027e | ~ | Execute Discrete,Not_Equal 078a 7005 |p | Jump_Nonzero 0x790 078b 00db | | Load_Top At_Offset_3 078c 0227 | ' | Execute Access,All_Reference 078d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 078e 0f01 | | Execute_Immediate Equal,0x1 078f 680e |h | Jump_Zero 0x79e 0790 e5fd | | Load 0x2,-0x3 0791 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0792 00d9 | | Load_Top At_Offset_1 0793 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 0794 4801 |H | Short_Literal 0x1 0795 480a |H | Short_Literal 0xa 0796 e5ff | | Load 0x2,-0x1 0797 0227 | ' | Execute Access,All_Reference 0798 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0799 01d6 | | Execute Vector,Field_Write 079a 4800 |H | Short_Literal 0x0 079b e5ff | | Load 0x2,-0x1 079c 0227 | ' | Execute Access,All_Reference 079d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 079e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 079f 0000 | | .XXX[0x1] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 481f |H | Short_Literal 0x1f 07a4 e5fe | | Load 0x2,-0x2 07a5 01d7 | | Execute Vector,Field_Read 07a6 680e |h | Jump_Zero 0x7b5 07a7 e5fd | | Load 0x2,-0x3 07a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07a9 00d8 | | Load_Top At_Offset_0 07aa e01e | | Load 0x0,0x1e 07ab 0260 | ` | Execute Discrete,In_Type 07ac 7001 |p | Jump_Nonzero 0x7ae 07ad 0801 | | Execute_Immediate Raise,0x1 07ae 00db | | Load_Top At_Offset_3 07af e01f | | Load 0x0,0x1f 07b0 a020 | | Store_Unchecked 0x0,0x20 07b1 e021 | ! | Load 0x0,0x21 07b2 e022 | " | Load 0x0,0x22 07b3 a023 | # | Store_Unchecked 0x0,0x23 07b4 8024 | $ | Call 0x0,0x24 07b5 481e |H | Short_Literal 0x1e 07b6 e5fe | | Load 0x2,-0x2 07b7 01d7 | | Execute Vector,Field_Read 07b8 6809 |h | Jump_Zero 0x7c2 07b9 e5fd | | Load 0x2,-0x3 07ba 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07bb 00db | | Load_Top At_Offset_3 07bc e025 | % | Load 0x0,0x25 07bd a026 | & | Store_Unchecked 0x0,0x26 07be e027 | ' | Load 0x0,0x27 07bf e028 | ( | Load 0x0,0x28 07c0 a029 | ) | Store_Unchecked 0x0,0x29 07c1 8024 | $ | Call 0x0,0x24 07c2 481d |H | Short_Literal 0x1d 07c3 e5fe | | Load 0x2,-0x2 07c4 01d7 | | Execute Vector,Field_Read 07c5 6809 |h | Jump_Zero 0x7cf 07c6 e5fd | | Load 0x2,-0x3 07c7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07c8 00db | | Load_Top At_Offset_3 07c9 e02a | * | Load 0x0,0x2a 07ca a02b | + | Store_Unchecked 0x0,0x2b 07cb e02c | , | Load 0x0,0x2c 07cc e02d | - | Load 0x0,0x2d 07cd a02e | . | Store_Unchecked 0x0,0x2e 07ce 8024 | $ | Call 0x0,0x24 07cf 481c |H | Short_Literal 0x1c 07d0 e5fe | | Load 0x2,-0x2 07d1 01d7 | | Execute Vector,Field_Read 07d2 6809 |h | Jump_Zero 0x7dc 07d3 e5fd | | Load 0x2,-0x3 07d4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 07d5 00db | | Load_Top At_Offset_3 07d6 e02a | * | Load 0x0,0x2a 07d7 a02b | + | Store_Unchecked 0x0,0x2b 07d8 e02c | , | Load 0x0,0x2c 07d9 e02d | - | Load 0x0,0x2d 07da a02e | . | Store_Unchecked 0x0,0x2e 07db 8024 | $ | Call 0x0,0x24 07dc 481b |H | Short_Literal 0x1b 07dd e5fe | | Load 0x2,-0x2 07de 01d7 | | Execute Vector,Field_Read 07df 6809 |h | Jump_Zero 0x7e9 07e0 e5fd | | Load 0x2,-0x3 07e1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 07e2 00db | | Load_Top At_Offset_3 07e3 e01f | | Load 0x0,0x1f 07e4 a020 | | Store_Unchecked 0x0,0x20 07e5 e021 | ! | Load 0x0,0x21 07e6 e022 | " | Load 0x0,0x22 07e7 a023 | # | Store_Unchecked 0x0,0x23 07e8 8024 | $ | Call 0x0,0x24 07e9 481a |H | Short_Literal 0x1a 07ea e5fe | | Load 0x2,-0x2 07eb 01d7 | | Execute Vector,Field_Read 07ec 680e |h | Jump_Zero 0x7fb 07ed e5fd | | Load 0x2,-0x3 07ee 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07ef 00d8 | | Load_Top At_Offset_0 07f0 e01e | | Load 0x0,0x1e 07f1 0260 | ` | Execute Discrete,In_Type 07f2 7001 |p | Jump_Nonzero 0x7f4 07f3 0801 | | Execute_Immediate Raise,0x1 07f4 00db | | Load_Top At_Offset_3 07f5 e01f | | Load 0x0,0x1f 07f6 a020 | | Store_Unchecked 0x0,0x20 07f7 e021 | ! | Load 0x0,0x21 07f8 e022 | " | Load 0x0,0x22 07f9 a023 | # | Store_Unchecked 0x0,0x23 07fa 8024 | $ | Call 0x0,0x24 07fb 4819 |H | Short_Literal 0x19 07fc e5fe | | Load 0x2,-0x2 07fd 01d7 | | Execute Vector,Field_Read 07fe 680e |h | Jump_Zero 0x80d 07ff e5fd | | Load 0x2,-0x3 0800 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0801 00d8 | | Load_Top At_Offset_0 0802 e01e | | Load 0x0,0x1e 0803 0260 | ` | Execute Discrete,In_Type 0804 7001 |p | Jump_Nonzero 0x806 0805 0801 | | Execute_Immediate Raise,0x1 0806 00db | | Load_Top At_Offset_3 0807 e01f | | Load 0x0,0x1f 0808 a020 | | Store_Unchecked 0x0,0x20 0809 e021 | ! | Load 0x0,0x21 080a e022 | " | Load 0x0,0x22 080b a023 | # | Store_Unchecked 0x0,0x23 080c 8024 | $ | Call 0x0,0x24 080d 4818 |H | Short_Literal 0x18 080e e5fe | | Load 0x2,-0x2 080f 01d7 | | Execute Vector,Field_Read 0810 680e |h | Jump_Zero 0x81f 0811 e5fd | | Load 0x2,-0x3 0812 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0813 00d8 | | Load_Top At_Offset_0 0814 e01e | | Load 0x0,0x1e 0815 0260 | ` | Execute Discrete,In_Type 0816 7001 |p | Jump_Nonzero 0x818 0817 0801 | | Execute_Immediate Raise,0x1 0818 00db | | Load_Top At_Offset_3 0819 e01f | | Load 0x0,0x1f 081a a020 | | Store_Unchecked 0x0,0x20 081b e021 | ! | Load 0x0,0x21 081c e022 | " | Load 0x0,0x22 081d a023 | # | Store_Unchecked 0x0,0x23 081e 8024 | $ | Call 0x0,0x24 081f 4817 |H | Short_Literal 0x17 0820 e5fe | | Load 0x2,-0x2 0821 01d7 | | Execute Vector,Field_Read 0822 680e |h | Jump_Zero 0x831 0823 e5fd | | Load 0x2,-0x3 0824 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0825 00d8 | | Load_Top At_Offset_0 0826 e01e | | Load 0x0,0x1e 0827 0260 | ` | Execute Discrete,In_Type 0828 7001 |p | Jump_Nonzero 0x82a 0829 0801 | | Execute_Immediate Raise,0x1 082a 00db | | Load_Top At_Offset_3 082b e01f | | Load 0x0,0x1f 082c a020 | | Store_Unchecked 0x0,0x20 082d e021 | ! | Load 0x0,0x21 082e e022 | " | Load 0x0,0x22 082f a023 | # | Store_Unchecked 0x0,0x23 0830 8024 | $ | Call 0x0,0x24 0831 4816 |H | Short_Literal 0x16 0832 e5fe | | Load 0x2,-0x2 0833 01d7 | | Execute Vector,Field_Read 0834 680e |h | Jump_Zero 0x843 0835 e5fd | | Load 0x2,-0x3 0836 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0837 00d8 | | Load_Top At_Offset_0 0838 e01e | | Load 0x0,0x1e 0839 0260 | ` | Execute Discrete,In_Type 083a 7001 |p | Jump_Nonzero 0x83c 083b 0801 | | Execute_Immediate Raise,0x1 083c 00db | | Load_Top At_Offset_3 083d e01f | | Load 0x0,0x1f 083e a020 | | Store_Unchecked 0x0,0x20 083f e021 | ! | Load 0x0,0x21 0840 e022 | " | Load 0x0,0x22 0841 a023 | # | Store_Unchecked 0x0,0x23 0842 8024 | $ | Call 0x0,0x24 0843 4815 |H | Short_Literal 0x15 0844 e5fe | | Load 0x2,-0x2 0845 01d7 | | Execute Vector,Field_Read 0846 680b |h | Jump_Zero 0x852 0847 e5fd | | Load 0x2,-0x3 0848 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 0849 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 084a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 084b 00db | | Load_Top At_Offset_3 084c e02f | / | Load 0x0,0x2f 084d a030 | 0 | Store_Unchecked 0x0,0x30 084e e031 | 1 | Load 0x0,0x31 084f e032 | 2 | Load 0x0,0x32 0850 a033 | 3 | Store_Unchecked 0x0,0x33 0851 8024 | $ | Call 0x0,0x24 0852 4814 |H | Short_Literal 0x14 0853 e5fe | | Load 0x2,-0x2 0854 01d7 | | Execute Vector,Field_Read 0855 680b |h | Jump_Zero 0x861 0856 e5fd | | Load 0x2,-0x3 0857 340c |4 | Execute Record,Field_Reference,Field_Number 0xc 0858 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0859 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 085a 00db | | Load_Top At_Offset_3 085b e02f | / | Load 0x0,0x2f 085c a030 | 0 | Store_Unchecked 0x0,0x30 085d e031 | 1 | Load 0x0,0x31 085e e032 | 2 | Load 0x0,0x32 085f a033 | 3 | Store_Unchecked 0x0,0x33 0860 8024 | $ | Call 0x0,0x24 0861 4813 |H | Short_Literal 0x13 0862 e5fe | | Load 0x2,-0x2 0863 01d7 | | Execute Vector,Field_Read 0864 6809 |h | Jump_Zero 0x86e 0865 e5fd | | Load 0x2,-0x3 0866 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0867 00db | | Load_Top At_Offset_3 0868 e01f | | Load 0x0,0x1f 0869 a020 | | Store_Unchecked 0x0,0x20 086a e021 | ! | Load 0x0,0x21 086b e022 | " | Load 0x0,0x22 086c a023 | # | Store_Unchecked 0x0,0x23 086d 8024 | $ | Call 0x0,0x24 086e 4812 |H | Short_Literal 0x12 086f e5fe | | Load 0x2,-0x2 0870 01d7 | | Execute Vector,Field_Read 0871 6809 |h | Jump_Zero 0x87b 0872 e5fd | | Load 0x2,-0x3 0873 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0874 00db | | Load_Top At_Offset_3 0875 e01f | | Load 0x0,0x1f 0876 a020 | | Store_Unchecked 0x0,0x20 0877 e021 | ! | Load 0x0,0x21 0878 e022 | " | Load 0x0,0x22 0879 a023 | # | Store_Unchecked 0x0,0x23 087a 8024 | $ | Call 0x0,0x24 087b 4811 |H | Short_Literal 0x11 087c e5fe | | Load 0x2,-0x2 087d 01d7 | | Execute Vector,Field_Read 087e 680a |h | Jump_Zero 0x889 087f e5fd | | Load 0x2,-0x3 0880 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 0881 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0882 00db | | Load_Top At_Offset_3 0883 e02f | / | Load 0x0,0x2f 0884 a030 | 0 | Store_Unchecked 0x0,0x30 0885 e031 | 1 | Load 0x0,0x31 0886 e032 | 2 | Load 0x0,0x32 0887 a033 | 3 | Store_Unchecked 0x0,0x33 0888 8024 | $ | Call 0x0,0x24 0889 4810 |H | Short_Literal 0x10 088a e5fe | | Load 0x2,-0x2 088b 01d7 | | Execute Vector,Field_Read 088c 680e |h | Jump_Zero 0x89b 088d e5fd | | Load 0x2,-0x3 088e 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 088f 00d8 | | Load_Top At_Offset_0 0890 e01e | | Load 0x0,0x1e 0891 0260 | ` | Execute Discrete,In_Type 0892 7001 |p | Jump_Nonzero 0x894 0893 0801 | | Execute_Immediate Raise,0x1 0894 00db | | Load_Top At_Offset_3 0895 e01f | | Load 0x0,0x1f 0896 a020 | | Store_Unchecked 0x0,0x20 0897 e021 | ! | Load 0x0,0x21 0898 e022 | " | Load 0x0,0x22 0899 a023 | # | Store_Unchecked 0x0,0x23 089a 8024 | $ | Call 0x0,0x24 089b 480f |H | Short_Literal 0xf 089c e5fe | | Load 0x2,-0x2 089d 01d7 | | Execute Vector,Field_Read 089e 680e |h | Jump_Zero 0x8ad 089f e5fd | | Load 0x2,-0x3 08a0 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 08a1 00d8 | | Load_Top At_Offset_0 08a2 e01e | | Load 0x0,0x1e 08a3 0260 | ` | Execute Discrete,In_Type 08a4 7001 |p | Jump_Nonzero 0x8a6 08a5 0801 | | Execute_Immediate Raise,0x1 08a6 00db | | Load_Top At_Offset_3 08a7 e01f | | Load 0x0,0x1f 08a8 a020 | | Store_Unchecked 0x0,0x20 08a9 e021 | ! | Load 0x0,0x21 08aa e022 | " | Load 0x0,0x22 08ab a023 | # | Store_Unchecked 0x0,0x23 08ac 8024 | $ | Call 0x0,0x24 08ad 480e |H | Short_Literal 0xe 08ae e5fe | | Load 0x2,-0x2 08af 01d7 | | Execute Vector,Field_Read 08b0 6809 |h | Jump_Zero 0x8ba 08b1 e5fd | | Load 0x2,-0x3 08b2 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 08b3 00db | | Load_Top At_Offset_3 08b4 e01f | | Load 0x0,0x1f 08b5 a020 | | Store_Unchecked 0x0,0x20 08b6 e021 | ! | Load 0x0,0x21 08b7 e022 | " | Load 0x0,0x22 08b8 a023 | # | Store_Unchecked 0x0,0x23 08b9 8024 | $ | Call 0x0,0x24 08ba 480d |H | Short_Literal 0xd 08bb e5fe | | Load 0x2,-0x2 08bc 01d7 | | Execute Vector,Field_Read 08bd 6809 |h | Jump_Zero 0x8c7 08be e5fd | | Load 0x2,-0x3 08bf 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 08c0 00db | | Load_Top At_Offset_3 08c1 e01f | | Load 0x0,0x1f 08c2 a020 | | Store_Unchecked 0x0,0x20 08c3 e021 | ! | Load 0x0,0x21 08c4 e022 | " | Load 0x0,0x22 08c5 a023 | # | Store_Unchecked 0x0,0x23 08c6 8024 | $ | Call 0x0,0x24 08c7 480c |H | Short_Literal 0xc 08c8 e5fe | | Load 0x2,-0x2 08c9 01d7 | | Execute Vector,Field_Read 08ca 680b |h | Jump_Zero 0x8d6 08cb e5fd | | Load 0x2,-0x3 08cc 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 08cd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 08ce 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 08cf 00db | | Load_Top At_Offset_3 08d0 e02f | / | Load 0x0,0x2f 08d1 a030 | 0 | Store_Unchecked 0x0,0x30 08d2 e031 | 1 | Load 0x0,0x31 08d3 e032 | 2 | Load 0x0,0x32 08d4 a033 | 3 | Store_Unchecked 0x0,0x33 08d5 8024 | $ | Call 0x0,0x24 08d6 480b |H | Short_Literal 0xb 08d7 e5fe | | Load 0x2,-0x2 08d8 01d7 | | Execute Vector,Field_Read 08d9 6809 |h | Jump_Zero 0x8e3 08da e5fd | | Load 0x2,-0x3 08db 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 08dc 00db | | Load_Top At_Offset_3 08dd e01f | | Load 0x0,0x1f 08de a020 | | Store_Unchecked 0x0,0x20 08df e021 | ! | Load 0x0,0x21 08e0 e022 | " | Load 0x0,0x22 08e1 a023 | # | Store_Unchecked 0x0,0x23 08e2 8024 | $ | Call 0x0,0x24 08e3 480a |H | Short_Literal 0xa 08e4 e5fe | | Load 0x2,-0x2 08e5 01d7 | | Execute Vector,Field_Read 08e6 6809 |h | Jump_Zero 0x8f0 08e7 e5fd | | Load 0x2,-0x3 08e8 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 08e9 00db | | Load_Top At_Offset_3 08ea e01f | | Load 0x0,0x1f 08eb a020 | | Store_Unchecked 0x0,0x20 08ec e021 | ! | Load 0x0,0x21 08ed e022 | " | Load 0x0,0x22 08ee a023 | # | Store_Unchecked 0x0,0x23 08ef 8024 | $ | Call 0x0,0x24 08f0 4809 |H | Short_Literal 0x9 08f1 e5fe | | Load 0x2,-0x2 08f2 01d7 | | Execute Vector,Field_Read 08f3 680e |h | Jump_Zero 0x902 08f4 e5fd | | Load 0x2,-0x3 08f5 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 08f6 00d8 | | Load_Top At_Offset_0 08f7 e01e | | Load 0x0,0x1e 08f8 0260 | ` | Execute Discrete,In_Type 08f9 7001 |p | Jump_Nonzero 0x8fb 08fa 0801 | | Execute_Immediate Raise,0x1 08fb 00db | | Load_Top At_Offset_3 08fc e01f | | Load 0x0,0x1f 08fd a020 | | Store_Unchecked 0x0,0x20 08fe e021 | ! | Load 0x0,0x21 08ff e022 | " | Load 0x0,0x22 0900 a023 | # | Store_Unchecked 0x0,0x23 0901 8024 | $ | Call 0x0,0x24 0902 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0903 0000 0000 | | .BLANK 0000[0x5] 0908 ; -------------------------------------------------------------------------------------- 0908 ; SUBPROGRAM 0908 ; -------------------------------------------------------------------------------------- 0908 090b | | .CONST 0x090b ; Address of begin 0909 0944 | D | .CONST 0x0944 ; Address of exception handler 090a 0001 | | .CONST 0x0001 ; Number of locals 090b BODY_0908: 090b INIT_0908: 090b e5fc | | Load 0x2,-0x4 090c e402 | | Load 0x2,0x2 090d e5fe | | Load 0x2,-0x2 090e 8231 | 1 | Call 0x1,0x31 090f e5fe | | Load 0x2,-0x2 0910 0227 | ' | Execute Access,All_Reference 0911 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0912 e004 | | Load 0x0,0x4 0913 0337 | 7 | Declare_Variable Array 0914 4801 |H | Short_Literal 0x1 0915 4811 |H | Short_Literal 0x11 0916 00da | | Load_Top At_Offset_2 0917 01d6 | | Execute Vector,Field_Write 0918 4801 |H | Short_Literal 0x1 0919 4815 |H | Short_Literal 0x15 091a 00da | | Load_Top At_Offset_2 091b 01d6 | | Execute Vector,Field_Write 091c 4801 |H | Short_Literal 0x1 091d 4814 |H | Short_Literal 0x14 091e 00da | | Load_Top At_Offset_2 091f 01d6 | | Execute Vector,Field_Write 0920 4810 |H | Short_Literal 0x10 0921 4800 |H | Short_Literal 0x0 0922 4800 |H | Short_Literal 0x0 0923 00d9 | | Load_Top At_Offset_1 0924 e603 | | Load 0x3,0x3 0925 01d6 | | Execute Vector,Field_Write 0926 3ffb |? | Loop_Increasing 0x922 0927 4800 |H | Short_Literal 0x0 0928 4812 |H | Short_Literal 0x12 0929 00da | | Load_Top At_Offset_2 092a 01d6 | | Execute Vector,Field_Write 092b 4800 |H | Short_Literal 0x0 092c 4813 |H | Short_Literal 0x13 092d 00da | | Load_Top At_Offset_2 092e 01d6 | | Execute Vector,Field_Write 092f 481f |H | Short_Literal 0x1f 0930 4816 |H | Short_Literal 0x16 0931 4800 |H | Short_Literal 0x0 0932 00d9 | | Load_Top At_Offset_1 0933 e603 | | Load 0x3,0x3 0934 01d6 | | Execute Vector,Field_Write 0935 3ffb |? | Loop_Increasing 0x931 0936 e004 | | Load 0x0,0x4 0937 01c3 | | Execute Vector,Check_In_Type 0938 01d3 | | Execute Vector,And 0939 e00b | | Load 0x0,0xb 093a 01df | | Execute Vector,Equal 093b 7003 |p | Jump_Nonzero 0x93f 093c e5fe | | Load 0x2,-0x2 093d e5ff | | Load 0x2,-0x1 093e 8229 | ) | Call 0x1,0x29 093f e5ff | | Load 0x2,-0x1 0940 8011 | | Call 0x0,0x11 0941 e5ff | | Load 0x2,-0x1 0942 8012 | | Call 0x0,0x12 0943 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0944 TRAP_0908: 0944 0007 | | Action Break_Optional 0945 e5ff | | Load 0x2,-0x1 0946 8011 | | Call 0x0,0x11 0947 00d8 | | Load_Top At_Offset_0 0948 0101 | | Execute Exception,Reraise 0949 0000 0000 | | .BLANK 0000[0x7] 0950 ; -------------------------------------------------------------------------------------- 0950 ; SUBPROGRAM 0950 ; -------------------------------------------------------------------------------------- 0950 0953 | S | .CONST 0x0953 ; Address of begin 0951 0a72 | r | .CONST 0x0a72 ; Address of exception handler 0952 0001 | | .CONST 0x0001 ; Number of locals 0953 BODY_0950: 0953 INIT_0950: 0953 e5fe | | Load 0x2,-0x2 0954 0227 | ' | Execute Access,All_Reference 0955 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0956 e405 | | Load 0x2,0x5 0957 01d3 | | Execute Vector,And 0958 e00b | | Load 0x0,0xb 0959 01df | | Execute Vector,Equal 095a 7003 |p | Jump_Nonzero 0x95e 095b e5fe | | Load 0x2,-0x2 095c e5ff | | Load 0x2,-0x1 095d 8229 | ) | Call 0x1,0x29 095e e5fc | | Load 0x2,-0x4 095f 0227 | ' | Execute Access,All_Reference 0960 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0961 e405 | | Load 0x2,0x5 0962 01d0 | | Execute Vector,Complement 0963 01d3 | | Execute Vector,And 0964 e5fc | | Load 0x2,-0x4 0965 0227 | ' | Execute Access,All_Reference 0966 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0967 e034 | 4 | Load 0x0,0x34 0968 0322 | " | Declare_Variable Record 0969 4839 |H9 | Short_Literal 0x39 096a 00d9 | | Load_Top At_Offset_1 096b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 096c e034 | 4 | Load 0x0,0x34 096d 012c | , | Execute Any,Size 096e 09fb | | Execute_Immediate Binary_Scale,-0x5 096f 00d9 | | Load_Top At_Offset_1 0970 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0971 4800 |H | Short_Literal 0x0 0972 00d9 | | Load_Top At_Offset_1 0973 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0974 e5fe | | Load 0x2,-0x2 0975 0227 | ' | Execute Access,All_Reference 0976 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0977 00d9 | | Load_Top At_Offset_1 0978 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0979 e5fc | | Load 0x2,-0x4 097a 0227 | ' | Execute Access,All_Reference 097b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 097c 00d9 | | Load_Top At_Offset_1 097d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 097e e405 | | Load 0x2,0x5 097f e034 | 4 | Load 0x0,0x34 0980 3005 |0 | Execute Record,Field_Type,Field_Number 0x5 0981 0119 | | Execute Any,Check_In_Formal_Type 0982 00d9 | | Load_Top At_Offset_1 0983 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0984 e5ff | | Load 0x2,-0x1 0985 e035 | 5 | Load 0x0,0x35 0986 a036 | 6 | Store_Unchecked 0x0,0x36 0987 e037 | 7 | Load 0x0,0x37 0988 e038 | 8 | Load 0x0,0x38 0989 a039 | 9 | Store_Unchecked 0x0,0x39 098a 803a | : | Call 0x0,0x3a 098b 481f |H | Short_Literal 0x1f 098c e405 | | Load 0x2,0x5 098d 01d7 | | Execute Vector,Field_Read 098e 6804 |h | Jump_Zero 0x993 098f e403 | | Load 0x2,0x3 0990 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0991 e402 | | Load 0x2,0x2 0992 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0993 481e |H | Short_Literal 0x1e 0994 e405 | | Load 0x2,0x5 0995 01d7 | | Execute Vector,Field_Read 0996 6804 |h | Jump_Zero 0x99b 0997 e403 | | Load 0x2,0x3 0998 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0999 e402 | | Load 0x2,0x2 099a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 099b 481d |H | Short_Literal 0x1d 099c e405 | | Load 0x2,0x5 099d 01d7 | | Execute Vector,Field_Read 099e 6804 |h | Jump_Zero 0x9a3 099f e403 | | Load 0x2,0x3 09a0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 09a1 e402 | | Load 0x2,0x2 09a2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 09a3 481c |H | Short_Literal 0x1c 09a4 e405 | | Load 0x2,0x5 09a5 01d7 | | Execute Vector,Field_Read 09a6 6804 |h | Jump_Zero 0x9ab 09a7 e403 | | Load 0x2,0x3 09a8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09a9 e402 | | Load 0x2,0x2 09aa 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 09ab 481b |H | Short_Literal 0x1b 09ac e405 | | Load 0x2,0x5 09ad 01d7 | | Execute Vector,Field_Read 09ae 6804 |h | Jump_Zero 0x9b3 09af e403 | | Load 0x2,0x3 09b0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 09b1 e402 | | Load 0x2,0x2 09b2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 09b3 481a |H | Short_Literal 0x1a 09b4 e405 | | Load 0x2,0x5 09b5 01d7 | | Execute Vector,Field_Read 09b6 6804 |h | Jump_Zero 0x9bb 09b7 e403 | | Load 0x2,0x3 09b8 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 09b9 e402 | | Load 0x2,0x2 09ba 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 09bb 4819 |H | Short_Literal 0x19 09bc e405 | | Load 0x2,0x5 09bd 01d7 | | Execute Vector,Field_Read 09be 6804 |h | Jump_Zero 0x9c3 09bf e403 | | Load 0x2,0x3 09c0 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 09c1 e402 | | Load 0x2,0x2 09c2 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 09c3 4818 |H | Short_Literal 0x18 09c4 e405 | | Load 0x2,0x5 09c5 01d7 | | Execute Vector,Field_Read 09c6 6804 |h | Jump_Zero 0x9cb 09c7 e403 | | Load 0x2,0x3 09c8 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 09c9 e402 | | Load 0x2,0x2 09ca 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 09cb 4817 |H | Short_Literal 0x17 09cc e405 | | Load 0x2,0x5 09cd 01d7 | | Execute Vector,Field_Read 09ce 6804 |h | Jump_Zero 0x9d3 09cf e403 | | Load 0x2,0x3 09d0 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 09d1 e402 | | Load 0x2,0x2 09d2 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 09d3 4816 |H | Short_Literal 0x16 09d4 e405 | | Load 0x2,0x5 09d5 01d7 | | Execute Vector,Field_Read 09d6 6804 |h | Jump_Zero 0x9db 09d7 e403 | | Load 0x2,0x3 09d8 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 09d9 e402 | | Load 0x2,0x2 09da 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 09db 4809 |H | Short_Literal 0x9 09dc e405 | | Load 0x2,0x5 09dd 01d7 | | Execute Vector,Field_Read 09de 6804 |h | Jump_Zero 0x9e3 09df e403 | | Load 0x2,0x3 09e0 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 09e1 e402 | | Load 0x2,0x2 09e2 380a |8 | Execute Record,Field_Write,Field_Number 0xa 09e3 4815 |H | Short_Literal 0x15 09e4 e405 | | Load 0x2,0x5 09e5 01d7 | | Execute Vector,Field_Read 09e6 6804 |h | Jump_Zero 0x9eb 09e7 e403 | | Load 0x2,0x3 09e8 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 09e9 e402 | | Load 0x2,0x2 09ea 380b |8 | Execute Record,Field_Write,Field_Number 0xb 09eb 4814 |H | Short_Literal 0x14 09ec e405 | | Load 0x2,0x5 09ed 01d7 | | Execute Vector,Field_Read 09ee 6804 |h | Jump_Zero 0x9f3 09ef e403 | | Load 0x2,0x3 09f0 340c |4 | Execute Record,Field_Reference,Field_Number 0xc 09f1 e402 | | Load 0x2,0x2 09f2 380c |8 | Execute Record,Field_Write,Field_Number 0xc 09f3 4813 |H | Short_Literal 0x13 09f4 e405 | | Load 0x2,0x5 09f5 01d7 | | Execute Vector,Field_Read 09f6 6804 |h | Jump_Zero 0x9fb 09f7 e403 | | Load 0x2,0x3 09f8 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 09f9 e402 | | Load 0x2,0x2 09fa 380d |8 | Execute Record,Field_Write,Field_Number 0xd 09fb 4812 |H | Short_Literal 0x12 09fc e405 | | Load 0x2,0x5 09fd 01d7 | | Execute Vector,Field_Read 09fe 6804 |h | Jump_Zero 0xa03 09ff e403 | | Load 0x2,0x3 0a00 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0a01 e402 | | Load 0x2,0x2 0a02 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0a03 4811 |H | Short_Literal 0x11 0a04 e405 | | Load 0x2,0x5 0a05 01d7 | | Execute Vector,Field_Read 0a06 6804 |h | Jump_Zero 0xa0b 0a07 e403 | | Load 0x2,0x3 0a08 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 0a09 e402 | | Load 0x2,0x2 0a0a 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0a0b 4810 |H | Short_Literal 0x10 0a0c e405 | | Load 0x2,0x5 0a0d 01d7 | | Execute Vector,Field_Read 0a0e 6804 |h | Jump_Zero 0xa13 0a0f e403 | | Load 0x2,0x3 0a10 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0a11 e402 | | Load 0x2,0x2 0a12 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 0a13 480f |H | Short_Literal 0xf 0a14 e405 | | Load 0x2,0x5 0a15 01d7 | | Execute Vector,Field_Read 0a16 6804 |h | Jump_Zero 0xa1b 0a17 e403 | | Load 0x2,0x3 0a18 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 0a19 e402 | | Load 0x2,0x2 0a1a 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0a1b 480e |H | Short_Literal 0xe 0a1c e405 | | Load 0x2,0x5 0a1d 01d7 | | Execute Vector,Field_Read 0a1e 6804 |h | Jump_Zero 0xa23 0a1f e403 | | Load 0x2,0x3 0a20 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0a21 e402 | | Load 0x2,0x2 0a22 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0a23 480d |H | Short_Literal 0xd 0a24 e405 | | Load 0x2,0x5 0a25 01d7 | | Execute Vector,Field_Read 0a26 6804 |h | Jump_Zero 0xa2b 0a27 e403 | | Load 0x2,0x3 0a28 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 0a29 e402 | | Load 0x2,0x2 0a2a 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 0a2b 480c |H | Short_Literal 0xc 0a2c e405 | | Load 0x2,0x5 0a2d 01d7 | | Execute Vector,Field_Read 0a2e 680a |h | Jump_Zero 0xa39 0a2f e5fe | | Load 0x2,-0x2 0a30 0227 | ' | Execute Access,All_Reference 0a31 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a32 e5fc | | Load 0x2,-0x4 0a33 0227 | ' | Execute Access,All_Reference 0a34 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a35 e403 | | Load 0x2,0x3 0a36 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 0a37 e402 | | Load 0x2,0x2 0a38 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 0a39 480b |H | Short_Literal 0xb 0a3a e405 | | Load 0x2,0x5 0a3b 01d7 | | Execute Vector,Field_Read 0a3c 6804 |h | Jump_Zero 0xa41 0a3d e403 | | Load 0x2,0x3 0a3e 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0a3f e402 | | Load 0x2,0x2 0a40 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 0a41 480a |H | Short_Literal 0xa 0a42 e405 | | Load 0x2,0x5 0a43 01d7 | | Execute Vector,Field_Read 0a44 680a |h | Jump_Zero 0xa4f 0a45 e5fe | | Load 0x2,-0x2 0a46 0227 | ' | Execute Access,All_Reference 0a47 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a48 e5fc | | Load 0x2,-0x4 0a49 0227 | ' | Execute Access,All_Reference 0a4a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0a4b e403 | | Load 0x2,0x3 0a4c 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0a4d e402 | | Load 0x2,0x2 0a4e 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 0a4f e5ff | | Load 0x2,-0x1 0a50 0227 | ' | Execute Access,All_Reference 0a51 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25 0a52 a404 | | Store_Unchecked 0x2,0x4 0a53 00cf | | Action Mark_Auxiliary 0a54 7815 |x | Jump 0xa6a 0a55 e404 | | Load 0x2,0x4 0a56 0227 | ' | Execute Access,All_Reference 0a57 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0a58 e01b | | Load 0x0,0x1b 0a59 022e | . | Execute Access,Not_Equal 0a5a 680a |h | Jump_Zero 0xa65 0a5b e404 | | Load 0x2,0x4 0a5c 0227 | ' | Execute Access,All_Reference 0a5d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a5e e5fc | | Load 0x2,-0x4 0a5f e5ff | | Load 0x2,-0x1 0a60 e404 | | Load 0x2,0x4 0a61 0227 | ' | Execute Access,All_Reference 0a62 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0a63 801c | | Call 0x0,0x1c 0a64 801d | | Call 0x0,0x1d 0a65 e404 | | Load 0x2,0x4 0a66 0227 | ' | Execute Access,All_Reference 0a67 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a68 a404 | | Store_Unchecked 0x2,0x4 0a69 00c9 | | Action Pop_Auxiliary_Loop 0a6a e404 | | Load 0x2,0x4 0a6b 77e9 |w | Jump_Nonzero 0xa55 0a6c 00ce | | Action Pop_Auxiliary 0a6d e5ff | | Load 0x2,-0x1 0a6e 8011 | | Call 0x0,0x11 0a6f e5ff | | Load 0x2,-0x1 0a70 8012 | | Call 0x0,0x12 0a71 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a72 TRAP_0950: 0a72 0007 | | Action Break_Optional 0a73 e5ff | | Load 0x2,-0x1 0a74 8011 | | Call 0x0,0x11 0a75 00d8 | | Load_Top At_Offset_0 0a76 0101 | | Execute Exception,Reraise 0a77 0000 | | .XXX[0x1] 0a78 ; -------------------------------------------------------------------------------------- 0a78 ; SUBPROGRAM 0a78 ; -------------------------------------------------------------------------------------- 0a78 0a7b | { | .CONST 0x0a7b ; Address of begin 0a79 0b2f | / | .CONST 0x0b2f ; Address of exception handler 0a7a 0001 | | .CONST 0x0001 ; Number of locals 0a7b BODY_0a78: 0a7b INIT_0a78: 0a7b e007 | | Load 0x0,0x7 0a7c 03bc | | Declare_Variable Access,By_Allocation 0a7d 00d8 | | Load_Top At_Offset_0 0a7e 0227 | ' | Execute Access,All_Reference 0a7f 1c00 | | Execute_Immediate Run_Utility,0x0 0a80 a402 | | Store_Unchecked 0x2,0x2 0a81 4800 |H | Short_Literal 0x0 0a82 e402 | | Load 0x2,0x2 0a83 0227 | ' | Execute Access,All_Reference 0a84 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a85 4800 |H | Short_Literal 0x0 0a86 e402 | | Load 0x2,0x2 0a87 0227 | ' | Execute Access,All_Reference 0a88 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0a89 e03b | ; | Load 0x0,0x3b 0a8a e402 | | Load 0x2,0x2 0a8b 0227 | ' | Execute Access,All_Reference 0a8c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0a8d e22a | * | Load 0x1,0x2a 0a8e e402 | | Load 0x2,0x2 0a8f 0227 | ' | Execute Access,All_Reference 0a90 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0a91 e402 | | Load 0x2,0x2 0a92 0229 | ) | Execute Access,All_Read 0a93 00d8 | | Load_Top At_Offset_0 0a94 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0a95 00d8 | | Load_Top At_Offset_0 0a96 0335 | 5 | Declare_Variable Array,Duplicate 0a97 00cd | | Action Spare6_Action 0a98 481f |H | Short_Literal 0x1f 0a99 4800 |H | Short_Literal 0x0 0a9a 4800 |H | Short_Literal 0x0 0a9b 00d9 | | Load_Top At_Offset_1 0a9c e604 | | Load 0x3,0x4 0a9d 01d6 | | Execute Vector,Field_Write 0a9e 3ffb |? | Loop_Increasing 0xa9a 0a9f 00cd | | Action Spare6_Action 0aa0 00d9 | | Load_Top At_Offset_1 0aa1 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0aa2 00d1 | | Pop_Control Pop_Count_1 0aa3 e405 | | Load 0x2,0x5 0aa4 e00b | | Load 0x0,0xb 0aa5 01df | | Execute Vector,Equal 0aa6 7004 |p | Jump_Nonzero 0xaab 0aa7 e5fc | | Load 0x2,-0x4 0aa8 e405 | | Load 0x2,0x5 0aa9 e402 | | Load 0x2,0x2 0aaa 8231 | 1 | Call 0x1,0x31 0aab e03c | < | Load 0x0,0x3c 0aac 0322 | " | Declare_Variable Record 0aad e5ff | | Load 0x2,-0x1 0aae 803d | = | Call 0x0,0x3d 0aaf 00d9 | | Load_Top At_Offset_1 0ab0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0ab1 e402 | | Load 0x2,0x2 0ab2 0227 | ' | Execute Access,All_Reference 0ab3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0ab4 4800 |H | Short_Literal 0x0 0ab5 a404 | | Store_Unchecked 0x2,0x4 0ab6 00cf | | Action Mark_Auxiliary 0ab7 e402 | | Load 0x2,0x2 0ab8 0227 | ' | Execute Access,All_Reference 0ab9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0aba 01d9 | | Execute Vector,Reverse_Bounds 0abb 0007 | | Action Break_Optional 0abc 00d8 | | Load_Top At_Offset_0 0abd e402 | | Load 0x2,0x2 0abe 0227 | ' | Execute Access,All_Reference 0abf 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ac0 01d7 | | Execute Vector,Field_Read 0ac1 6803 |h | Jump_Zero 0xac5 0ac2 e404 | | Load 0x2,0x4 0ac3 0a01 | | Execute_Immediate Plus,0x1 0ac4 c404 | | Store 0x2,0x4 0ac5 00c8 | | Action Pop_Auxiliary_Range 0ac6 3ff5 |? | Loop_Increasing 0xabc 0ac7 00ce | | Action Pop_Auxiliary 0ac8 e404 | | Load 0x2,0x4 0ac9 0902 | | Execute_Immediate Binary_Scale,0x2 0aca 00d8 | | Load_Top At_Offset_0 0acb e00e | | Load 0x0,0xe 0acc 0260 | ` | Execute Discrete,In_Type 0acd 7001 |p | Jump_Nonzero 0xacf 0ace 0801 | | Execute_Immediate Raise,0x1 0acf e03e | > | Load 0x0,0x3e 0ad0 0322 | " | Declare_Variable Record 0ad1 4837 |H7 | Short_Literal 0x37 0ad2 00d9 | | Load_Top At_Offset_1 0ad3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0ad4 e03e | > | Load 0x0,0x3e 0ad5 012c | , | Execute Any,Size 0ad6 09fb | | Execute_Immediate Binary_Scale,-0x5 0ad7 e404 | | Load 0x2,0x4 0ad8 00d8 | | Load_Top At_Offset_0 0ad9 e013 | | Load 0x0,0x13 0ada 0260 | ` | Execute Discrete,In_Type 0adb 7001 |p | Jump_Nonzero 0xadd 0adc 0801 | | Execute_Immediate Raise,0x1 0add 0273 | s | Execute Discrete,Plus 0ade 00d9 | | Load_Top At_Offset_1 0adf 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0ae0 4800 |H | Short_Literal 0x0 0ae1 00d9 | | Load_Top At_Offset_1 0ae2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0ae3 e5fe | | Load 0x2,-0x2 0ae4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0ae5 00d9 | | Load_Top At_Offset_1 0ae6 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0ae7 e402 | | Load 0x2,0x2 0ae8 0227 | ' | Execute Access,All_Reference 0ae9 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0aea 00d9 | | Load_Top At_Offset_1 0aeb 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0aec e402 | | Load 0x2,0x2 0aed 0227 | ' | Execute Access,All_Reference 0aee 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0aef e03e | > | Load 0x0,0x3e 0af0 3005 |0 | Execute Record,Field_Type,Field_Number 0x5 0af1 0119 | | Execute Any,Check_In_Formal_Type 0af2 00d9 | | Load_Top At_Offset_1 0af3 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0af4 e5ff | | Load 0x2,-0x1 0af5 e03f | ? | Load 0x0,0x3f 0af6 a040 | @ | Store_Unchecked 0x0,0x40 0af7 e041 | A | Load 0x0,0x41 0af8 e042 | B | Load 0x0,0x42 0af9 a043 | C | Store_Unchecked 0x0,0x43 0afa 801a | | Call 0x0,0x1a 0afb e404 | | Load 0x2,0x4 0afc 0c01 | | Execute_Immediate Greater_Equal,0x1 0afd 680c |h | Jump_Zero 0xb0a 0afe e402 | | Load 0x2,0x2 0aff 0227 | ' | Execute Access,All_Reference 0b00 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0b01 e402 | | Load 0x2,0x2 0b02 0227 | ' | Execute Access,All_Reference 0b03 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0b04 e5ff | | Load 0x2,-0x1 0b05 8232 | 2 | Call 0x1,0x32 0b06 e00b | | Load 0x0,0xb 0b07 e402 | | Load 0x2,0x2 0b08 0227 | ' | Execute Access,All_Reference 0b09 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0b0a e5ff | | Load 0x2,-0x1 0b0b 0227 | ' | Execute Access,All_Reference 0b0c 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25 0b0d a403 | | Store_Unchecked 0x2,0x3 0b0e 00cf | | Action Mark_Auxiliary 0b0f 7815 |x | Jump 0xb25 0b10 e403 | | Load 0x2,0x3 0b11 0227 | ' | Execute Access,All_Reference 0b12 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0b13 e01b | | Load 0x0,0x1b 0b14 022e | . | Execute Access,Not_Equal 0b15 680a |h | Jump_Zero 0xb20 0b16 e403 | | Load 0x2,0x3 0b17 0227 | ' | Execute Access,All_Reference 0b18 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b19 e402 | | Load 0x2,0x2 0b1a e5ff | | Load 0x2,-0x1 0b1b e403 | | Load 0x2,0x3 0b1c 0227 | ' | Execute Access,All_Reference 0b1d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0b1e 801c | | Call 0x0,0x1c 0b1f 801d | | Call 0x0,0x1d 0b20 e403 | | Load 0x2,0x3 0b21 0227 | ' | Execute Access,All_Reference 0b22 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b23 a403 | | Store_Unchecked 0x2,0x3 0b24 00c9 | | Action Pop_Auxiliary_Loop 0b25 e403 | | Load 0x2,0x3 0b26 77e9 |w | Jump_Nonzero 0xb10 0b27 00ce | | Action Pop_Auxiliary 0b28 e5ff | | Load 0x2,-0x1 0b29 8011 | | Call 0x0,0x11 0b2a e5ff | | Load 0x2,-0x1 0b2b 8012 | | Call 0x0,0x12 0b2c e402 | | Load 0x2,0x2 0b2d 00cb | | Action Pop_Block_With_Result 0b2e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0b2f TRAP_0a78: 0b2f 0007 | | Action Break_Optional 0b30 e5ff | | Load 0x2,-0x1 0b31 8011 | | Call 0x0,0x11 0b32 00d8 | | Load_Top At_Offset_0 0b33 0101 | | Execute Exception,Reraise 0b34 0000 0000 | | .BLANK 0000[0x4] 0b38 ; -------------------------------------------------------------------------------------- 0b38 ; SUBPROGRAM 0b38 ; -------------------------------------------------------------------------------------- 0b38 0b3b | ; | .CONST 0x0b3b ; Address of begin 0b39 0b8a | | .CONST 0x0b8a ; Address of exception handler 0b3a 0001 | | .CONST 0x0001 ; Number of locals 0b3b BODY_0b38: 0b3b INIT_0b38: 0b3b e044 | D | Load 0x0,0x44 0b3c 0322 | " | Declare_Variable Record 0b3d 483c |H< | Short_Literal 0x3c 0b3e 00d9 | | Load_Top At_Offset_1 0b3f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b40 e044 | D | Load 0x0,0x44 0b41 012c | , | Execute Any,Size 0b42 09fb | | Execute_Immediate Binary_Scale,-0x5 0b43 00d9 | | Load_Top At_Offset_1 0b44 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b45 4800 |H | Short_Literal 0x0 0b46 00d9 | | Load_Top At_Offset_1 0b47 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0b48 e5fe | | Load 0x2,-0x2 0b49 0227 | ' | Execute Access,All_Reference 0b4a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0b4b 00d9 | | Load_Top At_Offset_1 0b4c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0b4d e5ff | | Load 0x2,-0x1 0b4e e045 | E | Load 0x0,0x45 0b4f a046 | F | Store_Unchecked 0x0,0x46 0b50 e047 | G | Load 0x0,0x47 0b51 e048 | H | Load 0x0,0x48 0b52 a049 | I | Store_Unchecked 0x0,0x49 0b53 803a | : | Call 0x0,0x3a 0b54 e5fe | | Load 0x2,-0x2 0b55 0229 | ) | Execute Access,All_Read 0b56 00d8 | | Load_Top At_Offset_0 0b57 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b58 e04a | J | Load 0x0,0x4a 0b59 e04b | K | Load 0x0,0x4b 0b5a a04c | L | Store_Unchecked 0x0,0x4c 0b5b 8005 | | Call 0x0,0x5 0b5c 00d9 | | Load_Top At_Offset_1 0b5d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b5e 00d1 | | Pop_Control Pop_Count_1 0b5f e5fe | | Load 0x2,-0x2 0b60 e22c | , | Load 0x1,0x2c 0b61 e22d | - | Load 0x1,0x2d 0b62 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0b63 8005 | | Call 0x0,0x5 0b64 c5fe | | Store 0x2,-0x2 0b65 e007 | | Load 0x0,0x7 0b66 a5fe | | Store_Unchecked 0x2,-0x2 0b67 e5ff | | Load 0x2,-0x1 0b68 0227 | ' | Execute Access,All_Reference 0b69 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25 0b6a a402 | | Store_Unchecked 0x2,0x2 0b6b 00cf | | Action Mark_Auxiliary 0b6c 7815 |x | Jump 0xb82 0b6d e402 | | Load 0x2,0x2 0b6e 0227 | ' | Execute Access,All_Reference 0b6f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0b70 e01b | | Load 0x0,0x1b 0b71 022e | . | Execute Access,Not_Equal 0b72 680a |h | Jump_Zero 0xb7d 0b73 e402 | | Load 0x2,0x2 0b74 0227 | ' | Execute Access,All_Reference 0b75 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b76 e5fe | | Load 0x2,-0x2 0b77 e5ff | | Load 0x2,-0x1 0b78 e402 | | Load 0x2,0x2 0b79 0227 | ' | Execute Access,All_Reference 0b7a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0b7b 801c | | Call 0x0,0x1c 0b7c 801d | | Call 0x0,0x1d 0b7d e402 | | Load 0x2,0x2 0b7e 0227 | ' | Execute Access,All_Reference 0b7f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b80 a402 | | Store_Unchecked 0x2,0x2 0b81 00c9 | | Action Pop_Auxiliary_Loop 0b82 e402 | | Load 0x2,0x2 0b83 77e9 |w | Jump_Nonzero 0xb6d 0b84 00ce | | Action Pop_Auxiliary 0b85 e5ff | | Load 0x2,-0x1 0b86 8011 | | Call 0x0,0x11 0b87 e5ff | | Load 0x2,-0x1 0b88 8012 | | Call 0x0,0x12 0b89 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b8a TRAP_0b38: 0b8a 0007 | | Action Break_Optional 0b8b e5ff | | Load 0x2,-0x1 0b8c 8011 | | Call 0x0,0x11 0b8d 00d8 | | Load_Top At_Offset_0 0b8e 0101 | | Execute Exception,Reraise 0b8f 0000 | | .XXX[0x1] 0b90 ; -------------------------------------------------------------------------------------- 0b90 ; SUBPROGRAM 0b90 ; -------------------------------------------------------------------------------------- 0b90 0b93 | | .CONST 0x0b93 ; Address of begin 0b91 0bd3 | | .CONST 0x0bd3 ; Address of exception handler 0b92 0001 | | .CONST 0x0001 ; Number of locals 0b93 BODY_0b90: 0b93 INIT_0b90: 0b93 e04d | M | Load 0x0,0x4d 0b94 0322 | " | Declare_Variable Record 0b95 4861 |Ha | Short_Literal 0x61 0b96 00d9 | | Load_Top At_Offset_1 0b97 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b98 e04d | M | Load 0x0,0x4d 0b99 012c | , | Execute Any,Size 0b9a 09fb | | Execute_Immediate Binary_Scale,-0x5 0b9b 00d9 | | Load_Top At_Offset_1 0b9c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b9d e5fe | | Load 0x2,-0x2 0b9e 00d9 | | Load_Top At_Offset_1 0b9f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0ba0 e5fd | | Load 0x2,-0x3 0ba1 00d9 | | Load_Top At_Offset_1 0ba2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0ba3 e5fc | | Load 0x2,-0x4 0ba4 00d9 | | Load_Top At_Offset_1 0ba5 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0ba6 e5fb | | Load 0x2,-0x5 0ba7 00d9 | | Load_Top At_Offset_1 0ba8 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0ba9 e5ff | | Load 0x2,-0x1 0baa e04e | N | Load 0x0,0x4e 0bab a04f | O | Store_Unchecked 0x0,0x4f 0bac e050 | P | Load 0x0,0x50 0bad e051 | Q | Load 0x0,0x51 0bae a052 | R | Store_Unchecked 0x0,0x52 0baf 803a | : | Call 0x0,0x3a 0bb0 e010 | | Load 0x0,0x10 0bb1 e402 | | Load 0x2,0x2 0bb2 4801 |H | Short_Literal 0x1 0bb3 4800 |H | Short_Literal 0x0 0bb4 4861 |Ha | Short_Literal 0x61 0bb5 e5ff | | Load 0x2,-0x1 0bb6 e053 | S | Load 0x0,0x53 0bb7 a054 | T | Store_Unchecked 0x0,0x54 0bb8 a055 | U | Store_Unchecked 0x0,0x55 0bb9 8056 | V | Call 0x0,0x56 0bba 00d1 | | Pop_Control Pop_Count_1 0bbb c403 | | Store 0x2,0x3 0bbc e403 | | Load 0x2,0x3 0bbd 700c |p | Jump_Nonzero 0xbca 0bbe 4800 |H | Short_Literal 0x0 0bbf a5fa | | Store_Unchecked 0x2,-0x6 0bc0 4800 |H | Short_Literal 0x0 0bc1 a5f9 | | Store_Unchecked 0x2,-0x7 0bc2 4800 |H | Short_Literal 0x0 0bc3 a5f8 | | Store_Unchecked 0x2,-0x8 0bc4 e5ff | | Load 0x2,-0x1 0bc5 8011 | | Call 0x0,0x11 0bc6 e5ff | | Load 0x2,-0x1 0bc7 8012 | | Call 0x0,0x12 0bc8 00cc | | Action Pop_Block 0bc9 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0bca e402 | | Load 0x2,0x2 0bcb 2620 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x20 0bcc 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0bcd a5fa | | Store_Unchecked 0x2,-0x6 0bce e402 | | Load 0x2,0x2 0bcf 2620 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x20 0bd0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0bd1 a5f9 | | Store_Unchecked 0x2,-0x7 0bd2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0bd3 TRAP_0b90: 0bd3 0007 | | Action Break_Optional 0bd4 e5ff | | Load 0x2,-0x1 0bd5 8011 | | Call 0x0,0x11 0bd6 00d8 | | Load_Top At_Offset_0 0bd7 0101 | | Execute Exception,Reraise 0bd8 ; -------------------------------------------------------------------------------------- 0bd8 ; SUBPROGRAM 0bd8 ; -------------------------------------------------------------------------------------- 0bd8 0bdb | | .CONST 0x0bdb ; Address of begin 0bd9 0c44 | D | .CONST 0x0c44 ; Address of exception handler 0bda 0001 | | .CONST 0x0001 ; Number of locals 0bdb BODY_0bd8: 0bdb INIT_0bd8: 0bdb e057 | W | Load 0x0,0x57 0bdc 0322 | " | Declare_Variable Record 0bdd 483b |H; | Short_Literal 0x3b 0bde 00d9 | | Load_Top At_Offset_1 0bdf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0be0 e057 | W | Load 0x0,0x57 0be1 012c | , | Execute Any,Size 0be2 09fb | | Execute_Immediate Binary_Scale,-0x5 0be3 e5fb | | Load 0x2,-0x5 0be4 01db | | Execute Vector,Length 0be5 e058 | X | Load 0x0,0x58 0be6 012c | , | Execute Any,Size 0be7 0271 | q | Execute Discrete,Times 0be8 09fb | | Execute_Immediate Binary_Scale,-0x5 0be9 0273 | s | Execute Discrete,Plus 0bea 00d9 | | Load_Top At_Offset_1 0beb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0bec e5fe | | Load 0x2,-0x2 0bed 0227 | ' | Execute Access,All_Reference 0bee 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0bef 00d9 | | Load_Top At_Offset_1 0bf0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0bf1 e5fd | | Load 0x2,-0x3 0bf2 00d9 | | Load_Top At_Offset_1 0bf3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0bf4 e5fc | | Load 0x2,-0x4 0bf5 00d9 | | Load_Top At_Offset_1 0bf6 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0bf7 e5fa | | Load 0x2,-0x6 0bf8 00d9 | | Load_Top At_Offset_1 0bf9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0bfa e5ff | | Load 0x2,-0x1 0bfb e059 | Y | Load 0x0,0x59 0bfc a05a | Z | Store_Unchecked 0x0,0x5a 0bfd e05b | [ | Load 0x0,0x5b 0bfe e05c | \ | Load 0x0,0x5c 0bff a05d | ] | Store_Unchecked 0x0,0x5d 0c00 803a | : | Call 0x0,0x3a 0c01 e5fd | | Load 0x2,-0x3 0c02 e5fe | | Load 0x2,-0x2 0c03 0227 | ' | Execute Access,All_Reference 0c04 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0c05 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0c06 e5fc | | Load 0x2,-0x4 0c07 e5fe | | Load 0x2,-0x2 0c08 0227 | ' | Execute Access,All_Reference 0c09 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0c0a 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 0c0b 4801 |H | Short_Literal 0x1 0c0c e5fe | | Load 0x2,-0x2 0c0d 0227 | ' | Execute Access,All_Reference 0c0e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0c0f e5fb | | Load 0x2,-0x5 0c10 e5ff | | Load 0x2,-0x1 0c11 e05e | ^ | Load 0x0,0x5e 0c12 e05f | _ | Load 0x0,0x5f 0c13 e060 | ` | Load 0x0,0x60 0c14 a061 | a | Store_Unchecked 0x0,0x61 0c15 e062 | b | Load 0x0,0x62 0c16 e063 | c | Load 0x0,0x63 0c17 a064 | d | Store_Unchecked 0x0,0x64 0c18 8065 | e | Call 0x0,0x65 0c19 e5fe | | Load 0x2,-0x2 0c1a 0227 | ' | Execute Access,All_Reference 0c1b 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0c1c e004 | | Load 0x0,0x4 0c1d 0337 | 7 | Declare_Variable Array 0c1e 4801 |H | Short_Literal 0x1 0c1f 480c |H | Short_Literal 0xc 0c20 00da | | Load_Top At_Offset_2 0c21 01d6 | | Execute Vector,Field_Write 0c22 4801 |H | Short_Literal 0x1 0c23 480e |H | Short_Literal 0xe 0c24 00da | | Load_Top At_Offset_2 0c25 01d6 | | Execute Vector,Field_Write 0c26 4801 |H | Short_Literal 0x1 0c27 480d |H | Short_Literal 0xd 0c28 00da | | Load_Top At_Offset_2 0c29 01d6 | | Execute Vector,Field_Write 0c2a 480b |H | Short_Literal 0xb 0c2b 4800 |H | Short_Literal 0x0 0c2c 4800 |H | Short_Literal 0x0 0c2d 00d9 | | Load_Top At_Offset_1 0c2e e603 | | Load 0x3,0x3 0c2f 01d6 | | Execute Vector,Field_Write 0c30 3ffb |? | Loop_Increasing 0xc2c 0c31 481f |H | Short_Literal 0x1f 0c32 480f |H | Short_Literal 0xf 0c33 4800 |H | Short_Literal 0x0 0c34 00d9 | | Load_Top At_Offset_1 0c35 e603 | | Load 0x3,0x3 0c36 01d6 | | Execute Vector,Field_Write 0c37 3ffb |? | Loop_Increasing 0xc33 0c38 e004 | | Load 0x0,0x4 0c39 01c3 | | Execute Vector,Check_In_Type 0c3a 01d0 | | Execute Vector,Complement 0c3b 01d3 | | Execute Vector,And 0c3c e5fe | | Load 0x2,-0x2 0c3d 0227 | ' | Execute Access,All_Reference 0c3e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0c3f e5ff | | Load 0x2,-0x1 0c40 8011 | | Call 0x0,0x11 0c41 e5ff | | Load 0x2,-0x1 0c42 8012 | | Call 0x0,0x12 0c43 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c44 TRAP_0bd8: 0c44 0007 | | Action Break_Optional 0c45 e5ff | | Load 0x2,-0x1 0c46 8011 | | Call 0x0,0x11 0c47 00d8 | | Load_Top At_Offset_0 0c48 0101 | | Execute Exception,Reraise 0c49 0000 0000 | | .BLANK 0000[0x7] 0c50 ; -------------------------------------------------------------------------------------- 0c50 ; SUBPROGRAM 0c50 ; -------------------------------------------------------------------------------------- 0c50 0c53 | S | .CONST 0x0c53 ; Address of begin 0c51 0cb9 | | .CONST 0x0cb9 ; Address of exception handler 0c52 0001 | | .CONST 0x0001 ; Number of locals 0c53 BODY_0c50: 0c53 INIT_0c50: 0c53 e5fc | | Load 0x2,-0x4 0c54 01db | | Execute Vector,Length 0c55 00d8 | | Load_Top At_Offset_0 0c56 e00e | | Load 0x0,0xe 0c57 0260 | ` | Execute Discrete,In_Type 0c58 7001 |p | Jump_Nonzero 0xc5a 0c59 0801 | | Execute_Immediate Raise,0x1 0c5a e066 | f | Load 0x0,0x66 0c5b 0322 | " | Declare_Variable Record 0c5c 483a |H: | Short_Literal 0x3a 0c5d 00d9 | | Load_Top At_Offset_1 0c5e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0c5f e066 | f | Load 0x0,0x66 0c60 012c | , | Execute Any,Size 0c61 09fb | | Execute_Immediate Binary_Scale,-0x5 0c62 e5fc | | Load 0x2,-0x4 0c63 01db | | Execute Vector,Length 0c64 0a03 | | Execute_Immediate Plus,0x3 0c65 09fe | | Execute_Immediate Binary_Scale,-0x2 0c66 0273 | s | Execute Discrete,Plus 0c67 00d9 | | Load_Top At_Offset_1 0c68 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0c69 4800 |H | Short_Literal 0x0 0c6a 00d9 | | Load_Top At_Offset_1 0c6b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0c6c e5fe | | Load 0x2,-0x2 0c6d 0227 | ' | Execute Access,All_Reference 0c6e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0c6f 00d9 | | Load_Top At_Offset_1 0c70 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0c71 e5fd | | Load 0x2,-0x3 0c72 00d9 | | Load_Top At_Offset_1 0c73 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0c74 e5fc | | Load 0x2,-0x4 0c75 01db | | Execute Vector,Length 0c76 00d9 | | Load_Top At_Offset_1 0c77 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0c78 e5ff | | Load 0x2,-0x1 0c79 e067 | g | Load 0x0,0x67 0c7a a068 | h | Store_Unchecked 0x0,0x68 0c7b e069 | i | Load 0x0,0x69 0c7c e06a | j | Load 0x0,0x6a 0c7d a06b | k | Store_Unchecked 0x0,0x6b 0c7e 801a | | Call 0x0,0x1a 0c7f e5fd | | Load 0x2,-0x3 0c80 e5fe | | Load 0x2,-0x2 0c81 0227 | ' | Execute Access,All_Reference 0c82 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0c83 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 0c84 4801 |H | Short_Literal 0x1 0c85 e5fe | | Load 0x2,-0x2 0c86 0227 | ' | Execute Access,All_Reference 0c87 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0c88 e5fe | | Load 0x2,-0x2 0c89 0227 | ' | Execute Access,All_Reference 0c8a 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0c8b e004 | | Load 0x0,0x4 0c8c 0337 | 7 | Declare_Variable Array 0c8d 4801 |H | Short_Literal 0x1 0c8e 480a |H | Short_Literal 0xa 0c8f 00da | | Load_Top At_Offset_2 0c90 01d6 | | Execute Vector,Field_Write 0c91 4801 |H | Short_Literal 0x1 0c92 480b |H | Short_Literal 0xb 0c93 00da | | Load_Top At_Offset_2 0c94 01d6 | | Execute Vector,Field_Write 0c95 4809 |H | Short_Literal 0x9 0c96 4800 |H | Short_Literal 0x0 0c97 4800 |H | Short_Literal 0x0 0c98 00d9 | | Load_Top At_Offset_1 0c99 e603 | | Load 0x3,0x3 0c9a 01d6 | | Execute Vector,Field_Write 0c9b 3ffb |? | Loop_Increasing 0xc97 0c9c 481f |H | Short_Literal 0x1f 0c9d 480c |H | Short_Literal 0xc 0c9e 4800 |H | Short_Literal 0x0 0c9f 00d9 | | Load_Top At_Offset_1 0ca0 e603 | | Load 0x3,0x3 0ca1 01d6 | | Execute Vector,Field_Write 0ca2 3ffb |? | Loop_Increasing 0xc9e 0ca3 e004 | | Load 0x0,0x4 0ca4 01c3 | | Execute Vector,Check_In_Type 0ca5 01d0 | | Execute Vector,Complement 0ca6 01d3 | | Execute Vector,And 0ca7 e5fe | | Load 0x2,-0x2 0ca8 0227 | ' | Execute Access,All_Reference 0ca9 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0caa e5fc | | Load 0x2,-0x4 0cab e5ff | | Load 0x2,-0x1 0cac e06c | l | Load 0x0,0x6c 0cad e06d | m | Load 0x0,0x6d 0cae e06e | n | Load 0x0,0x6e 0caf a06f | o | Store_Unchecked 0x0,0x6f 0cb0 e070 | p | Load 0x0,0x70 0cb1 e071 | q | Load 0x0,0x71 0cb2 a072 | r | Store_Unchecked 0x0,0x72 0cb3 8073 | s | Call 0x0,0x73 0cb4 e5ff | | Load 0x2,-0x1 0cb5 8011 | | Call 0x0,0x11 0cb6 e5ff | | Load 0x2,-0x1 0cb7 8012 | | Call 0x0,0x12 0cb8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cb9 TRAP_0c50: 0cb9 0007 | | Action Break_Optional 0cba e5ff | | Load 0x2,-0x1 0cbb 8011 | | Call 0x0,0x11 0cbc 00d8 | | Load_Top At_Offset_0 0cbd 0101 | | Execute Exception,Reraise 0cbe 0000 0000 | | .XXX[0x2] 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 ; SUBPROGRAM 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 0cc3 | | .CONST 0x0cc3 ; Address of begin 0cc1 0cd6 | | .CONST 0x0cd6 ; Address of exception handler 0cc2 0001 | | .CONST 0x0001 ; Number of locals 0cc3 BODY_0cc0: 0cc3 INIT_0cc0: 0cc3 e5fd | | Load 0x2,-0x3 0cc4 e5fe | | Load 0x2,-0x2 0cc5 0227 | ' | Execute Access,All_Reference 0cc6 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0cc7 380c |8 | Execute Record,Field_Write,Field_Number 0xc 0cc8 4801 |H | Short_Literal 0x1 0cc9 4814 |H | Short_Literal 0x14 0cca e5fe | | Load 0x2,-0x2 0ccb 0227 | ' | Execute Access,All_Reference 0ccc 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ccd 01d6 | | Execute Vector,Field_Write 0cce e5fe | | Load 0x2,-0x2 0ccf e5ff | | Load 0x2,-0x1 0cd0 8229 | ) | Call 0x1,0x29 0cd1 e5ff | | Load 0x2,-0x1 0cd2 8011 | | Call 0x0,0x11 0cd3 e5ff | | Load 0x2,-0x1 0cd4 8012 | | Call 0x0,0x12 0cd5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cd6 TRAP_0cc0: 0cd6 0007 | | Action Break_Optional 0cd7 e5ff | | Load 0x2,-0x1 0cd8 8011 | | Call 0x0,0x11 0cd9 00d8 | | Load_Top At_Offset_0 0cda 0101 | | Execute Exception,Reraise 0cdb 0000 0000 | | .BLANK 0000[0x5] 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 ; Debug Table 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68f7,0x0000,0x0001,0x0029 0ce6 000b 0d8a | | .DBG4T 0x000b,0x0d8a,0x8000,0x0000 0cea 0046 0daa | F | .DBG4T 0x0046,0x0daa,0x8000,0x0000 0cee 014b 0dce | K | .DBG4T 0x014b,0x0dce,0x0001,0x0000 0cf2 015b 0dd4 | [ | .DBG4T 0x015b,0x0dd4,0x0001,0x0000 0cf6 0173 0ddc | s | .DBG4T 0x0173,0x0ddc,0x0002,0x0000 0cfa 018b 0de4 | | .DBG4T 0x018b,0x0de4,0x0001,0x0000 0cfe 019b 0deb | | .DBG4T 0x019b,0x0deb,0x0002,0x0000 0d02 01ab 0dee | | .DBG4T 0x01ab,0x0dee,0x0001,0x0000 0d06 028b 0e1d | | .DBG4T 0x028b,0x0e1d,0x0001,0x0000 0d0a 02a3 0e26 | &| .DBG4T 0x02a3,0x0e26,0x0001,0x0000 0d0e 02b3 0e29 | )| .DBG4T 0x02b3,0x0e29,0x0001,0x0000 0d12 02c3 0e2c | ,| .DBG4T 0x02c3,0x0e2c,0x0001,0x0000 0d16 02e3 0e34 | 4| .DBG4T 0x02e3,0x0e34,0x0001,0x0000 0d1a 0303 0e3c | <| .DBG4T 0x0303,0x0e3c,0x0001,0x0000 0d1e 0323 0e45 | # E| .DBG4T 0x0323,0x0e45,0x0001,0x0000 0d22 0353 0e51 | S Q| .DBG4T 0x0353,0x0e51,0x0001,0x0000 0d26 0363 0e55 | c U| .DBG4T 0x0363,0x0e55,0x0001,0x0000 0d2a 0373 0e59 | s Y| .DBG4T 0x0373,0x0e59,0x0001,0x0000 0d2e 0393 0e61 | a| .DBG4T 0x0393,0x0e61,0x0001,0x0000 0d32 03b3 0e69 | i| .DBG4T 0x03b3,0x0e69,0x0001,0x0000 0d36 03d3 0e72 | r| .DBG4T 0x03d3,0x0e72,0x0001,0x0000 0d3a 03f3 0e7a | z| .DBG4T 0x03f3,0x0e7a,0x0001,0x0000 0d3e 0413 0e82 | | .DBG4T 0x0413,0x0e82,0x0001,0x0000 0d42 0433 0e8a | 3 | .DBG4T 0x0433,0x0e8a,0x0001,0x0000 0d46 047b 0e9c | { | .DBG4T 0x047b,0x0e9c,0x0001,0x0000 0d4a 049b 0ea4 | | .DBG4T 0x049b,0x0ea4,0x0001,0x0000 0d4e 04e3 0eb6 | | .DBG4T 0x04e3,0x0eb6,0x0001,0x0000 0d52 04f3 0eba | | .DBG4T 0x04f3,0x0eba,0x0001,0x0000 0d56 0513 0ec2 | | .DBG4T 0x0513,0x0ec2,0x0001,0x0000 0d5a 052b 0eca | + | .DBG4T 0x052b,0x0eca,0x0001,0x0000 0d5e 055b 0ed6 | [ | .DBG4T 0x055b,0x0ed6,0x0001,0x4000 0d62 05d3 0ef6 | | .DBG4T 0x05d3,0x0ef6,0x0001,0x0000 0d66 07a3 0f54 | T| .DBG4T 0x07a3,0x0f54,0x0001,0x0000 0d6a 090b 0f84 | | .DBG4T 0x090b,0x0f84,0x0004,0x0000 0d6e 0953 0f8d | S | .DBG4T 0x0953,0x0f8d,0x0004,0x4000 0d72 0a7b 1009 | { | .DBG4T 0x0a7b,0x1009,0x0004,0x4000 0d76 0b3b 1041 | ; A| .DBG4T 0x0b3b,0x1041,0x0004,0x4000 0d7a 0b93 105d | ]| .DBG4T 0x0b93,0x105d,0x0004,0x0000 0d7e 0bdb 106c | l| .DBG4T 0x0bdb,0x106c,0x0004,0x0000 0d82 0c53 1078 | S x| .DBG4T 0x0c53,0x1078,0x0004,0x0000 0d86 0cc3 1083 | | .DBG4T 0x0cc3,0x1083,0x0004,0x0000 0d8a ; -------------------------------------------------------------------------------------- 0d8a ; Debug chain 0d8a ; -------------------------------------------------------------------------------------- 0d8a 001e 0000 | | .DBGLEN 0x001e,0x0000 0d8c 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045 0daa ; -------------------------------------------------------------------------------------- 0daa ; Debug chain 0daa ; -------------------------------------------------------------------------------------- 0daa 0022 0000 | " | .DBGLEN 0x0022,0x0000 0dac 0046 0098 | F | .DBGLNO 0x0046,0x0098,0x0100,0x0108,0x010a,0x010c,0x010e,0x0110,0x0112,0x0114,0x0116,0x0118,0x011a,0x011c,0x011e,0x0120,0x0122,0x0124,0x0126,0x0128,0x012a,0x012c,0x012e,0x0130,0x0132,0x0134,0x0136,0x0138,0x013a,0x013c,0x013e,0x0140,0x0142,0x0144 0dce ; -------------------------------------------------------------------------------------- 0dce ; Debug chain 0dce ; -------------------------------------------------------------------------------------- 0dce 0001 0003 | | .DBGLEN 0x0001,0x0003 0dd0 014b 0150 | K P| .DBGLNO 0x014b,0x0150,0x0154,0x0156 0dd4 ; -------------------------------------------------------------------------------------- 0dd4 ; Debug chain 0dd4 ; -------------------------------------------------------------------------------------- 0dd4 0004 0002 | | .DBGLEN 0x0004,0x0002 0dd6 015b 015f | [ _| .DBGLNO 0x015b,0x015f,0x0163,0x0165,0x016a,0x016c 0ddc ; -------------------------------------------------------------------------------------- 0ddc ; Debug chain 0ddc ; -------------------------------------------------------------------------------------- 0ddc 0004 0002 | | .DBGLEN 0x0004,0x0002 0dde 0173 0175 | s u| .DBGLNO 0x0173,0x0175,0x0177,0x0179,0x017e,0x0180 0de4 ; -------------------------------------------------------------------------------------- 0de4 ; Debug chain 0de4 ; -------------------------------------------------------------------------------------- 0de4 0001 0004 | | .DBGLEN 0x0001,0x0004 0de6 018b 018e | | .DBGLNO 0x018b,0x018e,0x0192,0x0193,0x0195 0deb ; -------------------------------------------------------------------------------------- 0deb ; Debug chain 0deb ; -------------------------------------------------------------------------------------- 0deb 0000 0001 | | .DBGLEN 0x0000,0x0001 0ded 019b | | .DBGLNO 0x019b 0dee ; -------------------------------------------------------------------------------------- 0dee ; Debug chain 0dee ; -------------------------------------------------------------------------------------- 0dee 0000 002d | -| .DBGLEN 0x0000,0x002d 0df0 01ab 01b1 | | .DBGLNO 0x01ab,0x01b1,0x01b3,0x01b7,0x01bd,0x01c1,0x01c7,0x01cb,0x01d1,0x01d5,0x01db,0x01df,0x01e5,0x01e9,0x01ef,0x01f3,0x01f9,0x01fd,0x0203,0x0207,0x020d,0x0211,0x0217,0x021b,0x0221,0x0225,0x022b,0x022f,0x0235,0x0239,0x023f,0x0243,0x0249,0x024d,0x0253,0x0257,0x025d,0x0261,0x0267,0x026b,0x0271,0x0275,0x027b,0x027f,0x0285 0e1d ; -------------------------------------------------------------------------------------- 0e1d ; Debug chain 0e1d ; -------------------------------------------------------------------------------------- 0e1d 0002 0005 | | .DBGLEN 0x0002,0x0005 0e1f 028b 028f | | .DBGLNO 0x028b,0x028f,0x0292,0x0294,0x0295,0x0297,0x0299 0e26 ; -------------------------------------------------------------------------------------- 0e26 ; Debug chain 0e26 ; -------------------------------------------------------------------------------------- 0e26 0000 0001 | | .DBGLEN 0x0000,0x0001 0e28 02a3 | | .DBGLNO 0x02a3 0e29 ; -------------------------------------------------------------------------------------- 0e29 ; Debug chain 0e29 ; -------------------------------------------------------------------------------------- 0e29 0000 0001 | | .DBGLEN 0x0000,0x0001 0e2b 02b3 | | .DBGLNO 0x02b3 0e2c ; -------------------------------------------------------------------------------------- 0e2c ; Debug chain 0e2c ; -------------------------------------------------------------------------------------- 0e2c 0000 0006 | | .DBGLEN 0x0000,0x0006 0e2e 02c3 02c5 | | .DBGLNO 0x02c3,0x02c5,0x02cc,0x02d1,0x02d7,0x02d9 0e34 ; -------------------------------------------------------------------------------------- 0e34 ; Debug chain 0e34 ; -------------------------------------------------------------------------------------- 0e34 0000 0006 | | .DBGLEN 0x0000,0x0006 0e36 02e3 02e5 | | .DBGLNO 0x02e3,0x02e5,0x02ec,0x02f1,0x02f7,0x02f9 0e3c ; -------------------------------------------------------------------------------------- 0e3c ; Debug chain 0e3c ; -------------------------------------------------------------------------------------- 0e3c 0000 0007 | | .DBGLEN 0x0000,0x0007 0e3e 0303 0305 | | .DBGLNO 0x0303,0x0305,0x030a,0x0310,0x0314,0x0317,0x0319 0e45 ; -------------------------------------------------------------------------------------- 0e45 ; Debug chain 0e45 ; -------------------------------------------------------------------------------------- 0e45 0001 0009 | | .DBGLEN 0x0001,0x0009 0e47 0323 0327 | # '| .DBGLNO 0x0323,0x0327,0x0329,0x032e,0x0331,0x0337,0x033c,0x033f,0x0345,0x0347 0e51 ; -------------------------------------------------------------------------------------- 0e51 ; Debug chain 0e51 ; -------------------------------------------------------------------------------------- 0e51 0000 0002 | | .DBGLEN 0x0000,0x0002 0e53 0355 0357 | U W| .DBGLNO 0x0355,0x0357 0e55 ; -------------------------------------------------------------------------------------- 0e55 ; Debug chain 0e55 ; -------------------------------------------------------------------------------------- 0e55 0000 0002 | | .DBGLEN 0x0000,0x0002 0e57 0365 0367 | e g| .DBGLNO 0x0365,0x0367 0e59 ; -------------------------------------------------------------------------------------- 0e59 ; Debug chain 0e59 ; -------------------------------------------------------------------------------------- 0e59 0000 0006 | | .DBGLEN 0x0000,0x0006 0e5b 0373 0375 | s u| .DBGLNO 0x0373,0x0375,0x037c,0x0381,0x0387,0x0389 0e61 ; -------------------------------------------------------------------------------------- 0e61 ; Debug chain 0e61 ; -------------------------------------------------------------------------------------- 0e61 0000 0006 | | .DBGLEN 0x0000,0x0006 0e63 0393 0395 | | .DBGLNO 0x0393,0x0395,0x039c,0x03a1,0x03a7,0x03a9 0e69 ; -------------------------------------------------------------------------------------- 0e69 ; Debug chain 0e69 ; -------------------------------------------------------------------------------------- 0e69 0000 0007 | | .DBGLEN 0x0000,0x0007 0e6b 03b3 03b5 | | .DBGLNO 0x03b3,0x03b5,0x03bc,0x03c1,0x03c7,0x03ca,0x03cc 0e72 ; -------------------------------------------------------------------------------------- 0e72 ; Debug chain 0e72 ; -------------------------------------------------------------------------------------- 0e72 0000 0006 | | .DBGLEN 0x0000,0x0006 0e74 03d3 03d5 | | .DBGLNO 0x03d3,0x03d5,0x03dc,0x03e1,0x03e7,0x03e9 0e7a ; -------------------------------------------------------------------------------------- 0e7a ; Debug chain 0e7a ; -------------------------------------------------------------------------------------- 0e7a 0000 0006 | | .DBGLEN 0x0000,0x0006 0e7c 03f3 03f5 | | .DBGLNO 0x03f3,0x03f5,0x03fc,0x0401,0x0407,0x0409 0e82 ; -------------------------------------------------------------------------------------- 0e82 ; Debug chain 0e82 ; -------------------------------------------------------------------------------------- 0e82 0000 0006 | | .DBGLEN 0x0000,0x0006 0e84 0413 0415 | | .DBGLNO 0x0413,0x0415,0x041c,0x0421,0x0427,0x0429 0e8a ; -------------------------------------------------------------------------------------- 0e8a ; Debug chain 0e8a ; -------------------------------------------------------------------------------------- 0e8a 0001 000f | | .DBGLEN 0x0001,0x000f 0e8c 0433 0437 | 3 7| .DBGLNO 0x0433,0x0437,0x0439,0x043e,0x0441,0x0447,0x044c,0x044f,0x0455,0x045a,0x045d,0x0463,0x0468,0x046b,0x0471,0x0473 0e9c ; -------------------------------------------------------------------------------------- 0e9c ; Debug chain 0e9c ; -------------------------------------------------------------------------------------- 0e9c 0000 0006 | | .DBGLEN 0x0000,0x0006 0e9e 047b 047d | { }| .DBGLNO 0x047b,0x047d,0x0484,0x0489,0x048f,0x0491 0ea4 ; -------------------------------------------------------------------------------------- 0ea4 ; Debug chain 0ea4 ; -------------------------------------------------------------------------------------- 0ea4 0001 000f | | .DBGLEN 0x0001,0x000f 0ea6 049b 049f | | .DBGLNO 0x049b,0x049f,0x04a1,0x04a6,0x04a9,0x04af,0x04b4,0x04b7,0x04bd,0x04c2,0x04c5,0x04cb,0x04d0,0x04d3,0x04d9,0x04db 0eb6 ; -------------------------------------------------------------------------------------- 0eb6 ; Debug chain 0eb6 ; -------------------------------------------------------------------------------------- 0eb6 0000 0002 | | .DBGLEN 0x0000,0x0002 0eb8 04e5 04e7 | | .DBGLNO 0x04e5,0x04e7 0eba ; -------------------------------------------------------------------------------------- 0eba ; Debug chain 0eba ; -------------------------------------------------------------------------------------- 0eba 0000 0006 | | .DBGLEN 0x0000,0x0006 0ebc 04f3 04f5 | | .DBGLNO 0x04f3,0x04f5,0x04fc,0x0501,0x0507,0x0509 0ec2 ; -------------------------------------------------------------------------------------- 0ec2 ; Debug chain 0ec2 ; -------------------------------------------------------------------------------------- 0ec2 0000 0006 | | .DBGLEN 0x0000,0x0006 0ec4 0513 0515 | | .DBGLNO 0x0513,0x0515,0x051a,0x0520,0x0523,0x0525 0eca ; -------------------------------------------------------------------------------------- 0eca ; Debug chain 0eca ; -------------------------------------------------------------------------------------- 0eca 0001 0009 | | .DBGLEN 0x0001,0x0009 0ecc 052b 052f | + /| .DBGLNO 0x052b,0x052f,0x0531,0x0536,0x0539,0x053f,0x0544,0x0547,0x054d,0x054f 0ed6 ; -------------------------------------------------------------------------------------- 0ed6 ; Debug chain 0ed6 ; -------------------------------------------------------------------------------------- 0ed6 0004 000d | | .DBGLEN 0x0004,0x000d 0ed8 055b 055d | [ ]| .DBGLNO 0x055b,0x055d,0x055f,0x0561,0x0568,0x056c,0x056d,0x0572,0x0575,0x0579,0x057f,0x05ac,0x05b2,0x05b8,0x05be,0x05c8,0x05cd 0ee9 0001 0002 | | .XXX[0xd] 0eeb 0003 0004 | | 0eed 0005 0006 | | 0eef 0007 0008 | | 0ef1 0009 000b | | 0ef3 000c 000d | | 0ef5 000a | | 0ef6 ; -------------------------------------------------------------------------------------- 0ef6 ; Debug chain 0ef6 ; -------------------------------------------------------------------------------------- 0ef6 0001 005b | [| .DBGLEN 0x0001,0x005b 0ef8 05d3 05d7 | | .DBGLNO 0x05d3,0x05d7,0x05db,0x05e1,0x05e5,0x05eb,0x05ef,0x05f5,0x05f9,0x05ff,0x0603,0x0609,0x060d,0x0613,0x0617,0x061d,0x0621,0x0627,0x062b,0x0631,0x0635,0x063b,0x063f,0x0645,0x0649,0x064f,0x0653,0x0659,0x065d,0x0663,0x0667,0x066d,0x0671,0x0677,0x067b,0x0681,0x0685,0x068b,0x068f,0x0695,0x0699,0x069f,0x06a3,0x06a9,0x06ad,0x06b3,0x06b7,0x06bb,0x06c1,0x06c5,0x06c9,0x06cf,0x06d3,0x06d9,0x06dd,0x06e3,0x06e7,0x06ed,0x06f1,0x06f7,0x0701,0x0705,0x070b,0x070f,0x0715,0x0719,0x071f,0x0723,0x0729,0x072d,0x0733,0x0737,0x073d,0x0741,0x0747,0x074b,0x0751,0x0755,0x075b,0x075f,0x0763,0x0769,0x076d,0x0771,0x0777,0x077b,0x0781,0x0785,0x0790,0x0794,0x079a,0x079e 0f54 ; -------------------------------------------------------------------------------------- 0f54 ; Debug chain 0f54 ; -------------------------------------------------------------------------------------- 0f54 0000 002e | .| .DBGLEN 0x0000,0x002e 0f56 07a3 07a7 | | .DBGLNO 0x07a3,0x07a7,0x07b5,0x07b9,0x07c2,0x07c6,0x07cf,0x07d3,0x07dc,0x07e0,0x07e9,0x07ed,0x07fb,0x07ff,0x080d,0x0811,0x081f,0x0823,0x0831,0x0835,0x0843,0x0847,0x0852,0x0856,0x0861,0x0865,0x086e,0x0872,0x087b,0x087f,0x0889,0x088d,0x089b,0x089f,0x08ad,0x08b1,0x08ba,0x08be,0x08c7,0x08cb,0x08d6,0x08da,0x08e3,0x08e7,0x08f0,0x08f4 0f84 ; -------------------------------------------------------------------------------------- 0f84 ; Debug chain 0f84 ; -------------------------------------------------------------------------------------- 0f84 0000 0007 | | .DBGLEN 0x0000,0x0007 0f86 090b 090f | | .DBGLNO 0x090b,0x090f,0x093c,0x093f,0x0941,0x0945,0x0947 0f8d ; -------------------------------------------------------------------------------------- 0f8d ; Debug chain 0f8d ; -------------------------------------------------------------------------------------- 0f8d 0000 003d | =| .DBGLEN 0x0000,0x003d 0f8f 0953 095b | S [| .DBGLNO 0x0953,0x095b,0x095e,0x0967,0x098b,0x098f,0x0993,0x0997,0x099b,0x099f,0x09a3,0x09a7,0x09ab,0x09af,0x09b3,0x09b7,0x09bb,0x09bf,0x09c3,0x09c7,0x09cb,0x09cf,0x09d3,0x09d7,0x09db,0x09df,0x09e3,0x09e7,0x09eb,0x09ef,0x09f3,0x09f7,0x09fb,0x09ff,0x0a03,0x0a07,0x0a0b,0x0a0f,0x0a13,0x0a17,0x0a1b,0x0a1f,0x0a23,0x0a27,0x0a2b,0x0a2f,0x0a35,0x0a39,0x0a3d,0x0a41,0x0a45,0x0a4b,0x0a4f,0x0a55,0x0a5b,0x0a65,0x0a6a,0x0a6d,0x0a6f,0x0a73,0x0a75 0fcc 0001 0002 | | .XXX[0x3d] 0fce 0003 0004 | | 0fd0 0005 0006 | | 0fd2 0007 0008 | | 0fd4 0009 000a | | 0fd6 000b 000c | | 0fd8 000d 000e | | 0fda 000f 0010 | | 0fdc 0011 0012 | | 0fde 0013 0014 | | 0fe0 0015 0016 | | 0fe2 0017 0018 | | 0fe4 0019 001a | | 0fe6 001b 001c | | 0fe8 001d 001e | | 0fea 001f 0020 | | 0fec 0021 0022 | ! "| 0fee 0023 0024 | # $| 0ff0 0025 0026 | % &| 0ff2 0027 0028 | ' (| 0ff4 0029 002a | ) *| 0ff6 002b 002c | + ,| 0ff8 002d 002e | - .| 0ffa 002f 0030 | / 0| 0ffc 0031 0032 | 1 2| 0ffe 0033 0034 | 3 4| 1000 0035 0037 | 5 7| 1002 0038 0039 | 8 9| 1004 0036 003a | 6 :| 1006 003b 003c | ; <| 1008 003d | = | 1009 ; -------------------------------------------------------------------------------------- 1009 ; Debug chain 1009 ; -------------------------------------------------------------------------------------- 1009 0000 001b | | .DBGLEN 0x0000,0x001b 100b 0a7b 0a81 | { | .DBGLNO 0x0a7b,0x0a81,0x0a85,0x0a89,0x0a8d,0x0a91,0x0aa3,0x0aa7,0x0aab,0x0ab4,0x0ab7,0x0abc,0x0ac2,0x0ac8,0x0afb,0x0afe,0x0b06,0x0b0a,0x0b10,0x0b16,0x0b20,0x0b25,0x0b28,0x0b2a,0x0b2c,0x0b30,0x0b32 1026 0001 0002 | | .XXX[0x1b] 1028 0003 0004 | | 102a 0005 0006 | | 102c 0007 0008 | | 102e 0009 000a | | 1030 000b 000c | | 1032 000d 000e | | 1034 000f 0010 | | 1036 0011 0012 | | 1038 0014 0015 | | 103a 0016 0013 | | 103c 0017 0018 | | 103e 0019 001a | | 1040 001b | | 1041 ; -------------------------------------------------------------------------------------- 1041 ; Debug chain 1041 ; -------------------------------------------------------------------------------------- 1041 0000 000d | | .DBGLEN 0x0000,0x000d 1043 0b3b 0b54 | ; T| .DBGLNO 0x0b3b,0x0b54,0x0b5f,0x0b65,0x0b67,0x0b6d,0x0b73,0x0b7d,0x0b82,0x0b85,0x0b87,0x0b8b,0x0b8d 1050 0001 0002 | | .XXX[0xd] 1052 0003 0004 | | 1054 0005 0007 | | 1056 0008 0009 | | 1058 0006 000a | | 105a 000b 000c | | 105c 000d | | 105d ; -------------------------------------------------------------------------------------- 105d ; Debug chain 105d ; -------------------------------------------------------------------------------------- 105d 0000 000d | | .DBGLEN 0x0000,0x000d 105f 0b93 0bb0 | | .DBGLNO 0x0b93,0x0bb0,0x0bbc,0x0bbe,0x0bc0,0x0bc2,0x0bc4,0x0bc6,0x0bc8,0x0bca,0x0bce,0x0bd4,0x0bd6 106c ; -------------------------------------------------------------------------------------- 106c ; Debug chain 106c ; -------------------------------------------------------------------------------------- 106c 0000 000a | | .DBGLEN 0x0000,0x000a 106e 0bdb 0c01 | | .DBGLNO 0x0bdb,0x0c01,0x0c06,0x0c0b,0x0c0f,0x0c19,0x0c3f,0x0c41,0x0c45,0x0c47 1078 ; -------------------------------------------------------------------------------------- 1078 ; Debug chain 1078 ; -------------------------------------------------------------------------------------- 1078 0000 0009 | | .DBGLEN 0x0000,0x0009 107a 0c53 0c7f | S | .DBGLNO 0x0c53,0x0c7f,0x0c84,0x0c88,0x0caa,0x0cb4,0x0cb6,0x0cba,0x0cbc 1083 ; -------------------------------------------------------------------------------------- 1083 ; Debug chain 1083 ; -------------------------------------------------------------------------------------- 1083 0000 0007 | | .DBGLEN 0x0000,0x0007 1085 0cc3 0cc8 | | .DBGLNO 0x0cc3,0x0cc8,0x0cce,0x0cd1,0x0cd3,0x0cd7,0x0cd9 108c 0000 0000 | | .BLANK 0000[0x174]