|
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: 10240 (0x2800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 1300 | | .CONST 0x1300 ; 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 800c | | .CONST 0x800c ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x10c3, index=0x0 0008 ; -------------------------------------------------------------------------------------- 0008 027c | | | .CONST 0x027c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0089 | | .CONST 0x0089 ; Number of locals 000b INIT_0008: 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 000c 4828 |H( | Short_Literal 0x28 000d e003 | | Load 0x0,0x3 000e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 000f 02a0 | | Declare_Subprogram Null_Subprogram 0010 4801 |H | Short_Literal 0x1 0011 035e | ^ | Declare_Type Array,Defined,Visible 0012 4800 |H | Short_Literal 0x0 0013 4828 |H( | Short_Literal 0x28 0014 00e3 | | Load_Encached Natural_Cache 0015 03f9 | | Declare_Type Discrete,Constrained,Visible 0016 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0018 0093 0000 | | push_full_address 0x0 001a 6291 |b | Indirect_Literal Discrete,0x2ac,{0x80000000, 0x00050000} 001b 0273 | s | Execute Discrete,Plus 001c 0129 | ) | Execute Any,Make_Visible 001d 0093 0000 | | push_full_address 0x0 001f 6288 |b | Indirect_Literal Discrete,0x2a8,{0x80000000, 0x00060000} 0020 0273 | s | Execute Discrete,Plus 0021 0129 | ) | Execute Any,Make_Visible 0022 0093 0000 | | push_full_address 0x0 0024 627f |b | Indirect_Literal Discrete,0x2a4,{0x80000000, 0x00070000} 0025 0273 | s | Execute Discrete,Plus 0026 0129 | ) | Execute Any,Make_Visible 0027 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 0029 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 002b 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 002d 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 002f 0093 0000 | | push_full_address 0x0 0031 626e |bn | Indirect_Literal Discrete,0x2a0,{0x80000000, 0x00080000} 0032 0273 | s | Execute Discrete,Plus 0033 0129 | ) | Execute Any,Make_Visible 0034 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated 0036 0093 0000 | | push_full_address 0x0 0038 6263 |bc | Indirect_Literal Discrete,0x29c,{0x80000000, 0x00090000} 0039 0273 | s | Execute Discrete,Plus 003a 0129 | ) | Execute Any,Make_Visible 003b 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated 003d 0093 0000 | | push_full_address 0x0 003f 6258 |bX | Indirect_Literal Discrete,0x298,{0x80000000, 0x000a0000} 0040 0273 | s | Execute Discrete,Plus 0041 0129 | ) | Execute Any,Make_Visible 0042 029a 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call,Visible,Unelaborated 0044 0093 0000 | | push_full_address 0x0 0046 624d |bM | Indirect_Literal Discrete,0x294,{0x80000000, 0x000b0000} 0047 0273 | s | Execute Discrete,Plus 0048 0129 | ) | Execute Any,Make_Visible 0049 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 004b 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated 004d 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 004f 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated 0051 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated 0053 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0055 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 0057 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 0059 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 005b 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated 005d 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 005f 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated 0061 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0063 029a 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call,Visible,Unelaborated 0065 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated 0067 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 0069 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 006b 00bf | | Action Accept_Activation 006c 4800 |H | Short_Literal 0x0 006d 4864 |Hd | Short_Literal 0x64 006e 00e3 | | Load_Encached Natural_Cache 006f 03f8 | | Declare_Type Discrete,Constrained 0070 4800 |H | Short_Literal 0x0 0071 480f |H | Short_Literal 0xf 0072 00e3 | | Load_Encached Natural_Cache 0073 03f8 | | Declare_Type Discrete,Constrained 0074 e004 | | Load 0x0,0x4 0075 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0076 e004 | | Load 0x0,0x4 0077 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0078 00e3 | | Load_Encached Natural_Cache 0079 e004 | | Load 0x0,0x4 007a 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51 007b e004 | | Load 0x0,0x4 007c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007d e004 | | Load 0x0,0x4 007e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 007f e004 | | Load 0x0,0x4 0080 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0081 e230 | 0 | Load 0x1,0x30 0082 00e1 | | Load_Encached Boolean_Cache 0083 00e1 | | Load_Encached Boolean_Cache 0084 02a0 | | Declare_Subprogram Null_Subprogram 0085 4805 |H | Short_Literal 0x5 0086 032d | - | Declare_Type Record,Defined 0087 4800 |H | Short_Literal 0x0 0088 4864 |Hd | Short_Literal 0x64 0089 00da | | Load_Top At_Offset_2 008a 02a0 | | Declare_Subprogram Null_Subprogram 008b 4801 |H | Short_Literal 0x1 008c 035d | ] | Declare_Type Array,Defined 008d 00d8 | | Load_Top At_Offset_0 008e 0337 | 7 | Declare_Variable Array 008f 00e5 | | Load_Encached Long_Integer_Cache 0090 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0091 00e5 | | Load_Encached Long_Integer_Cache 0092 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0093 00e5 | | Load_Encached Long_Integer_Cache 0094 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0095 00e5 | | Load_Encached Long_Integer_Cache 0096 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0097 00e5 | | Load_Encached Long_Integer_Cache 0098 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0099 00e1 | | Load_Encached Boolean_Cache 009a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009b 4800 |H | Short_Literal 0x0 009c 4803 |H | Short_Literal 0x3 009d 029f 060b | | Declare_Subprogram INIT_0608,For_Call 009f 03fd | | Declare_Type Discrete,Defined 00a0 00e1 | | Load_Encached Boolean_Cache 00a1 00e2 | | Load_Encached Integer_Cache 00a2 e004 | | Load 0x0,0x4 00a3 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00a4 00e3 | | Load_Encached Natural_Cache 00a5 e004 | | Load 0x0,0x4 00a6 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 00a7 00e2 | | Load_Encached Integer_Cache 00a8 e004 | | Load 0x0,0x4 00a9 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00aa 00e3 | | Load_Encached Natural_Cache 00ab 00e2 | | Load_Encached Integer_Cache 00ac 00e4 | | Load_Encached Positive_Cache 00ad 00e4 | | Load_Encached Positive_Cache 00ae e005 | | Load 0x0,0x5 00af 00e2 | | Load_Encached Integer_Cache 00b0 00e1 | | Load_Encached Boolean_Cache 00b1 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call 00b3 4805 |H | Short_Literal 0x5 00b4 032d | - | Declare_Type Record,Defined 00b5 e004 | | Load 0x0,0x4 00b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b7 e004 | | Load 0x0,0x4 00b8 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00b9 00e4 | | Load_Encached Positive_Cache 00ba 00e4 | | Load_Encached Positive_Cache 00bb e005 | | Load 0x0,0x5 00bc 00e2 | | Load_Encached Integer_Cache 00bd 00e1 | | Load_Encached Boolean_Cache 00be 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call 00c0 4807 |H | Short_Literal 0x7 00c1 032d | - | Declare_Type Record,Defined 00c2 4801 |H | Short_Literal 0x1 00c3 4814 |H | Short_Literal 0x14 00c4 e004 | | Load 0x0,0x4 00c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c6 02a0 | | Declare_Subprogram Null_Subprogram 00c7 4801 |H | Short_Literal 0x1 00c8 035d | ] | Declare_Type Array,Defined 00c9 00d8 | | Load_Top At_Offset_0 00ca 0337 | 7 | Declare_Variable Array 00cb 4801 |H | Short_Literal 0x1 00cc 4814 |H | Short_Literal 0x14 00cd e249 | I | Load 0x1,0x49 00ce 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call 00d0 4801 |H | Short_Literal 0x1 00d1 035d | ] | Declare_Type Array,Defined 00d2 00d8 | | Load_Top At_Offset_0 00d3 0337 | 7 | Declare_Variable Array 00d4 00d8 | | Load_Top At_Offset_0 00d5 1c00 | | Execute_Immediate Run_Utility,0x0 00d6 4800 |H | Short_Literal 0x0 00d7 4814 |H | Short_Literal 0x14 00d8 00e3 | | Load_Encached Natural_Cache 00d9 03f8 | | Declare_Type Discrete,Constrained 00da 4800 |H | Short_Literal 0x0 00db 4814 |H | Short_Literal 0x14 00dc 00e3 | | Load_Encached Natural_Cache 00dd 03f8 | | Declare_Type Discrete,Constrained 00de 4801 |H | Short_Literal 0x1 00df 481e |H | Short_Literal 0x1e 00e0 e24a | J | Load 0x1,0x4a 00e1 029f 067b | {| Declare_Subprogram INIT_0678,For_Call 00e3 4801 |H | Short_Literal 0x1 00e4 035d | ] | Declare_Type Array,Defined 00e5 00d8 | | Load_Top At_Offset_0 00e6 0337 | 7 | Declare_Variable Array 00e7 00d8 | | Load_Top At_Offset_0 00e8 1c00 | | Execute_Immediate Run_Utility,0x0 00e9 4800 |H | Short_Literal 0x0 00ea 481e |H | Short_Literal 0x1e 00eb 00e3 | | Load_Encached Natural_Cache 00ec 03f8 | | Declare_Type Discrete,Constrained 00ed 4800 |H | Short_Literal 0x0 00ee 481e |H | Short_Literal 0x1e 00ef 00e3 | | Load_Encached Natural_Cache 00f0 03f8 | | Declare_Type Discrete,Constrained 00f1 e004 | | Load 0x0,0x4 00f2 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00f3 e003 | | Load 0x0,0x3 00f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00f5 e005 | | Load 0x0,0x5 00f6 e006 | | Load 0x0,0x6 00f7 e007 | | Load 0x0,0x7 00f8 00e2 | | Load_Encached Integer_Cache 00f9 029f 06a3 | | Declare_Subprogram INIT_06a0,For_Call 00fb 4806 |H | Short_Literal 0x6 00fc 032d | - | Declare_Type Record,Defined 00fd 4801 |H | Short_Literal 0x1 00fe 4814 |H | Short_Literal 0x14 00ff 00da | | Load_Top At_Offset_2 0100 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call 0102 4801 |H | Short_Literal 0x1 0103 035d | ] | Declare_Type Array,Defined 0104 00d8 | | Load_Top At_Offset_0 0105 0337 | 7 | Declare_Variable Array 0106 00d8 | | Load_Top At_Offset_0 0107 1c00 | | Execute_Immediate Run_Utility,0x0 0108 4800 |H | Short_Literal 0x0 0109 4814 |H | Short_Literal 0x14 010a 00e3 | | Load_Encached Natural_Cache 010b 03f8 | | Declare_Type Discrete,Constrained 010c 4800 |H | Short_Literal 0x0 010d 4814 |H | Short_Literal 0x14 010e 00e3 | | Load_Encached Natural_Cache 010f 03f8 | | Declare_Type Discrete,Constrained 0110 e004 | | Load 0x0,0x4 0111 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0112 e003 | | Load 0x0,0x3 0113 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0114 e004 | | Load 0x0,0x4 0115 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0116 e004 | | Load 0x0,0x4 0117 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0118 e005 | | Load 0x0,0x5 0119 00e2 | | Load_Encached Integer_Cache 011a 029f 06db | | Declare_Subprogram INIT_06d8,For_Call 011c 4806 |H | Short_Literal 0x6 011d 032d | - | Declare_Type Record,Defined 011e 4801 |H | Short_Literal 0x1 011f 4814 |H | Short_Literal 0x14 0120 00da | | Load_Top At_Offset_2 0121 029f 06eb | | Declare_Subprogram INIT_06e8,For_Call 0123 4801 |H | Short_Literal 0x1 0124 035d | ] | Declare_Type Array,Defined 0125 00d8 | | Load_Top At_Offset_0 0126 0337 | 7 | Declare_Variable Array 0127 00d8 | | Load_Top At_Offset_0 0128 1c00 | | Execute_Immediate Run_Utility,0x0 0129 4800 |H | Short_Literal 0x0 012a 4814 |H | Short_Literal 0x14 012b 00e3 | | Load_Encached Natural_Cache 012c 03f8 | | Declare_Type Discrete,Constrained 012d 4800 |H | Short_Literal 0x0 012e 4814 |H | Short_Literal 0x14 012f 00e3 | | Load_Encached Natural_Cache 0130 03f8 | | Declare_Type Discrete,Constrained 0131 4801 |H | Short_Literal 0x1 0132 4be8 |K | Short_Literal 0x3e8 0133 00e5 | | Load_Encached Long_Integer_Cache 0134 03f8 | | Declare_Type Discrete,Constrained 0135 4800 |H | Short_Literal 0x0 0136 4be8 |K | Short_Literal 0x3e8 0137 00e5 | | Load_Encached Long_Integer_Cache 0138 03f8 | | Declare_Type Discrete,Constrained 0139 4801 |H | Short_Literal 0x1 013a 4be8 |K | Short_Literal 0x3e8 013b e008 | | Load 0x0,0x8 013c 029f 0713 | | Declare_Subprogram INIT_0710,For_Call 013e 4801 |H | Short_Literal 0x1 013f 035d | ] | Declare_Type Array,Defined 0140 00e5 | | Load_Encached Long_Integer_Cache 0141 02a0 | | Declare_Subprogram Null_Subprogram 0142 4801 |H | Short_Literal 0x1 0143 032d | - | Declare_Type Record,Defined 0144 00d9 | | Load_Top At_Offset_1 0145 0337 | 7 | Declare_Variable Array 0146 00d8 | | Load_Top At_Offset_0 0147 1c00 | | Execute_Immediate Run_Utility,0x0 0148 00d9 | | Load_Top At_Offset_1 0149 0322 | " | Declare_Variable Record 014a e004 | | Load 0x0,0x4 014b 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 014c e009 | | Load 0x0,0x9 014d 00e3 | | Load_Encached Natural_Cache 014e e005 | | Load 0x0,0x5 014f e006 | | Load 0x0,0x6 0150 e007 | | Load 0x0,0x7 0151 e003 | | Load 0x0,0x3 0152 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0153 00e2 | | Load_Encached Integer_Cache 0154 029f 073b | ;| Declare_Subprogram INIT_0738,For_Call 0156 4808 |H | Short_Literal 0x8 0157 032d | - | Declare_Type Record,Defined 0158 4801 |H | Short_Literal 0x1 0159 4828 |H( | Short_Literal 0x28 015a 00da | | Load_Top At_Offset_2 015b 029f 074b | K| Declare_Subprogram INIT_0748,For_Call 015d 4801 |H | Short_Literal 0x1 015e 035d | ] | Declare_Type Array,Defined 015f 00d8 | | Load_Top At_Offset_0 0160 0337 | 7 | Declare_Variable Array 0161 00d8 | | Load_Top At_Offset_0 0162 1c00 | | Execute_Immediate Run_Utility,0x0 0163 4800 |H | Short_Literal 0x0 0164 4828 |H( | Short_Literal 0x28 0165 00e3 | | Load_Encached Natural_Cache 0166 03f8 | | Declare_Type Discrete,Constrained 0167 4800 |H | Short_Literal 0x0 0168 4828 |H( | Short_Literal 0x28 0169 00e3 | | Load_Encached Natural_Cache 016a 03f8 | | Declare_Type Discrete,Constrained 016b 4800 |H | Short_Literal 0x0 016c e002 | | Load 0x0,0x2 016d 0a05 | | Execute_Immediate Plus,0x5 016e e001 | | Load 0x0,0x1 016f 01d7 | | Execute Vector,Field_Read 0170 02a0 | | Declare_Subprogram Null_Subprogram 0171 038e | | Declare_Type Package,Defined 0172 e001 | | Load 0x0,0x1 0173 e002 | | Load 0x0,0x2 0174 0a04 | | Execute_Immediate Plus,0x4 0175 e001 | | Load 0x0,0x1 0176 01d7 | | Execute Vector,Field_Read 0177 e261 | a | Load 0x1,0x61 0178 e260 | ` | Load 0x1,0x60 0179 4804 |H | Short_Literal 0x4 017a e26a | j | Load 0x1,0x6a 017b 020e | | Execute Module,Augment_Imports 017c 0387 | | Declare_Variable Package 017d a00a | | Store_Unchecked 0x0,0xa 017e e00b | | Load 0x0,0xb 017f a00c | | Store_Unchecked 0x0,0xc 0180 e006 | | Load 0x0,0x6 0181 e007 | | Load 0x0,0x7 0182 a00d | | Store_Unchecked 0x0,0xd 0183 a00e | | Store_Unchecked 0x0,0xe 0184 a00f | | Store_Unchecked 0x0,0xf 0185 e010 | | Load 0x0,0x10 0186 a011 | | Store_Unchecked 0x0,0x11 0187 e012 | | Load 0x0,0x12 0188 e004 | | Load 0x0,0x4 0189 480c |H | Short_Literal 0xc 018a e26a | j | Load 0x1,0x6a 018b 020e | | Execute Module,Augment_Imports 018c 00d8 | | Load_Top At_Offset_0 018d 020f | | Execute Module,Activate 018e 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 018f 00c7 | | Action Elaborate_Subprogram 0190 4800 |H | Short_Literal 0x0 0191 e002 | | Load 0x0,0x2 0192 0a01 | | Execute_Immediate Plus,0x1 0193 e001 | | Load 0x0,0x1 0194 01d7 | | Execute Vector,Field_Read 0195 00f5 | | Load_Encached Unused21 0196 037d | } | Declare_Type Task,Defined 0197 036f | o | Declare_Variable Task 0198 029d 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call 019a 029d 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call 019c 029d 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call 019e 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call 01a0 4800 |H | Short_Literal 0x0 01a1 0093 10ab | | push_full_address INIT_10a8 01a3 00f5 | | Load_Encached Unused21 01a4 037d | } | Declare_Type Task,Defined 01a5 036f | o | Declare_Variable Task 01a6 e22f | / | Load 0x1,0x2f 01a7 e004 | | Load 0x0,0x4 01a8 a013 | | Store_Unchecked 0x0,0x13 01a9 e014 | | Load 0x0,0x14 01aa e015 | | Load 0x0,0x15 01ab a016 | | Store_Unchecked 0x0,0x16 01ac e017 | | Load 0x0,0x17 01ad e018 | | Load 0x0,0x18 01ae e019 | | Load 0x0,0x19 01af e01a | | Load 0x0,0x1a 01b0 e01b | | Load 0x0,0x1b 01b1 e238 | 8 | Load 0x1,0x38 01b2 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 01b3 e01c | | Load 0x0,0x1c 01b4 a01d | | Store_Unchecked 0x0,0x1d 01b5 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 01b6 e267 | g | Load 0x1,0x67 01b7 a01e | | Store_Unchecked 0x0,0x1e 01b8 a011 | | Store_Unchecked 0x0,0x11 01b9 a01f | | Store_Unchecked 0x0,0x1f 01ba a020 | | Store_Unchecked 0x0,0x20 01bb 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 01bc 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 01bd 1d6c | l | Execute_Immediate Reference_Lex_1,0x6c 01be 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 01bf 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 01c0 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d 01c1 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 01c2 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 01c3 a021 | ! | Store_Unchecked 0x0,0x21 01c4 a022 | " | Store_Unchecked 0x0,0x22 01c5 a023 | # | Store_Unchecked 0x0,0x23 01c6 a024 | $ | Store_Unchecked 0x0,0x24 01c7 e025 | % | Load 0x0,0x25 01c8 a026 | & | Store_Unchecked 0x0,0x26 01c9 a027 | ' | Store_Unchecked 0x0,0x27 01ca e212 | | Load 0x1,0x12 01cb 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 01cc e24c | L | Load 0x1,0x4c 01cd e210 | | Load 0x1,0x10 01ce 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 01cf e252 | R | Load 0x1,0x52 01d0 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 01d1 e211 | | Load 0x1,0x11 01d2 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 01d3 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 01d4 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 01d5 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 01d6 e028 | ( | Load 0x0,0x28 01d7 e029 | ) | Load 0x0,0x29 01d8 e010 | | Load 0x0,0x10 01d9 a02a | * | Store_Unchecked 0x0,0x2a 01da a02b | + | Store_Unchecked 0x0,0x2b 01db e21b | | Load 0x1,0x1b 01dc 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 01dd 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 01de e24e | N | Load 0x1,0x4e 01df 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 01e0 e257 | W | Load 0x1,0x57 01e1 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 01e2 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d 01e3 e25c | \ | Load 0x1,0x5c 01e4 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 01e5 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 01e6 a02c | , | Store_Unchecked 0x0,0x2c 01e7 a02d | - | Store_Unchecked 0x0,0x2d 01e8 e264 | d | Load 0x1,0x64 01e9 e263 | c | Load 0x1,0x63 01ea a02e | . | Store_Unchecked 0x0,0x2e 01eb a02f | / | Store_Unchecked 0x0,0x2f 01ec e030 | 0 | Load 0x0,0x30 01ed e031 | 1 | Load 0x0,0x31 01ee e00b | | Load 0x0,0xb 01ef a032 | 2 | Store_Unchecked 0x0,0x32 01f0 a033 | 3 | Store_Unchecked 0x0,0x33 01f1 a034 | 4 | Store_Unchecked 0x0,0x34 01f2 a035 | 5 | Store_Unchecked 0x0,0x35 01f3 a036 | 6 | Store_Unchecked 0x0,0x36 01f4 e037 | 7 | Load 0x0,0x37 01f5 a038 | 8 | Store_Unchecked 0x0,0x38 01f6 e217 | | Load 0x1,0x17 01f7 e219 | | Load 0x1,0x19 01f8 e21d | | Load 0x1,0x1d 01f9 4853 |HS | Short_Literal 0x53 01fa e26b | k | Load 0x1,0x6b 01fb 020e | | Execute Module,Augment_Imports 01fc 0007 | | Action Break_Optional 01fd 029d 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call 01ff 029d 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call 0201 029d 086b | k| Declare_Subprogram INIT_0868,For_Outer_Call 0203 029d 08bb | | Declare_Subprogram INIT_08b8,For_Outer_Call 0205 029d 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call 0207 029d 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call 0209 029d 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call 020b e039 | 9 | Load 0x0,0x39 020c e03a | : | Load 0x0,0x3a 020d a03b | ; | Store_Unchecked 0x0,0x3b 020e a03c | < | Store_Unchecked 0x0,0x3c 020f a03d | = | Store_Unchecked 0x0,0x3d 0210 a03e | > | Store_Unchecked 0x0,0x3e 0211 a03f | ? | Store_Unchecked 0x0,0x3f 0212 e004 | | Load 0x0,0x4 0213 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 0214 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 0215 e24c | L | Load 0x1,0x4c 0216 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 0217 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 0218 e26b | k | Load 0x1,0x6b 0219 481d |H | Short_Literal 0x1d 021a 480f |H | Short_Literal 0xf 021b e270 | p | Load 0x1,0x70 021c 020e | | Execute Module,Augment_Imports 021d 0007 | | Action Break_Optional 021e 029b 0963 | c| Declare_Subprogram INIT_0960,For_Outer_Call,Unelaborated 0220 029d 0a9b | | Declare_Subprogram INIT_0a98,For_Outer_Call 0222 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0223 00c7 | | Action Elaborate_Subprogram 0224 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 0225 00c7 | | Action Elaborate_Subprogram 0226 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0227 00c7 | | Action Elaborate_Subprogram 0228 029d 0abb | | Declare_Subprogram INIT_0ab8,For_Outer_Call 022a 029d 0ae3 | | Declare_Subprogram INIT_0ae0,For_Outer_Call 022c 1d78 | x | Execute_Immediate Reference_Lex_1,0x78 022d 00c7 | | Action Elaborate_Subprogram 022e 029d 0b0b | | Declare_Subprogram INIT_0b08,For_Outer_Call 0230 029d 0b43 | C| Declare_Subprogram INIT_0b40,For_Outer_Call 0232 a040 | @ | Store_Unchecked 0x0,0x40 0233 00c6 | | Action Check_Subprogram_Elaborated 0234 00e1 | | Load_Encached Boolean_Cache 0235 e004 | | Load 0x0,0x4 0236 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0237 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 0238 4800 |H | Short_Literal 0x0 0239 0093 0000 | | push_full_address 0x0 023b 6054 |`T | Indirect_Literal Discrete,0x290,{0x80000000, 0x00050000} 023c 0273 | s | Execute Discrete,Plus 023d e014 | | Load 0x0,0x14 023e 0273 | s | Execute Discrete,Plus 023f e041 | A | Load 0x0,0x41 0240 0273 | s | Execute Discrete,Plus 0241 4800 |H | Short_Literal 0x0 0242 0007 | | Action Break_Optional 0243 029d 0b5b | [| Declare_Subprogram INIT_0b58,For_Outer_Call 0245 e002 | | Load 0x0,0x2 0246 0a03 | | Execute_Immediate Plus,0x3 0247 e001 | | Load 0x0,0x1 0248 01d7 | | Execute Vector,Field_Read 0249 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 024a e004 | | Load 0x0,0x4 024b 194a | J | Execute Package,Field_Reference,Field_Number 0x4a 024c 00c6 | | Action Check_Subprogram_Elaborated 024d 1d85 | | Execute_Immediate Reference_Lex_1,0x85 024e e042 | B | Load 0x0,0x42 024f e043 | C | Load 0x0,0x43 0250 4800 |H | Short_Literal 0x0 0251 0007 | | Action Break_Optional 0252 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0253 00c7 | | Action Elaborate_Subprogram 0254 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0255 00c7 | | Action Elaborate_Subprogram 0256 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0257 00c7 | | Action Elaborate_Subprogram 0258 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0259 00c7 | | Action Elaborate_Subprogram 025a 1d13 | | Execute_Immediate Reference_Lex_1,0x13 025b 00c7 | | Action Elaborate_Subprogram 025c 1d14 | | Execute_Immediate Reference_Lex_1,0x14 025d 00c7 | | Action Elaborate_Subprogram 025e 1d15 | | Execute_Immediate Reference_Lex_1,0x15 025f 00c7 | | Action Elaborate_Subprogram 0260 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0261 00c7 | | Action Elaborate_Subprogram 0262 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0263 00c7 | | Action Elaborate_Subprogram 0264 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0265 00c7 | | Action Elaborate_Subprogram 0266 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0267 00c7 | | Action Elaborate_Subprogram 0268 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0269 00c7 | | Action Elaborate_Subprogram 026a 1d20 | | Execute_Immediate Reference_Lex_1,0x20 026b 00c7 | | Action Elaborate_Subprogram 026c 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 026d 00c7 | | Action Elaborate_Subprogram 026e 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 026f 00c7 | | Action Elaborate_Subprogram 0270 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0271 00c7 | | Action Elaborate_Subprogram 0272 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0273 00c7 | | Action Elaborate_Subprogram 0274 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0275 00c7 | | Action Elaborate_Subprogram 0276 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0277 00c7 | | Action Elaborate_Subprogram 0278 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0279 00c7 | | Action Elaborate_Subprogram 027a 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 027b 00c7 | | Action Elaborate_Subprogram 027c BODY_0008: 027c BODY_0008: 027c 00be | | Action Activate_Tasks 027d 00bc | | Action Signal_Activated 027e 00bb | | Action Signal_Completion 027f 0000 | | .XXX[0x1] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 e5fa | | Load 0x2,-0x6 0284 e5fb | | Load 0x2,-0x5 0285 e5fc | | Load 0x2,-0x4 0286 e5fd | | Load 0x2,-0x3 0287 e5fe | | Load 0x2,-0x2 0288 e5ff | | Load 0x2,-0x1 0289 4806 |H | Short_Literal 0x6 028a e26b | k | Load 0x1,0x6b 028b 170e | | Execute Task,Entry_Call,Field_Number 0xe 028c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 028d 0000 0000 | | .XXX[0x3] 028f 0000 | | 0290 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 0294 8000 0000 | | .LITERAL {0x80000000, 0x000b0000} 0298 8000 0000 | | .LITERAL {0x80000000, 0x000a0000} 029c 8000 0000 | | .LITERAL {0x80000000, 0x00090000} 02a0 8000 0000 | | .LITERAL {0x80000000, 0x00080000} 02a4 8000 0000 | | .LITERAL {0x80000000, 0x00070000} 02a8 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 02ac 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 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 00da | | Load_Top At_Offset_2 02b4 4801 |H | Short_Literal 0x1 02b5 e26b | k | Load 0x1,0x6b 02b6 170f | | Execute Task,Entry_Call,Field_Number 0xf 02b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bb | | .CONST 0x02bb ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0001 | | .CONST 0x0001 ; Number of locals 02bb BODY_02b8: 02bb INIT_02b8: 02bb e5fd | | Load 0x2,-0x3 02bc e5fe | | Load 0x2,-0x2 02bd e5ff | | Load 0x2,-0x1 02be 4803 |H | Short_Literal 0x3 02bf e26b | k | Load 0x1,0x6b 02c0 1710 | | Execute Task,Entry_Call,Field_Number 0x10 02c1 00d1 | | Pop_Control Pop_Count_1 02c2 c5fd | | Store 0x2,-0x3 02c3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02c4 0000 0000 | | .BLANK 0000[0x4] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb e5fb | | Load 0x2,-0x5 02cc e5fc | | Load 0x2,-0x4 02cd e5fd | | Load 0x2,-0x3 02ce e5fe | | Load 0x2,-0x2 02cf e5ff | | Load 0x2,-0x1 02d0 4805 |H | Short_Literal 0x5 02d1 e26b | k | Load 0x1,0x6b 02d2 1711 | | Execute Task,Entry_Call,Field_Number 0x11 02d3 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02d4 0000 0000 | | .BLANK 0000[0x4] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02dd | | .CONST 0x02dd ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0002 | | .CONST 0x0002 ; Number of locals 02db INIT_02d8: 02db e004 | | Load 0x0,0x4 02dc 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 02dd BODY_02d8: 02dd e5f9 | | Load 0x2,-0x7 02de 6803 |h | Jump_Zero 0x2e2 02df e011 | | Load 0x0,0x11 02e0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02e1 7802 |x | Jump 0x2e4 02e2 00db | | Load_Top At_Offset_3 02e3 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02e4 e5f8 | | Load 0x2,-0x8 02e5 00d9 | | Load_Top At_Offset_1 02e6 e5fa | | Load 0x2,-0x6 02e7 e5fb | | Load 0x2,-0x5 02e8 e5fc | | Load 0x2,-0x4 02e9 e5fd | | Load 0x2,-0x3 02ea e5fe | | Load 0x2,-0x2 02eb e5ff | | Load 0x2,-0x1 02ec 4808 |H | Short_Literal 0x8 02ed e26b | k | Load 0x1,0x6b 02ee 1712 | | Execute Task,Entry_Call,Field_Number 0x12 02ef 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 e5f9 | | Load 0x2,-0x7 02f4 e5fa | | Load 0x2,-0x6 02f5 e5fb | | Load 0x2,-0x5 02f6 e5fc | | Load 0x2,-0x4 02f7 e5fd | | Load 0x2,-0x3 02f8 e5fe | | Load 0x2,-0x2 02f9 e5ff | | Load 0x2,-0x1 02fa 4807 |H | Short_Literal 0x7 02fb e26b | k | Load 0x1,0x6b 02fc 1713 | | Execute Task,Entry_Call,Field_Number 0x13 02fd 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02fe 0000 0000 | | .XXX[0x2] 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 e5fd | | Load 0x2,-0x3 0304 e5fe | | Load 0x2,-0x2 0305 e5ff | | Load 0x2,-0x1 0306 4803 |H | Short_Literal 0x3 0307 e26b | k | Load 0x1,0x6b 0308 1714 | | Execute Task,Entry_Call,Field_Number 0x14 0309 4504 |E | Exit_Suprogram New_Top_Offset 0x4 030a 0000 0000 | | .BLANK 0000[0x6] 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0313 | | .CONST 0x0313 ; Address of begin 0311 0004 | | .CONST 0x0004 ; Address of exception handler 0312 0001 | | .CONST 0x0001 ; Number of locals 0313 BODY_0310: 0313 INIT_0310: 0313 e5f8 | | Load 0x2,-0x8 0314 e5f9 | | Load 0x2,-0x7 0315 e5fa | | Load 0x2,-0x6 0316 e5fb | | Load 0x2,-0x5 0317 e5fc | | Load 0x2,-0x4 0318 e5fd | | Load 0x2,-0x3 0319 e5fe | | Load 0x2,-0x2 031a e5ff | | Load 0x2,-0x1 031b 4808 |H | Short_Literal 0x8 031c e26b | k | Load 0x1,0x6b 031d 1715 | | Execute Task,Entry_Call,Field_Number 0x15 031e 4509 |E | Exit_Suprogram New_Top_Offset 0x9 031f 0000 | | .XXX[0x1] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0323 | # | .CONST 0x0323 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0001 | | .CONST 0x0001 ; Number of locals 0323 BODY_0320: 0323 INIT_0320: 0323 e5f9 | | Load 0x2,-0x7 0324 e5fa | | Load 0x2,-0x6 0325 e5fb | | Load 0x2,-0x5 0326 e5fc | | Load 0x2,-0x4 0327 e5fd | | Load 0x2,-0x3 0328 e5fe | | Load 0x2,-0x2 0329 e5ff | | Load 0x2,-0x1 032a 4807 |H | Short_Literal 0x7 032b e26b | k | Load 0x1,0x6b 032c 1716 | | Execute Task,Entry_Call,Field_Number 0x16 032d 4508 |E | Exit_Suprogram New_Top_Offset 0x8 032e 0000 0000 | | .XXX[0x2] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0333 | 3 | .CONST 0x0333 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0001 | | .CONST 0x0001 ; Number of locals 0333 BODY_0330: 0333 INIT_0330: 0333 00da | | Load_Top At_Offset_2 0334 4801 |H | Short_Literal 0x1 0335 e26b | k | Load 0x1,0x6b 0336 1718 | | Execute Task,Entry_Call,Field_Number 0x18 0337 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033b | ; | .CONST 0x033b ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0001 | | .CONST 0x0001 ; Number of locals 033b BODY_0338: 033b INIT_0338: 033b 00da | | Load_Top At_Offset_2 033c 4801 |H | Short_Literal 0x1 033d e26b | k | Load 0x1,0x6b 033e 1717 | | Execute Task,Entry_Call,Field_Number 0x17 033f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0343 | C | .CONST 0x0343 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0001 | | .CONST 0x0001 ; Number of locals 0343 BODY_0340: 0343 INIT_0340: 0343 00da | | Load_Top At_Offset_2 0344 4801 |H | Short_Literal 0x1 0345 e26b | k | Load 0x1,0x6b 0346 1719 | | Execute Task,Entry_Call,Field_Number 0x19 0347 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 034b | K | .CONST 0x034b ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0001 | | .CONST 0x0001 ; Number of locals 034b BODY_0348: 034b INIT_0348: 034b 4800 |H | Short_Literal 0x0 034c e26b | k | Load 0x1,0x6b 034d 171a | | Execute Task,Entry_Call,Field_Number 0x1a 034e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 034f 0000 | | .XXX[0x1] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 00db | | Load_Top At_Offset_3 0354 00db | | Load_Top At_Offset_3 0355 4802 |H | Short_Literal 0x2 0356 e26b | k | Load 0x1,0x6b 0357 171b | | Execute Task,Entry_Call,Field_Number 0x1b 0358 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0359 0000 0000 | | .BLANK 0000[0x7] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 e240 | @ | Load 0x1,0x40 0364 6804 |h | Jump_Zero 0x369 0365 e241 | A | Load 0x1,0x41 0366 00db | | Load_Top At_Offset_3 0367 027f | | Execute Discrete,Equal 0368 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0369 4800 |H | Short_Literal 0x0 036a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 036b 0000 0000 | | .BLANK 0000[0x5] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0383 | | .CONST 0x0383 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0004 | | .CONST 0x0004 ; Number of locals 0373 INIT_0370: 0373 e039 | 9 | Load 0x0,0x39 0374 0322 | " | Declare_Variable Record 0375 00d8 | | Load_Top At_Offset_0 0376 1c01 | | Execute_Immediate Run_Utility,0x1 0377 e044 | D | Load 0x0,0x44 0378 00d9 | | Load_Top At_Offset_1 0379 017d | } | Execute Record,Structure_Write 037a e004 | | Load 0x0,0x4 037b 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 037c 02c7 | | Declare_Variable Any 037d e5ff | | Load 0x2,-0x1 037e e01c | | Load 0x0,0x1c 037f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0380 a403 | | Store_Unchecked 0x2,0x3 0381 029f 0b7b | {| Declare_Subprogram INIT_0b78,For_Call 0383 BODY_0370: 0383 8404 | | Call 0x2,0x4 0384 00d9 | | Load_Top At_Offset_1 0385 1d86 | | Execute_Immediate Reference_Lex_1,0x86 0386 1d87 | | Execute_Immediate Reference_Lex_1,0x87 0387 e004 | | Load 0x0,0x4 0388 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0389 4800 |H | Short_Literal 0x0 038a e5ff | | Load 0x2,-0x1 038b 8038 | 8 | Call 0x0,0x38 038c 4800 |H | Short_Literal 0x0 038d 4800 |H | Short_Literal 0x0 038e e5ff | | Load 0x2,-0x1 038f 8021 | ! | Call 0x0,0x21 0390 00da | | Load_Top At_Offset_2 0391 e5ff | | Load 0x2,-0x1 0392 803e | > | Call 0x0,0x3e 0393 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0394 0000 0000 | | .BLANK 0000[0x4] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b 00da | | Load_Top At_Offset_2 039c e01c | | Load 0x0,0x1c 039d 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 039e e004 | | Load 0x0,0x4 039f 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 03a0 6802 |h | Jump_Zero 0x3a3 03a1 4800 |H | Short_Literal 0x0 03a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03a3 4801 |H | Short_Literal 0x1 03a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03a5 0000 0000 | | .XXX[0x3] 03a7 0000 | | 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03ab | | .CONST 0x03ab ; Address of begin 03a9 0004 | | .CONST 0x0004 ; Address of exception handler 03aa 0001 | | .CONST 0x0001 ; Number of locals 03ab BODY_03a8: 03ab INIT_03a8: 03ab 00da | | Load_Top At_Offset_2 03ac 4801 |H | Short_Literal 0x1 03ad e26b | k | Load 0x1,0x6b 03ae 171d | | Execute Task,Entry_Call,Field_Number 0x1d 03af 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 e5fa | | Load 0x2,-0x6 03b4 e5fb | | Load 0x2,-0x5 03b5 00e3 | | Load_Encached Natural_Cache 03b6 e26a | j | Load 0x1,0x6a 03b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03b8 0322 | " | Declare_Variable Record 03b9 00d8 | | Load_Top At_Offset_0 03ba 1c01 | | Execute_Immediate Run_Utility,0x1 03bb e263 | c | Load 0x1,0x63 03bc e26a | j | Load 0x1,0x6a 03bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03be 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 03bf 0119 | | Execute Any,Check_In_Formal_Type 03c0 00d9 | | Load_Top At_Offset_1 03c1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03c2 e264 | d | Load 0x1,0x64 03c3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03c4 0aff | | Execute_Immediate Plus,-0x1 03c5 4be8 |K | Short_Literal 0x3e8 03c6 026e | n | Execute Discrete,Modulo 03c7 0a01 | | Execute_Immediate Plus,0x1 03c8 00d9 | | Load_Top At_Offset_1 03c9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03ca e264 | d | Load 0x1,0x64 03cb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03cc 4be8 |K | Short_Literal 0x3e8 03cd 027d | } | Execute Discrete,Greater 03ce 00d9 | | Load_Top At_Offset_1 03cf 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03d0 e5fd | | Load 0x2,-0x3 03d1 e5fe | | Load 0x2,-0x2 03d2 e5ff | | Load 0x2,-0x1 03d3 e26a | j | Load 0x1,0x6a 03d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03d5 c5fc | | Store 0x2,-0x4 03d6 00d1 | | Pop_Control Pop_Count_1 03d7 c5fa | | Store 0x2,-0x6 03d8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03d9 0000 0000 | | .BLANK 0000[0x7] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 e239 | 9 | Load 0x1,0x39 03e4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 03e5 e23a | : | Load 0x1,0x3a 03e6 a5fe | | Store_Unchecked 0x2,-0x2 03e7 e23b | ; | Load 0x1,0x3b 03e8 a5fd | | Store_Unchecked 0x2,-0x3 03e9 e23c | < | Load 0x1,0x3c 03ea a5fc | | Store_Unchecked 0x2,-0x4 03eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03ec 0000 0000 | | .BLANK 0000[0x4] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 0452 | R | .CONST 0x0452 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0025 | % | .CONST 0x0025 ; Number of locals 03f3 INIT_03f0: 03f3 029f 0b8b | | Declare_Subprogram INIT_0b88,For_Call 03f5 029f 0b9b | | Declare_Subprogram INIT_0b98,For_Call 03f7 029f 0bb3 | | Declare_Subprogram INIT_0bb0,For_Call 03f9 029f 0bcb | | Declare_Subprogram INIT_0bc8,For_Call 03fb 029f 0be3 | | Declare_Subprogram INIT_0be0,For_Call 03fd 029f 0c33 | 3| Declare_Subprogram INIT_0c30,For_Call 03ff 029f 0c4b | K| Declare_Subprogram INIT_0c48,For_Call 0401 029f 0c63 | c| Declare_Subprogram INIT_0c60,For_Call 0403 029f 0c7b | {| Declare_Subprogram INIT_0c78,For_Call 0405 a016 | | Store_Unchecked 0x0,0x16 0406 00c6 | | Action Check_Subprogram_Elaborated 0407 00e2 | | Load_Encached Integer_Cache 0408 00e2 | | Load_Encached Integer_Cache 0409 4809 |H | Short_Literal 0x9 040a 4802 |H | Short_Literal 0x2 040b 0099 | | Action Reference_Dynamic 040c 480a |H | Short_Literal 0xa 040d 4802 |H | Short_Literal 0x2 040e 0099 | | Action Reference_Dynamic 040f 0093 0000 | | push_full_address 0x0 0411 619e |a | Indirect_Literal Discrete,0x5b0,{0x80000000, 0x00030000} 0412 0273 | s | Execute Discrete,Plus 0413 e014 | | Load 0x0,0x14 0414 0273 | s | Execute Discrete,Plus 0415 e045 | E | Load 0x0,0x45 0416 0273 | s | Execute Discrete,Plus 0417 4810 |H | Short_Literal 0x10 0418 0007 | | Action Break_Optional 0419 029f 0c93 | | Declare_Subprogram INIT_0c90,For_Call 041b 029f 0c7b | {| Declare_Subprogram INIT_0c78,For_Call 041d a016 | | Store_Unchecked 0x0,0x16 041e 00c6 | | Action Check_Subprogram_Elaborated 041f 00e2 | | Load_Encached Integer_Cache 0420 00e2 | | Load_Encached Integer_Cache 0421 4811 |H | Short_Literal 0x11 0422 4802 |H | Short_Literal 0x2 0423 0099 | | Action Reference_Dynamic 0424 4812 |H | Short_Literal 0x12 0425 4802 |H | Short_Literal 0x2 0426 0099 | | Action Reference_Dynamic 0427 0093 0000 | | push_full_address 0x0 0429 6182 |a | Indirect_Literal Discrete,0x5ac,{0x80000000, 0x00020000} 042a 0273 | s | Execute Discrete,Plus 042b e014 | | Load 0x0,0x14 042c 0273 | s | Execute Discrete,Plus 042d e046 | F | Load 0x0,0x46 042e 0273 | s | Execute Discrete,Plus 042f 4818 |H | Short_Literal 0x18 0430 0007 | | Action Break_Optional 0431 029f 0cab | | Declare_Subprogram INIT_0ca8,For_Call 0433 029f 0c7b | {| Declare_Subprogram INIT_0c78,For_Call 0435 a016 | | Store_Unchecked 0x0,0x16 0436 00c6 | | Action Check_Subprogram_Elaborated 0437 00e2 | | Load_Encached Integer_Cache 0438 00e2 | | Load_Encached Integer_Cache 0439 4819 |H | Short_Literal 0x19 043a 4802 |H | Short_Literal 0x2 043b 0099 | | Action Reference_Dynamic 043c 481a |H | Short_Literal 0x1a 043d 4802 |H | Short_Literal 0x2 043e 0099 | | Action Reference_Dynamic 043f 0093 0000 | | push_full_address 0x0 0441 6166 |af | Indirect_Literal Discrete,0x5a8,{0x80000000, 0x00010000} 0442 0273 | s | Execute Discrete,Plus 0443 e014 | | Load 0x0,0x14 0444 0273 | s | Execute Discrete,Plus 0445 e047 | G | Load 0x0,0x47 0446 0273 | s | Execute Discrete,Plus 0447 4820 |H | Short_Literal 0x20 0448 029f 0cc3 | | Declare_Subprogram INIT_0cc0,For_Call 044a 029f 0d03 | | Declare_Subprogram INIT_0d00,For_Call 044c 029f 0d43 | C| Declare_Subprogram INIT_0d40,For_Call 044e 029f 0db3 | | Declare_Subprogram INIT_0db0,For_Call 0450 029f 0de3 | | Declare_Subprogram INIT_0de0,For_Call 0452 BODY_03f0: 0452 e5ff | | Load 0x2,-0x1 0453 00d8 | | Load_Top At_Offset_0 0454 0c0c | | Execute_Immediate Greater_Equal,0xc 0455 7028 |p( | Jump_Nonzero 0x47e 0456 0aff | | Execute_Immediate Plus,-0x1 0457 460a |F | Jump_Case 0xb 0458 792a |y* | Jump 0x583 ; case 0x0 0459 7826 |x& | Jump 0x480 ; case 0x1 045a 7848 |xH | Jump 0x4a3 ; case 0x2 045b 7875 |xu | Jump 0x4d1 ; case 0x3 045c 7897 |x | Jump 0x4f4 ; case 0x4 045d 78bd |x | Jump 0x51b ; case 0x5 045e 78ca |x | Jump 0x529 ; case 0x6 045f 78da |x | Jump 0x53a ; case 0x7 0460 78ea |x | Jump 0x54b ; case 0x8 0461 78fa |x | Jump 0x55c ; case 0x9 0462 7800 |x | Jump 0x463 ; case 0xa 0463 0092 1123 | #| Action Push_String_Extended,0x1123 ; "Trace requests" 0465 8048 | H | Call 0x0,0x48 0466 8049 | I | Call 0x0,0x49 0467 8049 | I | Call 0x0,0x49 0468 00cf | | Action Mark_Auxiliary 0469 e258 | X | Load 0x1,0x58 046a 4801 |H | Short_Literal 0x1 046b 0263 | c | Execute Discrete,Above_Bound 046c 7003 |p | Jump_Nonzero 0x470 046d 8425 | % | Call 0x2,0x25 046e 00c8 | | Action Pop_Auxiliary_Range 046f 3ffd |? | Loop_Increasing 0x46d 0470 00ce | | Action Pop_Auxiliary 0471 e04a | J | Load 0x0,0x4a 0472 6804 |h | Jump_Zero 0x477 0473 0092 1124 | $| Action Push_String_Extended,0x1124 ; "New task trace is on" 0475 8048 | H | Call 0x0,0x48 0476 8049 | I | Call 0x0,0x49 0477 e04b | K | Load 0x0,0x4b 0478 692e |i. | Jump_Zero 0x5a7 0479 0092 1125 | %| Action Push_String_Extended,0x1125 ; "Inform on task creation mode set" 047b 8048 | H | Call 0x0,0x48 047c 8049 | I | Call 0x0,0x49 047d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 047e 00d1 | | Pop_Control Pop_Count_1 047f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0480 0092 1126 | &| Action Push_String_Extended,0x1126 ; "Global stop: " 0482 8048 | H | Call 0x0,0x48 0483 e240 | @ | Load 0x1,0x40 0484 6809 |h | Jump_Zero 0x48e 0485 0092 1127 | '| Action Push_String_Extended,0x1127 ; "Aid: " 0487 e241 | A | Load 0x1,0x41 0488 00e0 | | Load_Encached Standard_Cache 0489 1818 | | Execute Package,Field_Execute,Field_Number 0x18 048a 01cc | | Execute Vector,Catenate 048b 8048 | H | Call 0x0,0x48 048c 8049 | I | Call 0x0,0x49 048d 7804 |x | Jump 0x492 048e 0092 1128 | (| Action Push_String_Extended,0x1128 ; "none" 0490 8048 | H | Call 0x0,0x48 0491 8049 | I | Call 0x0,0x49 0492 e02d | - | Load 0x0,0x2d 0493 6808 |h | Jump_Zero 0x49c 0494 0092 1129 | )| Action Push_String_Extended,0x1129 ; "New task stop, action =" 0496 e02c | , | Load 0x0,0x2c 0497 00e0 | | Load_Encached Standard_Cache 0498 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0499 01cc | | Execute Vector,Catenate 049a 8048 | H | Call 0x0,0x48 049b 8049 | I | Call 0x0,0x49 049c e04c | L | Load 0x0,0x4c 049d 6909 |i | Jump_Zero 0x5a7 049e 0092 112a | *| Action Push_String_Extended,0x112a ; "Holding initial registrants" 04a0 8048 | H | Call 0x0,0x48 04a1 8049 | I | Call 0x0,0x49 04a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04a3 0092 112b | +| Action Push_String_Extended,0x112b ; "Global stepping: " 04a5 8048 | H | Call 0x0,0x48 04a6 e242 | B | Load 0x1,0x42 04a7 e011 | | Load 0x0,0x11 04a8 027f | | Execute Discrete,Equal 04a9 7021 |p! | Jump_Nonzero 0x4cb 04aa 0092 112c | ,| Action Push_String_Extended,0x112c ; "Task = " 04ac e242 | B | Load 0x1,0x42 04ad 804d | M | Call 0x0,0x4d 04ae 01cc | | Execute Vector,Catenate 04af 0092 112d | -| Action Push_String_Extended,0x112d ; " Count = " 04b1 01cc | | Execute Vector,Catenate 04b2 e243 | C | Load 0x1,0x43 04b3 00e0 | | Load_Encached Standard_Cache 04b4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04b5 01cc | | Execute Vector,Catenate 04b6 8048 | H | Call 0x0,0x48 04b7 8049 | I | Call 0x0,0x49 04b8 0092 112e | .| Action Push_String_Extended,0x112e ; " Frame restriction = #" 04ba 8048 | H | Call 0x0,0x48 04bb 4820 |H | Short_Literal 0x20 04bc 4800 |H | Short_Literal 0x0 04bd 4810 |H | Short_Literal 0x10 04be e244 | D | Load 0x1,0x44 04bf e04e | N | Load 0x0,0x4e 04c0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04c1 0092 112f | /| Action Push_String_Extended,0x112f ; " Action = " 04c3 01cc | | Execute Vector,Catenate 04c4 e245 | E | Load 0x1,0x45 04c5 00e0 | | Load_Encached Standard_Cache 04c6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04c7 01cc | | Execute Vector,Catenate 04c8 8048 | H | Call 0x0,0x48 04c9 8049 | I | Call 0x0,0x49 04ca 7804 |x | Jump 0x4cf 04cb 0092 1128 | (| Action Push_String_Extended,0x1128 ; "none" 04cd 8048 | H | Call 0x0,0x48 04ce 8049 | I | Call 0x0,0x49 04cf 8049 | I | Call 0x0,0x49 04d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04d1 0092 1130 | 0| Action Push_String_Extended,0x1130 ; "Instruction stepping: " 04d3 8048 | H | Call 0x0,0x48 04d4 e246 | F | Load 0x1,0x46 04d5 e011 | | Load 0x0,0x11 04d6 027f | | Execute Discrete,Equal 04d7 7016 |p | Jump_Nonzero 0x4ee 04d8 0092 112c | ,| Action Push_String_Extended,0x112c ; "Task = " 04da 8048 | H | Call 0x0,0x48 04db e246 | F | Load 0x1,0x46 04dc 804d | M | Call 0x0,0x4d 04dd 0092 112d | -| Action Push_String_Extended,0x112d ; " Count = " 04df 01cc | | Execute Vector,Catenate 04e0 e247 | G | Load 0x1,0x47 04e1 00e0 | | Load_Encached Standard_Cache 04e2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04e3 01cc | | Execute Vector,Catenate 04e4 0092 112f | /| Action Push_String_Extended,0x112f ; " Action = " 04e6 01cc | | Execute Vector,Catenate 04e7 e248 | H | Load 0x1,0x48 04e8 00e0 | | Load_Encached Standard_Cache 04e9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04ea 01cc | | Execute Vector,Catenate 04eb 8048 | H | Call 0x0,0x48 04ec 8049 | I | Call 0x0,0x49 04ed 7804 |x | Jump 0x4f2 04ee 0092 1131 | 1| Action Push_String_Extended,0x1131 ; "None" 04f0 8048 | H | Call 0x0,0x48 04f1 8049 | I | Call 0x0,0x49 04f2 8049 | I | Call 0x0,0x49 04f3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04f4 0092 1132 | 2| Action Push_String_Extended,0x1132 ; "Breakpoints:" 04f6 8048 | H | Call 0x0,0x48 04f7 8049 | I | Call 0x0,0x49 04f8 e23d | = | Load 0x1,0x3d 04f9 6808 |h | Jump_Zero 0x502 04fa 0092 1133 | 3| Action Push_String_Extended,0x1133 ; " Accelerator load failures: " 04fc e23d | = | Load 0x1,0x3d 04fd 00e0 | | Load_Encached Standard_Cache 04fe 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04ff 01cc | | Execute Vector,Catenate 0500 8048 | H | Call 0x0,0x48 0501 8049 | I | Call 0x0,0x49 0502 00cf | | Action Mark_Auxiliary 0503 e24f | O | Load 0x1,0x4f 0504 4801 |H | Short_Literal 0x1 0505 0263 | c | Execute Discrete,Above_Bound 0506 7003 |p | Jump_Nonzero 0x50a 0507 8421 | ! | Call 0x2,0x21 0508 00c8 | | Action Pop_Auxiliary_Range 0509 3ffd |? | Loop_Increasing 0x507 050a 00c9 | | Action Pop_Auxiliary_Loop 050b e253 | S | Load 0x1,0x53 050c 4801 |H | Short_Literal 0x1 050d 0263 | c | Execute Discrete,Above_Bound 050e 7003 |p | Jump_Nonzero 0x512 050f 8422 | " | Call 0x2,0x22 0510 00c8 | | Action Pop_Auxiliary_Range 0511 3ffd |? | Loop_Increasing 0x50f 0512 00ce | | Action Pop_Auxiliary 0513 e04f | O | Load 0x0,0x4f 0514 6804 |h | Jump_Zero 0x519 0515 0092 1134 | 4| Action Push_String_Extended,0x1134 ; "Break on task creation mode set" 0517 8048 | H | Call 0x0,0x48 0518 8049 | I | Call 0x0,0x49 0519 8049 | I | Call 0x0,0x49 051a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 051b 0092 1135 | 5| Action Push_String_Extended,0x1135 ; "Exception Requests:" 051d 8048 | H | Call 0x0,0x48 051e 8049 | I | Call 0x0,0x49 051f 00cf | | Action Mark_Auxiliary 0520 e268 | h | Load 0x1,0x68 0521 4801 |H | Short_Literal 0x1 0522 0263 | c | Execute Discrete,Above_Bound 0523 7003 |p | Jump_Nonzero 0x527 0524 8423 | # | Call 0x2,0x23 0525 00c8 | | Action Pop_Auxiliary_Range 0526 3ffd |? | Loop_Increasing 0x524 0527 00ce | | Action Pop_Auxiliary 0528 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0529 e024 | $ | Load 0x0,0x24 052a 00d8 | | Load_Top At_Offset_0 052b e40b | | Load 0x2,0xb 052c e40c | | Load 0x2,0xc 052d 480d |H | Short_Literal 0xd 052e 4802 |H | Short_Literal 0x2 052f 0099 | | Action Reference_Dynamic 0530 480e |H | Short_Literal 0xe 0531 4802 |H | Short_Literal 0x2 0532 0099 | | Action Reference_Dynamic 0533 480f |H | Short_Literal 0xf 0534 4802 |H | Short_Literal 0x2 0535 0099 | | Action Reference_Dynamic 0536 8016 | | Call 0x0,0x16 0537 c024 | $ | Store 0x0,0x24 0538 8049 | I | Call 0x0,0x49 0539 4502 |E | Exit_Suprogram New_Top_Offset 0x2 053a e024 | $ | Load 0x0,0x24 053b 00d8 | | Load_Top At_Offset_0 053c e413 | | Load 0x2,0x13 053d e414 | | Load 0x2,0x14 053e 4815 |H | Short_Literal 0x15 053f 4802 |H | Short_Literal 0x2 0540 0099 | | Action Reference_Dynamic 0541 4816 |H | Short_Literal 0x16 0542 4802 |H | Short_Literal 0x2 0543 0099 | | Action Reference_Dynamic 0544 4817 |H | Short_Literal 0x17 0545 4802 |H | Short_Literal 0x2 0546 0099 | | Action Reference_Dynamic 0547 8016 | | Call 0x0,0x16 0548 c024 | $ | Store 0x0,0x24 0549 8049 | I | Call 0x0,0x49 054a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 054b e024 | $ | Load 0x0,0x24 054c 00d8 | | Load_Top At_Offset_0 054d e41b | | Load 0x2,0x1b 054e e41c | | Load 0x2,0x1c 054f 481d |H | Short_Literal 0x1d 0550 4802 |H | Short_Literal 0x2 0551 0099 | | Action Reference_Dynamic 0552 481e |H | Short_Literal 0x1e 0553 4802 |H | Short_Literal 0x2 0554 0099 | | Action Reference_Dynamic 0555 481f |H | Short_Literal 0x1f 0556 4802 |H | Short_Literal 0x2 0557 0099 | | Action Reference_Dynamic 0558 8016 | | Call 0x0,0x16 0559 c024 | $ | Store 0x0,0x24 055a 8049 | I | Call 0x0,0x49 055b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 055c 0092 1136 | 6| Action Push_String_Extended,0x1136 ; "History requests and status" 055e 8048 | H | Call 0x0,0x48 055f 8049 | I | Call 0x0,0x49 0560 8049 | I | Call 0x0,0x49 0561 0092 1137 | 7| Action Push_String_Extended,0x1137 ; "Next_Index = " 0563 e264 | d | Load 0x1,0x64 0564 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0565 00e0 | | Load_Encached Standard_Cache 0566 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0567 01cc | | Execute Vector,Catenate 0568 8048 | H | Call 0x0,0x48 0569 8049 | I | Call 0x0,0x49 056a 00cf | | Action Mark_Auxiliary 056b e25d | ] | Load 0x1,0x5d 056c 4801 |H | Short_Literal 0x1 056d 0263 | c | Execute Discrete,Above_Bound 056e 7011 |p | Jump_Nonzero 0x580 056f 00d8 | | Load_Top At_Offset_0 0570 e25c | \ | Load 0x1,0x5c 0571 01d5 | | Execute Vector,Field_Reference 0572 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0573 e01e | | Load 0x0,0x1e 0574 027e | ~ | Execute Discrete,Not_Equal 0575 6808 |h | Jump_Zero 0x57e 0576 00d8 | | Load_Top At_Offset_0 0577 00e0 | | Load_Encached Standard_Cache 0578 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0579 0092 1138 | 8| Action Push_String_Extended,0x1138 ; ": Task : " 057b 01cc | | Execute Vector,Catenate 057c 8048 | H | Call 0x0,0x48 057d 8424 | $ | Call 0x2,0x24 057e 00c8 | | Action Pop_Auxiliary_Range 057f 3fef |? | Loop_Increasing 0x56f 0580 00ce | | Action Pop_Auxiliary 0581 8049 | I | Call 0x0,0x49 0582 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0583 0092 1139 | 9| Action Push_String_Extended,0x1139 ; "Exception Cache (tasks propagating)" 0585 8048 | H | Call 0x0,0x48 0586 8049 | I | Call 0x0,0x49 0587 00cf | | Action Mark_Auxiliary 0588 4864 |Hd | Short_Literal 0x64 0589 4800 |H | Short_Literal 0x0 058a 0007 | | Action Break_Optional 058b 00d8 | | Load_Top At_Offset_0 058c e238 | 8 | Load 0x1,0x38 058d 01d5 | | Execute Vector,Field_Reference 058e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 058f 6813 |h | Jump_Zero 0x5a3 0590 00d8 | | Load_Top At_Offset_0 0591 e238 | 8 | Load 0x1,0x38 0592 01d5 | | Execute Vector,Field_Reference 0593 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0594 680e |h | Jump_Zero 0x5a3 0595 00d8 | | Load_Top At_Offset_0 0596 e238 | 8 | Load 0x1,0x38 0597 01d5 | | Execute Vector,Field_Reference 0598 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0599 804d | M | Call 0x0,0x4d 059a 00d9 | | Load_Top At_Offset_1 059b e238 | 8 | Load 0x1,0x38 059c 01d5 | | Execute Vector,Field_Reference 059d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 059e 00e0 | | Load_Encached Standard_Cache 059f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05a0 01cc | | Execute Vector,Catenate 05a1 8048 | H | Call 0x0,0x48 05a2 8049 | I | Call 0x0,0x49 05a3 00c8 | | Action Pop_Auxiliary_Range 05a4 3fe6 |? | Loop_Increasing 0x58b 05a5 00ce | | Action Pop_Auxiliary 05a6 8049 | I | Call 0x0,0x49 05a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05a8 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 05ac 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 05b0 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 05b4 0000 0000 | | .BLANK 0000[0x4] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05bb | | .CONST 0x05bb ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0001 | | .CONST 0x0001 ; Number of locals 05bb BODY_05b8: 05bb INIT_05b8: 05bb 4800 |H | Short_Literal 0x0 05bc a240 | @ | Store_Unchecked 0x1,0x40 05bd e011 | | Load 0x0,0x11 05be a242 | B | Store_Unchecked 0x1,0x42 05bf e011 | | Load 0x0,0x11 05c0 a246 | F | Store_Unchecked 0x1,0x46 05c1 4800 |H | Short_Literal 0x0 05c2 a24f | O | Store_Unchecked 0x1,0x4f 05c3 4800 |H | Short_Literal 0x0 05c4 a250 | P | Store_Unchecked 0x1,0x50 05c5 4800 |H | Short_Literal 0x0 05c6 a253 | S | Store_Unchecked 0x1,0x53 05c7 4800 |H | Short_Literal 0x0 05c8 a254 | T | Store_Unchecked 0x1,0x54 05c9 4800 |H | Short_Literal 0x0 05ca a258 | X | Store_Unchecked 0x1,0x58 05cb 4800 |H | Short_Literal 0x0 05cc a259 | Y | Store_Unchecked 0x1,0x59 05cd 4800 |H | Short_Literal 0x0 05ce a268 | h | Store_Unchecked 0x1,0x68 05cf 4800 |H | Short_Literal 0x0 05d0 a269 | i | Store_Unchecked 0x1,0x69 05d1 4800 |H | Short_Literal 0x0 05d2 a25d | ] | Store_Unchecked 0x1,0x5d 05d3 4800 |H | Short_Literal 0x0 05d4 a25e | ^ | Store_Unchecked 0x1,0x5e 05d5 4800 |H | Short_Literal 0x0 05d6 e264 | d | Load 0x1,0x64 05d7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05d8 00cf | | Action Mark_Auxiliary 05d9 e263 | c | Load 0x1,0x63 05da 01d9 | | Execute Vector,Reverse_Bounds 05db 0007 | | Action Break_Optional 05dc 802e | . | Call 0x0,0x2e 05dd 00d9 | | Load_Top At_Offset_1 05de e263 | c | Load 0x1,0x63 05df 01d6 | | Execute Vector,Field_Write 05e0 00c8 | | Action Pop_Auxiliary_Range 05e1 3ffa |? | Loop_Increasing 0x5dc 05e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05e3 0000 0000 | | .BLANK 0000[0x5] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05eb | | .CONST 0x05eb ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0001 | | .CONST 0x0001 ; Number of locals 05eb BODY_05e8: 05eb INIT_05e8: 05eb 4800 |H | Short_Literal 0x0 05ec e26b | k | Load 0x1,0x6b 05ed 171f | | Execute Task,Entry_Call,Field_Number 0x1f 05ee 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05ef 0000 | | .XXX[0x1] 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f3 | | .CONST 0x05f3 ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0001 | | .CONST 0x0001 ; Number of locals 05f3 BODY_05f0: 05f3 INIT_05f0: 05f3 00da | | Load_Top At_Offset_2 05f4 a23e | > | Store_Unchecked 0x1,0x3e 05f5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05f6 0000 0000 | | .XXX[0x2] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb e5fd | | Load 0x2,-0x3 05fc 00e3 | | Load_Encached Natural_Cache 05fd e5ff | | Load 0x2,-0x1 05fe 4803 |H | Short_Literal 0x3 05ff e26b | k | Load 0x1,0x6b 0600 1720 | | Execute Task,Entry_Call,Field_Number 0x20 0601 c5fe | | Store 0x2,-0x2 0602 c5fd | | Store 0x2,-0x3 0603 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0604 0000 0000 | | .BLANK 0000[0x4] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 060b | | .CONST 0x060b ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0001 | | .CONST 0x0001 ; Number of locals 060b BODY_0608: 060b INIT_0608: 060b 4607 |F | Jump_Case 0x8 060c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 060d 7807 |x | Jump 0x615 ; case 0x1 060e 780a |x | Jump 0x619 ; case 0x2 060f 780e |x | Jump 0x61e ; case 0x3 0610 7811 |x | Jump 0x622 ; case 0x4 0611 7812 |x | Jump 0x624 ; case 0x5 0612 7813 |x | Jump 0x626 ; case 0x6 0613 7816 |x | Jump 0x62a ; case 0x7 0614 4302 |C | .XXX[0x1] 0615 00da | | Load_Top At_Offset_2 0616 0091 111f | | Action Push_String_Extended_Indexed,0x111f ; "LOCAL_UNCONSTRAINED" 0618 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0619 00db | | Load_Top At_Offset_3 061a 00db | | Load_Top At_Offset_3 061b 00e0 | | Load_Encached Standard_Cache 061c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 061d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 061e 00da | | Load_Top At_Offset_2 061f 00e0 | | Load_Encached Standard_Cache 0620 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0621 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0622 00db | | Load_Top At_Offset_3 0623 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0624 00db | | Load_Top At_Offset_3 0625 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0626 e23f | ? | Load 0x1,0x3f 0627 00dc | | Load_Top At_Offset_4 0628 0267 | g | Execute Discrete,Predecessor 0629 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 062a e23f | ? | Load 0x1,0x3f 062b 00dc | | Load_Top At_Offset_4 062c 0268 | h | Execute Discrete,Successor 062d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 062e 0000 0000 | | .XXX[0x2] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 4601 |F | Jump_Case 0x2 0634 7801 |x | Jump 0x636 ; case 0x0 0635 7804 |x | Jump 0x63a ; case 0x1 0636 00da | | Load_Top At_Offset_2 0637 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0638 1c00 | | Execute_Immediate Run_Utility,0x0 0639 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 063a 00da | | Load_Top At_Offset_2 063b 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 063c 1c01 | | Execute_Immediate Run_Utility,0x1 063d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 063e 0000 0000 | | .XXX[0x2] 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 0643 | C | .CONST 0x0643 ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0001 | | .CONST 0x0001 ; Number of locals 0643 BODY_0640: 0643 INIT_0640: 0643 4601 |F | Jump_Case 0x2 0644 7801 |x | Jump 0x646 ; case 0x0 0645 7804 |x | Jump 0x64a ; case 0x1 0646 00da | | Load_Top At_Offset_2 0647 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0648 1c00 | | Execute_Immediate Run_Utility,0x0 0649 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 064a 00da | | Load_Top At_Offset_2 064b 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 064c 1c01 | | Execute_Immediate Run_Utility,0x1 064d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 064e 0000 0000 | | .XXX[0x2] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0653 | S | .CONST 0x0653 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0001 | | .CONST 0x0001 ; Number of locals 0653 BODY_0650: 0653 INIT_0650: 0653 4605 |F | Jump_Case 0x6 0654 7804 |x | Jump 0x659 ; case 0x0 0655 7815 |x | Jump 0x66b ; case 0x1 0656 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0657 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0658 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0659 00da | | Load_Top At_Offset_2 ; case 0x5 065a 01d8 | | Execute Vector,Element_Type 065b 0322 | " | Declare_Variable Record 065c 00d8 | | Load_Top At_Offset_0 065d 1c00 | | Execute_Immediate Run_Utility,0x0 065e 00db | | Load_Top At_Offset_3 065f 01dc | | Execute Vector,Last 0660 e5ff | | Load 0x2,-0x1 0661 01dd | | Execute Vector,First 0662 0263 | c | Execute Discrete,Above_Bound 0663 7006 |p | Jump_Nonzero 0x66a 0664 00da | | Load_Top At_Offset_2 0665 00d9 | | Load_Top At_Offset_1 0666 e5ff | | Load 0x2,-0x1 0667 01d6 | | Execute Vector,Field_Write 0668 0a01 | | Execute_Immediate Plus,0x1 0669 7ff8 | | Jump 0x662 066a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 066b 00da | | Load_Top At_Offset_2 066c 01dc | | Execute Vector,Last 066d 00db | | Load_Top At_Offset_3 066e 01dd | | Execute Vector,First 066f 0263 | c | Execute Discrete,Above_Bound 0670 7006 |p | Jump_Nonzero 0x677 0671 00d8 | | Load_Top At_Offset_0 0672 e5ff | | Load 0x2,-0x1 0673 01d7 | | Execute Vector,Field_Read 0674 1c01 | | Execute_Immediate Run_Utility,0x1 0675 0a01 | | Execute_Immediate Plus,0x1 0676 7ff8 | | Jump 0x66f 0677 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067b | { | .CONST 0x067b ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0001 | | .CONST 0x0001 ; Number of locals 067b BODY_0678: 067b INIT_0678: 067b 4605 |F | Jump_Case 0x6 067c 7804 |x | Jump 0x681 ; case 0x0 067d 7815 |x | Jump 0x693 ; case 0x1 067e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 067f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0680 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0681 00da | | Load_Top At_Offset_2 ; case 0x5 0682 01d8 | | Execute Vector,Element_Type 0683 0322 | " | Declare_Variable Record 0684 00d8 | | Load_Top At_Offset_0 0685 1c00 | | Execute_Immediate Run_Utility,0x0 0686 00db | | Load_Top At_Offset_3 0687 01dc | | Execute Vector,Last 0688 e5ff | | Load 0x2,-0x1 0689 01dd | | Execute Vector,First 068a 0263 | c | Execute Discrete,Above_Bound 068b 7006 |p | Jump_Nonzero 0x692 068c 00da | | Load_Top At_Offset_2 068d 00d9 | | Load_Top At_Offset_1 068e e5ff | | Load 0x2,-0x1 068f 01d6 | | Execute Vector,Field_Write 0690 0a01 | | Execute_Immediate Plus,0x1 0691 7ff8 | | Jump 0x68a 0692 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0693 00da | | Load_Top At_Offset_2 0694 01dc | | Execute Vector,Last 0695 00db | | Load_Top At_Offset_3 0696 01dd | | Execute Vector,First 0697 0263 | c | Execute Discrete,Above_Bound 0698 7006 |p | Jump_Nonzero 0x69f 0699 00d8 | | Load_Top At_Offset_0 069a e5ff | | Load 0x2,-0x1 069b 01d7 | | Execute Vector,Field_Read 069c 1c01 | | Execute_Immediate Run_Utility,0x1 069d 0a01 | | Execute_Immediate Plus,0x1 069e 7ff8 | | Jump 0x697 069f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06a0 ; -------------------------------------------------------------------------------------- 06a0 ; SUBPROGRAM 06a0 ; -------------------------------------------------------------------------------------- 06a0 06a3 | | .CONST 0x06a3 ; Address of begin 06a1 0004 | | .CONST 0x0004 ; Address of exception handler 06a2 0001 | | .CONST 0x0001 ; Number of locals 06a3 BODY_06a0: 06a3 INIT_06a0: 06a3 4601 |F | Jump_Case 0x2 06a4 7801 |x | Jump 0x6a6 ; case 0x0 06a5 7804 |x | Jump 0x6aa ; case 0x1 06a6 00da | | Load_Top At_Offset_2 06a7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06a8 1c00 | | Execute_Immediate Run_Utility,0x0 06a9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06aa 00da | | Load_Top At_Offset_2 06ab 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06ac 1c01 | | Execute_Immediate Run_Utility,0x1 06ad 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06ae 0000 0000 | | .XXX[0x2] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b3 | | .CONST 0x06b3 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0001 | | .CONST 0x0001 ; Number of locals 06b3 BODY_06b0: 06b3 INIT_06b0: 06b3 4605 |F | Jump_Case 0x6 06b4 7804 |x | Jump 0x6b9 ; case 0x0 06b5 7815 |x | Jump 0x6cb ; case 0x1 06b6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 06b7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 06b8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 06b9 00da | | Load_Top At_Offset_2 ; case 0x5 06ba 01d8 | | Execute Vector,Element_Type 06bb 0322 | " | Declare_Variable Record 06bc 00d8 | | Load_Top At_Offset_0 06bd 1c00 | | Execute_Immediate Run_Utility,0x0 06be 00db | | Load_Top At_Offset_3 06bf 01dc | | Execute Vector,Last 06c0 e5ff | | Load 0x2,-0x1 06c1 01dd | | Execute Vector,First 06c2 0263 | c | Execute Discrete,Above_Bound 06c3 7006 |p | Jump_Nonzero 0x6ca 06c4 00da | | Load_Top At_Offset_2 06c5 00d9 | | Load_Top At_Offset_1 06c6 e5ff | | Load 0x2,-0x1 06c7 01d6 | | Execute Vector,Field_Write 06c8 0a01 | | Execute_Immediate Plus,0x1 06c9 7ff8 | | Jump 0x6c2 06ca 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06cb 00da | | Load_Top At_Offset_2 06cc 01dc | | Execute Vector,Last 06cd 00db | | Load_Top At_Offset_3 06ce 01dd | | Execute Vector,First 06cf 0263 | c | Execute Discrete,Above_Bound 06d0 7006 |p | Jump_Nonzero 0x6d7 06d1 00d8 | | Load_Top At_Offset_0 06d2 e5ff | | Load 0x2,-0x1 06d3 01d7 | | Execute Vector,Field_Read 06d4 1c01 | | Execute_Immediate Run_Utility,0x1 06d5 0a01 | | Execute_Immediate Plus,0x1 06d6 7ff8 | | Jump 0x6cf 06d7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; SUBPROGRAM 06d8 ; -------------------------------------------------------------------------------------- 06d8 06db | | .CONST 0x06db ; Address of begin 06d9 0004 | | .CONST 0x0004 ; Address of exception handler 06da 0001 | | .CONST 0x0001 ; Number of locals 06db BODY_06d8: 06db INIT_06d8: 06db 4601 |F | Jump_Case 0x2 06dc 7801 |x | Jump 0x6de ; case 0x0 06dd 7804 |x | Jump 0x6e2 ; case 0x1 06de 00da | | Load_Top At_Offset_2 06df 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06e0 1c00 | | Execute_Immediate Run_Utility,0x0 06e1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06e2 00da | | Load_Top At_Offset_2 06e3 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06e4 1c01 | | Execute_Immediate Run_Utility,0x1 06e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06e6 0000 0000 | | .XXX[0x2] 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06eb | | .CONST 0x06eb ; Address of begin 06e9 0004 | | .CONST 0x0004 ; Address of exception handler 06ea 0001 | | .CONST 0x0001 ; Number of locals 06eb BODY_06e8: 06eb INIT_06e8: 06eb 4605 |F | Jump_Case 0x6 06ec 7804 |x | Jump 0x6f1 ; case 0x0 06ed 7815 |x | Jump 0x703 ; case 0x1 06ee 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 06ef 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 06f0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 06f1 00da | | Load_Top At_Offset_2 ; case 0x5 06f2 01d8 | | Execute Vector,Element_Type 06f3 0322 | " | Declare_Variable Record 06f4 00d8 | | Load_Top At_Offset_0 06f5 1c00 | | Execute_Immediate Run_Utility,0x0 06f6 00db | | Load_Top At_Offset_3 06f7 01dc | | Execute Vector,Last 06f8 e5ff | | Load 0x2,-0x1 06f9 01dd | | Execute Vector,First 06fa 0263 | c | Execute Discrete,Above_Bound 06fb 7006 |p | Jump_Nonzero 0x702 06fc 00da | | Load_Top At_Offset_2 06fd 00d9 | | Load_Top At_Offset_1 06fe e5ff | | Load 0x2,-0x1 06ff 01d6 | | Execute Vector,Field_Write 0700 0a01 | | Execute_Immediate Plus,0x1 0701 7ff8 | | Jump 0x6fa 0702 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0703 00da | | Load_Top At_Offset_2 0704 01dc | | Execute Vector,Last 0705 00db | | Load_Top At_Offset_3 0706 01dd | | Execute Vector,First 0707 0263 | c | Execute Discrete,Above_Bound 0708 7006 |p | Jump_Nonzero 0x70f 0709 00d8 | | Load_Top At_Offset_0 070a e5ff | | Load 0x2,-0x1 070b 01d7 | | Execute Vector,Field_Read 070c 1c01 | | Execute_Immediate Run_Utility,0x1 070d 0a01 | | Execute_Immediate Plus,0x1 070e 7ff8 | | Jump 0x707 070f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0710 ; -------------------------------------------------------------------------------------- 0710 ; SUBPROGRAM 0710 ; -------------------------------------------------------------------------------------- 0710 0713 | | .CONST 0x0713 ; Address of begin 0711 0004 | | .CONST 0x0004 ; Address of exception handler 0712 0001 | | .CONST 0x0001 ; Number of locals 0713 BODY_0710: 0713 INIT_0710: 0713 4605 |F | Jump_Case 0x6 0714 7804 |x | Jump 0x719 ; case 0x0 0715 7815 |x | Jump 0x72b ; case 0x1 0716 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0717 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0718 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0719 00da | | Load_Top At_Offset_2 ; case 0x5 071a 01d8 | | Execute Vector,Element_Type 071b 0322 | " | Declare_Variable Record 071c 00d8 | | Load_Top At_Offset_0 071d 1c00 | | Execute_Immediate Run_Utility,0x0 071e 00db | | Load_Top At_Offset_3 071f 01dc | | Execute Vector,Last 0720 e5ff | | Load 0x2,-0x1 0721 01dd | | Execute Vector,First 0722 0263 | c | Execute Discrete,Above_Bound 0723 7006 |p | Jump_Nonzero 0x72a 0724 00da | | Load_Top At_Offset_2 0725 00d9 | | Load_Top At_Offset_1 0726 e5ff | | Load 0x2,-0x1 0727 01d6 | | Execute Vector,Field_Write 0728 0a01 | | Execute_Immediate Plus,0x1 0729 7ff8 | | Jump 0x722 072a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 072b 00da | | Load_Top At_Offset_2 072c 01dc | | Execute Vector,Last 072d 00db | | Load_Top At_Offset_3 072e 01dd | | Execute Vector,First 072f 0263 | c | Execute Discrete,Above_Bound 0730 7006 |p | Jump_Nonzero 0x737 0731 00d8 | | Load_Top At_Offset_0 0732 e5ff | | Load 0x2,-0x1 0733 01d7 | | Execute Vector,Field_Read 0734 1c01 | | Execute_Immediate Run_Utility,0x1 0735 0a01 | | Execute_Immediate Plus,0x1 0736 7ff8 | | Jump 0x72f 0737 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 073b | ; | .CONST 0x073b ; Address of begin 0739 0004 | | .CONST 0x0004 ; Address of exception handler 073a 0001 | | .CONST 0x0001 ; Number of locals 073b BODY_0738: 073b INIT_0738: 073b 4601 |F | Jump_Case 0x2 073c 7801 |x | Jump 0x73e ; case 0x0 073d 7804 |x | Jump 0x742 ; case 0x1 073e 00da | | Load_Top At_Offset_2 073f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0740 1c00 | | Execute_Immediate Run_Utility,0x0 0741 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0742 00da | | Load_Top At_Offset_2 0743 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0744 1c01 | | Execute_Immediate Run_Utility,0x1 0745 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0746 0000 0000 | | .XXX[0x2] 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 074b | K | .CONST 0x074b ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0001 | | .CONST 0x0001 ; Number of locals 074b BODY_0748: 074b INIT_0748: 074b 4605 |F | Jump_Case 0x6 074c 7804 |x | Jump 0x751 ; case 0x0 074d 7815 |x | Jump 0x763 ; case 0x1 074e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 074f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0750 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0751 00da | | Load_Top At_Offset_2 ; case 0x5 0752 01d8 | | Execute Vector,Element_Type 0753 0322 | " | Declare_Variable Record 0754 00d8 | | Load_Top At_Offset_0 0755 1c00 | | Execute_Immediate Run_Utility,0x0 0756 00db | | Load_Top At_Offset_3 0757 01dc | | Execute Vector,Last 0758 e5ff | | Load 0x2,-0x1 0759 01dd | | Execute Vector,First 075a 0263 | c | Execute Discrete,Above_Bound 075b 7006 |p | Jump_Nonzero 0x762 075c 00da | | Load_Top At_Offset_2 075d 00d9 | | Load_Top At_Offset_1 075e e5ff | | Load 0x2,-0x1 075f 01d6 | | Execute Vector,Field_Write 0760 0a01 | | Execute_Immediate Plus,0x1 0761 7ff8 | | Jump 0x75a 0762 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0763 00da | | Load_Top At_Offset_2 0764 01dc | | Execute Vector,Last 0765 00db | | Load_Top At_Offset_3 0766 01dd | | Execute Vector,First 0767 0263 | c | Execute Discrete,Above_Bound 0768 7006 |p | Jump_Nonzero 0x76f 0769 00d8 | | Load_Top At_Offset_0 076a e5ff | | Load 0x2,-0x1 076b 01d7 | | Execute Vector,Field_Read 076c 1c01 | | Execute_Immediate Run_Utility,0x1 076d 0a01 | | Execute_Immediate Plus,0x1 076e 7ff8 | | Jump 0x767 076f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 0773 | s | .CONST 0x0773 ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0001 | | .CONST 0x0001 ; Number of locals 0773 BODY_0770: 0773 INIT_0770: 0773 00cf | | Action Mark_Auxiliary 0774 e253 | S | Load 0x1,0x53 0775 4801 |H | Short_Literal 0x1 0776 0263 | c | Execute Discrete,Above_Bound 0777 7012 |p | Jump_Nonzero 0x78a 0778 00d8 | | Load_Top At_Offset_0 0779 e252 | R | Load 0x1,0x52 077a 01d5 | | Execute Vector,Field_Reference 077b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 077c e027 | ' | Load 0x0,0x27 077d 027f | | Execute Discrete,Equal 077e 7009 |p | Jump_Nonzero 0x788 077f 00d8 | | Load_Top At_Offset_0 0780 e252 | R | Load 0x1,0x52 0781 01d5 | | Execute Vector,Field_Reference 0782 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0783 e5ff | | Load 0x2,-0x1 0784 027f | | Execute Discrete,Equal 0785 6802 |h | Jump_Zero 0x788 0786 4801 |H | Short_Literal 0x1 0787 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0788 00c8 | | Action Pop_Auxiliary_Range 0789 3fee |? | Loop_Increasing 0x778 078a 00ce | | Action Pop_Auxiliary 078b 4800 |H | Short_Literal 0x0 078c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 078d 0000 0000 | | .XXX[0x3] 078f 0000 | | 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0793 | | .CONST 0x0793 ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0001 | | .CONST 0x0001 ; Number of locals 0793 BODY_0790: 0793 INIT_0790: 0793 00cf | | Action Mark_Auxiliary 0794 e25d | ] | Load 0x1,0x5d 0795 4801 |H | Short_Literal 0x1 0796 0263 | c | Execute Discrete,Above_Bound 0797 701f |p | Jump_Nonzero 0x7b7 0798 00d8 | | Load_Top At_Offset_0 0799 e25c | \ | Load 0x1,0x5c 079a 01d5 | | Execute Vector,Field_Reference 079b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 079c e01e | | Load 0x0,0x1e 079d 027e | ~ | Execute Discrete,Not_Equal 079e 6816 |h | Jump_Zero 0x7b5 079f 00d8 | | Load_Top At_Offset_0 07a0 e25c | \ | Load 0x1,0x5c 07a1 01d5 | | Execute Vector,Field_Reference 07a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07a3 e5ff | | Load 0x2,-0x1 07a4 027f | | Execute Discrete,Equal 07a5 7007 |p | Jump_Nonzero 0x7ad 07a6 00d8 | | Load_Top At_Offset_0 07a7 e25c | \ | Load 0x1,0x5c 07a8 01d5 | | Execute Vector,Field_Reference 07a9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07aa e011 | | Load 0x0,0x11 07ab 027f | | Execute Discrete,Equal 07ac 6808 |h | Jump_Zero 0x7b5 07ad 00d8 | | Load_Top At_Offset_0 07ae e25c | \ | Load 0x1,0x5c 07af 01d5 | | Execute Vector,Field_Reference 07b0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07b1 0f01 | | Execute_Immediate Equal,0x1 07b2 6802 |h | Jump_Zero 0x7b5 07b3 4801 |H | Short_Literal 0x1 07b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07b5 00c8 | | Action Pop_Auxiliary_Range 07b6 3fe1 |? | Loop_Increasing 0x798 07b7 00ce | | Action Pop_Auxiliary 07b8 4800 |H | Short_Literal 0x0 07b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ba 0000 0000 | | .BLANK 0000[0x6] 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 00cf | | Action Mark_Auxiliary 07c4 e25d | ] | Load 0x1,0x5d 07c5 4801 |H | Short_Literal 0x1 07c6 0263 | c | Execute Discrete,Above_Bound 07c7 7019 |p | Jump_Nonzero 0x7e1 07c8 00d8 | | Load_Top At_Offset_0 07c9 e25c | \ | Load 0x1,0x5c 07ca 01d5 | | Execute Vector,Field_Reference 07cb 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07cc e01e | | Load 0x0,0x1e 07cd 027e | ~ | Execute Discrete,Not_Equal 07ce 6810 |h | Jump_Zero 0x7df 07cf 00d8 | | Load_Top At_Offset_0 07d0 e25c | \ | Load 0x1,0x5c 07d1 01d5 | | Execute Vector,Field_Reference 07d2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07d3 e5ff | | Load 0x2,-0x1 07d4 027f | | Execute Discrete,Equal 07d5 7007 |p | Jump_Nonzero 0x7dd 07d6 00d8 | | Load_Top At_Offset_0 07d7 e25c | \ | Load 0x1,0x5c 07d8 01d5 | | Execute Vector,Field_Reference 07d9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07da e011 | | Load 0x0,0x11 07db 027f | | Execute Discrete,Equal 07dc 6802 |h | Jump_Zero 0x7df 07dd 4801 |H | Short_Literal 0x1 07de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07df 00c8 | | Action Pop_Auxiliary_Range 07e0 3fe7 |? | Loop_Increasing 0x7c8 07e1 00ce | | Action Pop_Auxiliary 07e2 4800 |H | Short_Literal 0x0 07e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e4 0000 0000 | | .BLANK 0000[0x4] 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07eb | | .CONST 0x07eb ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0001 | | .CONST 0x0001 ; Number of locals 07eb BODY_07e8: 07eb INIT_07e8: 07eb 00cf | | Action Mark_Auxiliary 07ec e258 | X | Load 0x1,0x58 07ed 4801 |H | Short_Literal 0x1 07ee 0263 | c | Execute Discrete,Above_Bound 07ef 7019 |p | Jump_Nonzero 0x809 07f0 00d8 | | Load_Top At_Offset_0 07f1 e257 | W | Load 0x1,0x57 07f2 01d5 | | Execute Vector,Field_Reference 07f3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07f4 e01e | | Load 0x0,0x1e 07f5 027e | ~ | Execute Discrete,Not_Equal 07f6 6810 |h | Jump_Zero 0x807 07f7 00d8 | | Load_Top At_Offset_0 07f8 e257 | W | Load 0x1,0x57 07f9 01d5 | | Execute Vector,Field_Reference 07fa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07fb e011 | | Load 0x0,0x11 07fc 027f | | Execute Discrete,Equal 07fd 7007 |p | Jump_Nonzero 0x805 07fe 00d8 | | Load_Top At_Offset_0 07ff e257 | W | Load 0x1,0x57 0800 01d5 | | Execute Vector,Field_Reference 0801 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0802 e5ff | | Load 0x2,-0x1 0803 027f | | Execute Discrete,Equal 0804 6802 |h | Jump_Zero 0x807 0805 4801 |H | Short_Literal 0x1 0806 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0807 00c8 | | Action Pop_Auxiliary_Range 0808 3fe7 |? | Loop_Increasing 0x7f0 0809 00ce | | Action Pop_Auxiliary 080a 4800 |H | Short_Literal 0x0 080b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 080c 0000 0000 | | .BLANK 0000[0x4] 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 081a | | .CONST 0x081a ; Address of begin 0811 0836 | 6 | .CONST 0x0836 ; Address of exception handler 0812 0003 | | .CONST 0x0003 ; Number of locals 0813 INIT_0810: 0813 e22f | / | Load 0x1,0x2f 0814 0007 | | Action Break_Optional 0815 0093 0000 | | push_full_address 0x0 0817 6028 |`( | Indirect_Literal Discrete,0x840,{0x80000000, 0x00010000} 0818 0273 | s | Execute Discrete,Plus 0819 0007 | | Action Break_Optional 081a BODY_0810: 081a e5ff | | Load 0x2,-0x1 081b 8050 | P | Call 0x0,0x50 081c 005a | Z | Store_Top Discrete,At_Offset_2 081d 00d9 | | Load_Top At_Offset_1 081e e238 | 8 | Load 0x1,0x38 081f 01d5 | | Execute Vector,Field_Reference 0820 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0821 e5ff | | Load 0x2,-0x1 0822 027f | | Execute Discrete,Equal 0823 6810 |h | Jump_Zero 0x834 0824 4800 |H | Short_Literal 0x0 0825 00da | | Load_Top At_Offset_2 0826 e238 | 8 | Load 0x1,0x38 0827 01d5 | | Execute Vector,Field_Reference 0828 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0829 00d9 | | Load_Top At_Offset_1 082a e238 | 8 | Load 0x1,0x38 082b 01d5 | | Execute Vector,Field_Reference 082c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 082d e5ff | | Load 0x2,-0x1 082e 027f | | Execute Discrete,Equal 082f 6802 |h | Jump_Zero 0x832 0830 00d9 | | Load_Top At_Offset_1 0831 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0832 00d8 | | Load_Top At_Offset_0 0833 0257 | W | Execute Discrete,Raise 0834 00d8 | | Load_Top At_Offset_0 0835 0257 | W | Execute Discrete,Raise 0836 TRAP_0810: 0836 0007 | | Action Break_Optional 0837 e22f | / | Load 0x1,0x2f 0838 e5ff | | Load 0x2,-0x1 0839 4802 |H | Short_Literal 0x2 083a e26b | k | Load 0x1,0x6b 083b 170d | | Execute Task,Entry_Call,Field_Number 0xd 083c 005b | [ | Store_Top Discrete,At_Offset_3 083d 00da | | Load_Top At_Offset_2 083e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 083f 0000 | | .XXX[0x1] 0840 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0844 0000 0000 | | .BLANK 0000[0x4] 0848 ; -------------------------------------------------------------------------------------- 0848 ; SUBPROGRAM 0848 ; -------------------------------------------------------------------------------------- 0848 084d | M | .CONST 0x084d ; Address of begin 0849 0860 | ` | .CONST 0x0860 ; Address of exception handler 084a 0002 | | .CONST 0x0002 ; Number of locals 084b INIT_0848: 084b e22f | / | Load 0x1,0x2f 084c 0007 | | Action Break_Optional 084d BODY_0848: 084d 00db | | Load_Top At_Offset_3 084e 8050 | P | Call 0x0,0x50 084f 0059 | Y | Store_Top Discrete,At_Offset_1 0850 00d8 | | Load_Top At_Offset_0 0851 e238 | 8 | Load 0x1,0x38 0852 01d5 | | Execute Vector,Field_Reference 0853 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0854 e5ff | | Load 0x2,-0x1 0855 027f | | Execute Discrete,Equal 0856 6807 |h | Jump_Zero 0x85e 0857 4800 |H | Short_Literal 0x0 0858 00d9 | | Load_Top At_Offset_1 0859 e238 | 8 | Load 0x1,0x38 085a 01d5 | | Execute Vector,Field_Reference 085b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 085c 00d8 | | Load_Top At_Offset_0 085d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 085e 4800 |H | Short_Literal 0x0 085f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0860 TRAP_0848: 0860 0007 | | Action Break_Optional 0861 4800 |H | Short_Literal 0x0 0862 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0863 0000 0000 | | .BLANK 0000[0x5] 0868 ; -------------------------------------------------------------------------------------- 0868 ; SUBPROGRAM 0868 ; -------------------------------------------------------------------------------------- 0868 0876 | v | .CONST 0x0876 ; Address of begin 0869 0004 | | .CONST 0x0004 ; Address of exception handler 086a 0007 | | .CONST 0x0007 ; Number of locals 086b INIT_0868: 086b e006 | | Load 0x0,0x6 086c 0322 | " | Declare_Variable Record 086d 00d8 | | Load_Top At_Offset_0 086e 0322 | " | Declare_Variable Record 086f 00e3 | | Load_Encached Natural_Cache 0870 00e3 | | Load_Encached Natural_Cache 0871 e5ff | | Load 0x2,-0x1 0872 8051 | Q | Call 0x0,0x51 0873 00e3 | | Load_Encached Natural_Cache 0874 03f1 | | Declare_Variable Discrete,With_Value 0875 00e3 | | Load_Encached Natural_Cache 0876 BODY_0868: 0876 e5ff | | Load 0x2,-0x1 0877 e5fe | | Load 0x2,-0x2 0878 017f | | Execute Record,Equal 0879 6802 |h | Jump_Zero 0x87c 087a 4801 |H | Short_Literal 0x1 087b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 087c 4801 |H | Short_Literal 0x1 087d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 087e 4801 |H | Short_Literal 0x1 087f a404 | | Store_Unchecked 0x2,0x4 0880 e5fe | | Load 0x2,-0x2 0881 8051 | Q | Call 0x0,0x51 0882 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0883 00cf | | Action Mark_Auxiliary 0884 00db | | Load_Top At_Offset_3 0885 00da | | Load_Top At_Offset_2 0886 027d | } | Execute Discrete,Greater 0887 7024 |p$ | Jump_Nonzero 0x8ac 0888 e404 | | Load 0x2,0x4 0889 00db | | Load_Top At_Offset_3 088a 027d | } | Execute Discrete,Greater 088b 7020 |p | Jump_Nonzero 0x8ac 088c e404 | | Load 0x2,0x4 088d 00d8 | | Load_Top At_Offset_0 088e 00e4 | | Load_Encached Positive_Cache 088f 0260 | ` | Execute Discrete,In_Type 0890 7001 |p | Jump_Nonzero 0x892 0891 0801 | | Execute_Immediate Raise,0x1 0892 e5ff | | Load 0x2,-0x1 0893 8052 | R | Call 0x0,0x52 0894 e402 | | Load 0x2,0x2 0895 017d | } | Execute Record,Structure_Write 0896 00db | | Load_Top At_Offset_3 0897 00d8 | | Load_Top At_Offset_0 0898 00e4 | | Load_Encached Positive_Cache 0899 0260 | ` | Execute Discrete,In_Type 089a 7001 |p | Jump_Nonzero 0x89c 089b 0801 | | Execute_Immediate Raise,0x1 089c e5fe | | Load 0x2,-0x2 089d 8052 | R | Call 0x0,0x52 089e e403 | | Load 0x2,0x3 089f 017d | } | Execute Record,Structure_Write 08a0 00db | | Load_Top At_Offset_3 08a1 0a01 | | Execute_Immediate Plus,0x1 08a2 c405 | | Store 0x2,0x5 08a3 e402 | | Load 0x2,0x2 08a4 e403 | | Load 0x2,0x3 08a5 017f | | Execute Record,Equal 08a6 6803 |h | Jump_Zero 0x8aa 08a7 e404 | | Load 0x2,0x4 08a8 0a01 | | Execute_Immediate Plus,0x1 08a9 c404 | | Store 0x2,0x4 08aa 00c9 | | Action Pop_Auxiliary_Loop 08ab 7fd8 | | Jump 0x884 08ac 00ce | | Action Pop_Auxiliary 08ad 00db | | Load_Top At_Offset_3 08ae 00da | | Load_Top At_Offset_2 08af 027d | } | Execute Discrete,Greater 08b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08b1 0000 0000 | | .BLANK 0000[0x7] 08b8 ; -------------------------------------------------------------------------------------- 08b8 ; SUBPROGRAM 08b8 ; -------------------------------------------------------------------------------------- 08b8 08c1 | | .CONST 0x08c1 ; Address of begin 08b9 0004 | | .CONST 0x0004 ; Address of exception handler 08ba 0004 | | .CONST 0x0004 ; Number of locals 08bb INIT_08b8: 08bb 00e3 | | Load_Encached Natural_Cache 08bc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 08bd 00e3 | | Load_Encached Natural_Cache 08be 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 08bf 029f 0e1b | | Declare_Subprogram INIT_0e18,For_Call 08c1 BODY_08b8: 08c1 e01e | | Load 0x0,0x1e 08c2 a5fb | | Store_Unchecked 0x2,-0x5 08c3 e01e | | Load 0x0,0x1e 08c4 a5f9 | | Store_Unchecked 0x2,-0x7 08c5 00cf | | Action Mark_Auxiliary 08c6 e268 | h | Load 0x1,0x68 08c7 4801 |H | Short_Literal 0x1 08c8 0263 | c | Execute Discrete,Above_Bound 08c9 7003 |p | Jump_Nonzero 0x8cd 08ca 8404 | | Call 0x2,0x4 08cb 00c8 | | Action Pop_Auxiliary_Range 08cc 3ffd |? | Loop_Increasing 0x8ca 08cd 00ce | | Action Pop_Auxiliary 08ce 00da | | Load_Top At_Offset_2 08cf 680c |h | Jump_Zero 0x8dc 08d0 00da | | Load_Top At_Offset_2 08d1 e267 | g | Load 0x1,0x67 08d2 01d5 | | Execute Vector,Field_Reference 08d3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 08d4 0f04 | | Execute_Immediate Equal,0x4 08d5 6806 |h | Jump_Zero 0x8dc 08d6 00da | | Load_Top At_Offset_2 08d7 e267 | g | Load 0x1,0x67 08d8 01d5 | | Execute Vector,Field_Reference 08d9 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 08da a5fa | | Store_Unchecked 0x2,-0x6 08db 4505 |E | Exit_Suprogram New_Top_Offset 0x5 08dc e01e | | Load 0x0,0x1e 08dd a5fa | | Store_Unchecked 0x2,-0x6 08de 4505 |E | Exit_Suprogram New_Top_Offset 0x5 08df 0000 | | .XXX[0x1] 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; SUBPROGRAM 08e0 ; -------------------------------------------------------------------------------------- 08e0 08e3 | | .CONST 0x08e3 ; Address of begin 08e1 0004 | | .CONST 0x0004 ; Address of exception handler 08e2 0001 | | .CONST 0x0001 ; Number of locals 08e3 BODY_08e0: 08e3 INIT_08e0: 08e3 00db | | Load_Top At_Offset_3 08e4 7003 |p | Jump_Nonzero 0x8e8 08e5 00da | | Load_Top At_Offset_2 08e6 8053 | S | Call 0x0,0x53 08e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08e8 4800 |H | Short_Literal 0x0 08e9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08ea 0000 0000 | | .BLANK 0000[0x6] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 00da | | Load_Top At_Offset_2 08f4 6003 |` | Indirect_Literal Discrete,0x8f8,{0x00000000, 0x7fffffff} 08f5 8054 | T | Call 0x0,0x54 08f6 8055 | U | Call 0x0,0x55 08f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08f8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 08fc 0000 0000 | | .BLANK 0000[0x4] 0900 ; -------------------------------------------------------------------------------------- 0900 ; SUBPROGRAM 0900 ; -------------------------------------------------------------------------------------- 0900 090a | | .CONST 0x090a ; Address of begin 0901 0951 | Q | .CONST 0x0951 ; Address of exception handler 0902 0004 | | .CONST 0x0004 ; Number of locals 0903 INIT_0900: 0903 e039 | 9 | Load 0x0,0x39 0904 0322 | " | Declare_Variable Record 0905 00d8 | | Load_Top At_Offset_0 0906 1c00 | | Execute_Immediate Run_Utility,0x0 0907 e20d | | Load 0x1,0xd 0908 0337 | 7 | Declare_Variable Array 0909 00e3 | | Load_Encached Natural_Cache 090a BODY_0900: 090a e23c | < | Load 0x1,0x3c 090b 0a01 | | Execute_Immediate Plus,0x1 090c a23c | < | Store_Unchecked 0x1,0x3c 090d 00da | | Load_Top At_Offset_2 090e e5fd | | Load 0x2,-0x3 090f 803c | < | Call 0x0,0x3c 0910 00d1 | | Pop_Control Pop_Count_1 0911 e5f7 | | Load 0x2,-0x9 0912 e5fb | | Load 0x2,-0x5 0913 8275 | u | Call 0x1,0x75 0914 6807 |h | Jump_Zero 0x91c 0915 e5fd | | Load 0x2,-0x3 0916 e5fc | | Load 0x2,-0x4 0917 027f | | Execute Discrete,Equal 0918 6803 |h | Jump_Zero 0x91c 0919 00da | | Load_Top At_Offset_2 091a 8276 | v | Call 0x1,0x76 091b 00d1 | | Pop_Control Pop_Count_1 091c 00da | | Load_Top At_Offset_2 091d e5fe | | Load 0x2,-0x2 091e 803d | = | Call 0x0,0x3d 091f 00d1 | | Pop_Control Pop_Count_1 0920 00da | | Load_Top At_Offset_2 0921 8056 | V | Call 0x0,0x56 0922 00d1 | | Pop_Control Pop_Count_1 0923 00da | | Load_Top At_Offset_2 0924 8057 | W | Call 0x0,0x57 0925 00d1 | | Pop_Control Pop_Count_1 0926 e5fa | | Load 0x2,-0x6 0927 e238 | 8 | Load 0x1,0x38 0928 01d5 | | Execute Vector,Field_Reference 0929 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 092a e5ff | | Load 0x2,-0x1 092b 8058 | X | Call 0x0,0x58 092c 4800 |H | Short_Literal 0x0 092d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 092e e5f9 | | Load 0x2,-0x7 092f e01e | | Load 0x0,0x1e 0930 027e | ~ | Execute Discrete,Not_Equal 0931 6807 |h | Jump_Zero 0x939 0932 00d8 | | Load_Top At_Offset_0 0933 0a01 | | Execute_Immediate Plus,0x1 0934 0059 | Y | Store_Top Discrete,At_Offset_1 0935 e5f9 | | Load 0x2,-0x7 0936 00d9 | | Load_Top At_Offset_1 0937 00db | | Load_Top At_Offset_3 0938 01d6 | | Execute Vector,Field_Write 0939 e5f8 | | Load 0x2,-0x8 093a e01e | | Load 0x0,0x1e 093b 027e | ~ | Execute Discrete,Not_Equal 093c 6807 |h | Jump_Zero 0x944 093d 00d8 | | Load_Top At_Offset_0 093e 0a01 | | Execute_Immediate Plus,0x1 093f 0059 | Y | Store_Top Discrete,At_Offset_1 0940 e5f8 | | Load 0x2,-0x8 0941 00d9 | | Load_Top At_Offset_1 0942 00db | | Load_Top At_Offset_3 0943 01d6 | | Execute Vector,Field_Write 0944 00da | | Load_Top At_Offset_2 0945 00d9 | | Load_Top At_Offset_1 0946 00d8 | | Load_Top At_Offset_0 0947 e20e | | Load 0x1,0xe 0948 0260 | ` | Execute Discrete,In_Type 0949 7001 |p | Jump_Nonzero 0x94b 094a 0801 | | Execute_Immediate Raise,0x1 094b 00db | | Load_Top At_Offset_3 094c e5fb | | Load 0x2,-0x5 094d 8059 | Y | Call 0x0,0x59 094e e5ff | | Load 0x2,-0x1 094f 805a | Z | Call 0x0,0x5a 0950 450a |E | Exit_Suprogram New_Top_Offset 0xa 0951 TRAP_0900: 0951 0007 | | Action Break_Optional 0952 e23e | > | Load 0x1,0x3e 0953 6806 |h | Jump_Zero 0x95a 0954 0092 113a | :| Action Push_String_Extended,0x113a ; "Process_Action: exception: " 0956 e03a | : | Load 0x0,0x3a 0957 180d | | Execute Package,Field_Execute,Field_Number 0xd 0958 01cc | | Execute Vector,Catenate 0959 803b | ; | Call 0x0,0x3b 095a 450a |E | Exit_Suprogram New_Top_Offset 0xa 095b 0000 0000 | | .BLANK 0000[0x5] 0960 ; -------------------------------------------------------------------------------------- 0960 ; SUBPROGRAM 0960 ; -------------------------------------------------------------------------------------- 0960 0987 | | .CONST 0x0987 ; Address of begin 0961 0a91 | | .CONST 0x0a91 ; Address of exception handler 0962 0010 | | .CONST 0x0010 ; Number of locals 0963 INIT_0960: 0963 e20d | | Load 0x1,0xd 0964 0337 | 7 | Declare_Variable Array 0965 e20e | | Load 0x1,0xe 0966 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0967 00e2 | | Load_Encached Integer_Cache 0968 e039 | 9 | Load 0x0,0x39 0969 0322 | " | Declare_Variable Record 096a 00d8 | | Load_Top At_Offset_0 096b 1c00 | | Execute_Immediate Run_Utility,0x0 096c 00e1 | | Load_Encached Boolean_Cache 096d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 096e 00e2 | | Load_Encached Integer_Cache 096f 029f 0e6b | k| Declare_Subprogram INIT_0e68,For_Call 0971 029f 0e93 | | Declare_Subprogram INIT_0e90,For_Call 0973 029f 0edb | | Declare_Subprogram INIT_0ed8,For_Call 0975 a013 | | Store_Unchecked 0x0,0x13 0976 00c6 | | Action Check_Subprogram_Elaborated 0977 00e2 | | Load_Encached Integer_Cache 0978 480a |H | Short_Literal 0xa 0979 4802 |H | Short_Literal 0x2 097a 0099 | | Action Reference_Dynamic 097b 4800 |H | Short_Literal 0x0 097c 0093 0000 | | push_full_address 0x0 097e 6115 |a | Indirect_Literal Discrete,0xa94,{0x80000000, 0x00060000} 097f 0273 | s | Execute Discrete,Plus 0980 e014 | | Load 0x0,0x14 0981 0273 | s | Execute Discrete,Plus 0982 e05b | [ | Load 0x0,0x5b 0983 0273 | s | Execute Discrete,Plus 0984 480f |H | Short_Literal 0xf 0985 029f 0ef3 | | Declare_Subprogram INIT_0ef0,For_Call 0987 BODY_0960: 0987 e5fd | | Load 0x2,-0x3 0988 8408 | | Call 0x2,0x8 0989 e405 | | Load 0x2,0x5 098a e5fc | | Load 0x2,-0x4 098b 803c | < | Call 0x0,0x3c 098c 00d1 | | Pop_Control Pop_Count_1 098d e405 | | Load 0x2,0x5 098e e5fe | | Load 0x2,-0x2 098f 803d | = | Call 0x0,0x3d 0990 00d1 | | Pop_Control Pop_Count_1 0991 e405 | | Load 0x2,0x5 0992 8056 | V | Call 0x0,0x56 0993 00d1 | | Pop_Control Pop_Count_1 0994 e405 | | Load 0x2,0x5 0995 8057 | W | Call 0x0,0x57 0996 00d1 | | Pop_Control Pop_Count_1 0997 00cf | | Action Mark_Auxiliary 0998 e24f | O | Load 0x1,0x4f 0999 4801 |H | Short_Literal 0x1 099a 0263 | c | Execute Discrete,Above_Bound 099b 704a |pJ | Jump_Nonzero 0x9e6 099c 00d8 | | Load_Top At_Offset_0 099d e24c | L | Load 0x1,0x4c 099e 01d7 | | Execute Vector,Field_Read 099f e5fc | | Load 0x2,-0x4 09a0 027f | | Execute Discrete,Equal 09a1 6842 |hB | Jump_Zero 0x9e4 09a2 00d8 | | Load_Top At_Offset_0 09a3 e24e | N | Load 0x1,0x4e 09a4 01d5 | | Execute Vector,Field_Reference 09a5 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 09a6 e05c | \ | Load 0x0,0x5c 09a7 017f | | Execute Record,Equal 09a8 7008 |p | Jump_Nonzero 0x9b1 09a9 e405 | | Load 0x2,0x5 09aa 805d | ] | Call 0x0,0x5d 09ab 00d9 | | Load_Top At_Offset_1 09ac e24e | N | Load 0x1,0x4e 09ad 01d5 | | Execute Vector,Field_Reference 09ae 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 09af 8273 | s | Call 0x1,0x73 09b0 6833 |h3 | Jump_Zero 0x9e4 09b1 e5fd | | Load 0x2,-0x3 09b2 00d9 | | Load_Top At_Offset_1 09b3 e24e | N | Load 0x1,0x4e 09b4 01d5 | | Execute Vector,Field_Reference 09b5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09b6 027f | | Execute Discrete,Equal 09b7 6806 |h | Jump_Zero 0x9be 09b8 00d8 | | Load_Top At_Offset_0 09b9 e24e | N | Load 0x1,0x4e 09ba 01d5 | | Execute Vector,Field_Reference 09bb 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09bc 8408 | | Call 0x2,0x8 09bd 7826 |x& | Jump 0x9e4 09be e406 | | Load 0x2,0x6 09bf 7004 |p | Jump_Nonzero 0x9c4 09c0 e5fd | | Load 0x2,-0x3 09c1 e01e | | Load 0x0,0x1e 09c2 027f | | Execute Discrete,Equal 09c3 6820 |h | Jump_Zero 0x9e4 09c4 00d8 | | Load_Top At_Offset_0 09c5 e24e | N | Load 0x1,0x4e 09c6 01d5 | | Execute Vector,Field_Reference 09c7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09c8 0e01 | | Execute_Immediate Not_Equal,0x1 09c9 7005 |p | Jump_Nonzero 0x9cf 09ca 00d8 | | Load_Top At_Offset_0 09cb e24e | N | Load 0x1,0x4e 09cc 01d5 | | Execute Vector,Field_Reference 09cd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 09ce 6810 |h | Jump_Zero 0x9df 09cf 00e2 | | Load_Encached Integer_Cache 09d0 00d9 | | Load_Top At_Offset_1 09d1 4802 |H | Short_Literal 0x2 09d2 e26b | k | Load 0x1,0x6b 09d3 171e | | Execute Task,Entry_Call,Field_Number 0x1e 09d4 c407 | | Store 0x2,0x7 09d5 e407 | | Load 0x2,0x7 09d6 e01e | | Load 0x0,0x1e 09d7 027e | ~ | Execute Discrete,Not_Equal 09d8 680b |h | Jump_Zero 0x9e4 09d9 00d8 | | Load_Top At_Offset_0 09da e24e | N | Load 0x1,0x4e 09db 01d5 | | Execute Vector,Field_Reference 09dc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09dd 8408 | | Call 0x2,0x8 09de 7805 |x | Jump 0x9e4 09df 00d8 | | Load_Top At_Offset_0 09e0 e24e | N | Load 0x1,0x4e 09e1 01d5 | | Execute Vector,Field_Reference 09e2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09e3 8408 | | Call 0x2,0x8 09e4 00c8 | | Action Pop_Auxiliary_Range 09e5 3fb6 |? | Loop_Increasing 0x99c 09e6 00c9 | | Action Pop_Auxiliary_Loop 09e7 e253 | S | Load 0x1,0x53 09e8 4801 |H | Short_Literal 0x1 09e9 0263 | c | Execute Discrete,Above_Bound 09ea 7051 |pQ | Jump_Nonzero 0xa3c 09eb 00d8 | | Load_Top At_Offset_0 09ec e252 | R | Load 0x1,0x52 09ed 01d5 | | Execute Vector,Field_Reference 09ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09ef e5fc | | Load 0x2,-0x4 09f0 027f | | Execute Discrete,Equal 09f1 6848 |hH | Jump_Zero 0xa3a 09f2 e5ff | | Load 0x2,-0x1 09f3 00d9 | | Load_Top At_Offset_1 09f4 e252 | R | Load 0x1,0x52 09f5 01d5 | | Execute Vector,Field_Reference 09f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09f7 027f | | Execute Discrete,Equal 09f8 6841 |hA | Jump_Zero 0xa3a 09f9 00d8 | | Load_Top At_Offset_0 09fa e252 | R | Load 0x1,0x52 09fb 01d5 | | Execute Vector,Field_Reference 09fc 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 09fd e05c | \ | Load 0x0,0x5c 09fe 017f | | Execute Record,Equal 09ff 7008 |p | Jump_Nonzero 0xa08 0a00 e405 | | Load 0x2,0x5 0a01 805d | ] | Call 0x0,0x5d 0a02 00d9 | | Load_Top At_Offset_1 0a03 e252 | R | Load 0x1,0x52 0a04 01d5 | | Execute Vector,Field_Reference 0a05 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0a06 8273 | s | Call 0x1,0x73 0a07 6832 |h2 | Jump_Zero 0xa3a 0a08 e406 | | Load 0x2,0x6 0a09 7007 |p | Jump_Nonzero 0xa11 0a0a 00d8 | | Load_Top At_Offset_0 0a0b e252 | R | Load 0x1,0x52 0a0c 01d5 | | Execute Vector,Field_Reference 0a0d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0a0e e5fd | | Load 0x2,-0x3 0a0f 027f | | Execute Discrete,Equal 0a10 6829 |h) | Jump_Zero 0xa3a 0a11 00d8 | | Load_Top At_Offset_0 0a12 e252 | R | Load 0x1,0x52 0a13 01d5 | | Execute Vector,Field_Reference 0a14 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a15 0f01 | | Execute_Immediate Equal,0x1 0a16 681a |h | Jump_Zero 0xa31 0a17 00d8 | | Load_Top At_Offset_0 0a18 e252 | R | Load 0x1,0x52 0a19 01d5 | | Execute Vector,Field_Reference 0a1a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0a1b a404 | | Store_Unchecked 0x2,0x4 0a1c 00d8 | | Load_Top At_Offset_0 0a1d e252 | R | Load 0x1,0x52 0a1e 01d5 | | Execute Vector,Field_Reference 0a1f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0a20 6805 |h | Jump_Zero 0xa26 0a21 e404 | | Load 0x2,0x4 0a22 4801 |H | Short_Literal 0x1 0a23 e26b | k | Load 0x1,0x6b 0a24 171c | | Execute Task,Entry_Call,Field_Number 0x1c 0a25 7808 |x | Jump 0xa2e 0a26 00d8 | | Load_Top At_Offset_0 0a27 e252 | R | Load 0x1,0x52 0a28 01d5 | | Execute Vector,Field_Reference 0a29 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a2a 00d9 | | Load_Top At_Offset_1 0a2b e252 | R | Load 0x1,0x52 0a2c 01d5 | | Execute Vector,Field_Reference 0a2d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a2e e404 | | Load 0x2,0x4 0a2f 8408 | | Call 0x2,0x8 0a30 7809 |x | Jump 0xa3a 0a31 00d8 | | Load_Top At_Offset_0 0a32 e252 | R | Load 0x1,0x52 0a33 01d5 | | Execute Vector,Field_Reference 0a34 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a35 0aff | | Execute_Immediate Plus,-0x1 0a36 00d9 | | Load_Top At_Offset_1 0a37 e252 | R | Load 0x1,0x52 0a38 01d5 | | Execute Vector,Field_Reference 0a39 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a3a 00c8 | | Action Pop_Auxiliary_Range 0a3b 3faf |? | Loop_Increasing 0x9eb 0a3c 00ce | | Action Pop_Auxiliary 0a3d e240 | @ | Load 0x1,0x40 0a3e 6805 |h | Jump_Zero 0xa44 0a3f e5fc | | Load 0x2,-0x4 0a40 805e | ^ | Call 0x0,0x5e 0a41 6802 |h | Jump_Zero 0xa44 0a42 e241 | A | Load 0x1,0x41 0a43 8408 | | Call 0x2,0x8 0a44 e242 | B | Load 0x1,0x42 0a45 e5ff | | Load 0x2,-0x1 0a46 027f | | Execute Discrete,Equal 0a47 681e |h | Jump_Zero 0xa66 0a48 e5fe | | Load 0x2,-0x2 0a49 e004 | | Load 0x0,0x4 0a4a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0a4b e244 | D | Load 0x1,0x44 0a4c 027c | | | Execute Discrete,Less 0a4d 6818 |h | Jump_Zero 0xa66 0a4e e5fc | | Load 0x2,-0x4 0a4f 805e | ^ | Call 0x0,0x5e 0a50 6815 |h | Jump_Zero 0xa66 0a51 e5fd | | Load 0x2,-0x3 0a52 e245 | E | Load 0x1,0x45 0a53 027f | | Execute Discrete,Equal 0a54 7002 |p | Jump_Nonzero 0xa57 0a55 e406 | | Load 0x2,0x6 0a56 680f |h | Jump_Zero 0xa66 0a57 e243 | C | Load 0x1,0x43 0a58 0f01 | | Execute_Immediate Equal,0x1 0a59 6809 |h | Jump_Zero 0xa63 0a5a e011 | | Load 0x0,0x11 0a5b a242 | B | Store_Unchecked 0x1,0x42 0a5c e245 | E | Load 0x1,0x45 0a5d 8408 | | Call 0x2,0x8 0a5e e5ff | | Load 0x2,-0x1 0a5f 4801 |H | Short_Literal 0x1 0a60 e26b | k | Load 0x1,0x6b 0a61 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0a62 7803 |x | Jump 0xa66 0a63 e243 | C | Load 0x1,0x43 0a64 0aff | | Execute_Immediate Plus,-0x1 0a65 c243 | C | Store 0x1,0x43 0a66 e5ff | | Load 0x2,-0x1 0a67 e246 | F | Load 0x1,0x46 0a68 027f | | Execute Discrete,Equal 0a69 6815 |h | Jump_Zero 0xa7f 0a6a e5fd | | Load 0x2,-0x3 0a6b e248 | H | Load 0x1,0x48 0a6c 027f | | Execute Discrete,Equal 0a6d 7002 |p | Jump_Nonzero 0xa70 0a6e e406 | | Load 0x2,0x6 0a6f 680f |h | Jump_Zero 0xa7f 0a70 e247 | G | Load 0x1,0x47 0a71 0f01 | | Execute_Immediate Equal,0x1 0a72 6809 |h | Jump_Zero 0xa7c 0a73 e011 | | Load 0x0,0x11 0a74 a246 | F | Store_Unchecked 0x1,0x46 0a75 e248 | H | Load 0x1,0x48 0a76 8408 | | Call 0x2,0x8 0a77 e5ff | | Load 0x2,-0x1 0a78 4801 |H | Short_Literal 0x1 0a79 e26b | k | Load 0x1,0x6b 0a7a 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0a7b 7803 |x | Jump 0xa7f 0a7c e247 | G | Load 0x1,0x47 0a7d 0aff | | Execute_Immediate Plus,-0x1 0a7e c247 | G | Store 0x1,0x47 0a7f e024 | $ | Load 0x0,0x24 0a80 e5ff | | Load 0x2,-0x1 0a81 e40b | | Load 0x2,0xb 0a82 480c |H | Short_Literal 0xc 0a83 4802 |H | Short_Literal 0x2 0a84 0099 | | Action Reference_Dynamic 0a85 e40d | | Load 0x2,0xd 0a86 480e |H | Short_Literal 0xe 0a87 4802 |H | Short_Literal 0x2 0a88 0099 | | Action Reference_Dynamic 0a89 8013 | | Call 0x0,0x13 0a8a c024 | $ | Store 0x0,0x24 0a8b e405 | | Load 0x2,0x5 0a8c e403 | | Load 0x2,0x3 0a8d e402 | | Load 0x2,0x2 0a8e e5ff | | Load 0x2,-0x1 0a8f 805f | _ | Call 0x0,0x5f 0a90 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0a91 TRAP_0960: 0a91 0007 | | Action Break_Optional 0a92 8410 | | Call 0x2,0x10 0a93 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0a94 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 0a98 ; -------------------------------------------------------------------------------------- 0a98 ; SUBPROGRAM 0a98 ; -------------------------------------------------------------------------------------- 0a98 0a9e | | .CONST 0x0a9e ; Address of begin 0a99 0aaa | | .CONST 0x0aaa ; Address of exception handler 0a9a 0003 | | .CONST 0x0003 ; Number of locals 0a9b INIT_0a98: 0a9b 00e1 | | Load_Encached Boolean_Cache 0a9c 029f 0f13 | | Declare_Subprogram INIT_0f10,For_Call 0a9e BODY_0a98: 0a9e 00e1 | | Load_Encached Boolean_Cache 0a9f e5fd | | Load 0x2,-0x3 0aa0 e5fe | | Load 0x2,-0x2 0aa1 e5ff | | Load 0x2,-0x1 0aa2 4804 |H | Short_Literal 0x4 0aa3 e270 | p | Load 0x1,0x70 0aa4 170d | | Execute Task,Entry_Call,Field_Number 0xd 0aa5 005a | Z | Store_Top Discrete,At_Offset_2 0aa6 00d9 | | Load_Top At_Offset_1 0aa7 6801 |h | Jump_Zero 0xaa9 0aa8 8403 | | Call 0x2,0x3 0aa9 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0aaa TRAP_0a98: 0aaa 0007 | | Action Break_Optional 0aab 0092 113b | ;| Action Push_String_Extended,0x113b ; "Creation_Register:" 0aad e03a | : | Load 0x0,0x3a 0aae 180d | | Execute Package,Field_Execute,Field_Number 0xd 0aaf 01cc | | Execute Vector,Catenate 0ab0 803b | ; | Call 0x0,0x3b 0ab1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0ab2 0000 0000 | | .BLANK 0000[0x6] 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 ; SUBPROGRAM 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 0abd | | .CONST 0x0abd ; Address of begin 0ab9 0004 | | .CONST 0x0004 ; Address of exception handler 0aba 0002 | | .CONST 0x0002 ; Number of locals 0abb INIT_0ab8: 0abb e004 | | Load 0x0,0x4 0abc 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0abd BODY_0ab8: 0abd e004 | | Load 0x0,0x4 0abe 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51 0abf 00e3 | | Load_Encached Natural_Cache 0ac0 e004 | | Load 0x0,0x4 0ac1 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0ac2 e004 | | Load 0x0,0x4 0ac3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ac4 e004 | | Load 0x0,0x4 0ac5 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0ac6 e5ff | | Load 0x2,-0x1 0ac7 0a02 | | Execute_Immediate Plus,0x2 0ac8 00d8 | | Load_Top At_Offset_0 0ac9 00e3 | | Load_Encached Natural_Cache 0aca 0260 | ` | Execute Discrete,In_Type 0acb 7001 |p | Jump_Nonzero 0xacd 0acc 0801 | | Execute_Immediate Raise,0x1 0acd e01c | | Load 0x0,0x1c 0ace 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0acf e004 | | Load 0x0,0x4 0ad0 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0ad1 e01c | | Load 0x0,0x1c 0ad2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0ad3 e004 | | Load 0x0,0x4 0ad4 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0ad5 c402 | | Store 0x2,0x2 0ad6 c235 | 5 | Store 0x1,0x35 0ad7 c232 | 2 | Store 0x1,0x32 0ad8 c233 | 3 | Store 0x1,0x33 0ad9 c234 | 4 | Store 0x1,0x34 0ada 00d8 | | Load_Top At_Offset_0 0adb e004 | | Load 0x0,0x4 0adc 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0add 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ade 0000 0000 | | .XXX[0x2] 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 ; SUBPROGRAM 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 0ae7 | | .CONST 0x0ae7 ; Address of begin 0ae1 0004 | | .CONST 0x0004 ; Address of exception handler 0ae2 0002 | | .CONST 0x0002 ; Number of locals 0ae3 INIT_0ae0: 0ae3 e039 | 9 | Load 0x0,0x39 0ae4 0322 | " | Declare_Variable Record 0ae5 00d8 | | Load_Top At_Offset_0 0ae6 1c00 | | Execute_Immediate Run_Utility,0x0 0ae7 BODY_0ae0: 0ae7 00d8 | | Load_Top At_Offset_0 0ae8 e5fe | | Load 0x2,-0x2 0ae9 803c | < | Call 0x0,0x3c 0aea 00d1 | | Pop_Control Pop_Count_1 0aeb 00d8 | | Load_Top At_Offset_0 0aec 8056 | V | Call 0x0,0x56 0aed 00d1 | | Pop_Control Pop_Count_1 0aee 00d8 | | Load_Top At_Offset_0 0aef e5ff | | Load 0x2,-0x1 0af0 0a01 | | Execute_Immediate Plus,0x1 0af1 00d8 | | Load_Top At_Offset_0 0af2 00e3 | | Load_Encached Natural_Cache 0af3 0260 | ` | Execute Discrete,In_Type 0af4 7001 |p | Jump_Nonzero 0xaf6 0af5 0801 | | Execute_Immediate Raise,0x1 0af6 827a | z | Call 0x1,0x7a 0af7 803d | = | Call 0x0,0x3d 0af8 00d1 | | Pop_Control Pop_Count_1 0af9 00d8 | | Load_Top At_Offset_0 0afa 8057 | W | Call 0x0,0x57 0afb 00d1 | | Pop_Control Pop_Count_1 0afc 00d8 | | Load_Top At_Offset_0 0afd 805d | ] | Call 0x0,0x5d 0afe e5fd | | Load 0x2,-0x3 0aff 017d | } | Execute Record,Structure_Write 0b00 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b01 0000 0000 | | .BLANK 0000[0x7] 0b08 ; -------------------------------------------------------------------------------------- 0b08 ; SUBPROGRAM 0b08 ; -------------------------------------------------------------------------------------- 0b08 0b0d | | .CONST 0x0b0d ; Address of begin 0b09 0004 | | .CONST 0x0004 ; Address of exception handler 0b0a 0002 | | .CONST 0x0002 ; Number of locals 0b0b INIT_0b08: 0b0b 029f 0f33 | 3| Declare_Subprogram INIT_0f30,For_Call 0b0d BODY_0b08: 0b0d e5fe | | Load 0x2,-0x2 0b0e 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0b0f 6805 |h | Jump_Zero 0xb15 0b10 e5fd | | Load 0x2,-0x3 0b11 805e | ^ | Call 0x0,0x5e 0b12 6802 |h | Jump_Zero 0xb15 0b13 4801 |H | Short_Literal 0x1 0b14 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b15 e5fe | | Load 0x2,-0x2 0b16 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0b17 6812 |h | Jump_Zero 0xb2a 0b18 e5fe | | Load 0x2,-0x2 0b19 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0b1a 601d |` | Indirect_Literal Discrete,0xb38,{0x00000000, 0x000fffff} 0b1b 027e | ~ | Execute Discrete,Not_Equal 0b1c 7008 |p | Jump_Nonzero 0xb25 0b1d 4803 |H | Short_Literal 0x3 0b1e 827a | z | Call 0x1,0x7a 0b1f e004 | | Load 0x0,0x4 0b20 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0b21 e5fe | | Load 0x2,-0x2 0b22 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0b23 027c | | | Execute Discrete,Less 0b24 6805 |h | Jump_Zero 0xb2a 0b25 e5fd | | Load 0x2,-0x3 0b26 805e | ^ | Call 0x0,0x5e 0b27 6802 |h | Jump_Zero 0xb2a 0b28 4801 |H | Short_Literal 0x1 0b29 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b2a e5fe | | Load 0x2,-0x2 0b2b 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0b2c 6809 |h | Jump_Zero 0xb36 0b2d 00cf | | Action Mark_Auxiliary 0b2e e258 | X | Load 0x1,0x58 0b2f 4801 |H | Short_Literal 0x1 0b30 0263 | c | Execute Discrete,Above_Bound 0b31 7003 |p | Jump_Nonzero 0xb35 0b32 8402 | | Call 0x2,0x2 0b33 00c8 | | Action Pop_Auxiliary_Range 0b34 3ffd |? | Loop_Increasing 0xb32 0b35 00ce | | Action Pop_Auxiliary 0b36 4800 |H | Short_Literal 0x0 0b37 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b38 0000 0000 | | .LITERAL {0x00000000, 0x000fffff} 0b3c 0000 0000 | | .BLANK 0000[0x4] 0b40 ; -------------------------------------------------------------------------------------- 0b40 ; SUBPROGRAM 0b40 ; -------------------------------------------------------------------------------------- 0b40 0b43 | C | .CONST 0x0b43 ; Address of begin 0b41 0004 | | .CONST 0x0004 ; Address of exception handler 0b42 0001 | | .CONST 0x0001 ; Number of locals 0b43 BODY_0b40: 0b43 INIT_0b40: 0b43 e5fd | | Load 0x2,-0x3 0b44 e004 | | Load 0x0,0x4 0b45 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b46 00d9 | | Load_Top At_Offset_1 0b47 00d0 | | Action Swap_Control 0b48 0260 | ` | Execute Discrete,In_Type 0b49 7001 |p | Jump_Nonzero 0xb4b 0b4a 0801 | | Execute_Immediate Raise,0x1 0b4b e5fe | | Load 0x2,-0x2 0b4c e5ff | | Load 0x2,-0x1 0b4d e025 | % | Load 0x0,0x25 0b4e 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0b4f 00d9 | | Load_Top At_Offset_1 0b50 00d0 | | Action Swap_Control 0b51 0260 | ` | Execute Discrete,In_Type 0b52 7001 |p | Jump_Nonzero 0xb54 0b53 0801 | | Execute_Immediate Raise,0x1 0b54 827c | | | Call 0x1,0x7c 0b55 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b56 0000 0000 | | .XXX[0x2] 0b58 ; -------------------------------------------------------------------------------------- 0b58 ; SUBPROGRAM 0b58 ; -------------------------------------------------------------------------------------- 0b58 0b5e | ^ | .CONST 0x0b5e ; Address of begin 0b59 0004 | | .CONST 0x0004 ; Address of exception handler 0b5a 0002 | | .CONST 0x0002 ; Number of locals 0b5b INIT_0b58: 0b5b e004 | | Load 0x0,0x4 0b5c 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a 0b5d 0322 | " | Declare_Variable Record 0b5e BODY_0b58: 0b5e 00db | | Load_Top At_Offset_3 0b5f e004 | | Load 0x0,0x4 0b60 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0b61 0a01 | | Execute_Immediate Plus,0x1 0b62 e004 | | Load 0x0,0x4 0b63 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0b64 00d9 | | Load_Top At_Offset_1 0b65 00d0 | | Action Swap_Control 0b66 0260 | ` | Execute Discrete,In_Type 0b67 7001 |p | Jump_Nonzero 0xb69 0b68 0801 | | Execute_Immediate Raise,0x1 0b69 e5ff | | Load 0x2,-0x1 0b6a e004 | | Load 0x0,0x4 0b6b 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0b6c e01c | | Load 0x0,0x1c 0b6d 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0b6e e004 | | Load 0x0,0x4 0b6f 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 0b70 00d9 | | Load_Top At_Offset_1 0b71 017d | } | Execute Record,Structure_Write 0b72 4822 |H" | Short_Literal 0x22 0b73 00d9 | | Load_Top At_Offset_1 0b74 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b75 e01c | | Load 0x0,0x1c 0b76 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0b77 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b78 ; -------------------------------------------------------------------------------------- 0b78 ; SUBPROGRAM 0b78 ; -------------------------------------------------------------------------------------- 0b78 0b7b | { | .CONST 0x0b7b ; Address of begin 0b79 0b80 | | .CONST 0x0b80 ; Address of exception handler 0b7a 0001 | | .CONST 0x0001 ; Number of locals 0b7b BODY_0b78: 0b7b INIT_0b78: 0b7b e403 | | Load 0x2,0x3 0b7c 00d8 | | Load_Top At_Offset_0 0b7d e004 | | Load 0x0,0x4 0b7e 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0b7f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b80 TRAP_0b78: 0b80 0007 | | Action Break_Optional 0b81 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b82 0000 0000 | | .BLANK 0000[0x6] 0b88 ; -------------------------------------------------------------------------------------- 0b88 ; SUBPROGRAM 0b88 ; -------------------------------------------------------------------------------------- 0b88 0b8b | | .CONST 0x0b8b ; Address of begin 0b89 0004 | | .CONST 0x0004 ; Address of exception handler 0b8a 0001 | | .CONST 0x0001 ; Number of locals 0b8b BODY_0b88: 0b8b INIT_0b88: 0b8b 00da | | Load_Top At_Offset_2 0b8c 00d8 | | Load_Top At_Offset_0 0b8d 00e2 | | Load_Encached Integer_Cache 0b8e 0260 | ` | Execute Discrete,In_Type 0b8f 7001 |p | Jump_Nonzero 0xb91 0b90 0801 | | Execute_Immediate Raise,0x1 0b91 00e0 | | Load_Encached Standard_Cache 0b92 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0b93 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b94 0000 0000 | | .BLANK 0000[0x4] 0b98 ; -------------------------------------------------------------------------------------- 0b98 ; SUBPROGRAM 0b98 ; -------------------------------------------------------------------------------------- 0b98 0b9b | | .CONST 0x0b9b ; Address of begin 0b99 0004 | | .CONST 0x0004 ; Address of exception handler 0b9a 0001 | | .CONST 0x0001 ; Number of locals 0b9b BODY_0b98: 0b9b INIT_0b98: 0b9b 00da | | Load_Top At_Offset_2 0b9c e05c | \ | Load 0x0,0x5c 0b9d 017f | | Execute Record,Equal 0b9e 6803 |h | Jump_Zero 0xba2 0b9f 0092 113c | <| Action Push_String_Extended,0x113c ; " [any inst]" 0ba1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ba2 0092 113d | =| Action Push_String_Extended,0x113d ; " [" 0ba4 00db | | Load_Top At_Offset_3 0ba5 8060 | ` | Call 0x0,0x60 0ba6 01cc | | Execute Vector,Catenate 0ba7 0092 113e | >| Action Push_String_Extended,0x113e ; "]" 0ba9 01cc | | Execute Vector,Catenate 0baa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bab 0000 0000 | | .BLANK 0000[0x5] 0bb0 ; -------------------------------------------------------------------------------------- 0bb0 ; SUBPROGRAM 0bb0 ; -------------------------------------------------------------------------------------- 0bb0 0bb3 | | .CONST 0x0bb3 ; Address of begin 0bb1 0004 | | .CONST 0x0004 ; Address of exception handler 0bb2 0001 | | .CONST 0x0001 ; Number of locals 0bb3 BODY_0bb0: 0bb3 INIT_0bb0: 0bb3 00da | | Load_Top At_Offset_2 0bb4 e061 | a | Load 0x0,0x61 0bb5 017f | | Execute Record,Equal 0bb6 6803 |h | Jump_Zero 0xbba 0bb7 0092 113f | ?| Action Push_String_Extended,0x113f ; " [any sub]" 0bb9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bba 0092 113d | =| Action Push_String_Extended,0x113d ; " [" 0bbc 00db | | Load_Top At_Offset_3 0bbd 8062 | b | Call 0x0,0x62 0bbe 01cc | | Execute Vector,Catenate 0bbf 0092 113e | >| Action Push_String_Extended,0x113e ; "]" 0bc1 01cc | | Execute Vector,Catenate 0bc2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bc3 0000 0000 | | .BLANK 0000[0x5] 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 ; SUBPROGRAM 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 0bcb | | .CONST 0x0bcb ; Address of begin 0bc9 0004 | | .CONST 0x0004 ; Address of exception handler 0bca 0001 | | .CONST 0x0001 ; Number of locals 0bcb BODY_0bc8: 0bcb INIT_0bc8: 0bcb 00da | | Load_Top At_Offset_2 0bcc e063 | c | Load 0x0,0x63 0bcd 027f | | Execute Discrete,Equal 0bce 6803 |h | Jump_Zero 0xbd2 0bcf 0092 1140 | @| Action Push_String_Extended,0x1140 ; " [any stmt]" 0bd1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bd2 0092 113d | =| Action Push_String_Extended,0x113d ; " [" 0bd4 00db | | Load_Top At_Offset_3 0bd5 8064 | d | Call 0x0,0x64 0bd6 01cc | | Execute Vector,Catenate 0bd7 0092 113e | >| Action Push_String_Extended,0x113e ; "]" 0bd9 01cc | | Execute Vector,Catenate 0bda 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bdb 0000 0000 | | .BLANK 0000[0x5] 0be0 ; -------------------------------------------------------------------------------------- 0be0 ; SUBPROGRAM 0be0 ; -------------------------------------------------------------------------------------- 0be0 0be3 | | .CONST 0x0be3 ; Address of begin 0be1 0004 | | .CONST 0x0004 ; Address of exception handler 0be2 0001 | | .CONST 0x0001 ; Number of locals 0be3 BODY_0be0: 0be3 INIT_0be0: 0be3 00db | | Load_Top At_Offset_3 0be4 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0be5 7009 |p | Jump_Nonzero 0xbef 0be6 00db | | Load_Top At_Offset_3 0be7 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0be8 7006 |p | Jump_Nonzero 0xbef 0be9 00db | | Load_Top At_Offset_3 0bea 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0beb 7003 |p | Jump_Nonzero 0xbef 0bec 00db | | Load_Top At_Offset_3 0bed 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0bee 683c |h< | Jump_Zero 0xc2b 0bef 00da | | Load_Top At_Offset_2 0bf0 804d | M | Call 0x0,0x4d 0bf1 0092 1141 | A| Action Push_String_Extended,0x1141 ; ": " 0bf3 01cc | | Execute Vector,Catenate 0bf4 8048 | H | Call 0x0,0x48 0bf5 00db | | Load_Top At_Offset_3 0bf6 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0bf7 6803 |h | Jump_Zero 0xbfb 0bf8 0092 1142 | B| Action Push_String_Extended,0x1142 ; " Tracing" 0bfa 8048 | H | Call 0x0,0x48 0bfb 00db | | Load_Top At_Offset_3 0bfc 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0bfd 6803 |h | Jump_Zero 0xc01 0bfe 0092 1143 | C| Action Push_String_Extended,0x1143 ; " Exc Tracing" 0c00 8048 | H | Call 0x0,0x48 0c01 00db | | Load_Top At_Offset_3 0c02 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0c03 6808 |h | Jump_Zero 0xc0c 0c04 0092 1144 | D| Action Push_String_Extended,0x1144 ; " Stop, action=" 0c06 e7fe | | Load 0x3,-0x2 0c07 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0c08 00e0 | | Load_Encached Standard_Cache 0c09 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c0a 01cc | | Execute Vector,Catenate 0c0b 8048 | H | Call 0x0,0x48 0c0c 00db | | Load_Top At_Offset_3 0c0d 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0c0e 681b |h | Jump_Zero 0xc2a 0c0f 0092 1145 | E| Action Push_String_Extended,0x1145 ; " Stepping: " 0c11 e7fe | | Load 0x3,-0x2 0c12 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0c13 00e0 | | Load_Encached Standard_Cache 0c14 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c15 01cc | | Execute Vector,Catenate 0c16 0092 1146 | F| Action Push_String_Extended,0x1146 ; " level=#" 0c18 01cc | | Execute Vector,Catenate 0c19 4820 |H | Short_Literal 0x20 0c1a 4800 |H | Short_Literal 0x0 0c1b 4810 |H | Short_Literal 0x10 0c1c e7fe | | Load 0x3,-0x2 0c1d 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0c1e e04e | N | Load 0x0,0x4e 0c1f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0c20 01cc | | Execute Vector,Catenate 0c21 0092 1147 | G| Action Push_String_Extended,0x1147 ; " action=" 0c23 01cc | | Execute Vector,Catenate 0c24 e7fe | | Load 0x3,-0x2 0c25 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0c26 00e0 | | Load_Encached Standard_Cache 0c27 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c28 01cc | | Execute Vector,Catenate 0c29 8048 | H | Call 0x0,0x48 0c2a 8049 | I | Call 0x0,0x49 0c2b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c2c 0000 0000 | | .BLANK 0000[0x4] 0c30 ; -------------------------------------------------------------------------------------- 0c30 ; SUBPROGRAM 0c30 ; -------------------------------------------------------------------------------------- 0c30 0c33 | 3 | .CONST 0x0c33 ; Address of begin 0c31 0004 | | .CONST 0x0004 ; Address of exception handler 0c32 0001 | | .CONST 0x0001 ; Number of locals 0c33 BODY_0c30: 0c33 INIT_0c30: 0c33 00da | | Load_Top At_Offset_2 0c34 804d | M | Call 0x0,0x4d 0c35 0092 1148 | H| Action Push_String_Extended,0x1148 ; " DB mask= " 0c37 01cc | | Execute Vector,Catenate 0c38 4820 |H | Short_Literal 0x20 0c39 4800 |H | Short_Literal 0x0 0c3a 4810 |H | Short_Literal 0x10 0c3b e7fe | | Load 0x3,-0x2 0c3c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c3d e04e | N | Load 0x0,0x4e 0c3e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0c3f 01cc | | Execute Vector,Catenate 0c40 8048 | H | Call 0x0,0x48 0c41 8049 | I | Call 0x0,0x49 0c42 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c43 0000 0000 | | .BLANK 0000[0x5] 0c48 ; -------------------------------------------------------------------------------------- 0c48 ; SUBPROGRAM 0c48 ; -------------------------------------------------------------------------------------- 0c48 0c4b | K | .CONST 0x0c4b ; Address of begin 0c49 0004 | | .CONST 0x0004 ; Address of exception handler 0c4a 0001 | | .CONST 0x0001 ; Number of locals 0c4b BODY_0c48: 0c4b INIT_0c48: 0c4b 00da | | Load_Top At_Offset_2 0c4c 804d | M | Call 0x0,0x4d 0c4d 0092 1149 | I| Action Push_String_Extended,0x1149 ; " exc info:" 0c4f 01cc | | Execute Vector,Catenate 0c50 e7fe | | Load 0x3,-0x2 0c51 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0c52 e01c | | Load 0x0,0x1c 0c53 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0c54 01cc | | Execute Vector,Catenate 0c55 0092 114a | J| Action Push_String_Extended,0x114a ; " " 0c57 01cc | | Execute Vector,Catenate 0c58 e7fe | | Load 0x3,-0x2 0c59 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0c5a e01c | | Load 0x0,0x1c 0c5b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0c5c 01cc | | Execute Vector,Catenate 0c5d 8048 | H | Call 0x0,0x48 0c5e 8049 | I | Call 0x0,0x49 0c5f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c60 ; -------------------------------------------------------------------------------------- 0c60 ; SUBPROGRAM 0c60 ; -------------------------------------------------------------------------------------- 0c60 0c63 | c | .CONST 0x0c63 ; Address of begin 0c61 0004 | | .CONST 0x0004 ; Address of exception handler 0c62 0001 | | .CONST 0x0001 ; Number of locals 0c63 BODY_0c60: 0c63 INIT_0c60: 0c63 e7fd | | Load 0x3,-0x3 0c64 00e2 | | Load_Encached Integer_Cache 0c65 025e | ^ | Execute Discrete,Convert 0c66 e7fe | | Load 0x3,-0x2 0c67 e7ff | | Load 0x3,-0x1 0c68 e025 | % | Load 0x0,0x25 0c69 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0c6a 00d9 | | Load_Top At_Offset_1 0c6b 00d0 | | Action Swap_Control 0c6c 0260 | ` | Execute Discrete,In_Type 0c6d 7001 |p | Jump_Nonzero 0xc6f 0c6e 0801 | | Execute_Immediate Raise,0x1 0c6f 8406 | | Call 0x2,0x6 0c70 00d1 | | Pop_Control Pop_Count_1 0c71 c7fd | | Store 0x3,-0x3 0c72 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c73 0000 0000 | | .BLANK 0000[0x5] 0c78 ; -------------------------------------------------------------------------------------- 0c78 ; SUBPROGRAM 0c78 ; SUBPROGRAM 0c78 ; SUBPROGRAM 0c78 ; -------------------------------------------------------------------------------------- 0c78 0c7b | { | .CONST 0x0c7b ; Address of begin 0c79 0004 | | .CONST 0x0004 ; Address of exception handler 0c7a 0001 | | .CONST 0x0001 ; Number of locals 0c7b BODY_0c78: 0c7b BODY_0c78: 0c7b BODY_0c78: 0c7b INIT_0c78: 0c7b INIT_0c78: 0c7b INIT_0c78: 0c7b e7fd | | Load 0x3,-0x3 0c7c 00d8 | | Load_Top At_Offset_0 0c7d 00e2 | | Load_Encached Integer_Cache 0c7e 0260 | ` | Execute Discrete,In_Type 0c7f 7001 |p | Jump_Nonzero 0xc81 0c80 0801 | | Execute_Immediate Raise,0x1 0c81 e7fe | | Load 0x3,-0x2 0c82 e7ff | | Load 0x3,-0x1 0c83 e025 | % | Load 0x0,0x25 0c84 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0c85 00d9 | | Load_Top At_Offset_1 0c86 00d0 | | Action Swap_Control 0c87 0260 | ` | Execute Discrete,In_Type 0c88 7001 |p | Jump_Nonzero 0xc8a 0c89 0801 | | Execute_Immediate Raise,0x1 0c8a 8065 | e | Call 0x0,0x65 0c8b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c8c 0000 0000 | | .BLANK 0000[0x4] 0c90 ; -------------------------------------------------------------------------------------- 0c90 ; SUBPROGRAM 0c90 ; -------------------------------------------------------------------------------------- 0c90 0c93 | | .CONST 0x0c93 ; Address of begin 0c91 0004 | | .CONST 0x0004 ; Address of exception handler 0c92 0001 | | .CONST 0x0001 ; Number of locals 0c93 BODY_0c90: 0c93 INIT_0c90: 0c93 e7fd | | Load 0x3,-0x3 0c94 00e2 | | Load_Encached Integer_Cache 0c95 025e | ^ | Execute Discrete,Convert 0c96 e7fe | | Load 0x3,-0x2 0c97 e7ff | | Load 0x3,-0x1 0c98 e025 | % | Load 0x0,0x25 0c99 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0c9a 00d9 | | Load_Top At_Offset_1 0c9b 00d0 | | Action Swap_Control 0c9c 0260 | ` | Execute Discrete,In_Type 0c9d 7001 |p | Jump_Nonzero 0xc9f 0c9e 0801 | | Execute_Immediate Raise,0x1 0c9f 8407 | | Call 0x2,0x7 0ca0 00d1 | | Pop_Control Pop_Count_1 0ca1 c7fd | | Store 0x3,-0x3 0ca2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ca3 0000 0000 | | .BLANK 0000[0x5] 0ca8 ; -------------------------------------------------------------------------------------- 0ca8 ; SUBPROGRAM 0ca8 ; -------------------------------------------------------------------------------------- 0ca8 0cab | | .CONST 0x0cab ; Address of begin 0ca9 0004 | | .CONST 0x0004 ; Address of exception handler 0caa 0001 | | .CONST 0x0001 ; Number of locals 0cab BODY_0ca8: 0cab INIT_0ca8: 0cab e7fd | | Load 0x3,-0x3 0cac 00e2 | | Load_Encached Integer_Cache 0cad 025e | ^ | Execute Discrete,Convert 0cae e7fe | | Load 0x3,-0x2 0caf e7ff | | Load 0x3,-0x1 0cb0 e025 | % | Load 0x0,0x25 0cb1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0cb2 00d9 | | Load_Top At_Offset_1 0cb3 00d0 | | Action Swap_Control 0cb4 0260 | ` | Execute Discrete,In_Type 0cb5 7001 |p | Jump_Nonzero 0xcb7 0cb6 0801 | | Execute_Immediate Raise,0x1 0cb7 8408 | | Call 0x2,0x8 0cb8 00d1 | | Pop_Control Pop_Count_1 0cb9 c7fd | | Store 0x3,-0x3 0cba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0cbb 0000 0000 | | .BLANK 0000[0x5] 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 ; SUBPROGRAM 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 0ccb | | .CONST 0x0ccb ; Address of begin 0cc1 0004 | | .CONST 0x0004 ; Address of exception handler 0cc2 0003 | | .CONST 0x0003 ; Number of locals 0cc3 INIT_0cc0: 0cc3 e428 | ( | Load 0x2,0x28 0cc4 e24c | L | Load 0x1,0x4c 0cc5 01d5 | | Execute Vector,Field_Reference 0cc6 0007 | | Action Break_Optional 0cc7 e428 | ( | Load 0x2,0x28 0cc8 e24e | N | Load 0x1,0x4e 0cc9 01d5 | | Execute Vector,Field_Reference 0cca 0007 | | Action Break_Optional 0ccb BODY_0cc0: 0ccb 00d9 | | Load_Top At_Offset_1 0ccc e027 | ' | Load 0x0,0x27 0ccd 027f | | Execute Discrete,Equal 0cce 702a |p* | Jump_Nonzero 0xcf9 0ccf 0092 114b | K| Action Push_String_Extended,0x114b ; "Task=all, Pc=" 0cd1 00da | | Load_Top At_Offset_2 0cd2 e01c | | Load 0x0,0x1c 0cd3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0cd4 01cc | | Execute Vector,Catenate 0cd5 0092 114c | L| Action Push_String_Extended,0x114c ; " Id=" 0cd7 01cc | | Execute Vector,Catenate 0cd8 00d9 | | Load_Top At_Offset_1 0cd9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0cda 00e0 | | Load_Encached Standard_Cache 0cdb 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0cdc 01cc | | Execute Vector,Catenate 0cdd 0092 114d | M| Action Push_String_Extended,0x114d ; " " 0cdf 01cc | | Execute Vector,Catenate 0ce0 00d9 | | Load_Top At_Offset_1 0ce1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ce2 00e0 | | Load_Encached Standard_Cache 0ce3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ce4 01cc | | Execute Vector,Catenate 0ce5 0092 114e | N| Action Push_String_Extended,0x114e ; " /" 0ce7 01cc | | Execute Vector,Catenate 0ce8 00d9 | | Load_Top At_Offset_1 0ce9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0cea 00e0 | | Load_Encached Standard_Cache 0ceb 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0cec 01cc | | Execute Vector,Catenate 0ced 8048 | H | Call 0x0,0x48 0cee 00d8 | | Load_Top At_Offset_0 0cef 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0cf0 6803 |h | Jump_Zero 0xcf4 0cf1 0092 114f | O| Action Push_String_Extended,0x114f ; " T" 0cf3 8048 | H | Call 0x0,0x48 0cf4 00d8 | | Load_Top At_Offset_0 0cf5 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0cf6 8403 | | Call 0x2,0x3 0cf7 8048 | H | Call 0x0,0x48 0cf8 8049 | I | Call 0x0,0x49 0cf9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cfa 0000 0000 | | .BLANK 0000[0x6] 0d00 ; -------------------------------------------------------------------------------------- 0d00 ; SUBPROGRAM 0d00 ; -------------------------------------------------------------------------------------- 0d00 0d07 | | .CONST 0x0d07 ; Address of begin 0d01 0004 | | .CONST 0x0004 ; Address of exception handler 0d02 0002 | | .CONST 0x0002 ; Number of locals 0d03 INIT_0d00: 0d03 e428 | ( | Load 0x2,0x28 0d04 e252 | R | Load 0x1,0x52 0d05 01d5 | | Execute Vector,Field_Reference 0d06 0007 | | Action Break_Optional 0d07 BODY_0d00: 0d07 00d8 | | Load_Top At_Offset_0 0d08 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d09 e027 | ' | Load 0x0,0x27 0d0a 027f | | Execute Discrete,Equal 0d0b 7032 |p2 | Jump_Nonzero 0xd3e 0d0c 0092 1150 | P| Action Push_String_Extended,0x1150 ; "Task: " 0d0e 00d9 | | Load_Top At_Offset_1 0d0f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0d10 804d | M | Call 0x0,0x4d 0d11 01cc | | Execute Vector,Catenate 0d12 0092 1151 | Q| Action Push_String_Extended,0x1151 ; " Pc=" 0d14 01cc | | Execute Vector,Catenate 0d15 00d9 | | Load_Top At_Offset_1 0d16 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d17 e01c | | Load 0x0,0x1c 0d18 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d19 01cc | | Execute Vector,Catenate 0d1a 0092 114c | L| Action Push_String_Extended,0x114c ; " Id=" 0d1c 01cc | | Execute Vector,Catenate 0d1d 00d9 | | Load_Top At_Offset_1 0d1e 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0d1f 00e0 | | Load_Encached Standard_Cache 0d20 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d21 01cc | | Execute Vector,Catenate 0d22 0092 114d | M| Action Push_String_Extended,0x114d ; " " 0d24 01cc | | Execute Vector,Catenate 0d25 00d9 | | Load_Top At_Offset_1 0d26 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0d27 00e0 | | Load_Encached Standard_Cache 0d28 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d29 01cc | | Execute Vector,Catenate 0d2a 0092 114e | N| Action Push_String_Extended,0x114e ; " /" 0d2c 01cc | | Execute Vector,Catenate 0d2d 00d9 | | Load_Top At_Offset_1 0d2e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0d2f 00e0 | | Load_Encached Standard_Cache 0d30 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d31 01cc | | Execute Vector,Catenate 0d32 8048 | H | Call 0x0,0x48 0d33 00d8 | | Load_Top At_Offset_0 0d34 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0d35 6803 |h | Jump_Zero 0xd39 0d36 0092 114f | O| Action Push_String_Extended,0x114f ; " T" 0d38 8048 | H | Call 0x0,0x48 0d39 00d8 | | Load_Top At_Offset_0 0d3a 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0d3b 8403 | | Call 0x2,0x3 0d3c 8048 | H | Call 0x0,0x48 0d3d 8049 | I | Call 0x0,0x49 0d3e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0d3f 0000 | | .XXX[0x1] 0d40 ; -------------------------------------------------------------------------------------- 0d40 ; SUBPROGRAM 0d40 ; -------------------------------------------------------------------------------------- 0d40 0d47 | G | .CONST 0x0d47 ; Address of begin 0d41 0004 | | .CONST 0x0004 ; Address of exception handler 0d42 0002 | | .CONST 0x0002 ; Number of locals 0d43 INIT_0d40: 0d43 e428 | ( | Load 0x2,0x28 0d44 e267 | g | Load 0x1,0x67 0d45 01d5 | | Execute Vector,Field_Reference 0d46 0007 | | Action Break_Optional 0d47 BODY_0d40: 0d47 00d8 | | Load_Top At_Offset_0 0d48 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0d49 e01e | | Load 0x0,0x1e 0d4a 027e | ~ | Execute Discrete,Not_Equal 0d4b 685e |h^ | Jump_Zero 0xdaa 0d4c e428 | ( | Load 0x2,0x28 0d4d 00e0 | | Load_Encached Standard_Cache 0d4e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d4f 0092 1141 | A| Action Push_String_Extended,0x1141 ; ": " 0d51 01cc | | Execute Vector,Catenate 0d52 0092 1152 | R| Action Push_String_Extended,0x1152 ; "Id=" 0d54 01cc | | Execute Vector,Catenate 0d55 00d9 | | Load_Top At_Offset_1 0d56 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0d57 00e0 | | Load_Encached Standard_Cache 0d58 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d59 01cc | | Execute Vector,Catenate 0d5a 0092 114d | M| Action Push_String_Extended,0x114d ; " " 0d5c 01cc | | Execute Vector,Catenate 0d5d 8048 | H | Call 0x0,0x48 0d5e 00d8 | | Load_Top At_Offset_0 0d5f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d60 e011 | | Load 0x0,0x11 0d61 027f | | Execute Discrete,Equal 0d62 6804 |h | Jump_Zero 0xd67 0d63 0092 1153 | S| Action Push_String_Extended,0x1153 ; "all" 0d65 8048 | H | Call 0x0,0x48 0d66 7804 |x | Jump 0xd6b 0d67 00d8 | | Load_Top At_Offset_0 0d68 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d69 804d | M | Call 0x0,0x4d 0d6a 8048 | H | Call 0x0,0x48 0d6b 0092 1154 | T| Action Push_String_Extended,0x1154 ; " Pri=" 0d6d 00d9 | | Load_Top At_Offset_1 0d6e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0d6f 00e0 | | Load_Encached Standard_Cache 0d70 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d71 01cc | | Execute Vector,Catenate 0d72 8048 | H | Call 0x0,0x48 0d73 0092 1155 | U| Action Push_String_Extended,0x1155 ; " Action= " 0d75 8048 | H | Call 0x0,0x48 0d76 00d8 | | Load_Top At_Offset_0 0d77 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0d78 4605 |F | Jump_Case 0x6 0d79 7815 |x | Jump 0xd8f ; case 0x0 0d7a 7804 |x | Jump 0xd7f ; case 0x1 0d7b 7817 |x | Jump 0xd93 ; case 0x2 0d7c 780a |x | Jump 0xd87 ; case 0x3 0d7d 780d |x | Jump 0xd8b ; case 0x4 0d7e 7800 |x | Jump 0xd7f ; case 0x5 0d7f 00d8 | | Load_Top At_Offset_0 0d80 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0d81 e003 | | Load 0x0,0x3 0d82 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0d83 011c | | Execute Any,Convert_Unchecked 0d84 1c01 | | Execute_Immediate Run_Utility,0x1 0d85 8048 | H | Call 0x0,0x48 0d86 780f |x | Jump 0xd96 0d87 0092 1156 | V| Action Push_String_Extended,0x1156 ; "Propagate" 0d89 8048 | H | Call 0x0,0x48 0d8a 780b |x | Jump 0xd96 0d8b 0092 1157 | W| Action Push_String_Extended,0x1157 ; "Catch" 0d8d 8048 | H | Call 0x0,0x48 0d8e 7807 |x | Jump 0xd96 0d8f 0092 1158 | X| Action Push_String_Extended,0x1158 ; "History" 0d91 8048 | H | Call 0x0,0x48 0d92 7803 |x | Jump 0xd96 0d93 0092 1159 | Y| Action Push_String_Extended,0x1159 ; "Trace" 0d95 8048 | H | Call 0x0,0x48 0d96 0092 115a | Z| Action Push_String_Extended,0x115a ; " Exc= " 0d98 00d9 | | Load_Top At_Offset_1 0d99 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0d9a 8066 | f | Call 0x0,0x66 0d9b 01cc | | Execute Vector,Catenate 0d9c 00d9 | | Load_Top At_Offset_1 0d9d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0d9e 8403 | | Call 0x2,0x3 0d9f 01cc | | Execute Vector,Catenate 0da0 00d9 | | Load_Top At_Offset_1 0da1 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0da2 8404 | | Call 0x2,0x4 0da3 01cc | | Execute Vector,Catenate 0da4 00d9 | | Load_Top At_Offset_1 0da5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0da6 8405 | | Call 0x2,0x5 0da7 01cc | | Execute Vector,Catenate 0da8 8048 | H | Call 0x0,0x48 0da9 8049 | I | Call 0x0,0x49 0daa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0dab 0000 0000 | | .BLANK 0000[0x5] 0db0 ; -------------------------------------------------------------------------------------- 0db0 ; SUBPROGRAM 0db0 ; -------------------------------------------------------------------------------------- 0db0 0db7 | | .CONST 0x0db7 ; Address of begin 0db1 0004 | | .CONST 0x0004 ; Address of exception handler 0db2 0002 | | .CONST 0x0002 ; Number of locals 0db3 INIT_0db0: 0db3 e428 | ( | Load 0x2,0x28 0db4 e25c | \ | Load 0x1,0x5c 0db5 01d5 | | Execute Vector,Field_Reference 0db6 0007 | | Action Break_Optional 0db7 BODY_0db0: 0db7 00d8 | | Load_Top At_Offset_0 0db8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0db9 804d | M | Call 0x0,0x4d 0dba 0092 113d | =| Action Push_String_Extended,0x113d ; " [" 0dbc 01cc | | Execute Vector,Catenate 0dbd 00d9 | | Load_Top At_Offset_1 0dbe 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0dbf e003 | | Load 0x0,0x3 0dc0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dc1 011c | | Execute Any,Convert_Unchecked 0dc2 1c01 | | Execute_Immediate Run_Utility,0x1 0dc3 01cc | | Execute Vector,Catenate 0dc4 0092 113e | >| Action Push_String_Extended,0x113e ; "]" 0dc6 01cc | | Execute Vector,Catenate 0dc7 00d9 | | Load_Top At_Offset_1 0dc8 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0dc9 8403 | | Call 0x2,0x3 0dca 01cc | | Execute Vector,Catenate 0dcb 0092 115b | [| Action Push_String_Extended,0x115b ; " Low = " 0dcd 01cc | | Execute Vector,Catenate 0dce 00d9 | | Load_Top At_Offset_1 0dcf 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0dd0 e01c | | Load 0x0,0x1c 0dd1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0dd2 01cc | | Execute Vector,Catenate 0dd3 0092 115c | \| Action Push_String_Extended,0x115c ; " High = " 0dd5 01cc | | Execute Vector,Catenate 0dd6 00d9 | | Load_Top At_Offset_1 0dd7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0dd8 e01c | | Load 0x0,0x1c 0dd9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0dda 01cc | | Execute Vector,Catenate 0ddb 8048 | H | Call 0x0,0x48 0ddc 8049 | I | Call 0x0,0x49 0ddd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0dde 0000 0000 | | .XXX[0x2] 0de0 ; -------------------------------------------------------------------------------------- 0de0 ; SUBPROGRAM 0de0 ; -------------------------------------------------------------------------------------- 0de0 0de7 | | .CONST 0x0de7 ; Address of begin 0de1 0004 | | .CONST 0x0004 ; Address of exception handler 0de2 0002 | | .CONST 0x0002 ; Number of locals 0de3 INIT_0de0: 0de3 e428 | ( | Load 0x2,0x28 0de4 e257 | W | Load 0x1,0x57 0de5 01d5 | | Execute Vector,Field_Reference 0de6 0007 | | Action Break_Optional 0de7 BODY_0de0: 0de7 00d8 | | Load_Top At_Offset_0 0de8 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0de9 e01e | | Load 0x0,0x1e 0dea 027e | ~ | Execute Discrete,Not_Equal 0deb 682a |h* | Jump_Zero 0xe16 0dec e428 | ( | Load 0x2,0x28 0ded 00e0 | | Load_Encached Standard_Cache 0dee 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0def 0092 1141 | A| Action Push_String_Extended,0x1141 ; ": " 0df1 01cc | | Execute Vector,Catenate 0df2 8048 | H | Call 0x0,0x48 0df3 00d8 | | Load_Top At_Offset_0 0df4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0df5 e003 | | Load 0x0,0x3 0df6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0df7 011c | | Execute Any,Convert_Unchecked 0df8 1c01 | | Execute_Immediate Run_Utility,0x1 0df9 8048 | H | Call 0x0,0x48 0dfa 0092 115d | ]| Action Push_String_Extended,0x115d ; " Action=" 0dfc 00d9 | | Load_Top At_Offset_1 0dfd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0dfe 00e0 | | Load_Encached Standard_Cache 0dff 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e00 01cc | | Execute Vector,Catenate 0e01 0092 114d | M| Action Push_String_Extended,0x114d ; " " 0e03 01cc | | Execute Vector,Catenate 0e04 00d9 | | Load_Top At_Offset_1 0e05 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e06 804d | M | Call 0x0,0x4d 0e07 01cc | | Execute Vector,Catenate 0e08 00d9 | | Load_Top At_Offset_1 0e09 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e0a 8403 | | Call 0x2,0x3 0e0b 01cc | | Execute Vector,Catenate 0e0c 00d9 | | Load_Top At_Offset_1 0e0d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0e0e 8404 | | Call 0x2,0x4 0e0f 01cc | | Execute Vector,Catenate 0e10 00d9 | | Load_Top At_Offset_1 0e11 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0e12 8405 | | Call 0x2,0x5 0e13 01cc | | Execute Vector,Catenate 0e14 8048 | H | Call 0x0,0x48 0e15 8049 | I | Call 0x0,0x49 0e16 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e17 0000 | | .XXX[0x1] 0e18 ; -------------------------------------------------------------------------------------- 0e18 ; SUBPROGRAM 0e18 ; -------------------------------------------------------------------------------------- 0e18 0e20 | | .CONST 0x0e20 ; Address of begin 0e19 0004 | | .CONST 0x0004 ; Address of exception handler 0e1a 0003 | | .CONST 0x0003 ; Number of locals 0e1b INIT_0e18: 0e1b e407 | | Load 0x2,0x7 0e1c e267 | g | Load 0x1,0x67 0e1d 01d5 | | Execute Vector,Field_Reference 0e1e 029f 0f5b | [| Declare_Subprogram INIT_0f58,For_Call 0e20 BODY_0e18: 0e20 00d9 | | Load_Top At_Offset_1 0e21 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e22 e01e | | Load 0x0,0x1e 0e23 027e | ~ | Execute Discrete,Not_Equal 0e24 683e |h> | Jump_Zero 0xe63 0e25 00d9 | | Load_Top At_Offset_1 0e26 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e27 e011 | | Load 0x0,0x11 0e28 027f | | Execute Discrete,Equal 0e29 7005 |p | Jump_Nonzero 0xe2f 0e2a 00d9 | | Load_Top At_Offset_1 0e2b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e2c e5fe | | Load 0x2,-0x2 0e2d 027f | | Execute Discrete,Equal 0e2e 6834 |h4 | Jump_Zero 0xe63 0e2f 00d9 | | Load_Top At_Offset_1 0e30 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e31 8067 | g | Call 0x0,0x67 0e32 7006 |p | Jump_Nonzero 0xe39 0e33 00d9 | | Load_Top At_Offset_1 0e34 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e35 8068 | h | Call 0x0,0x68 0e36 e5ff | | Load 0x2,-0x1 0e37 8069 | i | Call 0x0,0x69 0e38 682a |h* | Jump_Zero 0xe63 0e39 00d9 | | Load_Top At_Offset_1 0e3a 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0e3b e061 | a | Load 0x0,0x61 0e3c 017f | | Execute Record,Equal 0e3d 6824 |h$ | Jump_Zero 0xe62 0e3e 00d9 | | Load_Top At_Offset_1 0e3f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0e40 e063 | c | Load 0x0,0x63 0e41 027f | | Execute Discrete,Equal 0e42 681f |h | Jump_Zero 0xe62 0e43 00d9 | | Load_Top At_Offset_1 0e44 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0e45 e05c | \ | Load 0x0,0x5c 0e46 017f | | Execute Record,Equal 0e47 681a |h | Jump_Zero 0xe62 0e48 00d9 | | Load_Top At_Offset_1 0e49 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e4a 0f02 | | Execute_Immediate Equal,0x2 0e4b 6804 |h | Jump_Zero 0xe50 0e4c 00d9 | | Load_Top At_Offset_1 0e4d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e4e a5fb | | Store_Unchecked 0x2,-0x5 0e4f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e50 00d9 | | Load_Top At_Offset_1 0e51 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e52 7004 |p | Jump_Nonzero 0xe57 0e53 00d9 | | Load_Top At_Offset_1 0e54 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e55 a5f9 | | Store_Unchecked 0x2,-0x7 0e56 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e57 00d9 | | Load_Top At_Offset_1 0e58 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e59 e403 | | Load 0x2,0x3 0e5a 027d | } | Execute Discrete,Greater 0e5b 6805 |h | Jump_Zero 0xe61 0e5c 00d9 | | Load_Top At_Offset_1 0e5d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e5e a403 | | Store_Unchecked 0x2,0x3 0e5f e407 | | Load 0x2,0x7 0e60 a402 | | Store_Unchecked 0x2,0x2 0e61 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e62 8603 | | Call 0x3,0x3 0e63 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e64 0000 0000 | | .BLANK 0000[0x4] 0e68 ; -------------------------------------------------------------------------------------- 0e68 ; SUBPROGRAM 0e68 ; -------------------------------------------------------------------------------------- 0e68 0e6b | k | .CONST 0x0e6b ; Address of begin 0e69 0004 | | .CONST 0x0004 ; Address of exception handler 0e6a 0001 | | .CONST 0x0001 ; Number of locals 0e6b BODY_0e68: 0e6b INIT_0e68: 0e6b 00da | | Load_Top At_Offset_2 0e6c e01e | | Load 0x0,0x1e 0e6d 027f | | Execute Discrete,Equal 0e6e 6801 |h | Jump_Zero 0xe70 0e6f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e70 00cf | | Action Mark_Auxiliary 0e71 e403 | | Load 0x2,0x3 0e72 4801 |H | Short_Literal 0x1 0e73 0263 | c | Execute Discrete,Above_Bound 0e74 700b |p | Jump_Nonzero 0xe80 0e75 00d8 | | Load_Top At_Offset_0 0e76 e402 | | Load 0x2,0x2 0e77 01d7 | | Execute Vector,Field_Read 0e78 e7ff | | Load 0x3,-0x1 0e79 027f | | Execute Discrete,Equal 0e7a 6803 |h | Jump_Zero 0xe7e 0e7b 4801 |H | Short_Literal 0x1 0e7c a406 | | Store_Unchecked 0x2,0x6 0e7d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e7e 00c8 | | Action Pop_Auxiliary_Range 0e7f 3ff5 |? | Loop_Increasing 0xe75 0e80 00ce | | Action Pop_Auxiliary 0e81 e403 | | Load 0x2,0x3 0e82 0d28 | ( | Execute_Immediate Less,0x28 0e83 6808 |h | Jump_Zero 0xe8c 0e84 e403 | | Load 0x2,0x3 0e85 0a01 | | Execute_Immediate Plus,0x1 0e86 c403 | | Store 0x2,0x3 0e87 00da | | Load_Top At_Offset_2 0e88 e403 | | Load 0x2,0x3 0e89 e402 | | Load 0x2,0x2 0e8a 01d6 | | Execute Vector,Field_Write 0e8b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e8c 0092 115e | ^| Action Push_String_Extended,0x115e ; "Action buffer overflow" 0e8e 803b | ; | Call 0x0,0x3b 0e8f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0e90 ; -------------------------------------------------------------------------------------- 0e90 ; SUBPROGRAM 0e90 ; -------------------------------------------------------------------------------------- 0e90 0e95 | | .CONST 0x0e95 ; Address of begin 0e91 0004 | | .CONST 0x0004 ; Address of exception handler 0e92 0002 | | .CONST 0x0002 ; Number of locals 0e93 INIT_0e90: 0e93 029f 0f8b | | Declare_Subprogram INIT_0f88,For_Call 0e95 BODY_0e90: 0e95 e7fe | | Load 0x3,-0x2 0e96 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0e97 6806 |h | Jump_Zero 0xe9e 0e98 e5fc | | Load 0x2,-0x4 0e99 805e | ^ | Call 0x0,0x5e 0e9a 6803 |h | Jump_Zero 0xe9e 0e9b e7fe | | Load 0x3,-0x2 0e9c 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0e9d 8408 | | Call 0x2,0x8 0e9e e7fe | | Load 0x3,-0x2 0e9f 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0ea0 6829 |h) | Jump_Zero 0xeca 0ea1 e5fe | | Load 0x2,-0x2 0ea2 e004 | | Load 0x0,0x4 0ea3 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0ea4 e7fe | | Load 0x3,-0x2 0ea5 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0ea6 027c | | | Execute Discrete,Less 0ea7 6822 |h" | Jump_Zero 0xeca 0ea8 e5fc | | Load 0x2,-0x4 0ea9 805e | ^ | Call 0x0,0x5e 0eaa 681f |h | Jump_Zero 0xeca 0eab e7fe | | Load 0x3,-0x2 0eac 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0ead e5fd | | Load 0x2,-0x3 0eae 027f | | Execute Discrete,Equal 0eaf 7006 |p | Jump_Nonzero 0xeb6 0eb0 e406 | | Load 0x2,0x6 0eb1 7004 |p | Jump_Nonzero 0xeb6 0eb2 e5fd | | Load 0x2,-0x3 0eb3 e01e | | Load 0x0,0x1e 0eb4 027f | | Execute Discrete,Equal 0eb5 6814 |h | Jump_Zero 0xeca 0eb6 e7fe | | Load 0x3,-0x2 0eb7 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0eb8 0f01 | | Execute_Immediate Equal,0x1 0eb9 680b |h | Jump_Zero 0xec5 0eba 4800 |H | Short_Literal 0x0 0ebb e7fe | | Load 0x3,-0x2 0ebc 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0ebd e7fe | | Load 0x3,-0x2 0ebe 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0ebf 8408 | | Call 0x2,0x8 0ec0 00db | | Load_Top At_Offset_3 0ec1 4801 |H | Short_Literal 0x1 0ec2 e26b | k | Load 0x1,0x6b 0ec3 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0ec4 7805 |x | Jump 0xeca 0ec5 e7fe | | Load 0x3,-0x2 0ec6 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0ec7 0aff | | Execute_Immediate Plus,-0x1 0ec8 e7fe | | Load 0x3,-0x2 0ec9 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0eca e7fe | | Load 0x3,-0x2 0ecb 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0ecc 6809 |h | Jump_Zero 0xed6 0ecd 00cf | | Action Mark_Auxiliary 0ece e258 | X | Load 0x1,0x58 0ecf 4801 |H | Short_Literal 0x1 0ed0 0263 | c | Execute Discrete,Above_Bound 0ed1 7003 |p | Jump_Nonzero 0xed5 0ed2 8602 | | Call 0x3,0x2 0ed3 00c8 | | Action Pop_Auxiliary_Range 0ed4 3ffd |? | Loop_Increasing 0xed2 0ed5 00ce | | Action Pop_Auxiliary 0ed6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ed7 0000 | | .XXX[0x1] 0ed8 ; -------------------------------------------------------------------------------------- 0ed8 ; SUBPROGRAM 0ed8 ; -------------------------------------------------------------------------------------- 0ed8 0edb | | .CONST 0x0edb ; Address of begin 0ed9 0004 | | .CONST 0x0004 ; Address of exception handler 0eda 0001 | | .CONST 0x0001 ; Number of locals 0edb BODY_0ed8: 0edb INIT_0ed8: 0edb e7fd | | Load 0x3,-0x3 0edc 00e2 | | Load_Encached Integer_Cache 0edd 025e | ^ | Execute Discrete,Convert 0ede e7fe | | Load 0x3,-0x2 0edf e7ff | | Load 0x3,-0x1 0ee0 e025 | % | Load 0x0,0x25 0ee1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0ee2 00d9 | | Load_Top At_Offset_1 0ee3 00d0 | | Action Swap_Control 0ee4 0260 | ` | Execute Discrete,In_Type 0ee5 7001 |p | Jump_Nonzero 0xee7 0ee6 0801 | | Execute_Immediate Raise,0x1 0ee7 8409 | | Call 0x2,0x9 0ee8 00d1 | | Pop_Control Pop_Count_1 0ee9 c7fd | | Store 0x3,-0x3 0eea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0eeb 0000 0000 | | .BLANK 0000[0x5] 0ef0 ; -------------------------------------------------------------------------------------- 0ef0 ; SUBPROGRAM 0ef0 ; -------------------------------------------------------------------------------------- 0ef0 0ef3 | | .CONST 0x0ef3 ; Address of begin 0ef1 0f0d | | .CONST 0x0f0d ; Address of exception handler 0ef2 0001 | | .CONST 0x0001 ; Number of locals 0ef3 BODY_0ef0: 0ef3 INIT_0ef0: 0ef3 e23e | > | Load 0x1,0x3e 0ef4 6817 |h | Jump_Zero 0xf0c 0ef5 0092 113a | :| Action Push_String_Extended,0x113a ; "Process_Action: exception: " 0ef7 e03a | : | Load 0x0,0x3a 0ef8 180d | | Execute Package,Field_Execute,Field_Number 0xd 0ef9 01cc | | Execute Vector,Catenate 0efa 803b | ; | Call 0x0,0x3b 0efb 00cf | | Action Mark_Auxiliary 0efc e403 | | Load 0x2,0x3 0efd 4801 |H | Short_Literal 0x1 0efe 0263 | c | Execute Discrete,Above_Bound 0eff 700b |p | Jump_Nonzero 0xf0b 0f00 0092 115f | _| Action Push_String_Extended,0x115f ; "Aid= " 0f02 00d9 | | Load_Top At_Offset_1 0f03 e402 | | Load 0x2,0x2 0f04 01d7 | | Execute Vector,Field_Read 0f05 00e0 | | Load_Encached Standard_Cache 0f06 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0f07 01cc | | Execute Vector,Catenate 0f08 803b | ; | Call 0x0,0x3b 0f09 00c8 | | Action Pop_Auxiliary_Range 0f0a 3ff5 |? | Loop_Increasing 0xf00 0f0b 00ce | | Action Pop_Auxiliary 0f0c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f0d TRAP_0ef0: 0f0d 0007 | | Action Break_Optional 0f0e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f0f 0000 | | .XXX[0x1] 0f10 ; -------------------------------------------------------------------------------------- 0f10 ; SUBPROGRAM 0f10 ; -------------------------------------------------------------------------------------- 0f10 0f17 | | .CONST 0x0f17 ; Address of begin 0f11 0004 | | .CONST 0x0004 ; Address of exception handler 0f12 0002 | | .CONST 0x0002 ; Number of locals 0f13 INIT_0f10: 0f13 e039 | 9 | Load 0x0,0x39 0f14 0322 | " | Declare_Variable Record 0f15 00d8 | | Load_Top At_Offset_0 0f16 1c00 | | Execute_Immediate Run_Utility,0x0 0f17 BODY_0f10: 0f17 00d8 | | Load_Top At_Offset_0 0f18 e5fe | | Load 0x2,-0x2 0f19 803c | < | Call 0x0,0x3c 0f1a 00d1 | | Pop_Control Pop_Count_1 0f1b 00d8 | | Load_Top At_Offset_0 0f1c e5fd | | Load 0x2,-0x3 0f1d 803d | = | Call 0x0,0x3d 0f1e 00d1 | | Pop_Control Pop_Count_1 0f1f 00d8 | | Load_Top At_Offset_0 0f20 e5ff | | Load 0x2,-0x1 0f21 806a | j | Call 0x0,0x6a 0f22 00d1 | | Pop_Control Pop_Count_1 0f23 e5fe | | Load 0x2,-0x2 0f24 e01e | | Load 0x0,0x1e 0f25 e5fd | | Load 0x2,-0x3 0f26 e5ff | | Load 0x2,-0x1 0f27 8278 | x | Call 0x1,0x78 0f28 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f29 0000 0000 | | .BLANK 0000[0x7] 0f30 ; -------------------------------------------------------------------------------------- 0f30 ; SUBPROGRAM 0f30 ; -------------------------------------------------------------------------------------- 0f30 0f38 | 8 | .CONST 0x0f38 ; Address of begin 0f31 0004 | | .CONST 0x0004 ; Address of exception handler 0f32 0003 | | .CONST 0x0003 ; Number of locals 0f33 INIT_0f30: 0f33 e405 | | Load 0x2,0x5 0f34 e257 | W | Load 0x1,0x57 0f35 01d5 | | Execute Vector,Field_Reference 0f36 029f 0fcb | | Declare_Subprogram INIT_0fc8,For_Call 0f38 BODY_0f30: 0f38 00d9 | | Load_Top At_Offset_1 0f39 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f3a e011 | | Load 0x0,0x11 0f3b 027f | | Execute Discrete,Equal 0f3c 7005 |p | Jump_Nonzero 0xf42 0f3d 00d9 | | Load_Top At_Offset_1 0f3e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f3f e5ff | | Load 0x2,-0x1 0f40 027f | | Execute Discrete,Equal 0f41 6814 |h | Jump_Zero 0xf56 0f42 00d9 | | Load_Top At_Offset_1 0f43 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0f44 e061 | a | Load 0x0,0x61 0f45 017e | ~ | Execute Record,Not_Equal 0f46 700a |p | Jump_Nonzero 0xf51 0f47 00d9 | | Load_Top At_Offset_1 0f48 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0f49 e063 | c | Load 0x0,0x63 0f4a 027e | ~ | Execute Discrete,Not_Equal 0f4b 7005 |p | Jump_Nonzero 0xf51 0f4c 00d9 | | Load_Top At_Offset_1 0f4d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0f4e e05c | \ | Load 0x0,0x5c 0f4f 017e | ~ | Execute Record,Not_Equal 0f50 6802 |h | Jump_Zero 0xf53 0f51 8603 | | Call 0x3,0x3 0f52 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f53 4801 |H | Short_Literal 0x1 0f54 00cb | | Action Pop_Block_With_Result 0f55 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0f56 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f57 0000 | | .XXX[0x1] 0f58 ; -------------------------------------------------------------------------------------- 0f58 ; SUBPROGRAM 0f58 ; -------------------------------------------------------------------------------------- 0f58 0f6a | j | .CONST 0x0f6a ; Address of begin 0f59 0004 | | .CONST 0x0004 ; Address of exception handler 0f5a 0007 | | .CONST 0x0007 ; Number of locals 0f5b INIT_0f58: 0f5b e039 | 9 | Load 0x0,0x39 0f5c 0322 | " | Declare_Variable Record 0f5d 00d8 | | Load_Top At_Offset_0 0f5e 1c00 | | Execute_Immediate Run_Utility,0x0 0f5f e005 | | Load 0x0,0x5 0f60 0322 | " | Declare_Variable Record 0f61 00d8 | | Load_Top At_Offset_0 0f62 1c00 | | Execute_Immediate Run_Utility,0x0 0f63 00e1 | | Load_Encached Boolean_Cache 0f64 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0f65 e006 | | Load 0x0,0x6 0f66 0322 | " | Declare_Variable Record 0f67 e007 | | Load 0x0,0x7 0f68 029f 0ffb | | Declare_Subprogram INIT_0ff8,For_Call 0f6a BODY_0f58: 0f6a e802 | | Load 0x4,0x2 0f6b e5fd | | Load 0x2,-0x3 0f6c 803c | < | Call 0x0,0x3c 0f6d 00d1 | | Pop_Control Pop_Count_1 0f6e e802 | | Load 0x4,0x2 0f6f 8056 | V | Call 0x0,0x56 0f70 00d1 | | Pop_Control Pop_Count_1 0f71 e802 | | Load 0x4,0x2 0f72 806b | k | Call 0x0,0x6b 0f73 00db | | Load_Top At_Offset_3 0f74 017d | } | Execute Record,Structure_Write 0f75 e802 | | Load 0x4,0x2 0f76 806c | l | Call 0x0,0x6c 0f77 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0f78 00cf | | Action Mark_Auxiliary 0f79 e268 | h | Load 0x1,0x68 0f7a e407 | | Load 0x2,0x7 0f7b 0263 | c | Execute Discrete,Above_Bound 0f7c 7003 |p | Jump_Nonzero 0xf80 0f7d 8807 | | Call 0x4,0x7 0f7e 00c8 | | Action Pop_Auxiliary_Range 0f7f 3ffd |? | Loop_Increasing 0xf7d 0f80 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f81 0000 0000 | | .BLANK 0000[0x7] 0f88 ; -------------------------------------------------------------------------------------- 0f88 ; SUBPROGRAM 0f88 ; -------------------------------------------------------------------------------------- 0f88 0f8f | | .CONST 0x0f8f ; Address of begin 0f89 0004 | | .CONST 0x0004 ; Address of exception handler 0f8a 0002 | | .CONST 0x0002 ; Number of locals 0f8b INIT_0f88: 0f8b e605 | | Load 0x3,0x5 0f8c e257 | W | Load 0x1,0x57 0f8d 01d5 | | Execute Vector,Field_Reference 0f8e 0007 | | Action Break_Optional 0f8f BODY_0f88: 0f8f 00d8 | | Load_Top At_Offset_0 0f90 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f91 e011 | | Load 0x0,0x11 0f92 027f | | Execute Discrete,Equal 0f93 7005 |p | Jump_Nonzero 0xf99 0f94 00d8 | | Load_Top At_Offset_0 0f95 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f96 e7ff | | Load 0x3,-0x1 0f97 027f | | Execute Discrete,Equal 0f98 682d |h- | Jump_Zero 0xfc6 0f99 00d8 | | Load_Top At_Offset_0 0f9a 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0f9b e061 | a | Load 0x0,0x61 0f9c 017f | | Execute Record,Equal 0f9d 7006 |p | Jump_Nonzero 0xfa4 0f9e 00d8 | | Load_Top At_Offset_0 0f9f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0fa0 e405 | | Load 0x2,0x5 0fa1 806b | k | Call 0x0,0x6b 0fa2 017f | | Execute Record,Equal 0fa3 6822 |h" | Jump_Zero 0xfc6 0fa4 00d8 | | Load_Top At_Offset_0 0fa5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0fa6 e063 | c | Load 0x0,0x63 0fa7 027f | | Execute Discrete,Equal 0fa8 7006 |p | Jump_Nonzero 0xfaf 0fa9 00d8 | | Load_Top At_Offset_0 0faa 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0fab e405 | | Load 0x2,0x5 0fac 806c | l | Call 0x0,0x6c 0fad 027f | | Execute Discrete,Equal 0fae 6817 |h | Jump_Zero 0xfc6 0faf 00d8 | | Load_Top At_Offset_0 0fb0 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0fb1 e05c | \ | Load 0x0,0x5c 0fb2 017f | | Execute Record,Equal 0fb3 7006 |p | Jump_Nonzero 0xfba 0fb4 e405 | | Load 0x2,0x5 0fb5 805d | ] | Call 0x0,0x5d 0fb6 00d9 | | Load_Top At_Offset_1 0fb7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0fb8 8273 | s | Call 0x1,0x73 0fb9 680c |h | Jump_Zero 0xfc6 0fba 00d8 | | Load_Top At_Offset_0 0fbb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0fbc 7003 |p | Jump_Nonzero 0xfc0 0fbd e405 | | Load 0x2,0x5 0fbe 806d | m | Call 0x0,0x6d 0fbf 7003 |p | Jump_Nonzero 0xfc3 0fc0 e405 | | Load 0x2,0x5 0fc1 806e | n | Call 0x0,0x6e 0fc2 6803 |h | Jump_Zero 0xfc6 0fc3 00d8 | | Load_Top At_Offset_0 0fc4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0fc5 8408 | | Call 0x2,0x8 0fc6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fc7 0000 | | .XXX[0x1] 0fc8 ; -------------------------------------------------------------------------------------- 0fc8 ; SUBPROGRAM 0fc8 ; -------------------------------------------------------------------------------------- 0fc8 0fda | | .CONST 0x0fda ; Address of begin 0fc9 0004 | | .CONST 0x0004 ; Address of exception handler 0fca 0007 | | .CONST 0x0007 ; Number of locals 0fcb INIT_0fc8: 0fcb e006 | | Load 0x0,0x6 0fcc 0322 | " | Declare_Variable Record 0fcd 00e2 | | Load_Encached Integer_Cache 0fce 00e1 | | Load_Encached Boolean_Cache 0fcf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0fd0 e005 | | Load 0x0,0x5 0fd1 0322 | " | Declare_Variable Record 0fd2 00d8 | | Load_Top At_Offset_0 0fd3 1c00 | | Execute_Immediate Run_Utility,0x0 0fd4 e039 | 9 | Load 0x0,0x39 0fd5 0322 | " | Declare_Variable Record 0fd6 00d8 | | Load_Top At_Offset_0 0fd7 1c00 | | Execute_Immediate Run_Utility,0x0 0fd8 029f 106b | k| Declare_Subprogram INIT_1068,For_Call 0fda BODY_0fc8: 0fda 00d9 | | Load_Top At_Offset_1 0fdb e5fd | | Load 0x2,-0x3 0fdc 803c | < | Call 0x0,0x3c 0fdd 00d1 | | Pop_Control Pop_Count_1 0fde 00d9 | | Load_Top At_Offset_1 0fdf 8056 | V | Call 0x0,0x56 0fe0 00d1 | | Pop_Control Pop_Count_1 0fe1 00d9 | | Load_Top At_Offset_1 0fe2 806b | k | Call 0x0,0x6b 0fe3 e802 | | Load 0x4,0x2 0fe4 017d | } | Execute Record,Structure_Write 0fe5 00d9 | | Load_Top At_Offset_1 0fe6 806c | l | Call 0x0,0x6c 0fe7 a803 | | Store_Unchecked 0x4,0x3 0fe8 00cf | | Action Mark_Auxiliary 0fe9 e258 | X | Load 0x1,0x58 0fea e405 | | Load 0x2,0x5 0feb 0263 | c | Execute Discrete,Above_Bound 0fec 7003 |p | Jump_Nonzero 0xff0 0fed 8807 | | Call 0x4,0x7 0fee 00c8 | | Action Pop_Auxiliary_Range 0fef 3ffd |? | Loop_Increasing 0xfed 0ff0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ff1 0000 0000 | | .BLANK 0000[0x7] 0ff8 ; -------------------------------------------------------------------------------------- 0ff8 ; SUBPROGRAM 0ff8 ; -------------------------------------------------------------------------------------- 0ff8 0fff | | .CONST 0x0fff ; Address of begin 0ff9 0004 | | .CONST 0x0004 ; Address of exception handler 0ffa 0002 | | .CONST 0x0002 ; Number of locals 0ffb INIT_0ff8: 0ffb e80a | | Load 0x4,0xa 0ffc e267 | g | Load 0x1,0x67 0ffd 01d5 | | Execute Vector,Field_Reference 0ffe 0007 | | Action Break_Optional 0fff BODY_0ff8: 0fff 00d8 | | Load_Top At_Offset_0 1000 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 1001 e01e | | Load 0x0,0x1e 1002 027e | ~ | Execute Discrete,Not_Equal 1003 6863 |hc | Jump_Zero 0x1067 1004 00d8 | | Load_Top At_Offset_0 1005 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1006 e011 | | Load 0x0,0x11 1007 027f | | Execute Discrete,Equal 1008 7005 |p | Jump_Nonzero 0x100e 1009 00d8 | | Load_Top At_Offset_0 100a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 100b e5fe | | Load 0x2,-0x2 100c 027f | | Execute Discrete,Equal 100d 6859 |hY | Jump_Zero 0x1067 100e 00d8 | | Load_Top At_Offset_0 100f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1010 8067 | g | Call 0x0,0x67 1011 7006 |p | Jump_Nonzero 0x1018 1012 00d8 | | Load_Top At_Offset_0 1013 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1014 8068 | h | Call 0x0,0x68 1015 e5ff | | Load 0x2,-0x1 1016 8069 | i | Call 0x0,0x69 1017 684f |hO | Jump_Zero 0x1067 1018 00d8 | | Load_Top At_Offset_0 1019 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 101a e061 | a | Load 0x0,0x61 101b 017f | | Execute Record,Equal 101c 7005 |p | Jump_Nonzero 0x1022 101d 00d8 | | Load_Top At_Offset_0 101e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 101f e805 | | Load 0x4,0x5 1020 017f | | Execute Record,Equal 1021 6845 |hE | Jump_Zero 0x1067 1022 00d8 | | Load_Top At_Offset_0 1023 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1024 e063 | c | Load 0x0,0x63 1025 027f | | Execute Discrete,Equal 1026 7005 |p | Jump_Nonzero 0x102c 1027 00d8 | | Load_Top At_Offset_0 1028 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1029 e806 | | Load 0x4,0x6 102a 027f | | Execute Discrete,Equal 102b 683b |h; | Jump_Zero 0x1067 102c 00d8 | | Load_Top At_Offset_0 102d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 102e e05c | \ | Load 0x0,0x5c 102f 017f | | Execute Record,Equal 1030 6813 |h | Jump_Zero 0x1044 1031 00d8 | | Load_Top At_Offset_0 1032 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1033 0f02 | | Execute_Immediate Equal,0x2 1034 6804 |h | Jump_Zero 0x1039 1035 00d8 | | Load_Top At_Offset_0 1036 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 1037 a5fb | | Store_Unchecked 0x2,-0x5 1038 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1039 00d8 | | Load_Top At_Offset_0 103a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 103b e403 | | Load 0x2,0x3 103c 027d | } | Execute Discrete,Greater 103d 6805 |h | Jump_Zero 0x1043 103e 00d8 | | Load_Top At_Offset_0 103f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1040 a403 | | Store_Unchecked 0x2,0x3 1041 e407 | | Load 0x2,0x7 1042 a402 | | Store_Unchecked 0x2,0x2 1043 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1044 e804 | | Load 0x4,0x4 1045 700a |p | Jump_Nonzero 0x1050 1046 e802 | | Load 0x4,0x2 1047 e5fc | | Load 0x2,-0x4 1048 803d | = | Call 0x0,0x3d 1049 00d1 | | Pop_Control Pop_Count_1 104a e803 | | Load 0x4,0x3 104b e802 | | Load 0x4,0x2 104c 806f | o | Call 0x0,0x6f 104d 00d2 | | Pop_Control Pop_Count_2 104e 4801 |H | Short_Literal 0x1 104f a804 | | Store_Unchecked 0x4,0x4 1050 e803 | | Load 0x4,0x3 1051 00d9 | | Load_Top At_Offset_1 1052 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1053 8273 | s | Call 0x1,0x73 1054 6812 |h | Jump_Zero 0x1067 1055 00d8 | | Load_Top At_Offset_0 1056 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1057 0f02 | | Execute_Immediate Equal,0x2 1058 6804 |h | Jump_Zero 0x105d 1059 00d8 | | Load_Top At_Offset_0 105a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 105b a5fb | | Store_Unchecked 0x2,-0x5 105c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 105d 00d8 | | Load_Top At_Offset_0 105e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 105f e403 | | Load 0x2,0x3 1060 027d | } | Execute Discrete,Greater 1061 6805 |h | Jump_Zero 0x1067 1062 00d8 | | Load_Top At_Offset_0 1063 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1064 a403 | | Store_Unchecked 0x2,0x3 1065 e407 | | Load 0x2,0x7 1066 a402 | | Store_Unchecked 0x2,0x2 1067 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1068 ; -------------------------------------------------------------------------------------- 1068 ; SUBPROGRAM 1068 ; -------------------------------------------------------------------------------------- 1068 106f | o | .CONST 0x106f ; Address of begin 1069 0004 | | .CONST 0x0004 ; Address of exception handler 106a 0002 | | .CONST 0x0002 ; Number of locals 106b INIT_1068: 106b e80a | | Load 0x4,0xa 106c e257 | W | Load 0x1,0x57 106d 01d5 | | Execute Vector,Field_Reference 106e 0007 | | Action Break_Optional 106f BODY_1068: 106f 00d8 | | Load_Top At_Offset_0 1070 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1071 7003 |p | Jump_Nonzero 0x1075 1072 e5fd | | Load 0x2,-0x3 1073 805e | ^ | Call 0x0,0x5e 1074 6830 |h0 | Jump_Zero 0x10a5 1075 00d8 | | Load_Top At_Offset_0 1076 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1077 e061 | a | Load 0x0,0x61 1078 017f | | Execute Record,Equal 1079 7005 |p | Jump_Nonzero 0x107f 107a 00d8 | | Load_Top At_Offset_0 107b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 107c e802 | | Load 0x4,0x2 107d 017f | | Execute Record,Equal 107e 6826 |h& | Jump_Zero 0x10a5 107f 00d8 | | Load_Top At_Offset_0 1080 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 1081 e063 | c | Load 0x0,0x63 1082 027f | | Execute Discrete,Equal 1083 7005 |p | Jump_Nonzero 0x1089 1084 00d8 | | Load_Top At_Offset_0 1085 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 1086 e803 | | Load 0x4,0x3 1087 027f | | Execute Discrete,Equal 1088 681c |h | Jump_Zero 0x10a5 1089 00d8 | | Load_Top At_Offset_0 108a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 108b e05c | \ | Load 0x0,0x5c 108c 017f | | Execute Record,Equal 108d 6805 |h | Jump_Zero 0x1093 108e 4801 |H | Short_Literal 0x1 108f 00cb | | Action Pop_Block_With_Result 1090 00cb | | Action Pop_Block_With_Result 1091 00cb | | Action Pop_Block_With_Result 1092 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 1093 e804 | | Load 0x4,0x4 1094 7006 |p | Jump_Nonzero 0x109b 1095 e805 | | Load 0x4,0x5 1096 e806 | | Load 0x4,0x6 1097 806f | o | Call 0x0,0x6f 1098 00d2 | | Pop_Control Pop_Count_2 1099 4801 |H | Short_Literal 0x1 109a a804 | | Store_Unchecked 0x4,0x4 109b e805 | | Load 0x4,0x5 109c 00d9 | | Load_Top At_Offset_1 109d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 109e 8273 | s | Call 0x1,0x73 109f 6805 |h | Jump_Zero 0x10a5 10a0 4801 |H | Short_Literal 0x1 10a1 00cb | | Action Pop_Block_With_Result 10a2 00cb | | Action Pop_Block_With_Result 10a3 00cb | | Action Pop_Block_With_Result 10a4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 10a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10a6 0000 0000 | | .XXX[0x2] 10a8 ; -------------------------------------------------------------------------------------- 10a8 ; SUBPROGRAM 10a8 ; -------------------------------------------------------------------------------------- 10a8 10b5 | | .CONST 0x10b5 ; Address of begin 10a9 0004 | | .CONST 0x0004 ; Address of exception handler 10aa 000f | | .CONST 0x000f ; Number of locals 10ab INIT_10a8: 10ab 4804 |H | Short_Literal 0x4 10ac 02cb | | Declare_Variable Entry 10ad 00bf | | Action Accept_Activation 10ae e001 | | Load 0x0,0x1 10af 0322 | " | Declare_Variable Record 10b0 00d8 | | Load_Top At_Offset_0 10b1 1c00 | | Execute_Immediate Run_Utility,0x0 10b2 029f 10c3 | | Declare_Subprogram INIT_10c0,For_Call 10b4 00bc | | Action Signal_Activated 10b5 BODY_10a8: 10b5 0092 1160 | `| Action Push_String_Extended,0x1160 ; "Control.Inner.Creator" 10b7 e002 | | Load 0x0,0x2 10b8 180f | | Execute Package,Field_Execute,Field_Number 0xf 10b9 00cf | | Action Mark_Auxiliary 10ba 820f | | Call 0x1,0xf 10bb 00c9 | | Action Pop_Auxiliary_Loop 10bc 7ffd | | Jump 0x10ba 10bd 0000 0000 | | .XXX[0x3] 10bf 0000 | | 10c0 ; -------------------------------------------------------------------------------------- 10c0 ; SUBPROGRAM 10c0 ; -------------------------------------------------------------------------------------- 10c0 10ca | | .CONST 0x10ca ; Address of begin 10c1 10d0 | | .CONST 0x10d0 ; Address of exception handler 10c2 0002 | | .CONST 0x0002 ; Number of locals 10c3 INIT_10c0: 10c3 480d 4a1b |H J | Declare_Variable Select 0x000, 0x001, 10c5 4800 4801 |H H | [0x000]: 0x001 = 0x0008, 10c7 4800 4801 |H H | [0x00d]: 0x21b = 0x10d8 10c9 02cf | | 10ca BODY_10c0: 10ca 00cf | | Action Mark_Auxiliary 10cb 00d9 | | Load_Top At_Offset_1 10cc 013f | ? | Execute Select,Rendezvous 10cd 00d1 | | Pop_Control Pop_Count_1 10ce 00c9 | | Action Pop_Auxiliary_Loop 10cf 7ffb | | Jump 0x10cb 10d0 TRAP_10c0: 10d0 0007 | | Action Break_Optional 10d1 0092 1161 | a| Action Push_String_Extended,0x1161 ; "Creator: exception:" 10d3 e002 | | Load 0x0,0x2 10d4 180d | | Execute Package,Field_Execute,Field_Number 0xd 10d5 01cc | | Execute Vector,Catenate 10d6 8003 | | Call 0x0,0x3 10d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10d8 ; -------------------------------------------------------------------------------------- 10d8 ; SUBPROGRAM 10d8 ; See instruction 0x02cf at 0x10c3, index=0xd 10d8 ; -------------------------------------------------------------------------------------- 10d8 10db | | .CONST 0x10db ; Address of begin 10d9 0004 | | .CONST 0x0004 ; Address of exception handler 10da 0001 | | .CONST 0x0001 ; Number of locals 10db BODY_10d8: 10db INIT_10d8: 10db 029f 10e3 | | Declare_Subprogram INIT_10e0,For_Call 10dd 8602 | | Call 0x3,0x2 10de 4101 |A | End_Rendezvous 0x1 10df 0000 | | .XXX[0x1] 10e0 ; -------------------------------------------------------------------------------------- 10e0 ; SUBPROGRAM 10e0 ; -------------------------------------------------------------------------------------- 10e0 10e3 | | .CONST 0x10e3 ; Address of begin 10e1 0004 | | .CONST 0x0004 ; Address of exception handler 10e2 0001 | | .CONST 0x0001 ; Number of locals 10e3 BODY_10e0: 10e3 INIT_10e0: 10e3 4800 |H | Short_Literal 0x0 10e4 a7fb | | Store_Unchecked 0x3,-0x5 10e5 e20e | | Load 0x1,0xe 10e6 e7fd | | Load 0x3,-0x3 10e7 8004 | | Call 0x0,0x4 10e8 00d1 | | Pop_Control Pop_Count_1 10e9 e20e | | Load 0x1,0xe 10ea e7fc | | Load 0x3,-0x4 10eb 8005 | | Call 0x0,0x5 10ec 00d1 | | Pop_Control Pop_Count_1 10ed e20e | | Load 0x1,0xe 10ee e7fe | | Load 0x3,-0x2 10ef 8006 | | Call 0x0,0x6 10f0 00d1 | | Pop_Control Pop_Count_1 10f1 8007 | | Call 0x0,0x7 10f2 6807 |h | Jump_Zero 0x10fa 10f3 e7fe | | Load 0x3,-0x2 10f4 e008 | | Load 0x0,0x8 10f5 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 10f6 7003 |p | Jump_Nonzero 0x10fa 10f7 4801 |H | Short_Literal 0x1 10f8 a7fb | | Store_Unchecked 0x3,-0x5 10f9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10fa e009 | | Load 0x0,0x9 10fb 6803 |h | Jump_Zero 0x10ff 10fc 4801 |H | Short_Literal 0x1 10fd a7fb | | Store_Unchecked 0x3,-0x5 10fe 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10ff 00cf | | Action Mark_Auxiliary 1100 e00a | | Load 0x0,0xa 1101 4801 |H | Short_Literal 0x1 1102 0263 | c | Execute Discrete,Above_Bound 1103 700c |p | Jump_Nonzero 0x1110 1104 e7fd | | Load 0x3,-0x3 1105 00d9 | | Load_Top At_Offset_1 1106 e00b | | Load 0x0,0xb 1107 01d7 | | Execute Vector,Field_Read 1108 027f | | Execute Discrete,Equal 1109 6804 |h | Jump_Zero 0x110e 110a 4801 |H | Short_Literal 0x1 110b a7fb | | Store_Unchecked 0x3,-0x5 110c 00d2 | | Pop_Control Pop_Count_2 110d 7802 |x | Jump 0x1110 110e 00c8 | | Action Pop_Auxiliary_Range 110f 3ff4 |? | Loop_Increasing 0x1104 1110 00ce | | Action Pop_Auxiliary 1111 e7fe | | Load 0x3,-0x2 1112 800c | | Call 0x0,0xc 1113 7003 |p | Jump_Nonzero 0x1117 1114 e7fe | | Load 0x3,-0x2 1115 800d | | Call 0x0,0xd 1116 6802 |h | Jump_Zero 0x1119 1117 4801 |H | Short_Literal 0x1 1118 a7fb | | Store_Unchecked 0x3,-0x5 1119 e7fe | | Load 0x3,-0x2 111a 4801 |H | Short_Literal 0x1 111b e00e | | Load 0x0,0xe 111c e00f | | Load 0x0,0xf 111d 00ad | | QQ_Action Package,Field_Execute_Dynamic 111e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 111f ; -------------------------------------------------------------------------------------- 111f ; STRING TABLE 111f ; -------------------------------------------------------------------------------------- 111f 0088 | | .STRTAB 0x0088->0x1163 ; "LOCAL_UNCONSTRAINED" 1120 0099 | | .STRTAB 0x0099->0x116c ; "LOCAL_CONSTRAINED" 1121 00a8 | | .STRTAB 0x00a8->0x1175 ; "GLOBAL_UNCONSTRAINED" 1122 00ba | | .STRTAB 0x00ba->0x117f ; "GLOBAL_CONSTRAINED" 1123 00ca | | .STRTAB 0x00ca->0x1188 ; "Trace requests" 1124 00d6 | | .STRTAB 0x00d6->0x118f ; "New task trace is on" 1125 00e8 | | .STRTAB 0x00e8->0x1199 ; "Inform on task creation mode set" 1126 0106 | | .STRTAB 0x0106->0x11a9 ; "Global stop: " 1127 0111 | | .STRTAB 0x0111->0x11af ; "Aid: " 1128 0114 | | .STRTAB 0x0114->0x11b2 ; "none" 1129 0116 | | .STRTAB 0x0116->0x11b4 ; "New task stop, action =" 112a 012b | + | .STRTAB 0x012b->0x11bf ; "Holding initial registrants" 112b 0144 | D | .STRTAB 0x0144->0x11cd ; "Global stepping: " 112c 0153 | S | .STRTAB 0x0153->0x11d5 ; "Task = " 112d 0158 | X | .STRTAB 0x0158->0x11d9 ; " Count = " 112e 015f | _ | .STRTAB 0x015f->0x11dd ; " Frame restriction = #" 112f 0179 | y | .STRTAB 0x0179->0x11eb ; " Action = " 1130 0181 | | .STRTAB 0x0181->0x11f0 ; "Instruction stepping: " 1131 0195 | | .STRTAB 0x0195->0x11fb ; "None" 1132 0197 | | .STRTAB 0x0197->0x11fd ; "Breakpoints:" 1133 01a1 | | .STRTAB 0x01a1->0x1203 ; " Accelerator load failures: " 1134 01bc | | .STRTAB 0x01bc->0x1212 ; "Break on task creation mode set" 1135 01d9 | | .STRTAB 0x01d9->0x1221 ; "Exception Requests:" 1136 01ea | | .STRTAB 0x01ea->0x122b ; "History requests and status" 1137 0203 | | .STRTAB 0x0203->0x1238 ; "Next_Index = " 1138 020e | | .STRTAB 0x020e->0x123f ; ": Task : " 1139 0215 | | .STRTAB 0x0215->0x1243 ; "Exception Cache (tasks propagating)" 113a 0236 | 6 | .STRTAB 0x0236->0x1255 ; "Process_Action: exception: " 113b 024f | O | .STRTAB 0x024f->0x1262 ; "Creation_Register:" 113c 025f | _ | .STRTAB 0x025f->0x126b ; " [any inst]" 113d 0268 | h | .STRTAB 0x0268->0x1271 ; " [" 113e 0268 | h | .STRTAB 0x0268->0x1272 ; "]" 113f 0267 | g | .STRTAB 0x0267->0x1272 ; " [any sub]" 1140 026f | o | .STRTAB 0x026f->0x1277 ; " [any stmt]" 1141 0278 | x | .STRTAB 0x0278->0x127d ; ": " 1142 0278 | x | .STRTAB 0x0278->0x127e ; " Tracing" 1143 027e | ~ | .STRTAB 0x027e->0x1282 ; " Exc Tracing" 1144 0288 | | .STRTAB 0x0288->0x1288 ; " Stop, action=" 1145 0294 | | .STRTAB 0x0294->0x128f ; " Stepping: " 1146 029d | | .STRTAB 0x029d->0x1294 ; " level=#" 1147 02a3 | | .STRTAB 0x02a3->0x1298 ; " action=" 1148 02a9 | | .STRTAB 0x02a9->0x129c ; " DB mask= " 1149 02b1 | | .STRTAB 0x02b1->0x12a1 ; " exc info:" 114a 02b9 | | .STRTAB 0x02b9->0x12a6 ; " " 114b 02b8 | | .STRTAB 0x02b8->0x12a7 ; "Task=all, Pc=" 114c 02c3 | | .STRTAB 0x02c3->0x12ad ; " Id=" 114d 02c5 | | .STRTAB 0x02c5->0x12af ; " " 114e 02c5 | | .STRTAB 0x02c5->0x12b0 ; " /" 114f 02c5 | | .STRTAB 0x02c5->0x12b1 ; " T" 1150 02c6 | | .STRTAB 0x02c6->0x12b3 ; "Task: " 1151 02ca | | .STRTAB 0x02ca->0x12b6 ; " Pc=" 1152 02cc | | .STRTAB 0x02cc->0x12b8 ; "Id=" 1153 02cd | | .STRTAB 0x02cd->0x12b9 ; "all" 1154 02ce | | .STRTAB 0x02ce->0x12bb ; " Pri=" 1155 02d1 | | .STRTAB 0x02d1->0x12bd ; " Action= " 1156 02d8 | | .STRTAB 0x02d8->0x12c2 ; "Propagate" 1157 02df | | .STRTAB 0x02df->0x12c6 ; "Catch" 1158 02e2 | | .STRTAB 0x02e2->0x12c9 ; "History" 1159 02e7 | | .STRTAB 0x02e7->0x12cc ; "Trace" 115a 02ea | | .STRTAB 0x02ea->0x12cf ; " Exc= " 115b 02ee | | .STRTAB 0x02ee->0x12d2 ; " Low = " 115c 02f3 | | .STRTAB 0x02f3->0x12d5 ; " High = " 115d 02f9 | | .STRTAB 0x02f9->0x12d9 ; " Action=" 115e 02ff | | .STRTAB 0x02ff->0x12dd ; "Action buffer overflow" 115f 0313 | | .STRTAB 0x0313->0x12e8 ; "Aid= " 1160 0316 | | .STRTAB 0x0316->0x12eb ; "Control.Inner.Creator" 1161 0329 | ) | .STRTAB 0x0329->0x12f5 ; "Creator: exception:" 1162 033a | : | .STREND 0x033a->0x12ff 1163 4c4f 4341 |LOCA| .STRTAB_STRINGS 12ff 0000 | | .XXX[0x1] 1300 ; -------------------------------------------------------------------------------------- 1300 ; Debug Table 1300 ; -------------------------------------------------------------------------------------- 1300 0004 0009 | | .DEBUG4 0x0004,0x0009,0x1293,0x0000,0x0001,0x0000 1306 0000 0000 | | .BLANK 0000[0xfa]