|
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_03b8fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 1420 | | .CONST 0x1420 ; 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 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x11e3, index=0x0 0008 ; -------------------------------------------------------------------------------------- 0008 0289 | | .CONST 0x0289 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 008e | | .CONST 0x008e ; Number of locals 000b INIT_0008: 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 000c 4828 |H( | Short_Literal 0x28 000d e003 | | Load 0x0,0x3 000e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 000f 02a0 | | Declare_Subprogram Null_Subprogram 0010 4801 |H | Short_Literal 0x1 0011 035e | ^ | Declare_Type Array,Defined,Visible 0012 4800 |H | Short_Literal 0x0 0013 4828 |H( | Short_Literal 0x28 0014 00e3 | | Load_Encached Natural_Cache 0015 03f9 | | Declare_Type Discrete,Constrained,Visible 0016 029a 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 00bf | | Action Accept_Activation 006c 4800 |H | Short_Literal 0x0 006d 4864 |Hd | Short_Literal 0x64 006e 00e3 | | Load_Encached Natural_Cache 006f 03f8 | | Declare_Type Discrete,Constrained 0070 4800 |H | Short_Literal 0x0 0071 480f |H | Short_Literal 0xf 0072 00e3 | | Load_Encached Natural_Cache 0073 03f8 | | Declare_Type Discrete,Constrained 0074 e004 | | Load 0x0,0x4 0075 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0076 e004 | | Load 0x0,0x4 0077 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0078 00e3 | | Load_Encached Natural_Cache 0079 e004 | | Load 0x0,0x4 007a 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51 007b e004 | | Load 0x0,0x4 007c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007d e004 | | Load 0x0,0x4 007e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 007f e004 | | Load 0x0,0x4 0080 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0081 e230 | 0 | Load 0x1,0x30 0082 00e1 | | Load_Encached Boolean_Cache 0083 00e1 | | Load_Encached Boolean_Cache 0084 02a0 | | Declare_Subprogram Null_Subprogram 0085 4805 |H | Short_Literal 0x5 0086 032d | - | Declare_Type Record,Defined 0087 4800 |H | Short_Literal 0x0 0088 4864 |Hd | Short_Literal 0x64 0089 00da | | Load_Top At_Offset_2 008a 02a0 | | Declare_Subprogram Null_Subprogram 008b 4801 |H | Short_Literal 0x1 008c 035d | ] | Declare_Type Array,Defined 008d 00d8 | | Load_Top At_Offset_0 008e 0337 | 7 | Declare_Variable Array 008f 00e5 | | Load_Encached Long_Integer_Cache 0090 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0091 00e5 | | Load_Encached Long_Integer_Cache 0092 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0093 00e5 | | Load_Encached Long_Integer_Cache 0094 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0095 00e5 | | Load_Encached Long_Integer_Cache 0096 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0097 00e5 | | Load_Encached Long_Integer_Cache 0098 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0099 00e1 | | Load_Encached Boolean_Cache 009a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009b 4800 |H | Short_Literal 0x0 009c 4803 |H | Short_Literal 0x3 009d 029f 061b | | Declare_Subprogram INIT_0618,For_Call 009f 03fd | | Declare_Type Discrete,Defined 00a0 00e1 | | Load_Encached Boolean_Cache 00a1 00e2 | | Load_Encached Integer_Cache 00a2 e004 | | Load 0x0,0x4 00a3 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00a4 00e3 | | Load_Encached Natural_Cache 00a5 e004 | | Load 0x0,0x4 00a6 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 00a7 00e2 | | Load_Encached Integer_Cache 00a8 e004 | | Load 0x0,0x4 00a9 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00aa 00e3 | | Load_Encached Natural_Cache 00ab 00e2 | | Load_Encached Integer_Cache 00ac 00e4 | | Load_Encached Positive_Cache 00ad 00e4 | | Load_Encached Positive_Cache 00ae e005 | | Load 0x0,0x5 00af 00e2 | | Load_Encached Integer_Cache 00b0 00e1 | | Load_Encached Boolean_Cache 00b1 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call 00b3 4805 |H | Short_Literal 0x5 00b4 032d | - | Declare_Type Record,Defined 00b5 e004 | | Load 0x0,0x4 00b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b7 e004 | | Load 0x0,0x4 00b8 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00b9 00e4 | | Load_Encached Positive_Cache 00ba 00e4 | | Load_Encached Positive_Cache 00bb e005 | | Load 0x0,0x5 00bc 00e2 | | Load_Encached Integer_Cache 00bd 00e1 | | Load_Encached Boolean_Cache 00be 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call 00c0 4807 |H | Short_Literal 0x7 00c1 032d | - | Declare_Type Record,Defined 00c2 4801 |H | Short_Literal 0x1 00c3 4814 |H | Short_Literal 0x14 00c4 e004 | | Load 0x0,0x4 00c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c6 02a0 | | Declare_Subprogram Null_Subprogram 00c7 4801 |H | Short_Literal 0x1 00c8 035d | ] | Declare_Type Array,Defined 00c9 00d8 | | Load_Top At_Offset_0 00ca 0337 | 7 | Declare_Variable Array 00cb 4801 |H | Short_Literal 0x1 00cc 4814 |H | Short_Literal 0x14 00cd e249 | I | Load 0x1,0x49 00ce 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call 00d0 4801 |H | Short_Literal 0x1 00d1 035d | ] | Declare_Type Array,Defined 00d2 00d8 | | Load_Top At_Offset_0 00d3 0337 | 7 | Declare_Variable Array 00d4 00d8 | | Load_Top At_Offset_0 00d5 1c00 | | Execute_Immediate Run_Utility,0x0 00d6 4800 |H | Short_Literal 0x0 00d7 4814 |H | Short_Literal 0x14 00d8 00e3 | | Load_Encached Natural_Cache 00d9 03f8 | | Declare_Type Discrete,Constrained 00da 4800 |H | Short_Literal 0x0 00db 4814 |H | Short_Literal 0x14 00dc 00e3 | | Load_Encached Natural_Cache 00dd 03f8 | | Declare_Type Discrete,Constrained 00de 4801 |H | Short_Literal 0x1 00df 481e |H | Short_Literal 0x1e 00e0 e24a | J | Load 0x1,0x4a 00e1 029f 068b | | Declare_Subprogram INIT_0688,For_Call 00e3 4801 |H | Short_Literal 0x1 00e4 035d | ] | Declare_Type Array,Defined 00e5 00d8 | | Load_Top At_Offset_0 00e6 0337 | 7 | Declare_Variable Array 00e7 00d8 | | Load_Top At_Offset_0 00e8 1c00 | | Execute_Immediate Run_Utility,0x0 00e9 4800 |H | Short_Literal 0x0 00ea 481e |H | Short_Literal 0x1e 00eb 00e3 | | Load_Encached Natural_Cache 00ec 03f8 | | Declare_Type Discrete,Constrained 00ed 4800 |H | Short_Literal 0x0 00ee 481e |H | Short_Literal 0x1e 00ef 00e3 | | Load_Encached Natural_Cache 00f0 03f8 | | Declare_Type Discrete,Constrained 00f1 e004 | | Load 0x0,0x4 00f2 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00f3 e003 | | Load 0x0,0x3 00f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00f5 e005 | | Load 0x0,0x5 00f6 e006 | | Load 0x0,0x6 00f7 e007 | | Load 0x0,0x7 00f8 00e2 | | Load_Encached Integer_Cache 00f9 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call 00fb 4806 |H | Short_Literal 0x6 00fc 032d | - | Declare_Type Record,Defined 00fd 4801 |H | Short_Literal 0x1 00fe 4814 |H | Short_Literal 0x14 00ff 00da | | Load_Top At_Offset_2 0100 029f 06c3 | | Declare_Subprogram INIT_06c0,For_Call 0102 4801 |H | Short_Literal 0x1 0103 035d | ] | Declare_Type Array,Defined 0104 00d8 | | Load_Top At_Offset_0 0105 0337 | 7 | Declare_Variable Array 0106 00d8 | | Load_Top At_Offset_0 0107 1c00 | | Execute_Immediate Run_Utility,0x0 0108 4800 |H | Short_Literal 0x0 0109 4814 |H | Short_Literal 0x14 010a 00e3 | | Load_Encached Natural_Cache 010b 03f8 | | Declare_Type Discrete,Constrained 010c 4800 |H | Short_Literal 0x0 010d 4814 |H | Short_Literal 0x14 010e 00e3 | | Load_Encached Natural_Cache 010f 03f8 | | Declare_Type Discrete,Constrained 0110 e004 | | Load 0x0,0x4 0111 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0112 e003 | | Load 0x0,0x3 0113 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0114 e004 | | Load 0x0,0x4 0115 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0116 e004 | | Load 0x0,0x4 0117 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0118 e005 | | Load 0x0,0x5 0119 00e2 | | Load_Encached Integer_Cache 011a 029f 06eb | | Declare_Subprogram INIT_06e8,For_Call 011c 4806 |H | Short_Literal 0x6 011d 032d | - | Declare_Type Record,Defined 011e 4801 |H | Short_Literal 0x1 011f 4814 |H | Short_Literal 0x14 0120 00da | | Load_Top At_Offset_2 0121 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call 0123 4801 |H | Short_Literal 0x1 0124 035d | ] | Declare_Type Array,Defined 0125 00d8 | | Load_Top At_Offset_0 0126 0337 | 7 | Declare_Variable Array 0127 00d8 | | Load_Top At_Offset_0 0128 1c00 | | Execute_Immediate Run_Utility,0x0 0129 4800 |H | Short_Literal 0x0 012a 4814 |H | Short_Literal 0x14 012b 00e3 | | Load_Encached Natural_Cache 012c 03f8 | | Declare_Type Discrete,Constrained 012d 4800 |H | Short_Literal 0x0 012e 4814 |H | Short_Literal 0x14 012f 00e3 | | Load_Encached Natural_Cache 0130 03f8 | | Declare_Type Discrete,Constrained 0131 4801 |H | Short_Literal 0x1 0132 4be8 |K | Short_Literal 0x3e8 0133 00e5 | | Load_Encached Long_Integer_Cache 0134 03f8 | | Declare_Type Discrete,Constrained 0135 4800 |H | Short_Literal 0x0 0136 4be8 |K | Short_Literal 0x3e8 0137 00e5 | | Load_Encached Long_Integer_Cache 0138 03f8 | | Declare_Type Discrete,Constrained 0139 4801 |H | Short_Literal 0x1 013a 4be8 |K | Short_Literal 0x3e8 013b e008 | | Load 0x0,0x8 013c 029f 0723 | #| Declare_Subprogram INIT_0720,For_Call 013e 4801 |H | Short_Literal 0x1 013f 035d | ] | Declare_Type Array,Defined 0140 00e5 | | Load_Encached Long_Integer_Cache 0141 02a0 | | Declare_Subprogram Null_Subprogram 0142 4801 |H | Short_Literal 0x1 0143 032d | - | Declare_Type Record,Defined 0144 00d9 | | Load_Top At_Offset_1 0145 0337 | 7 | Declare_Variable Array 0146 00d8 | | Load_Top At_Offset_0 0147 1c00 | | Execute_Immediate Run_Utility,0x0 0148 00d9 | | Load_Top At_Offset_1 0149 0322 | " | Declare_Variable Record 014a e004 | | Load 0x0,0x4 014b 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 014c e009 | | Load 0x0,0x9 014d 00e3 | | Load_Encached Natural_Cache 014e e005 | | Load 0x0,0x5 014f e006 | | Load 0x0,0x6 0150 e007 | | Load 0x0,0x7 0151 e003 | | Load 0x0,0x3 0152 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0153 00e2 | | Load_Encached Integer_Cache 0154 029f 074b | K| Declare_Subprogram INIT_0748,For_Call 0156 4808 |H | Short_Literal 0x8 0157 032d | - | Declare_Type Record,Defined 0158 4801 |H | Short_Literal 0x1 0159 4828 |H( | Short_Literal 0x28 015a 00da | | Load_Top At_Offset_2 015b 029f 075b | [| Declare_Subprogram INIT_0758,For_Call 015d 4801 |H | Short_Literal 0x1 015e 035d | ] | Declare_Type Array,Defined 015f 00d8 | | Load_Top At_Offset_0 0160 0337 | 7 | Declare_Variable Array 0161 00d8 | | Load_Top At_Offset_0 0162 1c00 | | Execute_Immediate Run_Utility,0x0 0163 4800 |H | Short_Literal 0x0 0164 4828 |H( | Short_Literal 0x28 0165 00e3 | | Load_Encached Natural_Cache 0166 03f8 | | Declare_Type Discrete,Constrained 0167 4800 |H | Short_Literal 0x0 0168 4828 |H( | Short_Literal 0x28 0169 00e3 | | Load_Encached Natural_Cache 016a 03f8 | | Declare_Type Discrete,Constrained 016b 4800 |H | Short_Literal 0x0 016c e002 | | Load 0x0,0x2 016d 0a05 | | Execute_Immediate Plus,0x5 016e e001 | | Load 0x0,0x1 016f 01d7 | | Execute Vector,Field_Read 0170 02a0 | | Declare_Subprogram Null_Subprogram 0171 038e | | Declare_Type Package,Defined 0172 e001 | | Load 0x0,0x1 0173 e002 | | Load 0x0,0x2 0174 0a04 | | Execute_Immediate Plus,0x4 0175 e001 | | Load 0x0,0x1 0176 01d7 | | Execute Vector,Field_Read 0177 e261 | a | Load 0x1,0x61 0178 e260 | ` | Load 0x1,0x60 0179 4804 |H | Short_Literal 0x4 017a e26a | j | Load 0x1,0x6a 017b 020e | | Execute Module,Augment_Imports 017c 0387 | | Declare_Variable Package 017d a00a | | Store_Unchecked 0x0,0xa 017e e00b | | Load 0x0,0xb 017f a00c | | Store_Unchecked 0x0,0xc 0180 e006 | | Load 0x0,0x6 0181 e007 | | Load 0x0,0x7 0182 a00d | | Store_Unchecked 0x0,0xd 0183 a00e | | Store_Unchecked 0x0,0xe 0184 a00f | | Store_Unchecked 0x0,0xf 0185 e010 | | Load 0x0,0x10 0186 a011 | | Store_Unchecked 0x0,0x11 0187 e012 | | Load 0x0,0x12 0188 e004 | | Load 0x0,0x4 0189 480c |H | Short_Literal 0xc 018a e26a | j | Load 0x1,0x6a 018b 020e | | Execute Module,Augment_Imports 018c 00d8 | | Load_Top At_Offset_0 018d 020f | | Execute Module,Activate 018e 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 018f 00c7 | | Action Elaborate_Subprogram 0190 4800 |H | Short_Literal 0x0 0191 e002 | | Load 0x0,0x2 0192 0a01 | | Execute_Immediate Plus,0x1 0193 e001 | | Load 0x0,0x1 0194 01d7 | | Execute Vector,Field_Read 0195 00f5 | | Load_Encached Unused21 0196 037d | } | Declare_Type Task,Defined 0197 036f | o | Declare_Variable Task 0198 029d 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call 019a 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call 019c 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call 019e 029d 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call 01a0 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call 01a2 029d 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call 01a4 029d 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call 01a6 029d 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call 01a8 029d 08d3 | | Declare_Subprogram INIT_08d0,For_Outer_Call 01aa 4800 |H | Short_Literal 0x0 01ab 0093 11cb | | push_full_address INIT_11c8 01ad 00f5 | | Load_Encached Unused21 01ae 037d | } | Declare_Type Task,Defined 01af 036f | o | Declare_Variable Task 01b0 e22f | / | Load 0x1,0x2f 01b1 e004 | | Load 0x0,0x4 01b2 a013 | | Store_Unchecked 0x0,0x13 01b3 e014 | | Load 0x0,0x14 01b4 e015 | | Load 0x0,0x15 01b5 a016 | | Store_Unchecked 0x0,0x16 01b6 e017 | | Load 0x0,0x17 01b7 e018 | | Load 0x0,0x18 01b8 e019 | | Load 0x0,0x19 01b9 e01a | | Load 0x0,0x1a 01ba e01b | | Load 0x0,0x1b 01bb e238 | 8 | Load 0x1,0x38 01bc 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 01bd e01c | | Load 0x0,0x1c 01be a01d | | Store_Unchecked 0x0,0x1d 01bf 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 01c0 e267 | g | Load 0x1,0x67 01c1 a01e | | Store_Unchecked 0x0,0x1e 01c2 a011 | | Store_Unchecked 0x0,0x11 01c3 a01f | | Store_Unchecked 0x0,0x1f 01c4 a020 | | Store_Unchecked 0x0,0x20 01c5 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 01c6 1d6c | l | Execute_Immediate Reference_Lex_1,0x6c 01c7 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 01c8 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 01c9 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 01ca 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d 01cb 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 01cc 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 01cd 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 01ce 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 01cf 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 01d0 1d73 | s | Execute_Immediate Reference_Lex_1,0x73 01d1 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 01d2 a021 | ! | Store_Unchecked 0x0,0x21 01d3 a022 | " | Store_Unchecked 0x0,0x22 01d4 a023 | # | Store_Unchecked 0x0,0x23 01d5 a024 | $ | Store_Unchecked 0x0,0x24 01d6 e025 | % | Load 0x0,0x25 01d7 a026 | & | Store_Unchecked 0x0,0x26 01d8 a027 | ' | Store_Unchecked 0x0,0x27 01d9 e212 | | Load 0x1,0x12 01da 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 01db e24c | L | Load 0x1,0x4c 01dc e210 | | Load 0x1,0x10 01dd 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 01de e252 | R | Load 0x1,0x52 01df 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 01e0 e211 | | Load 0x1,0x11 01e1 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 01e2 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 01e3 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 01e4 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 01e5 e028 | ( | Load 0x0,0x28 01e6 e029 | ) | Load 0x0,0x29 01e7 e010 | | Load 0x0,0x10 01e8 a02a | * | Store_Unchecked 0x0,0x2a 01e9 a02b | + | Store_Unchecked 0x0,0x2b 01ea e21b | | Load 0x1,0x1b 01eb 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 01ec 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 01ed e24e | N | Load 0x1,0x4e 01ee 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 01ef e257 | W | Load 0x1,0x57 01f0 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d 01f1 e25c | \ | Load 0x1,0x5c 01f2 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 01f3 a02c | , | Store_Unchecked 0x0,0x2c 01f4 a02d | - | Store_Unchecked 0x0,0x2d 01f5 e264 | d | Load 0x1,0x64 01f6 e263 | c | Load 0x1,0x63 01f7 a02e | . | Store_Unchecked 0x0,0x2e 01f8 a02f | / | Store_Unchecked 0x0,0x2f 01f9 e030 | 0 | Load 0x0,0x30 01fa e031 | 1 | Load 0x0,0x31 01fb e00b | | Load 0x0,0xb 01fc a032 | 2 | Store_Unchecked 0x0,0x32 01fd a033 | 3 | Store_Unchecked 0x0,0x33 01fe a034 | 4 | Store_Unchecked 0x0,0x34 01ff a035 | 5 | Store_Unchecked 0x0,0x35 0200 a036 | 6 | Store_Unchecked 0x0,0x36 0201 e037 | 7 | Load 0x0,0x37 0202 a038 | 8 | Store_Unchecked 0x0,0x38 0203 e217 | | Load 0x1,0x17 0204 e219 | | Load 0x1,0x19 0205 e21d | | Load 0x1,0x1d 0206 4856 |HV | Short_Literal 0x56 0207 e26b | k | Load 0x1,0x6b 0208 020e | | Execute Module,Augment_Imports 0209 0007 | | Action Break_Optional 020a 029d 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call 020c 029d 091b | | Declare_Subprogram INIT_0918,For_Outer_Call 020e 029d 093b | ;| Declare_Subprogram INIT_0938,For_Outer_Call 0210 029d 098b | | Declare_Subprogram INIT_0988,For_Outer_Call 0212 029d 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call 0214 029d 09c3 | | Declare_Subprogram INIT_09c0,For_Outer_Call 0216 029d 09d3 | | Declare_Subprogram INIT_09d0,For_Outer_Call 0218 e039 | 9 | Load 0x0,0x39 0219 e03a | : | Load 0x0,0x3a 021a a03b | ; | Store_Unchecked 0x0,0x3b 021b a03c | < | Store_Unchecked 0x0,0x3c 021c a03d | = | Store_Unchecked 0x0,0x3d 021d a03e | > | Store_Unchecked 0x0,0x3e 021e a03f | ? | Store_Unchecked 0x0,0x3f 021f e004 | | Load 0x0,0x4 0220 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 0221 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 0222 e24c | L | Load 0x1,0x4c 0223 1d70 | p | Execute_Immediate Reference_Lex_1,0x70 0224 1d74 | t | Execute_Immediate Reference_Lex_1,0x74 0225 e26b | k | Load 0x1,0x6b 0226 481d |H | Short_Literal 0x1d 0227 480f |H | Short_Literal 0xf 0228 e275 | u | Load 0x1,0x75 0229 020e | | Execute Module,Augment_Imports 022a 0007 | | Action Break_Optional 022b 029b 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call,Unelaborated 022d 029d 0b73 | s| Declare_Subprogram INIT_0b70,For_Outer_Call 022f 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0230 00c7 | | Action Elaborate_Subprogram 0231 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 0232 00c7 | | Action Elaborate_Subprogram 0233 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0234 00c7 | | Action Elaborate_Subprogram 0235 029d 0b93 | | Declare_Subprogram INIT_0b90,For_Outer_Call 0237 029d 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call 0239 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 023a 00c7 | | Action Elaborate_Subprogram 023b 029d 0be3 | | Declare_Subprogram INIT_0be0,For_Outer_Call 023d 029d 0c1b | | Declare_Subprogram INIT_0c18,For_Outer_Call 023f a040 | @ | Store_Unchecked 0x0,0x40 0240 00c6 | | Action Check_Subprogram_Elaborated 0241 00e1 | | Load_Encached Boolean_Cache 0242 e004 | | Load 0x0,0x4 0243 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0244 1d82 | | Execute_Immediate Reference_Lex_1,0x82 0245 4800 |H | Short_Literal 0x0 0246 0093 0000 | | push_full_address 0x0 0248 6057 |`W | Indirect_Literal Discrete,0x2a0,{0x80000000, 0x00050000} 0249 0273 | s | Execute Discrete,Plus 024a e014 | | Load 0x0,0x14 024b 0273 | s | Execute Discrete,Plus 024c e041 | A | Load 0x0,0x41 024d 0273 | s | Execute Discrete,Plus 024e 4800 |H | Short_Literal 0x0 024f 0007 | | Action Break_Optional 0250 029d 0c33 | 3| Declare_Subprogram INIT_0c30,For_Outer_Call 0252 e002 | | Load 0x0,0x2 0253 0a03 | | Execute_Immediate Plus,0x3 0254 e001 | | Load 0x0,0x1 0255 01d7 | | Execute Vector,Field_Read 0256 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 0257 e004 | | Load 0x0,0x4 0258 194a | J | Execute Package,Field_Reference,Field_Number 0x4a 0259 00c6 | | Action Check_Subprogram_Elaborated 025a 1d8a | | Execute_Immediate Reference_Lex_1,0x8a 025b e042 | B | Load 0x0,0x42 025c e043 | C | Load 0x0,0x43 025d 4800 |H | Short_Literal 0x0 025e 0007 | | Action Break_Optional 025f 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0260 00c7 | | Action Elaborate_Subprogram 0261 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0262 00c7 | | Action Elaborate_Subprogram 0263 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0264 00c7 | | Action Elaborate_Subprogram 0265 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0266 00c7 | | Action Elaborate_Subprogram 0267 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0268 00c7 | | Action Elaborate_Subprogram 0269 1d14 | | Execute_Immediate Reference_Lex_1,0x14 026a 00c7 | | Action Elaborate_Subprogram 026b 1d15 | | Execute_Immediate Reference_Lex_1,0x15 026c 00c7 | | Action Elaborate_Subprogram 026d 1d16 | | Execute_Immediate Reference_Lex_1,0x16 026e 00c7 | | Action Elaborate_Subprogram 026f 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0270 00c7 | | Action Elaborate_Subprogram 0271 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0272 00c7 | | Action Elaborate_Subprogram 0273 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0274 00c7 | | Action Elaborate_Subprogram 0275 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0276 00c7 | | Action Elaborate_Subprogram 0277 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0278 00c7 | | Action Elaborate_Subprogram 0279 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 027a 00c7 | | Action Elaborate_Subprogram 027b 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 027c 00c7 | | Action Elaborate_Subprogram 027d 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 027e 00c7 | | Action Elaborate_Subprogram 027f 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0280 00c7 | | Action Elaborate_Subprogram 0281 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0282 00c7 | | Action Elaborate_Subprogram 0283 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0284 00c7 | | Action Elaborate_Subprogram 0285 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0286 00c7 | | Action Elaborate_Subprogram 0287 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0288 00c7 | | Action Elaborate_Subprogram 0289 BODY_0008: 0289 BODY_0008: 0289 00be | | Action Activate_Tasks 028a 00bc | | Action Signal_Activated 028b 00bb | | Action Signal_Completion 028c 0000 0000 | | .BLANK 0000[0x4] 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e26b | k | Load 0x1,0x6b 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 e240 | @ | Load 0x1,0x40 0374 6804 |h | Jump_Zero 0x379 0375 e241 | A | Load 0x1,0x41 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 0c53 | S| Declare_Subprogram INIT_0c50,For_Call 0393 BODY_0380: 0393 8404 | | Call 0x2,0x4 0394 00d9 | | Load_Top At_Offset_1 0395 1d8b | | Execute_Immediate Reference_Lex_1,0x8b 0396 1d8c | | Execute_Immediate Reference_Lex_1,0x8c 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 e26b | k | Load 0x1,0x6b 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 e26a | j | Load 0x1,0x6a 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 e263 | c | Load 0x1,0x63 03cc e26a | j | Load 0x1,0x6a 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 e264 | d | Load 0x1,0x64 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 e264 | d | Load 0x1,0x64 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 e26a | j | Load 0x1,0x6a 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 e239 | 9 | Load 0x1,0x39 03f4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 03f5 e23a | : | Load 0x1,0x3a 03f6 a5fe | | Store_Unchecked 0x2,-0x2 03f7 e23b | ; | Load 0x1,0x3b 03f8 a5fd | | Store_Unchecked 0x2,-0x3 03f9 e23c | < | Load 0x1,0x3c 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 0c63 | c| Declare_Subprogram INIT_0c60,For_Call 0405 029f 0c73 | s| Declare_Subprogram INIT_0c70,For_Call 0407 029f 0c8b | | Declare_Subprogram INIT_0c88,For_Call 0409 029f 0ca3 | | Declare_Subprogram INIT_0ca0,For_Call 040b 029f 0cbb | | Declare_Subprogram INIT_0cb8,For_Call 040d 029f 0d0b | | Declare_Subprogram INIT_0d08,For_Call 040f 029f 0d23 | #| Declare_Subprogram INIT_0d20,For_Call 0411 029f 0d3b | ;| Declare_Subprogram INIT_0d38,For_Call 0413 029f 0d53 | S| Declare_Subprogram INIT_0d50,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 0d6b | k| Declare_Subprogram INIT_0d68,For_Call 042b 029f 0d83 | | Declare_Subprogram INIT_0d80,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 0d9b | | Declare_Subprogram INIT_0d98,For_Call 0443 029f 0db3 | | Declare_Subprogram INIT_0db0,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 0dcb | | Declare_Subprogram INIT_0dc8,For_Call 045a 029f 0e0b | | Declare_Subprogram INIT_0e08,For_Call 045c 029f 0e4b | K| Declare_Subprogram INIT_0e48,For_Call 045e 029f 0ebb | | Declare_Subprogram INIT_0eb8,For_Call 0460 029f 0eeb | | Declare_Subprogram INIT_0ee8,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 1243 | C| Action Push_String_Extended,0x1243 ; "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 e258 | X | Load 0x1,0x58 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 1244 | D| Action Push_String_Extended,0x1244 ; "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 1245 | E| Action Push_String_Extended,0x1245 ; "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 1246 | F| Action Push_String_Extended,0x1246 ; "Global stop: " 0492 8048 | H | Call 0x0,0x48 0493 e240 | @ | Load 0x1,0x40 0494 6809 |h | Jump_Zero 0x49e 0495 0092 1247 | G| Action Push_String_Extended,0x1247 ; "Aid: " 0497 e241 | A | Load 0x1,0x41 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 1248 | H| Action Push_String_Extended,0x1248 ; "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 1249 | I| Action Push_String_Extended,0x1249 ; "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 124a | J| Action Push_String_Extended,0x124a ; "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 124b | K| Action Push_String_Extended,0x124b ; "Global stepping: " 04b5 8048 | H | Call 0x0,0x48 04b6 e242 | B | Load 0x1,0x42 04b7 e011 | | Load 0x0,0x11 04b8 027f | | Execute Discrete,Equal 04b9 7021 |p! | Jump_Nonzero 0x4db 04ba 0092 124c | L| Action Push_String_Extended,0x124c ; "Task = " 04bc e242 | B | Load 0x1,0x42 04bd 804d | M | Call 0x0,0x4d 04be 01cc | | Execute Vector,Catenate 04bf 0092 124d | M| Action Push_String_Extended,0x124d ; " Count = " 04c1 01cc | | Execute Vector,Catenate 04c2 e243 | C | Load 0x1,0x43 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 124e | N| Action Push_String_Extended,0x124e ; " 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 e244 | D | Load 0x1,0x44 04cf e04e | N | Load 0x0,0x4e 04d0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04d1 0092 124f | O| Action Push_String_Extended,0x124f ; " Action = " 04d3 01cc | | Execute Vector,Catenate 04d4 e245 | E | Load 0x1,0x45 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 1248 | H| Action Push_String_Extended,0x1248 ; "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 1250 | P| Action Push_String_Extended,0x1250 ; "Instruction stepping: " 04e3 8048 | H | Call 0x0,0x48 04e4 e246 | F | Load 0x1,0x46 04e5 e011 | | Load 0x0,0x11 04e6 027f | | Execute Discrete,Equal 04e7 7016 |p | Jump_Nonzero 0x4fe 04e8 0092 124c | L| Action Push_String_Extended,0x124c ; "Task = " 04ea 8048 | H | Call 0x0,0x48 04eb e246 | F | Load 0x1,0x46 04ec 804d | M | Call 0x0,0x4d 04ed 0092 124d | M| Action Push_String_Extended,0x124d ; " Count = " 04ef 01cc | | Execute Vector,Catenate 04f0 e247 | G | Load 0x1,0x47 04f1 00e0 | | Load_Encached Standard_Cache 04f2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04f3 01cc | | Execute Vector,Catenate 04f4 0092 124f | O| Action Push_String_Extended,0x124f ; " Action = " 04f6 01cc | | Execute Vector,Catenate 04f7 e248 | H | Load 0x1,0x48 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 1251 | Q| Action Push_String_Extended,0x1251 ; "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 1252 | R| Action Push_String_Extended,0x1252 ; "Breakpoints:" 0506 8048 | H | Call 0x0,0x48 0507 8049 | I | Call 0x0,0x49 0508 e23d | = | Load 0x1,0x3d 0509 6808 |h | Jump_Zero 0x512 050a 0092 1253 | S| Action Push_String_Extended,0x1253 ; " Accelerator load failures: " 050c e23d | = | Load 0x1,0x3d 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 e24f | O | Load 0x1,0x4f 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 e253 | S | Load 0x1,0x53 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 1254 | T| Action Push_String_Extended,0x1254 ; "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 1255 | U| Action Push_String_Extended,0x1255 ; "Exception Requests:" 052d 8048 | H | Call 0x0,0x48 052e 8049 | I | Call 0x0,0x49 052f 00cf | | Action Mark_Auxiliary 0530 e268 | h | Load 0x1,0x68 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 1256 | V| Action Push_String_Extended,0x1256 ; "History requests and status" 056e 8048 | H | Call 0x0,0x48 056f 8049 | I | Call 0x0,0x49 0570 8049 | I | Call 0x0,0x49 0571 0092 1257 | W| Action Push_String_Extended,0x1257 ; "Next_Index = " 0573 e264 | d | Load 0x1,0x64 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 e25d | ] | Load 0x1,0x5d 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 e25c | \ | Load 0x1,0x5c 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 1258 | X| Action Push_String_Extended,0x1258 ; ": 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 1259 | Y| Action Push_String_Extended,0x1259 ; "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 e238 | 8 | Load 0x1,0x38 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 e238 | 8 | Load 0x1,0x38 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 e238 | 8 | Load 0x1,0x38 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 e238 | 8 | Load 0x1,0x38 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 a240 | @ | Store_Unchecked 0x1,0x40 05cd e011 | | Load 0x0,0x11 05ce a242 | B | Store_Unchecked 0x1,0x42 05cf e011 | | Load 0x0,0x11 05d0 a246 | F | Store_Unchecked 0x1,0x46 05d1 4800 |H | Short_Literal 0x0 05d2 a24f | O | Store_Unchecked 0x1,0x4f 05d3 4800 |H | Short_Literal 0x0 05d4 a250 | P | Store_Unchecked 0x1,0x50 05d5 4800 |H | Short_Literal 0x0 05d6 a253 | S | Store_Unchecked 0x1,0x53 05d7 4800 |H | Short_Literal 0x0 05d8 a254 | T | Store_Unchecked 0x1,0x54 05d9 4800 |H | Short_Literal 0x0 05da a258 | X | Store_Unchecked 0x1,0x58 05db 4800 |H | Short_Literal 0x0 05dc a259 | Y | Store_Unchecked 0x1,0x59 05dd 4800 |H | Short_Literal 0x0 05de a268 | h | Store_Unchecked 0x1,0x68 05df 4800 |H | Short_Literal 0x0 05e0 a269 | i | Store_Unchecked 0x1,0x69 05e1 4800 |H | Short_Literal 0x0 05e2 a25d | ] | Store_Unchecked 0x1,0x5d 05e3 4800 |H | Short_Literal 0x0 05e4 a25e | ^ | Store_Unchecked 0x1,0x5e 05e5 4800 |H | Short_Literal 0x0 05e6 e264 | d | Load 0x1,0x64 05e7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05e8 00cf | | Action Mark_Auxiliary 05e9 e263 | c | Load 0x1,0x63 05ea 01d9 | | Execute Vector,Reverse_Bounds 05eb 0007 | | Action Break_Optional 05ec 802e | . | Call 0x0,0x2e 05ed 00d9 | | Load_Top At_Offset_1 05ee e263 | c | Load 0x1,0x63 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 e26b | k | Load 0x1,0x6b 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 a23e | > | Store_Unchecked 0x1,0x3e 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 e26b | k | Load 0x1,0x6b 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 4607 |F | Jump_Case 0x8 061c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 061d 7807 |x | Jump 0x625 ; case 0x1 061e 780a |x | Jump 0x629 ; case 0x2 061f 780e |x | Jump 0x62e ; case 0x3 0620 7811 |x | Jump 0x632 ; case 0x4 0621 7812 |x | Jump 0x634 ; case 0x5 0622 7813 |x | Jump 0x636 ; case 0x6 0623 7816 |x | Jump 0x63a ; case 0x7 0624 4302 |C | .XXX[0x1] 0625 00da | | Load_Top At_Offset_2 0626 0091 123f | ?| Action Push_String_Extended_Indexed,0x123f ; "LOCAL_UNCONSTRAINED" 0628 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0629 00db | | Load_Top At_Offset_3 062a 00db | | Load_Top At_Offset_3 062b 00e0 | | Load_Encached Standard_Cache 062c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 062d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 062e 00da | | Load_Top At_Offset_2 062f 00e0 | | Load_Encached Standard_Cache 0630 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0631 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0632 00db | | Load_Top At_Offset_3 0633 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0634 00db | | Load_Top At_Offset_3 0635 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0636 e23f | ? | Load 0x1,0x3f 0637 00dc | | Load_Top At_Offset_4 0638 0267 | g | Execute Discrete,Predecessor 0639 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 063a e23f | ? | Load 0x1,0x3f 063b 00dc | | Load_Top At_Offset_4 063c 0268 | h | Execute Discrete,Successor 063d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 063e 0000 0000 | | .XXX[0x2] 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 0643 | C | .CONST 0x0643 ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0001 | | .CONST 0x0001 ; Number of locals 0643 BODY_0640: 0643 INIT_0640: 0643 4601 |F | Jump_Case 0x2 0644 7801 |x | Jump 0x646 ; case 0x0 0645 7804 |x | Jump 0x64a ; case 0x1 0646 00da | | Load_Top At_Offset_2 0647 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0648 1c00 | | Execute_Immediate Run_Utility,0x0 0649 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 064a 00da | | Load_Top At_Offset_2 064b 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 064c 1c01 | | Execute_Immediate Run_Utility,0x1 064d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 064e 0000 0000 | | .XXX[0x2] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0653 | S | .CONST 0x0653 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0001 | | .CONST 0x0001 ; Number of locals 0653 BODY_0650: 0653 INIT_0650: 0653 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 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 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 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 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 4605 |F | Jump_Case 0x6 0664 7804 |x | Jump 0x669 ; case 0x0 0665 7815 |x | Jump 0x67b ; case 0x1 0666 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0667 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0668 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0669 00da | | Load_Top At_Offset_2 ; case 0x5 066a 01d8 | | Execute Vector,Element_Type 066b 0322 | " | Declare_Variable Record 066c 00d8 | | Load_Top At_Offset_0 066d 1c00 | | Execute_Immediate Run_Utility,0x0 066e 00db | | Load_Top At_Offset_3 066f 01dc | | Execute Vector,Last 0670 e5ff | | Load 0x2,-0x1 0671 01dd | | Execute Vector,First 0672 0263 | c | Execute Discrete,Above_Bound 0673 7006 |p | Jump_Nonzero 0x67a 0674 00da | | Load_Top At_Offset_2 0675 00d9 | | Load_Top At_Offset_1 0676 e5ff | | Load 0x2,-0x1 0677 01d6 | | Execute Vector,Field_Write 0678 0a01 | | Execute_Immediate Plus,0x1 0679 7ff8 | | Jump 0x672 067a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 067b 00da | | Load_Top At_Offset_2 067c 01dc | | Execute Vector,Last 067d 00db | | Load_Top At_Offset_3 067e 01dd | | Execute Vector,First 067f 0263 | c | Execute Discrete,Above_Bound 0680 7006 |p | Jump_Nonzero 0x687 0681 00d8 | | Load_Top At_Offset_0 0682 e5ff | | Load 0x2,-0x1 0683 01d7 | | Execute Vector,Field_Read 0684 1c01 | | Execute_Immediate Run_Utility,0x1 0685 0a01 | | Execute_Immediate Plus,0x1 0686 7ff8 | | Jump 0x67f 0687 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 068b | | .CONST 0x068b ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0001 | | .CONST 0x0001 ; Number of locals 068b BODY_0688: 068b INIT_0688: 068b 4605 |F | Jump_Case 0x6 068c 7804 |x | Jump 0x691 ; case 0x0 068d 7815 |x | Jump 0x6a3 ; case 0x1 068e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 068f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0690 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0691 00da | | Load_Top At_Offset_2 ; case 0x5 0692 01d8 | | Execute Vector,Element_Type 0693 0322 | " | Declare_Variable Record 0694 00d8 | | Load_Top At_Offset_0 0695 1c00 | | Execute_Immediate Run_Utility,0x0 0696 00db | | Load_Top At_Offset_3 0697 01dc | | Execute Vector,Last 0698 e5ff | | Load 0x2,-0x1 0699 01dd | | Execute Vector,First 069a 0263 | c | Execute Discrete,Above_Bound 069b 7006 |p | Jump_Nonzero 0x6a2 069c 00da | | Load_Top At_Offset_2 069d 00d9 | | Load_Top At_Offset_1 069e e5ff | | Load 0x2,-0x1 069f 01d6 | | Execute Vector,Field_Write 06a0 0a01 | | Execute_Immediate Plus,0x1 06a1 7ff8 | | Jump 0x69a 06a2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06a3 00da | | Load_Top At_Offset_2 06a4 01dc | | Execute Vector,Last 06a5 00db | | Load_Top At_Offset_3 06a6 01dd | | Execute Vector,First 06a7 0263 | c | Execute Discrete,Above_Bound 06a8 7006 |p | Jump_Nonzero 0x6af 06a9 00d8 | | Load_Top At_Offset_0 06aa e5ff | | Load 0x2,-0x1 06ab 01d7 | | Execute Vector,Field_Read 06ac 1c01 | | Execute_Immediate Run_Utility,0x1 06ad 0a01 | | Execute_Immediate Plus,0x1 06ae 7ff8 | | Jump 0x6a7 06af 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b3 | | .CONST 0x06b3 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0001 | | .CONST 0x0001 ; Number of locals 06b3 BODY_06b0: 06b3 INIT_06b0: 06b3 4601 |F | Jump_Case 0x2 06b4 7801 |x | Jump 0x6b6 ; case 0x0 06b5 7804 |x | Jump 0x6ba ; case 0x1 06b6 00da | | Load_Top At_Offset_2 06b7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06b8 1c00 | | Execute_Immediate Run_Utility,0x0 06b9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06ba 00da | | Load_Top At_Offset_2 06bb 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 06bc 1c01 | | Execute_Immediate Run_Utility,0x1 06bd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06be 0000 0000 | | .XXX[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 4605 |F | Jump_Case 0x6 06c4 7804 |x | Jump 0x6c9 ; case 0x0 06c5 7815 |x | Jump 0x6db ; case 0x1 06c6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 06c7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 06c8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 06c9 00da | | Load_Top At_Offset_2 ; case 0x5 06ca 01d8 | | Execute Vector,Element_Type 06cb 0322 | " | Declare_Variable Record 06cc 00d8 | | Load_Top At_Offset_0 06cd 1c00 | | Execute_Immediate Run_Utility,0x0 06ce 00db | | Load_Top At_Offset_3 06cf 01dc | | Execute Vector,Last 06d0 e5ff | | Load 0x2,-0x1 06d1 01dd | | Execute Vector,First 06d2 0263 | c | Execute Discrete,Above_Bound 06d3 7006 |p | Jump_Nonzero 0x6da 06d4 00da | | Load_Top At_Offset_2 06d5 00d9 | | Load_Top At_Offset_1 06d6 e5ff | | Load 0x2,-0x1 06d7 01d6 | | Execute Vector,Field_Write 06d8 0a01 | | Execute_Immediate Plus,0x1 06d9 7ff8 | | Jump 0x6d2 06da 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06db 00da | | Load_Top At_Offset_2 06dc 01dc | | Execute Vector,Last 06dd 00db | | Load_Top At_Offset_3 06de 01dd | | Execute Vector,First 06df 0263 | c | Execute Discrete,Above_Bound 06e0 7006 |p | Jump_Nonzero 0x6e7 06e1 00d8 | | Load_Top At_Offset_0 06e2 e5ff | | Load 0x2,-0x1 06e3 01d7 | | Execute Vector,Field_Read 06e4 1c01 | | Execute_Immediate Run_Utility,0x1 06e5 0a01 | | Execute_Immediate Plus,0x1 06e6 7ff8 | | Jump 0x6df 06e7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06eb | | .CONST 0x06eb ; Address of begin 06e9 0004 | | .CONST 0x0004 ; Address of exception handler 06ea 0001 | | .CONST 0x0001 ; Number of locals 06eb BODY_06e8: 06eb INIT_06e8: 06eb 4601 |F | Jump_Case 0x2 06ec 7801 |x | Jump 0x6ee ; case 0x0 06ed 7804 |x | Jump 0x6f2 ; case 0x1 06ee 00da | | Load_Top At_Offset_2 06ef 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06f0 1c00 | | Execute_Immediate Run_Utility,0x0 06f1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06f2 00da | | Load_Top At_Offset_2 06f3 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 06f4 1c01 | | Execute_Immediate Run_Utility,0x1 06f5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 06f6 0000 0000 | | .XXX[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 4605 |F | Jump_Case 0x6 06fc 7804 |x | Jump 0x701 ; case 0x0 06fd 7815 |x | Jump 0x713 ; case 0x1 06fe 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 06ff 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0700 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0701 00da | | Load_Top At_Offset_2 ; case 0x5 0702 01d8 | | Execute Vector,Element_Type 0703 0322 | " | Declare_Variable Record 0704 00d8 | | Load_Top At_Offset_0 0705 1c00 | | Execute_Immediate Run_Utility,0x0 0706 00db | | Load_Top At_Offset_3 0707 01dc | | Execute Vector,Last 0708 e5ff | | Load 0x2,-0x1 0709 01dd | | Execute Vector,First 070a 0263 | c | Execute Discrete,Above_Bound 070b 7006 |p | Jump_Nonzero 0x712 070c 00da | | Load_Top At_Offset_2 070d 00d9 | | Load_Top At_Offset_1 070e e5ff | | Load 0x2,-0x1 070f 01d6 | | Execute Vector,Field_Write 0710 0a01 | | Execute_Immediate Plus,0x1 0711 7ff8 | | Jump 0x70a 0712 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0713 00da | | Load_Top At_Offset_2 0714 01dc | | Execute Vector,Last 0715 00db | | Load_Top At_Offset_3 0716 01dd | | Execute Vector,First 0717 0263 | c | Execute Discrete,Above_Bound 0718 7006 |p | Jump_Nonzero 0x71f 0719 00d8 | | Load_Top At_Offset_0 071a e5ff | | Load 0x2,-0x1 071b 01d7 | | Execute Vector,Field_Read 071c 1c01 | | Execute_Immediate Run_Utility,0x1 071d 0a01 | | Execute_Immediate Plus,0x1 071e 7ff8 | | Jump 0x717 071f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0720 ; -------------------------------------------------------------------------------------- 0720 ; SUBPROGRAM 0720 ; -------------------------------------------------------------------------------------- 0720 0723 | # | .CONST 0x0723 ; Address of begin 0721 0004 | | .CONST 0x0004 ; Address of exception handler 0722 0001 | | .CONST 0x0001 ; Number of locals 0723 BODY_0720: 0723 INIT_0720: 0723 4605 |F | Jump_Case 0x6 0724 7804 |x | Jump 0x729 ; case 0x0 0725 7815 |x | Jump 0x73b ; case 0x1 0726 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0727 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0728 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0729 00da | | Load_Top At_Offset_2 ; case 0x5 072a 01d8 | | Execute Vector,Element_Type 072b 0322 | " | Declare_Variable Record 072c 00d8 | | Load_Top At_Offset_0 072d 1c00 | | Execute_Immediate Run_Utility,0x0 072e 00db | | Load_Top At_Offset_3 072f 01dc | | Execute Vector,Last 0730 e5ff | | Load 0x2,-0x1 0731 01dd | | Execute Vector,First 0732 0263 | c | Execute Discrete,Above_Bound 0733 7006 |p | Jump_Nonzero 0x73a 0734 00da | | Load_Top At_Offset_2 0735 00d9 | | Load_Top At_Offset_1 0736 e5ff | | Load 0x2,-0x1 0737 01d6 | | Execute Vector,Field_Write 0738 0a01 | | Execute_Immediate Plus,0x1 0739 7ff8 | | Jump 0x732 073a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 073b 00da | | Load_Top At_Offset_2 073c 01dc | | Execute Vector,Last 073d 00db | | Load_Top At_Offset_3 073e 01dd | | Execute Vector,First 073f 0263 | c | Execute Discrete,Above_Bound 0740 7006 |p | Jump_Nonzero 0x747 0741 00d8 | | Load_Top At_Offset_0 0742 e5ff | | Load 0x2,-0x1 0743 01d7 | | Execute Vector,Field_Read 0744 1c01 | | Execute_Immediate Run_Utility,0x1 0745 0a01 | | Execute_Immediate Plus,0x1 0746 7ff8 | | Jump 0x73f 0747 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 074b | K | .CONST 0x074b ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0001 | | .CONST 0x0001 ; Number of locals 074b BODY_0748: 074b INIT_0748: 074b 4601 |F | Jump_Case 0x2 074c 7801 |x | Jump 0x74e ; case 0x0 074d 7804 |x | Jump 0x752 ; case 0x1 074e 00da | | Load_Top At_Offset_2 074f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0750 1c00 | | Execute_Immediate Run_Utility,0x0 0751 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0752 00da | | Load_Top At_Offset_2 0753 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0754 1c01 | | Execute_Immediate Run_Utility,0x1 0755 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0756 0000 0000 | | .XXX[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 4605 |F | Jump_Case 0x6 075c 7804 |x | Jump 0x761 ; case 0x0 075d 7815 |x | Jump 0x773 ; case 0x1 075e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 075f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0760 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0761 00da | | Load_Top At_Offset_2 ; case 0x5 0762 01d8 | | Execute Vector,Element_Type 0763 0322 | " | Declare_Variable Record 0764 00d8 | | Load_Top At_Offset_0 0765 1c00 | | Execute_Immediate Run_Utility,0x0 0766 00db | | Load_Top At_Offset_3 0767 01dc | | Execute Vector,Last 0768 e5ff | | Load 0x2,-0x1 0769 01dd | | Execute Vector,First 076a 0263 | c | Execute Discrete,Above_Bound 076b 7006 |p | Jump_Nonzero 0x772 076c 00da | | Load_Top At_Offset_2 076d 00d9 | | Load_Top At_Offset_1 076e e5ff | | Load 0x2,-0x1 076f 01d6 | | Execute Vector,Field_Write 0770 0a01 | | Execute_Immediate Plus,0x1 0771 7ff8 | | Jump 0x76a 0772 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0773 00da | | Load_Top At_Offset_2 0774 01dc | | Execute Vector,Last 0775 00db | | Load_Top At_Offset_3 0776 01dd | | Execute Vector,First 0777 0263 | c | Execute Discrete,Above_Bound 0778 7006 |p | Jump_Nonzero 0x77f 0779 00d8 | | Load_Top At_Offset_0 077a e5ff | | Load 0x2,-0x1 077b 01d7 | | Execute Vector,Field_Read 077c 1c01 | | Execute_Immediate Run_Utility,0x1 077d 0a01 | | Execute_Immediate Plus,0x1 077e 7ff8 | | Jump 0x777 077f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0783 | | .CONST 0x0783 ; Address of begin 0781 0004 | | .CONST 0x0004 ; Address of exception handler 0782 0001 | | .CONST 0x0001 ; Number of locals 0783 BODY_0780: 0783 INIT_0780: 0783 00cf | | Action Mark_Auxiliary 0784 e253 | S | Load 0x1,0x53 0785 4801 |H | Short_Literal 0x1 0786 0263 | c | Execute Discrete,Above_Bound 0787 7012 |p | Jump_Nonzero 0x79a 0788 00d8 | | Load_Top At_Offset_0 0789 e252 | R | Load 0x1,0x52 078a 01d5 | | Execute Vector,Field_Reference 078b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 078c e027 | ' | Load 0x0,0x27 078d 027f | | Execute Discrete,Equal 078e 7009 |p | Jump_Nonzero 0x798 078f 00d8 | | Load_Top At_Offset_0 0790 e252 | R | Load 0x1,0x52 0791 01d5 | | Execute Vector,Field_Reference 0792 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0793 e5ff | | Load 0x2,-0x1 0794 027f | | Execute Discrete,Equal 0795 6802 |h | Jump_Zero 0x798 0796 4801 |H | Short_Literal 0x1 0797 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0798 00c8 | | Action Pop_Auxiliary_Range 0799 3fee |? | Loop_Increasing 0x788 079a 00ce | | Action Pop_Auxiliary 079b 4800 |H | Short_Literal 0x0 079c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 079d 0000 0000 | | .XXX[0x3] 079f 0000 | | 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 00cf | | Action Mark_Auxiliary 07a4 e25d | ] | Load 0x1,0x5d 07a5 4801 |H | Short_Literal 0x1 07a6 0263 | c | Execute Discrete,Above_Bound 07a7 701f |p | Jump_Nonzero 0x7c7 07a8 00d8 | | Load_Top At_Offset_0 07a9 e25c | \ | Load 0x1,0x5c 07aa 01d5 | | Execute Vector,Field_Reference 07ab 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07ac e01e | | Load 0x0,0x1e 07ad 027e | ~ | Execute Discrete,Not_Equal 07ae 6816 |h | Jump_Zero 0x7c5 07af 00d8 | | Load_Top At_Offset_0 07b0 e25c | \ | Load 0x1,0x5c 07b1 01d5 | | Execute Vector,Field_Reference 07b2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07b3 e5ff | | Load 0x2,-0x1 07b4 027f | | Execute Discrete,Equal 07b5 7007 |p | Jump_Nonzero 0x7bd 07b6 00d8 | | Load_Top At_Offset_0 07b7 e25c | \ | Load 0x1,0x5c 07b8 01d5 | | Execute Vector,Field_Reference 07b9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07ba e011 | | Load 0x0,0x11 07bb 027f | | Execute Discrete,Equal 07bc 6808 |h | Jump_Zero 0x7c5 07bd 00d8 | | Load_Top At_Offset_0 07be e25c | \ | Load 0x1,0x5c 07bf 01d5 | | Execute Vector,Field_Reference 07c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07c1 0f09 | | Execute_Immediate Equal,0x9 07c2 6802 |h | Jump_Zero 0x7c5 07c3 4801 |H | Short_Literal 0x1 07c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07c5 00c8 | | Action Pop_Auxiliary_Range 07c6 3fe1 |? | Loop_Increasing 0x7a8 07c7 00ce | | Action Pop_Auxiliary 07c8 4800 |H | Short_Literal 0x0 07c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ca 0000 0000 | | .BLANK 0000[0x6] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 00cf | | Action Mark_Auxiliary 07d4 e25d | ] | Load 0x1,0x5d 07d5 4801 |H | Short_Literal 0x1 07d6 0263 | c | Execute Discrete,Above_Bound 07d7 701e |p | Jump_Nonzero 0x7f6 07d8 00d8 | | Load_Top At_Offset_0 07d9 e25c | \ | Load 0x1,0x5c 07da 01d5 | | Execute Vector,Field_Reference 07db 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07dc e01e | | Load 0x0,0x1e 07dd 027e | ~ | Execute Discrete,Not_Equal 07de 6815 |h | Jump_Zero 0x7f4 07df 00d8 | | Load_Top At_Offset_0 07e0 e25c | \ | Load 0x1,0x5c 07e1 01d5 | | Execute Vector,Field_Reference 07e2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07e3 e5ff | | Load 0x2,-0x1 07e4 027f | | Execute Discrete,Equal 07e5 7007 |p | Jump_Nonzero 0x7ed 07e6 00d8 | | Load_Top At_Offset_0 07e7 e25c | \ | Load 0x1,0x5c 07e8 01d5 | | Execute Vector,Field_Reference 07e9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07ea e011 | | Load 0x0,0x11 07eb 027f | | Execute Discrete,Equal 07ec 6807 |h | Jump_Zero 0x7f4 07ed 00d8 | | Load_Top At_Offset_0 07ee e25c | \ | Load 0x1,0x5c 07ef 01d5 | | Execute Vector,Field_Reference 07f0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07f1 7002 |p | Jump_Nonzero 0x7f4 07f2 4801 |H | Short_Literal 0x1 07f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07f4 00c8 | | Action Pop_Auxiliary_Range 07f5 3fe2 |? | Loop_Increasing 0x7d8 07f6 00ce | | Action Pop_Auxiliary 07f7 4800 |H | Short_Literal 0x0 07f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07f9 0000 0000 | | .BLANK 0000[0x7] 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0803 | | .CONST 0x0803 ; Address of begin 0801 0004 | | .CONST 0x0004 ; Address of exception handler 0802 0001 | | .CONST 0x0001 ; Number of locals 0803 BODY_0800: 0803 INIT_0800: 0803 00cf | | Action Mark_Auxiliary 0804 e25d | ] | Load 0x1,0x5d 0805 4801 |H | Short_Literal 0x1 0806 0263 | c | Execute Discrete,Above_Bound 0807 701f |p | Jump_Nonzero 0x827 0808 00d8 | | Load_Top At_Offset_0 0809 e25c | \ | Load 0x1,0x5c 080a 01d5 | | Execute Vector,Field_Reference 080b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 080c e01e | | Load 0x0,0x1e 080d 027e | ~ | Execute Discrete,Not_Equal 080e 6816 |h | Jump_Zero 0x825 080f 00d8 | | Load_Top At_Offset_0 0810 e25c | \ | Load 0x1,0x5c 0811 01d5 | | Execute Vector,Field_Reference 0812 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0813 e5ff | | Load 0x2,-0x1 0814 027f | | Execute Discrete,Equal 0815 7007 |p | Jump_Nonzero 0x81d 0816 00d8 | | Load_Top At_Offset_0 0817 e25c | \ | Load 0x1,0x5c 0818 01d5 | | Execute Vector,Field_Reference 0819 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 081a e011 | | Load 0x0,0x11 081b 027f | | Execute Discrete,Equal 081c 6808 |h | Jump_Zero 0x825 081d 00d8 | | Load_Top At_Offset_0 081e e25c | \ | Load 0x1,0x5c 081f 01d5 | | Execute Vector,Field_Reference 0820 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0821 0f01 | | Execute_Immediate Equal,0x1 0822 6802 |h | Jump_Zero 0x825 0823 4801 |H | Short_Literal 0x1 0824 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0825 00c8 | | Action Pop_Auxiliary_Range 0826 3fe1 |? | Loop_Increasing 0x808 0827 00ce | | Action Pop_Auxiliary 0828 4800 |H | Short_Literal 0x0 0829 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 082a 0000 0000 | | .BLANK 0000[0x6] 0830 ; -------------------------------------------------------------------------------------- 0830 ; SUBPROGRAM 0830 ; -------------------------------------------------------------------------------------- 0830 0833 | 3 | .CONST 0x0833 ; Address of begin 0831 0004 | | .CONST 0x0004 ; Address of exception handler 0832 0001 | | .CONST 0x0001 ; Number of locals 0833 BODY_0830: 0833 INIT_0830: 0833 00da | | Load_Top At_Offset_2 0834 826d | m | Call 0x1,0x6d 0835 7008 |p | Jump_Nonzero 0x83e 0836 00da | | Load_Top At_Offset_2 0837 826e | n | Call 0x1,0x6e 0838 7003 |p | Jump_Nonzero 0x83c 0839 00da | | Load_Top At_Offset_2 083a 826f | o | Call 0x1,0x6f 083b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 083c 4801 |H | Short_Literal 0x1 083d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 083e 4801 |H | Short_Literal 0x1 083f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 00cf | | Action Mark_Auxiliary 0844 e258 | X | Load 0x1,0x58 0845 4801 |H | Short_Literal 0x1 0846 0263 | c | Execute Discrete,Above_Bound 0847 701f |p | Jump_Nonzero 0x867 0848 00d8 | | Load_Top At_Offset_0 0849 e257 | W | Load 0x1,0x57 084a 01d5 | | Execute Vector,Field_Reference 084b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 084c e01e | | Load 0x0,0x1e 084d 027e | ~ | Execute Discrete,Not_Equal 084e 6816 |h | Jump_Zero 0x865 084f 00d8 | | Load_Top At_Offset_0 0850 e257 | W | Load 0x1,0x57 0851 01d5 | | Execute Vector,Field_Reference 0852 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0853 e5ff | | Load 0x2,-0x1 0854 027f | | Execute Discrete,Equal 0855 7007 |p | Jump_Nonzero 0x85d 0856 00d8 | | Load_Top At_Offset_0 0857 e257 | W | Load 0x1,0x57 0858 01d5 | | Execute Vector,Field_Reference 0859 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 085a e011 | | Load 0x0,0x11 085b 027f | | Execute Discrete,Equal 085c 6808 |h | Jump_Zero 0x865 085d 00d8 | | Load_Top At_Offset_0 085e e257 | W | Load 0x1,0x57 085f 01d5 | | Execute Vector,Field_Reference 0860 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0861 0f09 | | Execute_Immediate Equal,0x9 0862 6802 |h | Jump_Zero 0x865 0863 4801 |H | Short_Literal 0x1 0864 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0865 00c8 | | Action Pop_Auxiliary_Range 0866 3fe1 |? | Loop_Increasing 0x848 0867 00ce | | Action Pop_Auxiliary 0868 4800 |H | Short_Literal 0x0 0869 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 086a 0000 0000 | | .BLANK 0000[0x6] 0870 ; -------------------------------------------------------------------------------------- 0870 ; SUBPROGRAM 0870 ; -------------------------------------------------------------------------------------- 0870 0873 | s | .CONST 0x0873 ; Address of begin 0871 0004 | | .CONST 0x0004 ; Address of exception handler 0872 0001 | | .CONST 0x0001 ; Number of locals 0873 BODY_0870: 0873 INIT_0870: 0873 00cf | | Action Mark_Auxiliary 0874 e258 | X | Load 0x1,0x58 0875 4801 |H | Short_Literal 0x1 0876 0263 | c | Execute Discrete,Above_Bound 0877 701e |p | Jump_Nonzero 0x896 0878 00d8 | | Load_Top At_Offset_0 0879 e257 | W | Load 0x1,0x57 087a 01d5 | | Execute Vector,Field_Reference 087b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 087c e01e | | Load 0x0,0x1e 087d 027e | ~ | Execute Discrete,Not_Equal 087e 6815 |h | Jump_Zero 0x894 087f 00d8 | | Load_Top At_Offset_0 0880 e257 | W | Load 0x1,0x57 0881 01d5 | | Execute Vector,Field_Reference 0882 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0883 e5ff | | Load 0x2,-0x1 0884 027f | | Execute Discrete,Equal 0885 7007 |p | Jump_Nonzero 0x88d 0886 00d8 | | Load_Top At_Offset_0 0887 e257 | W | Load 0x1,0x57 0888 01d5 | | Execute Vector,Field_Reference 0889 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 088a e011 | | Load 0x0,0x11 088b 027f | | Execute Discrete,Equal 088c 6807 |h | Jump_Zero 0x894 088d 00d8 | | Load_Top At_Offset_0 088e e257 | W | Load 0x1,0x57 088f 01d5 | | Execute Vector,Field_Reference 0890 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0891 7002 |p | Jump_Nonzero 0x894 0892 4801 |H | Short_Literal 0x1 0893 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0894 00c8 | | Action Pop_Auxiliary_Range 0895 3fe2 |? | Loop_Increasing 0x878 0896 00ce | | Action Pop_Auxiliary 0897 4800 |H | Short_Literal 0x0 0898 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0899 0000 0000 | | .BLANK 0000[0x7] 08a0 ; -------------------------------------------------------------------------------------- 08a0 ; SUBPROGRAM 08a0 ; -------------------------------------------------------------------------------------- 08a0 08a3 | | .CONST 0x08a3 ; Address of begin 08a1 0004 | | .CONST 0x0004 ; Address of exception handler 08a2 0001 | | .CONST 0x0001 ; Number of locals 08a3 BODY_08a0: 08a3 INIT_08a0: 08a3 00cf | | Action Mark_Auxiliary 08a4 e258 | X | Load 0x1,0x58 08a5 4801 |H | Short_Literal 0x1 08a6 0263 | c | Execute Discrete,Above_Bound 08a7 701f |p | Jump_Nonzero 0x8c7 08a8 00d8 | | Load_Top At_Offset_0 08a9 e257 | W | Load 0x1,0x57 08aa 01d5 | | Execute Vector,Field_Reference 08ab 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 08ac e01e | | Load 0x0,0x1e 08ad 027e | ~ | Execute Discrete,Not_Equal 08ae 6816 |h | Jump_Zero 0x8c5 08af 00d8 | | Load_Top At_Offset_0 08b0 e257 | W | Load 0x1,0x57 08b1 01d5 | | Execute Vector,Field_Reference 08b2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08b3 e5ff | | Load 0x2,-0x1 08b4 027f | | Execute Discrete,Equal 08b5 7007 |p | Jump_Nonzero 0x8bd 08b6 00d8 | | Load_Top At_Offset_0 08b7 e257 | W | Load 0x1,0x57 08b8 01d5 | | Execute Vector,Field_Reference 08b9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08ba e011 | | Load 0x0,0x11 08bb 027f | | Execute Discrete,Equal 08bc 6808 |h | Jump_Zero 0x8c5 08bd 00d8 | | Load_Top At_Offset_0 08be e257 | W | Load 0x1,0x57 08bf 01d5 | | Execute Vector,Field_Reference 08c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08c1 0f01 | | Execute_Immediate Equal,0x1 08c2 6802 |h | Jump_Zero 0x8c5 08c3 4801 |H | Short_Literal 0x1 08c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08c5 00c8 | | Action Pop_Auxiliary_Range 08c6 3fe1 |? | Loop_Increasing 0x8a8 08c7 00ce | | Action Pop_Auxiliary 08c8 4800 |H | Short_Literal 0x0 08c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ca 0000 0000 | | .BLANK 0000[0x6] 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; SUBPROGRAM 08d0 ; -------------------------------------------------------------------------------------- 08d0 08d3 | | .CONST 0x08d3 ; Address of begin 08d1 0004 | | .CONST 0x0004 ; Address of exception handler 08d2 0001 | | .CONST 0x0001 ; Number of locals 08d3 BODY_08d0: 08d3 INIT_08d0: 08d3 00da | | Load_Top At_Offset_2 08d4 8271 | q | Call 0x1,0x71 08d5 7008 |p | Jump_Nonzero 0x8de 08d6 00da | | Load_Top At_Offset_2 08d7 8272 | r | Call 0x1,0x72 08d8 7003 |p | Jump_Nonzero 0x8dc 08d9 00da | | Load_Top At_Offset_2 08da 8273 | s | Call 0x1,0x73 08db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08dc 4801 |H | Short_Literal 0x1 08dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08de 4801 |H | Short_Literal 0x1 08df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; SUBPROGRAM 08e0 ; -------------------------------------------------------------------------------------- 08e0 08ea | | .CONST 0x08ea ; Address of begin 08e1 0906 | | .CONST 0x0906 ; Address of exception handler 08e2 0003 | | .CONST 0x0003 ; Number of locals 08e3 INIT_08e0: 08e3 e22f | / | Load 0x1,0x2f 08e4 0007 | | Action Break_Optional 08e5 0093 0000 | | push_full_address 0x0 08e7 6028 |`( | Indirect_Literal Discrete,0x910,{0x80000000, 0x00010000} 08e8 0273 | s | Execute Discrete,Plus 08e9 0007 | | Action Break_Optional 08ea BODY_08e0: 08ea e5ff | | Load 0x2,-0x1 08eb 8050 | P | Call 0x0,0x50 08ec 005a | Z | Store_Top Discrete,At_Offset_2 08ed 00d9 | | Load_Top At_Offset_1 08ee e238 | 8 | Load 0x1,0x38 08ef 01d5 | | Execute Vector,Field_Reference 08f0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08f1 e5ff | | Load 0x2,-0x1 08f2 027f | | Execute Discrete,Equal 08f3 6810 |h | Jump_Zero 0x904 08f4 4800 |H | Short_Literal 0x0 08f5 00da | | Load_Top At_Offset_2 08f6 e238 | 8 | Load 0x1,0x38 08f7 01d5 | | Execute Vector,Field_Reference 08f8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 08f9 00d9 | | Load_Top At_Offset_1 08fa e238 | 8 | Load 0x1,0x38 08fb 01d5 | | Execute Vector,Field_Reference 08fc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08fd e5ff | | Load 0x2,-0x1 08fe 027f | | Execute Discrete,Equal 08ff 6802 |h | Jump_Zero 0x902 0900 00d9 | | Load_Top At_Offset_1 0901 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0902 00d8 | | Load_Top At_Offset_0 0903 0257 | W | Execute Discrete,Raise 0904 00d8 | | Load_Top At_Offset_0 0905 0257 | W | Execute Discrete,Raise 0906 TRAP_08e0: 0906 0007 | | Action Break_Optional 0907 e22f | / | Load 0x1,0x2f 0908 e5ff | | Load 0x2,-0x1 0909 4802 |H | Short_Literal 0x2 090a e26b | k | Load 0x1,0x6b 090b 170d | | Execute Task,Entry_Call,Field_Number 0xd 090c 005b | [ | Store_Top Discrete,At_Offset_3 090d 00da | | Load_Top At_Offset_2 090e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090f 0000 | | .XXX[0x1] 0910 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0914 0000 0000 | | .BLANK 0000[0x4] 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 091d | | .CONST 0x091d ; Address of begin 0919 0930 | 0 | .CONST 0x0930 ; Address of exception handler 091a 0002 | | .CONST 0x0002 ; Number of locals 091b INIT_0918: 091b e22f | / | Load 0x1,0x2f 091c 0007 | | Action Break_Optional 091d BODY_0918: 091d 00db | | Load_Top At_Offset_3 091e 8050 | P | Call 0x0,0x50 091f 0059 | Y | Store_Top Discrete,At_Offset_1 0920 00d8 | | Load_Top At_Offset_0 0921 e238 | 8 | Load 0x1,0x38 0922 01d5 | | Execute Vector,Field_Reference 0923 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0924 e5ff | | Load 0x2,-0x1 0925 027f | | Execute Discrete,Equal 0926 6807 |h | Jump_Zero 0x92e 0927 4800 |H | Short_Literal 0x0 0928 00d9 | | Load_Top At_Offset_1 0929 e238 | 8 | Load 0x1,0x38 092a 01d5 | | Execute Vector,Field_Reference 092b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 092c 00d8 | | Load_Top At_Offset_0 092d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 092e 4800 |H | Short_Literal 0x0 092f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0930 TRAP_0918: 0930 0007 | | Action Break_Optional 0931 4800 |H | Short_Literal 0x0 0932 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0933 0000 0000 | | .BLANK 0000[0x5] 0938 ; -------------------------------------------------------------------------------------- 0938 ; SUBPROGRAM 0938 ; -------------------------------------------------------------------------------------- 0938 0946 | F | .CONST 0x0946 ; Address of begin 0939 0004 | | .CONST 0x0004 ; Address of exception handler 093a 0007 | | .CONST 0x0007 ; Number of locals 093b INIT_0938: 093b e006 | | Load 0x0,0x6 093c 0322 | " | Declare_Variable Record 093d 00d8 | | Load_Top At_Offset_0 093e 0322 | " | Declare_Variable Record 093f 00e3 | | Load_Encached Natural_Cache 0940 00e3 | | Load_Encached Natural_Cache 0941 e5ff | | Load 0x2,-0x1 0942 8051 | Q | Call 0x0,0x51 0943 00e3 | | Load_Encached Natural_Cache 0944 03f1 | | Declare_Variable Discrete,With_Value 0945 00e3 | | Load_Encached Natural_Cache 0946 BODY_0938: 0946 e5ff | | Load 0x2,-0x1 0947 e5fe | | Load 0x2,-0x2 0948 017f | | Execute Record,Equal 0949 6802 |h | Jump_Zero 0x94c 094a 4801 |H | Short_Literal 0x1 094b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 094c 4801 |H | Short_Literal 0x1 094d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 094e 4801 |H | Short_Literal 0x1 094f a404 | | Store_Unchecked 0x2,0x4 0950 e5fe | | Load 0x2,-0x2 0951 8051 | Q | Call 0x0,0x51 0952 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0953 00cf | | Action Mark_Auxiliary 0954 00db | | Load_Top At_Offset_3 0955 00da | | Load_Top At_Offset_2 0956 027d | } | Execute Discrete,Greater 0957 7024 |p$ | Jump_Nonzero 0x97c 0958 e404 | | Load 0x2,0x4 0959 00db | | Load_Top At_Offset_3 095a 027d | } | Execute Discrete,Greater 095b 7020 |p | Jump_Nonzero 0x97c 095c e404 | | Load 0x2,0x4 095d 00d8 | | Load_Top At_Offset_0 095e 00e4 | | Load_Encached Positive_Cache 095f 0260 | ` | Execute Discrete,In_Type 0960 7001 |p | Jump_Nonzero 0x962 0961 0801 | | Execute_Immediate Raise,0x1 0962 e5ff | | Load 0x2,-0x1 0963 8052 | R | Call 0x0,0x52 0964 e402 | | Load 0x2,0x2 0965 017d | } | Execute Record,Structure_Write 0966 00db | | Load_Top At_Offset_3 0967 00d8 | | Load_Top At_Offset_0 0968 00e4 | | Load_Encached Positive_Cache 0969 0260 | ` | Execute Discrete,In_Type 096a 7001 |p | Jump_Nonzero 0x96c 096b 0801 | | Execute_Immediate Raise,0x1 096c e5fe | | Load 0x2,-0x2 096d 8052 | R | Call 0x0,0x52 096e e403 | | Load 0x2,0x3 096f 017d | } | Execute Record,Structure_Write 0970 00db | | Load_Top At_Offset_3 0971 0a01 | | Execute_Immediate Plus,0x1 0972 c405 | | Store 0x2,0x5 0973 e402 | | Load 0x2,0x2 0974 e403 | | Load 0x2,0x3 0975 017f | | Execute Record,Equal 0976 6803 |h | Jump_Zero 0x97a 0977 e404 | | Load 0x2,0x4 0978 0a01 | | Execute_Immediate Plus,0x1 0979 c404 | | Store 0x2,0x4 097a 00c9 | | Action Pop_Auxiliary_Loop 097b 7fd8 | | Jump 0x954 097c 00ce | | Action Pop_Auxiliary 097d 00db | | Load_Top At_Offset_3 097e 00da | | Load_Top At_Offset_2 097f 027d | } | Execute Discrete,Greater 0980 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0981 0000 0000 | | .BLANK 0000[0x7] 0988 ; -------------------------------------------------------------------------------------- 0988 ; SUBPROGRAM 0988 ; -------------------------------------------------------------------------------------- 0988 0991 | | .CONST 0x0991 ; Address of begin 0989 0004 | | .CONST 0x0004 ; Address of exception handler 098a 0004 | | .CONST 0x0004 ; Number of locals 098b INIT_0988: 098b 00e3 | | Load_Encached Natural_Cache 098c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 098d 00e3 | | Load_Encached Natural_Cache 098e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 098f 029f 0f23 | #| Declare_Subprogram INIT_0f20,For_Call 0991 BODY_0988: 0991 e01e | | Load 0x0,0x1e 0992 a5fb | | Store_Unchecked 0x2,-0x5 0993 e01e | | Load 0x0,0x1e 0994 a5f9 | | Store_Unchecked 0x2,-0x7 0995 00cf | | Action Mark_Auxiliary 0996 e268 | h | Load 0x1,0x68 0997 4801 |H | Short_Literal 0x1 0998 0263 | c | Execute Discrete,Above_Bound 0999 7003 |p | Jump_Nonzero 0x99d 099a 8404 | | Call 0x2,0x4 099b 00c8 | | Action Pop_Auxiliary_Range 099c 3ffd |? | Loop_Increasing 0x99a 099d 00ce | | Action Pop_Auxiliary 099e 00da | | Load_Top At_Offset_2 099f 680c |h | Jump_Zero 0x9ac 09a0 00da | | Load_Top At_Offset_2 09a1 e267 | g | Load 0x1,0x67 09a2 01d5 | | Execute Vector,Field_Reference 09a3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 09a4 0f04 | | Execute_Immediate Equal,0x4 09a5 6806 |h | Jump_Zero 0x9ac 09a6 00da | | Load_Top At_Offset_2 09a7 e267 | g | Load 0x1,0x67 09a8 01d5 | | Execute Vector,Field_Reference 09a9 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 09aa a5fa | | Store_Unchecked 0x2,-0x6 09ab 4505 |E | Exit_Suprogram New_Top_Offset 0x5 09ac e01e | | Load 0x0,0x1e 09ad a5fa | | Store_Unchecked 0x2,-0x6 09ae 4505 |E | Exit_Suprogram New_Top_Offset 0x5 09af 0000 | | .XXX[0x1] 09b0 ; -------------------------------------------------------------------------------------- 09b0 ; SUBPROGRAM 09b0 ; -------------------------------------------------------------------------------------- 09b0 09b3 | | .CONST 0x09b3 ; Address of begin 09b1 0004 | | .CONST 0x0004 ; Address of exception handler 09b2 0001 | | .CONST 0x0001 ; Number of locals 09b3 BODY_09b0: 09b3 INIT_09b0: 09b3 00db | | Load_Top At_Offset_3 09b4 7003 |p | Jump_Nonzero 0x9b8 09b5 00da | | Load_Top At_Offset_2 09b6 8053 | S | Call 0x0,0x53 09b7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09b8 4800 |H | Short_Literal 0x0 09b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09ba 0000 0000 | | .BLANK 0000[0x6] 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 00da | | Load_Top At_Offset_2 09c4 6003 |` | Indirect_Literal Discrete,0x9c8,{0x00000000, 0x7fffffff} 09c5 8054 | T | Call 0x0,0x54 09c6 8055 | U | Call 0x0,0x55 09c7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09c8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 09cc 0000 0000 | | .BLANK 0000[0x4] 09d0 ; -------------------------------------------------------------------------------------- 09d0 ; SUBPROGRAM 09d0 ; -------------------------------------------------------------------------------------- 09d0 09da | | .CONST 0x09da ; Address of begin 09d1 0a21 | ! | .CONST 0x0a21 ; Address of exception handler 09d2 0004 | | .CONST 0x0004 ; Number of locals 09d3 INIT_09d0: 09d3 e039 | 9 | Load 0x0,0x39 09d4 0322 | " | Declare_Variable Record 09d5 00d8 | | Load_Top At_Offset_0 09d6 1c00 | | Execute_Immediate Run_Utility,0x0 09d7 e20d | | Load 0x1,0xd 09d8 0337 | 7 | Declare_Variable Array 09d9 00e3 | | Load_Encached Natural_Cache 09da BODY_09d0: 09da e23c | < | Load 0x1,0x3c 09db 0a01 | | Execute_Immediate Plus,0x1 09dc a23c | < | Store_Unchecked 0x1,0x3c 09dd 00da | | Load_Top At_Offset_2 09de e5fd | | Load 0x2,-0x3 09df 803c | < | Call 0x0,0x3c 09e0 00d1 | | Pop_Control Pop_Count_1 09e1 e5f7 | | Load 0x2,-0x9 09e2 e5fb | | Load 0x2,-0x5 09e3 827a | z | Call 0x1,0x7a 09e4 6807 |h | Jump_Zero 0x9ec 09e5 e5fd | | Load 0x2,-0x3 09e6 e5fc | | Load 0x2,-0x4 09e7 027f | | Execute Discrete,Equal 09e8 6803 |h | Jump_Zero 0x9ec 09e9 00da | | Load_Top At_Offset_2 09ea 827b | { | Call 0x1,0x7b 09eb 00d1 | | Pop_Control Pop_Count_1 09ec 00da | | Load_Top At_Offset_2 09ed e5fe | | Load 0x2,-0x2 09ee 803d | = | Call 0x0,0x3d 09ef 00d1 | | Pop_Control Pop_Count_1 09f0 00da | | Load_Top At_Offset_2 09f1 8056 | V | Call 0x0,0x56 09f2 00d1 | | Pop_Control Pop_Count_1 09f3 00da | | Load_Top At_Offset_2 09f4 8057 | W | Call 0x0,0x57 09f5 00d1 | | Pop_Control Pop_Count_1 09f6 e5fa | | Load 0x2,-0x6 09f7 e238 | 8 | Load 0x1,0x38 09f8 01d5 | | Execute Vector,Field_Reference 09f9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 09fa e5ff | | Load 0x2,-0x1 09fb 8058 | X | Call 0x0,0x58 09fc 4800 |H | Short_Literal 0x0 09fd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09fe e5f9 | | Load 0x2,-0x7 09ff e01e | | Load 0x0,0x1e 0a00 027e | ~ | Execute Discrete,Not_Equal 0a01 6807 |h | Jump_Zero 0xa09 0a02 00d8 | | Load_Top At_Offset_0 0a03 0a01 | | Execute_Immediate Plus,0x1 0a04 0059 | Y | Store_Top Discrete,At_Offset_1 0a05 e5f9 | | Load 0x2,-0x7 0a06 00d9 | | Load_Top At_Offset_1 0a07 00db | | Load_Top At_Offset_3 0a08 01d6 | | Execute Vector,Field_Write 0a09 e5f8 | | Load 0x2,-0x8 0a0a e01e | | Load 0x0,0x1e 0a0b 027e | ~ | Execute Discrete,Not_Equal 0a0c 6807 |h | Jump_Zero 0xa14 0a0d 00d8 | | Load_Top At_Offset_0 0a0e 0a01 | | Execute_Immediate Plus,0x1 0a0f 0059 | Y | Store_Top Discrete,At_Offset_1 0a10 e5f8 | | Load 0x2,-0x8 0a11 00d9 | | Load_Top At_Offset_1 0a12 00db | | Load_Top At_Offset_3 0a13 01d6 | | Execute Vector,Field_Write 0a14 00da | | Load_Top At_Offset_2 0a15 00d9 | | Load_Top At_Offset_1 0a16 00d8 | | Load_Top At_Offset_0 0a17 e20e | | Load 0x1,0xe 0a18 0260 | ` | Execute Discrete,In_Type 0a19 7001 |p | Jump_Nonzero 0xa1b 0a1a 0801 | | Execute_Immediate Raise,0x1 0a1b 00db | | Load_Top At_Offset_3 0a1c e5fb | | Load 0x2,-0x5 0a1d 8059 | Y | Call 0x0,0x59 0a1e e5ff | | Load 0x2,-0x1 0a1f 805a | Z | Call 0x0,0x5a 0a20 450a |E | Exit_Suprogram New_Top_Offset 0xa 0a21 TRAP_09d0: 0a21 0007 | | Action Break_Optional 0a22 e23e | > | Load 0x1,0x3e 0a23 6806 |h | Jump_Zero 0xa2a 0a24 0092 125a | Z| Action Push_String_Extended,0x125a ; "Process_Action: exception: " 0a26 e03a | : | Load 0x0,0x3a 0a27 180d | | Execute Package,Field_Execute,Field_Number 0xd 0a28 01cc | | Execute Vector,Catenate 0a29 803b | ; | Call 0x0,0x3b 0a2a 450a |E | Exit_Suprogram New_Top_Offset 0xa 0a2b 0000 0000 | | .BLANK 0000[0x5] 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; SUBPROGRAM 0a30 ; -------------------------------------------------------------------------------------- 0a30 0a5a | Z | .CONST 0x0a5a ; Address of begin 0a31 0b65 | e | .CONST 0x0b65 ; Address of exception handler 0a32 0011 | | .CONST 0x0011 ; Number of locals 0a33 INIT_0a30: 0a33 e20d | | Load 0x1,0xd 0a34 0337 | 7 | Declare_Variable Array 0a35 e20e | | Load 0x1,0xe 0a36 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a37 00e2 | | Load_Encached Integer_Cache 0a38 e039 | 9 | Load 0x0,0x39 0a39 0322 | " | Declare_Variable Record 0a3a 00d8 | | Load_Top At_Offset_0 0a3b 1c00 | | Execute_Immediate Run_Utility,0x0 0a3c 00e1 | | Load_Encached Boolean_Cache 0a3d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a3e 00e2 | | Load_Encached Integer_Cache 0a3f 029f 0f73 | s| Declare_Subprogram INIT_0f70,For_Call 0a41 029f 0f9b | | Declare_Subprogram INIT_0f98,For_Call 0a43 029f 0fe3 | | Declare_Subprogram INIT_0fe0,For_Call 0a45 a013 | | Store_Unchecked 0x0,0x13 0a46 00c6 | | Action Check_Subprogram_Elaborated 0a47 00e2 | | Load_Encached Integer_Cache 0a48 480a |H | Short_Literal 0xa 0a49 4802 |H | Short_Literal 0x2 0a4a 0099 | | Action Reference_Dynamic 0a4b 4800 |H | Short_Literal 0x0 0a4c 0093 0000 | | push_full_address 0x0 0a4e 6119 |a | Indirect_Literal Discrete,0xb68,{0x80000000, 0x00060000} 0a4f 0273 | s | Execute Discrete,Plus 0a50 e014 | | Load 0x0,0x14 0a51 0273 | s | Execute Discrete,Plus 0a52 e05b | [ | Load 0x0,0x5b 0a53 0273 | s | Execute Discrete,Plus 0a54 480f |H | Short_Literal 0xf 0a55 0007 | | Action Break_Optional 0a56 029f 0ffb | | Declare_Subprogram INIT_0ff8,For_Call 0a58 029f 100b | | Declare_Subprogram INIT_1008,For_Call 0a5a BODY_0a30: 0a5a e5fd | | Load 0x2,-0x3 0a5b 8408 | | Call 0x2,0x8 0a5c e405 | | Load 0x2,0x5 0a5d e5fc | | Load 0x2,-0x4 0a5e 803c | < | Call 0x0,0x3c 0a5f 00d1 | | Pop_Control Pop_Count_1 0a60 e405 | | Load 0x2,0x5 0a61 e5fe | | Load 0x2,-0x2 0a62 803d | = | Call 0x0,0x3d 0a63 00d1 | | Pop_Control Pop_Count_1 0a64 e405 | | Load 0x2,0x5 0a65 8056 | V | Call 0x0,0x56 0a66 00d1 | | Pop_Control Pop_Count_1 0a67 e405 | | Load 0x2,0x5 0a68 8057 | W | Call 0x0,0x57 0a69 00d1 | | Pop_Control Pop_Count_1 0a6a 00cf | | Action Mark_Auxiliary 0a6b e24f | O | Load 0x1,0x4f 0a6c 4801 |H | Short_Literal 0x1 0a6d 0263 | c | Execute Discrete,Above_Bound 0a6e 704b |pK | Jump_Nonzero 0xaba 0a6f 00d8 | | Load_Top At_Offset_0 0a70 e24c | L | Load 0x1,0x4c 0a71 01d7 | | Execute Vector,Field_Read 0a72 e5fc | | Load 0x2,-0x4 0a73 027f | | Execute Discrete,Equal 0a74 6843 |hC | Jump_Zero 0xab8 0a75 00d8 | | Load_Top At_Offset_0 0a76 e24e | N | Load 0x1,0x4e 0a77 01d5 | | Execute Vector,Field_Reference 0a78 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a79 e05c | \ | Load 0x0,0x5c 0a7a 017f | | Execute Record,Equal 0a7b 7008 |p | Jump_Nonzero 0xa84 0a7c e405 | | Load 0x2,0x5 0a7d 805d | ] | Call 0x0,0x5d 0a7e 00d9 | | Load_Top At_Offset_1 0a7f e24e | N | Load 0x1,0x4e 0a80 01d5 | | Execute Vector,Field_Reference 0a81 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a82 8278 | x | Call 0x1,0x78 0a83 6834 |h4 | Jump_Zero 0xab8 0a84 e5fd | | Load 0x2,-0x3 0a85 00d9 | | Load_Top At_Offset_1 0a86 e24e | N | Load 0x1,0x4e 0a87 01d5 | | Execute Vector,Field_Reference 0a88 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a89 027f | | Execute Discrete,Equal 0a8a 6808 |h | Jump_Zero 0xa93 0a8b 00d8 | | Load_Top At_Offset_0 0a8c e24e | N | Load 0x1,0x4e 0a8d 01d5 | | Execute Vector,Field_Reference 0a8e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a8f 8408 | | Call 0x2,0x8 0a90 00d8 | | Load_Top At_Offset_0 0a91 8410 | | Call 0x2,0x10 0a92 7825 |x% | Jump 0xab8 0a93 e406 | | Load 0x2,0x6 0a94 7004 |p | Jump_Nonzero 0xa99 0a95 e5fd | | Load 0x2,-0x3 0a96 e01e | | Load 0x0,0x1e 0a97 027f | | Execute Discrete,Equal 0a98 681f |h | Jump_Zero 0xab8 0a99 00d8 | | Load_Top At_Offset_0 0a9a e24e | N | Load 0x1,0x4e 0a9b 01d5 | | Execute Vector,Field_Reference 0a9c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a9d 0e01 | | Execute_Immediate Not_Equal,0x1 0a9e 7005 |p | Jump_Nonzero 0xaa4 0a9f 00d8 | | Load_Top At_Offset_0 0aa0 e24e | N | Load 0x1,0x4e 0aa1 01d5 | | Execute Vector,Field_Reference 0aa2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0aa3 680f |h | Jump_Zero 0xab3 0aa4 00e2 | | Load_Encached Integer_Cache 0aa5 00d9 | | Load_Top At_Offset_1 0aa6 4802 |H | Short_Literal 0x2 0aa7 e26b | k | Load 0x1,0x6b 0aa8 171e | | Execute Task,Entry_Call,Field_Number 0x1e 0aa9 c407 | | Store 0x2,0x7 0aaa e407 | | Load 0x2,0x7 0aab e01e | | Load 0x0,0x1e 0aac 027e | ~ | Execute Discrete,Not_Equal 0aad 680a |h | Jump_Zero 0xab8 0aae e407 | | Load 0x2,0x7 0aaf 8408 | | Call 0x2,0x8 0ab0 00d8 | | Load_Top At_Offset_0 0ab1 8410 | | Call 0x2,0x10 0ab2 7805 |x | Jump 0xab8 0ab3 00d8 | | Load_Top At_Offset_0 0ab4 e24e | N | Load 0x1,0x4e 0ab5 01d5 | | Execute Vector,Field_Reference 0ab6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ab7 8408 | | Call 0x2,0x8 0ab8 00c8 | | Action Pop_Auxiliary_Range 0ab9 3fb5 |? | Loop_Increasing 0xa6f 0aba 00c9 | | Action Pop_Auxiliary_Loop 0abb e253 | S | Load 0x1,0x53 0abc 4801 |H | Short_Literal 0x1 0abd 0263 | c | Execute Discrete,Above_Bound 0abe 7051 |pQ | Jump_Nonzero 0xb10 0abf 00d8 | | Load_Top At_Offset_0 0ac0 e252 | R | Load 0x1,0x52 0ac1 01d5 | | Execute Vector,Field_Reference 0ac2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ac3 e5fc | | Load 0x2,-0x4 0ac4 027f | | Execute Discrete,Equal 0ac5 6848 |hH | Jump_Zero 0xb0e 0ac6 e5ff | | Load 0x2,-0x1 0ac7 00d9 | | Load_Top At_Offset_1 0ac8 e252 | R | Load 0x1,0x52 0ac9 01d5 | | Execute Vector,Field_Reference 0aca 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0acb 027f | | Execute Discrete,Equal 0acc 6841 |hA | Jump_Zero 0xb0e 0acd 00d8 | | Load_Top At_Offset_0 0ace e252 | R | Load 0x1,0x52 0acf 01d5 | | Execute Vector,Field_Reference 0ad0 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ad1 e05c | \ | Load 0x0,0x5c 0ad2 017f | | Execute Record,Equal 0ad3 7008 |p | Jump_Nonzero 0xadc 0ad4 e405 | | Load 0x2,0x5 0ad5 805d | ] | Call 0x0,0x5d 0ad6 00d9 | | Load_Top At_Offset_1 0ad7 e252 | R | Load 0x1,0x52 0ad8 01d5 | | Execute Vector,Field_Reference 0ad9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ada 8278 | x | Call 0x1,0x78 0adb 6832 |h2 | Jump_Zero 0xb0e 0adc e406 | | Load 0x2,0x6 0add 7007 |p | Jump_Nonzero 0xae5 0ade 00d8 | | Load_Top At_Offset_0 0adf e252 | R | Load 0x1,0x52 0ae0 01d5 | | Execute Vector,Field_Reference 0ae1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0ae2 e5fd | | Load 0x2,-0x3 0ae3 027f | | Execute Discrete,Equal 0ae4 6829 |h) | Jump_Zero 0xb0e 0ae5 00d8 | | Load_Top At_Offset_0 0ae6 e252 | R | Load 0x1,0x52 0ae7 01d5 | | Execute Vector,Field_Reference 0ae8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ae9 0f01 | | Execute_Immediate Equal,0x1 0aea 681a |h | Jump_Zero 0xb05 0aeb 00d8 | | Load_Top At_Offset_0 0aec e252 | R | Load 0x1,0x52 0aed 01d5 | | Execute Vector,Field_Reference 0aee 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0aef a404 | | Store_Unchecked 0x2,0x4 0af0 00d8 | | Load_Top At_Offset_0 0af1 e252 | R | Load 0x1,0x52 0af2 01d5 | | Execute Vector,Field_Reference 0af3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0af4 6805 |h | Jump_Zero 0xafa 0af5 e404 | | Load 0x2,0x4 0af6 4801 |H | Short_Literal 0x1 0af7 e26b | k | Load 0x1,0x6b 0af8 171c | | Execute Task,Entry_Call,Field_Number 0x1c 0af9 7808 |x | Jump 0xb02 0afa 00d8 | | Load_Top At_Offset_0 0afb e252 | R | Load 0x1,0x52 0afc 01d5 | | Execute Vector,Field_Reference 0afd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0afe 00d9 | | Load_Top At_Offset_1 0aff e252 | R | Load 0x1,0x52 0b00 01d5 | | Execute Vector,Field_Reference 0b01 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b02 e404 | | Load 0x2,0x4 0b03 8408 | | Call 0x2,0x8 0b04 7809 |x | Jump 0xb0e 0b05 00d8 | | Load_Top At_Offset_0 0b06 e252 | R | Load 0x1,0x52 0b07 01d5 | | Execute Vector,Field_Reference 0b08 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b09 0aff | | Execute_Immediate Plus,-0x1 0b0a 00d9 | | Load_Top At_Offset_1 0b0b e252 | R | Load 0x1,0x52 0b0c 01d5 | | Execute Vector,Field_Reference 0b0d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b0e 00c8 | | Action Pop_Auxiliary_Range 0b0f 3faf |? | Loop_Increasing 0xabf 0b10 00ce | | Action Pop_Auxiliary 0b11 e240 | @ | Load 0x1,0x40 0b12 6805 |h | Jump_Zero 0xb18 0b13 e5fc | | Load 0x2,-0x4 0b14 805e | ^ | Call 0x0,0x5e 0b15 6802 |h | Jump_Zero 0xb18 0b16 e241 | A | Load 0x1,0x41 0b17 8408 | | Call 0x2,0x8 0b18 e242 | B | Load 0x1,0x42 0b19 e5ff | | Load 0x2,-0x1 0b1a 027f | | Execute Discrete,Equal 0b1b 681e |h | Jump_Zero 0xb3a 0b1c e5fe | | Load 0x2,-0x2 0b1d e004 | | Load 0x0,0x4 0b1e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0b1f e244 | D | Load 0x1,0x44 0b20 027c | | | Execute Discrete,Less 0b21 6818 |h | Jump_Zero 0xb3a 0b22 e5fc | | Load 0x2,-0x4 0b23 805e | ^ | Call 0x0,0x5e 0b24 6815 |h | Jump_Zero 0xb3a 0b25 e5fd | | Load 0x2,-0x3 0b26 e245 | E | Load 0x1,0x45 0b27 027f | | Execute Discrete,Equal 0b28 7002 |p | Jump_Nonzero 0xb2b 0b29 e406 | | Load 0x2,0x6 0b2a 680f |h | Jump_Zero 0xb3a 0b2b e243 | C | Load 0x1,0x43 0b2c 0f01 | | Execute_Immediate Equal,0x1 0b2d 6809 |h | Jump_Zero 0xb37 0b2e e011 | | Load 0x0,0x11 0b2f a242 | B | Store_Unchecked 0x1,0x42 0b30 e245 | E | Load 0x1,0x45 0b31 8408 | | Call 0x2,0x8 0b32 e5ff | | Load 0x2,-0x1 0b33 4801 |H | Short_Literal 0x1 0b34 e26b | k | Load 0x1,0x6b 0b35 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0b36 7803 |x | Jump 0xb3a 0b37 e243 | C | Load 0x1,0x43 0b38 0aff | | Execute_Immediate Plus,-0x1 0b39 c243 | C | Store 0x1,0x43 0b3a e5ff | | Load 0x2,-0x1 0b3b e246 | F | Load 0x1,0x46 0b3c 027f | | Execute Discrete,Equal 0b3d 6815 |h | Jump_Zero 0xb53 0b3e e5fd | | Load 0x2,-0x3 0b3f e248 | H | Load 0x1,0x48 0b40 027f | | Execute Discrete,Equal 0b41 7002 |p | Jump_Nonzero 0xb44 0b42 e406 | | Load 0x2,0x6 0b43 680f |h | Jump_Zero 0xb53 0b44 e247 | G | Load 0x1,0x47 0b45 0f01 | | Execute_Immediate Equal,0x1 0b46 6809 |h | Jump_Zero 0xb50 0b47 e011 | | Load 0x0,0x11 0b48 a246 | F | Store_Unchecked 0x1,0x46 0b49 e248 | H | Load 0x1,0x48 0b4a 8408 | | Call 0x2,0x8 0b4b e5ff | | Load 0x2,-0x1 0b4c 4801 |H | Short_Literal 0x1 0b4d e26b | k | Load 0x1,0x6b 0b4e 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0b4f 7803 |x | Jump 0xb53 0b50 e247 | G | Load 0x1,0x47 0b51 0aff | | Execute_Immediate Plus,-0x1 0b52 c247 | G | Store 0x1,0x47 0b53 e024 | $ | Load 0x0,0x24 0b54 e5ff | | Load 0x2,-0x1 0b55 e40b | | Load 0x2,0xb 0b56 480c |H | Short_Literal 0xc 0b57 4802 |H | Short_Literal 0x2 0b58 0099 | | Action Reference_Dynamic 0b59 e40d | | Load 0x2,0xd 0b5a 480e |H | Short_Literal 0xe 0b5b 4802 |H | Short_Literal 0x2 0b5c 0099 | | Action Reference_Dynamic 0b5d 8013 | | Call 0x0,0x13 0b5e c024 | $ | Store 0x0,0x24 0b5f e405 | | Load 0x2,0x5 0b60 e403 | | Load 0x2,0x3 0b61 e402 | | Load 0x2,0x2 0b62 e5ff | | Load 0x2,-0x1 0b63 805f | _ | Call 0x0,0x5f 0b64 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0b65 TRAP_0a30: 0b65 0007 | | Action Break_Optional 0b66 8411 | | Call 0x2,0x11 0b67 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0b68 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 0b6c 0000 0000 | | .BLANK 0000[0x4] 0b70 ; -------------------------------------------------------------------------------------- 0b70 ; SUBPROGRAM 0b70 ; -------------------------------------------------------------------------------------- 0b70 0b76 | v | .CONST 0x0b76 ; Address of begin 0b71 0b82 | | .CONST 0x0b82 ; Address of exception handler 0b72 0003 | | .CONST 0x0003 ; Number of locals 0b73 INIT_0b70: 0b73 00e1 | | Load_Encached Boolean_Cache 0b74 029f 102b | +| Declare_Subprogram INIT_1028,For_Call 0b76 BODY_0b70: 0b76 00e1 | | Load_Encached Boolean_Cache 0b77 e5fd | | Load 0x2,-0x3 0b78 e5fe | | Load 0x2,-0x2 0b79 e5ff | | Load 0x2,-0x1 0b7a 4804 |H | Short_Literal 0x4 0b7b e275 | u | Load 0x1,0x75 0b7c 170d | | Execute Task,Entry_Call,Field_Number 0xd 0b7d 005a | Z | Store_Top Discrete,At_Offset_2 0b7e 00d9 | | Load_Top At_Offset_1 0b7f 6801 |h | Jump_Zero 0xb81 0b80 8403 | | Call 0x2,0x3 0b81 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0b82 TRAP_0b70: 0b82 0007 | | Action Break_Optional 0b83 0092 125b | [| Action Push_String_Extended,0x125b ; "Creation_Register:" 0b85 e03a | : | Load 0x0,0x3a 0b86 180d | | Execute Package,Field_Execute,Field_Number 0xd 0b87 01cc | | Execute Vector,Catenate 0b88 803b | ; | Call 0x0,0x3b 0b89 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0b8a 0000 0000 | | .BLANK 0000[0x6] 0b90 ; -------------------------------------------------------------------------------------- 0b90 ; SUBPROGRAM 0b90 ; -------------------------------------------------------------------------------------- 0b90 0b95 | | .CONST 0x0b95 ; Address of begin 0b91 0004 | | .CONST 0x0004 ; Address of exception handler 0b92 0002 | | .CONST 0x0002 ; Number of locals 0b93 INIT_0b90: 0b93 e004 | | Load 0x0,0x4 0b94 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0b95 BODY_0b90: 0b95 e004 | | Load 0x0,0x4 0b96 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51 0b97 00e3 | | Load_Encached Natural_Cache 0b98 e004 | | Load 0x0,0x4 0b99 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0b9a e004 | | Load 0x0,0x4 0b9b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b9c e004 | | Load 0x0,0x4 0b9d 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0b9e e5ff | | Load 0x2,-0x1 0b9f 0a02 | | Execute_Immediate Plus,0x2 0ba0 00d8 | | Load_Top At_Offset_0 0ba1 00e3 | | Load_Encached Natural_Cache 0ba2 0260 | ` | Execute Discrete,In_Type 0ba3 7001 |p | Jump_Nonzero 0xba5 0ba4 0801 | | Execute_Immediate Raise,0x1 0ba5 e01c | | Load 0x0,0x1c 0ba6 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0ba7 e004 | | Load 0x0,0x4 0ba8 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0ba9 e01c | | Load 0x0,0x1c 0baa 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0bab e004 | | Load 0x0,0x4 0bac 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0bad c402 | | Store 0x2,0x2 0bae c235 | 5 | Store 0x1,0x35 0baf c232 | 2 | Store 0x1,0x32 0bb0 c233 | 3 | Store 0x1,0x33 0bb1 c234 | 4 | Store 0x1,0x34 0bb2 00d8 | | Load_Top At_Offset_0 0bb3 e004 | | Load 0x0,0x4 0bb4 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0bb5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bb6 0000 0000 | | .XXX[0x2] 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 ; SUBPROGRAM 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 0bbf | | .CONST 0x0bbf ; Address of begin 0bb9 0004 | | .CONST 0x0004 ; Address of exception handler 0bba 0002 | | .CONST 0x0002 ; Number of locals 0bbb INIT_0bb8: 0bbb e039 | 9 | Load 0x0,0x39 0bbc 0322 | " | Declare_Variable Record 0bbd 00d8 | | Load_Top At_Offset_0 0bbe 1c00 | | Execute_Immediate Run_Utility,0x0 0bbf BODY_0bb8: 0bbf 00d8 | | Load_Top At_Offset_0 0bc0 e5fe | | Load 0x2,-0x2 0bc1 803c | < | Call 0x0,0x3c 0bc2 00d1 | | Pop_Control Pop_Count_1 0bc3 00d8 | | Load_Top At_Offset_0 0bc4 8056 | V | Call 0x0,0x56 0bc5 00d1 | | Pop_Control Pop_Count_1 0bc6 00d8 | | Load_Top At_Offset_0 0bc7 e5ff | | Load 0x2,-0x1 0bc8 0a01 | | Execute_Immediate Plus,0x1 0bc9 00d8 | | Load_Top At_Offset_0 0bca 00e3 | | Load_Encached Natural_Cache 0bcb 0260 | ` | Execute Discrete,In_Type 0bcc 7001 |p | Jump_Nonzero 0xbce 0bcd 0801 | | Execute_Immediate Raise,0x1 0bce 827f | | Call 0x1,0x7f 0bcf 803d | = | Call 0x0,0x3d 0bd0 00d1 | | Pop_Control Pop_Count_1 0bd1 00d8 | | Load_Top At_Offset_0 0bd2 8057 | W | Call 0x0,0x57 0bd3 00d1 | | Pop_Control Pop_Count_1 0bd4 00d8 | | Load_Top At_Offset_0 0bd5 805d | ] | Call 0x0,0x5d 0bd6 e5fd | | Load 0x2,-0x3 0bd7 017d | } | Execute Record,Structure_Write 0bd8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0bd9 0000 0000 | | .BLANK 0000[0x7] 0be0 ; -------------------------------------------------------------------------------------- 0be0 ; SUBPROGRAM 0be0 ; -------------------------------------------------------------------------------------- 0be0 0be5 | | .CONST 0x0be5 ; Address of begin 0be1 0004 | | .CONST 0x0004 ; Address of exception handler 0be2 0002 | | .CONST 0x0002 ; Number of locals 0be3 INIT_0be0: 0be3 029f 104b | K| Declare_Subprogram INIT_1048,For_Call 0be5 BODY_0be0: 0be5 e5fe | | Load 0x2,-0x2 0be6 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0be7 6805 |h | Jump_Zero 0xbed 0be8 e5fd | | Load 0x2,-0x3 0be9 805e | ^ | Call 0x0,0x5e 0bea 6802 |h | Jump_Zero 0xbed 0beb 4801 |H | Short_Literal 0x1 0bec 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0bed e5fe | | Load 0x2,-0x2 0bee 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0bef 6812 |h | Jump_Zero 0xc02 0bf0 e5fe | | Load 0x2,-0x2 0bf1 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0bf2 601d |` | Indirect_Literal Discrete,0xc10,{0x00000000, 0x000fffff} 0bf3 027e | ~ | Execute Discrete,Not_Equal 0bf4 7008 |p | Jump_Nonzero 0xbfd 0bf5 4803 |H | Short_Literal 0x3 0bf6 827f | | Call 0x1,0x7f 0bf7 e004 | | Load 0x0,0x4 0bf8 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0bf9 e5fe | | Load 0x2,-0x2 0bfa 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0bfb 027c | | | Execute Discrete,Less 0bfc 6805 |h | Jump_Zero 0xc02 0bfd e5fd | | Load 0x2,-0x3 0bfe 805e | ^ | Call 0x0,0x5e 0bff 6802 |h | Jump_Zero 0xc02 0c00 4801 |H | Short_Literal 0x1 0c01 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c02 e5fe | | Load 0x2,-0x2 0c03 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0c04 6809 |h | Jump_Zero 0xc0e 0c05 00cf | | Action Mark_Auxiliary 0c06 e258 | X | Load 0x1,0x58 0c07 4801 |H | Short_Literal 0x1 0c08 0263 | c | Execute Discrete,Above_Bound 0c09 7003 |p | Jump_Nonzero 0xc0d 0c0a 8402 | | Call 0x2,0x2 0c0b 00c8 | | Action Pop_Auxiliary_Range 0c0c 3ffd |? | Loop_Increasing 0xc0a 0c0d 00ce | | Action Pop_Auxiliary 0c0e 4800 |H | Short_Literal 0x0 0c0f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c10 0000 0000 | | .LITERAL {0x00000000, 0x000fffff} 0c14 0000 0000 | | .BLANK 0000[0x4] 0c18 ; -------------------------------------------------------------------------------------- 0c18 ; SUBPROGRAM 0c18 ; -------------------------------------------------------------------------------------- 0c18 0c1b | | .CONST 0x0c1b ; Address of begin 0c19 0004 | | .CONST 0x0004 ; Address of exception handler 0c1a 0001 | | .CONST 0x0001 ; Number of locals 0c1b BODY_0c18: 0c1b INIT_0c18: 0c1b e5fd | | Load 0x2,-0x3 0c1c e004 | | Load 0x0,0x4 0c1d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c1e 00d9 | | Load_Top At_Offset_1 0c1f 00d0 | | Action Swap_Control 0c20 0260 | ` | Execute Discrete,In_Type 0c21 7001 |p | Jump_Nonzero 0xc23 0c22 0801 | | Execute_Immediate Raise,0x1 0c23 e5fe | | Load 0x2,-0x2 0c24 e5ff | | Load 0x2,-0x1 0c25 e025 | % | Load 0x0,0x25 0c26 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0c27 00d9 | | Load_Top At_Offset_1 0c28 00d0 | | Action Swap_Control 0c29 0260 | ` | Execute Discrete,In_Type 0c2a 7001 |p | Jump_Nonzero 0xc2c 0c2b 0801 | | Execute_Immediate Raise,0x1 0c2c 8281 | | Call 0x1,0x81 0c2d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0c2e 0000 0000 | | .XXX[0x2] 0c30 ; -------------------------------------------------------------------------------------- 0c30 ; SUBPROGRAM 0c30 ; -------------------------------------------------------------------------------------- 0c30 0c36 | 6 | .CONST 0x0c36 ; Address of begin 0c31 0004 | | .CONST 0x0004 ; Address of exception handler 0c32 0002 | | .CONST 0x0002 ; Number of locals 0c33 INIT_0c30: 0c33 e004 | | Load 0x0,0x4 0c34 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a 0c35 0322 | " | Declare_Variable Record 0c36 BODY_0c30: 0c36 00db | | Load_Top At_Offset_3 0c37 e004 | | Load 0x0,0x4 0c38 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0c39 0a01 | | Execute_Immediate Plus,0x1 0c3a e004 | | Load 0x0,0x4 0c3b 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0c3c 00d9 | | Load_Top At_Offset_1 0c3d 00d0 | | Action Swap_Control 0c3e 0260 | ` | Execute Discrete,In_Type 0c3f 7001 |p | Jump_Nonzero 0xc41 0c40 0801 | | Execute_Immediate Raise,0x1 0c41 e5ff | | Load 0x2,-0x1 0c42 e004 | | Load 0x0,0x4 0c43 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0c44 e01c | | Load 0x0,0x1c 0c45 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0c46 e004 | | Load 0x0,0x4 0c47 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 0c48 00d9 | | Load_Top At_Offset_1 0c49 017d | } | Execute Record,Structure_Write 0c4a 4822 |H" | Short_Literal 0x22 0c4b 00d9 | | Load_Top At_Offset_1 0c4c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c4d e01c | | Load 0x0,0x1c 0c4e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c4f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c50 ; -------------------------------------------------------------------------------------- 0c50 ; SUBPROGRAM 0c50 ; -------------------------------------------------------------------------------------- 0c50 0c53 | S | .CONST 0x0c53 ; Address of begin 0c51 0c58 | X | .CONST 0x0c58 ; Address of exception handler 0c52 0001 | | .CONST 0x0001 ; Number of locals 0c53 BODY_0c50: 0c53 INIT_0c50: 0c53 e403 | | Load 0x2,0x3 0c54 00d8 | | Load_Top At_Offset_0 0c55 e004 | | Load 0x0,0x4 0c56 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0c57 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c58 TRAP_0c50: 0c58 0007 | | Action Break_Optional 0c59 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c5a 0000 0000 | | .BLANK 0000[0x6] 0c60 ; -------------------------------------------------------------------------------------- 0c60 ; SUBPROGRAM 0c60 ; -------------------------------------------------------------------------------------- 0c60 0c63 | c | .CONST 0x0c63 ; Address of begin 0c61 0004 | | .CONST 0x0004 ; Address of exception handler 0c62 0001 | | .CONST 0x0001 ; Number of locals 0c63 BODY_0c60: 0c63 INIT_0c60: 0c63 00da | | Load_Top At_Offset_2 0c64 00d8 | | Load_Top At_Offset_0 0c65 00e2 | | Load_Encached Integer_Cache 0c66 0260 | ` | Execute Discrete,In_Type 0c67 7001 |p | Jump_Nonzero 0xc69 0c68 0801 | | Execute_Immediate Raise,0x1 0c69 00e0 | | Load_Encached Standard_Cache 0c6a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c6b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c6c 0000 0000 | | .BLANK 0000[0x4] 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 e05c | \ | Load 0x0,0x5c 0c75 017f | | Execute Record,Equal 0c76 6803 |h | Jump_Zero 0xc7a 0c77 0092 125c | \| Action Push_String_Extended,0x125c ; " [any inst]" 0c79 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c7a 0092 125d | ]| Action Push_String_Extended,0x125d ; " [" 0c7c 00db | | Load_Top At_Offset_3 0c7d 8060 | ` | Call 0x0,0x60 0c7e 01cc | | Execute Vector,Catenate 0c7f 0092 125e | ^| Action Push_String_Extended,0x125e ; "]" 0c81 01cc | | Execute Vector,Catenate 0c82 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c83 0000 0000 | | .BLANK 0000[0x5] 0c88 ; -------------------------------------------------------------------------------------- 0c88 ; SUBPROGRAM 0c88 ; -------------------------------------------------------------------------------------- 0c88 0c8b | | .CONST 0x0c8b ; Address of begin 0c89 0004 | | .CONST 0x0004 ; Address of exception handler 0c8a 0001 | | .CONST 0x0001 ; Number of locals 0c8b BODY_0c88: 0c8b INIT_0c88: 0c8b 00da | | Load_Top At_Offset_2 0c8c e061 | a | Load 0x0,0x61 0c8d 017f | | Execute Record,Equal 0c8e 6803 |h | Jump_Zero 0xc92 0c8f 0092 125f | _| Action Push_String_Extended,0x125f ; " [any sub]" 0c91 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c92 0092 125d | ]| Action Push_String_Extended,0x125d ; " [" 0c94 00db | | Load_Top At_Offset_3 0c95 8062 | b | Call 0x0,0x62 0c96 01cc | | Execute Vector,Catenate 0c97 0092 125e | ^| Action Push_String_Extended,0x125e ; "]" 0c99 01cc | | Execute Vector,Catenate 0c9a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c9b 0000 0000 | | .BLANK 0000[0x5] 0ca0 ; -------------------------------------------------------------------------------------- 0ca0 ; SUBPROGRAM 0ca0 ; -------------------------------------------------------------------------------------- 0ca0 0ca3 | | .CONST 0x0ca3 ; Address of begin 0ca1 0004 | | .CONST 0x0004 ; Address of exception handler 0ca2 0001 | | .CONST 0x0001 ; Number of locals 0ca3 BODY_0ca0: 0ca3 INIT_0ca0: 0ca3 00da | | Load_Top At_Offset_2 0ca4 e063 | c | Load 0x0,0x63 0ca5 027f | | Execute Discrete,Equal 0ca6 6803 |h | Jump_Zero 0xcaa 0ca7 0092 1260 | `| Action Push_String_Extended,0x1260 ; " [any stmt]" 0ca9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0caa 0092 125d | ]| Action Push_String_Extended,0x125d ; " [" 0cac 00db | | Load_Top At_Offset_3 0cad 8064 | d | Call 0x0,0x64 0cae 01cc | | Execute Vector,Catenate 0caf 0092 125e | ^| Action Push_String_Extended,0x125e ; "]" 0cb1 01cc | | Execute Vector,Catenate 0cb2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cb3 0000 0000 | | .BLANK 0000[0x5] 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 ; SUBPROGRAM 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 0cbb | | .CONST 0x0cbb ; Address of begin 0cb9 0004 | | .CONST 0x0004 ; Address of exception handler 0cba 0001 | | .CONST 0x0001 ; Number of locals 0cbb BODY_0cb8: 0cbb INIT_0cb8: 0cbb 00db | | Load_Top At_Offset_3 0cbc 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0cbd 7009 |p | Jump_Nonzero 0xcc7 0cbe 00db | | Load_Top At_Offset_3 0cbf 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0cc0 7006 |p | Jump_Nonzero 0xcc7 0cc1 00db | | Load_Top At_Offset_3 0cc2 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0cc3 7003 |p | Jump_Nonzero 0xcc7 0cc4 00db | | Load_Top At_Offset_3 0cc5 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0cc6 683c |h< | Jump_Zero 0xd03 0cc7 00da | | Load_Top At_Offset_2 0cc8 804d | M | Call 0x0,0x4d 0cc9 0092 1261 | a| Action Push_String_Extended,0x1261 ; ": " 0ccb 01cc | | Execute Vector,Catenate 0ccc 8048 | H | Call 0x0,0x48 0ccd 00db | | Load_Top At_Offset_3 0cce 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0ccf 6803 |h | Jump_Zero 0xcd3 0cd0 0092 1262 | b| Action Push_String_Extended,0x1262 ; " Tracing" 0cd2 8048 | H | Call 0x0,0x48 0cd3 00db | | Load_Top At_Offset_3 0cd4 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0cd5 6803 |h | Jump_Zero 0xcd9 0cd6 0092 1263 | c| Action Push_String_Extended,0x1263 ; " Exc Tracing" 0cd8 8048 | H | Call 0x0,0x48 0cd9 00db | | Load_Top At_Offset_3 0cda 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0cdb 6808 |h | Jump_Zero 0xce4 0cdc 0092 1264 | d| Action Push_String_Extended,0x1264 ; " Stop, action=" 0cde e7fe | | Load 0x3,-0x2 0cdf 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0ce0 00e0 | | Load_Encached Standard_Cache 0ce1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ce2 01cc | | Execute Vector,Catenate 0ce3 8048 | H | Call 0x0,0x48 0ce4 00db | | Load_Top At_Offset_3 0ce5 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0ce6 681b |h | Jump_Zero 0xd02 0ce7 0092 1265 | e| Action Push_String_Extended,0x1265 ; " Stepping: " 0ce9 e7fe | | Load 0x3,-0x2 0cea 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0ceb 00e0 | | Load_Encached Standard_Cache 0cec 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ced 01cc | | Execute Vector,Catenate 0cee 0092 1266 | f| Action Push_String_Extended,0x1266 ; " level=#" 0cf0 01cc | | Execute Vector,Catenate 0cf1 4820 |H | Short_Literal 0x20 0cf2 4800 |H | Short_Literal 0x0 0cf3 4810 |H | Short_Literal 0x10 0cf4 e7fe | | Load 0x3,-0x2 0cf5 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0cf6 e04e | N | Load 0x0,0x4e 0cf7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0cf8 01cc | | Execute Vector,Catenate 0cf9 0092 1267 | g| Action Push_String_Extended,0x1267 ; " action=" 0cfb 01cc | | Execute Vector,Catenate 0cfc e7fe | | Load 0x3,-0x2 0cfd 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0cfe 00e0 | | Load_Encached Standard_Cache 0cff 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d00 01cc | | Execute Vector,Catenate 0d01 8048 | H | Call 0x0,0x48 0d02 8049 | I | Call 0x0,0x49 0d03 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d04 0000 0000 | | .BLANK 0000[0x4] 0d08 ; -------------------------------------------------------------------------------------- 0d08 ; SUBPROGRAM 0d08 ; -------------------------------------------------------------------------------------- 0d08 0d0b | | .CONST 0x0d0b ; Address of begin 0d09 0004 | | .CONST 0x0004 ; Address of exception handler 0d0a 0001 | | .CONST 0x0001 ; Number of locals 0d0b BODY_0d08: 0d0b INIT_0d08: 0d0b 00da | | Load_Top At_Offset_2 0d0c 804d | M | Call 0x0,0x4d 0d0d 0092 1268 | h| Action Push_String_Extended,0x1268 ; " DB mask= " 0d0f 01cc | | Execute Vector,Catenate 0d10 4820 |H | Short_Literal 0x20 0d11 4800 |H | Short_Literal 0x0 0d12 4810 |H | Short_Literal 0x10 0d13 e7fe | | Load 0x3,-0x2 0d14 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d15 e04e | N | Load 0x0,0x4e 0d16 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0d17 01cc | | Execute Vector,Catenate 0d18 8048 | H | Call 0x0,0x48 0d19 8049 | I | Call 0x0,0x49 0d1a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d1b 0000 0000 | | .BLANK 0000[0x5] 0d20 ; -------------------------------------------------------------------------------------- 0d20 ; SUBPROGRAM 0d20 ; -------------------------------------------------------------------------------------- 0d20 0d23 | # | .CONST 0x0d23 ; Address of begin 0d21 0004 | | .CONST 0x0004 ; Address of exception handler 0d22 0001 | | .CONST 0x0001 ; Number of locals 0d23 BODY_0d20: 0d23 INIT_0d20: 0d23 00da | | Load_Top At_Offset_2 0d24 804d | M | Call 0x0,0x4d 0d25 0092 1269 | i| Action Push_String_Extended,0x1269 ; " exc info:" 0d27 01cc | | Execute Vector,Catenate 0d28 e7fe | | Load 0x3,-0x2 0d29 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0d2a e01c | | Load 0x0,0x1c 0d2b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d2c 01cc | | Execute Vector,Catenate 0d2d 0092 126a | j| Action Push_String_Extended,0x126a ; " " 0d2f 01cc | | Execute Vector,Catenate 0d30 e7fe | | Load 0x3,-0x2 0d31 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0d32 e01c | | Load 0x0,0x1c 0d33 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d34 01cc | | Execute Vector,Catenate 0d35 8048 | H | Call 0x0,0x48 0d36 8049 | I | Call 0x0,0x49 0d37 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d38 ; -------------------------------------------------------------------------------------- 0d38 ; SUBPROGRAM 0d38 ; -------------------------------------------------------------------------------------- 0d38 0d3b | ; | .CONST 0x0d3b ; Address of begin 0d39 0004 | | .CONST 0x0004 ; Address of exception handler 0d3a 0001 | | .CONST 0x0001 ; Number of locals 0d3b BODY_0d38: 0d3b INIT_0d38: 0d3b e7fd | | Load 0x3,-0x3 0d3c 00e2 | | Load_Encached Integer_Cache 0d3d 025e | ^ | Execute Discrete,Convert 0d3e e7fe | | Load 0x3,-0x2 0d3f e7ff | | Load 0x3,-0x1 0d40 e025 | % | Load 0x0,0x25 0d41 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d42 00d9 | | Load_Top At_Offset_1 0d43 00d0 | | Action Swap_Control 0d44 0260 | ` | Execute Discrete,In_Type 0d45 7001 |p | Jump_Nonzero 0xd47 0d46 0801 | | Execute_Immediate Raise,0x1 0d47 8406 | | Call 0x2,0x6 0d48 00d1 | | Pop_Control Pop_Count_1 0d49 c7fd | | Store 0x3,-0x3 0d4a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d4b 0000 0000 | | .BLANK 0000[0x5] 0d50 ; -------------------------------------------------------------------------------------- 0d50 ; SUBPROGRAM 0d50 ; -------------------------------------------------------------------------------------- 0d50 0d53 | S | .CONST 0x0d53 ; Address of begin 0d51 0004 | | .CONST 0x0004 ; Address of exception handler 0d52 0001 | | .CONST 0x0001 ; Number of locals 0d53 BODY_0d50: 0d53 INIT_0d50: 0d53 e7fd | | Load 0x3,-0x3 0d54 00d8 | | Load_Top At_Offset_0 0d55 00e2 | | Load_Encached Integer_Cache 0d56 0260 | ` | Execute Discrete,In_Type 0d57 7001 |p | Jump_Nonzero 0xd59 0d58 0801 | | Execute_Immediate Raise,0x1 0d59 e7fe | | Load 0x3,-0x2 0d5a e7ff | | Load 0x3,-0x1 0d5b e025 | % | Load 0x0,0x25 0d5c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d5d 00d9 | | Load_Top At_Offset_1 0d5e 00d0 | | Action Swap_Control 0d5f 0260 | ` | Execute Discrete,In_Type 0d60 7001 |p | Jump_Nonzero 0xd62 0d61 0801 | | Execute_Immediate Raise,0x1 0d62 8065 | e | Call 0x0,0x65 0d63 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0d64 0000 0000 | | .BLANK 0000[0x4] 0d68 ; -------------------------------------------------------------------------------------- 0d68 ; SUBPROGRAM 0d68 ; -------------------------------------------------------------------------------------- 0d68 0d6b | k | .CONST 0x0d6b ; Address of begin 0d69 0004 | | .CONST 0x0004 ; Address of exception handler 0d6a 0001 | | .CONST 0x0001 ; Number of locals 0d6b BODY_0d68: 0d6b INIT_0d68: 0d6b e7fd | | Load 0x3,-0x3 0d6c 00e2 | | Load_Encached Integer_Cache 0d6d 025e | ^ | Execute Discrete,Convert 0d6e e7fe | | Load 0x3,-0x2 0d6f e7ff | | Load 0x3,-0x1 0d70 e025 | % | Load 0x0,0x25 0d71 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d72 00d9 | | Load_Top At_Offset_1 0d73 00d0 | | Action Swap_Control 0d74 0260 | ` | Execute Discrete,In_Type 0d75 7001 |p | Jump_Nonzero 0xd77 0d76 0801 | | Execute_Immediate Raise,0x1 0d77 8407 | | Call 0x2,0x7 0d78 00d1 | | Pop_Control Pop_Count_1 0d79 c7fd | | Store 0x3,-0x3 0d7a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d7b 0000 0000 | | .BLANK 0000[0x5] 0d80 ; -------------------------------------------------------------------------------------- 0d80 ; SUBPROGRAM 0d80 ; -------------------------------------------------------------------------------------- 0d80 0d83 | | .CONST 0x0d83 ; Address of begin 0d81 0004 | | .CONST 0x0004 ; Address of exception handler 0d82 0001 | | .CONST 0x0001 ; Number of locals 0d83 BODY_0d80: 0d83 INIT_0d80: 0d83 e7fd | | Load 0x3,-0x3 0d84 00d8 | | Load_Top At_Offset_0 0d85 00e2 | | Load_Encached Integer_Cache 0d86 0260 | ` | Execute Discrete,In_Type 0d87 7001 |p | Jump_Nonzero 0xd89 0d88 0801 | | Execute_Immediate Raise,0x1 0d89 e7fe | | Load 0x3,-0x2 0d8a e7ff | | Load 0x3,-0x1 0d8b e025 | % | Load 0x0,0x25 0d8c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d8d 00d9 | | Load_Top At_Offset_1 0d8e 00d0 | | Action Swap_Control 0d8f 0260 | ` | Execute Discrete,In_Type 0d90 7001 |p | Jump_Nonzero 0xd92 0d91 0801 | | Execute_Immediate Raise,0x1 0d92 8065 | e | Call 0x0,0x65 0d93 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0d94 0000 0000 | | .BLANK 0000[0x4] 0d98 ; -------------------------------------------------------------------------------------- 0d98 ; SUBPROGRAM 0d98 ; -------------------------------------------------------------------------------------- 0d98 0d9b | | .CONST 0x0d9b ; Address of begin 0d99 0004 | | .CONST 0x0004 ; Address of exception handler 0d9a 0001 | | .CONST 0x0001 ; Number of locals 0d9b BODY_0d98: 0d9b INIT_0d98: 0d9b e7fd | | Load 0x3,-0x3 0d9c 00e2 | | Load_Encached Integer_Cache 0d9d 025e | ^ | Execute Discrete,Convert 0d9e e7fe | | Load 0x3,-0x2 0d9f e7ff | | Load 0x3,-0x1 0da0 e025 | % | Load 0x0,0x25 0da1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0da2 00d9 | | Load_Top At_Offset_1 0da3 00d0 | | Action Swap_Control 0da4 0260 | ` | Execute Discrete,In_Type 0da5 7001 |p | Jump_Nonzero 0xda7 0da6 0801 | | Execute_Immediate Raise,0x1 0da7 8408 | | Call 0x2,0x8 0da8 00d1 | | Pop_Control Pop_Count_1 0da9 c7fd | | Store 0x3,-0x3 0daa 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0dab 0000 0000 | | .BLANK 0000[0x5] 0db0 ; -------------------------------------------------------------------------------------- 0db0 ; SUBPROGRAM 0db0 ; -------------------------------------------------------------------------------------- 0db0 0db3 | | .CONST 0x0db3 ; Address of begin 0db1 0004 | | .CONST 0x0004 ; Address of exception handler 0db2 0001 | | .CONST 0x0001 ; Number of locals 0db3 BODY_0db0: 0db3 INIT_0db0: 0db3 e7fd | | Load 0x3,-0x3 0db4 00d8 | | Load_Top At_Offset_0 0db5 00e2 | | Load_Encached Integer_Cache 0db6 0260 | ` | Execute Discrete,In_Type 0db7 7001 |p | Jump_Nonzero 0xdb9 0db8 0801 | | Execute_Immediate Raise,0x1 0db9 e7fe | | Load 0x3,-0x2 0dba e7ff | | Load 0x3,-0x1 0dbb e025 | % | Load 0x0,0x25 0dbc 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0dbd 00d9 | | Load_Top At_Offset_1 0dbe 00d0 | | Action Swap_Control 0dbf 0260 | ` | Execute Discrete,In_Type 0dc0 7001 |p | Jump_Nonzero 0xdc2 0dc1 0801 | | Execute_Immediate Raise,0x1 0dc2 8065 | e | Call 0x0,0x65 0dc3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0dc4 0000 0000 | | .BLANK 0000[0x4] 0dc8 ; -------------------------------------------------------------------------------------- 0dc8 ; SUBPROGRAM 0dc8 ; -------------------------------------------------------------------------------------- 0dc8 0dd3 | | .CONST 0x0dd3 ; Address of begin 0dc9 0004 | | .CONST 0x0004 ; Address of exception handler 0dca 0003 | | .CONST 0x0003 ; Number of locals 0dcb INIT_0dc8: 0dcb e428 | ( | Load 0x2,0x28 0dcc e24c | L | Load 0x1,0x4c 0dcd 01d5 | | Execute Vector,Field_Reference 0dce 0007 | | Action Break_Optional 0dcf e428 | ( | Load 0x2,0x28 0dd0 e24e | N | Load 0x1,0x4e 0dd1 01d5 | | Execute Vector,Field_Reference 0dd2 0007 | | Action Break_Optional 0dd3 BODY_0dc8: 0dd3 00d9 | | Load_Top At_Offset_1 0dd4 e027 | ' | Load 0x0,0x27 0dd5 027f | | Execute Discrete,Equal 0dd6 702a |p* | Jump_Nonzero 0xe01 0dd7 0092 126b | k| Action Push_String_Extended,0x126b ; "Task=all, Pc=" 0dd9 00da | | Load_Top At_Offset_2 0dda e01c | | Load 0x0,0x1c 0ddb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ddc 01cc | | Execute Vector,Catenate 0ddd 0092 126c | l| Action Push_String_Extended,0x126c ; " Id=" 0ddf 01cc | | Execute Vector,Catenate 0de0 00d9 | | Load_Top At_Offset_1 0de1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0de2 00e0 | | Load_Encached Standard_Cache 0de3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0de4 01cc | | Execute Vector,Catenate 0de5 0092 126d | m| Action Push_String_Extended,0x126d ; " " 0de7 01cc | | Execute Vector,Catenate 0de8 00d9 | | Load_Top At_Offset_1 0de9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0dea 00e0 | | Load_Encached Standard_Cache 0deb 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0dec 01cc | | Execute Vector,Catenate 0ded 0092 126e | n| Action Push_String_Extended,0x126e ; " /" 0def 01cc | | Execute Vector,Catenate 0df0 00d9 | | Load_Top At_Offset_1 0df1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0df2 00e0 | | Load_Encached Standard_Cache 0df3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0df4 01cc | | Execute Vector,Catenate 0df5 8048 | H | Call 0x0,0x48 0df6 00d8 | | Load_Top At_Offset_0 0df7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0df8 6803 |h | Jump_Zero 0xdfc 0df9 0092 126f | o| Action Push_String_Extended,0x126f ; " T" 0dfb 8048 | H | Call 0x0,0x48 0dfc 00d8 | | Load_Top At_Offset_0 0dfd 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0dfe 8403 | | Call 0x2,0x3 0dff 8048 | H | Call 0x0,0x48 0e00 8049 | I | Call 0x0,0x49 0e01 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e02 0000 0000 | | .BLANK 0000[0x6] 0e08 ; -------------------------------------------------------------------------------------- 0e08 ; SUBPROGRAM 0e08 ; -------------------------------------------------------------------------------------- 0e08 0e0f | | .CONST 0x0e0f ; Address of begin 0e09 0004 | | .CONST 0x0004 ; Address of exception handler 0e0a 0002 | | .CONST 0x0002 ; Number of locals 0e0b INIT_0e08: 0e0b e428 | ( | Load 0x2,0x28 0e0c e252 | R | Load 0x1,0x52 0e0d 01d5 | | Execute Vector,Field_Reference 0e0e 0007 | | Action Break_Optional 0e0f BODY_0e08: 0e0f 00d8 | | Load_Top At_Offset_0 0e10 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e11 e027 | ' | Load 0x0,0x27 0e12 027f | | Execute Discrete,Equal 0e13 7032 |p2 | Jump_Nonzero 0xe46 0e14 0092 1270 | p| Action Push_String_Extended,0x1270 ; "Task: " 0e16 00d9 | | Load_Top At_Offset_1 0e17 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e18 804d | M | Call 0x0,0x4d 0e19 01cc | | Execute Vector,Catenate 0e1a 0092 1271 | q| Action Push_String_Extended,0x1271 ; " Pc=" 0e1c 01cc | | Execute Vector,Catenate 0e1d 00d9 | | Load_Top At_Offset_1 0e1e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e1f e01c | | Load 0x0,0x1c 0e20 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0e21 01cc | | Execute Vector,Catenate 0e22 0092 126c | l| Action Push_String_Extended,0x126c ; " Id=" 0e24 01cc | | Execute Vector,Catenate 0e25 00d9 | | Load_Top At_Offset_1 0e26 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0e27 00e0 | | Load_Encached Standard_Cache 0e28 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e29 01cc | | Execute Vector,Catenate 0e2a 0092 126d | m| Action Push_String_Extended,0x126d ; " " 0e2c 01cc | | Execute Vector,Catenate 0e2d 00d9 | | Load_Top At_Offset_1 0e2e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e2f 00e0 | | Load_Encached Standard_Cache 0e30 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e31 01cc | | Execute Vector,Catenate 0e32 0092 126e | n| Action Push_String_Extended,0x126e ; " /" 0e34 01cc | | Execute Vector,Catenate 0e35 00d9 | | Load_Top At_Offset_1 0e36 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0e37 00e0 | | Load_Encached Standard_Cache 0e38 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e39 01cc | | Execute Vector,Catenate 0e3a 8048 | H | Call 0x0,0x48 0e3b 00d8 | | Load_Top At_Offset_0 0e3c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e3d 6803 |h | Jump_Zero 0xe41 0e3e 0092 126f | o| Action Push_String_Extended,0x126f ; " T" 0e40 8048 | H | Call 0x0,0x48 0e41 00d8 | | Load_Top At_Offset_0 0e42 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0e43 8403 | | Call 0x2,0x3 0e44 8048 | H | Call 0x0,0x48 0e45 8049 | I | Call 0x0,0x49 0e46 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e47 0000 | | .XXX[0x1] 0e48 ; -------------------------------------------------------------------------------------- 0e48 ; SUBPROGRAM 0e48 ; -------------------------------------------------------------------------------------- 0e48 0e4f | O | .CONST 0x0e4f ; Address of begin 0e49 0004 | | .CONST 0x0004 ; Address of exception handler 0e4a 0002 | | .CONST 0x0002 ; Number of locals 0e4b INIT_0e48: 0e4b e428 | ( | Load 0x2,0x28 0e4c e267 | g | Load 0x1,0x67 0e4d 01d5 | | Execute Vector,Field_Reference 0e4e 0007 | | Action Break_Optional 0e4f BODY_0e48: 0e4f 00d8 | | Load_Top At_Offset_0 0e50 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e51 e01e | | Load 0x0,0x1e 0e52 027e | ~ | Execute Discrete,Not_Equal 0e53 685e |h^ | Jump_Zero 0xeb2 0e54 e428 | ( | Load 0x2,0x28 0e55 00e0 | | Load_Encached Standard_Cache 0e56 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e57 0092 1261 | a| Action Push_String_Extended,0x1261 ; ": " 0e59 01cc | | Execute Vector,Catenate 0e5a 0092 1272 | r| Action Push_String_Extended,0x1272 ; "Id=" 0e5c 01cc | | Execute Vector,Catenate 0e5d 00d9 | | Load_Top At_Offset_1 0e5e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e5f 00e0 | | Load_Encached Standard_Cache 0e60 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e61 01cc | | Execute Vector,Catenate 0e62 0092 126d | m| Action Push_String_Extended,0x126d ; " " 0e64 01cc | | Execute Vector,Catenate 0e65 8048 | H | Call 0x0,0x48 0e66 00d8 | | Load_Top At_Offset_0 0e67 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e68 e011 | | Load 0x0,0x11 0e69 027f | | Execute Discrete,Equal 0e6a 6804 |h | Jump_Zero 0xe6f 0e6b 0092 1273 | s| Action Push_String_Extended,0x1273 ; "all" 0e6d 8048 | H | Call 0x0,0x48 0e6e 7804 |x | Jump 0xe73 0e6f 00d8 | | Load_Top At_Offset_0 0e70 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e71 804d | M | Call 0x0,0x4d 0e72 8048 | H | Call 0x0,0x48 0e73 0092 1274 | t| Action Push_String_Extended,0x1274 ; " Pri=" 0e75 00d9 | | Load_Top At_Offset_1 0e76 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e77 00e0 | | Load_Encached Standard_Cache 0e78 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0e79 01cc | | Execute Vector,Catenate 0e7a 8048 | H | Call 0x0,0x48 0e7b 0092 1275 | u| Action Push_String_Extended,0x1275 ; " Action= " 0e7d 8048 | H | Call 0x0,0x48 0e7e 00d8 | | Load_Top At_Offset_0 0e7f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e80 4605 |F | Jump_Case 0x6 0e81 7815 |x | Jump 0xe97 ; case 0x0 0e82 7804 |x | Jump 0xe87 ; case 0x1 0e83 7817 |x | Jump 0xe9b ; case 0x2 0e84 780a |x | Jump 0xe8f ; case 0x3 0e85 780d |x | Jump 0xe93 ; case 0x4 0e86 7800 |x | Jump 0xe87 ; case 0x5 0e87 00d8 | | Load_Top At_Offset_0 0e88 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0e89 e003 | | Load 0x0,0x3 0e8a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0e8b 011c | | Execute Any,Convert_Unchecked 0e8c 1c01 | | Execute_Immediate Run_Utility,0x1 0e8d 8048 | H | Call 0x0,0x48 0e8e 780f |x | Jump 0xe9e 0e8f 0092 1276 | v| Action Push_String_Extended,0x1276 ; "Propagate" 0e91 8048 | H | Call 0x0,0x48 0e92 780b |x | Jump 0xe9e 0e93 0092 1277 | w| Action Push_String_Extended,0x1277 ; "Catch" 0e95 8048 | H | Call 0x0,0x48 0e96 7807 |x | Jump 0xe9e 0e97 0092 1278 | x| Action Push_String_Extended,0x1278 ; "History" 0e99 8048 | H | Call 0x0,0x48 0e9a 7803 |x | Jump 0xe9e 0e9b 0092 1279 | y| Action Push_String_Extended,0x1279 ; "Trace" 0e9d 8048 | H | Call 0x0,0x48 0e9e 0092 127a | z| Action Push_String_Extended,0x127a ; " Exc= " 0ea0 00d9 | | Load_Top At_Offset_1 0ea1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ea2 8066 | f | Call 0x0,0x66 0ea3 01cc | | Execute Vector,Catenate 0ea4 00d9 | | Load_Top At_Offset_1 0ea5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0ea6 8403 | | Call 0x2,0x3 0ea7 01cc | | Execute Vector,Catenate 0ea8 00d9 | | Load_Top At_Offset_1 0ea9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0eaa 8404 | | Call 0x2,0x4 0eab 01cc | | Execute Vector,Catenate 0eac 00d9 | | Load_Top At_Offset_1 0ead 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0eae 8405 | | Call 0x2,0x5 0eaf 01cc | | Execute Vector,Catenate 0eb0 8048 | H | Call 0x0,0x48 0eb1 8049 | I | Call 0x0,0x49 0eb2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0eb3 0000 0000 | | .BLANK 0000[0x5] 0eb8 ; -------------------------------------------------------------------------------------- 0eb8 ; SUBPROGRAM 0eb8 ; -------------------------------------------------------------------------------------- 0eb8 0ebf | | .CONST 0x0ebf ; Address of begin 0eb9 0004 | | .CONST 0x0004 ; Address of exception handler 0eba 0002 | | .CONST 0x0002 ; Number of locals 0ebb INIT_0eb8: 0ebb e428 | ( | Load 0x2,0x28 0ebc e25c | \ | Load 0x1,0x5c 0ebd 01d5 | | Execute Vector,Field_Reference 0ebe 0007 | | Action Break_Optional 0ebf BODY_0eb8: 0ebf 00d8 | | Load_Top At_Offset_0 0ec0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ec1 804d | M | Call 0x0,0x4d 0ec2 0092 125d | ]| Action Push_String_Extended,0x125d ; " [" 0ec4 01cc | | Execute Vector,Catenate 0ec5 00d9 | | Load_Top At_Offset_1 0ec6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ec7 e003 | | Load 0x0,0x3 0ec8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ec9 011c | | Execute Any,Convert_Unchecked 0eca 1c01 | | Execute_Immediate Run_Utility,0x1 0ecb 01cc | | Execute Vector,Catenate 0ecc 0092 125e | ^| Action Push_String_Extended,0x125e ; "]" 0ece 01cc | | Execute Vector,Catenate 0ecf 00d9 | | Load_Top At_Offset_1 0ed0 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ed1 8403 | | Call 0x2,0x3 0ed2 01cc | | Execute Vector,Catenate 0ed3 0092 127b | {| Action Push_String_Extended,0x127b ; " Low = " 0ed5 01cc | | Execute Vector,Catenate 0ed6 00d9 | | Load_Top At_Offset_1 0ed7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ed8 e01c | | Load 0x0,0x1c 0ed9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0eda 01cc | | Execute Vector,Catenate 0edb 0092 127c | || Action Push_String_Extended,0x127c ; " High = " 0edd 01cc | | Execute Vector,Catenate 0ede 00d9 | | Load_Top At_Offset_1 0edf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ee0 e01c | | Load 0x0,0x1c 0ee1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ee2 01cc | | Execute Vector,Catenate 0ee3 8048 | H | Call 0x0,0x48 0ee4 8049 | I | Call 0x0,0x49 0ee5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ee6 0000 0000 | | .XXX[0x2] 0ee8 ; -------------------------------------------------------------------------------------- 0ee8 ; SUBPROGRAM 0ee8 ; -------------------------------------------------------------------------------------- 0ee8 0eef | | .CONST 0x0eef ; Address of begin 0ee9 0004 | | .CONST 0x0004 ; Address of exception handler 0eea 0002 | | .CONST 0x0002 ; Number of locals 0eeb INIT_0ee8: 0eeb e428 | ( | Load 0x2,0x28 0eec e257 | W | Load 0x1,0x57 0eed 01d5 | | Execute Vector,Field_Reference 0eee 0007 | | Action Break_Optional 0eef BODY_0ee8: 0eef 00d8 | | Load_Top At_Offset_0 0ef0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0ef1 e01e | | Load 0x0,0x1e 0ef2 027e | ~ | Execute Discrete,Not_Equal 0ef3 682a |h* | Jump_Zero 0xf1e 0ef4 e428 | ( | Load 0x2,0x28 0ef5 00e0 | | Load_Encached Standard_Cache 0ef6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ef7 0092 1261 | a| Action Push_String_Extended,0x1261 ; ": " 0ef9 01cc | | Execute Vector,Catenate 0efa 8048 | H | Call 0x0,0x48 0efb 00d8 | | Load_Top At_Offset_0 0efc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0efd e003 | | Load 0x0,0x3 0efe 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0eff 011c | | Execute Any,Convert_Unchecked 0f00 1c01 | | Execute_Immediate Run_Utility,0x1 0f01 8048 | H | Call 0x0,0x48 0f02 0092 127d | }| Action Push_String_Extended,0x127d ; " Action=" 0f04 00d9 | | Load_Top At_Offset_1 0f05 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0f06 00e0 | | Load_Encached Standard_Cache 0f07 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0f08 01cc | | Execute Vector,Catenate 0f09 0092 126d | m| Action Push_String_Extended,0x126d ; " " 0f0b 01cc | | Execute Vector,Catenate 0f0c 00d9 | | Load_Top At_Offset_1 0f0d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f0e 804d | M | Call 0x0,0x4d 0f0f 01cc | | Execute Vector,Catenate 0f10 00d9 | | Load_Top At_Offset_1 0f11 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0f12 8403 | | Call 0x2,0x3 0f13 01cc | | Execute Vector,Catenate 0f14 00d9 | | Load_Top At_Offset_1 0f15 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0f16 8404 | | Call 0x2,0x4 0f17 01cc | | Execute Vector,Catenate 0f18 00d9 | | Load_Top At_Offset_1 0f19 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0f1a 8405 | | Call 0x2,0x5 0f1b 01cc | | Execute Vector,Catenate 0f1c 8048 | H | Call 0x0,0x48 0f1d 8049 | I | Call 0x0,0x49 0f1e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f1f 0000 | | .XXX[0x1] 0f20 ; -------------------------------------------------------------------------------------- 0f20 ; SUBPROGRAM 0f20 ; -------------------------------------------------------------------------------------- 0f20 0f28 | ( | .CONST 0x0f28 ; Address of begin 0f21 0004 | | .CONST 0x0004 ; Address of exception handler 0f22 0003 | | .CONST 0x0003 ; Number of locals 0f23 INIT_0f20: 0f23 e407 | | Load 0x2,0x7 0f24 e267 | g | Load 0x1,0x67 0f25 01d5 | | Execute Vector,Field_Reference 0f26 029f 1073 | s| Declare_Subprogram INIT_1070,For_Call 0f28 BODY_0f20: 0f28 00d9 | | Load_Top At_Offset_1 0f29 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0f2a e01e | | Load 0x0,0x1e 0f2b 027e | ~ | Execute Discrete,Not_Equal 0f2c 683e |h> | Jump_Zero 0xf6b 0f2d 00d9 | | Load_Top At_Offset_1 0f2e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f2f e011 | | Load 0x0,0x11 0f30 027f | | Execute Discrete,Equal 0f31 7005 |p | Jump_Nonzero 0xf37 0f32 00d9 | | Load_Top At_Offset_1 0f33 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0f34 e5fe | | Load 0x2,-0x2 0f35 027f | | Execute Discrete,Equal 0f36 6834 |h4 | Jump_Zero 0xf6b 0f37 00d9 | | Load_Top At_Offset_1 0f38 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f39 8067 | g | Call 0x0,0x67 0f3a 7006 |p | Jump_Nonzero 0xf41 0f3b 00d9 | | Load_Top At_Offset_1 0f3c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f3d 8068 | h | Call 0x0,0x68 0f3e e5ff | | Load 0x2,-0x1 0f3f 8069 | i | Call 0x0,0x69 0f40 682a |h* | Jump_Zero 0xf6b 0f41 00d9 | | Load_Top At_Offset_1 0f42 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0f43 e061 | a | Load 0x0,0x61 0f44 017f | | Execute Record,Equal 0f45 6824 |h$ | Jump_Zero 0xf6a 0f46 00d9 | | Load_Top At_Offset_1 0f47 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0f48 e063 | c | Load 0x0,0x63 0f49 027f | | Execute Discrete,Equal 0f4a 681f |h | Jump_Zero 0xf6a 0f4b 00d9 | | Load_Top At_Offset_1 0f4c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0f4d e05c | \ | Load 0x0,0x5c 0f4e 017f | | Execute Record,Equal 0f4f 681a |h | Jump_Zero 0xf6a 0f50 00d9 | | Load_Top At_Offset_1 0f51 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0f52 0f02 | | Execute_Immediate Equal,0x2 0f53 6804 |h | Jump_Zero 0xf58 0f54 00d9 | | Load_Top At_Offset_1 0f55 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0f56 a5fb | | Store_Unchecked 0x2,-0x5 0f57 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f58 00d9 | | Load_Top At_Offset_1 0f59 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0f5a 7004 |p | Jump_Nonzero 0xf5f 0f5b 00d9 | | Load_Top At_Offset_1 0f5c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0f5d a5f9 | | Store_Unchecked 0x2,-0x7 0f5e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f5f 00d9 | | Load_Top At_Offset_1 0f60 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0f61 e403 | | Load 0x2,0x3 0f62 027d | } | Execute Discrete,Greater 0f63 6805 |h | Jump_Zero 0xf69 0f64 00d9 | | Load_Top At_Offset_1 0f65 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0f66 a403 | | Store_Unchecked 0x2,0x3 0f67 e407 | | Load 0x2,0x7 0f68 a402 | | Store_Unchecked 0x2,0x2 0f69 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f6a 8603 | | Call 0x3,0x3 0f6b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0f6c 0000 0000 | | .BLANK 0000[0x4] 0f70 ; -------------------------------------------------------------------------------------- 0f70 ; SUBPROGRAM 0f70 ; -------------------------------------------------------------------------------------- 0f70 0f73 | s | .CONST 0x0f73 ; Address of begin 0f71 0004 | | .CONST 0x0004 ; Address of exception handler 0f72 0001 | | .CONST 0x0001 ; Number of locals 0f73 BODY_0f70: 0f73 INIT_0f70: 0f73 00da | | Load_Top At_Offset_2 0f74 e01e | | Load 0x0,0x1e 0f75 027f | | Execute Discrete,Equal 0f76 6801 |h | Jump_Zero 0xf78 0f77 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f78 00cf | | Action Mark_Auxiliary 0f79 e403 | | Load 0x2,0x3 0f7a 4801 |H | Short_Literal 0x1 0f7b 0263 | c | Execute Discrete,Above_Bound 0f7c 700b |p | Jump_Nonzero 0xf88 0f7d 00d8 | | Load_Top At_Offset_0 0f7e e402 | | Load 0x2,0x2 0f7f 01d7 | | Execute Vector,Field_Read 0f80 e7ff | | Load 0x3,-0x1 0f81 027f | | Execute Discrete,Equal 0f82 6803 |h | Jump_Zero 0xf86 0f83 4801 |H | Short_Literal 0x1 0f84 a406 | | Store_Unchecked 0x2,0x6 0f85 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f86 00c8 | | Action Pop_Auxiliary_Range 0f87 3ff5 |? | Loop_Increasing 0xf7d 0f88 00ce | | Action Pop_Auxiliary 0f89 e403 | | Load 0x2,0x3 0f8a 0d28 | ( | Execute_Immediate Less,0x28 0f8b 6808 |h | Jump_Zero 0xf94 0f8c e403 | | Load 0x2,0x3 0f8d 0a01 | | Execute_Immediate Plus,0x1 0f8e c403 | | Store 0x2,0x3 0f8f 00da | | Load_Top At_Offset_2 0f90 e403 | | Load 0x2,0x3 0f91 e402 | | Load 0x2,0x2 0f92 01d6 | | Execute Vector,Field_Write 0f93 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f94 0092 127e | ~| Action Push_String_Extended,0x127e ; "Action buffer overflow" 0f96 803b | ; | Call 0x0,0x3b 0f97 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0f98 ; -------------------------------------------------------------------------------------- 0f98 ; SUBPROGRAM 0f98 ; -------------------------------------------------------------------------------------- 0f98 0f9d | | .CONST 0x0f9d ; Address of begin 0f99 0004 | | .CONST 0x0004 ; Address of exception handler 0f9a 0002 | | .CONST 0x0002 ; Number of locals 0f9b INIT_0f98: 0f9b 029f 10a3 | | Declare_Subprogram INIT_10a0,For_Call 0f9d BODY_0f98: 0f9d e7fe | | Load 0x3,-0x2 0f9e 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0f9f 6806 |h | Jump_Zero 0xfa6 0fa0 e5fc | | Load 0x2,-0x4 0fa1 805e | ^ | Call 0x0,0x5e 0fa2 6803 |h | Jump_Zero 0xfa6 0fa3 e7fe | | Load 0x3,-0x2 0fa4 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0fa5 8408 | | Call 0x2,0x8 0fa6 e7fe | | Load 0x3,-0x2 0fa7 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fa8 6829 |h) | Jump_Zero 0xfd2 0fa9 e5fe | | Load 0x2,-0x2 0faa e004 | | Load 0x0,0x4 0fab 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0fac e7fe | | Load 0x3,-0x2 0fad 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0fae 027c | | | Execute Discrete,Less 0faf 6822 |h" | Jump_Zero 0xfd2 0fb0 e5fc | | Load 0x2,-0x4 0fb1 805e | ^ | Call 0x0,0x5e 0fb2 681f |h | Jump_Zero 0xfd2 0fb3 e7fe | | Load 0x3,-0x2 0fb4 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0fb5 e5fd | | Load 0x2,-0x3 0fb6 027f | | Execute Discrete,Equal 0fb7 7006 |p | Jump_Nonzero 0xfbe 0fb8 e406 | | Load 0x2,0x6 0fb9 7004 |p | Jump_Nonzero 0xfbe 0fba e5fd | | Load 0x2,-0x3 0fbb e01e | | Load 0x0,0x1e 0fbc 027f | | Execute Discrete,Equal 0fbd 6814 |h | Jump_Zero 0xfd2 0fbe e7fe | | Load 0x3,-0x2 0fbf 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fc0 0f01 | | Execute_Immediate Equal,0x1 0fc1 680b |h | Jump_Zero 0xfcd 0fc2 4800 |H | Short_Literal 0x0 0fc3 e7fe | | Load 0x3,-0x2 0fc4 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0fc5 e7fe | | Load 0x3,-0x2 0fc6 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0fc7 8408 | | Call 0x2,0x8 0fc8 00db | | Load_Top At_Offset_3 0fc9 4801 |H | Short_Literal 0x1 0fca e26b | k | Load 0x1,0x6b 0fcb 171d | | Execute Task,Entry_Call,Field_Number 0x1d 0fcc 7805 |x | Jump 0xfd2 0fcd e7fe | | Load 0x3,-0x2 0fce 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fcf 0aff | | Execute_Immediate Plus,-0x1 0fd0 e7fe | | Load 0x3,-0x2 0fd1 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0fd2 e7fe | | Load 0x3,-0x2 0fd3 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0fd4 6809 |h | Jump_Zero 0xfde 0fd5 00cf | | Action Mark_Auxiliary 0fd6 e258 | X | Load 0x1,0x58 0fd7 4801 |H | Short_Literal 0x1 0fd8 0263 | c | Execute Discrete,Above_Bound 0fd9 7003 |p | Jump_Nonzero 0xfdd 0fda 8602 | | Call 0x3,0x2 0fdb 00c8 | | Action Pop_Auxiliary_Range 0fdc 3ffd |? | Loop_Increasing 0xfda 0fdd 00ce | | Action Pop_Auxiliary 0fde 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0fdf 0000 | | .XXX[0x1] 0fe0 ; -------------------------------------------------------------------------------------- 0fe0 ; SUBPROGRAM 0fe0 ; -------------------------------------------------------------------------------------- 0fe0 0fe3 | | .CONST 0x0fe3 ; Address of begin 0fe1 0004 | | .CONST 0x0004 ; Address of exception handler 0fe2 0001 | | .CONST 0x0001 ; Number of locals 0fe3 BODY_0fe0: 0fe3 INIT_0fe0: 0fe3 e7fd | | Load 0x3,-0x3 0fe4 00e2 | | Load_Encached Integer_Cache 0fe5 025e | ^ | Execute Discrete,Convert 0fe6 e7fe | | Load 0x3,-0x2 0fe7 e7ff | | Load 0x3,-0x1 0fe8 e025 | % | Load 0x0,0x25 0fe9 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0fea 00d9 | | Load_Top At_Offset_1 0feb 00d0 | | Action Swap_Control 0fec 0260 | ` | Execute Discrete,In_Type 0fed 7001 |p | Jump_Nonzero 0xfef 0fee 0801 | | Execute_Immediate Raise,0x1 0fef 8409 | | Call 0x2,0x9 0ff0 00d1 | | Pop_Control Pop_Count_1 0ff1 c7fd | | Store 0x3,-0x3 0ff2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ff3 0000 0000 | | .BLANK 0000[0x5] 0ff8 ; -------------------------------------------------------------------------------------- 0ff8 ; SUBPROGRAM 0ff8 ; -------------------------------------------------------------------------------------- 0ff8 0ffb | | .CONST 0x0ffb ; Address of begin 0ff9 0004 | | .CONST 0x0004 ; Address of exception handler 0ffa 0001 | | .CONST 0x0001 ; Number of locals 0ffb BODY_0ff8: 0ffb INIT_0ff8: 0ffb 00da | | Load_Top At_Offset_2 0ffc e24e | N | Load 0x1,0x4e 0ffd 01d5 | | Execute Vector,Field_Reference 0ffe 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0fff 6804 |h | Jump_Zero 0x1004 1000 00da | | Load_Top At_Offset_2 1001 4801 |H | Short_Literal 0x1 1002 e26b | k | Load 0x1,0x6b 1003 171f | | Execute Task,Entry_Call,Field_Number 0x1f 1004 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1005 0000 0000 | | .XXX[0x3] 1007 0000 | | 1008 ; -------------------------------------------------------------------------------------- 1008 ; SUBPROGRAM 1008 ; -------------------------------------------------------------------------------------- 1008 100b | | .CONST 0x100b ; Address of begin 1009 1025 | % | .CONST 0x1025 ; Address of exception handler 100a 0001 | | .CONST 0x0001 ; Number of locals 100b BODY_1008: 100b INIT_1008: 100b e23e | > | Load 0x1,0x3e 100c 6817 |h | Jump_Zero 0x1024 100d 0092 125a | Z| Action Push_String_Extended,0x125a ; "Process_Action: exception: " 100f e03a | : | Load 0x0,0x3a 1010 180d | | Execute Package,Field_Execute,Field_Number 0xd 1011 01cc | | Execute Vector,Catenate 1012 803b | ; | Call 0x0,0x3b 1013 00cf | | Action Mark_Auxiliary 1014 e403 | | Load 0x2,0x3 1015 4801 |H | Short_Literal 0x1 1016 0263 | c | Execute Discrete,Above_Bound 1017 700b |p | Jump_Nonzero 0x1023 1018 0092 127f | | Action Push_String_Extended,0x127f ; "Aid= " 101a 00d9 | | Load_Top At_Offset_1 101b e402 | | Load 0x2,0x2 101c 01d7 | | Execute Vector,Field_Read 101d 00e0 | | Load_Encached Standard_Cache 101e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 101f 01cc | | Execute Vector,Catenate 1020 803b | ; | Call 0x0,0x3b 1021 00c8 | | Action Pop_Auxiliary_Range 1022 3ff5 |? | Loop_Increasing 0x1018 1023 00ce | | Action Pop_Auxiliary 1024 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1025 TRAP_1008: 1025 0007 | | Action Break_Optional 1026 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1027 0000 | | .XXX[0x1] 1028 ; -------------------------------------------------------------------------------------- 1028 ; SUBPROGRAM 1028 ; -------------------------------------------------------------------------------------- 1028 102f | / | .CONST 0x102f ; Address of begin 1029 0004 | | .CONST 0x0004 ; Address of exception handler 102a 0002 | | .CONST 0x0002 ; Number of locals 102b INIT_1028: 102b e039 | 9 | Load 0x0,0x39 102c 0322 | " | Declare_Variable Record 102d 00d8 | | Load_Top At_Offset_0 102e 1c00 | | Execute_Immediate Run_Utility,0x0 102f BODY_1028: 102f 00d8 | | Load_Top At_Offset_0 1030 e5fe | | Load 0x2,-0x2 1031 803c | < | Call 0x0,0x3c 1032 00d1 | | Pop_Control Pop_Count_1 1033 00d8 | | Load_Top At_Offset_0 1034 e5fd | | Load 0x2,-0x3 1035 803d | = | Call 0x0,0x3d 1036 00d1 | | Pop_Control Pop_Count_1 1037 00d8 | | Load_Top At_Offset_0 1038 e5ff | | Load 0x2,-0x1 1039 806a | j | Call 0x0,0x6a 103a 00d1 | | Pop_Control Pop_Count_1 103b e5fe | | Load 0x2,-0x2 103c e01e | | Load 0x0,0x1e 103d e5fd | | Load 0x2,-0x3 103e e5ff | | Load 0x2,-0x1 103f 827d | } | Call 0x1,0x7d 1040 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1041 0000 0000 | | .BLANK 0000[0x7] 1048 ; -------------------------------------------------------------------------------------- 1048 ; SUBPROGRAM 1048 ; -------------------------------------------------------------------------------------- 1048 1050 | P | .CONST 0x1050 ; Address of begin 1049 0004 | | .CONST 0x0004 ; Address of exception handler 104a 0003 | | .CONST 0x0003 ; Number of locals 104b INIT_1048: 104b e405 | | Load 0x2,0x5 104c e257 | W | Load 0x1,0x57 104d 01d5 | | Execute Vector,Field_Reference 104e 029f 10eb | | Declare_Subprogram INIT_10e8,For_Call 1050 BODY_1048: 1050 00d9 | | Load_Top At_Offset_1 1051 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1052 e011 | | Load 0x0,0x11 1053 027f | | Execute Discrete,Equal 1054 7005 |p | Jump_Nonzero 0x105a 1055 00d9 | | Load_Top At_Offset_1 1056 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1057 e5ff | | Load 0x2,-0x1 1058 027f | | Execute Discrete,Equal 1059 6814 |h | Jump_Zero 0x106e 105a 00d9 | | Load_Top At_Offset_1 105b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 105c e061 | a | Load 0x0,0x61 105d 017e | ~ | Execute Record,Not_Equal 105e 700a |p | Jump_Nonzero 0x1069 105f 00d9 | | Load_Top At_Offset_1 1060 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 1061 e063 | c | Load 0x0,0x63 1062 027e | ~ | Execute Discrete,Not_Equal 1063 7005 |p | Jump_Nonzero 0x1069 1064 00d9 | | Load_Top At_Offset_1 1065 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 1066 e05c | \ | Load 0x0,0x5c 1067 017e | ~ | Execute Record,Not_Equal 1068 6802 |h | Jump_Zero 0x106b 1069 8603 | | Call 0x3,0x3 106a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 106b 4801 |H | Short_Literal 0x1 106c 00cb | | Action Pop_Block_With_Result 106d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 106e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 106f 0000 | | .XXX[0x1] 1070 ; -------------------------------------------------------------------------------------- 1070 ; SUBPROGRAM 1070 ; -------------------------------------------------------------------------------------- 1070 1082 | | .CONST 0x1082 ; Address of begin 1071 0004 | | .CONST 0x0004 ; Address of exception handler 1072 0007 | | .CONST 0x0007 ; Number of locals 1073 INIT_1070: 1073 e039 | 9 | Load 0x0,0x39 1074 0322 | " | Declare_Variable Record 1075 00d8 | | Load_Top At_Offset_0 1076 1c00 | | Execute_Immediate Run_Utility,0x0 1077 e005 | | Load 0x0,0x5 1078 0322 | " | Declare_Variable Record 1079 00d8 | | Load_Top At_Offset_0 107a 1c00 | | Execute_Immediate Run_Utility,0x0 107b 00e1 | | Load_Encached Boolean_Cache 107c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 107d e006 | | Load 0x0,0x6 107e 0322 | " | Declare_Variable Record 107f e007 | | Load 0x0,0x7 1080 029f 111b | | Declare_Subprogram INIT_1118,For_Call 1082 BODY_1070: 1082 e802 | | Load 0x4,0x2 1083 e5fd | | Load 0x2,-0x3 1084 803c | < | Call 0x0,0x3c 1085 00d1 | | Pop_Control Pop_Count_1 1086 e802 | | Load 0x4,0x2 1087 8056 | V | Call 0x0,0x56 1088 00d1 | | Pop_Control Pop_Count_1 1089 e802 | | Load 0x4,0x2 108a 806b | k | Call 0x0,0x6b 108b 00db | | Load_Top At_Offset_3 108c 017d | } | Execute Record,Structure_Write 108d e802 | | Load 0x4,0x2 108e 806c | l | Call 0x0,0x6c 108f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 1090 00cf | | Action Mark_Auxiliary 1091 e268 | h | Load 0x1,0x68 1092 e407 | | Load 0x2,0x7 1093 0263 | c | Execute Discrete,Above_Bound 1094 7003 |p | Jump_Nonzero 0x1098 1095 8807 | | Call 0x4,0x7 1096 00c8 | | Action Pop_Auxiliary_Range 1097 3ffd |? | Loop_Increasing 0x1095 1098 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1099 0000 0000 | | .BLANK 0000[0x7] 10a0 ; -------------------------------------------------------------------------------------- 10a0 ; SUBPROGRAM 10a0 ; -------------------------------------------------------------------------------------- 10a0 10a7 | | .CONST 0x10a7 ; Address of begin 10a1 0004 | | .CONST 0x0004 ; Address of exception handler 10a2 0002 | | .CONST 0x0002 ; Number of locals 10a3 INIT_10a0: 10a3 e605 | | Load 0x3,0x5 10a4 e257 | W | Load 0x1,0x57 10a5 01d5 | | Execute Vector,Field_Reference 10a6 0007 | | Action Break_Optional 10a7 BODY_10a0: 10a7 00d8 | | Load_Top At_Offset_0 10a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 10a9 e011 | | Load 0x0,0x11 10aa 027f | | Execute Discrete,Equal 10ab 7005 |p | Jump_Nonzero 0x10b1 10ac 00d8 | | Load_Top At_Offset_0 10ad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 10ae e7ff | | Load 0x3,-0x1 10af 027f | | Execute Discrete,Equal 10b0 6831 |h1 | Jump_Zero 0x10e2 10b1 00d8 | | Load_Top At_Offset_0 10b2 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 10b3 e061 | a | Load 0x0,0x61 10b4 017f | | Execute Record,Equal 10b5 7006 |p | Jump_Nonzero 0x10bc 10b6 00d8 | | Load_Top At_Offset_0 10b7 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 10b8 e405 | | Load 0x2,0x5 10b9 806b | k | Call 0x0,0x6b 10ba 017f | | Execute Record,Equal 10bb 6826 |h& | Jump_Zero 0x10e2 10bc 00d8 | | Load_Top At_Offset_0 10bd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 10be e063 | c | Load 0x0,0x63 10bf 027f | | Execute Discrete,Equal 10c0 7006 |p | Jump_Nonzero 0x10c7 10c1 00d8 | | Load_Top At_Offset_0 10c2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 10c3 e405 | | Load 0x2,0x5 10c4 806c | l | Call 0x0,0x6c 10c5 027f | | Execute Discrete,Equal 10c6 681b |h | Jump_Zero 0x10e2 10c7 00d8 | | Load_Top At_Offset_0 10c8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 10c9 e05c | \ | Load 0x0,0x5c 10ca 017f | | Execute Record,Equal 10cb 7006 |p | Jump_Nonzero 0x10d2 10cc e405 | | Load 0x2,0x5 10cd 805d | ] | Call 0x0,0x5d 10ce 00d9 | | Load_Top At_Offset_1 10cf 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 10d0 8278 | x | Call 0x1,0x78 10d1 6810 |h | Jump_Zero 0x10e2 10d2 00d8 | | Load_Top At_Offset_0 10d3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 10d4 0f09 | | Execute_Immediate Equal,0x9 10d5 7009 |p | Jump_Nonzero 0x10df 10d6 00d8 | | Load_Top At_Offset_0 10d7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 10d8 7003 |p | Jump_Nonzero 0x10dc 10d9 e405 | | Load 0x2,0x5 10da 806d | m | Call 0x0,0x6d 10db 7003 |p | Jump_Nonzero 0x10df 10dc e405 | | Load 0x2,0x5 10dd 806e | n | Call 0x0,0x6e 10de 6803 |h | Jump_Zero 0x10e2 10df 00d8 | | Load_Top At_Offset_0 10e0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 10e1 8408 | | Call 0x2,0x8 10e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10e3 0000 0000 | | .BLANK 0000[0x5] 10e8 ; -------------------------------------------------------------------------------------- 10e8 ; SUBPROGRAM 10e8 ; -------------------------------------------------------------------------------------- 10e8 10fa | | .CONST 0x10fa ; Address of begin 10e9 0004 | | .CONST 0x0004 ; Address of exception handler 10ea 0007 | | .CONST 0x0007 ; Number of locals 10eb INIT_10e8: 10eb e006 | | Load 0x0,0x6 10ec 0322 | " | Declare_Variable Record 10ed 00e2 | | Load_Encached Integer_Cache 10ee 00e1 | | Load_Encached Boolean_Cache 10ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 10f0 e005 | | Load 0x0,0x5 10f1 0322 | " | Declare_Variable Record 10f2 00d8 | | Load_Top At_Offset_0 10f3 1c00 | | Execute_Immediate Run_Utility,0x0 10f4 e039 | 9 | Load 0x0,0x39 10f5 0322 | " | Declare_Variable Record 10f6 00d8 | | Load_Top At_Offset_0 10f7 1c00 | | Execute_Immediate Run_Utility,0x0 10f8 029f 118b | | Declare_Subprogram INIT_1188,For_Call 10fa BODY_10e8: 10fa 00d9 | | Load_Top At_Offset_1 10fb e5fd | | Load 0x2,-0x3 10fc 803c | < | Call 0x0,0x3c 10fd 00d1 | | Pop_Control Pop_Count_1 10fe 00d9 | | Load_Top At_Offset_1 10ff 8056 | V | Call 0x0,0x56 1100 00d1 | | Pop_Control Pop_Count_1 1101 00d9 | | Load_Top At_Offset_1 1102 806b | k | Call 0x0,0x6b 1103 e802 | | Load 0x4,0x2 1104 017d | } | Execute Record,Structure_Write 1105 00d9 | | Load_Top At_Offset_1 1106 806c | l | Call 0x0,0x6c 1107 a803 | | Store_Unchecked 0x4,0x3 1108 00cf | | Action Mark_Auxiliary 1109 e258 | X | Load 0x1,0x58 110a e405 | | Load 0x2,0x5 110b 0263 | c | Execute Discrete,Above_Bound 110c 7003 |p | Jump_Nonzero 0x1110 110d 8807 | | Call 0x4,0x7 110e 00c8 | | Action Pop_Auxiliary_Range 110f 3ffd |? | Loop_Increasing 0x110d 1110 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1111 0000 0000 | | .BLANK 0000[0x7] 1118 ; -------------------------------------------------------------------------------------- 1118 ; SUBPROGRAM 1118 ; -------------------------------------------------------------------------------------- 1118 111f | | .CONST 0x111f ; Address of begin 1119 0004 | | .CONST 0x0004 ; Address of exception handler 111a 0002 | | .CONST 0x0002 ; Number of locals 111b INIT_1118: 111b e80a | | Load 0x4,0xa 111c e267 | g | Load 0x1,0x67 111d 01d5 | | Execute Vector,Field_Reference 111e 0007 | | Action Break_Optional 111f BODY_1118: 111f 00d8 | | Load_Top At_Offset_0 1120 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 1121 e01e | | Load 0x0,0x1e 1122 027e | ~ | Execute Discrete,Not_Equal 1123 6863 |hc | Jump_Zero 0x1187 1124 00d8 | | Load_Top At_Offset_0 1125 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1126 e011 | | Load 0x0,0x11 1127 027f | | Execute Discrete,Equal 1128 7005 |p | Jump_Nonzero 0x112e 1129 00d8 | | Load_Top At_Offset_0 112a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 112b e5fe | | Load 0x2,-0x2 112c 027f | | Execute Discrete,Equal 112d 6859 |hY | Jump_Zero 0x1187 112e 00d8 | | Load_Top At_Offset_0 112f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1130 8067 | g | Call 0x0,0x67 1131 7006 |p | Jump_Nonzero 0x1138 1132 00d8 | | Load_Top At_Offset_0 1133 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1134 8068 | h | Call 0x0,0x68 1135 e5ff | | Load 0x2,-0x1 1136 8069 | i | Call 0x0,0x69 1137 684f |hO | Jump_Zero 0x1187 1138 00d8 | | Load_Top At_Offset_0 1139 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 113a e061 | a | Load 0x0,0x61 113b 017f | | Execute Record,Equal 113c 7005 |p | Jump_Nonzero 0x1142 113d 00d8 | | Load_Top At_Offset_0 113e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 113f e805 | | Load 0x4,0x5 1140 017f | | Execute Record,Equal 1141 6845 |hE | Jump_Zero 0x1187 1142 00d8 | | Load_Top At_Offset_0 1143 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1144 e063 | c | Load 0x0,0x63 1145 027f | | Execute Discrete,Equal 1146 7005 |p | Jump_Nonzero 0x114c 1147 00d8 | | Load_Top At_Offset_0 1148 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1149 e806 | | Load 0x4,0x6 114a 027f | | Execute Discrete,Equal 114b 683b |h; | Jump_Zero 0x1187 114c 00d8 | | Load_Top At_Offset_0 114d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 114e e05c | \ | Load 0x0,0x5c 114f 017f | | Execute Record,Equal 1150 6813 |h | Jump_Zero 0x1164 1151 00d8 | | Load_Top At_Offset_0 1152 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1153 0f02 | | Execute_Immediate Equal,0x2 1154 6804 |h | Jump_Zero 0x1159 1155 00d8 | | Load_Top At_Offset_0 1156 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 1157 a5fb | | Store_Unchecked 0x2,-0x5 1158 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1159 00d8 | | Load_Top At_Offset_0 115a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 115b e403 | | Load 0x2,0x3 115c 027d | } | Execute Discrete,Greater 115d 6829 |h) | Jump_Zero 0x1187 115e 00d8 | | Load_Top At_Offset_0 115f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1160 a403 | | Store_Unchecked 0x2,0x3 1161 e407 | | Load 0x2,0x7 1162 a402 | | Store_Unchecked 0x2,0x2 1163 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1164 e804 | | Load 0x4,0x4 1165 700a |p | Jump_Nonzero 0x1170 1166 e802 | | Load 0x4,0x2 1167 e5fc | | Load 0x2,-0x4 1168 803d | = | Call 0x0,0x3d 1169 00d1 | | Pop_Control Pop_Count_1 116a e803 | | Load 0x4,0x3 116b e802 | | Load 0x4,0x2 116c 806f | o | Call 0x0,0x6f 116d 00d2 | | Pop_Control Pop_Count_2 116e 4801 |H | Short_Literal 0x1 116f a804 | | Store_Unchecked 0x4,0x4 1170 e803 | | Load 0x4,0x3 1171 00d9 | | Load_Top At_Offset_1 1172 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1173 8278 | x | Call 0x1,0x78 1174 6812 |h | Jump_Zero 0x1187 1175 00d8 | | Load_Top At_Offset_0 1176 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1177 0f02 | | Execute_Immediate Equal,0x2 1178 6804 |h | Jump_Zero 0x117d 1179 00d8 | | Load_Top At_Offset_0 117a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 117b a5fb | | Store_Unchecked 0x2,-0x5 117c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 117d 00d8 | | Load_Top At_Offset_0 117e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 117f e403 | | Load 0x2,0x3 1180 027d | } | Execute Discrete,Greater 1181 6805 |h | Jump_Zero 0x1187 1182 00d8 | | Load_Top At_Offset_0 1183 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1184 a403 | | Store_Unchecked 0x2,0x3 1185 e407 | | Load 0x2,0x7 1186 a402 | | Store_Unchecked 0x2,0x2 1187 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1188 ; -------------------------------------------------------------------------------------- 1188 ; SUBPROGRAM 1188 ; -------------------------------------------------------------------------------------- 1188 118f | | .CONST 0x118f ; Address of begin 1189 0004 | | .CONST 0x0004 ; Address of exception handler 118a 0002 | | .CONST 0x0002 ; Number of locals 118b INIT_1188: 118b e80a | | Load 0x4,0xa 118c e257 | W | Load 0x1,0x57 118d 01d5 | | Execute Vector,Field_Reference 118e 0007 | | Action Break_Optional 118f BODY_1188: 118f 00d8 | | Load_Top At_Offset_0 1190 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1191 7003 |p | Jump_Nonzero 0x1195 1192 e5fd | | Load 0x2,-0x3 1193 805e | ^ | Call 0x0,0x5e 1194 6830 |h0 | Jump_Zero 0x11c5 1195 00d8 | | Load_Top At_Offset_0 1196 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1197 e061 | a | Load 0x0,0x61 1198 017f | | Execute Record,Equal 1199 7005 |p | Jump_Nonzero 0x119f 119a 00d8 | | Load_Top At_Offset_0 119b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 119c e802 | | Load 0x4,0x2 119d 017f | | Execute Record,Equal 119e 6826 |h& | Jump_Zero 0x11c5 119f 00d8 | | Load_Top At_Offset_0 11a0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 11a1 e063 | c | Load 0x0,0x63 11a2 027f | | Execute Discrete,Equal 11a3 7005 |p | Jump_Nonzero 0x11a9 11a4 00d8 | | Load_Top At_Offset_0 11a5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 11a6 e803 | | Load 0x4,0x3 11a7 027f | | Execute Discrete,Equal 11a8 681c |h | Jump_Zero 0x11c5 11a9 00d8 | | Load_Top At_Offset_0 11aa 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 11ab e05c | \ | Load 0x0,0x5c 11ac 017f | | Execute Record,Equal 11ad 6805 |h | Jump_Zero 0x11b3 11ae 4801 |H | Short_Literal 0x1 11af 00cb | | Action Pop_Block_With_Result 11b0 00cb | | Action Pop_Block_With_Result 11b1 00cb | | Action Pop_Block_With_Result 11b2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 11b3 e804 | | Load 0x4,0x4 11b4 7006 |p | Jump_Nonzero 0x11bb 11b5 e805 | | Load 0x4,0x5 11b6 e806 | | Load 0x4,0x6 11b7 806f | o | Call 0x0,0x6f 11b8 00d2 | | Pop_Control Pop_Count_2 11b9 4801 |H | Short_Literal 0x1 11ba a804 | | Store_Unchecked 0x4,0x4 11bb e805 | | Load 0x4,0x5 11bc 00d9 | | Load_Top At_Offset_1 11bd 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 11be 8278 | x | Call 0x1,0x78 11bf 6805 |h | Jump_Zero 0x11c5 11c0 4801 |H | Short_Literal 0x1 11c1 00cb | | Action Pop_Block_With_Result 11c2 00cb | | Action Pop_Block_With_Result 11c3 00cb | | Action Pop_Block_With_Result 11c4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 11c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 11c6 0000 0000 | | .XXX[0x2] 11c8 ; -------------------------------------------------------------------------------------- 11c8 ; SUBPROGRAM 11c8 ; -------------------------------------------------------------------------------------- 11c8 11d5 | | .CONST 0x11d5 ; Address of begin 11c9 0004 | | .CONST 0x0004 ; Address of exception handler 11ca 000f | | .CONST 0x000f ; Number of locals 11cb INIT_11c8: 11cb 4804 |H | Short_Literal 0x4 11cc 02cb | | Declare_Variable Entry 11cd 00bf | | Action Accept_Activation 11ce e001 | | Load 0x0,0x1 11cf 0322 | " | Declare_Variable Record 11d0 00d8 | | Load_Top At_Offset_0 11d1 1c00 | | Execute_Immediate Run_Utility,0x0 11d2 029f 11e3 | | Declare_Subprogram INIT_11e0,For_Call 11d4 00bc | | Action Signal_Activated 11d5 BODY_11c8: 11d5 0092 1280 | | Action Push_String_Extended,0x1280 ; "Control.Inner.Creator" 11d7 e002 | | Load 0x0,0x2 11d8 180f | | Execute Package,Field_Execute,Field_Number 0xf 11d9 00cf | | Action Mark_Auxiliary 11da 820f | | Call 0x1,0xf 11db 00c9 | | Action Pop_Auxiliary_Loop 11dc 7ffd | | Jump 0x11da 11dd 0000 0000 | | .XXX[0x3] 11df 0000 | | 11e0 ; -------------------------------------------------------------------------------------- 11e0 ; SUBPROGRAM 11e0 ; -------------------------------------------------------------------------------------- 11e0 11ea | | .CONST 0x11ea ; Address of begin 11e1 11f0 | | .CONST 0x11f0 ; Address of exception handler 11e2 0002 | | .CONST 0x0002 ; Number of locals 11e3 INIT_11e0: 11e3 480d 4a3f |H J?| Declare_Variable Select 0x000, 0x001, 11e5 4800 4801 |H H | [0x000]: 0x001 = 0x0008, 11e7 4800 4801 |H H | [0x00d]: 0x23f = 0x11f8 11e9 02cf | | 11ea BODY_11e0: 11ea 00cf | | Action Mark_Auxiliary 11eb 00d9 | | Load_Top At_Offset_1 11ec 013f | ? | Execute Select,Rendezvous 11ed 00d1 | | Pop_Control Pop_Count_1 11ee 00c9 | | Action Pop_Auxiliary_Loop 11ef 7ffb | | Jump 0x11eb 11f0 TRAP_11e0: 11f0 0007 | | Action Break_Optional 11f1 0092 1281 | | Action Push_String_Extended,0x1281 ; "Creator: exception:" 11f3 e002 | | Load 0x0,0x2 11f4 180d | | Execute Package,Field_Execute,Field_Number 0xd 11f5 01cc | | Execute Vector,Catenate 11f6 8003 | | Call 0x0,0x3 11f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 11f8 ; -------------------------------------------------------------------------------------- 11f8 ; SUBPROGRAM 11f8 ; See instruction 0x02cf at 0x11e3, index=0xd 11f8 ; -------------------------------------------------------------------------------------- 11f8 11fb | | .CONST 0x11fb ; Address of begin 11f9 0004 | | .CONST 0x0004 ; Address of exception handler 11fa 0001 | | .CONST 0x0001 ; Number of locals 11fb BODY_11f8: 11fb INIT_11f8: 11fb 029f 1203 | | Declare_Subprogram INIT_1200,For_Call 11fd 8602 | | Call 0x3,0x2 11fe 4101 |A | End_Rendezvous 0x1 11ff 0000 | | .XXX[0x1] 1200 ; -------------------------------------------------------------------------------------- 1200 ; SUBPROGRAM 1200 ; -------------------------------------------------------------------------------------- 1200 1203 | | .CONST 0x1203 ; Address of begin 1201 0004 | | .CONST 0x0004 ; Address of exception handler 1202 0001 | | .CONST 0x0001 ; Number of locals 1203 BODY_1200: 1203 INIT_1200: 1203 4800 |H | Short_Literal 0x0 1204 a7fb | | Store_Unchecked 0x3,-0x5 1205 e20e | | Load 0x1,0xe 1206 e7fd | | Load 0x3,-0x3 1207 8004 | | Call 0x0,0x4 1208 00d1 | | Pop_Control Pop_Count_1 1209 e20e | | Load 0x1,0xe 120a e7fc | | Load 0x3,-0x4 120b 8005 | | Call 0x0,0x5 120c 00d1 | | Pop_Control Pop_Count_1 120d e20e | | Load 0x1,0xe 120e e7fe | | Load 0x3,-0x2 120f 8006 | | Call 0x0,0x6 1210 00d1 | | Pop_Control Pop_Count_1 1211 8007 | | Call 0x0,0x7 1212 6807 |h | Jump_Zero 0x121a 1213 e7fe | | Load 0x3,-0x2 1214 e008 | | Load 0x0,0x8 1215 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 1216 7003 |p | Jump_Nonzero 0x121a 1217 4801 |H | Short_Literal 0x1 1218 a7fb | | Store_Unchecked 0x3,-0x5 1219 4501 |E | Exit_Suprogram New_Top_Offset 0x1 121a e009 | | Load 0x0,0x9 121b 6803 |h | Jump_Zero 0x121f 121c 4801 |H | Short_Literal 0x1 121d a7fb | | Store_Unchecked 0x3,-0x5 121e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 121f 00cf | | Action Mark_Auxiliary 1220 e00a | | Load 0x0,0xa 1221 4801 |H | Short_Literal 0x1 1222 0263 | c | Execute Discrete,Above_Bound 1223 700c |p | Jump_Nonzero 0x1230 1224 e7fd | | Load 0x3,-0x3 1225 00d9 | | Load_Top At_Offset_1 1226 e00b | | Load 0x0,0xb 1227 01d7 | | Execute Vector,Field_Read 1228 027f | | Execute Discrete,Equal 1229 6804 |h | Jump_Zero 0x122e 122a 4801 |H | Short_Literal 0x1 122b a7fb | | Store_Unchecked 0x3,-0x5 122c 00d2 | | Pop_Control Pop_Count_2 122d 7802 |x | Jump 0x1230 122e 00c8 | | Action Pop_Auxiliary_Range 122f 3ff4 |? | Loop_Increasing 0x1224 1230 00ce | | Action Pop_Auxiliary 1231 e7fe | | Load 0x3,-0x2 1232 800c | | Call 0x0,0xc 1233 7003 |p | Jump_Nonzero 0x1237 1234 e7fe | | Load 0x3,-0x2 1235 800d | | Call 0x0,0xd 1236 6802 |h | Jump_Zero 0x1239 1237 4801 |H | Short_Literal 0x1 1238 a7fb | | Store_Unchecked 0x3,-0x5 1239 e7fe | | Load 0x3,-0x2 123a 4801 |H | Short_Literal 0x1 123b e00e | | Load 0x0,0xe 123c e00f | | Load 0x0,0xf 123d 00ad | | QQ_Action Package,Field_Execute_Dynamic 123e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 123f ; -------------------------------------------------------------------------------------- 123f ; STRING TABLE 123f ; -------------------------------------------------------------------------------------- 123f 0088 | | .STRTAB 0x0088->0x1283 ; "LOCAL_UNCONSTRAINED" 1240 0099 | | .STRTAB 0x0099->0x128c ; "LOCAL_CONSTRAINED" 1241 00a8 | | .STRTAB 0x00a8->0x1295 ; "GLOBAL_UNCONSTRAINED" 1242 00ba | | .STRTAB 0x00ba->0x129f ; "GLOBAL_CONSTRAINED" 1243 00ca | | .STRTAB 0x00ca->0x12a8 ; "Trace requests" 1244 00d6 | | .STRTAB 0x00d6->0x12af ; "New task trace is on" 1245 00e8 | | .STRTAB 0x00e8->0x12b9 ; "Inform on task creation mode set" 1246 0106 | | .STRTAB 0x0106->0x12c9 ; "Global stop: " 1247 0111 | | .STRTAB 0x0111->0x12cf ; "Aid: " 1248 0114 | | .STRTAB 0x0114->0x12d2 ; "none" 1249 0116 | | .STRTAB 0x0116->0x12d4 ; "New task stop, action =" 124a 012b | + | .STRTAB 0x012b->0x12df ; "Holding initial registrants" 124b 0144 | D | .STRTAB 0x0144->0x12ed ; "Global stepping: " 124c 0153 | S | .STRTAB 0x0153->0x12f5 ; "Task = " 124d 0158 | X | .STRTAB 0x0158->0x12f9 ; " Count = " 124e 015f | _ | .STRTAB 0x015f->0x12fd ; " Frame restriction = #" 124f 0179 | y | .STRTAB 0x0179->0x130b ; " Action = " 1250 0181 | | .STRTAB 0x0181->0x1310 ; "Instruction stepping: " 1251 0195 | | .STRTAB 0x0195->0x131b ; "None" 1252 0197 | | .STRTAB 0x0197->0x131d ; "Breakpoints:" 1253 01a1 | | .STRTAB 0x01a1->0x1323 ; " Accelerator load failures: " 1254 01bc | | .STRTAB 0x01bc->0x1332 ; "Break on task creation mode set" 1255 01d9 | | .STRTAB 0x01d9->0x1341 ; "Exception Requests:" 1256 01ea | | .STRTAB 0x01ea->0x134b ; "History requests and status" 1257 0203 | | .STRTAB 0x0203->0x1358 ; "Next_Index = " 1258 020e | | .STRTAB 0x020e->0x135f ; ": Task : " 1259 0215 | | .STRTAB 0x0215->0x1363 ; "Exception Cache (tasks propagating)" 125a 0236 | 6 | .STRTAB 0x0236->0x1375 ; "Process_Action: exception: " 125b 024f | O | .STRTAB 0x024f->0x1382 ; "Creation_Register:" 125c 025f | _ | .STRTAB 0x025f->0x138b ; " [any inst]" 125d 0268 | h | .STRTAB 0x0268->0x1391 ; " [" 125e 0268 | h | .STRTAB 0x0268->0x1392 ; "]" 125f 0267 | g | .STRTAB 0x0267->0x1392 ; " [any sub]" 1260 026f | o | .STRTAB 0x026f->0x1397 ; " [any stmt]" 1261 0278 | x | .STRTAB 0x0278->0x139d ; ": " 1262 0278 | x | .STRTAB 0x0278->0x139e ; " Tracing" 1263 027e | ~ | .STRTAB 0x027e->0x13a2 ; " Exc Tracing" 1264 0288 | | .STRTAB 0x0288->0x13a8 ; " Stop, action=" 1265 0294 | | .STRTAB 0x0294->0x13af ; " Stepping: " 1266 029d | | .STRTAB 0x029d->0x13b4 ; " level=#" 1267 02a3 | | .STRTAB 0x02a3->0x13b8 ; " action=" 1268 02a9 | | .STRTAB 0x02a9->0x13bc ; " DB mask= " 1269 02b1 | | .STRTAB 0x02b1->0x13c1 ; " exc info:" 126a 02b9 | | .STRTAB 0x02b9->0x13c6 ; " " 126b 02b8 | | .STRTAB 0x02b8->0x13c7 ; "Task=all, Pc=" 126c 02c3 | | .STRTAB 0x02c3->0x13cd ; " Id=" 126d 02c5 | | .STRTAB 0x02c5->0x13cf ; " " 126e 02c5 | | .STRTAB 0x02c5->0x13d0 ; " /" 126f 02c5 | | .STRTAB 0x02c5->0x13d1 ; " T" 1270 02c6 | | .STRTAB 0x02c6->0x13d3 ; "Task: " 1271 02ca | | .STRTAB 0x02ca->0x13d6 ; " Pc=" 1272 02cc | | .STRTAB 0x02cc->0x13d8 ; "Id=" 1273 02cd | | .STRTAB 0x02cd->0x13d9 ; "all" 1274 02ce | | .STRTAB 0x02ce->0x13db ; " Pri=" 1275 02d1 | | .STRTAB 0x02d1->0x13dd ; " Action= " 1276 02d8 | | .STRTAB 0x02d8->0x13e2 ; "Propagate" 1277 02df | | .STRTAB 0x02df->0x13e6 ; "Catch" 1278 02e2 | | .STRTAB 0x02e2->0x13e9 ; "History" 1279 02e7 | | .STRTAB 0x02e7->0x13ec ; "Trace" 127a 02ea | | .STRTAB 0x02ea->0x13ef ; " Exc= " 127b 02ee | | .STRTAB 0x02ee->0x13f2 ; " Low = " 127c 02f3 | | .STRTAB 0x02f3->0x13f5 ; " High = " 127d 02f9 | | .STRTAB 0x02f9->0x13f9 ; " Action=" 127e 02ff | | .STRTAB 0x02ff->0x13fd ; "Action buffer overflow" 127f 0313 | | .STRTAB 0x0313->0x1408 ; "Aid= " 1280 0316 | | .STRTAB 0x0316->0x140b ; "Control.Inner.Creator" 1281 0329 | ) | .STRTAB 0x0329->0x1415 ; "Creator: exception:" 1282 033a | : | .STREND 0x033a->0x141f 1283 4c4f 4341 |LOCA| .STRTAB_STRINGS 141f 0000 | | .XXX[0x1] 1420 ; -------------------------------------------------------------------------------------- 1420 ; Debug Table 1420 ; -------------------------------------------------------------------------------------- 1420 0004 000d | | .DEBUG4 0x0004,0x000d,0x0376,0x0000,0x0001,0x0000 1426 a3a2 a722 | "| .XXX[0x7] 1428 a924 a197 | $ | 142a 24a7 2222 |$ ""| 142c ac00 | | 142d 0000 0000 | | .BLANK 0000[0x4] 1431 03e7 0800 | | .XXX[0x17] 1433 0790 0000 | | 1435 0218 0000 | | 1437 005e 0001 | ^ | 1439 0404 0000 | | 143b 0016 00b8 | | 143d a811 0000 | | 143f 12b2 0001 | | 1441 0404 0800 | | 1443 0280 0000 | | 1445 0008 0000 | | 1447 0008 | | 1448 0000 0000 | | .BLANK 0000[0x7] 144f 00ff 0001 | | .XXX[0x11] 1451 0404 0000 | | 1453 0016 00b8 | | 1455 a811 0000 | | 1457 12b2 0001 | | 1459 0404 0800 | | 145b 0280 0000 | | 145d 0010 0000 | | 145f 0010 | | 1460 0000 0000 | | .BLANK 0000[0x7] 1467 ffff 0000 | | .XXX[0x5] 1469 0000 0000 | | 146b 0076 | v | 146c 0000 0000 | | .BLANK 0000[0x4] 1470 000b 60e7 | ` | .XXX[0x10] 1472 8800 0780 | | 1474 0000 0018 | | 1476 0000 0018 | | 1478 0001 0804 | | 147a 0800 05ec | | 147c 000b 60e7 | ` | 147e 0000 007f | | 1480 0000 0000 | | .BLANK 0000[0x28] 14a8 00e5 4000 | @ | .XXX[0x2] 14aa 0000 0000 | | .BLANK 0000[0x24] 14ce 00f3 | | .XXX[0x1] 14cf 0000 0000 | | .BLANK 0000[0x27] 14f6 0003 bb80 | | .XXX[0x2] 14f8 0000 0000 | | .BLANK 0000[0x11] 1509 0003 9b80 | | .XXX[0x2] 150b 0000 0000 | | .BLANK 0000[0xd] 1518 3d78 |=x | .XXX[0x1] 1519 0000 0000 | | .BLANK 0000[0x46] 155f 03a8 | | .XXX[0x1] 1560 0000 0000 | | .BLANK 0000[0xd] 156d 003a 0800 | : | .XXX[0x2] 156f 0000 0000 | | .BLANK 0000[0x5] 1574 000f 0c00 | | .XXX[0x39] 1576 0000 0009 | | 1578 c000 0000 | | 157a 0000 0200 | | 157c 0000 002e | .| 157e e5d0 8900 | | 1580 05e1 9400 | | 1582 0000 005d | ]| 1584 ed80 0be3 | | 1586 6c18 e401 |l | 1588 8209 005e | ^| 158a 4240 177e |B@ ~| 158c b005 d930 | 0| 158e 0000 0000 | | 1590 0041 d816 | A | 1592 8000 0000 | | 1594 0018 0000 | | 1596 0000 baaf | | 1598 4ec5 c000 |N | 159a 0000 0000 | | 159c 0002 a800 | | 159e 0000 009d | | 15a0 8b80 2fb4 | / | 15a2 8000 0000 | | 15a4 0180 0000 | | 15a6 0001 1666 | f| 15a8 005f 2200 | _" | 15aa 0000 0005 | | 15ac d754 | T | 15ad 0000 0000 | | .BLANK 0000[0x8] 15b5 4447 0017 |DG | .XXX[0x2b] 15b7 c0e0 0000 | | 15b9 0003 3000 | 0 | 15bb 0000 0000 | | 15bd 0040 0000 | @ | 15bf 0005 ed46 | F| 15c1 1120 00be | | 15c3 4400 0000 |D | 15c5 000b dec8 | | 15c7 017f a283 | | 15c9 1c80 3041 | 0A| 15cb 200b e960 | `| 15cd 02f8 1c00 | | 15cf bd37 8000 | 7 | 15d1 0000 0008 | | 15d3 3b02 d000 |; | 15d5 0000 0003 | | 15d7 0000 0000 | | 15d9 1798 18b3 | | 15db 3002 ff7a |0 z| 15dd 0000 0000 | | 15df 2f3f |/? | 15e0 0000 0000 | | .BLANK 0000[0x8] 15e8 0222 3800 | "8 | .XXX[0x18] 15ea bfa1 8000 | | 15ec 0000 1540 | @| 15ee 0000 0000 | | 15f0 0002 0000 | | 15f2 0000 2fd0 | / | 15f4 d089 0005 | | 15f6 fef4 0000 | | 15f8 0000 5fc3 | _ | 15fa 8000 0004 | | 15fc 18e4 0182 | | 15fe 0900 6018 | ` |