|
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: 11264 (0x2c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 1448 | H | .CONST 0x1448 ; 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 800d | | .CONST 0x800d ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 028d | | .CONST 0x028d ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 008f | | .CONST 0x008f ; Number of locals 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 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated 0018 0093 0000 | | push_full_address 0x0 001a 62a1 |b | Indirect_Literal Discrete,0x2bc,{0x80000000, 0x00050000} 001b 0273 | s | Execute Discrete,Plus 001c 0129 | ) | Execute Any,Make_Visible 001d 0093 0000 | | push_full_address 0x0 001f 6298 |b | Indirect_Literal Discrete,0x2b8,{0x80000000, 0x00060000} 0020 0273 | s | Execute Discrete,Plus 0021 0129 | ) | Execute Any,Make_Visible 0022 0093 0000 | | push_full_address 0x0 0024 628f |b | Indirect_Literal Discrete,0x2b4,{0x80000000, 0x00070000} 0025 0273 | s | Execute Discrete,Plus 0026 0129 | ) | Execute Any,Make_Visible 0027 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0029 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 002b 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 002d 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 002f 0093 0000 | | push_full_address 0x0 0031 627e |b~ | Indirect_Literal Discrete,0x2b0,{0x80000000, 0x00080000} 0032 0273 | s | Execute Discrete,Plus 0033 0129 | ) | Execute Any,Make_Visible 0034 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated 0036 0093 0000 | | push_full_address 0x0 0038 6273 |bs | Indirect_Literal Discrete,0x2ac,{0x80000000, 0x00090000} 0039 0273 | s | Execute Discrete,Plus 003a 0129 | ) | Execute Any,Make_Visible 003b 029a 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call,Visible,Unelaborated 003d 0093 0000 | | push_full_address 0x0 003f 6268 |bh | Indirect_Literal Discrete,0x2a8,{0x80000000, 0x000a0000} 0040 0273 | s | Execute Discrete,Plus 0041 0129 | ) | Execute Any,Make_Visible 0042 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 0044 0093 0000 | | push_full_address 0x0 0046 625d |b] | Indirect_Literal Discrete,0x2a4,{0x80000000, 0x000b0000} 0047 0273 | s | Execute Discrete,Plus 0048 0129 | ) | Execute Any,Make_Visible 0049 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated 004b 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated 004d 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated 004f 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0051 029a 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call,Visible,Unelaborated 0053 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 0055 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 0057 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated 0059 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated 005b 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated 005d 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 005f 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0061 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 0063 029a 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Visible,Unelaborated 0065 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 0067 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated 0069 029a 060b | | Declare_Subprogram INIT_0608,For_Outer_Call,Visible,Unelaborated 006b 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated 006d 00bf | | Action Accept_Activation 006e 4800 |H | Short_Literal 0x0 006f 4864 |Hd | Short_Literal 0x64 0070 00e3 | | Load_Encached Natural_Cache 0071 03f8 | | Declare_Type Discrete,Constrained 0072 4800 |H | Short_Literal 0x0 0073 480f |H | Short_Literal 0xf 0074 00e3 | | Load_Encached Natural_Cache 0075 03f8 | | Declare_Type Discrete,Constrained 0076 e004 | | Load 0x0,0x4 0077 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0078 e004 | | Load 0x0,0x4 0079 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 007a 00e3 | | Load_Encached Natural_Cache 007b e004 | | Load 0x0,0x4 007c 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51 007d e004 | | Load 0x0,0x4 007e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007f e004 | | Load 0x0,0x4 0080 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0081 e004 | | Load 0x0,0x4 0082 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0083 e231 | 1 | Load 0x1,0x31 0084 00e1 | | Load_Encached Boolean_Cache 0085 00e1 | | Load_Encached Boolean_Cache 0086 02a0 | | Declare_Subprogram Null_Subprogram 0087 4805 |H | Short_Literal 0x5 0088 032d | - | Declare_Type Record,Defined 0089 4800 |H | Short_Literal 0x0 008a 4864 |Hd | Short_Literal 0x64 008b 00da | | Load_Top At_Offset_2 008c 02a0 | | Declare_Subprogram Null_Subprogram 008d 4801 |H | Short_Literal 0x1 008e 035d | ] | Declare_Type Array,Defined 008f 00d8 | | Load_Top At_Offset_0 0090 0337 | 7 | Declare_Variable Array 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 00e5 | | Load_Encached Long_Integer_Cache 009a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009b 00e1 | | Load_Encached Boolean_Cache 009c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009d 4800 |H | Short_Literal 0x0 009e 4803 |H | Short_Literal 0x3 009f 029f 062b | +| Declare_Subprogram INIT_0628,For_Call 00a1 03fd | | Declare_Type Discrete,Defined 00a2 00e1 | | Load_Encached Boolean_Cache 00a3 00e2 | | Load_Encached Integer_Cache 00a4 e004 | | Load 0x0,0x4 00a5 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00a6 00e3 | | Load_Encached Natural_Cache 00a7 e004 | | Load 0x0,0x4 00a8 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 00a9 00e2 | | Load_Encached Integer_Cache 00aa e004 | | Load 0x0,0x4 00ab 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00ac 00e3 | | Load_Encached Natural_Cache 00ad 00e2 | | Load_Encached Integer_Cache 00ae 00e4 | | Load_Encached Positive_Cache 00af 00e4 | | Load_Encached Positive_Cache 00b0 e005 | | Load 0x0,0x5 00b1 00e2 | | Load_Encached Integer_Cache 00b2 00e1 | | Load_Encached Boolean_Cache 00b3 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call 00b5 4805 |H | Short_Literal 0x5 00b6 032d | - | Declare_Type Record,Defined 00b7 e004 | | Load 0x0,0x4 00b8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b9 e004 | | Load 0x0,0x4 00ba 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00bb 00e4 | | Load_Encached Positive_Cache 00bc 00e4 | | Load_Encached Positive_Cache 00bd e005 | | Load 0x0,0x5 00be 00e2 | | Load_Encached Integer_Cache 00bf 00e1 | | Load_Encached Boolean_Cache 00c0 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call 00c2 4807 |H | Short_Literal 0x7 00c3 032d | - | Declare_Type Record,Defined 00c4 4801 |H | Short_Literal 0x1 00c5 4814 |H | Short_Literal 0x14 00c6 e004 | | Load 0x0,0x4 00c7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c8 02a0 | | Declare_Subprogram Null_Subprogram 00c9 4801 |H | Short_Literal 0x1 00ca 035d | ] | Declare_Type Array,Defined 00cb 00d8 | | Load_Top At_Offset_0 00cc 0337 | 7 | Declare_Variable Array 00cd 4801 |H | Short_Literal 0x1 00ce 4814 |H | Short_Literal 0x14 00cf e24a | J | Load 0x1,0x4a 00d0 029f 0673 | s| Declare_Subprogram INIT_0670,For_Call 00d2 4801 |H | Short_Literal 0x1 00d3 035d | ] | Declare_Type Array,Defined 00d4 00d8 | | Load_Top At_Offset_0 00d5 0337 | 7 | Declare_Variable Array 00d6 00d8 | | Load_Top At_Offset_0 00d7 1c00 | | Execute_Immediate Run_Utility,0x0 00d8 4800 |H | Short_Literal 0x0 00d9 4814 |H | Short_Literal 0x14 00da 00e3 | | Load_Encached Natural_Cache 00db 03f8 | | Declare_Type Discrete,Constrained 00dc 4800 |H | Short_Literal 0x0 00dd 4814 |H | Short_Literal 0x14 00de 00e3 | | Load_Encached Natural_Cache 00df 03f8 | | Declare_Type Discrete,Constrained 00e0 4801 |H | Short_Literal 0x1 00e1 481e |H | Short_Literal 0x1e 00e2 e24b | K | Load 0x1,0x4b 00e3 029f 069b | | Declare_Subprogram INIT_0698,For_Call 00e5 4801 |H | Short_Literal 0x1 00e6 035d | ] | Declare_Type Array,Defined 00e7 00d8 | | Load_Top At_Offset_0 00e8 0337 | 7 | Declare_Variable Array 00e9 00d8 | | Load_Top At_Offset_0 00ea 1c00 | | Execute_Immediate Run_Utility,0x0 00eb 4800 |H | Short_Literal 0x0 00ec 481e |H | Short_Literal 0x1e 00ed 00e3 | | Load_Encached Natural_Cache 00ee 03f8 | | Declare_Type Discrete,Constrained 00ef 4800 |H | Short_Literal 0x0 00f0 481e |H | Short_Literal 0x1e 00f1 00e3 | | Load_Encached Natural_Cache 00f2 03f8 | | Declare_Type Discrete,Constrained 00f3 e004 | | Load 0x0,0x4 00f4 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00f5 e003 | | Load 0x0,0x3 00f6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00f7 e005 | | Load 0x0,0x5 00f8 e006 | | Load 0x0,0x6 00f9 e007 | | Load 0x0,0x7 00fa 00e2 | | Load_Encached Integer_Cache 00fb 029f 06c3 | | Declare_Subprogram INIT_06c0,For_Call 00fd 4806 |H | Short_Literal 0x6 00fe 032d | - | Declare_Type Record,Defined 00ff 4801 |H | Short_Literal 0x1 0100 4814 |H | Short_Literal 0x14 0101 00da | | Load_Top At_Offset_2 0102 029f 06d3 | | Declare_Subprogram INIT_06d0,For_Call 0104 4801 |H | Short_Literal 0x1 0105 035d | ] | Declare_Type Array,Defined 0106 00d8 | | Load_Top At_Offset_0 0107 0337 | 7 | Declare_Variable Array 0108 00d8 | | Load_Top At_Offset_0 0109 1c00 | | Execute_Immediate Run_Utility,0x0 010a 4800 |H | Short_Literal 0x0 010b 4814 |H | Short_Literal 0x14 010c 00e3 | | Load_Encached Natural_Cache 010d 03f8 | | Declare_Type Discrete,Constrained 010e 4800 |H | Short_Literal 0x0 010f 4814 |H | Short_Literal 0x14 0110 00e3 | | Load_Encached Natural_Cache 0111 03f8 | | Declare_Type Discrete,Constrained 0112 e004 | | Load 0x0,0x4 0113 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0114 e003 | | Load 0x0,0x3 0115 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0116 e004 | | Load 0x0,0x4 0117 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0118 e004 | | Load 0x0,0x4 0119 1b0e | | Execute Package,Field_Read,Field_Number 0xe 011a e005 | | Load 0x0,0x5 011b 00e2 | | Load_Encached Integer_Cache 011c 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call 011e 4806 |H | Short_Literal 0x6 011f 032d | - | Declare_Type Record,Defined 0120 4801 |H | Short_Literal 0x1 0121 4814 |H | Short_Literal 0x14 0122 00da | | Load_Top At_Offset_2 0123 029f 070b | | Declare_Subprogram INIT_0708,For_Call 0125 4801 |H | Short_Literal 0x1 0126 035d | ] | Declare_Type Array,Defined 0127 00d8 | | Load_Top At_Offset_0 0128 0337 | 7 | Declare_Variable Array 0129 00d8 | | Load_Top At_Offset_0 012a 1c00 | | Execute_Immediate Run_Utility,0x0 012b 4800 |H | Short_Literal 0x0 012c 4814 |H | Short_Literal 0x14 012d 00e3 | | Load_Encached Natural_Cache 012e 03f8 | | Declare_Type Discrete,Constrained 012f 4800 |H | Short_Literal 0x0 0130 4814 |H | Short_Literal 0x14 0131 00e3 | | Load_Encached Natural_Cache 0132 03f8 | | Declare_Type Discrete,Constrained 0133 4801 |H | Short_Literal 0x1 0134 4be8 |K | Short_Literal 0x3e8 0135 00e5 | | Load_Encached Long_Integer_Cache 0136 03f8 | | Declare_Type Discrete,Constrained 0137 4800 |H | Short_Literal 0x0 0138 4be8 |K | Short_Literal 0x3e8 0139 00e5 | | Load_Encached Long_Integer_Cache 013a 03f8 | | Declare_Type Discrete,Constrained 013b 4801 |H | Short_Literal 0x1 013c 4be8 |K | Short_Literal 0x3e8 013d e008 | | Load 0x0,0x8 013e 029f 0733 | 3| Declare_Subprogram INIT_0730,For_Call 0140 4801 |H | Short_Literal 0x1 0141 035d | ] | Declare_Type Array,Defined 0142 00e5 | | Load_Encached Long_Integer_Cache 0143 02a0 | | Declare_Subprogram Null_Subprogram 0144 4801 |H | Short_Literal 0x1 0145 032d | - | Declare_Type Record,Defined 0146 00d9 | | Load_Top At_Offset_1 0147 0337 | 7 | Declare_Variable Array 0148 00d8 | | Load_Top At_Offset_0 0149 1c00 | | Execute_Immediate Run_Utility,0x0 014a 00d9 | | Load_Top At_Offset_1 014b 0322 | " | Declare_Variable Record 014c e004 | | Load 0x0,0x4 014d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 014e e009 | | Load 0x0,0x9 014f 00e3 | | Load_Encached Natural_Cache 0150 e005 | | Load 0x0,0x5 0151 e006 | | Load 0x0,0x6 0152 e007 | | Load 0x0,0x7 0153 e003 | | Load 0x0,0x3 0154 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0155 00e2 | | Load_Encached Integer_Cache 0156 029f 075b | [| Declare_Subprogram INIT_0758,For_Call 0158 4808 |H | Short_Literal 0x8 0159 032d | - | Declare_Type Record,Defined 015a 4801 |H | Short_Literal 0x1 015b 4828 |H( | Short_Literal 0x28 015c 00da | | Load_Top At_Offset_2 015d 029f 076b | k| Declare_Subprogram INIT_0768,For_Call 015f 4801 |H | Short_Literal 0x1 0160 035d | ] | Declare_Type Array,Defined 0161 00d8 | | Load_Top At_Offset_0 0162 0337 | 7 | Declare_Variable Array 0163 00d8 | | Load_Top At_Offset_0 0164 1c00 | | Execute_Immediate Run_Utility,0x0 0165 4800 |H | Short_Literal 0x0 0166 4828 |H( | Short_Literal 0x28 0167 00e3 | | Load_Encached Natural_Cache 0168 03f8 | | Declare_Type Discrete,Constrained 0169 4800 |H | Short_Literal 0x0 016a 4828 |H( | Short_Literal 0x28 016b 00e3 | | Load_Encached Natural_Cache 016c 03f8 | | Declare_Type Discrete,Constrained 016d 4800 |H | Short_Literal 0x0 016e e002 | | Load 0x0,0x2 016f 0a05 | | Execute_Immediate Plus,0x5 0170 e001 | | Load 0x0,0x1 0171 01d7 | | Execute Vector,Field_Read 0172 02a0 | | Declare_Subprogram Null_Subprogram 0173 038e | | Declare_Type Package,Defined 0174 e001 | | Load 0x0,0x1 0175 e002 | | Load 0x0,0x2 0176 0a04 | | Execute_Immediate Plus,0x4 0177 e001 | | Load 0x0,0x1 0178 01d7 | | Execute Vector,Field_Read 0179 e262 | b | Load 0x1,0x62 017a e261 | a | Load 0x1,0x61 017b 4804 |H | Short_Literal 0x4 017c e26b | k | Load 0x1,0x6b 017d 020e | | Execute Module,Augment_Imports 017e 0387 | | Declare_Variable Package 017f a00a | | Store_Unchecked 0x0,0xa 0180 e00b | | Load 0x0,0xb 0181 a00c | | Store_Unchecked 0x0,0xc 0182 e006 | | Load 0x0,0x6 0183 e007 | | Load 0x0,0x7 0184 a00d | | Store_Unchecked 0x0,0xd 0185 a00e | | Store_Unchecked 0x0,0xe 0186 a00f | | Store_Unchecked 0x0,0xf 0187 e010 | | Load 0x0,0x10 0188 a011 | | Store_Unchecked 0x0,0x11 0189 e012 | | Load 0x0,0x12 018a e004 | | Load 0x0,0x4 018b 480c |H | Short_Literal 0xc 018c e26b | k | Load 0x1,0x6b 018d 020e | | Execute Module,Augment_Imports 018e 00d8 | | Load_Top At_Offset_0 018f 020f | | Execute Module,Activate 0190 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0191 00c7 | | Action Elaborate_Subprogram 0192 4800 |H | Short_Literal 0x0 0193 e002 | | Load 0x0,0x2 0194 0a01 | | Execute_Immediate Plus,0x1 0195 e001 | | Load 0x0,0x1 0196 01d7 | | Execute Vector,Field_Read 0197 00f5 | | Load_Encached Unused21 0198 037d | } | Declare_Type Task,Defined 0199 036f | o | Declare_Variable Task 019a 029d 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call 019c 029d 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call 019e 029d 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call 01a0 029d 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call 01a2 029d 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call 01a4 029d 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call 01a6 029d 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call 01a8 029d 08b3 | | Declare_Subprogram INIT_08b0,For_Outer_Call 01aa 029d 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call 01ac 4800 |H | Short_Literal 0x0 01ad 0093 11db | | push_full_address INIT_11d8 01af 00f5 | | Load_Encached Unused21 01b0 037d | } | Declare_Type Task,Defined 01b1 036f | o | Declare_Variable Task 01b2 e230 | 0 | Load 0x1,0x30 01b3 e004 | | Load 0x0,0x4 01b4 a013 | | Store_Unchecked 0x0,0x13 01b5 e014 | | Load 0x0,0x14 01b6 e015 | | Load 0x0,0x15 01b7 a016 | | Store_Unchecked 0x0,0x16 01b8 e017 | | Load 0x0,0x17 01b9 e018 | | Load 0x0,0x18 01ba e019 | | Load 0x0,0x19 01bb e01a | | Load 0x0,0x1a 01bc e01b | | Load 0x0,0x1b 01bd e239 | 9 | Load 0x1,0x39 01be 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 01bf e01c | | Load 0x0,0x1c 01c0 a01d | | Store_Unchecked 0x0,0x1d 01c1 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 01c2 e268 | h | Load 0x1,0x68 01c3 a01e | | Store_Unchecked 0x0,0x1e 01c4 a011 | | Store_Unchecked 0x0,0x11 01c5 a01f | | Store_Unchecked 0x0,0x1f 01c6 a020 | | Store_Unchecked 0x0,0x20 01c7 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 01c8 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d 01c9 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 01ca 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 01cb 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 01cc 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 01cd 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 01ce 1d70 | p | Execute_Immediate Reference_Lex_1,0x70 01cf 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a 01d0 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 01d1 1d73 | s | Execute_Immediate Reference_Lex_1,0x73 01d2 1d74 | t | Execute_Immediate Reference_Lex_1,0x74 01d3 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 01d4 a021 | ! | Store_Unchecked 0x0,0x21 01d5 a022 | " | Store_Unchecked 0x0,0x22 01d6 a023 | # | Store_Unchecked 0x0,0x23 01d7 a024 | $ | Store_Unchecked 0x0,0x24 01d8 e025 | % | Load 0x0,0x25 01d9 a026 | & | Store_Unchecked 0x0,0x26 01da a027 | ' | Store_Unchecked 0x0,0x27 01db e212 | | Load 0x1,0x12 01dc 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 01dd e24d | M | Load 0x1,0x4d 01de e210 | | Load 0x1,0x10 01df 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 01e0 e253 | S | Load 0x1,0x53 01e1 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 01e2 e211 | | Load 0x1,0x11 01e3 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 01e4 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 01e5 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 01e6 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 01e7 e028 | ( | Load 0x0,0x28 01e8 e029 | ) | Load 0x0,0x29 01e9 e010 | | Load 0x0,0x10 01ea a02a | * | Store_Unchecked 0x0,0x2a 01eb a02b | + | Store_Unchecked 0x0,0x2b 01ec e21b | | Load 0x1,0x1b 01ed 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 01ee 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 01ef e24f | O | Load 0x1,0x4f 01f0 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 01f1 e258 | X | Load 0x1,0x58 01f2 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 01f3 e25d | ] | Load 0x1,0x5d 01f4 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a 01f5 a02c | , | Store_Unchecked 0x0,0x2c 01f6 a02d | - | Store_Unchecked 0x0,0x2d 01f7 e265 | e | Load 0x1,0x65 01f8 e264 | d | Load 0x1,0x64 01f9 a02e | . | Store_Unchecked 0x0,0x2e 01fa a02f | / | Store_Unchecked 0x0,0x2f 01fb e030 | 0 | Load 0x0,0x30 01fc e031 | 1 | Load 0x0,0x31 01fd e00b | | Load 0x0,0xb 01fe a032 | 2 | Store_Unchecked 0x0,0x32 01ff a033 | 3 | Store_Unchecked 0x0,0x33 0200 a034 | 4 | Store_Unchecked 0x0,0x34 0201 a035 | 5 | Store_Unchecked 0x0,0x35 0202 a036 | 6 | Store_Unchecked 0x0,0x36 0203 e037 | 7 | Load 0x0,0x37 0204 a038 | 8 | Store_Unchecked 0x0,0x38 0205 e217 | | Load 0x1,0x17 0206 e219 | | Load 0x1,0x19 0207 e21d | | Load 0x1,0x1d 0208 4856 |HV | Short_Literal 0x56 0209 e26c | l | Load 0x1,0x6c 020a 020e | | Execute Module,Augment_Imports 020b 0007 | | Action Break_Optional 020c 029d 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call 020e 029d 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call 0210 029d 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call 0212 029d 099b | | Declare_Subprogram INIT_0998,For_Outer_Call 0214 029d 09c3 | | Declare_Subprogram INIT_09c0,For_Outer_Call 0216 029d 09d3 | | Declare_Subprogram INIT_09d0,For_Outer_Call 0218 029d 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call 021a e039 | 9 | Load 0x0,0x39 021b e03a | : | Load 0x0,0x3a 021c a03b | ; | Store_Unchecked 0x0,0x3b 021d a03c | < | Store_Unchecked 0x0,0x3c 021e a03d | = | Store_Unchecked 0x0,0x3d 021f a03e | > | Store_Unchecked 0x0,0x3e 0220 a03f | ? | Store_Unchecked 0x0,0x3f 0221 e004 | | Load 0x0,0x4 0222 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 0223 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 0224 e24d | M | Load 0x1,0x4d 0225 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 0226 1d75 | u | Execute_Immediate Reference_Lex_1,0x75 0227 e26c | l | Load 0x1,0x6c 0228 481d |H | Short_Literal 0x1d 0229 480f |H | Short_Literal 0xf 022a e276 | v | Load 0x1,0x76 022b 020e | | Execute Module,Augment_Imports 022c 0007 | | Action Break_Optional 022d 029b 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call,Unelaborated 022f 029d 0b83 | | Declare_Subprogram INIT_0b80,For_Outer_Call 0231 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0232 00c7 | | Action Elaborate_Subprogram 0233 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 0234 00c7 | | Action Elaborate_Subprogram 0235 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0236 00c7 | | Action Elaborate_Subprogram 0237 029d 0ba3 | | Declare_Subprogram INIT_0ba0,For_Outer_Call 0239 029d 0bcb | | Declare_Subprogram INIT_0bc8,For_Outer_Call 023b 1d7e | ~ | Execute_Immediate Reference_Lex_1,0x7e 023c 00c7 | | Action Elaborate_Subprogram 023d 029d 0bf3 | | Declare_Subprogram INIT_0bf0,For_Outer_Call 023f 029d 0c2b | +| Declare_Subprogram INIT_0c28,For_Outer_Call 0241 a040 | @ | Store_Unchecked 0x0,0x40 0242 00c6 | | Action Check_Subprogram_Elaborated 0243 00e1 | | Load_Encached Boolean_Cache 0244 e004 | | Load 0x0,0x4 0245 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0246 1d83 | | Execute_Immediate Reference_Lex_1,0x83 0247 4800 |H | Short_Literal 0x0 0248 0093 0000 | | push_full_address 0x0 024a 6055 |`U | Indirect_Literal Discrete,0x2a0,{0x80000000, 0x00050000} 024b 0273 | s | Execute Discrete,Plus 024c e014 | | Load 0x0,0x14 024d 0273 | s | Execute Discrete,Plus 024e e041 | A | Load 0x0,0x41 024f 0273 | s | Execute Discrete,Plus 0250 4800 |H | Short_Literal 0x0 0251 0007 | | Action Break_Optional 0252 029d 0c43 | C| Declare_Subprogram INIT_0c40,For_Outer_Call 0254 e002 | | Load 0x0,0x2 0255 0a03 | | Execute_Immediate Plus,0x3 0256 e001 | | Load 0x0,0x1 0257 01d7 | | Execute Vector,Field_Read 0258 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 0259 e004 | | Load 0x0,0x4 025a 194a | J | Execute Package,Field_Reference,Field_Number 0x4a 025b 00c6 | | Action Check_Subprogram_Elaborated 025c 1d8b | | Execute_Immediate Reference_Lex_1,0x8b 025d e042 | B | Load 0x0,0x42 025e e043 | C | Load 0x0,0x43 025f 4800 |H | Short_Literal 0x0 0260 0007 | | Action Break_Optional 0261 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0262 00c7 | | Action Elaborate_Subprogram 0263 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0264 00c7 | | Action Elaborate_Subprogram 0265 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0266 00c7 | | Action Elaborate_Subprogram 0267 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0268 00c7 | | Action Elaborate_Subprogram 0269 1d13 | | Execute_Immediate Reference_Lex_1,0x13 026a 00c7 | | Action Elaborate_Subprogram 026b 1d14 | | Execute_Immediate Reference_Lex_1,0x14 026c 00c7 | | Action Elaborate_Subprogram 026d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 026e 00c7 | | Action Elaborate_Subprogram 026f 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0270 00c7 | | Action Elaborate_Subprogram 0271 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0272 00c7 | | Action Elaborate_Subprogram 0273 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0274 00c7 | | Action Elaborate_Subprogram 0275 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0276 00c7 | | Action Elaborate_Subprogram 0277 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0278 00c7 | | Action Elaborate_Subprogram 0279 1d20 | | Execute_Immediate Reference_Lex_1,0x20 027a 00c7 | | Action Elaborate_Subprogram 027b 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 027c 00c7 | | Action Elaborate_Subprogram 027d 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 027e 00c7 | | Action Elaborate_Subprogram 027f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0280 00c7 | | Action Elaborate_Subprogram 0281 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0282 00c7 | | Action Elaborate_Subprogram 0283 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0284 00c7 | | Action Elaborate_Subprogram 0285 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0286 00c7 | | Action Elaborate_Subprogram 0287 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0288 00c7 | | Action Elaborate_Subprogram 0289 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 028a 00c7 | | Action Elaborate_Subprogram 028b 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 028c 00c7 | | Action Elaborate_Subprogram 028d BODY_0008: 028d 00be | | Action Activate_Tasks 028e 00bc | | Action Signal_Activated 028f 00bb | | Action Signal_Completion 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 e5fa | | Load 0x2,-0x6 0294 e5fb | | Load 0x2,-0x5 0295 e5fc | | Load 0x2,-0x4 0296 e5fd | | Load 0x2,-0x3 0297 e5fe | | Load 0x2,-0x2 0298 e5ff | | Load 0x2,-0x1 0299 4806 |H | Short_Literal 0x6 029a e26c | l | Load 0x1,0x6c 029b 170e | | Execute Task,Entry_Call,Field_Number 0xe 029c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 029d 0000 0000 | | .XXX[0x3] 029f 0000 | | 02a0 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 02a4 8000 0000 | | .LITERAL {0x80000000, 0x000b0000} 02a8 8000 0000 | | .LITERAL {0x80000000, 0x000a0000} 02ac 8000 0000 | | .LITERAL {0x80000000, 0x00090000} 02b0 8000 0000 | | .LITERAL {0x80000000, 0x00080000} 02b4 8000 0000 | | .LITERAL {0x80000000, 0x00070000} 02b8 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 02bc 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 00da | | Load_Top At_Offset_2 02c4 4801 |H | Short_Literal 0x1 02c5 e26c | l | Load 0x1,0x6c 02c6 170f | | Execute Task,Entry_Call,Field_Number 0xf 02c7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 e5fd | | Load 0x2,-0x3 02cc e5fe | | Load 0x2,-0x2 02cd e5ff | | Load 0x2,-0x1 02ce 4803 |H | Short_Literal 0x3 02cf e26c | l | Load 0x1,0x6c 02d0 1710 | | Execute Task,Entry_Call,Field_Number 0x10 02d1 00d1 | | Pop_Control Pop_Count_1 02d2 c5fd | | Store 0x2,-0x3 02d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02d4 0000 0000 | | .BLANK 0000[0x4] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db e5fb | | Load 0x2,-0x5 02dc e5fc | | Load 0x2,-0x4 02dd e5fd | | Load 0x2,-0x3 02de e5fe | | Load 0x2,-0x2 02df e5ff | | Load 0x2,-0x1 02e0 4805 |H | Short_Literal 0x5 02e1 e26c | l | Load 0x1,0x6c 02e2 1711 | | Execute Task,Entry_Call,Field_Number 0x11 02e3 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02e4 0000 0000 | | .BLANK 0000[0x4] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02ed | | .CONST 0x02ed ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0002 | | .CONST 0x0002 ; Number of locals 02eb INIT_02e8: 02eb e004 | | Load 0x0,0x4 02ec 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 02ed BODY_02e8: 02ed e5f9 | | Load 0x2,-0x7 02ee 6803 |h | Jump_Zero 0x2f2 02ef e011 | | Load 0x0,0x11 02f0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02f1 7802 |x | Jump 0x2f4 02f2 00db | | Load_Top At_Offset_3 02f3 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02f4 e5f8 | | Load 0x2,-0x8 02f5 00d9 | | Load_Top At_Offset_1 02f6 e5fa | | Load 0x2,-0x6 02f7 e5fb | | Load 0x2,-0x5 02f8 e5fc | | Load 0x2,-0x4 02f9 e5fd | | Load 0x2,-0x3 02fa e5fe | | Load 0x2,-0x2 02fb e5ff | | Load 0x2,-0x1 02fc 4808 |H | Short_Literal 0x8 02fd e26c | l | Load 0x1,0x6c 02fe 1712 | | Execute Task,Entry_Call,Field_Number 0x12 02ff 4508 |E | Exit_Suprogram New_Top_Offset 0x8 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 e5f9 | | Load 0x2,-0x7 0304 e5fa | | Load 0x2,-0x6 0305 e5fb | | Load 0x2,-0x5 0306 e5fc | | Load 0x2,-0x4 0307 e5fd | | Load 0x2,-0x3 0308 e5fe | | Load 0x2,-0x2 0309 e5ff | | Load 0x2,-0x1 030a 4807 |H | Short_Literal 0x7 030b e26c | l | Load 0x1,0x6c 030c 1713 | | Execute Task,Entry_Call,Field_Number 0x13 030d 4508 |E | Exit_Suprogram New_Top_Offset 0x8 030e 0000 0000 | | .XXX[0x2] 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 e5fd | | Load 0x2,-0x3 0314 e5fe | | Load 0x2,-0x2 0315 e5ff | | Load 0x2,-0x1 0316 4803 |H | Short_Literal 0x3 0317 e26c | l | Load 0x1,0x6c 0318 1714 | | Execute Task,Entry_Call,Field_Number 0x14 0319 4504 |E | Exit_Suprogram New_Top_Offset 0x4 031a 0000 0000 | | .BLANK 0000[0x6] 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 e5f8 | | Load 0x2,-0x8 0324 e5f9 | | Load 0x2,-0x7 0325 e5fa | | Load 0x2,-0x6 0326 e5fb | | Load 0x2,-0x5 0327 e5fc | | Load 0x2,-0x4 0328 e5fd | | Load 0x2,-0x3 0329 e5fe | | Load 0x2,-0x2 032a e5ff | | Load 0x2,-0x1 032b 4808 |H | Short_Literal 0x8 032c e26c | l | Load 0x1,0x6c 032d 1715 | | Execute Task,Entry_Call,Field_Number 0x15 032e 4509 |E | Exit_Suprogram New_Top_Offset 0x9 032f 0000 | | .XXX[0x1] 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 e5f9 | | Load 0x2,-0x7 0334 e5fa | | Load 0x2,-0x6 0335 e5fb | | Load 0x2,-0x5 0336 e5fc | | Load 0x2,-0x4 0337 e5fd | | Load 0x2,-0x3 0338 e5fe | | Load 0x2,-0x2 0339 e5ff | | Load 0x2,-0x1 033a 4807 |H | Short_Literal 0x7 033b e26c | l | Load 0x1,0x6c 033c 1716 | | Execute Task,Entry_Call,Field_Number 0x16 033d 4508 |E | Exit_Suprogram New_Top_Offset 0x8 033e 0000 0000 | | .XXX[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 e26c | l | Load 0x1,0x6c 0346 1718 | | Execute Task,Entry_Call,Field_Number 0x18 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 00da | | Load_Top At_Offset_2 034c 4801 |H | Short_Literal 0x1 034d e26c | l | Load 0x1,0x6c 034e 1717 | | Execute Task,Entry_Call,Field_Number 0x17 034f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 00da | | Load_Top At_Offset_2 0354 4801 |H | Short_Literal 0x1 0355 e26c | l | Load 0x1,0x6c 0356 1719 | | Execute Task,Entry_Call,Field_Number 0x19 0357 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 035b | [ | .CONST 0x035b ; Address of begin 0359 0004 | | .CONST 0x0004 ; Address of exception handler 035a 0001 | | .CONST 0x0001 ; Number of locals 035b BODY_0358: 035b INIT_0358: 035b 4800 |H | Short_Literal 0x0 035c e26c | l | Load 0x1,0x6c 035d 171a | | Execute Task,Entry_Call,Field_Number 0x1a 035e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 035f 0000 | | .XXX[0x1] 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 00db | | Load_Top At_Offset_3 0364 00db | | Load_Top At_Offset_3 0365 4802 |H | Short_Literal 0x2 0366 e26c | l | Load 0x1,0x6c 0367 171b | | Execute Task,Entry_Call,Field_Number 0x1b 0368 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0369 0000 0000 | | .BLANK 0000[0x7] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 e241 | A | Load 0x1,0x41 0374 6804 |h | Jump_Zero 0x379 0375 e242 | B | Load 0x1,0x42 0376 00db | | Load_Top At_Offset_3 0377 027f | | Execute Discrete,Equal 0378 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0379 4800 |H | Short_Literal 0x0 037a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 037b 0000 0000 | | .BLANK 0000[0x5] 0380 ; -------------------------------------------------------------------------------------- 0380 ; SUBPROGRAM 0380 ; -------------------------------------------------------------------------------------- 0380 0393 | | .CONST 0x0393 ; Address of begin 0381 0004 | | .CONST 0x0004 ; Address of exception handler 0382 0004 | | .CONST 0x0004 ; Number of locals 0383 INIT_0380: 0383 e039 | 9 | Load 0x0,0x39 0384 0322 | " | Declare_Variable Record 0385 00d8 | | Load_Top At_Offset_0 0386 1c01 | | Execute_Immediate Run_Utility,0x1 0387 e044 | D | Load 0x0,0x44 0388 00d9 | | Load_Top At_Offset_1 0389 017d | } | Execute Record,Structure_Write 038a e004 | | Load 0x0,0x4 038b 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 038c 02c7 | | Declare_Variable Any 038d e5ff | | Load 0x2,-0x1 038e e01c | | Load 0x0,0x1c 038f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0390 a403 | | Store_Unchecked 0x2,0x3 0391 029f 0c63 | c| Declare_Subprogram INIT_0c60,For_Call 0393 BODY_0380: 0393 8404 | | Call 0x2,0x4 0394 00d9 | | Load_Top At_Offset_1 0395 1d8c | | Execute_Immediate Reference_Lex_1,0x8c 0396 1d8d | | Execute_Immediate Reference_Lex_1,0x8d 0397 e004 | | Load 0x0,0x4 0398 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0399 4800 |H | Short_Literal 0x0 039a e5ff | | Load 0x2,-0x1 039b 8038 | 8 | Call 0x0,0x38 039c 4800 |H | Short_Literal 0x0 039d 4800 |H | Short_Literal 0x0 039e e5ff | | Load 0x2,-0x1 039f 8021 | ! | Call 0x0,0x21 03a0 00da | | Load_Top At_Offset_2 03a1 e5ff | | Load 0x2,-0x1 03a2 803e | > | Call 0x0,0x3e 03a3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03a4 0000 0000 | | .BLANK 0000[0x4] 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 e01c | | Load 0x0,0x1c 03ad 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 03ae e004 | | Load 0x0,0x4 03af 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 03b0 6802 |h | Jump_Zero 0x3b3 03b1 4800 |H | Short_Literal 0x0 03b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b3 4801 |H | Short_Literal 0x1 03b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b5 0000 0000 | | .XXX[0x3] 03b7 0000 | | 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bb | | .CONST 0x03bb ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0001 | | .CONST 0x0001 ; Number of locals 03bb BODY_03b8: 03bb INIT_03b8: 03bb 00da | | Load_Top At_Offset_2 03bc 4801 |H | Short_Literal 0x1 03bd e26c | l | Load 0x1,0x6c 03be 171d | | Execute Task,Entry_Call,Field_Number 0x1d 03bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 e5fa | | Load 0x2,-0x6 03c4 e5fb | | Load 0x2,-0x5 03c5 00e3 | | Load_Encached Natural_Cache 03c6 e26b | k | Load 0x1,0x6b 03c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03c8 0322 | " | Declare_Variable Record 03c9 00d8 | | Load_Top At_Offset_0 03ca 1c01 | | Execute_Immediate Run_Utility,0x1 03cb e264 | d | Load 0x1,0x64 03cc e26b | k | Load 0x1,0x6b 03cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03ce 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 03cf 0119 | | Execute Any,Check_In_Formal_Type 03d0 00d9 | | Load_Top At_Offset_1 03d1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03d2 e265 | e | Load 0x1,0x65 03d3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03d4 0aff | | Execute_Immediate Plus,-0x1 03d5 4be8 |K | Short_Literal 0x3e8 03d6 026e | n | Execute Discrete,Modulo 03d7 0a01 | | Execute_Immediate Plus,0x1 03d8 00d9 | | Load_Top At_Offset_1 03d9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03da e265 | e | Load 0x1,0x65 03db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03dc 4be8 |K | Short_Literal 0x3e8 03dd 027d | } | Execute Discrete,Greater 03de 00d9 | | Load_Top At_Offset_1 03df 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03e0 e5fd | | Load 0x2,-0x3 03e1 e5fe | | Load 0x2,-0x2 03e2 e5ff | | Load 0x2,-0x1 03e3 e26b | k | Load 0x1,0x6b 03e4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03e5 c5fc | | Store 0x2,-0x4 03e6 00d1 | | Pop_Control Pop_Count_1 03e7 c5fa | | Store 0x2,-0x6 03e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03e9 0000 0000 | | .BLANK 0000[0x7] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 e23a | : | Load 0x1,0x3a 03f4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 03f5 e23b | ; | Load 0x1,0x3b 03f6 a5fe | | Store_Unchecked 0x2,-0x2 03f7 e23c | < | Load 0x1,0x3c 03f8 a5fd | | Store_Unchecked 0x2,-0x3 03f9 e23d | = | Load 0x1,0x3d 03fa a5fc | | Store_Unchecked 0x2,-0x4 03fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03fc 0000 0000 | | .BLANK 0000[0x4] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0462 | b | .CONST 0x0462 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0025 | % | .CONST 0x0025 ; Number of locals 0403 INIT_0400: 0403 029f 0c73 | s| Declare_Subprogram INIT_0c70,For_Call 0405 029f 0c83 | | Declare_Subprogram INIT_0c80,For_Call 0407 029f 0c9b | | Declare_Subprogram INIT_0c98,For_Call 0409 029f 0cb3 | | Declare_Subprogram INIT_0cb0,For_Call 040b 029f 0ccb | | Declare_Subprogram INIT_0cc8,For_Call 040d 029f 0d1b | | Declare_Subprogram INIT_0d18,For_Call 040f 029f 0d33 | 3| Declare_Subprogram INIT_0d30,For_Call 0411 029f 0d4b | K| Declare_Subprogram INIT_0d48,For_Call 0413 029f 0d63 | c| Declare_Subprogram INIT_0d60,For_Call 0415 a016 | | Store_Unchecked 0x0,0x16 0416 00c6 | | Action Check_Subprogram_Elaborated 0417 00e2 | | Load_Encached Integer_Cache 0418 00e2 | | Load_Encached Integer_Cache 0419 4809 |H | Short_Literal 0x9 041a 4802 |H | Short_Literal 0x2 041b 0099 | | Action Reference_Dynamic 041c 480a |H | Short_Literal 0xa 041d 4802 |H | Short_Literal 0x2 041e 0099 | | Action Reference_Dynamic 041f 0093 0000 | | push_full_address 0x0 0421 619e |a | Indirect_Literal Discrete,0x5c0,{0x80000000, 0x00030000} 0422 0273 | s | Execute Discrete,Plus 0423 e014 | | Load 0x0,0x14 0424 0273 | s | Execute Discrete,Plus 0425 e045 | E | Load 0x0,0x45 0426 0273 | s | Execute Discrete,Plus 0427 4810 |H | Short_Literal 0x10 0428 0007 | | Action Break_Optional 0429 029f 0d7b | {| Declare_Subprogram INIT_0d78,For_Call 042b 029f 0d93 | | Declare_Subprogram INIT_0d90,For_Call 042d a016 | | Store_Unchecked 0x0,0x16 042e 00c6 | | Action Check_Subprogram_Elaborated 042f 00e2 | | Load_Encached Integer_Cache 0430 00e2 | | Load_Encached Integer_Cache 0431 4811 |H | Short_Literal 0x11 0432 4802 |H | Short_Literal 0x2 0433 0099 | | Action Reference_Dynamic 0434 4812 |H | Short_Literal 0x12 0435 4802 |H | Short_Literal 0x2 0436 0099 | | Action Reference_Dynamic 0437 0093 0000 | | push_full_address 0x0 0439 6182 |a | Indirect_Literal Discrete,0x5bc,{0x80000000, 0x00020000} 043a 0273 | s | Execute Discrete,Plus 043b e014 | | Load 0x0,0x14 043c 0273 | s | Execute Discrete,Plus 043d e046 | F | Load 0x0,0x46 043e 0273 | s | Execute Discrete,Plus 043f 4818 |H | Short_Literal 0x18 0440 0007 | | Action Break_Optional 0441 029f 0dab | | Declare_Subprogram INIT_0da8,For_Call 0443 029f 0dc3 | | Declare_Subprogram INIT_0dc0,For_Call 0445 a016 | | Store_Unchecked 0x0,0x16 0446 00c6 | | Action Check_Subprogram_Elaborated 0447 00e2 | | Load_Encached Integer_Cache 0448 00e2 | | Load_Encached Integer_Cache 0449 4819 |H | Short_Literal 0x19 044a 4802 |H | Short_Literal 0x2 044b 0099 | | Action Reference_Dynamic 044c 481a |H | Short_Literal 0x1a 044d 4802 |H | Short_Literal 0x2 044e 0099 | | Action Reference_Dynamic 044f 0093 0000 | | push_full_address 0x0 0451 6166 |af | Indirect_Literal Discrete,0x5b8,{0x80000000, 0x00010000} 0452 0273 | s | Execute Discrete,Plus 0453 e014 | | Load 0x0,0x14 0454 0273 | s | Execute Discrete,Plus 0455 e047 | G | Load 0x0,0x47 0456 0273 | s | Execute Discrete,Plus 0457 4820 |H | Short_Literal 0x20 0458 029f 0ddb | | Declare_Subprogram INIT_0dd8,For_Call 045a 029f 0e1b | | Declare_Subprogram INIT_0e18,For_Call 045c 029f 0e5b | [| Declare_Subprogram INIT_0e58,For_Call 045e 029f 0ecb | | Declare_Subprogram INIT_0ec8,For_Call 0460 029f 0efb | | Declare_Subprogram INIT_0ef8,For_Call 0462 BODY_0400: 0462 e5ff | | Load 0x2,-0x1 0463 00d8 | | Load_Top At_Offset_0 0464 0c0c | | Execute_Immediate Greater_Equal,0xc 0465 7028 |p( | Jump_Nonzero 0x48e 0466 0aff | | Execute_Immediate Plus,-0x1 0467 460a |F | Jump_Case 0xb 0468 792a |y* | Jump 0x593 ; case 0x0 0469 7826 |x& | Jump 0x490 ; case 0x1 046a 7848 |xH | Jump 0x4b3 ; case 0x2 046b 7875 |xu | Jump 0x4e1 ; case 0x3 046c 7897 |x | Jump 0x504 ; case 0x4 046d 78bd |x | Jump 0x52b ; case 0x5 046e 78ca |x | Jump 0x539 ; case 0x6 046f 78da |x | Jump 0x54a ; case 0x7 0470 78ea |x | Jump 0x55b ; case 0x8 0471 78fa |x | Jump 0x56c ; case 0x9 0472 7800 |x | Jump 0x473 ; case 0xa 0473 0092 126b | k| Action Push_String_Extended,0x126b ; "Trace requests" 0475 8048 | H | Call 0x0,0x48 0476 8049 | I | Call 0x0,0x49 0477 8049 | I | Call 0x0,0x49 0478 00cf | | Action Mark_Auxiliary 0479 e259 | Y | Load 0x1,0x59 047a 4801 |H | Short_Literal 0x1 047b 0263 | c | Execute Discrete,Above_Bound 047c 7003 |p | Jump_Nonzero 0x480 047d 8425 | % | Call 0x2,0x25 047e 00c8 | | Action Pop_Auxiliary_Range 047f 3ffd |? | Loop_Increasing 0x47d 0480 00ce | | Action Pop_Auxiliary 0481 e04a | J | Load 0x0,0x4a 0482 6804 |h | Jump_Zero 0x487 0483 0092 126c | l| Action Push_String_Extended,0x126c ; "New task trace is on" 0485 8048 | H | Call 0x0,0x48 0486 8049 | I | Call 0x0,0x49 0487 e04b | K | Load 0x0,0x4b 0488 692e |i. | Jump_Zero 0x5b7 0489 0092 126d | m| Action Push_String_Extended,0x126d ; "Inform on task creation mode set" 048b 8048 | H | Call 0x0,0x48 048c 8049 | I | Call 0x0,0x49 048d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 048e 00d1 | | Pop_Control Pop_Count_1 048f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0490 0092 126e | n| Action Push_String_Extended,0x126e ; "Global stop: " 0492 8048 | H | Call 0x0,0x48 0493 e241 | A | Load 0x1,0x41 0494 6809 |h | Jump_Zero 0x49e 0495 0092 126f | o| Action Push_String_Extended,0x126f ; "Aid: " 0497 e242 | B | Load 0x1,0x42 0498 00e0 | | Load_Encached Standard_Cache 0499 1818 | | Execute Package,Field_Execute,Field_Number 0x18 049a 01cc | | Execute Vector,Catenate 049b 8048 | H | Call 0x0,0x48 049c 8049 | I | Call 0x0,0x49 049d 7804 |x | Jump 0x4a2 049e 0092 1270 | p| Action Push_String_Extended,0x1270 ; "none" 04a0 8048 | H | Call 0x0,0x48 04a1 8049 | I | Call 0x0,0x49 04a2 e02d | - | Load 0x0,0x2d 04a3 6808 |h | Jump_Zero 0x4ac 04a4 0092 1271 | q| Action Push_String_Extended,0x1271 ; "New task stop, action =" 04a6 e02c | , | Load 0x0,0x2c 04a7 00e0 | | Load_Encached Standard_Cache 04a8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04a9 01cc | | Execute Vector,Catenate 04aa 8048 | H | Call 0x0,0x48 04ab 8049 | I | Call 0x0,0x49 04ac e04c | L | Load 0x0,0x4c 04ad 6909 |i | Jump_Zero 0x5b7 04ae 0092 1272 | r| Action Push_String_Extended,0x1272 ; "Holding initial registrants" 04b0 8048 | H | Call 0x0,0x48 04b1 8049 | I | Call 0x0,0x49 04b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04b3 0092 1273 | s| Action Push_String_Extended,0x1273 ; "Global stepping: " 04b5 8048 | H | Call 0x0,0x48 04b6 e243 | C | Load 0x1,0x43 04b7 e011 | | Load 0x0,0x11 04b8 027f | | Execute Discrete,Equal 04b9 7021 |p! | Jump_Nonzero 0x4db 04ba 0092 1274 | t| Action Push_String_Extended,0x1274 ; "Task = " 04bc e243 | C | Load 0x1,0x43 04bd 804d | M | Call 0x0,0x4d 04be 01cc | | Execute Vector,Catenate 04bf 0092 1275 | u| Action Push_String_Extended,0x1275 ; " Count = " 04c1 01cc | | Execute Vector,Catenate 04c2 e244 | D | Load 0x1,0x44 04c3 00e0 | | Load_Encached Standard_Cache 04c4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04c5 01cc | | Execute Vector,Catenate 04c6 8048 | H | Call 0x0,0x48 04c7 8049 | I | Call 0x0,0x49 04c8 0092 1276 | v| Action Push_String_Extended,0x1276 ; " Frame restriction = #" 04ca 8048 | H | Call 0x0,0x48 04cb 4820 |H | Short_Literal 0x20 04cc 4800 |H | Short_Literal 0x0 04cd 4810 |H | Short_Literal 0x10 04ce e245 | E | Load 0x1,0x45 04cf e04e | N | Load 0x0,0x4e 04d0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04d1 0092 1277 | w| Action Push_String_Extended,0x1277 ; " Action = " 04d3 01cc | | Execute Vector,Catenate 04d4 e246 | F | Load 0x1,0x46 04d5 00e0 | | Load_Encached Standard_Cache 04d6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04d7 01cc | | Execute Vector,Catenate 04d8 8048 | H | Call 0x0,0x48 04d9 8049 | I | Call 0x0,0x49 04da 7804 |x | Jump 0x4df 04db 0092 1270 | p| Action Push_String_Extended,0x1270 ; "none" 04dd 8048 | H | Call 0x0,0x48 04de 8049 | I | Call 0x0,0x49 04df 8049 | I | Call 0x0,0x49 04e0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04e1 0092 1278 | x| Action Push_String_Extended,0x1278 ; "Instruction stepping: " 04e3 8048 | H | Call 0x0,0x48 04e4 e247 | G | Load 0x1,0x47 04e5 e011 | | Load 0x0,0x11 04e6 027f | | Execute Discrete,Equal 04e7 7016 |p | Jump_Nonzero 0x4fe 04e8 0092 1274 | t| Action Push_String_Extended,0x1274 ; "Task = " 04ea 8048 | H | Call 0x0,0x48 04eb e247 | G | Load 0x1,0x47 04ec 804d | M | Call 0x0,0x4d 04ed 0092 1275 | u| Action Push_String_Extended,0x1275 ; " Count = " 04ef 01cc | | Execute Vector,Catenate 04f0 e248 | H | Load 0x1,0x48 04f1 00e0 | | Load_Encached Standard_Cache 04f2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04f3 01cc | | Execute Vector,Catenate 04f4 0092 1277 | w| Action Push_String_Extended,0x1277 ; " Action = " 04f6 01cc | | Execute Vector,Catenate 04f7 e249 | I | Load 0x1,0x49 04f8 00e0 | | Load_Encached Standard_Cache 04f9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04fa 01cc | | Execute Vector,Catenate 04fb 8048 | H | Call 0x0,0x48 04fc 8049 | I | Call 0x0,0x49 04fd 7804 |x | Jump 0x502 04fe 0092 1279 | y| Action Push_String_Extended,0x1279 ; "None" 0500 8048 | H | Call 0x0,0x48 0501 8049 | I | Call 0x0,0x49 0502 8049 | I | Call 0x0,0x49 0503 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0504 0092 127a | z| Action Push_String_Extended,0x127a ; "Breakpoints:" 0506 8048 | H | Call 0x0,0x48 0507 8049 | I | Call 0x0,0x49 0508 e23e | > | Load 0x1,0x3e 0509 6808 |h | Jump_Zero 0x512 050a 0092 127b | {| Action Push_String_Extended,0x127b ; " Accelerator load failures: " 050c e23e | > | Load 0x1,0x3e 050d 00e0 | | Load_Encached Standard_Cache 050e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 050f 01cc | | Execute Vector,Catenate 0510 8048 | H | Call 0x0,0x48 0511 8049 | I | Call 0x0,0x49 0512 00cf | | Action Mark_Auxiliary 0513 e250 | P | Load 0x1,0x50 0514 4801 |H | Short_Literal 0x1 0515 0263 | c | Execute Discrete,Above_Bound 0516 7003 |p | Jump_Nonzero 0x51a 0517 8421 | ! | Call 0x2,0x21 0518 00c8 | | Action Pop_Auxiliary_Range 0519 3ffd |? | Loop_Increasing 0x517 051a 00c9 | | Action Pop_Auxiliary_Loop 051b e254 | T | Load 0x1,0x54 051c 4801 |H | Short_Literal 0x1 051d 0263 | c | Execute Discrete,Above_Bound 051e 7003 |p | Jump_Nonzero 0x522 051f 8422 | " | Call 0x2,0x22 0520 00c8 | | Action Pop_Auxiliary_Range 0521 3ffd |? | Loop_Increasing 0x51f 0522 00ce | | Action Pop_Auxiliary 0523 e04f | O | Load 0x0,0x4f 0524 6804 |h | Jump_Zero 0x529 0525 0092 127c | || Action Push_String_Extended,0x127c ; "Break on task creation mode set" 0527 8048 | H | Call 0x0,0x48 0528 8049 | I | Call 0x0,0x49 0529 8049 | I | Call 0x0,0x49 052a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 052b 0092 127d | }| Action Push_String_Extended,0x127d ; "Exception Requests:" 052d 8048 | H | Call 0x0,0x48 052e 8049 | I | Call 0x0,0x49 052f 00cf | | Action Mark_Auxiliary 0530 e269 | i | Load 0x1,0x69 0531 4801 |H | Short_Literal 0x1 0532 0263 | c | Execute Discrete,Above_Bound 0533 7003 |p | Jump_Nonzero 0x537 0534 8423 | # | Call 0x2,0x23 0535 00c8 | | Action Pop_Auxiliary_Range 0536 3ffd |? | Loop_Increasing 0x534 0537 00ce | | Action Pop_Auxiliary 0538 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0539 e024 | $ | Load 0x0,0x24 053a 00d8 | | Load_Top At_Offset_0 053b e40b | | Load 0x2,0xb 053c e40c | | Load 0x2,0xc 053d 480d |H | Short_Literal 0xd 053e 4802 |H | Short_Literal 0x2 053f 0099 | | Action Reference_Dynamic 0540 480e |H | Short_Literal 0xe 0541 4802 |H | Short_Literal 0x2 0542 0099 | | Action Reference_Dynamic 0543 480f |H | Short_Literal 0xf 0544 4802 |H | Short_Literal 0x2 0545 0099 | | Action Reference_Dynamic 0546 8016 | | Call 0x0,0x16 0547 c024 | $ | Store 0x0,0x24 0548 8049 | I | Call 0x0,0x49 0549 4502 |E | Exit_Suprogram New_Top_Offset 0x2 054a e024 | $ | Load 0x0,0x24 054b 00d8 | | Load_Top At_Offset_0 054c e413 | | Load 0x2,0x13 054d e414 | | Load 0x2,0x14 054e 4815 |H | Short_Literal 0x15 054f 4802 |H | Short_Literal 0x2 0550 0099 | | Action Reference_Dynamic 0551 4816 |H | Short_Literal 0x16 0552 4802 |H | Short_Literal 0x2 0553 0099 | | Action Reference_Dynamic 0554 4817 |H | Short_Literal 0x17 0555 4802 |H | Short_Literal 0x2 0556 0099 | | Action Reference_Dynamic 0557 8016 | | Call 0x0,0x16 0558 c024 | $ | Store 0x0,0x24 0559 8049 | I | Call 0x0,0x49 055a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 055b e024 | $ | Load 0x0,0x24 055c 00d8 | | Load_Top At_Offset_0 055d e41b | | Load 0x2,0x1b 055e e41c | | Load 0x2,0x1c 055f 481d |H | Short_Literal 0x1d 0560 4802 |H | Short_Literal 0x2 0561 0099 | | Action Reference_Dynamic 0562 481e |H | Short_Literal 0x1e 0563 4802 |H | Short_Literal 0x2 0564 0099 | | Action Reference_Dynamic 0565 481f |H | Short_Literal 0x1f 0566 4802 |H | Short_Literal 0x2 0567 0099 | | Action Reference_Dynamic 0568 8016 | | Call 0x0,0x16 0569 c024 | $ | Store 0x0,0x24 056a 8049 | I | Call 0x0,0x49 056b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 056c 0092 127e | ~| Action Push_String_Extended,0x127e ; "History requests and status" 056e 8048 | H | Call 0x0,0x48 056f 8049 | I | Call 0x0,0x49 0570 8049 | I | Call 0x0,0x49 0571 0092 127f | | Action Push_String_Extended,0x127f ; "Next_Index = " 0573 e265 | e | Load 0x1,0x65 0574 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0575 00e0 | | Load_Encached Standard_Cache 0576 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0577 01cc | | Execute Vector,Catenate 0578 8048 | H | Call 0x0,0x48 0579 8049 | I | Call 0x0,0x49 057a 00cf | | Action Mark_Auxiliary 057b e25e | ^ | Load 0x1,0x5e 057c 4801 |H | Short_Literal 0x1 057d 0263 | c | Execute Discrete,Above_Bound 057e 7011 |p | Jump_Nonzero 0x590 057f 00d8 | | Load_Top At_Offset_0 0580 e25d | ] | Load 0x1,0x5d 0581 01d5 | | Execute Vector,Field_Reference 0582 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0583 e01e | | Load 0x0,0x1e 0584 027e | ~ | Execute Discrete,Not_Equal 0585 6808 |h | Jump_Zero 0x58e 0586 00d8 | | Load_Top At_Offset_0 0587 00e0 | | Load_Encached Standard_Cache 0588 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0589 0092 1280 | | Action Push_String_Extended,0x1280 ; ": Task : " 058b 01cc | | Execute Vector,Catenate 058c 8048 | H | Call 0x0,0x48 058d 8424 | $ | Call 0x2,0x24 058e 00c8 | | Action Pop_Auxiliary_Range 058f 3fef |? | Loop_Increasing 0x57f 0590 00ce | | Action Pop_Auxiliary 0591 8049 | I | Call 0x0,0x49 0592 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0593 0092 1281 | | Action Push_String_Extended,0x1281 ; "Exception Cache (tasks propagating)" 0595 8048 | H | Call 0x0,0x48 0596 8049 | I | Call 0x0,0x49 0597 00cf | | Action Mark_Auxiliary 0598 4864 |Hd | Short_Literal 0x64 0599 4800 |H | Short_Literal 0x0 059a 0007 | | Action Break_Optional 059b 00d8 | | Load_Top At_Offset_0 059c e239 | 9 | Load 0x1,0x39 059d 01d5 | | Execute Vector,Field_Reference 059e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 059f 6813 |h | Jump_Zero 0x5b3 05a0 00d8 | | Load_Top At_Offset_0 05a1 e239 | 9 | Load 0x1,0x39 05a2 01d5 | | Execute Vector,Field_Reference 05a3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 05a4 680e |h | Jump_Zero 0x5b3 05a5 00d8 | | Load_Top At_Offset_0 05a6 e239 | 9 | Load 0x1,0x39 05a7 01d5 | | Execute Vector,Field_Reference 05a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05a9 804d | M | Call 0x0,0x4d 05aa 00d9 | | Load_Top At_Offset_1 05ab e239 | 9 | Load 0x1,0x39 05ac 01d5 | | Execute Vector,Field_Reference 05ad 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 05ae 00e0 | | Load_Encached Standard_Cache 05af 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05b0 01cc | | Execute Vector,Catenate 05b1 8048 | H | Call 0x0,0x48 05b2 8049 | I | Call 0x0,0x49 05b3 00c8 | | Action Pop_Auxiliary_Range 05b4 3fe6 |? | Loop_Increasing 0x59b 05b5 00ce | | Action Pop_Auxiliary 05b6 8049 | I | Call 0x0,0x49 05b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b8 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 05bc 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 05c0 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 05c4 0000 0000 | | .BLANK 0000[0x4] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cb | | .CONST 0x05cb ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0001 | | .CONST 0x0001 ; Number of locals 05cb BODY_05c8: 05cb INIT_05c8: 05cb 4800 |H | Short_Literal 0x0 05cc a241 | A | Store_Unchecked 0x1,0x41 05cd e011 | | Load 0x0,0x11 05ce a243 | C | Store_Unchecked 0x1,0x43 05cf e011 | | Load 0x0,0x11 05d0 a247 | G | Store_Unchecked 0x1,0x47 05d1 4800 |H | Short_Literal 0x0 05d2 a250 | P | Store_Unchecked 0x1,0x50 05d3 4800 |H | Short_Literal 0x0 05d4 a251 | Q | Store_Unchecked 0x1,0x51 05d5 4800 |H | Short_Literal 0x0 05d6 a254 | T | Store_Unchecked 0x1,0x54 05d7 4800 |H | Short_Literal 0x0 05d8 a255 | U | Store_Unchecked 0x1,0x55 05d9 4800 |H | Short_Literal 0x0 05da a259 | Y | Store_Unchecked 0x1,0x59 05db 4800 |H | Short_Literal 0x0 05dc a25a | Z | Store_Unchecked 0x1,0x5a 05dd 4800 |H | Short_Literal 0x0 05de a269 | i | Store_Unchecked 0x1,0x69 05df 4800 |H | Short_Literal 0x0 05e0 a26a | j | Store_Unchecked 0x1,0x6a 05e1 4800 |H | Short_Literal 0x0 05e2 a25e | ^ | Store_Unchecked 0x1,0x5e 05e3 4800 |H | Short_Literal 0x0 05e4 a25f | _ | Store_Unchecked 0x1,0x5f 05e5 4800 |H | Short_Literal 0x0 05e6 e265 | e | Load 0x1,0x65 05e7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05e8 00cf | | Action Mark_Auxiliary 05e9 e264 | d | Load 0x1,0x64 05ea 01d9 | | Execute Vector,Reverse_Bounds 05eb 0007 | | Action Break_Optional 05ec 802e | . | Call 0x0,0x2e 05ed 00d9 | | Load_Top At_Offset_1 05ee e264 | d | Load 0x1,0x64 05ef 01d6 | | Execute Vector,Field_Write 05f0 00c8 | | Action Pop_Auxiliary_Range 05f1 3ffa |? | Loop_Increasing 0x5ec 05f2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05f3 0000 0000 | | .BLANK 0000[0x5] 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 4800 |H | Short_Literal 0x0 05fc e26c | l | Load 0x1,0x6c 05fd 1720 | | Execute Task,Entry_Call,Field_Number 0x20 05fe 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05ff 0000 | | .XXX[0x1] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0603 | | .CONST 0x0603 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0001 | | .CONST 0x0001 ; Number of locals 0603 BODY_0600: 0603 INIT_0600: 0603 00da | | Load_Top At_Offset_2 0604 a23f | ? | Store_Unchecked 0x1,0x3f 0605 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0606 0000 0000 | | .XXX[0x2] 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 e5fd | | Load 0x2,-0x3 060c 00e3 | | Load_Encached Natural_Cache 060d e5ff | | Load 0x2,-0x1 060e 4803 |H | Short_Literal 0x3 060f e26c | l | Load 0x1,0x6c 0610 1721 | ! | Execute Task,Entry_Call,Field_Number 0x21 0611 c5fe | | Store 0x2,-0x2 0612 c5fd | | Store 0x2,-0x3 0613 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0614 0000 0000 | | .BLANK 0000[0x4] 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 061b | | .CONST 0x061b ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0001 | | .CONST 0x0001 ; Number of locals 061b BODY_0618: 061b INIT_0618: 061b 4800 |H | Short_Literal 0x0 061c e276 | v | Load 0x1,0x76 061d 170e | | Execute Task,Entry_Call,Field_Number 0xe 061e 4800 |H | Short_Literal 0x0 061f e26c | l | Load 0x1,0x6c 0620 1722 | " | Execute Task,Entry_Call,Field_Number 0x22 0621 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0622 0000 0000 | | .BLANK 0000[0x6] 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 062b | + | .CONST 0x062b ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0001 | | .CONST 0x0001 ; Number of locals 062b BODY_0628: 062b INIT_0628: 062b 4607 |F | Jump_Case 0x8 062c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 062d 7807 |x | Jump 0x635 ; case 0x1 062e 780a |x | Jump 0x639 ; case 0x2 062f 780e |x | Jump 0x63e ; case 0x3 0630 7811 |x | Jump 0x642 ; case 0x4 0631 7812 |x | Jump 0x644 ; case 0x5 0632 7813 |x | Jump 0x646 ; case 0x6 0633 7816 |x | Jump 0x64a ; case 0x7 0634 4302 |C | .XXX[0x1] 0635 00da | | Load_Top At_Offset_2 0636 0091 1267 | g| Action Push_String_Extended_Indexed,0x1267 ; "LOCAL_UNCONSTRAINED" 0638 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0639 00db | | Load_Top At_Offset_3 063a 00db | | Load_Top At_Offset_3 063b 00e0 | | Load_Encached Standard_Cache 063c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 063d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 063e 00da | | Load_Top At_Offset_2 063f 00e0 | | Load_Encached Standard_Cache 0640 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0641 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0642 00db | | Load_Top At_Offset_3 0643 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0644 00db | | Load_Top At_Offset_3 0645 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0646 e240 | @ | Load 0x1,0x40 0647 00dc | | Load_Top At_Offset_4 0648 0267 | g | Execute Discrete,Predecessor 0649 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 064a e240 | @ | Load 0x1,0x40 064b 00dc | | Load_Top At_Offset_4 064c 0268 | h | Execute Discrete,Successor 064d 4202 |B | Exit_Subprogram From_Utility,With_Result,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 4601 |F | Jump_Case 0x2 0654 7801 |x | Jump 0x656 ; case 0x0 0655 7804 |x | Jump 0x65a ; case 0x1 0656 00da | | Load_Top At_Offset_2 0657 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0658 1c00 | | Execute_Immediate Run_Utility,0x0 0659 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 065a 00da | | Load_Top At_Offset_2 065b 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 065c 1c01 | | Execute_Immediate Run_Utility,0x1 065d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 065e 0000 0000 | | .XXX[0x2] 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 0663 | c | .CONST 0x0663 ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0001 | | .CONST 0x0001 ; Number of locals 0663 BODY_0660: 0663 INIT_0660: 0663 4601 |F | Jump_Case 0x2 0664 7801 |x | Jump 0x666 ; case 0x0 0665 7804 |x | Jump 0x66a ; case 0x1 0666 00da | | Load_Top At_Offset_2 0667 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0668 1c00 | | Execute_Immediate Run_Utility,0x0 0669 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 066a 00da | | Load_Top At_Offset_2 066b 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 066c 1c01 | | Execute_Immediate Run_Utility,0x1 066d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 066e 0000 0000 | | .XXX[0x2] 0670 ; -------------------------------------------------------------------------------------- 0670 ; SUBPROGRAM 0670 ; -------------------------------------------------------------------------------------- 0670 0673 | s | .CONST 0x0673 ; Address of begin 0671 0004 | | .CONST 0x0004 ; Address of exception handler 0672 0001 | | .CONST 0x0001 ; Number of locals 0673 BODY_0670: 0673 INIT_0670: 0673 4605 |F | Jump_Case 0x6 0674 7804 |x | Jump 0x679 ; case 0x0 0675 7815 |x | Jump 0x68b ; case 0x1 0676 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0677 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0678 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0679 00da | | Load_Top At_Offset_2 ; case 0x5 067a 01d8 | | Execute Vector,Element_Type 067b 0322 | " | Declare_Variable Record 067c 00d8 | | Load_Top At_Offset_0 067d 1c00 | | Execute_Immediate Run_Utility,0x0 067e 00db | | Load_Top At_Offset_3 067f 01dc | | Execute Vector,Last 0680 e5ff | | Load 0x2,-0x1 0681 01dd | | Execute Vector,First 0682 0263 | c | Execute Discrete,Above_Bound 0683 7006 |p | Jump_Nonzero 0x68a 0684 00da | | Load_Top At_Offset_2 0685 00d9 | | Load_Top At_Offset_1 0686 e5ff | | Load 0x2,-0x1 0687 01d6 | | Execute Vector,Field_Write 0688 0a01 | | Execute_Immediate Plus,0x1 0689 7ff8 | | Jump 0x682 068a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 068b 00da | | Load_Top At_Offset_2 068c 01dc | | Execute Vector,Last 068d 00db | | Load_Top At_Offset_3 068e 01dd | | Execute Vector,First 068f 0263 | c | Execute Discrete,Above_Bound 0690 7006 |p | Jump_Nonzero 0x697 0691 00d8 | | Load_Top At_Offset_0 0692 e5ff | | Load 0x2,-0x1 0693 01d7 | | Execute Vector,Field_Read 0694 1c01 | | Execute_Immediate Run_Utility,0x1 0695 0a01 | | Execute_Immediate Plus,0x1 0696 7ff8 | | Jump 0x68f 0697 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0001 | | .CONST 0x0001 ; Number of locals 069b BODY_0698: 069b INIT_0698: 069b 4605 |F | Jump_Case 0x6 069c 7804 |x | Jump 0x6a1 ; case 0x0 069d 7815 |x | Jump 0x6b3 ; case 0x1 069e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 069f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 06a0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 06a1 00da | | Load_Top At_Offset_2 ; case 0x5 06a2 01d8 | | Execute Vector,Element_Type 06a3 0322 | " | Declare_Variable Record 06a4 00d8 | | Load_Top At_Offset_0 06a5 1c00 | | Execute_Immediate Run_Utility,0x0 06a6 00db | | Load_Top At_Offset_3 06a7 01dc | | Execute Vector,Last 06a8 e5ff | | Load 0x2,-0x1 06a9 01dd | | Execute Vector,First 06aa 0263 | c | Execute Discrete,Above_Bound 06ab 7006 |p | Jump_Nonzero 0x6b2 06ac 00da | | Load_Top At_Offset_2 06ad 00d9 | | Load_Top At_Offset_1 06ae e5ff | | Load 0x2,-0x1 06af 01d6 | | Execute Vector,Field_Write 06b0 0a01 | | Execute_Immediate Plus,0x1 06b1 7ff8 | | Jump 0x6aa 06b2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06b3 00da | | Load_Top At_Offset_2 06b4 01dc | | Execute Vector,Last 06b5 00db | | Load_Top At_Offset_3 06b6 01dd | | Execute Vector,First 06b7 0263 | c | Execute Discrete,Above_Bound 06b8 7006 |p | Jump_Nonzero 0x6bf 06b9 00d8 | | Load_Top At_Offset_0 06ba e5ff | | Load 0x2,-0x1 06bb 01d7 | | Execute Vector,Field_Read 06bc 1c01 | | Execute_Immediate Run_Utility,0x1 06bd 0a01 | | Execute_Immediate Plus,0x1 06be 7ff8 | | Jump 0x6b7 06bf 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c3 | | .CONST 0x06c3 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0001 | | .CONST 0x0001 ; Number of locals 06c3 BODY_06c0: 06c3 INIT_06c0: 06c3 4601 |F | Jump_Case 0x2 06c4 7801 |x | Jump 0x6c6 ; case 0x0 06c5 7804 |x | Jump 0x6ca ; case 0x1 06c6 00da | | Load_Top At_Offset_2 06c7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06c8 1c00 | | Execute_Immediate Run_Utility,0x0 06c9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06ca 00da | | Load_Top At_Offset_2 06cb 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06cc 1c01 | | Execute_Immediate Run_Utility,0x1 06cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06ce 0000 0000 | | .XXX[0x2] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06d3 | | .CONST 0x06d3 ; Address of begin 06d1 0004 | | .CONST 0x0004 ; Address of exception handler 06d2 0001 | | .CONST 0x0001 ; Number of locals 06d3 BODY_06d0: 06d3 INIT_06d0: 06d3 4605 |F | Jump_Case 0x6 06d4 7804 |x | Jump 0x6d9 ; case 0x0 06d5 7815 |x | Jump 0x6eb ; case 0x1 06d6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 06d7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 06d8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 06d9 00da | | Load_Top At_Offset_2 ; case 0x5 06da 01d8 | | Execute Vector,Element_Type 06db 0322 | " | Declare_Variable Record 06dc 00d8 | | Load_Top At_Offset_0 06dd 1c00 | | Execute_Immediate Run_Utility,0x0 06de 00db | | Load_Top At_Offset_3 06df 01dc | | Execute Vector,Last 06e0 e5ff | | Load 0x2,-0x1 06e1 01dd | | Execute Vector,First 06e2 0263 | c | Execute Discrete,Above_Bound 06e3 7006 |p | Jump_Nonzero 0x6ea 06e4 00da | | Load_Top At_Offset_2 06e5 00d9 | | Load_Top At_Offset_1 06e6 e5ff | | Load 0x2,-0x1 06e7 01d6 | | Execute Vector,Field_Write 06e8 0a01 | | Execute_Immediate Plus,0x1 06e9 7ff8 | | Jump 0x6e2 06ea 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06eb 00da | | Load_Top At_Offset_2 06ec 01dc | | Execute Vector,Last 06ed 00db | | Load_Top At_Offset_3 06ee 01dd | | Execute Vector,First 06ef 0263 | c | Execute Discrete,Above_Bound 06f0 7006 |p | Jump_Nonzero 0x6f7 06f1 00d8 | | Load_Top At_Offset_0 06f2 e5ff | | Load 0x2,-0x1 06f3 01d7 | | Execute Vector,Field_Read 06f4 1c01 | | Execute_Immediate Run_Utility,0x1 06f5 0a01 | | Execute_Immediate Plus,0x1 06f6 7ff8 | | Jump 0x6ef 06f7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fb | | .CONST 0x06fb ; Address of begin 06f9 0004 | | .CONST 0x0004 ; Address of exception handler 06fa 0001 | | .CONST 0x0001 ; Number of locals 06fb BODY_06f8: 06fb INIT_06f8: 06fb 4601 |F | Jump_Case 0x2 06fc 7801 |x | Jump 0x6fe ; case 0x0 06fd 7804 |x | Jump 0x702 ; case 0x1 06fe 00da | | Load_Top At_Offset_2 06ff 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0700 1c00 | | Execute_Immediate Run_Utility,0x0 0701 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0702 00da | | Load_Top At_Offset_2 0703 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0704 1c01 | | Execute_Immediate Run_Utility,0x1 0705 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0706 0000 0000 | | .XXX[0x2] 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 070b | | .CONST 0x070b ; Address of begin 0709 0004 | | .CONST 0x0004 ; Address of exception handler 070a 0001 | | .CONST 0x0001 ; Number of locals 070b BODY_0708: 070b INIT_0708: 070b 4605 |F | Jump_Case 0x6 070c 7804 |x | Jump 0x711 ; case 0x0 070d 7815 |x | Jump 0x723 ; case 0x1 070e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 070f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0710 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0711 00da | | Load_Top At_Offset_2 ; case 0x5 0712 01d8 | | Execute Vector,Element_Type 0713 0322 | " | Declare_Variable Record 0714 00d8 | | Load_Top At_Offset_0 0715 1c00 | | Execute_Immediate Run_Utility,0x0 0716 00db | | Load_Top At_Offset_3 0717 01dc | | Execute Vector,Last 0718 e5ff | | Load 0x2,-0x1 0719 01dd | | Execute Vector,First 071a 0263 | c | Execute Discrete,Above_Bound 071b 7006 |p | Jump_Nonzero 0x722 071c 00da | | Load_Top At_Offset_2 071d 00d9 | | Load_Top At_Offset_1 071e e5ff | | Load 0x2,-0x1 071f 01d6 | | Execute Vector,Field_Write 0720 0a01 | | Execute_Immediate Plus,0x1 0721 7ff8 | | Jump 0x71a 0722 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0723 00da | | Load_Top At_Offset_2 0724 01dc | | Execute Vector,Last 0725 00db | | Load_Top At_Offset_3 0726 01dd | | Execute Vector,First 0727 0263 | c | Execute Discrete,Above_Bound 0728 7006 |p | Jump_Nonzero 0x72f 0729 00d8 | | Load_Top At_Offset_0 072a e5ff | | Load 0x2,-0x1 072b 01d7 | | Execute Vector,Field_Read 072c 1c01 | | Execute_Immediate Run_Utility,0x1 072d 0a01 | | Execute_Immediate Plus,0x1 072e 7ff8 | | Jump 0x727 072f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0730 ; -------------------------------------------------------------------------------------- 0730 ; SUBPROGRAM 0730 ; -------------------------------------------------------------------------------------- 0730 0733 | 3 | .CONST 0x0733 ; Address of begin 0731 0004 | | .CONST 0x0004 ; Address of exception handler 0732 0001 | | .CONST 0x0001 ; Number of locals 0733 BODY_0730: 0733 INIT_0730: 0733 4605 |F | Jump_Case 0x6 0734 7804 |x | Jump 0x739 ; case 0x0 0735 7815 |x | Jump 0x74b ; case 0x1 0736 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0737 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0738 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0739 00da | | Load_Top At_Offset_2 ; case 0x5 073a 01d8 | | Execute Vector,Element_Type 073b 0322 | " | Declare_Variable Record 073c 00d8 | | Load_Top At_Offset_0 073d 1c00 | | Execute_Immediate Run_Utility,0x0 073e 00db | | Load_Top At_Offset_3 073f 01dc | | Execute Vector,Last 0740 e5ff | | Load 0x2,-0x1 0741 01dd | | Execute Vector,First 0742 0263 | c | Execute Discrete,Above_Bound 0743 7006 |p | Jump_Nonzero 0x74a 0744 00da | | Load_Top At_Offset_2 0745 00d9 | | Load_Top At_Offset_1 0746 e5ff | | Load 0x2,-0x1 0747 01d6 | | Execute Vector,Field_Write 0748 0a01 | | Execute_Immediate Plus,0x1 0749 7ff8 | | Jump 0x742 074a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 074b 00da | | Load_Top At_Offset_2 074c 01dc | | Execute Vector,Last 074d 00db | | Load_Top At_Offset_3 074e 01dd | | Execute Vector,First 074f 0263 | c | Execute Discrete,Above_Bound 0750 7006 |p | Jump_Nonzero 0x757 0751 00d8 | | Load_Top At_Offset_0 0752 e5ff | | Load 0x2,-0x1 0753 01d7 | | Execute Vector,Field_Read 0754 1c01 | | Execute_Immediate Run_Utility,0x1 0755 0a01 | | Execute_Immediate Plus,0x1 0756 7ff8 | | Jump 0x74f 0757 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0758 ; -------------------------------------------------------------------------------------- 0758 ; SUBPROGRAM 0758 ; -------------------------------------------------------------------------------------- 0758 075b | [ | .CONST 0x075b ; Address of begin 0759 0004 | | .CONST 0x0004 ; Address of exception handler 075a 0001 | | .CONST 0x0001 ; Number of locals 075b BODY_0758: 075b INIT_0758: 075b 4601 |F | Jump_Case 0x2 075c 7801 |x | Jump 0x75e ; case 0x0 075d 7804 |x | Jump 0x762 ; case 0x1 075e 00da | | Load_Top At_Offset_2 075f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0760 1c00 | | Execute_Immediate Run_Utility,0x0 0761 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0762 00da | | Load_Top At_Offset_2 0763 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0764 1c01 | | Execute_Immediate Run_Utility,0x1 0765 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0766 0000 0000 | | .XXX[0x2] 0768 ; -------------------------------------------------------------------------------------- 0768 ; SUBPROGRAM 0768 ; -------------------------------------------------------------------------------------- 0768 076b | k | .CONST 0x076b ; Address of begin 0769 0004 | | .CONST 0x0004 ; Address of exception handler 076a 0001 | | .CONST 0x0001 ; Number of locals 076b BODY_0768: 076b INIT_0768: 076b 4605 |F | Jump_Case 0x6 076c 7804 |x | Jump 0x771 ; case 0x0 076d 7815 |x | Jump 0x783 ; case 0x1 076e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 076f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0770 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0771 00da | | Load_Top At_Offset_2 ; case 0x5 0772 01d8 | | Execute Vector,Element_Type 0773 0322 | " | Declare_Variable Record 0774 00d8 | | Load_Top At_Offset_0 0775 1c00 | | Execute_Immediate Run_Utility,0x0 0776 00db | | Load_Top At_Offset_3 0777 01dc | | Execute Vector,Last 0778 e5ff | | Load 0x2,-0x1 0779 01dd | | Execute Vector,First 077a 0263 | c | Execute Discrete,Above_Bound 077b 7006 |p | Jump_Nonzero 0x782 077c 00da | | Load_Top At_Offset_2 077d 00d9 | | Load_Top At_Offset_1 077e e5ff | | Load 0x2,-0x1 077f 01d6 | | Execute Vector,Field_Write 0780 0a01 | | Execute_Immediate Plus,0x1 0781 7ff8 | | Jump 0x77a 0782 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0783 00da | | Load_Top At_Offset_2 0784 01dc | | Execute Vector,Last 0785 00db | | Load_Top At_Offset_3 0786 01dd | | Execute Vector,First 0787 0263 | c | Execute Discrete,Above_Bound 0788 7006 |p | Jump_Nonzero 0x78f 0789 00d8 | | Load_Top At_Offset_0 078a e5ff | | Load 0x2,-0x1 078b 01d7 | | Execute Vector,Field_Read 078c 1c01 | | Execute_Immediate Run_Utility,0x1 078d 0a01 | | Execute_Immediate Plus,0x1 078e 7ff8 | | Jump 0x787 078f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 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 e254 | T | Load 0x1,0x54 0795 4801 |H | Short_Literal 0x1 0796 0263 | c | Execute Discrete,Above_Bound 0797 7012 |p | Jump_Nonzero 0x7aa 0798 00d8 | | Load_Top At_Offset_0 0799 e253 | S | Load 0x1,0x53 079a 01d5 | | Execute Vector,Field_Reference 079b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 079c e027 | ' | Load 0x0,0x27 079d 027f | | Execute Discrete,Equal 079e 7009 |p | Jump_Nonzero 0x7a8 079f 00d8 | | Load_Top At_Offset_0 07a0 e253 | S | Load 0x1,0x53 07a1 01d5 | | Execute Vector,Field_Reference 07a2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07a3 e5ff | | Load 0x2,-0x1 07a4 027f | | Execute Discrete,Equal 07a5 6802 |h | Jump_Zero 0x7a8 07a6 4801 |H | Short_Literal 0x1 07a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07a8 00c8 | | Action Pop_Auxiliary_Range 07a9 3fee |? | Loop_Increasing 0x798 07aa 00ce | | Action Pop_Auxiliary 07ab 4800 |H | Short_Literal 0x0 07ac 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ad 0000 0000 | | .XXX[0x3] 07af 0000 | | 07b0 ; -------------------------------------------------------------------------------------- 07b0 ; SUBPROGRAM 07b0 ; -------------------------------------------------------------------------------------- 07b0 07b3 | | .CONST 0x07b3 ; Address of begin 07b1 0004 | | .CONST 0x0004 ; Address of exception handler 07b2 0001 | | .CONST 0x0001 ; Number of locals 07b3 BODY_07b0: 07b3 INIT_07b0: 07b3 00cf | | Action Mark_Auxiliary 07b4 e25e | ^ | Load 0x1,0x5e 07b5 4801 |H | Short_Literal 0x1 07b6 0263 | c | Execute Discrete,Above_Bound 07b7 701f |p | Jump_Nonzero 0x7d7 07b8 00d8 | | Load_Top At_Offset_0 07b9 e25d | ] | Load 0x1,0x5d 07ba 01d5 | | Execute Vector,Field_Reference 07bb 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07bc e01e | | Load 0x0,0x1e 07bd 027e | ~ | Execute Discrete,Not_Equal 07be 6816 |h | Jump_Zero 0x7d5 07bf 00d8 | | Load_Top At_Offset_0 07c0 e25d | ] | Load 0x1,0x5d 07c1 01d5 | | Execute Vector,Field_Reference 07c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07c3 e5ff | | Load 0x2,-0x1 07c4 027f | | Execute Discrete,Equal 07c5 7007 |p | Jump_Nonzero 0x7cd 07c6 00d8 | | Load_Top At_Offset_0 07c7 e25d | ] | Load 0x1,0x5d 07c8 01d5 | | Execute Vector,Field_Reference 07c9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07ca e011 | | Load 0x0,0x11 07cb 027f | | Execute Discrete,Equal 07cc 6808 |h | Jump_Zero 0x7d5 07cd 00d8 | | Load_Top At_Offset_0 07ce e25d | ] | Load 0x1,0x5d 07cf 01d5 | | Execute Vector,Field_Reference 07d0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07d1 0f09 | | Execute_Immediate Equal,0x9 07d2 6802 |h | Jump_Zero 0x7d5 07d3 4801 |H | Short_Literal 0x1 07d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07d5 00c8 | | Action Pop_Auxiliary_Range 07d6 3fe1 |? | Loop_Increasing 0x7b8 07d7 00ce | | Action Pop_Auxiliary 07d8 4800 |H | Short_Literal 0x0 07d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07da 0000 0000 | | .BLANK 0000[0x6] 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; SUBPROGRAM 07e0 ; -------------------------------------------------------------------------------------- 07e0 07e3 | | .CONST 0x07e3 ; Address of begin 07e1 0004 | | .CONST 0x0004 ; Address of exception handler 07e2 0001 | | .CONST 0x0001 ; Number of locals 07e3 BODY_07e0: 07e3 INIT_07e0: 07e3 00cf | | Action Mark_Auxiliary 07e4 e25e | ^ | Load 0x1,0x5e 07e5 4801 |H | Short_Literal 0x1 07e6 0263 | c | Execute Discrete,Above_Bound 07e7 701e |p | Jump_Nonzero 0x806 07e8 00d8 | | Load_Top At_Offset_0 07e9 e25d | ] | Load 0x1,0x5d 07ea 01d5 | | Execute Vector,Field_Reference 07eb 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07ec e01e | | Load 0x0,0x1e 07ed 027e | ~ | Execute Discrete,Not_Equal 07ee 6815 |h | Jump_Zero 0x804 07ef 00d8 | | Load_Top At_Offset_0 07f0 e25d | ] | Load 0x1,0x5d 07f1 01d5 | | Execute Vector,Field_Reference 07f2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07f3 e5ff | | Load 0x2,-0x1 07f4 027f | | Execute Discrete,Equal 07f5 7007 |p | Jump_Nonzero 0x7fd 07f6 00d8 | | Load_Top At_Offset_0 07f7 e25d | ] | Load 0x1,0x5d 07f8 01d5 | | Execute Vector,Field_Reference 07f9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07fa e011 | | Load 0x0,0x11 07fb 027f | | Execute Discrete,Equal 07fc 6807 |h | Jump_Zero 0x804 07fd 00d8 | | Load_Top At_Offset_0 07fe e25d | ] | Load 0x1,0x5d 07ff 01d5 | | Execute Vector,Field_Reference 0800 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0801 7002 |p | Jump_Nonzero 0x804 0802 4801 |H | Short_Literal 0x1 0803 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0804 00c8 | | Action Pop_Auxiliary_Range 0805 3fe2 |? | Loop_Increasing 0x7e8 0806 00ce | | Action Pop_Auxiliary 0807 4800 |H | Short_Literal 0x0 0808 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0809 0000 0000 | | .BLANK 0000[0x7] 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 0813 | | .CONST 0x0813 ; Address of begin 0811 0004 | | .CONST 0x0004 ; Address of exception handler 0812 0001 | | .CONST 0x0001 ; Number of locals 0813 BODY_0810: 0813 INIT_0810: 0813 00cf | | Action Mark_Auxiliary 0814 e25e | ^ | Load 0x1,0x5e 0815 4801 |H | Short_Literal 0x1 0816 0263 | c | Execute Discrete,Above_Bound 0817 701f |p | Jump_Nonzero 0x837 0818 00d8 | | Load_Top At_Offset_0 0819 e25d | ] | Load 0x1,0x5d 081a 01d5 | | Execute Vector,Field_Reference 081b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 081c e01e | | Load 0x0,0x1e 081d 027e | ~ | Execute Discrete,Not_Equal 081e 6816 |h | Jump_Zero 0x835 081f 00d8 | | Load_Top At_Offset_0 0820 e25d | ] | Load 0x1,0x5d 0821 01d5 | | Execute Vector,Field_Reference 0822 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0823 e5ff | | Load 0x2,-0x1 0824 027f | | Execute Discrete,Equal 0825 7007 |p | Jump_Nonzero 0x82d 0826 00d8 | | Load_Top At_Offset_0 0827 e25d | ] | Load 0x1,0x5d 0828 01d5 | | Execute Vector,Field_Reference 0829 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 082a e011 | | Load 0x0,0x11 082b 027f | | Execute Discrete,Equal 082c 6808 |h | Jump_Zero 0x835 082d 00d8 | | Load_Top At_Offset_0 082e e25d | ] | Load 0x1,0x5d 082f 01d5 | | Execute Vector,Field_Reference 0830 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0831 0f01 | | Execute_Immediate Equal,0x1 0832 6802 |h | Jump_Zero 0x835 0833 4801 |H | Short_Literal 0x1 0834 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0835 00c8 | | Action Pop_Auxiliary_Range 0836 3fe1 |? | Loop_Increasing 0x818 0837 00ce | | Action Pop_Auxiliary 0838 4800 |H | Short_Literal 0x0 0839 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 083a 0000 0000 | | .BLANK 0000[0x6] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0843 | C | .CONST 0x0843 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0001 | | .CONST 0x0001 ; Number of locals 0843 BODY_0840: 0843 INIT_0840: 0843 00da | | Load_Top At_Offset_2 0844 826e | n | Call 0x1,0x6e 0845 7008 |p | Jump_Nonzero 0x84e 0846 00da | | Load_Top At_Offset_2 0847 826f | o | Call 0x1,0x6f 0848 7003 |p | Jump_Nonzero 0x84c 0849 00da | | Load_Top At_Offset_2 084a 8270 | p | Call 0x1,0x70 084b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 084c 4801 |H | Short_Literal 0x1 084d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 084e 4801 |H | Short_Literal 0x1 084f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0850 ; -------------------------------------------------------------------------------------- 0850 ; SUBPROGRAM 0850 ; -------------------------------------------------------------------------------------- 0850 0853 | S | .CONST 0x0853 ; Address of begin 0851 0004 | | .CONST 0x0004 ; Address of exception handler 0852 0001 | | .CONST 0x0001 ; Number of locals 0853 BODY_0850: 0853 INIT_0850: 0853 00cf | | Action Mark_Auxiliary 0854 e259 | Y | Load 0x1,0x59 0855 4801 |H | Short_Literal 0x1 0856 0263 | c | Execute Discrete,Above_Bound 0857 701f |p | Jump_Nonzero 0x877 0858 00d8 | | Load_Top At_Offset_0 0859 e258 | X | Load 0x1,0x58 085a 01d5 | | Execute Vector,Field_Reference 085b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 085c e01e | | Load 0x0,0x1e 085d 027e | ~ | Execute Discrete,Not_Equal 085e 6816 |h | Jump_Zero 0x875 085f 00d8 | | Load_Top At_Offset_0 0860 e258 | X | Load 0x1,0x58 0861 01d5 | | Execute Vector,Field_Reference 0862 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0863 e5ff | | Load 0x2,-0x1 0864 027f | | Execute Discrete,Equal 0865 7007 |p | Jump_Nonzero 0x86d 0866 00d8 | | Load_Top At_Offset_0 0867 e258 | X | Load 0x1,0x58 0868 01d5 | | Execute Vector,Field_Reference 0869 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 086a e011 | | Load 0x0,0x11 086b 027f | | Execute Discrete,Equal 086c 6808 |h | Jump_Zero 0x875 086d 00d8 | | Load_Top At_Offset_0 086e e258 | X | Load 0x1,0x58 086f 01d5 | | Execute Vector,Field_Reference 0870 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0871 0f09 | | Execute_Immediate Equal,0x9 0872 6802 |h | Jump_Zero 0x875 0873 4801 |H | Short_Literal 0x1 0874 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0875 00c8 | | Action Pop_Auxiliary_Range 0876 3fe1 |? | Loop_Increasing 0x858 0877 00ce | | Action Pop_Auxiliary 0878 4800 |H | Short_Literal 0x0 0879 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 087a 0000 0000 | | .BLANK 0000[0x6] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0883 | | .CONST 0x0883 ; Address of begin 0881 0004 | | .CONST 0x0004 ; Address of exception handler 0882 0001 | | .CONST 0x0001 ; Number of locals 0883 BODY_0880: 0883 INIT_0880: 0883 00cf | | Action Mark_Auxiliary 0884 e259 | Y | Load 0x1,0x59 0885 4801 |H | Short_Literal 0x1 0886 0263 | c | Execute Discrete,Above_Bound 0887 701e |p | Jump_Nonzero 0x8a6 0888 00d8 | | Load_Top At_Offset_0 0889 e258 | X | Load 0x1,0x58 088a 01d5 | | Execute Vector,Field_Reference 088b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 088c e01e | | Load 0x0,0x1e 088d 027e | ~ | Execute Discrete,Not_Equal 088e 6815 |h | Jump_Zero 0x8a4 088f 00d8 | | Load_Top At_Offset_0 0890 e258 | X | Load 0x1,0x58 0891 01d5 | | Execute Vector,Field_Reference 0892 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0893 e5ff | | Load 0x2,-0x1 0894 027f | | Execute Discrete,Equal 0895 7007 |p | Jump_Nonzero 0x89d 0896 00d8 | | Load_Top At_Offset_0 0897 e258 | X | Load 0x1,0x58 0898 01d5 | | Execute Vector,Field_Reference 0899 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 089a e011 | | Load 0x0,0x11 089b 027f | | Execute Discrete,Equal 089c 6807 |h | Jump_Zero 0x8a4 089d 00d8 | | Load_Top At_Offset_0 089e e258 | X | Load 0x1,0x58 089f 01d5 | | Execute Vector,Field_Reference 08a0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08a1 7002 |p | Jump_Nonzero 0x8a4 08a2 4801 |H | Short_Literal 0x1 08a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a4 00c8 | | Action Pop_Auxiliary_Range 08a5 3fe2 |? | Loop_Increasing 0x888 08a6 00ce | | Action Pop_Auxiliary 08a7 4800 |H | Short_Literal 0x0 08a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a9 0000 0000 | | .BLANK 0000[0x7] 08b0 ; -------------------------------------------------------------------------------------- 08b0 ; SUBPROGRAM 08b0 ; -------------------------------------------------------------------------------------- 08b0 08b3 | | .CONST 0x08b3 ; Address of begin 08b1 0004 | | .CONST 0x0004 ; Address of exception handler 08b2 0001 | | .CONST 0x0001 ; Number of locals 08b3 BODY_08b0: 08b3 INIT_08b0: 08b3 00cf | | Action Mark_Auxiliary 08b4 e259 | Y | Load 0x1,0x59 08b5 4801 |H | Short_Literal 0x1 08b6 0263 | c | Execute Discrete,Above_Bound 08b7 701f |p | Jump_Nonzero 0x8d7 08b8 00d8 | | Load_Top At_Offset_0 08b9 e258 | X | Load 0x1,0x58 08ba 01d5 | | Execute Vector,Field_Reference 08bb 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 08bc e01e | | Load 0x0,0x1e 08bd 027e | ~ | Execute Discrete,Not_Equal 08be 6816 |h | Jump_Zero 0x8d5 08bf 00d8 | | Load_Top At_Offset_0 08c0 e258 | X | Load 0x1,0x58 08c1 01d5 | | Execute Vector,Field_Reference 08c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08c3 e5ff | | Load 0x2,-0x1 08c4 027f | | Execute Discrete,Equal 08c5 7007 |p | Jump_Nonzero 0x8cd 08c6 00d8 | | Load_Top At_Offset_0 08c7 e258 | X | Load 0x1,0x58 08c8 01d5 | | Execute Vector,Field_Reference 08c9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08ca e011 | | Load 0x0,0x11 08cb 027f | | Execute Discrete,Equal 08cc 6808 |h | Jump_Zero 0x8d5 08cd 00d8 | | Load_Top At_Offset_0 08ce e258 | X | Load 0x1,0x58 08cf 01d5 | | Execute Vector,Field_Reference 08d0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08d1 0f01 | | Execute_Immediate Equal,0x1 08d2 6802 |h | Jump_Zero 0x8d5 08d3 4801 |H | Short_Literal 0x1 08d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08d5 00c8 | | Action Pop_Auxiliary_Range 08d6 3fe1 |? | Loop_Increasing 0x8b8 08d7 00ce | | Action Pop_Auxiliary 08d8 4800 |H | Short_Literal 0x0 08d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08da 0000 0000 | | .BLANK 0000[0x6] 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 00da | | Load_Top At_Offset_2 08e4 8272 | r | Call 0x1,0x72 08e5 7008 |p | Jump_Nonzero 0x8ee 08e6 00da | | Load_Top At_Offset_2 08e7 8273 | s | Call 0x1,0x73 08e8 7003 |p | Jump_Nonzero 0x8ec 08e9 00da | | Load_Top At_Offset_2 08ea 8274 | t | Call 0x1,0x74 08eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ec 4801 |H | Short_Literal 0x1 08ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ee 4801 |H | Short_Literal 0x1 08ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08fa | | .CONST 0x08fa ; Address of begin 08f1 0916 | | .CONST 0x0916 ; Address of exception handler 08f2 0003 | | .CONST 0x0003 ; Number of locals 08f3 INIT_08f0: 08f3 e230 | 0 | Load 0x1,0x30 08f4 0007 | | Action Break_Optional 08f5 0093 0000 | | push_full_address 0x0 08f7 6028 |`( | Indirect_Literal Discrete,0x920,{0x80000000, 0x00010000} 08f8 0273 | s | Execute Discrete,Plus 08f9 0007 | | Action Break_Optional 08fa BODY_08f0: 08fa e5ff | | Load 0x2,-0x1 08fb 8050 | P | Call 0x0,0x50 08fc 005a | Z | Store_Top Discrete,At_Offset_2 08fd 00d9 | | Load_Top At_Offset_1 08fe e239 | 9 | Load 0x1,0x39 08ff 01d5 | | Execute Vector,Field_Reference 0900 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0901 e5ff | | Load 0x2,-0x1 0902 027f | | Execute Discrete,Equal 0903 6810 |h | Jump_Zero 0x914 0904 4800 |H | Short_Literal 0x0 0905 00da | | Load_Top At_Offset_2 0906 e239 | 9 | Load 0x1,0x39 0907 01d5 | | Execute Vector,Field_Reference 0908 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0909 00d9 | | Load_Top At_Offset_1 090a e239 | 9 | Load 0x1,0x39 090b 01d5 | | Execute Vector,Field_Reference 090c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 090d e5ff | | Load 0x2,-0x1 090e 027f | | Execute Discrete,Equal 090f 6802 |h | Jump_Zero 0x912 0910 00d9 | | Load_Top At_Offset_1 0911 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0912 00d8 | | Load_Top At_Offset_0 0913 0257 | W | Execute Discrete,Raise 0914 00d8 | | Load_Top At_Offset_0 0915 0257 | W | Execute Discrete,Raise 0916 TRAP_08f0: 0916 0007 | | Action Break_Optional 0917 e230 | 0 | Load 0x1,0x30 0918 e5ff | | Load 0x2,-0x1 0919 4802 |H | Short_Literal 0x2 091a e26c | l | Load 0x1,0x6c 091b 170d | | Execute Task,Entry_Call,Field_Number 0xd 091c 005b | [ | Store_Top Discrete,At_Offset_3 091d 00da | | Load_Top At_Offset_2 091e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 091f 0000 | | .XXX[0x1] 0920 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0924 0000 0000 | | .BLANK 0000[0x4] 0928 ; -------------------------------------------------------------------------------------- 0928 ; SUBPROGRAM 0928 ; -------------------------------------------------------------------------------------- 0928 092d | - | .CONST 0x092d ; Address of begin 0929 0940 | @ | .CONST 0x0940 ; Address of exception handler 092a 0002 | | .CONST 0x0002 ; Number of locals 092b INIT_0928: 092b e230 | 0 | Load 0x1,0x30 092c 0007 | | Action Break_Optional 092d BODY_0928: 092d 00db | | Load_Top At_Offset_3 092e 8050 | P | Call 0x0,0x50 092f 0059 | Y | Store_Top Discrete,At_Offset_1 0930 00d8 | | Load_Top At_Offset_0 0931 e239 | 9 | Load 0x1,0x39 0932 01d5 | | Execute Vector,Field_Reference 0933 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0934 e5ff | | Load 0x2,-0x1 0935 027f | | Execute Discrete,Equal 0936 6807 |h | Jump_Zero 0x93e 0937 4800 |H | Short_Literal 0x0 0938 00d9 | | Load_Top At_Offset_1 0939 e239 | 9 | Load 0x1,0x39 093a 01d5 | | Execute Vector,Field_Reference 093b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 093c 00d8 | | Load_Top At_Offset_0 093d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 093e 4800 |H | Short_Literal 0x0 093f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0940 TRAP_0928: 0940 0007 | | Action Break_Optional 0941 4800 |H | Short_Literal 0x0 0942 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0943 0000 0000 | | .BLANK 0000[0x5] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 0956 | V | .CONST 0x0956 ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0007 | | .CONST 0x0007 ; Number of locals 094b INIT_0948: 094b e006 | | Load 0x0,0x6 094c 0322 | " | Declare_Variable Record 094d 00d8 | | Load_Top At_Offset_0 094e 0322 | " | Declare_Variable Record 094f 00e3 | | Load_Encached Natural_Cache 0950 00e3 | | Load_Encached Natural_Cache 0951 e5ff | | Load 0x2,-0x1 0952 8051 | Q | Call 0x0,0x51 0953 00e3 | | Load_Encached Natural_Cache 0954 03f1 | | Declare_Variable Discrete,With_Value 0955 00e3 | | Load_Encached Natural_Cache 0956 BODY_0948: 0956 e5ff | | Load 0x2,-0x1 0957 e5fe | | Load 0x2,-0x2 0958 017f | | Execute Record,Equal 0959 6802 |h | Jump_Zero 0x95c 095a 4801 |H | Short_Literal 0x1 095b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 095c 4801 |H | Short_Literal 0x1 095d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 095e 4801 |H | Short_Literal 0x1 095f a404 | | Store_Unchecked 0x2,0x4 0960 e5fe | | Load 0x2,-0x2 0961 8051 | Q | Call 0x0,0x51 0962 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0963 00cf | | Action Mark_Auxiliary 0964 00db | | Load_Top At_Offset_3 0965 00da | | Load_Top At_Offset_2 0966 027d | } | Execute Discrete,Greater 0967 7024 |p$ | Jump_Nonzero 0x98c 0968 e404 | | Load 0x2,0x4 0969 00db | | Load_Top At_Offset_3 096a 027d | } | Execute Discrete,Greater 096b 7020 |p | Jump_Nonzero 0x98c 096c e404 | | Load 0x2,0x4 096d 00d8 | | Load_Top At_Offset_0 096e 00e4 | | Load_Encached Positive_Cache 096f 0260 | ` | Execute Discrete,In_Type 0970 7001 |p | Jump_Nonzero 0x972 0971 0801 | | Execute_Immediate Raise,0x1 0972 e5ff | | Load 0x2,-0x1 0973 8052 | R | Call 0x0,0x52 0974 e402 | | Load 0x2,0x2 0975 017d | } | Execute Record,Structure_Write 0976 00db | | Load_Top At_Offset_3 0977 00d8 | | Load_Top At_Offset_0 0978 00e4 | | Load_Encached Positive_Cache 0979 0260 | ` | Execute Discrete,In_Type 097a 7001 |p | Jump_Nonzero 0x97c 097b 0801 | | Execute_Immediate Raise,0x1 097c e5fe | | Load 0x2,-0x2 097d 8052 | R | Call 0x0,0x52 097e e403 | | Load 0x2,0x3 097f 017d | } | Execute Record,Structure_Write 0980 00db | | Load_Top At_Offset_3 0981 0a01 | | Execute_Immediate Plus,0x1 0982 c405 | | Store 0x2,0x5 0983 e402 | | Load 0x2,0x2 0984 e403 | | Load 0x2,0x3 0985 017f | | Execute Record,Equal 0986 6803 |h | Jump_Zero 0x98a 0987 e404 | | Load 0x2,0x4 0988 0a01 | | Execute_Immediate Plus,0x1 0989 c404 | | Store 0x2,0x4 098a 00c9 | | Action Pop_Auxiliary_Loop 098b 7fd8 | | Jump 0x964 098c 00ce | | Action Pop_Auxiliary 098d 00db | | Load_Top At_Offset_3 098e 00da | | Load_Top At_Offset_2 098f 027d | } | Execute Discrete,Greater 0990 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0991 0000 0000 | | .BLANK 0000[0x7] 0998 ; -------------------------------------------------------------------------------------- 0998 ; SUBPROGRAM 0998 ; -------------------------------------------------------------------------------------- 0998 09a1 | | .CONST 0x09a1 ; Address of begin 0999 0004 | | .CONST 0x0004 ; Address of exception handler 099a 0004 | | .CONST 0x0004 ; Number of locals 099b INIT_0998: 099b 00e3 | | Load_Encached Natural_Cache 099c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 099d 00e3 | | Load_Encached Natural_Cache 099e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 099f 029f 0f33 | 3| Declare_Subprogram INIT_0f30,For_Call 09a1 BODY_0998: 09a1 e01e | | Load 0x0,0x1e 09a2 a5fb | | Store_Unchecked 0x2,-0x5 09a3 e01e | | Load 0x0,0x1e 09a4 a5f9 | | Store_Unchecked 0x2,-0x7 09a5 00cf | | Action Mark_Auxiliary 09a6 e269 | i | Load 0x1,0x69 09a7 4801 |H | Short_Literal 0x1 09a8 0263 | c | Execute Discrete,Above_Bound 09a9 7003 |p | Jump_Nonzero 0x9ad 09aa 8404 | | Call 0x2,0x4 09ab 00c8 | | Action Pop_Auxiliary_Range 09ac 3ffd |? | Loop_Increasing 0x9aa 09ad 00ce | | Action Pop_Auxiliary 09ae 00da | | Load_Top At_Offset_2 09af 680c |h | Jump_Zero 0x9bc 09b0 00da | | Load_Top At_Offset_2 09b1 e268 | h | Load 0x1,0x68 09b2 01d5 | | Execute Vector,Field_Reference 09b3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 09b4 0f04 | | Execute_Immediate Equal,0x4 09b5 6806 |h | Jump_Zero 0x9bc 09b6 00da | | Load_Top At_Offset_2 09b7 e268 | h | Load 0x1,0x68 09b8 01d5 | | Execute Vector,Field_Reference 09b9 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 09ba a5fa | | Store_Unchecked 0x2,-0x6 09bb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 09bc e01e | | Load 0x0,0x1e 09bd a5fa | | Store_Unchecked 0x2,-0x6 09be 4505 |E | Exit_Suprogram New_Top_Offset 0x5 09bf 0000 | | .XXX[0x1] 09c0 ; -------------------------------------------------------------------------------------- 09c0 ; SUBPROGRAM 09c0 ; -------------------------------------------------------------------------------------- 09c0 09c3 | | .CONST 0x09c3 ; Address of begin 09c1 0004 | | .CONST 0x0004 ; Address of exception handler 09c2 0001 | | .CONST 0x0001 ; Number of locals 09c3 BODY_09c0: 09c3 INIT_09c0: 09c3 00db | | Load_Top At_Offset_3 09c4 7003 |p | Jump_Nonzero 0x9c8 09c5 00da | | Load_Top At_Offset_2 09c6 8053 | S | Call 0x0,0x53 09c7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09c8 4800 |H | Short_Literal 0x0 09c9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09ca 0000 0000 | | .BLANK 0000[0x6] 09d0 ; -------------------------------------------------------------------------------------- 09d0 ; SUBPROGRAM 09d0 ; -------------------------------------------------------------------------------------- 09d0 09d3 | | .CONST 0x09d3 ; Address of begin 09d1 0004 | | .CONST 0x0004 ; Address of exception handler 09d2 0001 | | .CONST 0x0001 ; Number of locals 09d3 BODY_09d0: 09d3 INIT_09d0: 09d3 00da | | Load_Top At_Offset_2 09d4 6003 |` | Indirect_Literal Discrete,0x9d8,{0x00000000, 0x7fffffff} 09d5 8054 | T | Call 0x0,0x54 09d6 8055 | U | Call 0x0,0x55 09d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09d8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 09dc 0000 0000 | | .BLANK 0000[0x4] 09e0 ; -------------------------------------------------------------------------------------- 09e0 ; SUBPROGRAM 09e0 ; -------------------------------------------------------------------------------------- 09e0 09ea | | .CONST 0x09ea ; Address of begin 09e1 0a31 | 1 | .CONST 0x0a31 ; Address of exception handler 09e2 0004 | | .CONST 0x0004 ; Number of locals 09e3 INIT_09e0: 09e3 e039 | 9 | Load 0x0,0x39 09e4 0322 | " | Declare_Variable Record 09e5 00d8 | | Load_Top At_Offset_0 09e6 1c00 | | Execute_Immediate Run_Utility,0x0 09e7 e20d | | Load 0x1,0xd 09e8 0337 | 7 | Declare_Variable Array 09e9 00e3 | | Load_Encached Natural_Cache 09ea BODY_09e0: 09ea e23d | = | Load 0x1,0x3d 09eb 0a01 | | Execute_Immediate Plus,0x1 09ec a23d | = | Store_Unchecked 0x1,0x3d 09ed 00da | | Load_Top At_Offset_2 09ee e5fd | | Load 0x2,-0x3 09ef 803c | < | Call 0x0,0x3c 09f0 00d1 | | Pop_Control Pop_Count_1 09f1 e5f7 | | Load 0x2,-0x9 09f2 e5fb | | Load 0x2,-0x5 09f3 827b | { | Call 0x1,0x7b 09f4 6807 |h | Jump_Zero 0x9fc 09f5 e5fd | | Load 0x2,-0x3 09f6 e5fc | | Load 0x2,-0x4 09f7 027f | | Execute Discrete,Equal 09f8 6803 |h | Jump_Zero 0x9fc 09f9 00da | | Load_Top At_Offset_2 09fa 827c | | | Call 0x1,0x7c 09fb 00d1 | | Pop_Control Pop_Count_1 09fc 00da | | Load_Top At_Offset_2 09fd e5fe | | Load 0x2,-0x2 09fe 803d | = | Call 0x0,0x3d 09ff 00d1 | | Pop_Control Pop_Count_1 0a00 00da | | Load_Top At_Offset_2 0a01 8056 | V | Call 0x0,0x56 0a02 00d1 | | Pop_Control Pop_Count_1 0a03 00da | | Load_Top At_Offset_2 0a04 8057 | W | Call 0x0,0x57 0a05 00d1 | | Pop_Control Pop_Count_1 0a06 e5fa | | Load 0x2,-0x6 0a07 e239 | 9 | Load 0x1,0x39 0a08 01d5 | | Execute Vector,Field_Reference 0a09 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0a0a e5ff | | Load 0x2,-0x1 0a0b 8058 | X | Call 0x0,0x58 0a0c 4800 |H | Short_Literal 0x0 0a0d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0a0e e5f9 | | Load 0x2,-0x7 0a0f e01e | | Load 0x0,0x1e 0a10 027e | ~ | Execute Discrete,Not_Equal 0a11 6807 |h | Jump_Zero 0xa19 0a12 00d8 | | Load_Top At_Offset_0 0a13 0a01 | | Execute_Immediate Plus,0x1 0a14 0059 | Y | Store_Top Discrete,At_Offset_1 0a15 e5f9 | | Load 0x2,-0x7 0a16 00d9 | | Load_Top At_Offset_1 0a17 00db | | Load_Top At_Offset_3 0a18 01d6 | | Execute Vector,Field_Write 0a19 e5f8 | | Load 0x2,-0x8 0a1a e01e | | Load 0x0,0x1e 0a1b 027e | ~ | Execute Discrete,Not_Equal 0a1c 6807 |h | Jump_Zero 0xa24 0a1d 00d8 | | Load_Top At_Offset_0 0a1e 0a01 | | Execute_Immediate Plus,0x1 0a1f 0059 | Y | Store_Top Discrete,At_Offset_1 0a20 e5f8 | | Load 0x2,-0x8 0a21 00d9 | | Load_Top At_Offset_1 0a22 00db | | Load_Top At_Offset_3 0a23 01d6 | | Execute Vector,Field_Write 0a24 00da | | Load_Top At_Offset_2 0a25 00d9 | | Load_Top At_Offset_1 0a26 00d8 | | Load_Top At_Offset_0 0a27 e20e | | Load 0x1,0xe 0a28 0260 | ` | Execute Discrete,In_Type 0a29 7001 |p | Jump_Nonzero 0xa2b 0a2a 0801 | | Execute_Immediate Raise,0x1 0a2b 00db | | Load_Top At_Offset_3 0a2c e5fb | | Load 0x2,-0x5 0a2d 8059 | Y | Call 0x0,0x59 0a2e e5ff | | Load 0x2,-0x1 0a2f 805a | Z | Call 0x0,0x5a 0a30 450a |E | Exit_Suprogram New_Top_Offset 0xa 0a31 TRAP_09e0: 0a31 0007 | | Action Break_Optional 0a32 e23f | ? | Load 0x1,0x3f 0a33 6806 |h | Jump_Zero 0xa3a 0a34 0092 1282 | | Action Push_String_Extended,0x1282 ; "Process_Action: exception: " 0a36 e03a | : | Load 0x0,0x3a 0a37 180d | | Execute Package,Field_Execute,Field_Number 0xd 0a38 01cc | | Execute Vector,Catenate 0a39 803b | ; | Call 0x0,0x3b 0a3a 450a |E | Exit_Suprogram New_Top_Offset 0xa 0a3b 0000 0000 | | .BLANK 0000[0x5] 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; SUBPROGRAM 0a40 ; -------------------------------------------------------------------------------------- 0a40 0a6a | j | .CONST 0x0a6a ; Address of begin 0a41 0b75 | u | .CONST 0x0b75 ; Address of exception handler 0a42 0011 | | .CONST 0x0011 ; Number of locals 0a43 INIT_0a40: 0a43 e20d | | Load 0x1,0xd 0a44 0337 | 7 | Declare_Variable Array 0a45 e20e | | Load 0x1,0xe 0a46 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a47 00e2 | | Load_Encached Integer_Cache 0a48 e039 | 9 | Load 0x0,0x39 0a49 0322 | " | Declare_Variable Record 0a4a 00d8 | | Load_Top At_Offset_0 0a4b 1c00 | | Execute_Immediate Run_Utility,0x0 0a4c 00e1 | | Load_Encached Boolean_Cache 0a4d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a4e 00e2 | | Load_Encached Integer_Cache 0a4f 029f 0f83 | | Declare_Subprogram INIT_0f80,For_Call 0a51 029f 0fab | | Declare_Subprogram INIT_0fa8,For_Call 0a53 029f 0ff3 | | Declare_Subprogram INIT_0ff0,For_Call 0a55 a013 | | Store_Unchecked 0x0,0x13 0a56 00c6 | | Action Check_Subprogram_Elaborated 0a57 00e2 | | Load_Encached Integer_Cache 0a58 480a |H | Short_Literal 0xa 0a59 4802 |H | Short_Literal 0x2 0a5a 0099 | | Action Reference_Dynamic 0a5b 4800 |H | Short_Literal 0x0 0a5c 0093 0000 | | push_full_address 0x0 0a5e 6119 |a | Indirect_Literal Discrete,0xb78,{0x80000000, 0x00060000} 0a5f 0273 | s | Execute Discrete,Plus 0a60 e014 | | Load 0x0,0x14 0a61 0273 | s | Execute Discrete,Plus 0a62 e05b | [ | Load 0x0,0x5b 0a63 0273 | s | Execute Discrete,Plus 0a64 480f |H | Short_Literal 0xf 0a65 0007 | | Action Break_Optional 0a66 029f 100b | | Declare_Subprogram INIT_1008,For_Call 0a68 029f 101b | | Declare_Subprogram INIT_1018,For_Call 0a6a BODY_0a40: 0a6a e5fd | | Load 0x2,-0x3 0a6b 8408 | | Call 0x2,0x8 0a6c e405 | | Load 0x2,0x5 0a6d e5fc | | Load 0x2,-0x4 0a6e 803c | < | Call 0x0,0x3c 0a6f 00d1 | | Pop_Control Pop_Count_1 0a70 e405 | | Load 0x2,0x5 0a71 e5fe | | Load 0x2,-0x2 0a72 803d | = | Call 0x0,0x3d 0a73 00d1 | | Pop_Control Pop_Count_1 0a74 e405 | | Load 0x2,0x5 0a75 8056 | V | Call 0x0,0x56 0a76 00d1 | | Pop_Control Pop_Count_1 0a77 e405 | | Load 0x2,0x5 0a78 8057 | W | Call 0x0,0x57 0a79 00d1 | | Pop_Control Pop_Count_1 0a7a 00cf | | Action Mark_Auxiliary 0a7b e250 | P | Load 0x1,0x50 0a7c 4801 |H | Short_Literal 0x1 0a7d 0263 | c | Execute Discrete,Above_Bound 0a7e 704b |pK | Jump_Nonzero 0xaca 0a7f 00d8 | | Load_Top At_Offset_0 0a80 e24d | M | Load 0x1,0x4d 0a81 01d7 | | Execute Vector,Field_Read 0a82 e5fc | | Load 0x2,-0x4 0a83 027f | | Execute Discrete,Equal 0a84 6843 |hC | Jump_Zero 0xac8 0a85 00d8 | | Load_Top At_Offset_0 0a86 e24f | O | Load 0x1,0x4f 0a87 01d5 | | Execute Vector,Field_Reference 0a88 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a89 e05c | \ | Load 0x0,0x5c 0a8a 017f | | Execute Record,Equal 0a8b 7008 |p | Jump_Nonzero 0xa94 0a8c e405 | | Load 0x2,0x5 0a8d 805d | ] | Call 0x0,0x5d 0a8e 00d9 | | Load_Top At_Offset_1 0a8f e24f | O | Load 0x1,0x4f 0a90 01d5 | | Execute Vector,Field_Reference 0a91 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a92 8279 | y | Call 0x1,0x79 0a93 6834 |h4 | Jump_Zero 0xac8 0a94 e5fd | | Load 0x2,-0x3 0a95 00d9 | | Load_Top At_Offset_1 0a96 e24f | O | Load 0x1,0x4f 0a97 01d5 | | Execute Vector,Field_Reference 0a98 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a99 027f | | Execute Discrete,Equal 0a9a 6808 |h | Jump_Zero 0xaa3 0a9b 00d8 | | Load_Top At_Offset_0 0a9c e24f | O | Load 0x1,0x4f 0a9d 01d5 | | Execute Vector,Field_Reference 0a9e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a9f 8408 | | Call 0x2,0x8 0aa0 00d8 | | Load_Top At_Offset_0 0aa1 8410 | | Call 0x2,0x10 0aa2 7825 |x% | Jump 0xac8 0aa3 e406 | | Load 0x2,0x6 0aa4 7004 |p | Jump_Nonzero 0xaa9 0aa5 e5fd | | Load 0x2,-0x3 0aa6 e01e | | Load 0x0,0x1e 0aa7 027f | | Execute Discrete,Equal 0aa8 681f |h | Jump_Zero 0xac8 0aa9 00d8 | | Load_Top At_Offset_0 0aaa e24f | O | Load 0x1,0x4f 0aab 01d5 | | Execute Vector,Field_Reference 0aac 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0aad 0e01 | | Execute_Immediate Not_Equal,0x1 0aae 7005 |p | Jump_Nonzero 0xab4 0aaf 00d8 | | Load_Top At_Offset_0 0ab0 e24f | O | Load 0x1,0x4f 0ab1 01d5 | | Execute Vector,Field_Reference 0ab2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0ab3 680f |h | Jump_Zero 0xac3 0ab4 00e2 | | Load_Encached Integer_Cache 0ab5 00d9 | | Load_Top At_Offset_1 0ab6 4802 |H | Short_Literal 0x2 0ab7 e26c | l | Load 0x1,0x6c 0ab8 171e | | Execute Task,Entry_Call,Field_Number 0x1e 0ab9 c407 | | Store 0x2,0x7 0aba e407 | | Load 0x2,0x7 0abb e01e | | Load 0x0,0x1e 0abc 027e | ~ | Execute Discrete,Not_Equal 0abd 680a |h | Jump_Zero 0xac8 0abe e407 | | Load 0x2,0x7 0abf 8408 | | Call 0x2,0x8 0ac0 00d8 | | Load_Top At_Offset_0 0ac1 8410 | | Call 0x2,0x10 0ac2 7805 |x | Jump 0xac8 0ac3 00d8 | | Load_Top At_Offset_0 0ac4 e24f | O | Load 0x1,0x4f 0ac5 01d5 | | Execute Vector,Field_Reference 0ac6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ac7 8408 | | Call 0x2,0x8 0ac8 00c8 | | Action Pop_Auxiliary_Range 0ac9 3fb5 |? | Loop_Increasing 0xa7f 0aca 00c9 | | Action Pop_Auxiliary_Loop 0acb e254 | T | Load 0x1,0x54 0acc 4801 |H | Short_Literal 0x1 0acd 0263 | c | Execute Discrete,Above_Bound 0ace 7051 |pQ | Jump_Nonzero 0xb20 0acf 00d8 | | Load_Top At_Offset_0 0ad0 e253 | S | Load 0x1,0x53 0ad1 01d5 | | Execute Vector,Field_Reference 0ad2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ad3 e5fc | | Load 0x2,-0x4 0ad4 027f | | Execute Discrete,Equal 0ad5 6848 |hH | Jump_Zero 0xb1e 0ad6 e5ff | | Load 0x2,-0x1 0ad7 00d9 | | Load_Top At_Offset_1 0ad8 e253 | S | Load 0x1,0x53 0ad9 01d5 | | Execute Vector,Field_Reference 0ada 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0adb 027f | | Execute Discrete,Equal 0adc 6841 |hA | Jump_Zero 0xb1e 0add 00d8 | | Load_Top At_Offset_0 0ade e253 | S | Load 0x1,0x53 0adf 01d5 | | Execute Vector,Field_Reference 0ae0 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ae1 e05c | \ | Load 0x0,0x5c 0ae2 017f | | Execute Record,Equal 0ae3 7008 |p | Jump_Nonzero 0xaec 0ae4 e405 | | Load 0x2,0x5 0ae5 805d | ] | Call 0x0,0x5d 0ae6 00d9 | | Load_Top At_Offset_1 0ae7 e253 | S | Load 0x1,0x53 0ae8 01d5 | | Execute Vector,Field_Reference 0ae9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0aea 8279 | y | Call 0x1,0x79 0aeb 6832 |h2 | Jump_Zero 0xb1e 0aec e406 | | Load 0x2,0x6 0aed 7007 |p | Jump_Nonzero 0xaf5 0aee 00d8 | | Load_Top At_Offset_0 0aef e253 | S | Load 0x1,0x53 0af0 01d5 | | Execute Vector,Field_Reference 0af1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0af2 e5fd | | Load 0x2,-0x3 0af3 027f | | Execute Discrete,Equal 0af4 6829 |h) | Jump_Zero 0xb1e 0af5 00d8 | | Load_Top At_Offset_0 0af6 e253 | S | Load 0x1,0x53 0af7 01d5 | | Execute Vector,Field_Reference 0af8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0af9 0f01 | | Execute_Immediate Equal,0x1 0afa 681a |h | Jump_Zero 0xb15 0afb 00d8 | | Load_Top At_Offset_0 0afc e253 | S | Load 0x1,0x53 0afd 01d5 | | Execute Vector,Field_Reference 0afe 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0aff a404 | | Store_Unchecked 0x2,0x4 0b00 00d8 | | Load_Top At_Offset_0 0b01 e253 | S | Load 0x1,0x53 0b02 01d5 | | Execute Vector,Field_Reference 0b03 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0b04 6805 |h | Jump_Zero 0xb0a 0b05 e404 | | Load 0x2,0x4 0b06 4801 |H | Short_Literal 0x1 0b07 e26c | l | Load 0x1,0x6c 0b08 171c | | Execute Task,Entry_Call,Field_Number 0x1c 0b09 7808 |x | Jump 0xb12 0b0a 00d8 | | Load_Top At_Offset_0 0b0b e253 | S | Load 0x1,0x53 0b0c 01d5 | | Execute Vector,Field_Reference 0b0d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0b0e 00d9 | | Load_Top At_Offset_1 0b0f e253 | S | Load 0x1,0x53 0b10 01d5 | | Execute Vector,Field_Reference 0b11 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b12 e404 | | Load 0x2,0x4 0b13 8408 | | Call 0x2,0x8 0b14 7809 |x | Jump 0xb1e 0b15 00d8 | | Load_Top At_Offset_0 0b16 e253 | S | Load 0x1,0x53 0b17 01d5 | | Execute Vector,Field_Reference 0b18 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b19 0aff | | Execute_Immediate Plus,-0x1 0b1a 00d9 | | Load_Top At_Offset_1 0b1b e253 | S | Load 0x1,0x53 0b1c 01d5 | | Execute Vector,Field_Reference 0b1d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b1e 00c8 | | Action Pop_Auxiliary_Range 0b1f 3faf |? | Loop_Increasing 0xacf 0b20 00ce | | Action Pop_Auxiliary 0b21 e241 | A | Load 0x1,0x41 0b22 6805 |h | Jump_Zero 0xb28 0b23 e5fc | | Load 0x2,-0x4 0b24 805e | ^ | Call 0x0,0x5e 0b25 6802 |h | Jump_Zero 0xb28 0b26 e242 | B | Load 0x1,0x42 0b27 8408 | | Call 0x2,0x8 0b28 e243 | C | Load 0x1,0x43 0b29 e5ff | | Load 0x2,-0x1 0b2a 027f | | Execute Discrete,Equal 0b2b 681e |h | Jump_Zero 0xb4a 0b2c e5fe | | Load 0x2,-0x2 0b2d e004 | | Load 0x0,0x4 0b2e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0b2f e245 | E | Load 0x1,0x45 0b30 027c | | | Execute Discrete,Less 0b31 6818 |h | Jump_Zero 0xb4a 0b32 e5fc | | Load 0x2,-0x4 0b33 805e | ^ | Call 0x0,0x5e 0b34 6815 |h | Jump_Zero 0xb4a 0b35 e5fd | | Load 0x2,-0x3 0b36 e246 | F | Load 0x1,0x46 0b37 027f | | Execute Discrete,Equal 0b38 7002 |p | Jump_Nonzero 0xb3b 0b39 e406 | | Load 0x2,0x6 0b3a 680f |h | Jump_Zero 0xb4a 0b3b e244 | D | Load 0x1,0x44 0b3c 0f01 | | Execute_Immediate Equal,0x1 0b3d 6809 |h | Jump_Zero 0xb47 0b3e e011 | | Load 0x0,0x11 0b3f a243 | C | Store_Unchecked 0x1,0x43 0b40 e246 | F | Load 0x1,0x46 0b41 8408 | | Call 0x2,0x8 0b42 e5ff | | Load 0x2,-0x1 0b43 4801 |H | Short_Literal 0x1 0b44 e26c | l | Load 0x1,0x6c 0b45 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0b46 7803 |x | Jump 0xb4a 0b47 e244 | D | Load 0x1,0x44 0b48 0aff | | Execute_Immediate Plus,-0x1 0b49 c244 | D | Store 0x1,0x44 0b4a e5ff | | Load 0x2,-0x1 0b4b e247 | G | Load 0x1,0x47 0b4c 027f | | Execute Discrete,Equal 0b4d 6815 |h | Jump_Zero 0xb63 0b4e e5fd | | Load 0x2,-0x3 0b4f e249 | I | Load 0x1,0x49 0b50 027f | | Execute Discrete,Equal 0b51 7002 |p | Jump_Nonzero 0xb54 0b52 e406 | | Load 0x2,0x6 0b53 680f |h | Jump_Zero 0xb63 0b54 e248 | H | Load 0x1,0x48 0b55 0f01 | | Execute_Immediate Equal,0x1 0b56 6809 |h | Jump_Zero 0xb60 0b57 e011 | | Load 0x0,0x11 0b58 a247 | G | Store_Unchecked 0x1,0x47 0b59 e249 | I | Load 0x1,0x49 0b5a 8408 | | Call 0x2,0x8 0b5b e5ff | | Load 0x2,-0x1 0b5c 4801 |H | Short_Literal 0x1 0b5d e26c | l | Load 0x1,0x6c 0b5e 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0b5f 7803 |x | Jump 0xb63 0b60 e248 | H | Load 0x1,0x48 0b61 0aff | | Execute_Immediate Plus,-0x1 0b62 c248 | H | Store 0x1,0x48 0b63 e024 | $ | Load 0x0,0x24 0b64 e5ff | | Load 0x2,-0x1 0b65 e40b | | Load 0x2,0xb 0b66 480c |H | Short_Literal 0xc 0b67 4802 |H | Short_Literal 0x2 0b68 0099 | | Action Reference_Dynamic 0b69 e40d | | Load 0x2,0xd 0b6a 480e |H | Short_Literal 0xe 0b6b 4802 |H | Short_Literal 0x2 0b6c 0099 | | Action Reference_Dynamic 0b6d 8013 | | Call 0x0,0x13 0b6e c024 | $ | Store 0x0,0x24 0b6f e405 | | Load 0x2,0x5 0b70 e403 | | Load 0x2,0x3 0b71 e402 | | Load 0x2,0x2 0b72 e5ff | | Load 0x2,-0x1 0b73 805f | _ | Call 0x0,0x5f 0b74 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0b75 TRAP_0a40: 0b75 0007 | | Action Break_Optional 0b76 8411 | | Call 0x2,0x11 0b77 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0b78 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 0b7c 0000 0000 | | .BLANK 0000[0x4] 0b80 ; -------------------------------------------------------------------------------------- 0b80 ; SUBPROGRAM 0b80 ; -------------------------------------------------------------------------------------- 0b80 0b86 | | .CONST 0x0b86 ; Address of begin 0b81 0b92 | | .CONST 0x0b92 ; Address of exception handler 0b82 0003 | | .CONST 0x0003 ; Number of locals 0b83 INIT_0b80: 0b83 00e1 | | Load_Encached Boolean_Cache 0b84 029f 103b | ;| Declare_Subprogram INIT_1038,For_Call 0b86 BODY_0b80: 0b86 00e1 | | Load_Encached Boolean_Cache 0b87 e5fd | | Load 0x2,-0x3 0b88 e5fe | | Load 0x2,-0x2 0b89 e5ff | | Load 0x2,-0x1 0b8a 4804 |H | Short_Literal 0x4 0b8b e276 | v | Load 0x1,0x76 0b8c 170d | | Execute Task,Entry_Call,Field_Number 0xd 0b8d 005a | Z | Store_Top Discrete,At_Offset_2 0b8e 00d9 | | Load_Top At_Offset_1 0b8f 6801 |h | Jump_Zero 0xb91 0b90 8403 | | Call 0x2,0x3 0b91 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0b92 TRAP_0b80: 0b92 0007 | | Action Break_Optional 0b93 0092 1283 | | Action Push_String_Extended,0x1283 ; "Creation_Register:" 0b95 e03a | : | Load 0x0,0x3a 0b96 180d | | Execute Package,Field_Execute,Field_Number 0xd 0b97 01cc | | Execute Vector,Catenate 0b98 803b | ; | Call 0x0,0x3b 0b99 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0b9a 0000 0000 | | .BLANK 0000[0x6] 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 ; SUBPROGRAM 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 0ba5 | | .CONST 0x0ba5 ; Address of begin 0ba1 0004 | | .CONST 0x0004 ; Address of exception handler 0ba2 0002 | | .CONST 0x0002 ; Number of locals 0ba3 INIT_0ba0: 0ba3 e004 | | Load 0x0,0x4 0ba4 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0ba5 BODY_0ba0: 0ba5 e004 | | Load 0x0,0x4 0ba6 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51 0ba7 00e3 | | Load_Encached Natural_Cache 0ba8 e004 | | Load 0x0,0x4 0ba9 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0baa e004 | | Load 0x0,0x4 0bab 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0bac e004 | | Load 0x0,0x4 0bad 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0bae e5ff | | Load 0x2,-0x1 0baf 0a02 | | Execute_Immediate Plus,0x2 0bb0 00d8 | | Load_Top At_Offset_0 0bb1 00e3 | | Load_Encached Natural_Cache 0bb2 0260 | ` | Execute Discrete,In_Type 0bb3 7001 |p | Jump_Nonzero 0xbb5 0bb4 0801 | | Execute_Immediate Raise,0x1 0bb5 e01c | | Load 0x0,0x1c 0bb6 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0bb7 e004 | | Load 0x0,0x4 0bb8 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0bb9 e01c | | Load 0x0,0x1c 0bba 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0bbb e004 | | Load 0x0,0x4 0bbc 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0bbd c402 | | Store 0x2,0x2 0bbe c236 | 6 | Store 0x1,0x36 0bbf c233 | 3 | Store 0x1,0x33 0bc0 c234 | 4 | Store 0x1,0x34 0bc1 c235 | 5 | Store 0x1,0x35 0bc2 00d8 | | Load_Top At_Offset_0 0bc3 e004 | | Load 0x0,0x4 0bc4 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0bc5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bc6 0000 0000 | | .XXX[0x2] 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 ; SUBPROGRAM 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 0bcf | | .CONST 0x0bcf ; Address of begin 0bc9 0004 | | .CONST 0x0004 ; Address of exception handler 0bca 0002 | | .CONST 0x0002 ; Number of locals 0bcb INIT_0bc8: 0bcb e039 | 9 | Load 0x0,0x39 0bcc 0322 | " | Declare_Variable Record 0bcd 00d8 | | Load_Top At_Offset_0 0bce 1c00 | | Execute_Immediate Run_Utility,0x0 0bcf BODY_0bc8: 0bcf 00d8 | | Load_Top At_Offset_0 0bd0 e5fe | | Load 0x2,-0x2 0bd1 803c | < | Call 0x0,0x3c 0bd2 00d1 | | Pop_Control Pop_Count_1 0bd3 00d8 | | Load_Top At_Offset_0 0bd4 8056 | V | Call 0x0,0x56 0bd5 00d1 | | Pop_Control Pop_Count_1 0bd6 00d8 | | Load_Top At_Offset_0 0bd7 e5ff | | Load 0x2,-0x1 0bd8 0a01 | | Execute_Immediate Plus,0x1 0bd9 00d8 | | Load_Top At_Offset_0 0bda 00e3 | | Load_Encached Natural_Cache 0bdb 0260 | ` | Execute Discrete,In_Type 0bdc 7001 |p | Jump_Nonzero 0xbde 0bdd 0801 | | Execute_Immediate Raise,0x1 0bde 8280 | | Call 0x1,0x80 0bdf 803d | = | Call 0x0,0x3d 0be0 00d1 | | Pop_Control Pop_Count_1 0be1 00d8 | | Load_Top At_Offset_0 0be2 8057 | W | Call 0x0,0x57 0be3 00d1 | | Pop_Control Pop_Count_1 0be4 00d8 | | Load_Top At_Offset_0 0be5 805d | ] | Call 0x0,0x5d 0be6 e5fd | | Load 0x2,-0x3 0be7 017d | } | Execute Record,Structure_Write 0be8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0be9 0000 0000 | | .BLANK 0000[0x7] 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 ; SUBPROGRAM 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 0bf5 | | .CONST 0x0bf5 ; Address of begin 0bf1 0004 | | .CONST 0x0004 ; Address of exception handler 0bf2 0002 | | .CONST 0x0002 ; Number of locals 0bf3 INIT_0bf0: 0bf3 029f 105b | [| Declare_Subprogram INIT_1058,For_Call 0bf5 BODY_0bf0: 0bf5 e5fe | | Load 0x2,-0x2 0bf6 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0bf7 6805 |h | Jump_Zero 0xbfd 0bf8 e5fd | | Load 0x2,-0x3 0bf9 805e | ^ | Call 0x0,0x5e 0bfa 6802 |h | Jump_Zero 0xbfd 0bfb 4801 |H | Short_Literal 0x1 0bfc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0bfd e5fe | | Load 0x2,-0x2 0bfe 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0bff 6812 |h | Jump_Zero 0xc12 0c00 e5fe | | Load 0x2,-0x2 0c01 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0c02 601d |` | Indirect_Literal Discrete,0xc20,{0x00000000, 0x000fffff} 0c03 027e | ~ | Execute Discrete,Not_Equal 0c04 7008 |p | Jump_Nonzero 0xc0d 0c05 4803 |H | Short_Literal 0x3 0c06 8280 | | Call 0x1,0x80 0c07 e004 | | Load 0x0,0x4 0c08 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0c09 e5fe | | Load 0x2,-0x2 0c0a 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0c0b 027c | | | Execute Discrete,Less 0c0c 6805 |h | Jump_Zero 0xc12 0c0d e5fd | | Load 0x2,-0x3 0c0e 805e | ^ | Call 0x0,0x5e 0c0f 6802 |h | Jump_Zero 0xc12 0c10 4801 |H | Short_Literal 0x1 0c11 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c12 e5fe | | Load 0x2,-0x2 0c13 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0c14 6809 |h | Jump_Zero 0xc1e 0c15 00cf | | Action Mark_Auxiliary 0c16 e259 | Y | Load 0x1,0x59 0c17 4801 |H | Short_Literal 0x1 0c18 0263 | c | Execute Discrete,Above_Bound 0c19 7003 |p | Jump_Nonzero 0xc1d 0c1a 8402 | | Call 0x2,0x2 0c1b 00c8 | | Action Pop_Auxiliary_Range 0c1c 3ffd |? | Loop_Increasing 0xc1a 0c1d 00ce | | Action Pop_Auxiliary 0c1e 4800 |H | Short_Literal 0x0 0c1f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c20 0000 0000 | | .LITERAL {0x00000000, 0x000fffff} 0c24 0000 0000 | | .BLANK 0000[0x4] 0c28 ; -------------------------------------------------------------------------------------- 0c28 ; SUBPROGRAM 0c28 ; -------------------------------------------------------------------------------------- 0c28 0c2b | + | .CONST 0x0c2b ; Address of begin 0c29 0004 | | .CONST 0x0004 ; Address of exception handler 0c2a 0001 | | .CONST 0x0001 ; Number of locals 0c2b BODY_0c28: 0c2b INIT_0c28: 0c2b e5fd | | Load 0x2,-0x3 0c2c e004 | | Load 0x0,0x4 0c2d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c2e 00d9 | | Load_Top At_Offset_1 0c2f 00d0 | | Action Swap_Control 0c30 0260 | ` | Execute Discrete,In_Type 0c31 7001 |p | Jump_Nonzero 0xc33 0c32 0801 | | Execute_Immediate Raise,0x1 0c33 e5fe | | Load 0x2,-0x2 0c34 e5ff | | Load 0x2,-0x1 0c35 e025 | % | Load 0x0,0x25 0c36 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0c37 00d9 | | Load_Top At_Offset_1 0c38 00d0 | | Action Swap_Control 0c39 0260 | ` | Execute Discrete,In_Type 0c3a 7001 |p | Jump_Nonzero 0xc3c 0c3b 0801 | | Execute_Immediate Raise,0x1 0c3c 8282 | | Call 0x1,0x82 0c3d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c3e 0000 0000 | | .XXX[0x2] 0c40 ; -------------------------------------------------------------------------------------- 0c40 ; SUBPROGRAM 0c40 ; -------------------------------------------------------------------------------------- 0c40 0c46 | F | .CONST 0x0c46 ; Address of begin 0c41 0004 | | .CONST 0x0004 ; Address of exception handler 0c42 0002 | | .CONST 0x0002 ; Number of locals 0c43 INIT_0c40: 0c43 e004 | | Load 0x0,0x4 0c44 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a 0c45 0322 | " | Declare_Variable Record 0c46 BODY_0c40: 0c46 00db | | Load_Top At_Offset_3 0c47 e004 | | Load 0x0,0x4 0c48 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0c49 0a01 | | Execute_Immediate Plus,0x1 0c4a e004 | | Load 0x0,0x4 0c4b 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0c4c 00d9 | | Load_Top At_Offset_1 0c4d 00d0 | | Action Swap_Control 0c4e 0260 | ` | Execute Discrete,In_Type 0c4f 7001 |p | Jump_Nonzero 0xc51 0c50 0801 | | Execute_Immediate Raise,0x1 0c51 e5ff | | Load 0x2,-0x1 0c52 e004 | | Load 0x0,0x4 0c53 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0c54 e01c | | Load 0x0,0x1c 0c55 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0c56 e004 | | Load 0x0,0x4 0c57 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 0c58 00d9 | | Load_Top At_Offset_1 0c59 017d | } | Execute Record,Structure_Write 0c5a 4822 |H" | Short_Literal 0x22 0c5b 00d9 | | Load_Top At_Offset_1 0c5c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c5d e01c | | Load 0x0,0x1c 0c5e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c5f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c60 ; -------------------------------------------------------------------------------------- 0c60 ; SUBPROGRAM 0c60 ; -------------------------------------------------------------------------------------- 0c60 0c63 | c | .CONST 0x0c63 ; Address of begin 0c61 0c68 | h | .CONST 0x0c68 ; Address of exception handler 0c62 0001 | | .CONST 0x0001 ; Number of locals 0c63 BODY_0c60: 0c63 INIT_0c60: 0c63 e403 | | Load 0x2,0x3 0c64 00d8 | | Load_Top At_Offset_0 0c65 e004 | | Load 0x0,0x4 0c66 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0c67 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c68 TRAP_0c60: 0c68 0007 | | Action Break_Optional 0c69 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c6a 0000 0000 | | .BLANK 0000[0x6] 0c70 ; -------------------------------------------------------------------------------------- 0c70 ; SUBPROGRAM 0c70 ; -------------------------------------------------------------------------------------- 0c70 0c73 | s | .CONST 0x0c73 ; Address of begin 0c71 0004 | | .CONST 0x0004 ; Address of exception handler 0c72 0001 | | .CONST 0x0001 ; Number of locals 0c73 BODY_0c70: 0c73 INIT_0c70: 0c73 00da | | Load_Top At_Offset_2 0c74 00d8 | | Load_Top At_Offset_0 0c75 00e2 | | Load_Encached Integer_Cache 0c76 0260 | ` | Execute Discrete,In_Type 0c77 7001 |p | Jump_Nonzero 0xc79 0c78 0801 | | Execute_Immediate Raise,0x1 0c79 00e0 | | Load_Encached Standard_Cache 0c7a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c7b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c7c 0000 0000 | | .BLANK 0000[0x4] 0c80 ; -------------------------------------------------------------------------------------- 0c80 ; SUBPROGRAM 0c80 ; -------------------------------------------------------------------------------------- 0c80 0c83 | | .CONST 0x0c83 ; Address of begin 0c81 0004 | | .CONST 0x0004 ; Address of exception handler 0c82 0001 | | .CONST 0x0001 ; Number of locals 0c83 BODY_0c80: 0c83 INIT_0c80: 0c83 00da | | Load_Top At_Offset_2 0c84 e05c | \ | Load 0x0,0x5c 0c85 017f | | Execute Record,Equal 0c86 6803 |h | Jump_Zero 0xc8a 0c87 0092 1284 | | Action Push_String_Extended,0x1284 ; " [any inst]" 0c89 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c8a 0092 1285 | | Action Push_String_Extended,0x1285 ; " [" 0c8c 00db | | Load_Top At_Offset_3 0c8d 8060 | ` | Call 0x0,0x60 0c8e 01cc | | Execute Vector,Catenate 0c8f 0092 1286 | | Action Push_String_Extended,0x1286 ; "]" 0c91 01cc | | Execute Vector,Catenate 0c92 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c93 0000 0000 | | .BLANK 0000[0x5] 0c98 ; -------------------------------------------------------------------------------------- 0c98 ; SUBPROGRAM 0c98 ; -------------------------------------------------------------------------------------- 0c98 0c9b | | .CONST 0x0c9b ; Address of begin 0c99 0004 | | .CONST 0x0004 ; Address of exception handler 0c9a 0001 | | .CONST 0x0001 ; Number of locals 0c9b BODY_0c98: 0c9b INIT_0c98: 0c9b 00da | | Load_Top At_Offset_2 0c9c e061 | a | Load 0x0,0x61 0c9d 017f | | Execute Record,Equal 0c9e 6803 |h | Jump_Zero 0xca2 0c9f 0092 1287 | | Action Push_String_Extended,0x1287 ; " [any sub]" 0ca1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ca2 0092 1285 | | Action Push_String_Extended,0x1285 ; " [" 0ca4 00db | | Load_Top At_Offset_3 0ca5 8062 | b | Call 0x0,0x62 0ca6 01cc | | Execute Vector,Catenate 0ca7 0092 1286 | | Action Push_String_Extended,0x1286 ; "]" 0ca9 01cc | | Execute Vector,Catenate 0caa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cab 0000 0000 | | .BLANK 0000[0x5] 0cb0 ; -------------------------------------------------------------------------------------- 0cb0 ; SUBPROGRAM 0cb0 ; -------------------------------------------------------------------------------------- 0cb0 0cb3 | | .CONST 0x0cb3 ; Address of begin 0cb1 0004 | | .CONST 0x0004 ; Address of exception handler 0cb2 0001 | | .CONST 0x0001 ; Number of locals 0cb3 BODY_0cb0: 0cb3 INIT_0cb0: 0cb3 00da | | Load_Top At_Offset_2 0cb4 e063 | c | Load 0x0,0x63 0cb5 027f | | Execute Discrete,Equal 0cb6 6803 |h | Jump_Zero 0xcba 0cb7 0092 1288 | | Action Push_String_Extended,0x1288 ; " [any stmt]" 0cb9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cba 0092 1285 | | Action Push_String_Extended,0x1285 ; " [" 0cbc 00db | | Load_Top At_Offset_3 0cbd 8064 | d | Call 0x0,0x64 0cbe 01cc | | Execute Vector,Catenate 0cbf 0092 1286 | | Action Push_String_Extended,0x1286 ; "]" 0cc1 01cc | | Execute Vector,Catenate 0cc2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cc3 0000 0000 | | .BLANK 0000[0x5] 0cc8 ; -------------------------------------------------------------------------------------- 0cc8 ; SUBPROGRAM 0cc8 ; -------------------------------------------------------------------------------------- 0cc8 0ccb | | .CONST 0x0ccb ; Address of begin 0cc9 0004 | | .CONST 0x0004 ; Address of exception handler 0cca 0001 | | .CONST 0x0001 ; Number of locals 0ccb BODY_0cc8: 0ccb INIT_0cc8: 0ccb 00db | | Load_Top At_Offset_3 0ccc 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0ccd 7009 |p | Jump_Nonzero 0xcd7 0cce 00db | | Load_Top At_Offset_3 0ccf 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0cd0 7006 |p | Jump_Nonzero 0xcd7 0cd1 00db | | Load_Top At_Offset_3 0cd2 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0cd3 7003 |p | Jump_Nonzero 0xcd7 0cd4 00db | | Load_Top At_Offset_3 0cd5 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0cd6 683c |h< | Jump_Zero 0xd13 0cd7 00da | | Load_Top At_Offset_2 0cd8 804d | M | Call 0x0,0x4d 0cd9 0092 1289 | | Action Push_String_Extended,0x1289 ; ": " 0cdb 01cc | | Execute Vector,Catenate 0cdc 8048 | H | Call 0x0,0x48 0cdd 00db | | Load_Top At_Offset_3 0cde 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0cdf 6803 |h | Jump_Zero 0xce3 0ce0 0092 128a | | Action Push_String_Extended,0x128a ; " Tracing" 0ce2 8048 | H | Call 0x0,0x48 0ce3 00db | | Load_Top At_Offset_3 0ce4 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0ce5 6803 |h | Jump_Zero 0xce9 0ce6 0092 128b | | Action Push_String_Extended,0x128b ; " Exc Tracing" 0ce8 8048 | H | Call 0x0,0x48 0ce9 00db | | Load_Top At_Offset_3 0cea 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0ceb 6808 |h | Jump_Zero 0xcf4 0cec 0092 128c | | Action Push_String_Extended,0x128c ; " Stop, action=" 0cee e7fe | | Load 0x3,-0x2 0cef 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0cf0 00e0 | | Load_Encached Standard_Cache 0cf1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0cf2 01cc | | Execute Vector,Catenate 0cf3 8048 | H | Call 0x0,0x48 0cf4 00db | | Load_Top At_Offset_3 0cf5 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0cf6 681b |h | Jump_Zero 0xd12 0cf7 0092 128d | | Action Push_String_Extended,0x128d ; " Stepping: " 0cf9 e7fe | | Load 0x3,-0x2 0cfa 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0cfb 00e0 | | Load_Encached Standard_Cache 0cfc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0cfd 01cc | | Execute Vector,Catenate 0cfe 0092 128e | | Action Push_String_Extended,0x128e ; " level=#" 0d00 01cc | | Execute Vector,Catenate 0d01 4820 |H | Short_Literal 0x20 0d02 4800 |H | Short_Literal 0x0 0d03 4810 |H | Short_Literal 0x10 0d04 e7fe | | Load 0x3,-0x2 0d05 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0d06 e04e | N | Load 0x0,0x4e 0d07 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0d08 01cc | | Execute Vector,Catenate 0d09 0092 128f | | Action Push_String_Extended,0x128f ; " action=" 0d0b 01cc | | Execute Vector,Catenate 0d0c e7fe | | Load 0x3,-0x2 0d0d 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0d0e 00e0 | | Load_Encached Standard_Cache 0d0f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d10 01cc | | Execute Vector,Catenate 0d11 8048 | H | Call 0x0,0x48 0d12 8049 | I | Call 0x0,0x49 0d13 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d14 0000 0000 | | .BLANK 0000[0x4] 0d18 ; -------------------------------------------------------------------------------------- 0d18 ; SUBPROGRAM 0d18 ; -------------------------------------------------------------------------------------- 0d18 0d1b | | .CONST 0x0d1b ; Address of begin 0d19 0004 | | .CONST 0x0004 ; Address of exception handler 0d1a 0001 | | .CONST 0x0001 ; Number of locals 0d1b BODY_0d18: 0d1b INIT_0d18: 0d1b 00da | | Load_Top At_Offset_2 0d1c 804d | M | Call 0x0,0x4d 0d1d 0092 1290 | | Action Push_String_Extended,0x1290 ; " DB mask= " 0d1f 01cc | | Execute Vector,Catenate 0d20 4820 |H | Short_Literal 0x20 0d21 4800 |H | Short_Literal 0x0 0d22 4810 |H | Short_Literal 0x10 0d23 e7fe | | Load 0x3,-0x2 0d24 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d25 e04e | N | Load 0x0,0x4e 0d26 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0d27 01cc | | Execute Vector,Catenate 0d28 8048 | H | Call 0x0,0x48 0d29 8049 | I | Call 0x0,0x49 0d2a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d2b 0000 0000 | | .BLANK 0000[0x5] 0d30 ; -------------------------------------------------------------------------------------- 0d30 ; SUBPROGRAM 0d30 ; -------------------------------------------------------------------------------------- 0d30 0d33 | 3 | .CONST 0x0d33 ; Address of begin 0d31 0004 | | .CONST 0x0004 ; Address of exception handler 0d32 0001 | | .CONST 0x0001 ; Number of locals 0d33 BODY_0d30: 0d33 INIT_0d30: 0d33 00da | | Load_Top At_Offset_2 0d34 804d | M | Call 0x0,0x4d 0d35 0092 1291 | | Action Push_String_Extended,0x1291 ; " exc info:" 0d37 01cc | | Execute Vector,Catenate 0d38 e7fe | | Load 0x3,-0x2 0d39 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0d3a e01c | | Load 0x0,0x1c 0d3b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d3c 01cc | | Execute Vector,Catenate 0d3d 0092 1292 | | Action Push_String_Extended,0x1292 ; " " 0d3f 01cc | | Execute Vector,Catenate 0d40 e7fe | | Load 0x3,-0x2 0d41 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0d42 e01c | | Load 0x0,0x1c 0d43 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d44 01cc | | Execute Vector,Catenate 0d45 8048 | H | Call 0x0,0x48 0d46 8049 | I | Call 0x0,0x49 0d47 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d48 ; -------------------------------------------------------------------------------------- 0d48 ; SUBPROGRAM 0d48 ; -------------------------------------------------------------------------------------- 0d48 0d4b | K | .CONST 0x0d4b ; Address of begin 0d49 0004 | | .CONST 0x0004 ; Address of exception handler 0d4a 0001 | | .CONST 0x0001 ; Number of locals 0d4b BODY_0d48: 0d4b INIT_0d48: 0d4b e7fd | | Load 0x3,-0x3 0d4c 00e2 | | Load_Encached Integer_Cache 0d4d 025e | ^ | Execute Discrete,Convert 0d4e e7fe | | Load 0x3,-0x2 0d4f e7ff | | Load 0x3,-0x1 0d50 e025 | % | Load 0x0,0x25 0d51 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d52 00d9 | | Load_Top At_Offset_1 0d53 00d0 | | Action Swap_Control 0d54 0260 | ` | Execute Discrete,In_Type 0d55 7001 |p | Jump_Nonzero 0xd57 0d56 0801 | | Execute_Immediate Raise,0x1 0d57 8406 | | Call 0x2,0x6 0d58 00d1 | | Pop_Control Pop_Count_1 0d59 c7fd | | Store 0x3,-0x3 0d5a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d5b 0000 0000 | | .BLANK 0000[0x5] 0d60 ; -------------------------------------------------------------------------------------- 0d60 ; SUBPROGRAM 0d60 ; -------------------------------------------------------------------------------------- 0d60 0d63 | c | .CONST 0x0d63 ; Address of begin 0d61 0004 | | .CONST 0x0004 ; Address of exception handler 0d62 0001 | | .CONST 0x0001 ; Number of locals 0d63 BODY_0d60: 0d63 INIT_0d60: 0d63 e7fd | | Load 0x3,-0x3 0d64 00d8 | | Load_Top At_Offset_0 0d65 00e2 | | Load_Encached Integer_Cache 0d66 0260 | ` | Execute Discrete,In_Type 0d67 7001 |p | Jump_Nonzero 0xd69 0d68 0801 | | Execute_Immediate Raise,0x1 0d69 e7fe | | Load 0x3,-0x2 0d6a e7ff | | Load 0x3,-0x1 0d6b e025 | % | Load 0x0,0x25 0d6c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d6d 00d9 | | Load_Top At_Offset_1 0d6e 00d0 | | Action Swap_Control 0d6f 0260 | ` | Execute Discrete,In_Type 0d70 7001 |p | Jump_Nonzero 0xd72 0d71 0801 | | Execute_Immediate Raise,0x1 0d72 8065 | e | Call 0x0,0x65 0d73 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0d74 0000 0000 | | .BLANK 0000[0x4] 0d78 ; -------------------------------------------------------------------------------------- 0d78 ; SUBPROGRAM 0d78 ; -------------------------------------------------------------------------------------- 0d78 0d7b | { | .CONST 0x0d7b ; Address of begin 0d79 0004 | | .CONST 0x0004 ; Address of exception handler 0d7a 0001 | | .CONST 0x0001 ; Number of locals 0d7b BODY_0d78: 0d7b INIT_0d78: 0d7b e7fd | | Load 0x3,-0x3 0d7c 00e2 | | Load_Encached Integer_Cache 0d7d 025e | ^ | Execute Discrete,Convert 0d7e e7fe | | Load 0x3,-0x2 0d7f e7ff | | Load 0x3,-0x1 0d80 e025 | % | Load 0x0,0x25 0d81 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d82 00d9 | | Load_Top At_Offset_1 0d83 00d0 | | Action Swap_Control 0d84 0260 | ` | Execute Discrete,In_Type 0d85 7001 |p | Jump_Nonzero 0xd87 0d86 0801 | | Execute_Immediate Raise,0x1 0d87 8407 | | Call 0x2,0x7 0d88 00d1 | | Pop_Control Pop_Count_1 0d89 c7fd | | Store 0x3,-0x3 0d8a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d8b 0000 0000 | | .BLANK 0000[0x5] 0d90 ; -------------------------------------------------------------------------------------- 0d90 ; SUBPROGRAM 0d90 ; -------------------------------------------------------------------------------------- 0d90 0d93 | | .CONST 0x0d93 ; Address of begin 0d91 0004 | | .CONST 0x0004 ; Address of exception handler 0d92 0001 | | .CONST 0x0001 ; Number of locals 0d93 BODY_0d90: 0d93 INIT_0d90: 0d93 e7fd | | Load 0x3,-0x3 0d94 00d8 | | Load_Top At_Offset_0 0d95 00e2 | | Load_Encached Integer_Cache 0d96 0260 | ` | Execute Discrete,In_Type 0d97 7001 |p | Jump_Nonzero 0xd99 0d98 0801 | | Execute_Immediate Raise,0x1 0d99 e7fe | | Load 0x3,-0x2 0d9a e7ff | | Load 0x3,-0x1 0d9b e025 | % | Load 0x0,0x25 0d9c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d9d 00d9 | | Load_Top At_Offset_1 0d9e 00d0 | | Action Swap_Control 0d9f 0260 | ` | Execute Discrete,In_Type 0da0 7001 |p | Jump_Nonzero 0xda2 0da1 0801 | | Execute_Immediate Raise,0x1 0da2 8065 | e | Call 0x0,0x65 0da3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0da4 0000 0000 | | .BLANK 0000[0x4] 0da8 ; -------------------------------------------------------------------------------------- 0da8 ; SUBPROGRAM 0da8 ; -------------------------------------------------------------------------------------- 0da8 0dab | | .CONST 0x0dab ; Address of begin 0da9 0004 | | .CONST 0x0004 ; Address of exception handler 0daa 0001 | | .CONST 0x0001 ; Number of locals 0dab BODY_0da8: 0dab INIT_0da8: 0dab e7fd | | Load 0x3,-0x3 0dac 00e2 | | Load_Encached Integer_Cache 0dad 025e | ^ | Execute Discrete,Convert 0dae e7fe | | Load 0x3,-0x2 0daf e7ff | | Load 0x3,-0x1 0db0 e025 | % | Load 0x0,0x25 0db1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0db2 00d9 | | Load_Top At_Offset_1 0db3 00d0 | | Action Swap_Control 0db4 0260 | ` | Execute Discrete,In_Type 0db5 7001 |p | Jump_Nonzero 0xdb7 0db6 0801 | | Execute_Immediate Raise,0x1 0db7 8408 | | Call 0x2,0x8 0db8 00d1 | | Pop_Control Pop_Count_1 0db9 c7fd | | Store 0x3,-0x3 0dba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0dbb 0000 0000 | | .BLANK 0000[0x5] 0dc0 ; -------------------------------------------------------------------------------------- 0dc0 ; SUBPROGRAM 0dc0 ; -------------------------------------------------------------------------------------- 0dc0 0dc3 | | .CONST 0x0dc3 ; Address of begin 0dc1 0004 | | .CONST 0x0004 ; Address of exception handler 0dc2 0001 | | .CONST 0x0001 ; Number of locals 0dc3 BODY_0dc0: 0dc3 INIT_0dc0: 0dc3 e7fd | | Load 0x3,-0x3 0dc4 00d8 | | Load_Top At_Offset_0 0dc5 00e2 | | Load_Encached Integer_Cache 0dc6 0260 | ` | Execute Discrete,In_Type 0dc7 7001 |p | Jump_Nonzero 0xdc9 0dc8 0801 | | Execute_Immediate Raise,0x1 0dc9 e7fe | | Load 0x3,-0x2 0dca e7ff | | Load 0x3,-0x1 0dcb e025 | % | Load 0x0,0x25 0dcc 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0dcd 00d9 | | Load_Top At_Offset_1 0dce 00d0 | | Action Swap_Control 0dcf 0260 | ` | Execute Discrete,In_Type 0dd0 7001 |p | Jump_Nonzero 0xdd2 0dd1 0801 | | Execute_Immediate Raise,0x1 0dd2 8065 | e | Call 0x0,0x65 0dd3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0dd4 0000 0000 | | .BLANK 0000[0x4] 0dd8 ; -------------------------------------------------------------------------------------- 0dd8 ; SUBPROGRAM 0dd8 ; -------------------------------------------------------------------------------------- 0dd8 0de3 | | .CONST 0x0de3 ; Address of begin 0dd9 0004 | | .CONST 0x0004 ; Address of exception handler 0dda 0003 | | .CONST 0x0003 ; Number of locals 0ddb INIT_0dd8: 0ddb e428 | ( | Load 0x2,0x28 0ddc e24d | M | Load 0x1,0x4d 0ddd 01d5 | | Execute Vector,Field_Reference 0dde 0007 | | Action Break_Optional 0ddf e428 | ( | Load 0x2,0x28 0de0 e24f | O | Load 0x1,0x4f 0de1 01d5 | | Execute Vector,Field_Reference 0de2 0007 | | Action Break_Optional 0de3 BODY_0dd8: 0de3 00d9 | | Load_Top At_Offset_1 0de4 e027 | ' | Load 0x0,0x27 0de5 027f | | Execute Discrete,Equal 0de6 702a |p* | Jump_Nonzero 0xe11 0de7 0092 1293 | | Action Push_String_Extended,0x1293 ; "Task=all, Pc=" 0de9 00da | | Load_Top At_Offset_2 0dea e01c | | Load 0x0,0x1c 0deb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0dec 01cc | | Execute Vector,Catenate 0ded 0092 1294 | | Action Push_String_Extended,0x1294 ; " Id=" 0def 01cc | | Execute Vector,Catenate 0df0 00d9 | | Load_Top At_Offset_1 0df1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0df2 00e0 | | Load_Encached Standard_Cache 0df3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0df4 01cc | | Execute Vector,Catenate 0df5 0092 1295 | | Action Push_String_Extended,0x1295 ; " " 0df7 01cc | | Execute Vector,Catenate 0df8 00d9 | | Load_Top At_Offset_1 0df9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0dfa 00e0 | | Load_Encached Standard_Cache 0dfb 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0dfc 01cc | | Execute Vector,Catenate 0dfd 0092 1296 | | Action Push_String_Extended,0x1296 ; " /" 0dff 01cc | | Execute Vector,Catenate 0e00 00d9 | | Load_Top At_Offset_1 0e01 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e02 00e0 | | Load_Encached Standard_Cache 0e03 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e04 01cc | | Execute Vector,Catenate 0e05 8048 | H | Call 0x0,0x48 0e06 00d8 | | Load_Top At_Offset_0 0e07 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0e08 6803 |h | Jump_Zero 0xe0c 0e09 0092 1297 | | Action Push_String_Extended,0x1297 ; " T" 0e0b 8048 | H | Call 0x0,0x48 0e0c 00d8 | | Load_Top At_Offset_0 0e0d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e0e 8403 | | Call 0x2,0x3 0e0f 8048 | H | Call 0x0,0x48 0e10 8049 | I | Call 0x0,0x49 0e11 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e12 0000 0000 | | .BLANK 0000[0x6] 0e18 ; -------------------------------------------------------------------------------------- 0e18 ; SUBPROGRAM 0e18 ; -------------------------------------------------------------------------------------- 0e18 0e1f | | .CONST 0x0e1f ; Address of begin 0e19 0004 | | .CONST 0x0004 ; Address of exception handler 0e1a 0002 | | .CONST 0x0002 ; Number of locals 0e1b INIT_0e18: 0e1b e428 | ( | Load 0x2,0x28 0e1c e253 | S | Load 0x1,0x53 0e1d 01d5 | | Execute Vector,Field_Reference 0e1e 0007 | | Action Break_Optional 0e1f BODY_0e18: 0e1f 00d8 | | Load_Top At_Offset_0 0e20 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e21 e027 | ' | Load 0x0,0x27 0e22 027f | | Execute Discrete,Equal 0e23 7032 |p2 | Jump_Nonzero 0xe56 0e24 0092 1298 | | Action Push_String_Extended,0x1298 ; "Task: " 0e26 00d9 | | Load_Top At_Offset_1 0e27 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e28 804d | M | Call 0x0,0x4d 0e29 01cc | | Execute Vector,Catenate 0e2a 0092 1299 | | Action Push_String_Extended,0x1299 ; " Pc=" 0e2c 01cc | | Execute Vector,Catenate 0e2d 00d9 | | Load_Top At_Offset_1 0e2e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e2f e01c | | Load 0x0,0x1c 0e30 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0e31 01cc | | Execute Vector,Catenate 0e32 0092 1294 | | Action Push_String_Extended,0x1294 ; " Id=" 0e34 01cc | | Execute Vector,Catenate 0e35 00d9 | | Load_Top At_Offset_1 0e36 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0e37 00e0 | | Load_Encached Standard_Cache 0e38 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e39 01cc | | Execute Vector,Catenate 0e3a 0092 1295 | | Action Push_String_Extended,0x1295 ; " " 0e3c 01cc | | Execute Vector,Catenate 0e3d 00d9 | | Load_Top At_Offset_1 0e3e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e3f 00e0 | | Load_Encached Standard_Cache 0e40 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e41 01cc | | Execute Vector,Catenate 0e42 0092 1296 | | Action Push_String_Extended,0x1296 ; " /" 0e44 01cc | | Execute Vector,Catenate 0e45 00d9 | | Load_Top At_Offset_1 0e46 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0e47 00e0 | | Load_Encached Standard_Cache 0e48 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e49 01cc | | Execute Vector,Catenate 0e4a 8048 | H | Call 0x0,0x48 0e4b 00d8 | | Load_Top At_Offset_0 0e4c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e4d 6803 |h | Jump_Zero 0xe51 0e4e 0092 1297 | | Action Push_String_Extended,0x1297 ; " T" 0e50 8048 | H | Call 0x0,0x48 0e51 00d8 | | Load_Top At_Offset_0 0e52 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0e53 8403 | | Call 0x2,0x3 0e54 8048 | H | Call 0x0,0x48 0e55 8049 | I | Call 0x0,0x49 0e56 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e57 0000 | | .XXX[0x1] 0e58 ; -------------------------------------------------------------------------------------- 0e58 ; SUBPROGRAM 0e58 ; -------------------------------------------------------------------------------------- 0e58 0e5f | _ | .CONST 0x0e5f ; Address of begin 0e59 0004 | | .CONST 0x0004 ; Address of exception handler 0e5a 0002 | | .CONST 0x0002 ; Number of locals 0e5b INIT_0e58: 0e5b e428 | ( | Load 0x2,0x28 0e5c e268 | h | Load 0x1,0x68 0e5d 01d5 | | Execute Vector,Field_Reference 0e5e 0007 | | Action Break_Optional 0e5f BODY_0e58: 0e5f 00d8 | | Load_Top At_Offset_0 0e60 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e61 e01e | | Load 0x0,0x1e 0e62 027e | ~ | Execute Discrete,Not_Equal 0e63 685e |h^ | Jump_Zero 0xec2 0e64 e428 | ( | Load 0x2,0x28 0e65 00e0 | | Load_Encached Standard_Cache 0e66 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e67 0092 1289 | | Action Push_String_Extended,0x1289 ; ": " 0e69 01cc | | Execute Vector,Catenate 0e6a 0092 129a | | Action Push_String_Extended,0x129a ; "Id=" 0e6c 01cc | | Execute Vector,Catenate 0e6d 00d9 | | Load_Top At_Offset_1 0e6e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e6f 00e0 | | Load_Encached Standard_Cache 0e70 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e71 01cc | | Execute Vector,Catenate 0e72 0092 1295 | | Action Push_String_Extended,0x1295 ; " " 0e74 01cc | | Execute Vector,Catenate 0e75 8048 | H | Call 0x0,0x48 0e76 00d8 | | Load_Top At_Offset_0 0e77 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e78 e011 | | Load 0x0,0x11 0e79 027f | | Execute Discrete,Equal 0e7a 6804 |h | Jump_Zero 0xe7f 0e7b 0092 129b | | Action Push_String_Extended,0x129b ; "all" 0e7d 8048 | H | Call 0x0,0x48 0e7e 7804 |x | Jump 0xe83 0e7f 00d8 | | Load_Top At_Offset_0 0e80 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e81 804d | M | Call 0x0,0x4d 0e82 8048 | H | Call 0x0,0x48 0e83 0092 129c | | Action Push_String_Extended,0x129c ; " Pri=" 0e85 00d9 | | Load_Top At_Offset_1 0e86 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e87 00e0 | | Load_Encached Standard_Cache 0e88 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e89 01cc | | Execute Vector,Catenate 0e8a 8048 | H | Call 0x0,0x48 0e8b 0092 129d | | Action Push_String_Extended,0x129d ; " Action= " 0e8d 8048 | H | Call 0x0,0x48 0e8e 00d8 | | Load_Top At_Offset_0 0e8f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e90 4605 |F | Jump_Case 0x6 0e91 7815 |x | Jump 0xea7 ; case 0x0 0e92 7804 |x | Jump 0xe97 ; case 0x1 0e93 7817 |x | Jump 0xeab ; case 0x2 0e94 780a |x | Jump 0xe9f ; case 0x3 0e95 780d |x | Jump 0xea3 ; case 0x4 0e96 7800 |x | Jump 0xe97 ; case 0x5 0e97 00d8 | | Load_Top At_Offset_0 0e98 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e99 e003 | | Load 0x0,0x3 0e9a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0e9b 011c | | Execute Any,Convert_Unchecked 0e9c 1c01 | | Execute_Immediate Run_Utility,0x1 0e9d 8048 | H | Call 0x0,0x48 0e9e 780f |x | Jump 0xeae 0e9f 0092 129e | | Action Push_String_Extended,0x129e ; "Propagate" 0ea1 8048 | H | Call 0x0,0x48 0ea2 780b |x | Jump 0xeae 0ea3 0092 129f | | Action Push_String_Extended,0x129f ; "Catch" 0ea5 8048 | H | Call 0x0,0x48 0ea6 7807 |x | Jump 0xeae 0ea7 0092 12a0 | | Action Push_String_Extended,0x12a0 ; "History" 0ea9 8048 | H | Call 0x0,0x48 0eaa 7803 |x | Jump 0xeae 0eab 0092 12a1 | | Action Push_String_Extended,0x12a1 ; "Trace" 0ead 8048 | H | Call 0x0,0x48 0eae 0092 12a2 | | Action Push_String_Extended,0x12a2 ; " Exc= " 0eb0 00d9 | | Load_Top At_Offset_1 0eb1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0eb2 8066 | f | Call 0x0,0x66 0eb3 01cc | | Execute Vector,Catenate 0eb4 00d9 | | Load_Top At_Offset_1 0eb5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0eb6 8403 | | Call 0x2,0x3 0eb7 01cc | | Execute Vector,Catenate 0eb8 00d9 | | Load_Top At_Offset_1 0eb9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0eba 8404 | | Call 0x2,0x4 0ebb 01cc | | Execute Vector,Catenate 0ebc 00d9 | | Load_Top At_Offset_1 0ebd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0ebe 8405 | | Call 0x2,0x5 0ebf 01cc | | Execute Vector,Catenate 0ec0 8048 | H | Call 0x0,0x48 0ec1 8049 | I | Call 0x0,0x49 0ec2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ec3 0000 0000 | | .BLANK 0000[0x5] 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 ; SUBPROGRAM 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 0ecf | | .CONST 0x0ecf ; Address of begin 0ec9 0004 | | .CONST 0x0004 ; Address of exception handler 0eca 0002 | | .CONST 0x0002 ; Number of locals 0ecb INIT_0ec8: 0ecb e428 | ( | Load 0x2,0x28 0ecc e25d | ] | Load 0x1,0x5d 0ecd 01d5 | | Execute Vector,Field_Reference 0ece 0007 | | Action Break_Optional 0ecf BODY_0ec8: 0ecf 00d8 | | Load_Top At_Offset_0 0ed0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ed1 804d | M | Call 0x0,0x4d 0ed2 0092 1285 | | Action Push_String_Extended,0x1285 ; " [" 0ed4 01cc | | Execute Vector,Catenate 0ed5 00d9 | | Load_Top At_Offset_1 0ed6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ed7 e003 | | Load 0x0,0x3 0ed8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ed9 011c | | Execute Any,Convert_Unchecked 0eda 1c01 | | Execute_Immediate Run_Utility,0x1 0edb 01cc | | Execute Vector,Catenate 0edc 0092 1286 | | Action Push_String_Extended,0x1286 ; "]" 0ede 01cc | | Execute Vector,Catenate 0edf 00d9 | | Load_Top At_Offset_1 0ee0 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ee1 8403 | | Call 0x2,0x3 0ee2 01cc | | Execute Vector,Catenate 0ee3 0092 12a3 | | Action Push_String_Extended,0x12a3 ; " Low = " 0ee5 01cc | | Execute Vector,Catenate 0ee6 00d9 | | Load_Top At_Offset_1 0ee7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ee8 e01c | | Load 0x0,0x1c 0ee9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0eea 01cc | | Execute Vector,Catenate 0eeb 0092 12a4 | | Action Push_String_Extended,0x12a4 ; " High = " 0eed 01cc | | Execute Vector,Catenate 0eee 00d9 | | Load_Top At_Offset_1 0eef 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ef0 e01c | | Load 0x0,0x1c 0ef1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ef2 01cc | | Execute Vector,Catenate 0ef3 8048 | H | Call 0x0,0x48 0ef4 8049 | I | Call 0x0,0x49 0ef5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ef6 0000 0000 | | .XXX[0x2] 0ef8 ; -------------------------------------------------------------------------------------- 0ef8 ; SUBPROGRAM 0ef8 ; -------------------------------------------------------------------------------------- 0ef8 0eff | | .CONST 0x0eff ; Address of begin 0ef9 0004 | | .CONST 0x0004 ; Address of exception handler 0efa 0002 | | .CONST 0x0002 ; Number of locals 0efb INIT_0ef8: 0efb e428 | ( | Load 0x2,0x28 0efc e258 | X | Load 0x1,0x58 0efd 01d5 | | Execute Vector,Field_Reference 0efe 0007 | | Action Break_Optional 0eff BODY_0ef8: 0eff 00d8 | | Load_Top At_Offset_0 0f00 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0f01 e01e | | Load 0x0,0x1e 0f02 027e | ~ | Execute Discrete,Not_Equal 0f03 682a |h* | Jump_Zero 0xf2e 0f04 e428 | ( | Load 0x2,0x28 0f05 00e0 | | Load_Encached Standard_Cache 0f06 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0f07 0092 1289 | | Action Push_String_Extended,0x1289 ; ": " 0f09 01cc | | Execute Vector,Catenate 0f0a 8048 | H | Call 0x0,0x48 0f0b 00d8 | | Load_Top At_Offset_0 0f0c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f0d e003 | | Load 0x0,0x3 0f0e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f0f 011c | | Execute Any,Convert_Unchecked 0f10 1c01 | | Execute_Immediate Run_Utility,0x1 0f11 8048 | H | Call 0x0,0x48 0f12 0092 12a5 | | Action Push_String_Extended,0x12a5 ; " Action=" 0f14 00d9 | | Load_Top At_Offset_1 0f15 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0f16 00e0 | | Load_Encached Standard_Cache 0f17 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0f18 01cc | | Execute Vector,Catenate 0f19 0092 1295 | | Action Push_String_Extended,0x1295 ; " " 0f1b 01cc | | Execute Vector,Catenate 0f1c 00d9 | | Load_Top At_Offset_1 0f1d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f1e 804d | M | Call 0x0,0x4d 0f1f 01cc | | Execute Vector,Catenate 0f20 00d9 | | Load_Top At_Offset_1 0f21 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0f22 8403 | | Call 0x2,0x3 0f23 01cc | | Execute Vector,Catenate 0f24 00d9 | | Load_Top At_Offset_1 0f25 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0f26 8404 | | Call 0x2,0x4 0f27 01cc | | Execute Vector,Catenate 0f28 00d9 | | Load_Top At_Offset_1 0f29 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0f2a 8405 | | Call 0x2,0x5 0f2b 01cc | | Execute Vector,Catenate 0f2c 8048 | H | Call 0x0,0x48 0f2d 8049 | I | Call 0x0,0x49 0f2e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f2f 0000 | | .XXX[0x1] 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 e407 | | Load 0x2,0x7 0f34 e268 | h | Load 0x1,0x68 0f35 01d5 | | Execute Vector,Field_Reference 0f36 029f 1083 | | Declare_Subprogram INIT_1080,For_Call 0f38 BODY_0f30: 0f38 00d9 | | Load_Top At_Offset_1 0f39 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0f3a e01e | | Load 0x0,0x1e 0f3b 027e | ~ | Execute Discrete,Not_Equal 0f3c 683e |h> | Jump_Zero 0xf7b 0f3d 00d9 | | Load_Top At_Offset_1 0f3e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f3f e011 | | Load 0x0,0x11 0f40 027f | | Execute Discrete,Equal 0f41 7005 |p | Jump_Nonzero 0xf47 0f42 00d9 | | Load_Top At_Offset_1 0f43 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f44 e5fe | | Load 0x2,-0x2 0f45 027f | | Execute Discrete,Equal 0f46 6834 |h4 | Jump_Zero 0xf7b 0f47 00d9 | | Load_Top At_Offset_1 0f48 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f49 8067 | g | Call 0x0,0x67 0f4a 7006 |p | Jump_Nonzero 0xf51 0f4b 00d9 | | Load_Top At_Offset_1 0f4c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f4d 8068 | h | Call 0x0,0x68 0f4e e5ff | | Load 0x2,-0x1 0f4f 8069 | i | Call 0x0,0x69 0f50 682a |h* | Jump_Zero 0xf7b 0f51 00d9 | | Load_Top At_Offset_1 0f52 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0f53 e061 | a | Load 0x0,0x61 0f54 017f | | Execute Record,Equal 0f55 6824 |h$ | Jump_Zero 0xf7a 0f56 00d9 | | Load_Top At_Offset_1 0f57 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0f58 e063 | c | Load 0x0,0x63 0f59 027f | | Execute Discrete,Equal 0f5a 681f |h | Jump_Zero 0xf7a 0f5b 00d9 | | Load_Top At_Offset_1 0f5c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0f5d e05c | \ | Load 0x0,0x5c 0f5e 017f | | Execute Record,Equal 0f5f 681a |h | Jump_Zero 0xf7a 0f60 00d9 | | Load_Top At_Offset_1 0f61 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0f62 0f02 | | Execute_Immediate Equal,0x2 0f63 6804 |h | Jump_Zero 0xf68 0f64 00d9 | | Load_Top At_Offset_1 0f65 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0f66 a5fb | | Store_Unchecked 0x2,-0x5 0f67 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f68 00d9 | | Load_Top At_Offset_1 0f69 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0f6a 7004 |p | Jump_Nonzero 0xf6f 0f6b 00d9 | | Load_Top At_Offset_1 0f6c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0f6d a5f9 | | Store_Unchecked 0x2,-0x7 0f6e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f6f 00d9 | | Load_Top At_Offset_1 0f70 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0f71 e403 | | Load 0x2,0x3 0f72 027d | } | Execute Discrete,Greater 0f73 6805 |h | Jump_Zero 0xf79 0f74 00d9 | | Load_Top At_Offset_1 0f75 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0f76 a403 | | Store_Unchecked 0x2,0x3 0f77 e407 | | Load 0x2,0x7 0f78 a402 | | Store_Unchecked 0x2,0x2 0f79 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f7a 8603 | | Call 0x3,0x3 0f7b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f7c 0000 0000 | | .BLANK 0000[0x4] 0f80 ; -------------------------------------------------------------------------------------- 0f80 ; SUBPROGRAM 0f80 ; -------------------------------------------------------------------------------------- 0f80 0f83 | | .CONST 0x0f83 ; Address of begin 0f81 0004 | | .CONST 0x0004 ; Address of exception handler 0f82 0001 | | .CONST 0x0001 ; Number of locals 0f83 BODY_0f80: 0f83 INIT_0f80: 0f83 00da | | Load_Top At_Offset_2 0f84 e01e | | Load 0x0,0x1e 0f85 027f | | Execute Discrete,Equal 0f86 6801 |h | Jump_Zero 0xf88 0f87 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f88 00cf | | Action Mark_Auxiliary 0f89 e403 | | Load 0x2,0x3 0f8a 4801 |H | Short_Literal 0x1 0f8b 0263 | c | Execute Discrete,Above_Bound 0f8c 700b |p | Jump_Nonzero 0xf98 0f8d 00d8 | | Load_Top At_Offset_0 0f8e e402 | | Load 0x2,0x2 0f8f 01d7 | | Execute Vector,Field_Read 0f90 e7ff | | Load 0x3,-0x1 0f91 027f | | Execute Discrete,Equal 0f92 6803 |h | Jump_Zero 0xf96 0f93 4801 |H | Short_Literal 0x1 0f94 a406 | | Store_Unchecked 0x2,0x6 0f95 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f96 00c8 | | Action Pop_Auxiliary_Range 0f97 3ff5 |? | Loop_Increasing 0xf8d 0f98 00ce | | Action Pop_Auxiliary 0f99 e403 | | Load 0x2,0x3 0f9a 0d28 | ( | Execute_Immediate Less,0x28 0f9b 6808 |h | Jump_Zero 0xfa4 0f9c e403 | | Load 0x2,0x3 0f9d 0a01 | | Execute_Immediate Plus,0x1 0f9e c403 | | Store 0x2,0x3 0f9f 00da | | Load_Top At_Offset_2 0fa0 e403 | | Load 0x2,0x3 0fa1 e402 | | Load 0x2,0x2 0fa2 01d6 | | Execute Vector,Field_Write 0fa3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0fa4 0092 12a6 | | Action Push_String_Extended,0x12a6 ; "Action buffer overflow" 0fa6 803b | ; | Call 0x0,0x3b 0fa7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 ; SUBPROGRAM 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 0fad | | .CONST 0x0fad ; Address of begin 0fa9 0004 | | .CONST 0x0004 ; Address of exception handler 0faa 0002 | | .CONST 0x0002 ; Number of locals 0fab INIT_0fa8: 0fab 029f 10b3 | | Declare_Subprogram INIT_10b0,For_Call 0fad BODY_0fa8: 0fad e7fe | | Load 0x3,-0x2 0fae 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0faf 6806 |h | Jump_Zero 0xfb6 0fb0 e5fc | | Load 0x2,-0x4 0fb1 805e | ^ | Call 0x0,0x5e 0fb2 6803 |h | Jump_Zero 0xfb6 0fb3 e7fe | | Load 0x3,-0x2 0fb4 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0fb5 8408 | | Call 0x2,0x8 0fb6 e7fe | | Load 0x3,-0x2 0fb7 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fb8 6829 |h) | Jump_Zero 0xfe2 0fb9 e5fe | | Load 0x2,-0x2 0fba e004 | | Load 0x0,0x4 0fbb 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0fbc e7fe | | Load 0x3,-0x2 0fbd 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0fbe 027c | | | Execute Discrete,Less 0fbf 6822 |h" | Jump_Zero 0xfe2 0fc0 e5fc | | Load 0x2,-0x4 0fc1 805e | ^ | Call 0x0,0x5e 0fc2 681f |h | Jump_Zero 0xfe2 0fc3 e7fe | | Load 0x3,-0x2 0fc4 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0fc5 e5fd | | Load 0x2,-0x3 0fc6 027f | | Execute Discrete,Equal 0fc7 7006 |p | Jump_Nonzero 0xfce 0fc8 e406 | | Load 0x2,0x6 0fc9 7004 |p | Jump_Nonzero 0xfce 0fca e5fd | | Load 0x2,-0x3 0fcb e01e | | Load 0x0,0x1e 0fcc 027f | | Execute Discrete,Equal 0fcd 6814 |h | Jump_Zero 0xfe2 0fce e7fe | | Load 0x3,-0x2 0fcf 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fd0 0f01 | | Execute_Immediate Equal,0x1 0fd1 680b |h | Jump_Zero 0xfdd 0fd2 4800 |H | Short_Literal 0x0 0fd3 e7fe | | Load 0x3,-0x2 0fd4 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0fd5 e7fe | | Load 0x3,-0x2 0fd6 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0fd7 8408 | | Call 0x2,0x8 0fd8 00db | | Load_Top At_Offset_3 0fd9 4801 |H | Short_Literal 0x1 0fda e26c | l | Load 0x1,0x6c 0fdb 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0fdc 7805 |x | Jump 0xfe2 0fdd e7fe | | Load 0x3,-0x2 0fde 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fdf 0aff | | Execute_Immediate Plus,-0x1 0fe0 e7fe | | Load 0x3,-0x2 0fe1 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0fe2 e7fe | | Load 0x3,-0x2 0fe3 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0fe4 6809 |h | Jump_Zero 0xfee 0fe5 00cf | | Action Mark_Auxiliary 0fe6 e259 | Y | Load 0x1,0x59 0fe7 4801 |H | Short_Literal 0x1 0fe8 0263 | c | Execute Discrete,Above_Bound 0fe9 7003 |p | Jump_Nonzero 0xfed 0fea 8602 | | Call 0x3,0x2 0feb 00c8 | | Action Pop_Auxiliary_Range 0fec 3ffd |? | Loop_Increasing 0xfea 0fed 00ce | | Action Pop_Auxiliary 0fee 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0fef 0000 | | .XXX[0x1] 0ff0 ; -------------------------------------------------------------------------------------- 0ff0 ; SUBPROGRAM 0ff0 ; -------------------------------------------------------------------------------------- 0ff0 0ff3 | | .CONST 0x0ff3 ; Address of begin 0ff1 0004 | | .CONST 0x0004 ; Address of exception handler 0ff2 0001 | | .CONST 0x0001 ; Number of locals 0ff3 BODY_0ff0: 0ff3 INIT_0ff0: 0ff3 e7fd | | Load 0x3,-0x3 0ff4 00e2 | | Load_Encached Integer_Cache 0ff5 025e | ^ | Execute Discrete,Convert 0ff6 e7fe | | Load 0x3,-0x2 0ff7 e7ff | | Load 0x3,-0x1 0ff8 e025 | % | Load 0x0,0x25 0ff9 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0ffa 00d9 | | Load_Top At_Offset_1 0ffb 00d0 | | Action Swap_Control 0ffc 0260 | ` | Execute Discrete,In_Type 0ffd 7001 |p | Jump_Nonzero 0xfff 0ffe 0801 | | Execute_Immediate Raise,0x1 0fff 8409 | | Call 0x2,0x9 1000 00d1 | | Pop_Control Pop_Count_1 1001 c7fd | | Store 0x3,-0x3 1002 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1003 0000 0000 | | .BLANK 0000[0x5] 1008 ; -------------------------------------------------------------------------------------- 1008 ; SUBPROGRAM 1008 ; -------------------------------------------------------------------------------------- 1008 100b | | .CONST 0x100b ; Address of begin 1009 0004 | | .CONST 0x0004 ; Address of exception handler 100a 0001 | | .CONST 0x0001 ; Number of locals 100b BODY_1008: 100b INIT_1008: 100b 00da | | Load_Top At_Offset_2 100c e24f | O | Load 0x1,0x4f 100d 01d5 | | Execute Vector,Field_Reference 100e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 100f 6804 |h | Jump_Zero 0x1014 1010 00da | | Load_Top At_Offset_2 1011 4801 |H | Short_Literal 0x1 1012 e26c | l | Load 0x1,0x6c 1013 171f | | Execute Task,Entry_Call,Field_Number 0x1f 1014 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1015 0000 0000 | | .XXX[0x3] 1017 0000 | | 1018 ; -------------------------------------------------------------------------------------- 1018 ; SUBPROGRAM 1018 ; -------------------------------------------------------------------------------------- 1018 101b | | .CONST 0x101b ; Address of begin 1019 1035 | 5 | .CONST 0x1035 ; Address of exception handler 101a 0001 | | .CONST 0x0001 ; Number of locals 101b BODY_1018: 101b INIT_1018: 101b e23f | ? | Load 0x1,0x3f 101c 6817 |h | Jump_Zero 0x1034 101d 0092 1282 | | Action Push_String_Extended,0x1282 ; "Process_Action: exception: " 101f e03a | : | Load 0x0,0x3a 1020 180d | | Execute Package,Field_Execute,Field_Number 0xd 1021 01cc | | Execute Vector,Catenate 1022 803b | ; | Call 0x0,0x3b 1023 00cf | | Action Mark_Auxiliary 1024 e403 | | Load 0x2,0x3 1025 4801 |H | Short_Literal 0x1 1026 0263 | c | Execute Discrete,Above_Bound 1027 700b |p | Jump_Nonzero 0x1033 1028 0092 12a7 | | Action Push_String_Extended,0x12a7 ; "Aid= " 102a 00d9 | | Load_Top At_Offset_1 102b e402 | | Load 0x2,0x2 102c 01d7 | | Execute Vector,Field_Read 102d 00e0 | | Load_Encached Standard_Cache 102e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 102f 01cc | | Execute Vector,Catenate 1030 803b | ; | Call 0x0,0x3b 1031 00c8 | | Action Pop_Auxiliary_Range 1032 3ff5 |? | Loop_Increasing 0x1028 1033 00ce | | Action Pop_Auxiliary 1034 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1035 TRAP_1018: 1035 0007 | | Action Break_Optional 1036 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1037 0000 | | .XXX[0x1] 1038 ; -------------------------------------------------------------------------------------- 1038 ; SUBPROGRAM 1038 ; -------------------------------------------------------------------------------------- 1038 103f | ? | .CONST 0x103f ; Address of begin 1039 0004 | | .CONST 0x0004 ; Address of exception handler 103a 0002 | | .CONST 0x0002 ; Number of locals 103b INIT_1038: 103b e039 | 9 | Load 0x0,0x39 103c 0322 | " | Declare_Variable Record 103d 00d8 | | Load_Top At_Offset_0 103e 1c00 | | Execute_Immediate Run_Utility,0x0 103f BODY_1038: 103f 00d8 | | Load_Top At_Offset_0 1040 e5fe | | Load 0x2,-0x2 1041 803c | < | Call 0x0,0x3c 1042 00d1 | | Pop_Control Pop_Count_1 1043 00d8 | | Load_Top At_Offset_0 1044 e5fd | | Load 0x2,-0x3 1045 803d | = | Call 0x0,0x3d 1046 00d1 | | Pop_Control Pop_Count_1 1047 00d8 | | Load_Top At_Offset_0 1048 e5ff | | Load 0x2,-0x1 1049 806a | j | Call 0x0,0x6a 104a 00d1 | | Pop_Control Pop_Count_1 104b e5fe | | Load 0x2,-0x2 104c e01e | | Load 0x0,0x1e 104d e5fd | | Load 0x2,-0x3 104e e5ff | | Load 0x2,-0x1 104f 827e | ~ | Call 0x1,0x7e 1050 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1051 0000 0000 | | .BLANK 0000[0x7] 1058 ; -------------------------------------------------------------------------------------- 1058 ; SUBPROGRAM 1058 ; -------------------------------------------------------------------------------------- 1058 1060 | ` | .CONST 0x1060 ; Address of begin 1059 0004 | | .CONST 0x0004 ; Address of exception handler 105a 0003 | | .CONST 0x0003 ; Number of locals 105b INIT_1058: 105b e405 | | Load 0x2,0x5 105c e258 | X | Load 0x1,0x58 105d 01d5 | | Execute Vector,Field_Reference 105e 029f 10fb | | Declare_Subprogram INIT_10f8,For_Call 1060 BODY_1058: 1060 00d9 | | Load_Top At_Offset_1 1061 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1062 e011 | | Load 0x0,0x11 1063 027f | | Execute Discrete,Equal 1064 7005 |p | Jump_Nonzero 0x106a 1065 00d9 | | Load_Top At_Offset_1 1066 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1067 e5ff | | Load 0x2,-0x1 1068 027f | | Execute Discrete,Equal 1069 6814 |h | Jump_Zero 0x107e 106a 00d9 | | Load_Top At_Offset_1 106b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 106c e061 | a | Load 0x0,0x61 106d 017e | ~ | Execute Record,Not_Equal 106e 700a |p | Jump_Nonzero 0x1079 106f 00d9 | | Load_Top At_Offset_1 1070 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 1071 e063 | c | Load 0x0,0x63 1072 027e | ~ | Execute Discrete,Not_Equal 1073 7005 |p | Jump_Nonzero 0x1079 1074 00d9 | | Load_Top At_Offset_1 1075 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 1076 e05c | \ | Load 0x0,0x5c 1077 017e | ~ | Execute Record,Not_Equal 1078 6802 |h | Jump_Zero 0x107b 1079 8603 | | Call 0x3,0x3 107a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 107b 4801 |H | Short_Literal 0x1 107c 00cb | | Action Pop_Block_With_Result 107d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 107e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 107f 0000 | | .XXX[0x1] 1080 ; -------------------------------------------------------------------------------------- 1080 ; SUBPROGRAM 1080 ; -------------------------------------------------------------------------------------- 1080 1092 | | .CONST 0x1092 ; Address of begin 1081 0004 | | .CONST 0x0004 ; Address of exception handler 1082 0007 | | .CONST 0x0007 ; Number of locals 1083 INIT_1080: 1083 e039 | 9 | Load 0x0,0x39 1084 0322 | " | Declare_Variable Record 1085 00d8 | | Load_Top At_Offset_0 1086 1c00 | | Execute_Immediate Run_Utility,0x0 1087 e005 | | Load 0x0,0x5 1088 0322 | " | Declare_Variable Record 1089 00d8 | | Load_Top At_Offset_0 108a 1c00 | | Execute_Immediate Run_Utility,0x0 108b 00e1 | | Load_Encached Boolean_Cache 108c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 108d e006 | | Load 0x0,0x6 108e 0322 | " | Declare_Variable Record 108f e007 | | Load 0x0,0x7 1090 029f 112b | +| Declare_Subprogram INIT_1128,For_Call 1092 BODY_1080: 1092 e802 | | Load 0x4,0x2 1093 e5fd | | Load 0x2,-0x3 1094 803c | < | Call 0x0,0x3c 1095 00d1 | | Pop_Control Pop_Count_1 1096 e802 | | Load 0x4,0x2 1097 8056 | V | Call 0x0,0x56 1098 00d1 | | Pop_Control Pop_Count_1 1099 e802 | | Load 0x4,0x2 109a 806b | k | Call 0x0,0x6b 109b 00db | | Load_Top At_Offset_3 109c 017d | } | Execute Record,Structure_Write 109d e802 | | Load 0x4,0x2 109e 806c | l | Call 0x0,0x6c 109f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 10a0 00cf | | Action Mark_Auxiliary 10a1 e269 | i | Load 0x1,0x69 10a2 e407 | | Load 0x2,0x7 10a3 0263 | c | Execute Discrete,Above_Bound 10a4 7003 |p | Jump_Nonzero 0x10a8 10a5 8807 | | Call 0x4,0x7 10a6 00c8 | | Action Pop_Auxiliary_Range 10a7 3ffd |? | Loop_Increasing 0x10a5 10a8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10a9 0000 0000 | | .BLANK 0000[0x7] 10b0 ; -------------------------------------------------------------------------------------- 10b0 ; SUBPROGRAM 10b0 ; -------------------------------------------------------------------------------------- 10b0 10b7 | | .CONST 0x10b7 ; Address of begin 10b1 0004 | | .CONST 0x0004 ; Address of exception handler 10b2 0002 | | .CONST 0x0002 ; Number of locals 10b3 INIT_10b0: 10b3 e605 | | Load 0x3,0x5 10b4 e258 | X | Load 0x1,0x58 10b5 01d5 | | Execute Vector,Field_Reference 10b6 0007 | | Action Break_Optional 10b7 BODY_10b0: 10b7 00d8 | | Load_Top At_Offset_0 10b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 10b9 e011 | | Load 0x0,0x11 10ba 027f | | Execute Discrete,Equal 10bb 7005 |p | Jump_Nonzero 0x10c1 10bc 00d8 | | Load_Top At_Offset_0 10bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 10be e7ff | | Load 0x3,-0x1 10bf 027f | | Execute Discrete,Equal 10c0 6831 |h1 | Jump_Zero 0x10f2 10c1 00d8 | | Load_Top At_Offset_0 10c2 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 10c3 e061 | a | Load 0x0,0x61 10c4 017f | | Execute Record,Equal 10c5 7006 |p | Jump_Nonzero 0x10cc 10c6 00d8 | | Load_Top At_Offset_0 10c7 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 10c8 e405 | | Load 0x2,0x5 10c9 806b | k | Call 0x0,0x6b 10ca 017f | | Execute Record,Equal 10cb 6826 |h& | Jump_Zero 0x10f2 10cc 00d8 | | Load_Top At_Offset_0 10cd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 10ce e063 | c | Load 0x0,0x63 10cf 027f | | Execute Discrete,Equal 10d0 7006 |p | Jump_Nonzero 0x10d7 10d1 00d8 | | Load_Top At_Offset_0 10d2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 10d3 e405 | | Load 0x2,0x5 10d4 806c | l | Call 0x0,0x6c 10d5 027f | | Execute Discrete,Equal 10d6 681b |h | Jump_Zero 0x10f2 10d7 00d8 | | Load_Top At_Offset_0 10d8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 10d9 e05c | \ | Load 0x0,0x5c 10da 017f | | Execute Record,Equal 10db 7006 |p | Jump_Nonzero 0x10e2 10dc e405 | | Load 0x2,0x5 10dd 805d | ] | Call 0x0,0x5d 10de 00d9 | | Load_Top At_Offset_1 10df 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 10e0 8279 | y | Call 0x1,0x79 10e1 6810 |h | Jump_Zero 0x10f2 10e2 00d8 | | Load_Top At_Offset_0 10e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 10e4 0f09 | | Execute_Immediate Equal,0x9 10e5 7009 |p | Jump_Nonzero 0x10ef 10e6 00d8 | | Load_Top At_Offset_0 10e7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 10e8 7003 |p | Jump_Nonzero 0x10ec 10e9 e405 | | Load 0x2,0x5 10ea 806d | m | Call 0x0,0x6d 10eb 7003 |p | Jump_Nonzero 0x10ef 10ec e405 | | Load 0x2,0x5 10ed 806e | n | Call 0x0,0x6e 10ee 6803 |h | Jump_Zero 0x10f2 10ef 00d8 | | Load_Top At_Offset_0 10f0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 10f1 8408 | | Call 0x2,0x8 10f2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10f3 0000 0000 | | .BLANK 0000[0x5] 10f8 ; -------------------------------------------------------------------------------------- 10f8 ; SUBPROGRAM 10f8 ; -------------------------------------------------------------------------------------- 10f8 110a | | .CONST 0x110a ; Address of begin 10f9 0004 | | .CONST 0x0004 ; Address of exception handler 10fa 0007 | | .CONST 0x0007 ; Number of locals 10fb INIT_10f8: 10fb e006 | | Load 0x0,0x6 10fc 0322 | " | Declare_Variable Record 10fd 00e2 | | Load_Encached Integer_Cache 10fe 00e1 | | Load_Encached Boolean_Cache 10ff 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1100 e005 | | Load 0x0,0x5 1101 0322 | " | Declare_Variable Record 1102 00d8 | | Load_Top At_Offset_0 1103 1c00 | | Execute_Immediate Run_Utility,0x0 1104 e039 | 9 | Load 0x0,0x39 1105 0322 | " | Declare_Variable Record 1106 00d8 | | Load_Top At_Offset_0 1107 1c00 | | Execute_Immediate Run_Utility,0x0 1108 029f 119b | | Declare_Subprogram INIT_1198,For_Call 110a BODY_10f8: 110a 00d9 | | Load_Top At_Offset_1 110b e5fd | | Load 0x2,-0x3 110c 803c | < | Call 0x0,0x3c 110d 00d1 | | Pop_Control Pop_Count_1 110e 00d9 | | Load_Top At_Offset_1 110f 8056 | V | Call 0x0,0x56 1110 00d1 | | Pop_Control Pop_Count_1 1111 00d9 | | Load_Top At_Offset_1 1112 806b | k | Call 0x0,0x6b 1113 e802 | | Load 0x4,0x2 1114 017d | } | Execute Record,Structure_Write 1115 00d9 | | Load_Top At_Offset_1 1116 806c | l | Call 0x0,0x6c 1117 a803 | | Store_Unchecked 0x4,0x3 1118 00cf | | Action Mark_Auxiliary 1119 e259 | Y | Load 0x1,0x59 111a e405 | | Load 0x2,0x5 111b 0263 | c | Execute Discrete,Above_Bound 111c 7003 |p | Jump_Nonzero 0x1120 111d 8807 | | Call 0x4,0x7 111e 00c8 | | Action Pop_Auxiliary_Range 111f 3ffd |? | Loop_Increasing 0x111d 1120 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1121 0000 0000 | | .BLANK 0000[0x7] 1128 ; -------------------------------------------------------------------------------------- 1128 ; SUBPROGRAM 1128 ; -------------------------------------------------------------------------------------- 1128 112f | / | .CONST 0x112f ; Address of begin 1129 0004 | | .CONST 0x0004 ; Address of exception handler 112a 0002 | | .CONST 0x0002 ; Number of locals 112b INIT_1128: 112b e80a | | Load 0x4,0xa 112c e268 | h | Load 0x1,0x68 112d 01d5 | | Execute Vector,Field_Reference 112e 0007 | | Action Break_Optional 112f BODY_1128: 112f 00d8 | | Load_Top At_Offset_0 1130 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 1131 e01e | | Load 0x0,0x1e 1132 027e | ~ | Execute Discrete,Not_Equal 1133 6863 |hc | Jump_Zero 0x1197 1134 00d8 | | Load_Top At_Offset_0 1135 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1136 e011 | | Load 0x0,0x11 1137 027f | | Execute Discrete,Equal 1138 7005 |p | Jump_Nonzero 0x113e 1139 00d8 | | Load_Top At_Offset_0 113a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 113b e5fe | | Load 0x2,-0x2 113c 027f | | Execute Discrete,Equal 113d 6859 |hY | Jump_Zero 0x1197 113e 00d8 | | Load_Top At_Offset_0 113f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1140 8067 | g | Call 0x0,0x67 1141 7006 |p | Jump_Nonzero 0x1148 1142 00d8 | | Load_Top At_Offset_0 1143 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1144 8068 | h | Call 0x0,0x68 1145 e5ff | | Load 0x2,-0x1 1146 8069 | i | Call 0x0,0x69 1147 684f |hO | Jump_Zero 0x1197 1148 00d8 | | Load_Top At_Offset_0 1149 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 114a e061 | a | Load 0x0,0x61 114b 017f | | Execute Record,Equal 114c 7005 |p | Jump_Nonzero 0x1152 114d 00d8 | | Load_Top At_Offset_0 114e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 114f e805 | | Load 0x4,0x5 1150 017f | | Execute Record,Equal 1151 6845 |hE | Jump_Zero 0x1197 1152 00d8 | | Load_Top At_Offset_0 1153 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1154 e063 | c | Load 0x0,0x63 1155 027f | | Execute Discrete,Equal 1156 7005 |p | Jump_Nonzero 0x115c 1157 00d8 | | Load_Top At_Offset_0 1158 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1159 e806 | | Load 0x4,0x6 115a 027f | | Execute Discrete,Equal 115b 683b |h; | Jump_Zero 0x1197 115c 00d8 | | Load_Top At_Offset_0 115d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 115e e05c | \ | Load 0x0,0x5c 115f 017f | | Execute Record,Equal 1160 6813 |h | Jump_Zero 0x1174 1161 00d8 | | Load_Top At_Offset_0 1162 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1163 0f02 | | Execute_Immediate Equal,0x2 1164 6804 |h | Jump_Zero 0x1169 1165 00d8 | | Load_Top At_Offset_0 1166 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 1167 a5fb | | Store_Unchecked 0x2,-0x5 1168 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1169 00d8 | | Load_Top At_Offset_0 116a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 116b e403 | | Load 0x2,0x3 116c 027d | } | Execute Discrete,Greater 116d 6805 |h | Jump_Zero 0x1173 116e 00d8 | | Load_Top At_Offset_0 116f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1170 a403 | | Store_Unchecked 0x2,0x3 1171 e407 | | Load 0x2,0x7 1172 a402 | | Store_Unchecked 0x2,0x2 1173 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1174 e804 | | Load 0x4,0x4 1175 700a |p | Jump_Nonzero 0x1180 1176 e802 | | Load 0x4,0x2 1177 e5fc | | Load 0x2,-0x4 1178 803d | = | Call 0x0,0x3d 1179 00d1 | | Pop_Control Pop_Count_1 117a e803 | | Load 0x4,0x3 117b e802 | | Load 0x4,0x2 117c 806f | o | Call 0x0,0x6f 117d 00d2 | | Pop_Control Pop_Count_2 117e 4801 |H | Short_Literal 0x1 117f a804 | | Store_Unchecked 0x4,0x4 1180 e803 | | Load 0x4,0x3 1181 00d9 | | Load_Top At_Offset_1 1182 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1183 8279 | y | Call 0x1,0x79 1184 6812 |h | Jump_Zero 0x1197 1185 00d8 | | Load_Top At_Offset_0 1186 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1187 0f02 | | Execute_Immediate Equal,0x2 1188 6804 |h | Jump_Zero 0x118d 1189 00d8 | | Load_Top At_Offset_0 118a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 118b a5fb | | Store_Unchecked 0x2,-0x5 118c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 118d 00d8 | | Load_Top At_Offset_0 118e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 118f e403 | | Load 0x2,0x3 1190 027d | } | Execute Discrete,Greater 1191 6805 |h | Jump_Zero 0x1197 1192 00d8 | | Load_Top At_Offset_0 1193 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1194 a403 | | Store_Unchecked 0x2,0x3 1195 e407 | | Load 0x2,0x7 1196 a402 | | Store_Unchecked 0x2,0x2 1197 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1198 ; -------------------------------------------------------------------------------------- 1198 ; SUBPROGRAM 1198 ; -------------------------------------------------------------------------------------- 1198 119f | | .CONST 0x119f ; Address of begin 1199 0004 | | .CONST 0x0004 ; Address of exception handler 119a 0002 | | .CONST 0x0002 ; Number of locals 119b INIT_1198: 119b e80a | | Load 0x4,0xa 119c e258 | X | Load 0x1,0x58 119d 01d5 | | Execute Vector,Field_Reference 119e 0007 | | Action Break_Optional 119f BODY_1198: 119f 00d8 | | Load_Top At_Offset_0 11a0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 11a1 7003 |p | Jump_Nonzero 0x11a5 11a2 e5fd | | Load 0x2,-0x3 11a3 805e | ^ | Call 0x0,0x5e 11a4 6830 |h0 | Jump_Zero 0x11d5 11a5 00d8 | | Load_Top At_Offset_0 11a6 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 11a7 e061 | a | Load 0x0,0x61 11a8 017f | | Execute Record,Equal 11a9 7005 |p | Jump_Nonzero 0x11af 11aa 00d8 | | Load_Top At_Offset_0 11ab 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 11ac e802 | | Load 0x4,0x2 11ad 017f | | Execute Record,Equal 11ae 6826 |h& | Jump_Zero 0x11d5 11af 00d8 | | Load_Top At_Offset_0 11b0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 11b1 e063 | c | Load 0x0,0x63 11b2 027f | | Execute Discrete,Equal 11b3 7005 |p | Jump_Nonzero 0x11b9 11b4 00d8 | | Load_Top At_Offset_0 11b5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 11b6 e803 | | Load 0x4,0x3 11b7 027f | | Execute Discrete,Equal 11b8 681c |h | Jump_Zero 0x11d5 11b9 00d8 | | Load_Top At_Offset_0 11ba 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 11bb e05c | \ | Load 0x0,0x5c 11bc 017f | | Execute Record,Equal 11bd 6805 |h | Jump_Zero 0x11c3 11be 4801 |H | Short_Literal 0x1 11bf 00cb | | Action Pop_Block_With_Result 11c0 00cb | | Action Pop_Block_With_Result 11c1 00cb | | Action Pop_Block_With_Result 11c2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 11c3 e804 | | Load 0x4,0x4 11c4 7006 |p | Jump_Nonzero 0x11cb 11c5 e805 | | Load 0x4,0x5 11c6 e806 | | Load 0x4,0x6 11c7 806f | o | Call 0x0,0x6f 11c8 00d2 | | Pop_Control Pop_Count_2 11c9 4801 |H | Short_Literal 0x1 11ca a804 | | Store_Unchecked 0x4,0x4 11cb e805 | | Load 0x4,0x5 11cc 00d9 | | Load_Top At_Offset_1 11cd 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 11ce 8279 | y | Call 0x1,0x79 11cf 6805 |h | Jump_Zero 0x11d5 11d0 4801 |H | Short_Literal 0x1 11d1 00cb | | Action Pop_Block_With_Result 11d2 00cb | | Action Pop_Block_With_Result 11d3 00cb | | Action Pop_Block_With_Result 11d4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 11d5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 11d6 0000 0000 | | .XXX[0x2] 11d8 ; -------------------------------------------------------------------------------------- 11d8 ; SUBPROGRAM 11d8 ; -------------------------------------------------------------------------------------- 11d8 11e9 | | .CONST 0x11e9 ; Address of begin 11d9 0004 | | .CONST 0x0004 ; Address of exception handler 11da 0011 | | .CONST 0x0011 ; Number of locals 11db INIT_11d8: 11db 4804 |H | Short_Literal 0x4 11dc 02cb | | Declare_Variable Entry 11dd 4800 |H | Short_Literal 0x0 11de 02cb | | Declare_Variable Entry 11df 00bf | | Action Accept_Activation 11e0 e001 | | Load 0x0,0x1 11e1 0322 | " | Declare_Variable Record 11e2 00d8 | | Load_Top At_Offset_0 11e3 1c00 | | Execute_Immediate Run_Utility,0x0 11e4 00e1 | | Load_Encached Boolean_Cache 11e5 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 11e6 029f 11fb | | Declare_Subprogram INIT_11f8,For_Call 11e8 00bc | | Action Signal_Activated 11e9 BODY_11d8: 11e9 0092 12a8 | | Action Push_String_Extended,0x12a8 ; "Control.Inner.Creator" 11eb e002 | | Load 0x0,0x2 11ec 180f | | Execute Package,Field_Execute,Field_Number 0xf 11ed 00cf | | Action Mark_Auxiliary 11ee 7802 |x | Jump 0x11f1 11ef 8211 | | Call 0x1,0x11 11f0 00c9 | | Action Pop_Auxiliary_Loop 11f1 00da | | Load_Top At_Offset_2 11f2 77fc |w | Jump_Nonzero 0x11ef 11f3 00ce | | Action Pop_Auxiliary 11f4 00bb | | Action Signal_Completion 11f5 0000 0000 | | .XXX[0x3] 11f7 0000 | | 11f8 ; -------------------------------------------------------------------------------------- 11f8 ; SUBPROGRAM 11f8 ; -------------------------------------------------------------------------------------- 11f8 1204 | | .CONST 0x1204 ; Address of begin 11f9 120d | | .CONST 0x120d ; Address of exception handler 11fa 0002 | | .CONST 0x0002 ; Number of locals 11fb INIT_11f8: 11fb 480e 4a43 |H JC| Declare_Variable Select 0x000, 0x002, 11fd 480d 4a44 |H JD| [0x000]: 0x000 = 0x0000, 11ff 4800 4800 |H H | [0x00d]: 0x244 = 0x1220, 1201 4800 4802 |H H | [0x00e]: 0x243 = 0x1218 1203 02cf | | 1204 BODY_11f8: 1204 00cf | | Action Mark_Auxiliary 1205 7804 |x | Jump 0x120a 1206 00d9 | | Load_Top At_Offset_1 1207 013f | ? | Execute Select,Rendezvous 1208 00d1 | | Pop_Control Pop_Count_1 1209 00c9 | | Action Pop_Auxiliary_Loop 120a e210 | | Load 0x1,0x10 120b 77fa |w | Jump_Nonzero 0x1206 120c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 120d TRAP_11f8: 120d 0007 | | Action Break_Optional 120e 0092 12a9 | | Action Push_String_Extended,0x12a9 ; "Creator: exception:" 1210 e002 | | Load 0x0,0x2 1211 180d | | Execute Package,Field_Execute,Field_Number 0xd 1212 01cc | | Execute Vector,Catenate 1213 8003 | | Call 0x0,0x3 1214 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1215 0000 0000 | | .XXX[0x3] 1217 0000 | | 1218 ; -------------------------------------------------------------------------------------- 1218 ; SUBPROGRAM 1218 ; See instruction 0x02cf at 0x11fb, index=0xe 1218 ; -------------------------------------------------------------------------------------- 1218 121b | | .CONST 0x121b ; Address of begin 1219 0004 | | .CONST 0x0004 ; Address of exception handler 121a 0001 | | .CONST 0x0001 ; Number of locals 121b BODY_1218: 121b INIT_1218: 121b 4800 |H | Short_Literal 0x0 121c a210 | | Store_Unchecked 0x1,0x10 121d 4100 |A | End_Rendezvous 0x0 121e 0000 0000 | | .XXX[0x2] 1220 ; -------------------------------------------------------------------------------------- 1220 ; SUBPROGRAM 1220 ; See instruction 0x02cf at 0x11fb, index=0xd 1220 ; -------------------------------------------------------------------------------------- 1220 1223 | # | .CONST 0x1223 ; Address of begin 1221 0004 | | .CONST 0x0004 ; Address of exception handler 1222 0001 | | .CONST 0x0001 ; Number of locals 1223 BODY_1220: 1223 INIT_1220: 1223 029f 122b | +| Declare_Subprogram INIT_1228,For_Call 1225 8602 | | Call 0x3,0x2 1226 4101 |A | End_Rendezvous 0x1 1227 0000 | | .XXX[0x1] 1228 ; -------------------------------------------------------------------------------------- 1228 ; SUBPROGRAM 1228 ; -------------------------------------------------------------------------------------- 1228 122b | + | .CONST 0x122b ; Address of begin 1229 0004 | | .CONST 0x0004 ; Address of exception handler 122a 0001 | | .CONST 0x0001 ; Number of locals 122b BODY_1228: 122b INIT_1228: 122b 4800 |H | Short_Literal 0x0 122c a7fb | | Store_Unchecked 0x3,-0x5 122d e20f | | Load 0x1,0xf 122e e7fd | | Load 0x3,-0x3 122f 8004 | | Call 0x0,0x4 1230 00d1 | | Pop_Control Pop_Count_1 1231 e20f | | Load 0x1,0xf 1232 e7fc | | Load 0x3,-0x4 1233 8005 | | Call 0x0,0x5 1234 00d1 | | Pop_Control Pop_Count_1 1235 e20f | | Load 0x1,0xf 1236 e7fe | | Load 0x3,-0x2 1237 8006 | | Call 0x0,0x6 1238 00d1 | | Pop_Control Pop_Count_1 1239 8007 | | Call 0x0,0x7 123a 6807 |h | Jump_Zero 0x1242 123b e7fe | | Load 0x3,-0x2 123c e008 | | Load 0x0,0x8 123d 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 123e 7003 |p | Jump_Nonzero 0x1242 123f 4801 |H | Short_Literal 0x1 1240 a7fb | | Store_Unchecked 0x3,-0x5 1241 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1242 e009 | | Load 0x0,0x9 1243 6803 |h | Jump_Zero 0x1247 1244 4801 |H | Short_Literal 0x1 1245 a7fb | | Store_Unchecked 0x3,-0x5 1246 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1247 00cf | | Action Mark_Auxiliary 1248 e00a | | Load 0x0,0xa 1249 4801 |H | Short_Literal 0x1 124a 0263 | c | Execute Discrete,Above_Bound 124b 700c |p | Jump_Nonzero 0x1258 124c e7fd | | Load 0x3,-0x3 124d 00d9 | | Load_Top At_Offset_1 124e e00b | | Load 0x0,0xb 124f 01d7 | | Execute Vector,Field_Read 1250 027f | | Execute Discrete,Equal 1251 6804 |h | Jump_Zero 0x1256 1252 4801 |H | Short_Literal 0x1 1253 a7fb | | Store_Unchecked 0x3,-0x5 1254 00d2 | | Pop_Control Pop_Count_2 1255 7802 |x | Jump 0x1258 1256 00c8 | | Action Pop_Auxiliary_Range 1257 3ff4 |? | Loop_Increasing 0x124c 1258 00ce | | Action Pop_Auxiliary 1259 e7fe | | Load 0x3,-0x2 125a 800c | | Call 0x0,0xc 125b 7003 |p | Jump_Nonzero 0x125f 125c e7fe | | Load 0x3,-0x2 125d 800d | | Call 0x0,0xd 125e 6802 |h | Jump_Zero 0x1261 125f 4801 |H | Short_Literal 0x1 1260 a7fb | | Store_Unchecked 0x3,-0x5 1261 e7fe | | Load 0x3,-0x2 1262 4801 |H | Short_Literal 0x1 1263 e00e | | Load 0x0,0xe 1264 e00f | | Load 0x0,0xf 1265 00ad | | QQ_Action Package,Field_Execute_Dynamic 1266 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1267 ; -------------------------------------------------------------------------------------- 1267 ; STRING TABLE 1267 ; -------------------------------------------------------------------------------------- 1267 0088 | | .STRTAB 0x0088->0x12ab ; "LOCAL_UNCONSTRAINED" 1268 0099 | | .STRTAB 0x0099->0x12b4 ; "LOCAL_CONSTRAINED" 1269 00a8 | | .STRTAB 0x00a8->0x12bd ; "GLOBAL_UNCONSTRAINED" 126a 00ba | | .STRTAB 0x00ba->0x12c7 ; "GLOBAL_CONSTRAINED" 126b 00ca | | .STRTAB 0x00ca->0x12d0 ; "Trace requests" 126c 00d6 | | .STRTAB 0x00d6->0x12d7 ; "New task trace is on" 126d 00e8 | | .STRTAB 0x00e8->0x12e1 ; "Inform on task creation mode set" 126e 0106 | | .STRTAB 0x0106->0x12f1 ; "Global stop: " 126f 0111 | | .STRTAB 0x0111->0x12f7 ; "Aid: " 1270 0114 | | .STRTAB 0x0114->0x12fa ; "none" 1271 0116 | | .STRTAB 0x0116->0x12fc ; "New task stop, action =" 1272 012b | + | .STRTAB 0x012b->0x1307 ; "Holding initial registrants" 1273 0144 | D | .STRTAB 0x0144->0x1315 ; "Global stepping: " 1274 0153 | S | .STRTAB 0x0153->0x131d ; "Task = " 1275 0158 | X | .STRTAB 0x0158->0x1321 ; " Count = " 1276 015f | _ | .STRTAB 0x015f->0x1325 ; " Frame restriction = #" 1277 0179 | y | .STRTAB 0x0179->0x1333 ; " Action = " 1278 0181 | | .STRTAB 0x0181->0x1338 ; "Instruction stepping: " 1279 0195 | | .STRTAB 0x0195->0x1343 ; "None" 127a 0197 | | .STRTAB 0x0197->0x1345 ; "Breakpoints:" 127b 01a1 | | .STRTAB 0x01a1->0x134b ; " Accelerator load failures: " 127c 01bc | | .STRTAB 0x01bc->0x135a ; "Break on task creation mode set" 127d 01d9 | | .STRTAB 0x01d9->0x1369 ; "Exception Requests:" 127e 01ea | | .STRTAB 0x01ea->0x1373 ; "History requests and status" 127f 0203 | | .STRTAB 0x0203->0x1380 ; "Next_Index = " 1280 020e | | .STRTAB 0x020e->0x1387 ; ": Task : " 1281 0215 | | .STRTAB 0x0215->0x138b ; "Exception Cache (tasks propagating)" 1282 0236 | 6 | .STRTAB 0x0236->0x139d ; "Process_Action: exception: " 1283 024f | O | .STRTAB 0x024f->0x13aa ; "Creation_Register:" 1284 025f | _ | .STRTAB 0x025f->0x13b3 ; " [any inst]" 1285 0268 | h | .STRTAB 0x0268->0x13b9 ; " [" 1286 0268 | h | .STRTAB 0x0268->0x13ba ; "]" 1287 0267 | g | .STRTAB 0x0267->0x13ba ; " [any sub]" 1288 026f | o | .STRTAB 0x026f->0x13bf ; " [any stmt]" 1289 0278 | x | .STRTAB 0x0278->0x13c5 ; ": " 128a 0278 | x | .STRTAB 0x0278->0x13c6 ; " Tracing" 128b 027e | ~ | .STRTAB 0x027e->0x13ca ; " Exc Tracing" 128c 0288 | | .STRTAB 0x0288->0x13d0 ; " Stop, action=" 128d 0294 | | .STRTAB 0x0294->0x13d7 ; " Stepping: " 128e 029d | | .STRTAB 0x029d->0x13dc ; " level=#" 128f 02a3 | | .STRTAB 0x02a3->0x13e0 ; " action=" 1290 02a9 | | .STRTAB 0x02a9->0x13e4 ; " DB mask= " 1291 02b1 | | .STRTAB 0x02b1->0x13e9 ; " exc info:" 1292 02b9 | | .STRTAB 0x02b9->0x13ee ; " " 1293 02b8 | | .STRTAB 0x02b8->0x13ef ; "Task=all, Pc=" 1294 02c3 | | .STRTAB 0x02c3->0x13f5 ; " Id=" 1295 02c5 | | .STRTAB 0x02c5->0x13f7 ; " " 1296 02c5 | | .STRTAB 0x02c5->0x13f8 ; " /" 1297 02c5 | | .STRTAB 0x02c5->0x13f9 ; " T" 1298 02c6 | | .STRTAB 0x02c6->0x13fb ; "Task: " 1299 02ca | | .STRTAB 0x02ca->0x13fe ; " Pc=" 129a 02cc | | .STRTAB 0x02cc->0x1400 ; "Id=" 129b 02cd | | .STRTAB 0x02cd->0x1401 ; "all" 129c 02ce | | .STRTAB 0x02ce->0x1403 ; " Pri=" 129d 02d1 | | .STRTAB 0x02d1->0x1405 ; " Action= " 129e 02d8 | | .STRTAB 0x02d8->0x140a ; "Propagate" 129f 02df | | .STRTAB 0x02df->0x140e ; "Catch" 12a0 02e2 | | .STRTAB 0x02e2->0x1411 ; "History" 12a1 02e7 | | .STRTAB 0x02e7->0x1414 ; "Trace" 12a2 02ea | | .STRTAB 0x02ea->0x1417 ; " Exc= " 12a3 02ee | | .STRTAB 0x02ee->0x141a ; " Low = " 12a4 02f3 | | .STRTAB 0x02f3->0x141d ; " High = " 12a5 02f9 | | .STRTAB 0x02f9->0x1421 ; " Action=" 12a6 02ff | | .STRTAB 0x02ff->0x1425 ; "Action buffer overflow" 12a7 0313 | | .STRTAB 0x0313->0x1430 ; "Aid= " 12a8 0316 | | .STRTAB 0x0316->0x1433 ; "Control.Inner.Creator" 12a9 0329 | ) | .STRTAB 0x0329->0x143d ; "Creator: exception:" 12aa 033a | : | .STREND 0x033a->0x1447 12ab 4c4f 4341 |LOCA| .STRTAB_STRINGS 1447 0000 | | .XXX[0x1] 1448 ; -------------------------------------------------------------------------------------- 1448 ; Debug Table 1448 ; -------------------------------------------------------------------------------------- 1448 0004 0010 | | .DEBUG4 0x0004,0x0010,0x5f27,0x0000,0x0001,0x0000 144e 1646 45f4 | FE | .XXX[0xa] 1450 3686 96c6 |6 | 1452 4000 0000 |@ | 1454 0035 5228 | 5R(| 1456 4027 9850 |@' P| 1458 0000 0000 | | .BLANK 0000[0x5] 145d 0108 0000 | | .XXX[0x104] 145f 0139 0a1b | 9 | 1461 7b6b 6b0b |{kk | 1463 7323 9972 |s# r| 1465 1b6b b31a | k | 1467 fa43 4b2b | CK+| 1469 930b 931b | | 146b 43c9 7213 |C r | 146d ab4b 6322 | Kc"| 146f fa0b 1ba3 | | 1471 4bb3 4ba3 |K K | 1473 c800 0001 | | 1475 0800 0001 | | 1477 390a 1b7b |9 {| 1479 6b6b 0b73 |kk s| 147b 2399 721b |# r | 147d 6bb3 1afa |k | 147f 434b 2b93 |CK+ | 1481 0b93 1b43 | C| 1483 c972 13ab | r | 1485 4b63 22fa |Kc" | 1487 0b1b a34b | K| 1489 b34b a3c8 | K | 148b 0000 0000 | | 148d 1aa9 2de8 | - | 148f 13d1 201a | | 1491 a38b f80a | | 1493 900c 0c00 | | 1495 0000 7800 | x | 1497 0000 8485 | | 1499 0dbd b5b5 | | 149b 85b9 91cc | | 149d b90d b5d9 | | 149f 8d7d 21a5 | }! | 14a1 95c9 85c9 | | 14a3 8da1 e4b9 | | 14a5 0da1 a5b1 | | 14a7 91c9 95b8 | | 14a9 0000 0078 | x| 14ab 0000 0084 | | 14ad 850d bdb5 | | 14af b585 b991 | | 14b1 ccb9 0db5 | | 14b3 d98d 7d21 | }!| 14b5 a595 c985 | | 14b7 c98d a1e4 | | 14b9 b90d a1a5 | | 14bb b191 c995 | | 14bd b800 0000 | | 14bf 000d 54a5 | T | 14c1 1809 eb0c | | 14c3 0006 9170 | p| 14c5 0ea4 1284 | | 14c7 0000 0058 | X| 14c9 0000 0042 | B| 14cb 4286 deda |B | 14cd dac2 dcc8 | | 14cf e65c 86da | \ | 14d1 ecc6 be90 | | 14d3 d2ca e4c2 | | 14d5 e4c6 d0f2 | | 14d7 5c86 dedc |\ | 14d9 e8ca dce8 | | 14db e600 0000 | | 14dd 5800 0000 |X | 14df 4242 86de |BB | 14e1 dada c2dc | | 14e3 c8e6 5c86 | \ | 14e5 daec c6be | | 14e7 90d2 cae4 | | 14e9 c2e4 c6d0 | | 14eb f25c 86de | \ | 14ed dce8 cadc | | 14ef e8e6 0000 | | 14f1 0000 06aa | | 14f3 58de 04f6 |X | 14f5 c406 aa16 | | 14f7 3801 8dc5 |8 | 14f9 2900 0000 |) | 14fb 6700 0000 |g | 14fd 2821 436f |(!Co| 14ff 6d6d 616e |mman| 1501 6473 2e43 |ds.C| 1503 6d76 635f |mvc_| 1505 4869 6572 |Hier| 1507 6172 6368 |arch| 1509 792e 4578 |y.Ex| 150b 7061 6e64 |pand| 150d 5f41 6374 |_Act| 150f 6976 6974 |ivit| 1511 7900 0000 |y | 1513 6700 0000 |g | 1515 2821 436f |(!Co| 1517 6d6d 616e |mman| 1519 6473 2e43 |ds.C| 151b 6d76 635f |mvc_| 151d 4869 6572 |Hier| 151f 6172 6368 |arch| 1521 792e 4578 |y.Ex| 1523 7061 6e64 |pand| 1525 5f41 6374 |_Act| 1527 6976 6974 |ivit| 1529 7900 0000 |y | 152b 0003 552f | U/| 152d 9802 7c01 | | | 152f 0000 0000 | | 1531 04c7 0512 | | 1533 8000 003e | >| 1535 0000 0010 | | 1537 10a1 b7b6 | | 1539 b6b0 b732 | 2| 153b 3997 21b6 |9 ! | 153d bb31 afa4 | 1 | 153f 34b2 b930 |4 0| 1541 b931 b43c | 1 <| 1543 9728 30b9 | (0 | 1545 32b7 3a39 |2 :9| 1547 8000 003e | >| 1549 0000 0010 | | 154b 10a1 b7b6 | | 154d b6b0 b732 | 2| 154f 3997 21b6 |9 ! | 1551 bb31 afa4 | 1 | 1553 34b2 b930 |4 0| 1555 b931 b43c | 1 <| 1557 9728 30b9 | (0 | 1559 32b7 3a39 |2 :9| 155b 8000 0000 | | 155d 01aa 9998 | | 155f 813e 5000 | >P | 1561 0000 0000 | | .BLANK 0000[0x5] 1566 09c0 0000 | | .XXX[0x32] 1568 0948 50db | HP | 156a db5b 585b | [X[| 156c 991c cb90 | | 156e db5d 98d7 | ] | 1570 d21a 595c | Y\| 1572 985c 98da | \ | 1574 1e4b 9499 | K | 1576 5b5b dd99 |[[ | 1578 57d0 da1a |W | 157a 5b19 0000 |[ | 157c 0009 c000 | | 157e 0009 4850 | HP| 1580 dbdb 5b58 | [X| 1582 5b99 1ccb |[ | 1584 90db 5d98 | ] | 1586 d7d2 1a59 | Y| 1588 5c98 5c98 |\ \ | 158a da1e 4b94 | K | 158c 995b 5bdd | [[ | 158e 9957 d0da | W | 1590 1a5b 1900 | [ | 1592 0000 0000 | | 1594 d54d 9280 | M | 1596 9f4f c000 | O | 1598 0000 0000 | | .BLANK 0000[0x4] 159c 0005 a000 | | .XXX[0x64] 159e 0003 4428 | D(| 15a0 6ded adac |m | 15a2 2dcc 8e65 |- e| 15a4 c86d aecc | m | 15a6 6be9 ac2d |k -| 15a8 2dce 8cad |- | 15aa cc2d cc6c | - l| 15ac a000 0005 | | 15ae a000 0003 | | 15b0 4428 6ded |D(m | 15b2 adac 2dcc | - | 15b4 8e65 c86d | e m| 15b6 aecc 6be9 | k | 15b8 ac2d 2dce | -- | 15ba 8cad cc2d | -| 15bc cc6c a000 | l | 15be 0000 006a | j| 15c0 a736 604f | 6`O| 15c2 bbc0 002f | /| 15c4 1dc0 b8dc | | 15c6 a750 0000 | P | 15c8 0370 0000 | p | 15ca 02c2 1436 | 6| 15cc f6d6 d616 | | 15ce e647 32e4 | G2 | 15d0 36d7 6635 |6 f5| 15d2 f4d6 1696 | | 15d4 e746 56e6 | FV | 15d6 16e6 3652 | 6R| 15d8 e436 8656 | 6 V| 15da 36b5 f436 |6 6| 15dc f6e7 3697 | 6 | 15de 3746 56e6 |7FV | 15e0 3790 0000 |7 | 15e2 0370 0000 | p | 15e4 02c2 1436 | 6| 15e6 f6d6 d616 | | 15e8 e647 32e4 | G2 | 15ea 36d7 6635 |6 f5| 15ec f4d6 1696 | | 15ee e746 56e6 | FV | 15f0 16e6 3652 | 6R| 15f2 e436 8656 | 6 V| 15f4 36b5 f436 |6 6| 15f6 f6e7 3697 | 6 | 15f8 3746 56e6 |7FV | 15fa 3790 0000 |7 | 15fc 0000 3553 | 5S| 15fe c6c0 27e7 | ' |