|
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: 18432 (0x4800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦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 2210 |" | .CONST 0x2210 ; 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 8015 | | .CONST 0x8015 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00c1 | | .CONST 0x00c1 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 0093 00cb | | push_full_address INIT_00c8 000e 02a0 | | Declare_Subprogram Null_Subprogram 000f 038f | | Declare_Type Package,Defined,Visible 0010 0386 | | Declare_Variable Package,Visible 0011 00bf | | Action Accept_Activation 0012 4800 |H | Short_Literal 0x0 0013 0093 1b7b | {| push_full_address INIT_1b78 0015 02a0 | | Declare_Subprogram Null_Subprogram 0016 038e | | Declare_Type Package,Defined 0017 0387 | | Declare_Variable Package 0018 e002 | | Load 0x0,0x2 0019 4801 |H | Short_Literal 0x1 001a e20e | | Load 0x1,0xe 001b 020e | | Execute Module,Augment_Imports 001c 00d8 | | Load_Top At_Offset_0 001d 020f | | Execute Module,Activate 001e 4800 |H | Short_Literal 0x0 001f 0093 14c3 | | push_full_address INIT_14c0 0021 02a0 | | Declare_Subprogram Null_Subprogram 0022 038e | | Declare_Type Package,Defined 0023 0387 | | Declare_Variable Package 0024 e003 | | Load 0x0,0x3 0025 a004 | | Store_Unchecked 0x0,0x4 0026 e005 | | Load 0x0,0x5 0027 e006 | | Load 0x0,0x6 0028 e002 | | Load 0x0,0x2 0029 e007 | | Load 0x0,0x7 002a 4806 |H | Short_Literal 0x6 002b e20f | | Load 0x1,0xf 002c 020e | | Execute Module,Augment_Imports 002d 00d8 | | Load_Top At_Offset_0 002e 020f | | Execute Module,Activate 002f 4800 |H | Short_Literal 0x0 0030 0093 147b | {| push_full_address INIT_1478 0032 02a0 | | Declare_Subprogram Null_Subprogram 0033 038e | | Declare_Type Package,Defined 0034 0387 | | Declare_Variable Package 0035 e20f | | Load 0x1,0xf 0036 1916 | | Execute Package,Field_Reference,Field_Number 0x16 0037 e20f | | Load 0x1,0xf 0038 1918 | | Execute Package,Field_Reference,Field_Number 0x18 0039 4802 |H | Short_Literal 0x2 003a e210 | | Load 0x1,0x10 003b 020e | | Execute Module,Augment_Imports 003c 00d8 | | Load_Top At_Offset_0 003d 020f | | Execute Module,Activate 003e a008 | | Store_Unchecked 0x0,0x8 003f e009 | | Load 0x0,0x9 0040 e00a | | Load 0x0,0xa 0041 e005 | | Load 0x0,0x5 0042 e00b | | Load 0x0,0xb 0043 e00c | | Load 0x0,0xc 0044 e00d | | Load 0x0,0xd 0045 e00e | | Load 0x0,0xe 0046 e00f | | Load 0x0,0xf 0047 e010 | | Load 0x0,0x10 0048 e011 | | Load 0x0,0x11 0049 e012 | | Load 0x0,0x12 004a e013 | | Load 0x0,0x13 004b e014 | | Load 0x0,0x14 004c e015 | | Load 0x0,0x15 004d e016 | | Load 0x0,0x16 004e e017 | | Load 0x0,0x17 004f e018 | | Load 0x0,0x18 0050 e019 | | Load 0x0,0x19 0051 e01a | | Load 0x0,0x1a 0052 e01b | | Load 0x0,0x1b 0053 e01c | | Load 0x0,0x1c 0054 e01d | | Load 0x0,0x1d 0055 e01e | | Load 0x0,0x1e 0056 e01f | | Load 0x0,0x1f 0057 e020 | | Load 0x0,0x20 0058 e021 | ! | Load 0x0,0x21 0059 e022 | " | Load 0x0,0x22 005a e023 | # | Load 0x0,0x23 005b e024 | $ | Load 0x0,0x24 005c e025 | % | Load 0x0,0x25 005d e026 | & | Load 0x0,0x26 005e e027 | ' | Load 0x0,0x27 005f e028 | ( | Load 0x0,0x28 0060 e029 | ) | Load 0x0,0x29 0061 e02a | * | Load 0x0,0x2a 0062 e02b | + | Load 0x0,0x2b 0063 e02c | , | Load 0x0,0x2c 0064 e02d | - | Load 0x0,0x2d 0065 e02e | . | Load 0x0,0x2e 0066 e02f | / | Load 0x0,0x2f 0067 e030 | 0 | Load 0x0,0x30 0068 e031 | 1 | Load 0x0,0x31 0069 e032 | 2 | Load 0x0,0x32 006a e033 | 3 | Load 0x0,0x33 006b e034 | 4 | Load 0x0,0x34 006c e035 | 5 | Load 0x0,0x35 006d e036 | 6 | Load 0x0,0x36 006e e037 | 7 | Load 0x0,0x37 006f e038 | 8 | Load 0x0,0x38 0070 e039 | 9 | Load 0x0,0x39 0071 e03a | : | Load 0x0,0x3a 0072 e03b | ; | Load 0x0,0x3b 0073 e03c | < | Load 0x0,0x3c 0074 e03d | = | Load 0x0,0x3d 0075 e03e | > | Load 0x0,0x3e 0076 e03f | ? | Load 0x0,0x3f 0077 e040 | @ | Load 0x0,0x40 0078 e041 | A | Load 0x0,0x41 0079 e042 | B | Load 0x0,0x42 007a e043 | C | Load 0x0,0x43 007b e044 | D | Load 0x0,0x44 007c e045 | E | Load 0x0,0x45 007d e046 | F | Load 0x0,0x46 007e e047 | G | Load 0x0,0x47 007f e048 | H | Load 0x0,0x48 0080 e049 | I | Load 0x0,0x49 0081 e04a | J | Load 0x0,0x4a 0082 e04b | K | Load 0x0,0x4b 0083 e04c | L | Load 0x0,0x4c 0084 e20f | | Load 0x1,0xf 0085 1918 | | Execute Package,Field_Reference,Field_Number 0x18 0086 e04d | M | Load 0x0,0x4d 0087 e04e | N | Load 0x0,0x4e 0088 e20f | | Load 0x1,0xf 0089 1916 | | Execute Package,Field_Reference,Field_Number 0x16 008a e20f | | Load 0x1,0xf 008b 1917 | | Execute Package,Field_Reference,Field_Number 0x17 008c e210 | | Load 0x1,0x10 008d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008e 190d | | Execute Package,Field_Reference,Field_Number 0xd 008f e20f | | Load 0x1,0xf 0090 190f | | Execute Package,Field_Reference,Field_Number 0xf 0091 e20f | | Load 0x1,0xf 0092 190d | | Execute Package,Field_Reference,Field_Number 0xd 0093 e20f | | Load 0x1,0xf 0094 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0095 e04f | O | Load 0x0,0x4f 0096 e210 | | Load 0x1,0x10 0097 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0098 190e | | Execute Package,Field_Reference,Field_Number 0xe 0099 e20f | | Load 0x1,0xf 009a 190e | | Execute Package,Field_Reference,Field_Number 0xe 009b e050 | P | Load 0x0,0x50 009c a051 | Q | Store_Unchecked 0x0,0x51 009d a052 | R | Store_Unchecked 0x0,0x52 009e e20f | | Load 0x1,0xf 009f 191a | | Execute Package,Field_Reference,Field_Number 0x1a 00a0 e053 | S | Load 0x0,0x53 00a1 e007 | | Load 0x0,0x7 00a2 e20f | | Load 0x1,0xf 00a3 1911 | | Execute Package,Field_Reference,Field_Number 0x11 00a4 a054 | T | Store_Unchecked 0x0,0x54 00a5 a055 | U | Store_Unchecked 0x0,0x55 00a6 e056 | V | Load 0x0,0x56 00a7 e057 | W | Load 0x0,0x57 00a8 e058 | X | Load 0x0,0x58 00a9 e20e | | Load 0x1,0xe 00aa 190d | | Execute Package,Field_Reference,Field_Number 0xd 00ab e20e | | Load 0x1,0xe 00ac 190e | | Execute Package,Field_Reference,Field_Number 0xe 00ad e20f | | Load 0x1,0xf 00ae 1914 | | Execute Package,Field_Reference,Field_Number 0x14 00af e20f | | Load 0x1,0xf 00b0 1910 | | Execute Package,Field_Reference,Field_Number 0x10 00b1 e20f | | Load 0x1,0xf 00b2 1919 | | Execute Package,Field_Reference,Field_Number 0x19 00b3 e20f | | Load 0x1,0xf 00b4 1915 | | Execute Package,Field_Reference,Field_Number 0x15 00b5 e210 | | Load 0x1,0x10 00b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b7 190f | | Execute Package,Field_Reference,Field_Number 0xf 00b8 e20f | | Load 0x1,0xf 00b9 1913 | | Execute Package,Field_Reference,Field_Number 0x13 00ba e059 | Y | Load 0x0,0x59 00bb e05a | Z | Load 0x0,0x5a 00bc 4868 |Hh | Short_Literal 0x68 00bd e20d | | Load 0x1,0xd 00be 020e | | Execute Module,Augment_Imports 00bf e20d | | Load 0x1,0xd 00c0 020f | | Execute Module,Activate 00c1 BODY_0008: 00c1 4850 |HP | Short_Literal 0x50 00c2 e20d | | Load 0x1,0xd 00c3 1a0d | | Execute Package,Field_Write,Field_Number 0xd 00c4 00bc | | Action Signal_Activated 00c5 00bb | | Action Signal_Completion 00c6 0000 0000 | | .XXX[0x2] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 0141 | A | .CONST 0x0141 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 000e | | .CONST 0x000e ; Number of locals 00cb INIT_00c8: 00cb 00e4 | | Load_Encached Positive_Cache 00cc 0129 | ) | Execute Any,Make_Visible 00cd 4800 |H | Short_Literal 0x0 00ce 0093 014b | K| push_full_address INIT_0148 00d0 02a0 | | Declare_Subprogram Null_Subprogram 00d1 038f | | Declare_Type Package,Defined,Visible 00d2 0386 | | Declare_Variable Package,Visible 00d3 00bf | | Action Accept_Activation 00d4 a001 | | Store_Unchecked 0x0,0x1 00d5 e002 | | Load 0x0,0x2 00d6 e003 | | Load 0x0,0x3 00d7 e004 | | Load 0x0,0x4 00d8 e005 | | Load 0x0,0x5 00d9 e006 | | Load 0x0,0x6 00da e007 | | Load 0x0,0x7 00db e008 | | Load 0x0,0x8 00dc e009 | | Load 0x0,0x9 00dd e00a | | Load 0x0,0xa 00de e00b | | Load 0x0,0xb 00df e00c | | Load 0x0,0xc 00e0 e00d | | Load 0x0,0xd 00e1 e00e | | Load 0x0,0xe 00e2 e00f | | Load 0x0,0xf 00e3 e010 | | Load 0x0,0x10 00e4 e011 | | Load 0x0,0x11 00e5 e012 | | Load 0x0,0x12 00e6 e013 | | Load 0x0,0x13 00e7 e014 | | Load 0x0,0x14 00e8 e015 | | Load 0x0,0x15 00e9 e016 | | Load 0x0,0x16 00ea e017 | | Load 0x0,0x17 00eb e018 | | Load 0x0,0x18 00ec e019 | | Load 0x0,0x19 00ed e01a | | Load 0x0,0x1a 00ee e01b | | Load 0x0,0x1b 00ef e01c | | Load 0x0,0x1c 00f0 e01d | | Load 0x0,0x1d 00f1 e01e | | Load 0x0,0x1e 00f2 e01f | | Load 0x0,0x1f 00f3 e020 | | Load 0x0,0x20 00f4 e021 | ! | Load 0x0,0x21 00f5 e022 | " | Load 0x0,0x22 00f6 e023 | # | Load 0x0,0x23 00f7 e024 | $ | Load 0x0,0x24 00f8 e025 | % | Load 0x0,0x25 00f9 e026 | & | Load 0x0,0x26 00fa e027 | ' | Load 0x0,0x27 00fb e028 | ( | Load 0x0,0x28 00fc e029 | ) | Load 0x0,0x29 00fd e02a | * | Load 0x0,0x2a 00fe e02b | + | Load 0x0,0x2b 00ff e02c | , | Load 0x0,0x2c 0100 e02d | - | Load 0x0,0x2d 0101 e02e | . | Load 0x0,0x2e 0102 e02f | / | Load 0x0,0x2f 0103 e030 | 0 | Load 0x0,0x30 0104 e031 | 1 | Load 0x0,0x31 0105 e032 | 2 | Load 0x0,0x32 0106 e033 | 3 | Load 0x0,0x33 0107 e034 | 4 | Load 0x0,0x34 0108 e035 | 5 | Load 0x0,0x35 0109 e036 | 6 | Load 0x0,0x36 010a e037 | 7 | Load 0x0,0x37 010b e038 | 8 | Load 0x0,0x38 010c e039 | 9 | Load 0x0,0x39 010d e03a | : | Load 0x0,0x3a 010e e03b | ; | Load 0x0,0x3b 010f e03c | < | Load 0x0,0x3c 0110 e03d | = | Load 0x0,0x3d 0111 e03e | > | Load 0x0,0x3e 0112 e03f | ? | Load 0x0,0x3f 0113 e040 | @ | Load 0x0,0x40 0114 e041 | A | Load 0x0,0x41 0115 e042 | B | Load 0x0,0x42 0116 e043 | C | Load 0x0,0x43 0117 e044 | D | Load 0x0,0x44 0118 e045 | E | Load 0x0,0x45 0119 e046 | F | Load 0x0,0x46 011a a047 | G | Store_Unchecked 0x0,0x47 011b e048 | H | Load 0x0,0x48 011c e049 | I | Load 0x0,0x49 011d a04a | J | Store_Unchecked 0x0,0x4a 011e a04b | K | Store_Unchecked 0x0,0x4b 011f a04c | L | Store_Unchecked 0x0,0x4c 0120 a04d | M | Store_Unchecked 0x0,0x4d 0121 a04e | N | Store_Unchecked 0x0,0x4e 0122 a04f | O | Store_Unchecked 0x0,0x4f 0123 e050 | P | Load 0x0,0x50 0124 a051 | Q | Store_Unchecked 0x0,0x51 0125 a052 | R | Store_Unchecked 0x0,0x52 0126 e053 | S | Load 0x0,0x53 0127 a054 | T | Store_Unchecked 0x0,0x54 0128 a055 | U | Store_Unchecked 0x0,0x55 0129 a056 | V | Store_Unchecked 0x0,0x56 012a e057 | W | Load 0x0,0x57 012b e058 | X | Load 0x0,0x58 012c a059 | Y | Store_Unchecked 0x0,0x59 012d a05a | Z | Store_Unchecked 0x0,0x5a 012e a05b | [ | Store_Unchecked 0x0,0x5b 012f e05c | \ | Load 0x0,0x5c 0130 e05d | ] | Load 0x0,0x5d 0131 e05e | ^ | Load 0x0,0x5e 0132 a05f | _ | Store_Unchecked 0x0,0x5f 0133 a060 | ` | Store_Unchecked 0x0,0x60 0134 a061 | a | Store_Unchecked 0x0,0x61 0135 a062 | b | Store_Unchecked 0x0,0x62 0136 a063 | c | Store_Unchecked 0x0,0x63 0137 a064 | d | Store_Unchecked 0x0,0x64 0138 a065 | e | Store_Unchecked 0x0,0x65 0139 a066 | f | Store_Unchecked 0x0,0x66 013a e067 | g | Load 0x0,0x67 013b e068 | h | Load 0x0,0x68 013c 4868 |Hh | Short_Literal 0x68 013d e20e | | Load 0x1,0xe 013e 020e | | Execute Module,Augment_Imports 013f 00d8 | | Load_Top At_Offset_0 0140 020f | | Execute Module,Activate 0141 BODY_00c8: 0141 00bc | | Action Signal_Activated 0142 00bb | | Action Signal_Completion 0143 0000 0000 | | .BLANK 0000[0x5] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0400 | | .CONST 0x0400 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 00fb | | .CONST 0x00fb ; Number of locals 014b INIT_0148: 014b 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated 014d 00bf | | Action Accept_Activation 014e 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call 0150 029d 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call 0152 029d 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call 0154 029d 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call 0156 029d 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call 0158 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call 015a 029d 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call 015c 029d 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call 015e 029d 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call 0160 029d 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call 0162 029d 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call 0164 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call 0166 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call 0168 029d 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call 016a 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call 016c 029d 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call 016e 029d 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call 0170 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call 0172 029d 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call 0174 029d 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call 0176 029d 061b | | Declare_Subprogram INIT_0618,For_Outer_Call 0178 029d 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call 017a 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call 017c 029d 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call 017e 029d 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call 0180 029d 069b | | Declare_Subprogram INIT_0698,For_Outer_Call 0182 029d 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call 0184 029d 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call 0186 029d 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call 0188 029d 071b | | Declare_Subprogram INIT_0718,For_Outer_Call 018a 029d 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call 018c 029d 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call 018e 029d 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call 0190 029d 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call 0192 029d 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call 0194 029d 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call 0196 029d 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call 0198 029d 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call 019a 029d 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call 019c 029d 077b | {| Declare_Subprogram INIT_0778,For_Outer_Call 019e 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call 01a0 029d 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call 01a2 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call 01a4 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call 01a6 029d 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call 01a8 029d 07fb | | Declare_Subprogram INIT_07f8,For_Outer_Call 01aa 029d 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call 01ac 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call 01ae 029d 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call 01b0 029d 0863 | c| Declare_Subprogram INIT_0860,For_Outer_Call 01b2 029d 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call 01b4 029d 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call 01b6 029d 08bb | | Declare_Subprogram INIT_08b8,For_Outer_Call 01b8 029d 08d3 | | Declare_Subprogram INIT_08d0,For_Outer_Call 01ba 029d 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call 01bc 029d 090b | | Declare_Subprogram INIT_0908,For_Outer_Call 01be 029d 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call 01c0 029d 096b | k| Declare_Subprogram INIT_0968,For_Outer_Call 01c2 029d 097b | {| Declare_Subprogram INIT_0978,For_Outer_Call 01c4 029d 0983 | | Declare_Subprogram INIT_0980,For_Outer_Call 01c6 029d 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call 01c8 029d 09cb | | Declare_Subprogram INIT_09c8,For_Outer_Call 01ca 029d 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call 01cc 029d 0a0b | | Declare_Subprogram INIT_0a08,For_Outer_Call 01ce 029d 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call 01d0 029d 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call 01d2 029d 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call 01d4 029d 0a7b | {| Declare_Subprogram INIT_0a78,For_Outer_Call 01d6 029d 0a8b | | Declare_Subprogram INIT_0a88,For_Outer_Call 01d8 029d 0a93 | | Declare_Subprogram INIT_0a90,For_Outer_Call 01da 029d 0a9b | | Declare_Subprogram INIT_0a98,For_Outer_Call 01dc 029d 0ab3 | | Declare_Subprogram INIT_0ab0,For_Outer_Call 01de 029d 0acb | | Declare_Subprogram INIT_0ac8,For_Outer_Call 01e0 029d 0ae3 | | Declare_Subprogram INIT_0ae0,For_Outer_Call 01e2 029d 0b03 | | Declare_Subprogram INIT_0b00,For_Outer_Call 01e4 029d 0b23 | #| Declare_Subprogram INIT_0b20,For_Outer_Call 01e6 029d 0b2b | +| Declare_Subprogram INIT_0b28,For_Outer_Call 01e8 029d 0b6b | k| Declare_Subprogram INIT_0b68,For_Outer_Call 01ea 029d 0b8b | | Declare_Subprogram INIT_0b88,For_Outer_Call 01ec 029d 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call 01ee a001 | | Store_Unchecked 0x0,0x1 01ef 00c6 | | Action Check_Subprogram_Elaborated 01f0 e002 | | Load 0x0,0x2 01f1 e003 | | Load 0x0,0x3 01f2 0093 0000 | | push_full_address 0x0 01f4 62af |b | Indirect_Literal Discrete,0x4a4,{0x80000000, 0x00210000} 01f5 0273 | s | Execute Discrete,Plus 01f6 e004 | | Load 0x0,0x4 01f7 0273 | s | Execute Discrete,Plus 01f8 e005 | | Load 0x0,0x5 01f9 0273 | s | Execute Discrete,Plus 01fa 4800 |H | Short_Literal 0x0 01fb 0007 | | Action Break_Optional 01fc a001 | | Store_Unchecked 0x0,0x1 01fd 00c6 | | Action Check_Subprogram_Elaborated 01fe e002 | | Load 0x0,0x2 01ff e006 | | Load 0x0,0x6 0200 0093 0000 | | push_full_address 0x0 0202 629d |b | Indirect_Literal Discrete,0x4a0,{0x80000000, 0x00200000} 0203 0273 | s | Execute Discrete,Plus 0204 e004 | | Load 0x0,0x4 0205 0273 | s | Execute Discrete,Plus 0206 e007 | | Load 0x0,0x7 0207 0273 | s | Execute Discrete,Plus 0208 4800 |H | Short_Literal 0x0 0209 0007 | | Action Break_Optional 020a a001 | | Store_Unchecked 0x0,0x1 020b 00c6 | | Action Check_Subprogram_Elaborated 020c e002 | | Load 0x0,0x2 020d e008 | | Load 0x0,0x8 020e 0093 0000 | | push_full_address 0x0 0210 628b |b | Indirect_Literal Discrete,0x49c,{0x80000000, 0x001f0000} 0211 0273 | s | Execute Discrete,Plus 0212 e004 | | Load 0x0,0x4 0213 0273 | s | Execute Discrete,Plus 0214 e009 | | Load 0x0,0x9 0215 0273 | s | Execute Discrete,Plus 0216 4800 |H | Short_Literal 0x0 0217 0007 | | Action Break_Optional 0218 a001 | | Store_Unchecked 0x0,0x1 0219 00c6 | | Action Check_Subprogram_Elaborated 021a e002 | | Load 0x0,0x2 021b e00a | | Load 0x0,0xa 021c 0093 0000 | | push_full_address 0x0 021e 6279 |by | Indirect_Literal Discrete,0x498,{0x80000000, 0x001e0000} 021f 0273 | s | Execute Discrete,Plus 0220 e004 | | Load 0x0,0x4 0221 0273 | s | Execute Discrete,Plus 0222 e00b | | Load 0x0,0xb 0223 0273 | s | Execute Discrete,Plus 0224 4800 |H | Short_Literal 0x0 0225 0007 | | Action Break_Optional 0226 a001 | | Store_Unchecked 0x0,0x1 0227 00c6 | | Action Check_Subprogram_Elaborated 0228 e002 | | Load 0x0,0x2 0229 e00c | | Load 0x0,0xc 022a 0093 0000 | | push_full_address 0x0 022c 6267 |bg | Indirect_Literal Discrete,0x494,{0x80000000, 0x001d0000} 022d 0273 | s | Execute Discrete,Plus 022e e004 | | Load 0x0,0x4 022f 0273 | s | Execute Discrete,Plus 0230 e00d | | Load 0x0,0xd 0231 0273 | s | Execute Discrete,Plus 0232 4800 |H | Short_Literal 0x0 0233 0007 | | Action Break_Optional 0234 a001 | | Store_Unchecked 0x0,0x1 0235 00c6 | | Action Check_Subprogram_Elaborated 0236 e002 | | Load 0x0,0x2 0237 e00e | | Load 0x0,0xe 0238 0093 0000 | | push_full_address 0x0 023a 6255 |bU | Indirect_Literal Discrete,0x490,{0x80000000, 0x001c0000} 023b 0273 | s | Execute Discrete,Plus 023c e004 | | Load 0x0,0x4 023d 0273 | s | Execute Discrete,Plus 023e e00f | | Load 0x0,0xf 023f 0273 | s | Execute Discrete,Plus 0240 4800 |H | Short_Literal 0x0 0241 0007 | | Action Break_Optional 0242 a001 | | Store_Unchecked 0x0,0x1 0243 00c6 | | Action Check_Subprogram_Elaborated 0244 e002 | | Load 0x0,0x2 0245 e010 | | Load 0x0,0x10 0246 0093 0000 | | push_full_address 0x0 0248 6243 |bC | Indirect_Literal Discrete,0x48c,{0x80000000, 0x001b0000} 0249 0273 | s | Execute Discrete,Plus 024a e004 | | Load 0x0,0x4 024b 0273 | s | Execute Discrete,Plus 024c e011 | | Load 0x0,0x11 024d 0273 | s | Execute Discrete,Plus 024e 4800 |H | Short_Literal 0x0 024f 0007 | | Action Break_Optional 0250 a001 | | Store_Unchecked 0x0,0x1 0251 00c6 | | Action Check_Subprogram_Elaborated 0252 e002 | | Load 0x0,0x2 0253 e012 | | Load 0x0,0x12 0254 0093 0000 | | push_full_address 0x0 0256 6231 |b1 | Indirect_Literal Discrete,0x488,{0x80000000, 0x001a0000} 0257 0273 | s | Execute Discrete,Plus 0258 e004 | | Load 0x0,0x4 0259 0273 | s | Execute Discrete,Plus 025a e013 | | Load 0x0,0x13 025b 0273 | s | Execute Discrete,Plus 025c 4800 |H | Short_Literal 0x0 025d 0007 | | Action Break_Optional 025e a001 | | Store_Unchecked 0x0,0x1 025f 00c6 | | Action Check_Subprogram_Elaborated 0260 e002 | | Load 0x0,0x2 0261 e014 | | Load 0x0,0x14 0262 0093 0000 | | push_full_address 0x0 0264 621f |b | Indirect_Literal Discrete,0x484,{0x80000000, 0x00190000} 0265 0273 | s | Execute Discrete,Plus 0266 e004 | | Load 0x0,0x4 0267 0273 | s | Execute Discrete,Plus 0268 e015 | | Load 0x0,0x15 0269 0273 | s | Execute Discrete,Plus 026a 4800 |H | Short_Literal 0x0 026b 0007 | | Action Break_Optional 026c a001 | | Store_Unchecked 0x0,0x1 026d 00c6 | | Action Check_Subprogram_Elaborated 026e e002 | | Load 0x0,0x2 026f e016 | | Load 0x0,0x16 0270 0093 0000 | | push_full_address 0x0 0272 620d |b | Indirect_Literal Discrete,0x480,{0x80000000, 0x00180000} 0273 0273 | s | Execute Discrete,Plus 0274 e004 | | Load 0x0,0x4 0275 0273 | s | Execute Discrete,Plus 0276 e017 | | Load 0x0,0x17 0277 0273 | s | Execute Discrete,Plus 0278 4800 |H | Short_Literal 0x0 0279 0007 | | Action Break_Optional 027a a001 | | Store_Unchecked 0x0,0x1 027b 00c6 | | Action Check_Subprogram_Elaborated 027c e002 | | Load 0x0,0x2 027d e018 | | Load 0x0,0x18 027e 0093 0000 | | push_full_address 0x0 0280 61fb |a | Indirect_Literal Discrete,0x47c,{0x80000000, 0x00170000} 0281 0273 | s | Execute Discrete,Plus 0282 e004 | | Load 0x0,0x4 0283 0273 | s | Execute Discrete,Plus 0284 e019 | | Load 0x0,0x19 0285 0273 | s | Execute Discrete,Plus 0286 4800 |H | Short_Literal 0x0 0287 0007 | | Action Break_Optional 0288 a001 | | Store_Unchecked 0x0,0x1 0289 00c6 | | Action Check_Subprogram_Elaborated 028a e002 | | Load 0x0,0x2 028b e01a | | Load 0x0,0x1a 028c 0093 0000 | | push_full_address 0x0 028e 61e9 |a | Indirect_Literal Discrete,0x478,{0x80000000, 0x00160000} 028f 0273 | s | Execute Discrete,Plus 0290 e004 | | Load 0x0,0x4 0291 0273 | s | Execute Discrete,Plus 0292 e01b | | Load 0x0,0x1b 0293 0273 | s | Execute Discrete,Plus 0294 4800 |H | Short_Literal 0x0 0295 0007 | | Action Break_Optional 0296 a001 | | Store_Unchecked 0x0,0x1 0297 00c6 | | Action Check_Subprogram_Elaborated 0298 e002 | | Load 0x0,0x2 0299 e01c | | Load 0x0,0x1c 029a 0093 0000 | | push_full_address 0x0 029c 61d7 |a | Indirect_Literal Discrete,0x474,{0x80000000, 0x00150000} 029d 0273 | s | Execute Discrete,Plus 029e e004 | | Load 0x0,0x4 029f 0273 | s | Execute Discrete,Plus 02a0 e01d | | Load 0x0,0x1d 02a1 0273 | s | Execute Discrete,Plus 02a2 4800 |H | Short_Literal 0x0 02a3 0007 | | Action Break_Optional 02a4 a001 | | Store_Unchecked 0x0,0x1 02a5 00c6 | | Action Check_Subprogram_Elaborated 02a6 e002 | | Load 0x0,0x2 02a7 e01e | | Load 0x0,0x1e 02a8 0093 0000 | | push_full_address 0x0 02aa 61c5 |a | Indirect_Literal Discrete,0x470,{0x80000000, 0x00140000} 02ab 0273 | s | Execute Discrete,Plus 02ac e004 | | Load 0x0,0x4 02ad 0273 | s | Execute Discrete,Plus 02ae e01f | | Load 0x0,0x1f 02af 0273 | s | Execute Discrete,Plus 02b0 4800 |H | Short_Literal 0x0 02b1 0007 | | Action Break_Optional 02b2 a001 | | Store_Unchecked 0x0,0x1 02b3 00c6 | | Action Check_Subprogram_Elaborated 02b4 e002 | | Load 0x0,0x2 02b5 e020 | | Load 0x0,0x20 02b6 0093 0000 | | push_full_address 0x0 02b8 61b3 |a | Indirect_Literal Discrete,0x46c,{0x80000000, 0x00130000} 02b9 0273 | s | Execute Discrete,Plus 02ba e004 | | Load 0x0,0x4 02bb 0273 | s | Execute Discrete,Plus 02bc e021 | ! | Load 0x0,0x21 02bd 0273 | s | Execute Discrete,Plus 02be 4800 |H | Short_Literal 0x0 02bf 0007 | | Action Break_Optional 02c0 a001 | | Store_Unchecked 0x0,0x1 02c1 00c6 | | Action Check_Subprogram_Elaborated 02c2 e002 | | Load 0x0,0x2 02c3 e022 | " | Load 0x0,0x22 02c4 0093 0000 | | push_full_address 0x0 02c6 61a1 |a | Indirect_Literal Discrete,0x468,{0x80000000, 0x00120000} 02c7 0273 | s | Execute Discrete,Plus 02c8 e004 | | Load 0x0,0x4 02c9 0273 | s | Execute Discrete,Plus 02ca e023 | # | Load 0x0,0x23 02cb 0273 | s | Execute Discrete,Plus 02cc 4800 |H | Short_Literal 0x0 02cd 0007 | | Action Break_Optional 02ce a001 | | Store_Unchecked 0x0,0x1 02cf 00c6 | | Action Check_Subprogram_Elaborated 02d0 e002 | | Load 0x0,0x2 02d1 e024 | $ | Load 0x0,0x24 02d2 0093 0000 | | push_full_address 0x0 02d4 618f |a | Indirect_Literal Discrete,0x464,{0x80000000, 0x00110000} 02d5 0273 | s | Execute Discrete,Plus 02d6 e004 | | Load 0x0,0x4 02d7 0273 | s | Execute Discrete,Plus 02d8 e025 | % | Load 0x0,0x25 02d9 0273 | s | Execute Discrete,Plus 02da 4800 |H | Short_Literal 0x0 02db 0007 | | Action Break_Optional 02dc a001 | | Store_Unchecked 0x0,0x1 02dd 00c6 | | Action Check_Subprogram_Elaborated 02de e002 | | Load 0x0,0x2 02df e026 | & | Load 0x0,0x26 02e0 0093 0000 | | push_full_address 0x0 02e2 617d |a} | Indirect_Literal Discrete,0x460,{0x80000000, 0x00100000} 02e3 0273 | s | Execute Discrete,Plus 02e4 e004 | | Load 0x0,0x4 02e5 0273 | s | Execute Discrete,Plus 02e6 e027 | ' | Load 0x0,0x27 02e7 0273 | s | Execute Discrete,Plus 02e8 4800 |H | Short_Literal 0x0 02e9 0007 | | Action Break_Optional 02ea a001 | | Store_Unchecked 0x0,0x1 02eb 00c6 | | Action Check_Subprogram_Elaborated 02ec e002 | | Load 0x0,0x2 02ed e028 | ( | Load 0x0,0x28 02ee 0093 0000 | | push_full_address 0x0 02f0 616b |ak | Indirect_Literal Discrete,0x45c,{0x80000000, 0x000f0000} 02f1 0273 | s | Execute Discrete,Plus 02f2 e004 | | Load 0x0,0x4 02f3 0273 | s | Execute Discrete,Plus 02f4 e029 | ) | Load 0x0,0x29 02f5 0273 | s | Execute Discrete,Plus 02f6 4800 |H | Short_Literal 0x0 02f7 0007 | | Action Break_Optional 02f8 a001 | | Store_Unchecked 0x0,0x1 02f9 00c6 | | Action Check_Subprogram_Elaborated 02fa e002 | | Load 0x0,0x2 02fb e02a | * | Load 0x0,0x2a 02fc 0093 0000 | | push_full_address 0x0 02fe 6159 |aY | Indirect_Literal Discrete,0x458,{0x80000000, 0x000e0000} 02ff 0273 | s | Execute Discrete,Plus 0300 e004 | | Load 0x0,0x4 0301 0273 | s | Execute Discrete,Plus 0302 e02b | + | Load 0x0,0x2b 0303 0273 | s | Execute Discrete,Plus 0304 4800 |H | Short_Literal 0x0 0305 0007 | | Action Break_Optional 0306 a001 | | Store_Unchecked 0x0,0x1 0307 00c6 | | Action Check_Subprogram_Elaborated 0308 e002 | | Load 0x0,0x2 0309 e02c | , | Load 0x0,0x2c 030a 0093 0000 | | push_full_address 0x0 030c 6147 |aG | Indirect_Literal Discrete,0x454,{0x80000000, 0x000d0000} 030d 0273 | s | Execute Discrete,Plus 030e e004 | | Load 0x0,0x4 030f 0273 | s | Execute Discrete,Plus 0310 e02d | - | Load 0x0,0x2d 0311 0273 | s | Execute Discrete,Plus 0312 4800 |H | Short_Literal 0x0 0313 0007 | | Action Break_Optional 0314 a001 | | Store_Unchecked 0x0,0x1 0315 00c6 | | Action Check_Subprogram_Elaborated 0316 e002 | | Load 0x0,0x2 0317 e02e | . | Load 0x0,0x2e 0318 0093 0000 | | push_full_address 0x0 031a 6135 |a5 | Indirect_Literal Discrete,0x450,{0x80000000, 0x000c0000} 031b 0273 | s | Execute Discrete,Plus 031c e004 | | Load 0x0,0x4 031d 0273 | s | Execute Discrete,Plus 031e e02f | / | Load 0x0,0x2f 031f 0273 | s | Execute Discrete,Plus 0320 4800 |H | Short_Literal 0x0 0321 0007 | | Action Break_Optional 0322 a001 | | Store_Unchecked 0x0,0x1 0323 00c6 | | Action Check_Subprogram_Elaborated 0324 e002 | | Load 0x0,0x2 0325 e030 | 0 | Load 0x0,0x30 0326 0093 0000 | | push_full_address 0x0 0328 6123 |a# | Indirect_Literal Discrete,0x44c,{0x80000000, 0x000b0000} 0329 0273 | s | Execute Discrete,Plus 032a e004 | | Load 0x0,0x4 032b 0273 | s | Execute Discrete,Plus 032c e031 | 1 | Load 0x0,0x31 032d 0273 | s | Execute Discrete,Plus 032e 4800 |H | Short_Literal 0x0 032f 0007 | | Action Break_Optional 0330 a001 | | Store_Unchecked 0x0,0x1 0331 00c6 | | Action Check_Subprogram_Elaborated 0332 e002 | | Load 0x0,0x2 0333 e032 | 2 | Load 0x0,0x32 0334 0093 0000 | | push_full_address 0x0 0336 6111 |a | Indirect_Literal Discrete,0x448,{0x80000000, 0x000a0000} 0337 0273 | s | Execute Discrete,Plus 0338 e004 | | Load 0x0,0x4 0339 0273 | s | Execute Discrete,Plus 033a e033 | 3 | Load 0x0,0x33 033b 0273 | s | Execute Discrete,Plus 033c 4800 |H | Short_Literal 0x0 033d 0007 | | Action Break_Optional 033e a001 | | Store_Unchecked 0x0,0x1 033f 00c6 | | Action Check_Subprogram_Elaborated 0340 e002 | | Load 0x0,0x2 0341 e034 | 4 | Load 0x0,0x34 0342 0093 0000 | | push_full_address 0x0 0344 60ff |` | Indirect_Literal Discrete,0x444,{0x80000000, 0x00090000} 0345 0273 | s | Execute Discrete,Plus 0346 e004 | | Load 0x0,0x4 0347 0273 | s | Execute Discrete,Plus 0348 e035 | 5 | Load 0x0,0x35 0349 0273 | s | Execute Discrete,Plus 034a 4800 |H | Short_Literal 0x0 034b 0007 | | Action Break_Optional 034c a001 | | Store_Unchecked 0x0,0x1 034d 00c6 | | Action Check_Subprogram_Elaborated 034e e002 | | Load 0x0,0x2 034f e036 | 6 | Load 0x0,0x36 0350 0093 0000 | | push_full_address 0x0 0352 60ed |` | Indirect_Literal Discrete,0x440,{0x80000000, 0x00080000} 0353 0273 | s | Execute Discrete,Plus 0354 e004 | | Load 0x0,0x4 0355 0273 | s | Execute Discrete,Plus 0356 e037 | 7 | Load 0x0,0x37 0357 0273 | s | Execute Discrete,Plus 0358 4800 |H | Short_Literal 0x0 0359 0007 | | Action Break_Optional 035a a001 | | Store_Unchecked 0x0,0x1 035b 00c6 | | Action Check_Subprogram_Elaborated 035c e002 | | Load 0x0,0x2 035d e038 | 8 | Load 0x0,0x38 035e 0093 0000 | | push_full_address 0x0 0360 60db |` | Indirect_Literal Discrete,0x43c,{0x80000000, 0x00070000} 0361 0273 | s | Execute Discrete,Plus 0362 e004 | | Load 0x0,0x4 0363 0273 | s | Execute Discrete,Plus 0364 e039 | 9 | Load 0x0,0x39 0365 0273 | s | Execute Discrete,Plus 0366 4800 |H | Short_Literal 0x0 0367 0007 | | Action Break_Optional 0368 a001 | | Store_Unchecked 0x0,0x1 0369 00c6 | | Action Check_Subprogram_Elaborated 036a e002 | | Load 0x0,0x2 036b e03a | : | Load 0x0,0x3a 036c 0093 0000 | | push_full_address 0x0 036e 60c9 |` | Indirect_Literal Discrete,0x438,{0x80000000, 0x00060000} 036f 0273 | s | Execute Discrete,Plus 0370 e004 | | Load 0x0,0x4 0371 0273 | s | Execute Discrete,Plus 0372 e03b | ; | Load 0x0,0x3b 0373 0273 | s | Execute Discrete,Plus 0374 4800 |H | Short_Literal 0x0 0375 0007 | | Action Break_Optional 0376 a001 | | Store_Unchecked 0x0,0x1 0377 00c6 | | Action Check_Subprogram_Elaborated 0378 e002 | | Load 0x0,0x2 0379 e03c | < | Load 0x0,0x3c 037a 0093 0000 | | push_full_address 0x0 037c 60b7 |` | Indirect_Literal Discrete,0x434,{0x80000000, 0x00050000} 037d 0273 | s | Execute Discrete,Plus 037e e004 | | Load 0x0,0x4 037f 0273 | s | Execute Discrete,Plus 0380 e03d | = | Load 0x0,0x3d 0381 0273 | s | Execute Discrete,Plus 0382 4800 |H | Short_Literal 0x0 0383 0007 | | Action Break_Optional 0384 a001 | | Store_Unchecked 0x0,0x1 0385 00c6 | | Action Check_Subprogram_Elaborated 0386 e002 | | Load 0x0,0x2 0387 e03e | > | Load 0x0,0x3e 0388 0093 0000 | | push_full_address 0x0 038a 60a5 |` | Indirect_Literal Discrete,0x430,{0x80000000, 0x00040000} 038b 0273 | s | Execute Discrete,Plus 038c e004 | | Load 0x0,0x4 038d 0273 | s | Execute Discrete,Plus 038e e03f | ? | Load 0x0,0x3f 038f 0273 | s | Execute Discrete,Plus 0390 4800 |H | Short_Literal 0x0 0391 0007 | | Action Break_Optional 0392 a001 | | Store_Unchecked 0x0,0x1 0393 00c6 | | Action Check_Subprogram_Elaborated 0394 e002 | | Load 0x0,0x2 0395 e040 | @ | Load 0x0,0x40 0396 0093 0000 | | push_full_address 0x0 0398 6093 |` | Indirect_Literal Discrete,0x42c,{0x80000000, 0x00030000} 0399 0273 | s | Execute Discrete,Plus 039a e004 | | Load 0x0,0x4 039b 0273 | s | Execute Discrete,Plus 039c e041 | A | Load 0x0,0x41 039d 0273 | s | Execute Discrete,Plus 039e 4800 |H | Short_Literal 0x0 039f 0007 | | Action Break_Optional 03a0 00e5 | | Load_Encached Long_Integer_Cache 03a1 00e5 | | Load_Encached Long_Integer_Cache 03a2 02a0 | | Declare_Subprogram Null_Subprogram 03a3 4802 |H | Short_Literal 0x2 03a4 032d | - | Declare_Type Record,Defined 03a5 a001 | | Store_Unchecked 0x0,0x1 03a6 00c6 | | Action Check_Subprogram_Elaborated 03a7 e002 | | Load 0x0,0x2 03a8 e2da | | Load 0x1,0xda 03a9 0093 0000 | | push_full_address 0x0 03ab 607c |`| | Indirect_Literal Discrete,0x428,{0x80000000, 0x00020000} 03ac 0273 | s | Execute Discrete,Plus 03ad e004 | | Load 0x0,0x4 03ae 0273 | s | Execute Discrete,Plus 03af e042 | B | Load 0x0,0x42 03b0 0273 | s | Execute Discrete,Plus 03b1 4800 |H | Short_Literal 0x0 03b2 0007 | | Action Break_Optional 03b3 e043 | C | Load 0x0,0x43 03b4 00e1 | | Load_Encached Boolean_Cache 03b5 00e1 | | Load_Encached Boolean_Cache 03b6 02a0 | | Declare_Subprogram Null_Subprogram 03b7 4803 |H | Short_Literal 0x3 03b8 032d | - | Declare_Type Record,Defined 03b9 a001 | | Store_Unchecked 0x0,0x1 03ba 00c6 | | Action Check_Subprogram_Elaborated 03bb e044 | D | Load 0x0,0x44 03bc e2df | | Load 0x1,0xdf 03bd 0093 0000 | | push_full_address 0x0 03bf 6064 |`d | Indirect_Literal Discrete,0x424,{0x80000000, 0x00010000} 03c0 0273 | s | Execute Discrete,Plus 03c1 e004 | | Load 0x0,0x4 03c2 0273 | s | Execute Discrete,Plus 03c3 e045 | E | Load 0x0,0x45 03c4 0273 | s | Execute Discrete,Plus 03c5 4800 |H | Short_Literal 0x0 03c6 0007 | | Action Break_Optional 03c7 e044 | D | Load 0x0,0x44 03c8 012c | , | Execute Any,Size 03c9 e2df | | Load 0x1,0xdf 03ca 012c | , | Execute Any,Size 03cb 027f | | Execute Discrete,Equal 03cc 7001 |p | Jump_Nonzero 0x3ce 03cd 0887 | | Execute_Immediate Raise,0x87 03ce 029d 0beb | | Declare_Subprogram INIT_0be8,For_Outer_Call 03d0 029d 0c0b | | Declare_Subprogram INIT_0c08,For_Outer_Call 03d2 029d 0c43 | C| Declare_Subprogram INIT_0c40,For_Outer_Call 03d4 029d 0c83 | | Declare_Subprogram INIT_0c80,For_Outer_Call 03d6 029d 0c8b | | Declare_Subprogram INIT_0c88,For_Outer_Call 03d8 029d 0ca3 | | Declare_Subprogram INIT_0ca0,For_Outer_Call 03da 029d 0cbb | | Declare_Subprogram INIT_0cb8,For_Outer_Call 03dc 029d 0cd3 | | Declare_Subprogram INIT_0cd0,For_Outer_Call 03de 029d 0cdb | | Declare_Subprogram INIT_0cd8,For_Outer_Call 03e0 029d 0ce3 | | Declare_Subprogram INIT_0ce0,For_Outer_Call 03e2 029d 0cf3 | | Declare_Subprogram INIT_0cf0,For_Outer_Call 03e4 029d 0d33 | 3| Declare_Subprogram INIT_0d30,For_Outer_Call 03e6 029d 0dbb | | Declare_Subprogram INIT_0db8,For_Outer_Call 03e8 029d 0dfb | | Declare_Subprogram INIT_0df8,For_Outer_Call 03ea 029d 0e23 | #| Declare_Subprogram INIT_0e20,For_Outer_Call 03ec 029d 0e43 | C| Declare_Subprogram INIT_0e40,For_Outer_Call 03ee 029d 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call 03f0 029d 0e6b | k| Declare_Subprogram INIT_0e68,For_Outer_Call 03f2 029d 0e83 | | Declare_Subprogram INIT_0e80,For_Outer_Call 03f4 029d 0e9b | | Declare_Subprogram INIT_0e98,For_Outer_Call 03f6 029d 0eab | | Declare_Subprogram INIT_0ea8,For_Outer_Call 03f8 029d 0ec3 | | Declare_Subprogram INIT_0ec0,For_Outer_Call 03fa 029d 1003 | | Declare_Subprogram INIT_1000,For_Outer_Call 03fc 029d 101b | | Declare_Subprogram INIT_1018,For_Outer_Call 03fe 1d0d | | Execute_Immediate Reference_Lex_1,0xd 03ff 00c7 | | Action Elaborate_Subprogram 0400 BODY_0148: 0400 00bc | | Action Signal_Activated 0401 00bb | | Action Signal_Completion 0402 0000 0000 | | .BLANK 0000[0x6] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 040b | | .CONST 0x040b ; Address of begin 0409 0004 | | .CONST 0x0004 ; Address of exception handler 040a 0001 | | .CONST 0x0001 ; Number of locals 040b BODY_0408: 040b INIT_0408: 040b e5fd | | Load 0x2,-0x3 040c 0f01 | | Execute_Immediate Equal,0x1 040d 7004 |p | Jump_Nonzero 0x412 040e e5fc | | Load 0x2,-0x4 040f e5ff | | Load 0x2,-0x1 0410 82f9 | | Call 0x1,0xf9 0411 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0412 e5fe | | Load 0x2,-0x2 0413 0b03 | | Execute_Immediate Case_Compare,0x3 0414 7006 |p | Jump_Nonzero 0x41b 0415 0f09 | | Execute_Immediate Equal,0x9 0416 7009 |p | Jump_Nonzero 0x420 0417 e5fc | | Load 0x2,-0x4 0418 e5ff | | Load 0x2,-0x1 0419 82f9 | | Call 0x1,0xf9 041a 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 041b 00d1 | | Pop_Control Pop_Count_1 041c e5fc | | Load 0x2,-0x4 041d e5ff | | Load 0x2,-0x1 041e 82fa | | Call 0x1,0xfa 041f 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0420 e5fc | | Load 0x2,-0x4 0421 e5ff | | Load 0x2,-0x1 0422 82fb | | Call 0x1,0xfb 0423 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0424 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0428 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 042c 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 0430 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 0434 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 0438 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 043c 8000 0000 | | .LITERAL {0x80000000, 0x00070000} 0440 8000 0000 | | .LITERAL {0x80000000, 0x00080000} 0444 8000 0000 | | .LITERAL {0x80000000, 0x00090000} 0448 8000 0000 | | .LITERAL {0x80000000, 0x000a0000} 044c 8000 0000 | | .LITERAL {0x80000000, 0x000b0000} 0450 8000 0000 | | .LITERAL {0x80000000, 0x000c0000} 0454 8000 0000 | | .LITERAL {0x80000000, 0x000d0000} 0458 8000 0000 | | .LITERAL {0x80000000, 0x000e0000} 045c 8000 0000 | | .LITERAL {0x80000000, 0x000f0000} 0460 8000 0000 | | .LITERAL {0x80000000, 0x00100000} 0464 8000 0000 | | .LITERAL {0x80000000, 0x00110000} 0468 8000 0000 | | .LITERAL {0x80000000, 0x00120000} 046c 8000 0000 | | .LITERAL {0x80000000, 0x00130000} 0470 8000 0000 | | .LITERAL {0x80000000, 0x00140000} 0474 8000 0000 | | .LITERAL {0x80000000, 0x00150000} 0478 8000 0000 | | .LITERAL {0x80000000, 0x00160000} 047c 8000 0000 | | .LITERAL {0x80000000, 0x00170000} 0480 8000 0000 | | .LITERAL {0x80000000, 0x00180000} 0484 8000 0000 | | .LITERAL {0x80000000, 0x00190000} 0488 8000 0000 | | .LITERAL {0x80000000, 0x001a0000} 048c 8000 0000 | | .LITERAL {0x80000000, 0x001b0000} 0490 8000 0000 | | .LITERAL {0x80000000, 0x001c0000} 0494 8000 0000 | | .LITERAL {0x80000000, 0x001d0000} 0498 8000 0000 | | .LITERAL {0x80000000, 0x001e0000} 049c 8000 0000 | | .LITERAL {0x80000000, 0x001f0000} 04a0 8000 0000 | | .LITERAL {0x80000000, 0x00200000} 04a4 8000 0000 | | .LITERAL {0x80000000, 0x00210000} 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab e5ff | | Load 0x2,-0x1 04ac e046 | F | Load 0x0,0x46 04ad 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 04ae 011c | | Execute Any,Convert_Unchecked 04af 1c01 | | Execute_Immediate Run_Utility,0x1 04b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b1 0000 0000 | | .BLANK 0000[0x7] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04bb | | .CONST 0x04bb ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0001 | | .CONST 0x0001 ; Number of locals 04bb BODY_04b8: 04bb INIT_04b8: 04bb e5ff | | Load 0x2,-0x1 04bc e046 | F | Load 0x0,0x46 04bd 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 04be 011c | | Execute Any,Convert_Unchecked 04bf 1c01 | | Execute_Immediate Run_Utility,0x1 04c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04c1 0000 0000 | | .BLANK 0000[0x7] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb e5ff | | Load 0x2,-0x1 04cc 8047 | G | Call 0x0,0x47 04cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04ce 0000 0000 | | .XXX[0x2] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04dd | | .CONST 0x04dd ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0001 | | .CONST 0x0001 ; Number of locals 04d3 INIT_04d0: 04d3 e048 | H | Load 0x0,0x48 04d4 012c | , | Execute Any,Size 04d5 0f06 | | Execute_Immediate Equal,0x6 04d6 7001 |p | Jump_Nonzero 0x4d8 04d7 0887 | | Execute_Immediate Raise,0x87 04d8 e049 | I | Load 0x0,0x49 04d9 012c | , | Execute Any,Size 04da 0f07 | | Execute_Immediate Equal,0x7 04db 7001 |p | Jump_Nonzero BODY_04d0 04dc 0887 | | Execute_Immediate Raise,0x87 04dd BODY_04d0: 04dd e5ff | | Load 0x2,-0x1 04de 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04df 090d | | Execute_Immediate Binary_Scale,0xd 04e0 e5ff | | Load 0x2,-0x1 04e1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04e2 0907 | | Execute_Immediate Binary_Scale,0x7 04e3 0273 | s | Execute Discrete,Plus 04e4 804a | J | Call 0x0,0x4a 04e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04e6 0000 0000 | | .XXX[0x2] 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; SUBPROGRAM 04e8 ; -------------------------------------------------------------------------------------- 04e8 04f5 | | .CONST 0x04f5 ; Address of begin 04e9 0004 | | .CONST 0x0004 ; Address of exception handler 04ea 0001 | | .CONST 0x0001 ; Number of locals 04eb INIT_04e8: 04eb e048 | H | Load 0x0,0x48 04ec 012c | , | Execute Any,Size 04ed 0f06 | | Execute_Immediate Equal,0x6 04ee 7001 |p | Jump_Nonzero 0x4f0 04ef 0887 | | Execute_Immediate Raise,0x87 04f0 e049 | I | Load 0x0,0x49 04f1 012c | , | Execute Any,Size 04f2 0f07 | | Execute_Immediate Equal,0x7 04f3 7001 |p | Jump_Nonzero BODY_04e8 04f4 0887 | | Execute_Immediate Raise,0x87 04f5 BODY_04e8: 04f5 e5ff | | Load 0x2,-0x1 04f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04f7 090d | | Execute_Immediate Binary_Scale,0xd 04f8 e5ff | | Load 0x2,-0x1 04f9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04fa 0907 | | Execute_Immediate Binary_Scale,0x7 04fb 0273 | s | Execute Discrete,Plus 04fc 804a | J | Call 0x0,0x4a 04fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04fe 0000 0000 | | .XXX[0x2] 0500 ; -------------------------------------------------------------------------------------- 0500 ; SUBPROGRAM 0500 ; -------------------------------------------------------------------------------------- 0500 0503 | | .CONST 0x0503 ; Address of begin 0501 0004 | | .CONST 0x0004 ; Address of exception handler 0502 0001 | | .CONST 0x0001 ; Number of locals 0503 BODY_0500: 0503 INIT_0500: 0503 e5ff | | Load 0x2,-0x1 0504 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0505 8211 | | Call 0x1,0x11 0506 0092 1c00 | | Action Push_String_Extended,0x1c00 ; "Type_Offset" 0508 e5ff | | Load 0x2,-0x1 0509 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 050a 804b | K | Call 0x0,0x4b 050b 0092 1c01 | | Action Push_String_Extended,0x1c01 ; "To_Be_Aborted" 050d e5ff | | Load 0x2,-0x1 050e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 050f 804b | K | Call 0x0,0x4b 0510 0092 1c02 | | Action Push_String_Extended,0x1c02 ; "Abort_Protected" 0512 e5ff | | Load 0x2,-0x1 0513 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0514 804c | L | Call 0x0,0x4c 0515 0092 1c03 | | Action Push_String_Extended,0x1c03 ; "Stack" 0517 804d | M | Call 0x0,0x4d 0518 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0519 0000 0000 | | .BLANK 0000[0x7] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 052d | - | .CONST 0x052d ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0001 | | .CONST 0x0001 ; Number of locals 0523 INIT_0520: 0523 e048 | H | Load 0x0,0x48 0524 012c | , | Execute Any,Size 0525 0f06 | | Execute_Immediate Equal,0x6 0526 7001 |p | Jump_Nonzero 0x528 0527 0887 | | Execute_Immediate Raise,0x87 0528 e049 | I | Load 0x0,0x49 0529 012c | , | Execute Any,Size 052a 0f07 | | Execute_Immediate Equal,0x7 052b 7001 |p | Jump_Nonzero BODY_0520 052c 0887 | | Execute_Immediate Raise,0x87 052d BODY_0520: 052d e5ff | | Load 0x2,-0x1 052e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 052f 090d | | Execute_Immediate Binary_Scale,0xd 0530 e5ff | | Load 0x2,-0x1 0531 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0532 0907 | | Execute_Immediate Binary_Scale,0x7 0533 0273 | s | Execute Discrete,Plus 0534 e5ff | | Load 0x2,-0x1 0535 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0536 0273 | s | Execute Discrete,Plus 0537 804a | J | Call 0x0,0x4a 0538 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0539 0000 0000 | | .BLANK 0000[0x7] 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 0540 ; -------------------------------------------------------------------------------------- 0540 0543 | C | .CONST 0x0543 ; Address of begin 0541 0004 | | .CONST 0x0004 ; Address of exception handler 0542 0001 | | .CONST 0x0001 ; Number of locals 0543 BODY_0540: 0543 INIT_0540: 0543 e5ff | | Load 0x2,-0x1 0544 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0545 8214 | | Call 0x1,0x14 0546 0092 1c04 | | Action Push_String_Extended,0x1c04 ; "Data_Offset" 0548 e5ff | | Load 0x2,-0x1 0549 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 054a 804c | L | Call 0x0,0x4c 054b 0092 1c03 | | Action Push_String_Extended,0x1c03 ; "Stack" 054d 804e | N | Call 0x0,0x4e 054e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 054f 0000 | | .XXX[0x1] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 e5ff | | Load 0x2,-0x1 0554 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0555 8211 | | Call 0x1,0x11 0556 0092 1c00 | | Action Push_String_Extended,0x1c00 ; "Type_Offset" 0558 e5ff | | Load 0x2,-0x1 0559 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 055a 804b | K | Call 0x0,0x4b 055b 0092 1c05 | | Action Push_String_Extended,0x1c05 ; "Bounds_With_Object" 055d e5ff | | Load 0x2,-0x1 055e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 055f 804b | K | Call 0x0,0x4b 0560 0092 1c06 | | Action Push_String_Extended,0x1c06 ; "Derives_Privacy" 0562 e5ff | | Load 0x2,-0x1 0563 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0564 804b | K | Call 0x0,0x4b 0565 0092 1c07 | | Action Push_String_Extended,0x1c07 ; "Is_Private" 0567 e5ff | | Load 0x2,-0x1 0568 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0569 804b | K | Call 0x0,0x4b 056a 0092 1c08 | | Action Push_String_Extended,0x1c08 ; "Is_Constant" 056c e5ff | | Load 0x2,-0x1 056d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 056e 804b | K | Call 0x0,0x4b 056f 0092 1c09 | | Action Push_String_Extended,0x1c09 ; "Is_Visible" 0571 e5ff | | Load 0x2,-0x1 0572 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0573 804c | L | Call 0x0,0x4c 0574 0092 1c0a | | Action Push_String_Extended,0x1c0a ; "Path_Stack" 0576 804f | O | Call 0x0,0x4f 0577 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0578 ; -------------------------------------------------------------------------------------- 0578 ; SUBPROGRAM 0578 ; -------------------------------------------------------------------------------------- 0578 057b | { | .CONST 0x057b ; Address of begin 0579 0004 | | .CONST 0x0004 ; Address of exception handler 057a 0001 | | .CONST 0x0001 ; Number of locals 057b BODY_0578: 057b INIT_0578: 057b e5ff | | Load 0x2,-0x1 057c 8047 | G | Call 0x0,0x47 057d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 057e 0000 0000 | | .XXX[0x2] 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0588 | | .CONST 0x0588 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 INIT_0580: 0583 e050 | P | Load 0x0,0x50 0584 012c | , | Execute Any,Size 0585 0f03 | | Execute_Immediate Equal,0x3 0586 7001 |p | Jump_Nonzero BODY_0580 0587 0887 | | Execute_Immediate Raise,0x87 0588 BODY_0580: 0588 e5ff | | Load 0x2,-0x1 0589 0903 | | Execute_Immediate Binary_Scale,0x3 058a e5fe | | Load 0x2,-0x2 058b 0273 | s | Execute Discrete,Plus 058c 804a | J | Call 0x0,0x4a 058d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 058e 0000 0000 | | .XXX[0x2] 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 e5ff | | Load 0x2,-0x1 0594 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0595 e5ff | | Load 0x2,-0x1 0596 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0597 8218 | | Call 0x1,0x18 0598 0092 1c0b | | Action Push_String_Extended,0x1c0b ; "Offset" 059a e5ff | | Load 0x2,-0x1 059b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 059c 8051 | Q | Call 0x0,0x51 059d 0092 1c0c | | Action Push_String_Extended,0x1c0c ; "Segment" 059f 804e | N | Call 0x0,0x4e 05a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05a1 0000 0000 | | .BLANK 0000[0x7] 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab e5ff | | Load 0x2,-0x1 05ac 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 05ad e5ff | | Load 0x2,-0x1 05ae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 05af 8218 | | Call 0x1,0x18 05b0 0092 1c0b | | Action Push_String_Extended,0x1c0b ; "Offset" 05b2 e5ff | | Load 0x2,-0x1 05b3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05b4 8217 | | Call 0x1,0x17 05b5 0092 1c0d | | Action Push_String_Extended,0x1c0d ; "Children_Start" 05b7 e5ff | | Load 0x2,-0x1 05b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05b9 8051 | Q | Call 0x0,0x51 05ba 0092 1c0c | | Action Push_String_Extended,0x1c0c ; "Segment" 05bc 8052 | R | Call 0x0,0x52 05bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05be 0000 0000 | | .XXX[0x2] 05c0 ; -------------------------------------------------------------------------------------- 05c0 ; SUBPROGRAM 05c0 ; -------------------------------------------------------------------------------------- 05c0 05c3 | | .CONST 0x05c3 ; Address of begin 05c1 0004 | | .CONST 0x0004 ; Address of exception handler 05c2 0001 | | .CONST 0x0001 ; Number of locals 05c3 BODY_05c0: 05c3 INIT_05c0: 05c3 e5ff | | Load 0x2,-0x1 05c4 8047 | G | Call 0x0,0x47 05c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05c6 0000 0000 | | .XXX[0x2] 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 e5ff | | Load 0x2,-0x1 05cc 8047 | G | Call 0x0,0x47 05cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05ce 0000 0000 | | .XXX[0x2] 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d3 | | .CONST 0x05d3 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0001 | | .CONST 0x0001 ; Number of locals 05d3 BODY_05d0: 05d3 INIT_05d0: 05d3 e5ff | | Load 0x2,-0x1 05d4 8047 | G | Call 0x0,0x47 05d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05d6 0000 0000 | | .XXX[0x2] 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; SUBPROGRAM 05d8 ; -------------------------------------------------------------------------------------- 05d8 05db | | .CONST 0x05db ; Address of begin 05d9 0004 | | .CONST 0x0004 ; Address of exception handler 05da 0001 | | .CONST 0x0001 ; Number of locals 05db BODY_05d8: 05db INIT_05d8: 05db e5ff | | Load 0x2,-0x1 05dc 8047 | G | Call 0x0,0x47 05dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05de 0000 0000 | | .XXX[0x2] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05e3 | | .CONST 0x05e3 ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 0001 | | .CONST 0x0001 ; Number of locals 05e3 BODY_05e0: 05e3 INIT_05e0: 05e3 e5ff | | Load 0x2,-0x1 05e4 8047 | G | Call 0x0,0x47 05e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05e6 0000 0000 | | .XXX[0x2] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05f5 | | .CONST 0x05f5 ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0001 | | .CONST 0x0001 ; Number of locals 05eb INIT_05e8: 05eb e048 | H | Load 0x0,0x48 05ec 012c | , | Execute Any,Size 05ed 0f06 | | Execute_Immediate Equal,0x6 05ee 7001 |p | Jump_Nonzero 0x5f0 05ef 0887 | | Execute_Immediate Raise,0x87 05f0 e049 | I | Load 0x0,0x49 05f1 012c | , | Execute Any,Size 05f2 0f07 | | Execute_Immediate Equal,0x7 05f3 7001 |p | Jump_Nonzero BODY_05e8 05f4 0887 | | Execute_Immediate Raise,0x87 05f5 BODY_05e8: 05f5 e5ff | | Load 0x2,-0x1 05f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05f7 090d | | Execute_Immediate Binary_Scale,0xd 05f8 e5ff | | Load 0x2,-0x1 05f9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05fa 0907 | | Execute_Immediate Binary_Scale,0x7 05fb 0273 | s | Execute Discrete,Plus 05fc 804a | J | Call 0x0,0x4a 05fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05fe 0000 0000 | | .XXX[0x2] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 060d | | .CONST 0x060d ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0001 | | .CONST 0x0001 ; Number of locals 0603 INIT_0600: 0603 e048 | H | Load 0x0,0x48 0604 012c | , | Execute Any,Size 0605 0f06 | | Execute_Immediate Equal,0x6 0606 7001 |p | Jump_Nonzero 0x608 0607 0887 | | Execute_Immediate Raise,0x87 0608 e049 | I | Load 0x0,0x49 0609 012c | , | Execute Any,Size 060a 0f07 | | Execute_Immediate Equal,0x7 060b 7001 |p | Jump_Nonzero BODY_0600 060c 0887 | | Execute_Immediate Raise,0x87 060d BODY_0600: 060d e5ff | | Load 0x2,-0x1 060e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 060f 090d | | Execute_Immediate Binary_Scale,0xd 0610 e5ff | | Load 0x2,-0x1 0611 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0612 0907 | | Execute_Immediate Binary_Scale,0x7 0613 0273 | s | Execute Discrete,Plus 0614 804a | J | Call 0x0,0x4a 0615 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0616 0000 0000 | | .XXX[0x2] 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 e5ff | | Load 0x2,-0x1 061c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 061d 8220 | | Call 0x1,0x20 061e 0092 1c0e | | Action Push_String_Extended,0x1c0e ; "Control_Offset" 0620 e5ff | | Load 0x2,-0x1 0621 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0622 804c | L | Call 0x0,0x4c 0623 0092 1c03 | | Action Push_String_Extended,0x1c03 ; "Stack" 0625 804e | N | Call 0x0,0x4e 0626 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0627 0000 | | .XXX[0x1] 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 063d | = | .CONST 0x063d ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0003 | | .CONST 0x0003 ; Number of locals 062b INIT_0628: 062b e050 | P | Load 0x0,0x50 062c 012c | , | Execute Any,Size 062d 0f03 | | Execute_Immediate Equal,0x3 062e 7001 |p | Jump_Nonzero 0x630 062f 0887 | | Execute_Immediate Raise,0x87 0630 e5fe | | Load 0x2,-0x2 0631 0903 | | Execute_Immediate Binary_Scale,0x3 0632 e5fd | | Load 0x2,-0x3 0633 0273 | s | Execute Discrete,Plus 0634 0904 | | Execute_Immediate Binary_Scale,0x4 0635 00d8 | | Load_Top At_Offset_0 0636 e053 | S | Load 0x0,0x53 0637 0260 | ` | Execute Discrete,In_Type 0638 7001 |p | Jump_Nonzero 0x63a 0639 0801 | | Execute_Immediate Raise,0x1 063a 00d8 | | Load_Top At_Offset_0 063b e5ff | | Load 0x2,-0x1 063c 8054 | T | Call 0x0,0x54 063d BODY_0628: 063d 4811 |H | Short_Literal 0x11 063e e403 | | Load 0x2,0x3 063f 8055 | U | Call 0x0,0x55 0640 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0641 0000 0000 | | .BLANK 0000[0x7] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b e5ff | | Load 0x2,-0x1 064c e5fe | | Load 0x2,-0x2 064d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 064e e5fe | | Load 0x2,-0x2 064f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0650 e5fe | | Load 0x2,-0x2 0651 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0652 8223 | # | Call 0x1,0x23 0653 01cc | | Execute Vector,Catenate 0654 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0655 0000 0000 | | .XXX[0x3] 0657 0000 | | 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b e5ff | | Load 0x2,-0x1 065c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 065d 8222 | " | Call 0x1,0x22 065e 0092 1c0f | | Action Push_String_Extended,0x1c0f ; "Subprog_Site" 0660 e5ff | | Load 0x2,-0x1 0661 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0662 820e | | Call 0x1,0xe 0663 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0665 e5ff | | Load 0x2,-0x1 0666 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0667 804b | K | Call 0x0,0x4b 0668 0092 1c09 | | Action Push_String_Extended,0x1c09 ; "Is_Visible" 066a e5ff | | Load 0x2,-0x1 066b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 066c 804c | L | Call 0x0,0x4c 066d 0092 1c11 | | Action Push_String_Extended,0x1c11 ; "Scope_For_Site" 066f 804d | M | Call 0x0,0x4d 0670 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0671 0000 0000 | | .BLANK 0000[0x7] 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067b | { | .CONST 0x067b ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0001 | | .CONST 0x0001 ; Number of locals 067b BODY_0678: 067b INIT_0678: 067b e5ff | | Load 0x2,-0x1 067c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 067d 821b | | Call 0x1,0x1b 067e 0092 1c12 | | Action Push_String_Extended,0x1c12 ; "Lex_Level" 0680 e5ff | | Load 0x2,-0x1 0681 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0682 8219 | | Call 0x1,0x19 0683 0092 1c13 | | Action Push_String_Extended,0x1c13 ; "Subprog_Start" 0685 e5ff | | Load 0x2,-0x1 0686 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0687 820e | | Call 0x1,0xe 0688 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 068a e5ff | | Load 0x2,-0x1 068b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 068c 8222 | " | Call 0x1,0x22 068d 0092 1c14 | | Action Push_String_Extended,0x1c14 ; "Declare_Frame" 068f 804d | M | Call 0x0,0x4d 0690 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0691 0000 0000 | | .BLANK 0000[0x7] 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0001 | | .CONST 0x0001 ; Number of locals 069b BODY_0698: 069b INIT_0698: 069b e5ff | | Load 0x2,-0x1 069c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 069d 0092 1c15 | | Action Push_String_Extended,0x1c15 ; "start pc = " 069f 8224 | $ | Call 0x1,0x24 06a0 0092 1c16 | | Action Push_String_Extended,0x1c16 ; "; lex = " 06a2 01cc | | Execute Vector,Catenate 06a3 e5ff | | Load 0x2,-0x1 06a4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 06a5 821b | | Call 0x1,0x1b 06a6 01cc | | Execute Vector,Catenate 06a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06ca | | .CONST 0x06ca ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0009 | | .CONST 0x0009 ; Number of locals 06ab INIT_06a8: 06ab 029f 1033 | 3| Declare_Subprogram INIT_1030,For_Call 06ad a056 | V | Store_Unchecked 0x0,0x56 06ae 00c6 | | Action Check_Subprogram_Elaborated 06af e046 | F | Load 0x0,0x46 06b0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 06b1 00d8 | | Load_Top At_Offset_0 06b2 012c | , | Execute Any,Size 06b3 e403 | | Load 0x2,0x3 06b4 0266 | f | Execute Discrete,Bounds 06b5 029f 103b | ;| Declare_Subprogram INIT_1038,For_Call 06b7 03fa | | Declare_Type Discrete,Defined,With_Size 06b8 00cd | | Action Spare6_Action 06b9 00e1 | | Load_Encached Boolean_Cache 06ba e046 | F | Load 0x0,0x46 06bb 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 06bc 4802 |H | Short_Literal 0x2 06bd 4802 |H | Short_Literal 0x2 06be 0099 | | Action Reference_Dynamic 06bf 1d0f | | Execute_Immediate Reference_Lex_1,0xf 06c0 0093 0000 | | push_full_address 0x0 06c2 6019 |` | Indirect_Literal Discrete,0x6dc,{0x80000000, 0x00230000} 06c3 0273 | s | Execute Discrete,Plus 06c4 e004 | | Load 0x0,0x4 06c5 0273 | s | Execute Discrete,Plus 06c6 e057 | W | Load 0x0,0x57 06c7 0273 | s | Execute Discrete,Plus 06c8 4809 |H | Short_Literal 0x9 06c9 0007 | | Action Break_Optional 06ca BODY_06a8: 06ca e5ff | | Load 0x2,-0x1 06cb e403 | | Load 0x2,0x3 06cc e404 | | Load 0x2,0x4 06cd e405 | | Load 0x2,0x5 06ce 4806 |H | Short_Literal 0x6 06cf 4802 |H | Short_Literal 0x2 06d0 0099 | | Action Reference_Dynamic 06d1 4807 |H | Short_Literal 0x7 06d2 4802 |H | Short_Literal 0x2 06d3 0099 | | Action Reference_Dynamic 06d4 4808 |H | Short_Literal 0x8 06d5 4802 |H | Short_Literal 0x2 06d6 0099 | | Action Reference_Dynamic 06d7 8056 | V | Call 0x0,0x56 06d8 00e9 | | Load_Encached String_Cache 06d9 01c6 | | Execute Vector,Convert_To_Formal 06da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06db 0000 | | .XXX[0x1] 06dc 8000 0000 | | .LITERAL {0x80000000, 0x00230000} 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06ed | | .CONST 0x06ed ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0004 | | .CONST 0x0004 ; Number of locals 06e3 INIT_06e0: 06e3 4880 |H | Short_Literal 0x80 06e4 e058 | X | Load 0x0,0x58 06e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06e6 1c08 | | Execute_Immediate Run_Utility,0x8 06e7 00d8 | | Load_Top At_Offset_0 06e8 1c00 | | Execute_Immediate Run_Utility,0x0 06e9 029f 1063 | c| Declare_Subprogram INIT_1060,For_Call 06eb 029f 107b | {| Declare_Subprogram INIT_1078,For_Call 06ed BODY_06e0: 06ed 4800 |H | Short_Literal 0x0 06ee e5ff | | Load 0x2,-0x1 06ef 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06f0 804c | L | Call 0x0,0x4c 06f1 0092 1c17 | | Action Push_String_Extended,0x1c17 ; "distributor" 06f3 8403 | | Call 0x2,0x3 06f4 4801 |H | Short_Literal 0x1 06f5 e5ff | | Load 0x2,-0x1 06f6 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 06f7 8220 | | Call 0x1,0x20 06f8 0092 1c18 | | Action Push_String_Extended,0x1c18 ; "control extent" 06fa 8403 | | Call 0x2,0x3 06fb 4801 |H | Short_Literal 0x1 06fc e5ff | | Load 0x2,-0x1 06fd 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 06fe 8228 | ( | Call 0x1,0x28 06ff 0092 1c19 | | Action Push_String_Extended,0x1c19 ; "break mask" 0701 8403 | | Call 0x2,0x3 0702 0092 1c1a | | Action Push_String_Extended,0x1c1a ; "Is_Catalogued " 0704 e5ff | | Load 0x2,-0x1 0705 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0706 8404 | | Call 0x2,0x4 0707 0092 1c1b | | Action Push_String_Extended,0x1c1b ; "Is_Wired " 0709 e5ff | | Load 0x2,-0x1 070a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 070b 8404 | | Call 0x2,0x4 070c e402 | | Load 0x2,0x2 070d e058 | X | Load 0x0,0x58 070e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 070f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0710 ; -------------------------------------------------------------------------------------- 0710 ; SUBPROGRAM 0710 ; -------------------------------------------------------------------------------------- 0710 0713 | | .CONST 0x0713 ; Address of begin 0711 0004 | | .CONST 0x0004 ; Address of exception handler 0712 0001 | | .CONST 0x0001 ; Number of locals 0713 BODY_0710: 0713 INIT_0710: 0713 e5ff | | Load 0x2,-0x1 0714 8047 | G | Call 0x0,0x47 0715 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0716 0000 0000 | | .XXX[0x2] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071b | | .CONST 0x071b ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0001 | | .CONST 0x0001 ; Number of locals 071b BODY_0718: 071b INIT_0718: 071b e5ff | | Load 0x2,-0x1 071c 8047 | G | Call 0x0,0x47 071d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 071e 0000 0000 | | .XXX[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 e5ff | | Load 0x2,-0x1 0724 8047 | G | Call 0x0,0x47 0725 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0726 0000 0000 | | .XXX[0x2] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072b | + | .CONST 0x072b ; Address of begin 0729 0004 | | .CONST 0x0004 ; Address of exception handler 072a 0001 | | .CONST 0x0001 ; Number of locals 072b BODY_0728: 072b INIT_0728: 072b e5ff | | Load 0x2,-0x1 072c 8047 | G | Call 0x0,0x47 072d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 072e 0000 0000 | | .XXX[0x2] 0730 ; -------------------------------------------------------------------------------------- 0730 ; SUBPROGRAM 0730 ; -------------------------------------------------------------------------------------- 0730 0733 | 3 | .CONST 0x0733 ; Address of begin 0731 0004 | | .CONST 0x0004 ; Address of exception handler 0732 0001 | | .CONST 0x0001 ; Number of locals 0733 BODY_0730: 0733 INIT_0730: 0733 e5ff | | Load 0x2,-0x1 0734 8047 | G | Call 0x0,0x47 0735 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0736 0000 0000 | | .XXX[0x2] 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 073b | ; | .CONST 0x073b ; Address of begin 0739 0004 | | .CONST 0x0004 ; Address of exception handler 073a 0001 | | .CONST 0x0001 ; Number of locals 073b BODY_0738: 073b INIT_0738: 073b e5ff | | Load 0x2,-0x1 073c 8047 | G | Call 0x0,0x47 073d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 073e 0000 0000 | | .XXX[0x2] 0740 ; -------------------------------------------------------------------------------------- 0740 ; SUBPROGRAM 0740 ; -------------------------------------------------------------------------------------- 0740 0743 | C | .CONST 0x0743 ; Address of begin 0741 0004 | | .CONST 0x0004 ; Address of exception handler 0742 0001 | | .CONST 0x0001 ; Number of locals 0743 BODY_0740: 0743 INIT_0740: 0743 e5ff | | Load 0x2,-0x1 0744 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0745 822f | / | Call 0x1,0x2f 0746 0092 1c1c | | Action Push_String_Extended,0x1c1c ; "Delay_Duration" 0748 e5ff | | Load 0x2,-0x1 0749 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 074a 820e | | Call 0x1,0xe 074b 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 074d e5ff | | Load 0x2,-0x1 074e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 074f 822e | . | Call 0x1,0x2e 0750 0092 1c1d | | Action Push_String_Extended,0x1c1d ; "Timed_Choice" 0752 8052 | R | Call 0x0,0x52 0753 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0754 0000 0000 | | .BLANK 0000[0x4] 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 e5ff | | Load 0x2,-0x1 075c 8047 | G | Call 0x0,0x47 075d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 075e 0000 0000 | | .XXX[0x2] 0760 ; -------------------------------------------------------------------------------------- 0760 ; SUBPROGRAM 0760 ; -------------------------------------------------------------------------------------- 0760 0763 | c | .CONST 0x0763 ; Address of begin 0761 0004 | | .CONST 0x0004 ; Address of exception handler 0762 0001 | | .CONST 0x0001 ; Number of locals 0763 BODY_0760: 0763 INIT_0760: 0763 e5ff | | Load 0x2,-0x1 0764 8047 | G | Call 0x0,0x47 0765 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0766 0000 0000 | | .XXX[0x2] 0768 ; -------------------------------------------------------------------------------------- 0768 ; SUBPROGRAM 0768 ; -------------------------------------------------------------------------------------- 0768 076b | k | .CONST 0x076b ; Address of begin 0769 0004 | | .CONST 0x0004 ; Address of exception handler 076a 0001 | | .CONST 0x0001 ; Number of locals 076b BODY_0768: 076b INIT_0768: 076b e5ff | | Load 0x2,-0x1 076c 8047 | G | Call 0x0,0x47 076d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 076e 0000 0000 | | .XXX[0x2] 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 0773 | s | .CONST 0x0773 ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0001 | | .CONST 0x0001 ; Number of locals 0773 BODY_0770: 0773 INIT_0770: 0773 e5ff | | Load 0x2,-0x1 0774 8047 | G | Call 0x0,0x47 0775 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0776 0000 0000 | | .XXX[0x2] 0778 ; -------------------------------------------------------------------------------------- 0778 ; SUBPROGRAM 0778 ; -------------------------------------------------------------------------------------- 0778 077b | { | .CONST 0x077b ; Address of begin 0779 0004 | | .CONST 0x0004 ; Address of exception handler 077a 0001 | | .CONST 0x0001 ; Number of locals 077b BODY_0778: 077b INIT_0778: 077b e5ff | | Load 0x2,-0x1 077c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 077d 8233 | 3 | Call 0x1,0x33 077e 0092 1c1e | | Action Push_String_Extended,0x1c1e ; "Member_Index" 0780 e5ff | | Load 0x2,-0x1 0781 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0782 8233 | 3 | Call 0x1,0x33 0783 0092 1c1f | | Action Push_String_Extended,0x1c1f ; "First_Member" 0785 e5ff | | Load 0x2,-0x1 0786 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0787 820e | | Call 0x1,0xe 0788 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 078a e5ff | | Load 0x2,-0x1 078b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 078c 8221 | ! | Call 0x1,0x21 078d 0092 1c20 | | Action Push_String_Extended,0x1c20 ; "Member_Site" 078f e5ff | | Load 0x2,-0x1 0790 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0791 8232 | 2 | Call 0x1,0x32 0792 0092 1c21 | !| Action Push_String_Extended,0x1c21 ; "Entry_Params" 0794 e5ff | | Load 0x2,-0x1 0795 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0796 8231 | 1 | Call 0x1,0x31 0797 0092 1c22 | "| Action Push_String_Extended,0x1c22 ; "Entry_Name" 0799 8059 | Y | Call 0x0,0x59 079a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 079b 0000 0000 | | .BLANK 0000[0x5] 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 e5ff | | Load 0x2,-0x1 07a4 8047 | G | Call 0x0,0x47 07a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07a6 0000 0000 | | .XXX[0x2] 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07ab | | .CONST 0x07ab ; Address of begin 07a9 0004 | | .CONST 0x0004 ; Address of exception handler 07aa 0001 | | .CONST 0x0001 ; Number of locals 07ab BODY_07a8: 07ab INIT_07a8: 07ab e5ff | | Load 0x2,-0x1 07ac 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 07ad 821e | | Call 0x1,0x1e 07ae 0092 1c23 | #| Action Push_String_Extended,0x1c23 ; "Raise_Index" 07b0 e5ff | | Load 0x2,-0x1 07b1 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 07b2 821d | | Call 0x1,0x1d 07b3 0092 1c24 | $| Action Push_String_Extended,0x1c24 ; "Raise_Offset" 07b5 e5ff | | Load 0x2,-0x1 07b6 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07b7 804b | K | Call 0x0,0x4b 07b8 0092 1c25 | %| Action Push_String_Extended,0x1c25 ; "Reraising" 07ba e5ff | | Load 0x2,-0x1 07bb 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 07bc 821c | | Call 0x1,0x1c 07bd 0092 1c26 | &| Action Push_String_Extended,0x1c26 ; "Exception_Name" 07bf e5ff | | Load 0x2,-0x1 07c0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 07c1 820e | | Call 0x1,0xe 07c2 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 07c4 e5ff | | Load 0x2,-0x1 07c5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07c6 8051 | Q | Call 0x0,0x51 07c7 0092 1c27 | '| Action Push_String_Extended,0x1c27 ; "Raise_Segment" 07c9 8059 | Y | Call 0x0,0x59 07ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07cb 0000 0000 | | .BLANK 0000[0x5] 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 0092 1c28 | (| Action Push_String_Extended,0x1c28 ; "pc = " 07d5 e5ff | | Load 0x2,-0x1 07d6 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 07d7 e5ff | | Load 0x2,-0x1 07d8 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 07d9 e5ff | | Load 0x2,-0x1 07da 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07db 8223 | # | Call 0x1,0x23 07dc 01cc | | Execute Vector,Catenate 07dd 0092 1c29 | )| Action Push_String_Extended,0x1c29 ; "; " 07df 01cc | | Execute Vector,Catenate 07e0 e5ff | | Load 0x2,-0x1 07e1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 07e2 805a | Z | Call 0x0,0x5a 07e3 01cc | | Execute Vector,Catenate 07e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e5 0000 0000 | | .XXX[0x3] 07e7 0000 | | 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07eb | | .CONST 0x07eb ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0001 | | .CONST 0x0001 ; Number of locals 07eb BODY_07e8: 07eb INIT_07e8: 07eb e5ff | | Load 0x2,-0x1 07ec 8047 | G | Call 0x0,0x47 07ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ee 0000 0000 | | .XXX[0x2] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f3 | | .CONST 0x07f3 ; Address of begin 07f1 0004 | | .CONST 0x0004 ; Address of exception handler 07f2 0001 | | .CONST 0x0001 ; Number of locals 07f3 BODY_07f0: 07f3 INIT_07f0: 07f3 e5ff | | Load 0x2,-0x1 07f4 8047 | G | Call 0x0,0x47 07f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07f6 0000 0000 | | .XXX[0x2] 07f8 ; -------------------------------------------------------------------------------------- 07f8 ; SUBPROGRAM 07f8 ; -------------------------------------------------------------------------------------- 07f8 07fb | | .CONST 0x07fb ; Address of begin 07f9 0004 | | .CONST 0x0004 ; Address of exception handler 07fa 0001 | | .CONST 0x0001 ; Number of locals 07fb BODY_07f8: 07fb INIT_07f8: 07fb e5ff | | Load 0x2,-0x1 07fc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 07fd 823a | : | Call 0x1,0x3a 07fe 0092 1c2a | *| Action Push_String_Extended,0x1c2a ; "Mantissa" 0800 e5ff | | Load 0x2,-0x1 0801 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0802 8239 | 9 | Call 0x1,0x39 0803 0092 1c2b | +| Action Push_String_Extended,0x1c2b ; "Exponent" 0805 e5ff | | Load 0x2,-0x1 0806 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0807 804b | K | Call 0x0,0x4b 0808 0092 1c2c | ,| Action Push_String_Extended,0x1c2c ; "Is_Negative" 080a 8052 | R | Call 0x0,0x52 080b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 080c 0000 0000 | | .BLANK 0000[0x4] 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 0823 | # | .CONST 0x0823 ; Address of begin 0811 0004 | | .CONST 0x0004 ; Address of exception handler 0812 0007 | | .CONST 0x0007 ; Number of locals 0813 INIT_0810: 0813 a05b | [ | Store_Unchecked 0x0,0x5b 0814 00c6 | | Action Check_Subprogram_Elaborated 0815 e05c | \ | Load 0x0,0x5c 0816 00e6 | | Load_Encached Float_Cache 0817 e05d | ] | Load 0x0,0x5d 0818 e05e | ^ | Load 0x0,0x5e 0819 4806 |H | Short_Literal 0x6 081a 0007 | | Action Break_Optional 081b e5ff | | Load 0x2,-0x1 081c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 081d e402 | | Load 0x2,0x2 081e e403 | | Load 0x2,0x3 081f 4804 |H | Short_Literal 0x4 0820 4802 |H | Short_Literal 0x2 0821 0099 | | Action Reference_Dynamic 0822 805b | [ | Call 0x0,0x5b 0823 BODY_0810: 0823 00d8 | | Load_Top At_Offset_0 0824 805f | _ | Call 0x0,0x5f 0825 8060 | ` | Call 0x0,0x60 0826 00e9 | | Load_Encached String_Cache 0827 01c6 | | Execute Vector,Convert_To_Formal 0828 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0829 0000 0000 | | .BLANK 0000[0x7] 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 e5ff | | Load 0x2,-0x1 0834 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0835 823b | ; | Call 0x1,0x3b 0836 0092 1c2d | -| Action Push_String_Extended,0x1c2d ; "Val_Part" 0838 e5ff | | Load 0x2,-0x1 0839 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 083a 820e | | Call 0x1,0xe 083b 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 083d e5ff | | Load 0x2,-0x1 083e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 083f 8216 | | Call 0x1,0x16 0840 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 0842 8052 | R | Call 0x0,0x52 0843 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0844 0000 0000 | | .BLANK 0000[0x4] 0848 ; -------------------------------------------------------------------------------------- 0848 ; SUBPROGRAM 0848 ; -------------------------------------------------------------------------------------- 0848 084b | K | .CONST 0x084b ; Address of begin 0849 0004 | | .CONST 0x0004 ; Address of exception handler 084a 0001 | | .CONST 0x0001 ; Number of locals 084b BODY_0848: 084b INIT_0848: 084b e5ff | | Load 0x2,-0x1 084c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 084d 8222 | " | Call 0x1,0x22 084e 0092 1c2f | /| Action Push_String_Extended,0x1c2f ; "Var_Site" 0850 e5ff | | Load 0x2,-0x1 0851 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0852 820e | | Call 0x1,0xe 0853 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0855 e5ff | | Load 0x2,-0x1 0856 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0857 804b | K | Call 0x0,0x4b 0858 0092 1c09 | | Action Push_String_Extended,0x1c09 ; "Is_Visible" 085a 8052 | R | Call 0x0,0x52 085b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 085c 0000 0000 | | .BLANK 0000[0x4] 0860 ; -------------------------------------------------------------------------------------- 0860 ; SUBPROGRAM 0860 ; -------------------------------------------------------------------------------------- 0860 0863 | c | .CONST 0x0863 ; Address of begin 0861 0004 | | .CONST 0x0004 ; Address of exception handler 0862 0001 | | .CONST 0x0001 ; Number of locals 0863 BODY_0860: 0863 INIT_0860: 0863 e5ff | | Load 0x2,-0x1 0864 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0865 820e | | Call 0x1,0xe 0866 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0868 e5ff | | Load 0x2,-0x1 0869 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 086a 8232 | 2 | Call 0x1,0x32 086b 0092 1c21 | !| Action Push_String_Extended,0x1c21 ; "Entry_Params" 086d e5ff | | Load 0x2,-0x1 086e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 086f 8231 | 1 | Call 0x1,0x31 0870 0092 1c22 | "| Action Push_String_Extended,0x1c22 ; "Entry_Name" 0872 8052 | R | Call 0x0,0x52 0873 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0874 0000 0000 | | .BLANK 0000[0x4] 0878 ; -------------------------------------------------------------------------------------- 0878 ; SUBPROGRAM 0878 ; -------------------------------------------------------------------------------------- 0878 087b | { | .CONST 0x087b ; Address of begin 0879 0004 | | .CONST 0x0004 ; Address of exception handler 087a 0001 | | .CONST 0x0001 ; Number of locals 087b BODY_0878: 087b INIT_0878: 087b e5ff | | Load 0x2,-0x1 087c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 087d 8233 | 3 | Call 0x1,0x33 087e 0092 1c1f | | Action Push_String_Extended,0x1c1f ; "First_Member" 0880 e5ff | | Load 0x2,-0x1 0881 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0882 8234 | 4 | Call 0x1,0x34 0883 0092 1c30 | 0| Action Push_String_Extended,0x1c30 ; "Last_Bias" 0885 e5ff | | Load 0x2,-0x1 0886 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0887 820e | | Call 0x1,0xe 0888 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 088a e5ff | | Load 0x2,-0x1 088b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 088c 8221 | ! | Call 0x1,0x21 088d 0092 1c31 | 1| Action Push_String_Extended,0x1c31 ; "Family_Site" 088f e5ff | | Load 0x2,-0x1 0890 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0891 8232 | 2 | Call 0x1,0x32 0892 0092 1c21 | !| Action Push_String_Extended,0x1c21 ; "Entry_Params" 0894 e5ff | | Load 0x2,-0x1 0895 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0896 8231 | 1 | Call 0x1,0x31 0897 0092 1c22 | "| Action Push_String_Extended,0x1c22 ; "Entry_Name" 0899 8059 | Y | Call 0x0,0x59 089a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 089b 0000 0000 | | .BLANK 0000[0x5] 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 e5ff | | Load 0x2,-0x1 08a4 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 08a5 8214 | | Call 0x1,0x14 08a6 0092 1c32 | 2| Action Push_String_Extended,0x1c32 ; "Pointer" 08a8 e5ff | | Load 0x2,-0x1 08a9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08aa 820e | | Call 0x1,0xe 08ab 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 08ad e5ff | | Load 0x2,-0x1 08ae 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 08af 8216 | | Call 0x1,0x16 08b0 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 08b2 8052 | R | Call 0x0,0x52 08b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b4 0000 0000 | | .BLANK 0000[0x4] 08b8 ; -------------------------------------------------------------------------------------- 08b8 ; SUBPROGRAM 08b8 ; -------------------------------------------------------------------------------------- 08b8 08bb | | .CONST 0x08bb ; Address of begin 08b9 0004 | | .CONST 0x0004 ; Address of exception handler 08ba 0001 | | .CONST 0x0001 ; Number of locals 08bb BODY_08b8: 08bb INIT_08b8: 08bb e5ff | | Load 0x2,-0x1 08bc 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 08bd 8215 | | Call 0x1,0x15 08be 0092 1c32 | 2| Action Push_String_Extended,0x1c32 ; "Pointer" 08c0 e5ff | | Load 0x2,-0x1 08c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08c2 820e | | Call 0x1,0xe 08c3 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 08c5 e5ff | | Load 0x2,-0x1 08c6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 08c7 8216 | | Call 0x1,0x16 08c8 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 08ca 8052 | R | Call 0x0,0x52 08cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08cc 0000 0000 | | .BLANK 0000[0x4] 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 e5ff | | Load 0x2,-0x1 08d4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 08d5 804c | L | Call 0x0,0x4c 08d6 0092 1c33 | 3| Action Push_String_Extended,0x1c33 ; "Declarer_Name" 08d8 e5ff | | Load 0x2,-0x1 08d9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 08da 804c | L | Call 0x0,0x4c 08db 0092 1c34 | 4| Action Push_String_Extended,0x1c34 ; "Module_Imports" 08dd e5ff | | Load 0x2,-0x1 08de 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08df 820e | | Call 0x1,0xe 08e0 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 08e2 e5ff | | Load 0x2,-0x1 08e3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 08e4 8216 | | Call 0x1,0x16 08e5 0092 1c35 | 5| Action Push_String_Extended,0x1c35 ; "Module_Type" 08e7 804d | M | Call 0x0,0x4d 08e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e9 0000 0000 | | .BLANK 0000[0x7] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 0092 1c36 | 6| Action Push_String_Extended,0x1c36 ; "import space = " 08f5 e5ff | | Load 0x2,-0x1 08f6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 08f7 804c | L | Call 0x0,0x4c 08f8 01cc | | Execute Vector,Catenate 08f9 0092 1c37 | 7| Action Push_String_Extended,0x1c37 ; "; declared by " 08fb 01cc | | Execute Vector,Catenate 08fc e5ff | | Load 0x2,-0x1 08fd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 08fe 804c | L | Call 0x0,0x4c 08ff 01cc | | Execute Vector,Catenate 0900 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0901 0000 0000 | | .BLANK 0000[0x7] 0908 ; -------------------------------------------------------------------------------------- 0908 ; SUBPROGRAM 0908 ; -------------------------------------------------------------------------------------- 0908 0913 | | .CONST 0x0913 ; Address of begin 0909 0004 | | .CONST 0x0004 ; Address of exception handler 090a 0003 | | .CONST 0x0003 ; Number of locals 090b INIT_0908: 090b 48a5 |H | Short_Literal 0xa5 090c e058 | X | Load 0x0,0x58 090d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 090e 1c08 | | Execute_Immediate Run_Utility,0x8 090f 00d8 | | Load_Top At_Offset_0 0910 1c00 | | Execute_Immediate Run_Utility,0x0 0911 029f 108b | | Declare_Subprogram INIT_1088,For_Call 0913 BODY_0908: 0913 e402 | | Load 0x2,0x2 0914 0092 1c38 | 8| Action Push_String_Extended,0x1c38 ; "type frame = " 0916 e5ff | | Load 0x2,-0x1 0917 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0918 8211 | | Call 0x1,0x11 0919 01cc | | Execute Vector,Catenate 091a 0092 1c29 | )| Action Push_String_Extended,0x1c29 ; "; " 091c 01cc | | Execute Vector,Catenate 091d 0092 1c39 | 9| Action Push_String_Extended,0x1c39 ; "data frame = " 091f 01cc | | Execute Vector,Catenate 0920 e5ff | | Load 0x2,-0x1 0921 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 0922 8214 | | Call 0x1,0x14 0923 01cc | | Execute Vector,Catenate 0924 0092 1c3a | :| Action Push_String_Extended,0x1c3a ; " " 0926 01cc | | Execute Vector,Catenate 0927 e058 | X | Load 0x0,0x58 0928 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0929 00d1 | | Pop_Control Pop_Count_1 092a 0092 1c3b | ;| Action Push_String_Extended,0x1c3b ; "In_Rendezvous " 092c e5ff | | Load 0x2,-0x1 092d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 092e 8403 | | Call 0x2,0x3 092f 0092 1c3c | <| Action Push_String_Extended,0x1c3c ; "In_Utility " 0931 e5ff | | Load 0x2,-0x1 0932 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0933 8403 | | Call 0x2,0x3 0934 0092 1c3d | =| Action Push_String_Extended,0x1c3d ; "Has_Package " 0936 e5ff | | Load 0x2,-0x1 0937 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0938 8403 | | Call 0x2,0x3 0939 0092 1c3e | >| Action Push_String_Extended,0x1c3e ; "Has_Children " 093b e5ff | | Load 0x2,-0x1 093c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 093d 8403 | | Call 0x2,0x3 093e e402 | | Load 0x2,0x2 093f e058 | X | Load 0x0,0x58 0940 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0941 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0942 0000 0000 | | .BLANK 0000[0x6] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 094d | M | .CONST 0x094d ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0002 | | .CONST 0x0002 ; Number of locals 094b INIT_0948: 094b 029f 109b | | Declare_Subprogram INIT_1098,For_Call 094d BODY_0948: 094d 0092 1c3f | ?| Action Push_String_Extended,0x1c3f ; "enclosing frame = " 094f e5ff | | Load 0x2,-0x1 0950 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0951 804c | L | Call 0x0,0x4c 0952 01cc | | Execute Vector,Catenate 0953 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 0955 01cc | | Execute Vector,Catenate 0956 e5ff | | Load 0x2,-0x1 0957 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0958 8220 | | Call 0x1,0x20 0959 01cc | | Execute Vector,Catenate 095a 0092 1c41 | A| Action Push_String_Extended,0x1c41 ; "Auxiliary_Marked" 095c e5ff | | Load 0x2,-0x1 095d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 095e 8402 | | Call 0x2,0x2 095f 01cc | | Execute Vector,Catenate 0960 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0961 0000 0000 | | .BLANK 0000[0x7] 0968 ; -------------------------------------------------------------------------------------- 0968 ; SUBPROGRAM 0968 ; -------------------------------------------------------------------------------------- 0968 096b | k | .CONST 0x096b ; Address of begin 0969 0004 | | .CONST 0x0004 ; Address of exception handler 096a 0001 | | .CONST 0x0001 ; Number of locals 096b BODY_0968: 096b INIT_0968: 096b e5ff | | Load 0x2,-0x1 096c e5fe | | Load 0x2,-0x2 096d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 096e 804c | L | Call 0x0,0x4c 096f 01cc | | Execute Vector,Catenate 0970 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 0972 01cc | | Execute Vector,Catenate 0973 e5fe | | Load 0x2,-0x2 0974 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0975 8214 | | Call 0x1,0x14 0976 01cc | | Execute Vector,Catenate 0977 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0978 ; -------------------------------------------------------------------------------------- 0978 ; SUBPROGRAM 0978 ; -------------------------------------------------------------------------------------- 0978 097b | { | .CONST 0x097b ; Address of begin 0979 0004 | | .CONST 0x0004 ; Address of exception handler 097a 0001 | | .CONST 0x0001 ; Number of locals 097b BODY_0978: 097b INIT_0978: 097b e5ff | | Load 0x2,-0x1 097c 8047 | G | Call 0x0,0x47 097d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 097e 0000 0000 | | .XXX[0x2] 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0983 | | .CONST 0x0983 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0001 | | .CONST 0x0001 ; Number of locals 0983 BODY_0980: 0983 INIT_0980: 0983 e5ff | | Load 0x2,-0x1 0984 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0985 8248 | H | Call 0x1,0x48 0986 0092 1c42 | B| Action Push_String_Extended,0x1c42 ; "Forcing_Instruction" 0988 e5ff | | Load 0x2,-0x1 0989 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 098a 8228 | ( | Call 0x1,0x28 098b 0092 1c43 | C| Action Push_String_Extended,0x1c43 ; "Breakpoint_Mask" 098d e5ff | | Load 0x2,-0x1 098e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 098f 820e | | Call 0x1,0xe 0990 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0992 e5ff | | Load 0x2,-0x1 0993 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0994 8220 | | Call 0x1,0x20 0995 0092 1c44 | D| Action Push_String_Extended,0x1c44 ; "Control_Extent" 0997 e5ff | | Load 0x2,-0x1 0998 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0999 804b | K | Call 0x0,0x4b 099a 0092 1c45 | E| Action Push_String_Extended,0x1c45 ; "Force_Breakpoint" 099c e5ff | | Load 0x2,-0x1 099d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 099e 804b | K | Call 0x0,0x4b 099f 0092 1c46 | F| Action Push_String_Extended,0x1c46 ; "Is_Wired" 09a1 e5ff | | Load 0x2,-0x1 09a2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09a3 804b | K | Call 0x0,0x4b 09a4 0092 1c47 | G| Action Push_String_Extended,0x1c47 ; "Is_Catalogued" 09a6 e5ff | | Load 0x2,-0x1 09a7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 09a8 804b | K | Call 0x0,0x4b 09a9 0092 1c48 | H| Action Push_String_Extended,0x1c48 ; "Queue_Not_Empty" 09ab e5ff | | Load 0x2,-0x1 09ac 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09ad 804b | K | Call 0x0,0x4b 09ae 0092 1c49 | I| Action Push_String_Extended,0x1c49 ; "Queue_Allocated" 09b0 e5ff | | Load 0x2,-0x1 09b1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09b2 804c | L | Call 0x0,0x4c 09b3 0092 1c4a | J| Action Push_String_Extended,0x1c4a ; "Distributor" 09b5 8061 | a | Call 0x0,0x61 09b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09b7 0000 | | .XXX[0x1] 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; SUBPROGRAM 09b8 ; -------------------------------------------------------------------------------------- 09b8 09bb | | .CONST 0x09bb ; Address of begin 09b9 0004 | | .CONST 0x0004 ; Address of exception handler 09ba 0001 | | .CONST 0x0001 ; Number of locals 09bb BODY_09b8: 09bb INIT_09b8: 09bb e5ff | | Load 0x2,-0x1 09bc e046 | F | Load 0x0,0x46 09bd 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 09be 011c | | Execute Any,Convert_Unchecked 09bf 1c01 | | Execute_Immediate Run_Utility,0x1 09c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09c1 0000 0000 | | .BLANK 0000[0x7] 09c8 ; -------------------------------------------------------------------------------------- 09c8 ; SUBPROGRAM 09c8 ; -------------------------------------------------------------------------------------- 09c8 09cb | | .CONST 0x09cb ; Address of begin 09c9 0004 | | .CONST 0x0004 ; Address of exception handler 09ca 0001 | | .CONST 0x0001 ; Number of locals 09cb BODY_09c8: 09cb INIT_09c8: 09cb e5ff | | Load 0x2,-0x1 09cc 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 09cd 824a | J | Call 0x1,0x4a 09ce 0092 1c4b | K| Action Push_String_Extended,0x1c4b ; "Break_Cause" 09d0 e5ff | | Load 0x2,-0x1 09d1 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 09d2 8219 | | Call 0x1,0x19 09d3 0092 1c4c | L| Action Push_String_Extended,0x1c4c ; "Break_Address" 09d5 e5ff | | Load 0x2,-0x1 09d6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09d7 820e | | Call 0x1,0xe 09d8 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 09da e5ff | | Load 0x2,-0x1 09db 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 09dc 8228 | ( | Call 0x1,0x28 09dd 0092 1c4d | M| Action Push_String_Extended,0x1c4d ; "Restore_Enable" 09df e5ff | | Load 0x2,-0x1 09e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09e1 804c | L | Call 0x0,0x4c 09e2 0092 1c4e | N| Action Push_String_Extended,0x1c4e ; "Debugging_Scope" 09e4 8062 | b | Call 0x0,0x62 09e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09e6 0000 0000 | | .XXX[0x2] 09e8 ; -------------------------------------------------------------------------------------- 09e8 ; SUBPROGRAM 09e8 ; -------------------------------------------------------------------------------------- 09e8 09eb | | .CONST 0x09eb ; Address of begin 09e9 0004 | | .CONST 0x0004 ; Address of exception handler 09ea 0001 | | .CONST 0x0001 ; Number of locals 09eb BODY_09e8: 09eb INIT_09e8: 09eb 0092 1c4f | O| Action Push_String_Extended,0x1c4f ; "debugging scope = " 09ed e5ff | | Load 0x2,-0x1 09ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09ef 804c | L | Call 0x0,0x4c 09f0 01cc | | Execute Vector,Catenate 09f1 0092 1c50 | P| Action Push_String_Extended,0x1c50 ; "; restore enable = " 09f3 01cc | | Execute Vector,Catenate 09f4 e5ff | | Load 0x2,-0x1 09f5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 09f6 8228 | ( | Call 0x1,0x28 09f7 01cc | | Execute Vector,Catenate 09f8 e5ff | | Load 0x2,-0x1 09f9 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 09fa 0092 1c51 | Q| Action Push_String_Extended,0x1c51 ; "; break address = " 09fc 8224 | $ | Call 0x1,0x24 09fd 01cc | | Execute Vector,Catenate 09fe 0092 1c52 | R| Action Push_String_Extended,0x1c52 ; "; cause = " 0a00 01cc | | Execute Vector,Catenate 0a01 e5ff | | Load 0x2,-0x1 0a02 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0a03 824a | J | Call 0x1,0x4a 0a04 01cc | | Execute Vector,Catenate 0a05 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a06 0000 0000 | | .XXX[0x2] 0a08 ; -------------------------------------------------------------------------------------- 0a08 ; SUBPROGRAM 0a08 ; -------------------------------------------------------------------------------------- 0a08 0a0b | | .CONST 0x0a0b ; Address of begin 0a09 0004 | | .CONST 0x0004 ; Address of exception handler 0a0a 0001 | | .CONST 0x0001 ; Number of locals 0a0b BODY_0a08: 0a0b INIT_0a08: 0a0b e5ff | | Load 0x2,-0x1 0a0c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a0d 8063 | c | Call 0x0,0x63 0a0e 0092 1c53 | S| Action Push_String_Extended,0x1c53 ; "Node" 0a10 e5ff | | Load 0x2,-0x1 0a11 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a12 804c | L | Call 0x0,0x4c 0a13 0092 1c54 | T| Action Push_String_Extended,0x1c54 ; "Name" 0a15 804e | N | Call 0x0,0x4e 0a16 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a17 0000 | | .XXX[0x1] 0a18 ; -------------------------------------------------------------------------------------- 0a18 ; SUBPROGRAM 0a18 ; -------------------------------------------------------------------------------------- 0a18 0a1b | | .CONST 0x0a1b ; Address of begin 0a19 0004 | | .CONST 0x0004 ; Address of exception handler 0a1a 0001 | | .CONST 0x0001 ; Number of locals 0a1b BODY_0a18: 0a1b INIT_0a18: 0a1b e5ff | | Load 0x2,-0x1 0a1c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0a1d 824d | M | Call 0x1,0x4d 0a1e 0092 1c2d | -| Action Push_String_Extended,0x1c2d ; "Val_Part" 0a20 e5ff | | Load 0x2,-0x1 0a21 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a22 820e | | Call 0x1,0xe 0a23 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0a25 e5ff | | Load 0x2,-0x1 0a26 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a27 8216 | | Call 0x1,0x16 0a28 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 0a2a 8052 | R | Call 0x0,0x52 0a2b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a2c 0000 0000 | | .BLANK 0000[0x4] 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; SUBPROGRAM 0a30 ; -------------------------------------------------------------------------------------- 0a30 0a33 | 3 | .CONST 0x0a33 ; Address of begin 0a31 0004 | | .CONST 0x0004 ; Address of exception handler 0a32 0001 | | .CONST 0x0001 ; Number of locals 0a33 BODY_0a30: 0a33 INIT_0a30: 0a33 e5ff | | Load 0x2,-0x1 0a34 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a35 820e | | Call 0x1,0xe 0a36 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0a38 e5ff | | Load 0x2,-0x1 0a39 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0a3a 8213 | | Call 0x1,0x13 0a3b 0092 1c55 | U| Action Push_String_Extended,0x1c55 ; "Dependence_Site" 0a3d 804e | N | Call 0x0,0x4e 0a3e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a3f 0000 | | .XXX[0x1] 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; SUBPROGRAM 0a40 ; -------------------------------------------------------------------------------------- 0a40 0a43 | C | .CONST 0x0a43 ; Address of begin 0a41 0004 | | .CONST 0x0004 ; Address of exception handler 0a42 0001 | | .CONST 0x0001 ; Number of locals 0a43 BODY_0a40: 0a43 INIT_0a40: 0a43 e5ff | | Load 0x2,-0x1 0a44 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 0a45 8221 | ! | Call 0x1,0x21 0a46 0092 1c56 | V| Action Push_String_Extended,0x1c56 ; "Select_Site" 0a48 e5ff | | Load 0x2,-0x1 0a49 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0a4a 8236 | 6 | Call 0x1,0x36 0a4b 0092 1c57 | W| Action Push_String_Extended,0x1c57 ; "Field_Count" 0a4d e5ff | | Load 0x2,-0x1 0a4e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0a4f 820e | | Call 0x1,0xe 0a50 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0a52 e5ff | | Load 0x2,-0x1 0a53 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0a54 8220 | | Call 0x1,0x20 0a55 0092 1c58 | X| Action Push_String_Extended,0x1c58 ; "Select_Ref" 0a57 e5ff | | Load 0x2,-0x1 0a58 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0a59 804b | K | Call 0x0,0x4b 0a5a 0092 1c59 | Y| Action Push_String_Extended,0x1c59 ; "Some_Choice_Open" 0a5c e5ff | | Load 0x2,-0x1 0a5d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0a5e 804b | K | Call 0x0,0x4b 0a5f 0092 1c5a | Z| Action Push_String_Extended,0x1c5a ; "Terminate_Is_Open" 0a61 e5ff | | Load 0x2,-0x1 0a62 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0a63 804b | K | Call 0x0,0x4b 0a64 0092 1c5b | [| Action Push_String_Extended,0x1c5b ; "Has_Terminate" 0a66 e5ff | | Load 0x2,-0x1 0a67 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0a68 804b | K | Call 0x0,0x4b 0a69 0092 1c5c | \| Action Push_String_Extended,0x1c5c ; "Timed_Is_Open" 0a6b e5ff | | Load 0x2,-0x1 0a6c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a6d 804b | K | Call 0x0,0x4b 0a6e 0092 1c5d | ]| Action Push_String_Extended,0x1c5d ; "Has_Timed_Clause" 0a70 e5ff | | Load 0x2,-0x1 0a71 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a72 8236 | 6 | Call 0x1,0x36 0a73 0092 1c5e | ^| Action Push_String_Extended,0x1c5e ; "Last_Choice" 0a75 8061 | a | Call 0x0,0x61 0a76 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a77 0000 | | .XXX[0x1] 0a78 ; -------------------------------------------------------------------------------------- 0a78 ; SUBPROGRAM 0a78 ; -------------------------------------------------------------------------------------- 0a78 0a7b | { | .CONST 0x0a7b ; Address of begin 0a79 0004 | | .CONST 0x0004 ; Address of exception handler 0a7a 0001 | | .CONST 0x0001 ; Number of locals 0a7b BODY_0a78: 0a7b INIT_0a78: 0a7b 0092 1c5f | _| Action Push_String_Extended,0x1c5f ; "(Of_Kind => " 0a7d e5ff | | Load 0x2,-0x1 0a7e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0a7f 820e | | Call 0x1,0xe 0a80 01cc | | Execute Vector,Catenate 0a81 0092 1c60 | `| Action Push_String_Extended,0x1c60 ; ")" 0a83 01cc | | Execute Vector,Catenate 0a84 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a85 0000 0000 | | .XXX[0x3] 0a87 0000 | | 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; SUBPROGRAM 0a88 ; -------------------------------------------------------------------------------------- 0a88 0a8b | | .CONST 0x0a8b ; Address of begin 0a89 0004 | | .CONST 0x0004 ; Address of exception handler 0a8a 0001 | | .CONST 0x0001 ; Number of locals 0a8b BODY_0a88: 0a8b INIT_0a88: 0a8b e5ff | | Load 0x2,-0x1 0a8c 804a | J | Call 0x0,0x4a 0a8d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a8e 0000 0000 | | .XXX[0x2] 0a90 ; -------------------------------------------------------------------------------------- 0a90 ; SUBPROGRAM 0a90 ; -------------------------------------------------------------------------------------- 0a90 0a93 | | .CONST 0x0a93 ; Address of begin 0a91 0004 | | .CONST 0x0004 ; Address of exception handler 0a92 0001 | | .CONST 0x0001 ; Number of locals 0a93 BODY_0a90: 0a93 INIT_0a90: 0a93 e5ff | | Load 0x2,-0x1 0a94 804a | J | Call 0x0,0x4a 0a95 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a96 0000 0000 | | .XXX[0x2] 0a98 ; -------------------------------------------------------------------------------------- 0a98 ; SUBPROGRAM 0a98 ; -------------------------------------------------------------------------------------- 0a98 0a9b | | .CONST 0x0a9b ; Address of begin 0a99 0004 | | .CONST 0x0004 ; Address of exception handler 0a9a 0001 | | .CONST 0x0001 ; Number of locals 0a9b BODY_0a98: 0a9b INIT_0a98: 0a9b e5ff | | Load 0x2,-0x1 0a9c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a9d 8253 | S | Call 0x1,0x53 0a9e 0092 1c2d | -| Action Push_String_Extended,0x1c2d ; "Val_Part" 0aa0 e5ff | | Load 0x2,-0x1 0aa1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0aa2 820e | | Call 0x1,0xe 0aa3 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0aa5 e5ff | | Load 0x2,-0x1 0aa6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0aa7 8252 | R | Call 0x1,0x52 0aa8 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 0aaa 8052 | R | Call 0x0,0x52 0aab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0aac 0000 0000 | | .BLANK 0000[0x4] 0ab0 ; -------------------------------------------------------------------------------------- 0ab0 ; SUBPROGRAM 0ab0 ; -------------------------------------------------------------------------------------- 0ab0 0ab3 | | .CONST 0x0ab3 ; Address of begin 0ab1 0004 | | .CONST 0x0004 ; Address of exception handler 0ab2 0001 | | .CONST 0x0001 ; Number of locals 0ab3 BODY_0ab0: 0ab3 INIT_0ab0: 0ab3 e5ff | | Load 0x2,-0x1 0ab4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ab5 8210 | | Call 0x1,0x10 0ab6 0092 1c2d | -| Action Push_String_Extended,0x1c2d ; "Val_Part" 0ab8 e5ff | | Load 0x2,-0x1 0ab9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0aba 820e | | Call 0x1,0xe 0abb 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0abd e5ff | | Load 0x2,-0x1 0abe 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0abf 8216 | | Call 0x1,0x16 0ac0 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 0ac2 8052 | R | Call 0x0,0x52 0ac3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ac4 0000 0000 | | .BLANK 0000[0x4] 0ac8 ; -------------------------------------------------------------------------------------- 0ac8 ; SUBPROGRAM 0ac8 ; -------------------------------------------------------------------------------------- 0ac8 0acb | | .CONST 0x0acb ; Address of begin 0ac9 0004 | | .CONST 0x0004 ; Address of exception handler 0aca 0001 | | .CONST 0x0001 ; Number of locals 0acb BODY_0ac8: 0acb INIT_0ac8: 0acb e5ff | | Load 0x2,-0x1 0acc 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0acd 8220 | | Call 0x1,0x20 0ace 0092 1c0e | | Action Push_String_Extended,0x1c0e ; "Control_Offset" 0ad0 e5ff | | Load 0x2,-0x1 0ad1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ad2 804b | K | Call 0x0,0x4b 0ad3 0092 1c41 | A| Action Push_String_Extended,0x1c41 ; "Auxiliary_Marked" 0ad5 e5ff | | Load 0x2,-0x1 0ad6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0ad7 804c | L | Call 0x0,0x4c 0ad8 0092 1c03 | | Action Push_String_Extended,0x1c03 ; "Stack" 0ada 8052 | R | Call 0x0,0x52 0adb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0adc 0000 0000 | | .BLANK 0000[0x4] 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 ; SUBPROGRAM 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 0ae3 | | .CONST 0x0ae3 ; Address of begin 0ae1 0004 | | .CONST 0x0004 ; Address of exception handler 0ae2 0001 | | .CONST 0x0001 ; Number of locals 0ae3 BODY_0ae0: 0ae3 INIT_0ae0: 0ae3 e5ff | | Load 0x2,-0x1 0ae4 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0ae5 8220 | | Call 0x1,0x20 0ae6 0092 1c61 | a| Action Push_String_Extended,0x1c61 ; "Ctl_Offset" 0ae8 e5ff | | Load 0x2,-0x1 0ae9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0aea 804b | K | Call 0x0,0x4b 0aeb 0092 1c62 | b| Action Push_String_Extended,0x1c62 ; "Is_Open" 0aed e5ff | | Load 0x2,-0x1 0aee 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0aef 804b | K | Call 0x0,0x4b 0af0 0092 1c63 | c| Action Push_String_Extended,0x1c63 ; "Is_Family" 0af2 e5ff | | Load 0x2,-0x1 0af3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0af4 804c | L | Call 0x0,0x4c 0af5 0092 1c03 | | Action Push_String_Extended,0x1c03 ; "Stack" 0af7 804d | M | Call 0x0,0x4d 0af8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0af9 0000 0000 | | .BLANK 0000[0x7] 0b00 ; -------------------------------------------------------------------------------------- 0b00 ; SUBPROGRAM 0b00 ; -------------------------------------------------------------------------------------- 0b00 0b03 | | .CONST 0x0b03 ; Address of begin 0b01 0004 | | .CONST 0x0004 ; Address of exception handler 0b02 0001 | | .CONST 0x0001 ; Number of locals 0b03 BODY_0b00: 0b03 INIT_0b00: 0b03 e5ff | | Load 0x2,-0x1 0b04 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b05 821b | | Call 0x1,0x1b 0b06 0092 1c64 | d| Action Push_String_Extended,0x1c64 ; "Frame_Lex_Level" 0b08 e5ff | | Load 0x2,-0x1 0b09 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0b0a 821a | | Call 0x1,0x1a 0b0b 0092 1c65 | e| Action Push_String_Extended,0x1c65 ; "Return_Address" 0b0d e5ff | | Load 0x2,-0x1 0b0e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b0f 820e | | Call 0x1,0xe 0b10 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0b12 e5ff | | Load 0x2,-0x1 0b13 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0b14 8256 | V | Call 0x1,0x56 0b15 0092 1c66 | f| Action Push_String_Extended,0x1c66 ; "Enclosing_Frame" 0b17 804d | M | Call 0x0,0x4d 0b18 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b19 0000 0000 | | .BLANK 0000[0x7] 0b20 ; -------------------------------------------------------------------------------------- 0b20 ; SUBPROGRAM 0b20 ; -------------------------------------------------------------------------------------- 0b20 0b23 | # | .CONST 0x0b23 ; Address of begin 0b21 0004 | | .CONST 0x0004 ; Address of exception handler 0b22 0001 | | .CONST 0x0001 ; Number of locals 0b23 BODY_0b20: 0b23 INIT_0b20: 0b23 e5ff | | Load 0x2,-0x1 0b24 8047 | G | Call 0x0,0x47 0b25 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b26 0000 0000 | | .XXX[0x2] 0b28 ; -------------------------------------------------------------------------------------- 0b28 ; SUBPROGRAM 0b28 ; -------------------------------------------------------------------------------------- 0b28 0b2b | + | .CONST 0x0b2b ; Address of begin 0b29 0004 | | .CONST 0x0004 ; Address of exception handler 0b2a 0001 | | .CONST 0x0001 ; Number of locals 0b2b BODY_0b28: 0b2b INIT_0b28: 0b2b e5ff | | Load 0x2,-0x1 0b2c 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 0b2d 8214 | | Call 0x1,0x14 0b2e 0092 1c67 | g| Action Push_String_Extended,0x1c67 ; "Data_Frame" 0b30 e5ff | | Load 0x2,-0x1 0b31 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0b32 821d | | Call 0x1,0x1d 0b33 0092 1c68 | h| Action Push_String_Extended,0x1c68 ; "Block_Start" 0b35 e5ff | | Load 0x2,-0x1 0b36 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 0b37 8220 | | Call 0x1,0x20 0b38 0092 1c69 | i| Action Push_String_Extended,0x1c69 ; "Dynamic_Link" 0b3a e5ff | | Load 0x2,-0x1 0b3b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0b3c 820e | | Call 0x1,0xe 0b3d 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0b3f e5ff | | Load 0x2,-0x1 0b40 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0b41 8211 | | Call 0x1,0x11 0b42 0092 1c6a | j| Action Push_String_Extended,0x1c6a ; "Type_Frame" 0b44 e5ff | | Load 0x2,-0x1 0b45 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0b46 804b | K | Call 0x0,0x4b 0b47 0092 1c6b | k| Action Push_String_Extended,0x1c6b ; "Has_Children" 0b49 e5ff | | Load 0x2,-0x1 0b4a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b4b 804b | K | Call 0x0,0x4b 0b4c 0092 1c6c | l| Action Push_String_Extended,0x1c6c ; "Has_Package" 0b4e e5ff | | Load 0x2,-0x1 0b4f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0b50 804b | K | Call 0x0,0x4b 0b51 0092 1c6d | m| Action Push_String_Extended,0x1c6d ; "In_Utility" 0b53 e5ff | | Load 0x2,-0x1 0b54 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b55 804b | K | Call 0x0,0x4b 0b56 0092 1c6e | n| Action Push_String_Extended,0x1c6e ; "In_Rendezvous" 0b58 e5ff | | Load 0x2,-0x1 0b59 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b5a 804b | K | Call 0x0,0x4b 0b5b 0092 1c6f | o| Action Push_String_Extended,0x1c6f ; "Exports_Legal" 0b5d e5ff | | Load 0x2,-0x1 0b5e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b5f 804c | L | Call 0x0,0x4c 0b60 0092 1c70 | p| Action Push_String_Extended,0x1c70 ; "Outer_Lex_Frame" 0b62 8064 | d | Call 0x0,0x64 0b63 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b64 0000 0000 | | .BLANK 0000[0x4] 0b68 ; -------------------------------------------------------------------------------------- 0b68 ; SUBPROGRAM 0b68 ; -------------------------------------------------------------------------------------- 0b68 0b6b | k | .CONST 0x0b6b ; Address of begin 0b69 0004 | | .CONST 0x0004 ; Address of exception handler 0b6a 0001 | | .CONST 0x0001 ; Number of locals 0b6b BODY_0b68: 0b6b INIT_0b68: 0b6b e5ff | | Load 0x2,-0x1 0b6c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b6d 821b | | Call 0x1,0x1b 0b6e 0092 1c12 | | Action Push_String_Extended,0x1c12 ; "Lex_Level" 0b70 e5ff | | Load 0x2,-0x1 0b71 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0b72 8219 | | Call 0x1,0x19 0b73 0092 1c13 | | Action Push_String_Extended,0x1c13 ; "Subprog_Start" 0b75 e5ff | | Load 0x2,-0x1 0b76 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b77 821f | | Call 0x1,0x1f 0b78 0092 1c22 | "| Action Push_String_Extended,0x1c22 ; "Entry_Name" 0b7a e5ff | | Load 0x2,-0x1 0b7b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0b7c 820e | | Call 0x1,0xe 0b7d 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0b7f e5ff | | Load 0x2,-0x1 0b80 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0b81 8257 | W | Call 0x1,0x57 0b82 0092 1c14 | | Action Push_String_Extended,0x1c14 ; "Declare_Frame" 0b84 8062 | b | Call 0x0,0x62 0b85 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b86 0000 0000 | | .XXX[0x2] 0b88 ; -------------------------------------------------------------------------------------- 0b88 ; SUBPROGRAM 0b88 ; -------------------------------------------------------------------------------------- 0b88 0b8b | | .CONST 0x0b8b ; Address of begin 0b89 0004 | | .CONST 0x0004 ; Address of exception handler 0b8a 0001 | | .CONST 0x0001 ; Number of locals 0b8b BODY_0b88: 0b8b INIT_0b88: 0b8b e5ff | | Load 0x2,-0x1 0b8c 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0b8d 8065 | e | Call 0x0,0x65 0b8e 0092 1c71 | q| Action Push_String_Extended,0x1c71 ; "Partner_Charge_Vpid" 0b90 e5ff | | Load 0x2,-0x1 0b91 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0b92 804c | L | Call 0x0,0x4c 0b93 0092 1c72 | r| Action Push_String_Extended,0x1c72 ; "Partner_Name" 0b95 e5ff | | Load 0x2,-0x1 0b96 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0b97 820e | | Call 0x1,0xe 0b98 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0b9a e5ff | | Load 0x2,-0x1 0b9b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0b9c 8232 | 2 | Call 0x1,0x32 0b9d 0092 1c73 | s| Action Push_String_Extended,0x1c73 ; "Total_Params" 0b9f e5ff | | Load 0x2,-0x1 0ba0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0ba1 804b | K | Call 0x0,0x4b 0ba2 0092 1c74 | t| Action Push_String_Extended,0x1c74 ; "In_Select" 0ba4 e5ff | | Load 0x2,-0x1 0ba5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0ba6 822a | * | Call 0x1,0x2a 0ba7 0092 1c75 | u| Action Push_String_Extended,0x1c75 ; "Return_Priority" 0ba9 e5ff | | Load 0x2,-0x1 0baa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0bab 8065 | e | Call 0x0,0x65 0bac 0092 1c76 | v| Action Push_String_Extended,0x1c76 ; "Return_Charge_Vpid" 0bae e5ff | | Load 0x2,-0x1 0baf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bb0 822e | . | Call 0x1,0x2e 0bb1 0092 1c77 | w| Action Push_String_Extended,0x1c77 ; "Select_Choice" 0bb3 8066 | f | Call 0x0,0x66 0bb4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bb5 0000 0000 | | .XXX[0x3] 0bb7 0000 | | 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 ; SUBPROGRAM 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 0bbb | | .CONST 0x0bbb ; Address of begin 0bb9 0004 | | .CONST 0x0004 ; Address of exception handler 0bba 0001 | | .CONST 0x0001 ; Number of locals 0bbb BODY_0bb8: 0bbb INIT_0bb8: 0bbb e5ff | | Load 0x2,-0x1 0bbc 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0bbd 8214 | | Call 0x1,0x14 0bbe 0092 1c78 | x| Action Push_String_Extended,0x1c78 ; "Data_Stack_Mark" 0bc0 e5ff | | Load 0x2,-0x1 0bc1 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0bc2 820e | | Call 0x1,0xe 0bc3 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0bc5 e5ff | | Load 0x2,-0x1 0bc6 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0bc7 8211 | | Call 0x1,0x11 0bc8 0092 1c79 | y| Action Push_String_Extended,0x1c79 ; "Type_Stack_Mark" 0bca e5ff | | Load 0x2,-0x1 0bcb 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0bcc 804b | K | Call 0x0,0x4b 0bcd 0092 1c7a | z| Action Push_String_Extended,0x1c7a ; "Appending_Fields" 0bcf e5ff | | Load 0x2,-0x1 0bd0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0bd1 804b | K | Call 0x0,0x4b 0bd2 0092 1c7b | {| Action Push_String_Extended,0x1c7b ; "Data_Mark_Used" 0bd4 e5ff | | Load 0x2,-0x1 0bd5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0bd6 804b | K | Call 0x0,0x4b 0bd7 0092 1c7c | || Action Push_String_Extended,0x1c7c ; "Type_Mark_Used" 0bd9 e5ff | | Load 0x2,-0x1 0bda 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0bdb 804b | K | Call 0x0,0x4b 0bdc 0092 1c7d | }| Action Push_String_Extended,0x1c7d ; "Has_Prior_Mark" 0bde e5ff | | Load 0x2,-0x1 0bdf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0be0 804b | K | Call 0x0,0x4b 0be1 0092 1c7e | ~| Action Push_String_Extended,0x1c7e ; "In_Export_Frame" 0be3 8066 | f | Call 0x0,0x66 0be4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0be5 0000 0000 | | .XXX[0x3] 0be7 0000 | | 0be8 ; -------------------------------------------------------------------------------------- 0be8 ; SUBPROGRAM 0be8 ; -------------------------------------------------------------------------------------- 0be8 0bf4 | | .CONST 0x0bf4 ; Address of begin 0be9 0004 | | .CONST 0x0004 ; Address of exception handler 0bea 0002 | | .CONST 0x0002 ; Number of locals 0beb INIT_0be8: 0beb e2df | | Load 0x1,0xdf 0bec 0322 | " | Declare_Variable Record 0bed e5ff | | Load 0x2,-0x1 0bee e2e0 | | Load 0x1,0xe0 0bef e2e1 | | Load 0x1,0xe1 0bf0 1de2 | | Execute_Immediate Reference_Lex_1,0xe2 0bf1 8001 | | Call 0x0,0x1 0bf2 e402 | | Load 0x2,0x2 0bf3 017d | } | Execute Record,Structure_Write 0bf4 BODY_0be8: 0bf4 00d8 | | Load_Top At_Offset_0 0bf5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0bf6 804b | K | Call 0x0,0x4b 0bf7 0092 1c7f | | Action Push_String_Extended,0x1c7f ; "Constrained" 0bf9 e402 | | Load 0x2,0x2 0bfa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0bfb 804b | K | Call 0x0,0x4b 0bfc 0092 1c80 | | Action Push_String_Extended,0x1c80 ; "Global_Only" 0bfe e402 | | Load 0x2,0x2 0bff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c00 8047 | G | Call 0x0,0x47 0c01 0092 1c81 | | Action Push_String_Extended,0x1c81 ; "Database_Index" 0c03 8052 | R | Call 0x0,0x52 0c04 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c05 0000 0000 | | .XXX[0x3] 0c07 0000 | | 0c08 ; -------------------------------------------------------------------------------------- 0c08 ; SUBPROGRAM 0c08 ; -------------------------------------------------------------------------------------- 0c08 0c1c | | .CONST 0x0c1c ; Address of begin 0c09 0004 | | .CONST 0x0004 ; Address of exception handler 0c0a 0004 | | .CONST 0x0004 ; Number of locals 0c0b INIT_0c08: 0c0b e2df | | Load 0x1,0xdf 0c0c 0322 | " | Declare_Variable Record 0c0d e5ff | | Load 0x2,-0x1 0c0e e2e0 | | Load 0x1,0xe0 0c0f e2e1 | | Load 0x1,0xe1 0c10 1de2 | | Execute_Immediate Reference_Lex_1,0xe2 0c11 8001 | | Call 0x0,0x1 0c12 e402 | | Load 0x2,0x2 0c13 017d | } | Execute Record,Structure_Write 0c14 483c |H< | Short_Literal 0x3c 0c15 e058 | X | Load 0x0,0x58 0c16 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c17 1c08 | | Execute_Immediate Run_Utility,0x8 0c18 00d8 | | Load_Top At_Offset_0 0c19 1c00 | | Execute_Immediate Run_Utility,0x0 0c1a 029f 10ab | | Declare_Subprogram INIT_10a8,For_Call 0c1c BODY_0c08: 0c1c 0092 1c82 | | Action Push_String_Extended,0x1c82 ; "database index = " 0c1e e402 | | Load 0x2,0x2 0c1f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c20 8047 | G | Call 0x0,0x47 0c21 01cc | | Execute Vector,Catenate 0c22 8404 | | Call 0x2,0x4 0c23 0092 1c83 | | Action Push_String_Extended,0x1c83 ; "; mode = " 0c25 8404 | | Call 0x2,0x4 0c26 e402 | | Load 0x2,0x2 0c27 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c28 6804 |h | Jump_Zero 0xc2d 0c29 0092 1c84 | | Action Push_String_Extended,0x1c84 ; " GLOBAL" 0c2b 8404 | | Call 0x2,0x4 0c2c 7803 |x | Jump 0xc30 0c2d 0092 1c85 | | Action Push_String_Extended,0x1c85 ; " LOCAL" 0c2f 8404 | | Call 0x2,0x4 0c30 e402 | | Load 0x2,0x2 0c31 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0c32 6804 |h | Jump_Zero 0xc37 0c33 0092 1c86 | | Action Push_String_Extended,0x1c86 ; " CONSTRAINED" 0c35 8404 | | Call 0x2,0x4 0c36 7803 |x | Jump 0xc3a 0c37 0092 1c87 | | Action Push_String_Extended,0x1c87 ; " UNCONSTRAINED" 0c39 8404 | | Call 0x2,0x4 0c3a e403 | | Load 0x2,0x3 0c3b e058 | X | Load 0x0,0x58 0c3c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c3d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c3e 0000 0000 | | .XXX[0x2] 0c40 ; -------------------------------------------------------------------------------------- 0c40 ; SUBPROGRAM 0c40 ; -------------------------------------------------------------------------------------- 0c40 0c4b | K | .CONST 0x0c4b ; Address of begin 0c41 0004 | | .CONST 0x0004 ; Address of exception handler 0c42 0003 | | .CONST 0x0003 ; Number of locals 0c43 INIT_0c40: 0c43 48b4 |H | Short_Literal 0xb4 0c44 e058 | X | Load 0x0,0x58 0c45 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c46 1c08 | | Execute_Immediate Run_Utility,0x8 0c47 00d8 | | Load_Top At_Offset_0 0c48 1c00 | | Execute_Immediate Run_Utility,0x0 0c49 029f 10b3 | | Declare_Subprogram INIT_10b0,For_Call 0c4b BODY_0c40: 0c4b 0092 1c88 | | Action Push_String_Extended,0x1c88 ; "In_Entry_Call " 0c4d e5ff | | Load 0x2,-0x1 0c4e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0c4f 8403 | | Call 0x2,0x3 0c50 e402 | | Load 0x2,0x2 0c51 0092 1c89 | | Action Push_String_Extended,0x1c89 ; "debugging state = (" 0c53 e5ff | | Load 0x2,-0x1 0c54 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0c55 82e5 | | Call 0x1,0xe5 0c56 01cc | | Execute Vector,Catenate 0c57 0092 1c60 | `| Action Push_String_Extended,0x1c60 ; ")" 0c59 01cc | | Execute Vector,Catenate 0c5a e058 | X | Load 0x0,0x58 0c5b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c5c 00d1 | | Pop_Control Pop_Count_1 0c5d e5ff | | Load 0x2,-0x1 0c5e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0c5f 0c01 | | Execute_Immediate Greater_Equal,0x1 0c60 6810 |h | Jump_Zero 0xc71 0c61 e402 | | Load 0x2,0x2 0c62 0092 1c8a | | Action Push_String_Extended,0x1c8a ; " In_Critical_Region " 0c64 e058 | X | Load 0x0,0x58 0c65 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c66 00d1 | | Pop_Control Pop_Count_1 0c67 e5ff | | Load 0x2,-0x1 0c68 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0c69 680c |h | Jump_Zero 0xc76 0c6a e402 | | Load 0x2,0x2 0c6b 0092 1c8b | | Action Push_String_Extended,0x1c8b ; "and Aborted" 0c6d e058 | X | Load 0x0,0x58 0c6e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0c6f 00d1 | | Pop_Control Pop_Count_1 0c70 7805 |x | Jump 0xc76 0c71 0092 1c8c | | Action Push_String_Extended,0x1c8c ; " Aborted_Critical_Region" 0c73 e5ff | | Load 0x2,-0x1 0c74 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0c75 8403 | | Call 0x2,0x3 0c76 e402 | | Load 0x2,0x2 0c77 e058 | X | Load 0x0,0x58 0c78 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c79 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c7a 0000 0000 | | .BLANK 0000[0x6] 0c80 ; -------------------------------------------------------------------------------------- 0c80 ; SUBPROGRAM 0c80 ; -------------------------------------------------------------------------------------- 0c80 0c83 | | .CONST 0x0c83 ; Address of begin 0c81 0004 | | .CONST 0x0004 ; Address of exception handler 0c82 0001 | | .CONST 0x0001 ; Number of locals 0c83 BODY_0c80: 0c83 INIT_0c80: 0c83 e5ff | | Load 0x2,-0x1 0c84 8047 | G | Call 0x0,0x47 0c85 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c86 0000 0000 | | .XXX[0x2] 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 e5ff | | Load 0x2,-0x1 0c8c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0c8d 824d | M | Call 0x1,0x4d 0c8e 0092 1c8d | | Action Push_String_Extended,0x1c8d ; "For_Module" 0c90 e5ff | | Load 0x2,-0x1 0c91 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0c92 820e | | Call 0x1,0xe 0c93 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0c95 e5ff | | Load 0x2,-0x1 0c96 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c97 82e7 | | Call 0x1,0xe7 0c98 0092 1c8e | | Action Push_String_Extended,0x1c8e ; "Permitted" 0c9a 8052 | R | Call 0x0,0x52 0c9b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c9c 0000 0000 | | .BLANK 0000[0x4] 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 e5ff | | Load 0x2,-0x1 0ca4 0092 1c8f | | Action Push_String_Extended,0x1c8f ; " @ " 0ca6 01cc | | Execute Vector,Catenate 0ca7 e5fe | | Load 0x2,-0x2 0ca8 804c | L | Call 0x0,0x4c 0ca9 01cc | | Execute Vector,Catenate 0caa 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 0cac 01cc | | Execute Vector,Catenate 0cad e5fd | | Load 0x2,-0x3 0cae 8211 | | Call 0x1,0x11 0caf 01cc | | Execute Vector,Catenate 0cb0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0cb1 0000 0000 | | .BLANK 0000[0x7] 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 e5ff | | Load 0x2,-0x1 0cbc 0092 1c8f | | Action Push_String_Extended,0x1c8f ; " @ " 0cbe 01cc | | Execute Vector,Catenate 0cbf e5fe | | Load 0x2,-0x2 0cc0 804c | L | Call 0x0,0x4c 0cc1 01cc | | Execute Vector,Catenate 0cc2 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 0cc4 01cc | | Execute Vector,Catenate 0cc5 e5fd | | Load 0x2,-0x3 0cc6 8214 | | Call 0x1,0x14 0cc7 01cc | | Execute Vector,Catenate 0cc8 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0cc9 0000 0000 | | .BLANK 0000[0x7] 0cd0 ; -------------------------------------------------------------------------------------- 0cd0 ; SUBPROGRAM 0cd0 ; -------------------------------------------------------------------------------------- 0cd0 0cd3 | | .CONST 0x0cd3 ; Address of begin 0cd1 0004 | | .CONST 0x0004 ; Address of exception handler 0cd2 0001 | | .CONST 0x0001 ; Number of locals 0cd3 BODY_0cd0: 0cd3 INIT_0cd0: 0cd3 e5ff | | Load 0x2,-0x1 0cd4 e067 | g | Load 0x0,0x67 0cd5 011c | | Execute Any,Convert_Unchecked 0cd6 1c01 | | Execute_Immediate Run_Utility,0x1 0cd7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 ; SUBPROGRAM 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 0cdb | | .CONST 0x0cdb ; Address of begin 0cd9 0004 | | .CONST 0x0004 ; Address of exception handler 0cda 0001 | | .CONST 0x0001 ; Number of locals 0cdb BODY_0cd8: 0cdb INIT_0cd8: 0cdb e5ff | | Load 0x2,-0x1 0cdc e068 | h | Load 0x0,0x68 0cdd 011c | | Execute Any,Convert_Unchecked 0cde 1c01 | | Execute_Immediate Run_Utility,0x1 0cdf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 ; SUBPROGRAM 0ce0 ; -------------------------------------------------------------------------------------- 0ce0 0ce3 | | .CONST 0x0ce3 ; Address of begin 0ce1 0004 | | .CONST 0x0004 ; Address of exception handler 0ce2 0001 | | .CONST 0x0001 ; Number of locals 0ce3 BODY_0ce0: 0ce3 INIT_0ce0: 0ce3 e5ff | | Load 0x2,-0x1 0ce4 e046 | F | Load 0x0,0x46 0ce5 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 0ce6 011c | | Execute Any,Convert_Unchecked 0ce7 1c01 | | Execute_Immediate Run_Utility,0x1 0ce8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ce9 0000 0000 | | .BLANK 0000[0x7] 0cf0 ; -------------------------------------------------------------------------------------- 0cf0 ; SUBPROGRAM 0cf0 ; -------------------------------------------------------------------------------------- 0cf0 0cf3 | | .CONST 0x0cf3 ; Address of begin 0cf1 0004 | | .CONST 0x0004 ; Address of exception handler 0cf2 0001 | | .CONST 0x0001 ; Number of locals 0cf3 BODY_0cf0: 0cf3 INIT_0cf0: 0cf3 e5ff | | Load 0x2,-0x1 0cf4 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0cf5 822a | * | Call 0x1,0x2a 0cf6 0092 1c90 | | Action Push_String_Extended,0x1c90 ; "Base_Priority" 0cf8 e5ff | | Load 0x2,-0x1 0cf9 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0cfa 804b | K | Call 0x0,0x4b 0cfb 0092 1c91 | | Action Push_String_Extended,0x1c91 ; "Fixed_Priority" 0cfd e5ff | | Load 0x2,-0x1 0cfe 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0cff 8047 | G | Call 0x0,0x47 0d00 0092 1c92 | | Action Push_String_Extended,0x1c92 ; "Last_Job_Priority" 0d02 e5ff | | Load 0x2,-0x1 0d03 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0d04 804b | K | Call 0x0,0x4b 0d05 0092 1c93 | | Action Push_String_Extended,0x1c93 ; "Aborted_In_Critical_Region" 0d07 e5ff | | Load 0x2,-0x1 0d08 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0d09 8047 | G | Call 0x0,0x47 0d0a 0092 1c94 | | Action Push_String_Extended,0x1c94 ; "Critical_Region_Count" 0d0c e5ff | | Load 0x2,-0x1 0d0d 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0d0e 82e4 | | Call 0x1,0xe4 0d0f 0092 1c95 | | Action Push_String_Extended,0x1c95 ; "Debugging_State" 0d11 e5ff | | Load 0x2,-0x1 0d12 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0d13 804c | L | Call 0x0,0x4c 0d14 0092 1c96 | | Action Push_String_Extended,0x1c96 ; "Associated_Heap" 0d16 e5ff | | Load 0x2,-0x1 0d17 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0d18 820e | | Call 0x1,0xe 0d19 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0d1b e5ff | | Load 0x2,-0x1 0d1c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0d1d 804b | K | Call 0x0,0x4b 0d1e 0092 1c97 | | Action Push_String_Extended,0x1c97 ; "In_Entry_Call" 0d20 e5ff | | Load 0x2,-0x1 0d21 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0d22 822d | - | Call 0x1,0x2d 0d23 0092 1c98 | | Action Push_String_Extended,0x1c98 ; "Mode" 0d25 e5ff | | Load 0x2,-0x1 0d26 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d27 822b | + | Call 0x1,0x2b 0d28 0092 1c99 | | Action Push_String_Extended,0x1c99 ; "Delay_Time" 0d2a 8064 | d | Call 0x0,0x64 0d2b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0d2c 0000 0000 | | .BLANK 0000[0x4] 0d30 ; -------------------------------------------------------------------------------------- 0d30 ; SUBPROGRAM 0d30 ; -------------------------------------------------------------------------------------- 0d30 0d3d | = | .CONST 0x0d3d ; Address of begin 0d31 0004 | | .CONST 0x0004 ; Address of exception handler 0d32 0004 | | .CONST 0x0004 ; Number of locals 0d33 INIT_0d30: 0d33 6080 |` | Indirect_Literal Discrete,0xdb4,{0x00000000, 0x00000400} 0d34 e058 | X | Load 0x0,0x58 0d35 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0d36 1c08 | | Execute_Immediate Run_Utility,0x8 0d37 00d8 | | Load_Top At_Offset_0 0d38 1c00 | | Execute_Immediate Run_Utility,0x0 0d39 029f 10c3 | | Declare_Subprogram INIT_10c0,For_Call 0d3b 029f 10d3 | | Declare_Subprogram INIT_10d0,For_Call 0d3d BODY_0d30: 0d3d e402 | | Load 0x2,0x2 0d3e 0092 1c9a | | Action Push_String_Extended,0x1c9a ; "(Current_Slice => " 0d40 e5ff | | Load 0x2,-0x1 0d41 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d42 8259 | Y | Call 0x1,0x59 0d43 01cc | | Execute Vector,Catenate 0d44 e058 | X | Load 0x0,0x58 0d45 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d46 00d1 | | Pop_Control Pop_Count_1 0d47 e5ff | | Load 0x2,-0x1 0d48 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0d49 0092 1c9b | | Action Push_String_Extended,0x1c9b ; "Caller_Is_Waiting" 0d4b 8404 | | Call 0x2,0x4 0d4c e5ff | | Load 0x2,-0x1 0d4d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0d4e 0092 1c9c | | Action Push_String_Extended,0x1c9c ; "Has_Been_Rousted" 0d50 8404 | | Call 0x2,0x4 0d51 e5ff | | Load 0x2,-0x1 0d52 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0d53 0092 1c9d | | Action Push_String_Extended,0x1c9d ; "Held_By_Scheduler" 0d55 8404 | | Call 0x2,0x4 0d56 e5ff | | Load 0x2,-0x1 0d57 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0d58 6806 |h | Jump_Zero 0xd5f 0d59 e5ff | | Load 0x2,-0x1 0d5a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0d5b 82eb | | Call 0x1,0xeb 0d5c 0092 1c9e | | Action Push_String_Extended,0x1c9e ; "Memory_Condition" 0d5e 8403 | | Call 0x2,0x3 0d5f e5ff | | Load 0x2,-0x1 0d60 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0d61 82ed | | Call 0x1,0xed 0d62 0092 1c9f | | Action Push_String_Extended,0x1c9f ; "Block_Condition" 0d64 8403 | | Call 0x2,0x3 0d65 e5ff | | Load 0x2,-0x1 0d66 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0d67 82ec | | Call 0x1,0xec 0d68 0092 1ca0 | | Action Push_String_Extended,0x1ca0 ; "Current_Mode" 0d6a 8403 | | Call 0x2,0x3 0d6b e5ff | | Load 0x2,-0x1 0d6c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0d6d 822a | * | Call 0x1,0x2a 0d6e 0092 1ca1 | | Action Push_String_Extended,0x1ca1 ; "Current_Priority" 0d70 8403 | | Call 0x2,0x3 0d71 e5ff | | Load 0x2,-0x1 0d72 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0d73 0092 1ca2 | | Action Push_String_Extended,0x1ca2 ; "Caller_Must_Wait" 0d75 8404 | | Call 0x2,0x4 0d76 e5ff | | Load 0x2,-0x1 0d77 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0d78 0092 1ca3 | | Action Push_String_Extended,0x1ca3 ; "Module_Is_Task" 0d7a 8404 | | Call 0x2,0x4 0d7b e5ff | | Load 0x2,-0x1 0d7c 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0d7d 0092 1ca4 | | Action Push_String_Extended,0x1ca4 ; "Module_Aborted" 0d7f 8404 | | Call 0x2,0x4 0d80 e5ff | | Load 0x2,-0x1 0d81 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0d82 0092 1ca5 | | Action Push_String_Extended,0x1ca5 ; "Breakpoint_On" 0d84 8404 | | Call 0x2,0x4 0d85 e5ff | | Load 0x2,-0x1 0d86 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0d87 0092 1ca6 | | Action Push_String_Extended,0x1ca6 ; "Intrainstruction" 0d89 8404 | | Call 0x2,0x4 0d8a e5ff | | Load 0x2,-0x1 0d8b 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 0d8c 8220 | | Call 0x1,0x20 0d8d 0092 1ca7 | | Action Push_String_Extended,0x1ca7 ; "Control_Tos" 0d8f 8403 | | Call 0x2,0x3 0d90 e5ff | | Load 0x2,-0x1 0d91 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0d92 820e | | Call 0x1,0xe 0d93 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0d95 8403 | | Call 0x2,0x3 0d96 e5ff | | Load 0x2,-0x1 0d97 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 0d98 8065 | e | Call 0x0,0x65 0d99 0092 1ca8 | | Action Push_String_Extended,0x1ca8 ; "Job_For_Charging" 0d9b 8403 | | Call 0x2,0x3 0d9c e5ff | | Load 0x2,-0x1 0d9d 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 0d9e 8219 | | Call 0x1,0x19 0d9f 0092 1ca9 | | Action Push_String_Extended,0x1ca9 ; "Program_Counter" 0da1 8403 | | Call 0x2,0x3 0da2 e5ff | | Load 0x2,-0x1 0da3 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 0da4 821b | | Call 0x1,0x1b 0da5 0092 1caa | | Action Push_String_Extended,0x1caa ; "Executing_Lex" 0da7 8403 | | Call 0x2,0x3 0da8 e402 | | Load 0x2,0x2 0da9 0092 1c60 | `| Action Push_String_Extended,0x1c60 ; ")" 0dab e058 | X | Load 0x0,0x58 0dac 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0dad 00d1 | | Pop_Control Pop_Count_1 0dae e402 | | Load 0x2,0x2 0daf e058 | X | Load 0x0,0x58 0db0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0db1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0db2 0000 0000 | | .XXX[0x2] 0db4 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 0db8 ; -------------------------------------------------------------------------------------- 0db8 ; SUBPROGRAM 0db8 ; -------------------------------------------------------------------------------------- 0db8 0dc5 | | .CONST 0x0dc5 ; Address of begin 0db9 0004 | | .CONST 0x0004 ; Address of exception handler 0dba 0004 | | .CONST 0x0004 ; Number of locals 0dbb INIT_0db8: 0dbb 4882 |H | Short_Literal 0x82 0dbc e058 | X | Load 0x0,0x58 0dbd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0dbe 1c08 | | Execute_Immediate Run_Utility,0x8 0dbf 00d8 | | Load_Top At_Offset_0 0dc0 1c00 | | Execute_Immediate Run_Utility,0x0 0dc1 029f 10e3 | | Declare_Subprogram INIT_10e0,For_Call 0dc3 029f 10f3 | | Declare_Subprogram INIT_10f0,For_Call 0dc5 BODY_0db8: 0dc5 e402 | | Load 0x2,0x2 0dc6 0092 1cab | | Action Push_String_Extended,0x1cab ; "(Queue_Successor => " 0dc8 e5ff | | Load 0x2,-0x1 0dc9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0dca 804c | L | Call 0x0,0x4c 0dcb 01cc | | Execute Vector,Catenate 0dcc e058 | X | Load 0x0,0x58 0dcd 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0dce 00d1 | | Pop_Control Pop_Count_1 0dcf e5ff | | Load 0x2,-0x1 0dd0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0dd1 0092 1cac | | Action Push_String_Extended,0x1cac ; "Has_Micro_Context" 0dd3 8404 | | Call 0x2,0x4 0dd4 e5ff | | Load 0x2,-0x1 0dd5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0dd6 8211 | | Call 0x1,0x11 0dd7 0092 1cad | | Action Push_String_Extended,0x1cad ; "Type_Tos" 0dd9 8403 | | Call 0x2,0x3 0dda e5ff | | Load 0x2,-0x1 0ddb 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0ddc 820e | | Call 0x1,0xe 0ddd 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0ddf 8403 | | Call 0x2,0x3 0de0 e5ff | | Load 0x2,-0x1 0de1 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0de2 8220 | | Call 0x1,0x20 0de3 0092 1cae | | Action Push_String_Extended,0x1cae ; "Current_Frame" 0de5 8403 | | Call 0x2,0x3 0de6 e5ff | | Load 0x2,-0x1 0de7 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0de8 8214 | | Call 0x1,0x14 0de9 0092 1caf | | Action Push_String_Extended,0x1caf ; "Data_Tos" 0deb 8403 | | Call 0x2,0x3 0dec e402 | | Load 0x2,0x2 0ded 0092 1c60 | `| Action Push_String_Extended,0x1c60 ; ")" 0def e058 | X | Load 0x0,0x58 0df0 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0df1 00d1 | | Pop_Control Pop_Count_1 0df2 e402 | | Load 0x2,0x2 0df3 e058 | X | Load 0x0,0x58 0df4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0df5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0df6 0000 0000 | | .XXX[0x2] 0df8 ; -------------------------------------------------------------------------------------- 0df8 ; SUBPROGRAM 0df8 ; -------------------------------------------------------------------------------------- 0df8 0dfb | | .CONST 0x0dfb ; Address of begin 0df9 0004 | | .CONST 0x0004 ; Address of exception handler 0dfa 0001 | | .CONST 0x0001 ; Number of locals 0dfb BODY_0df8: 0dfb INIT_0df8: 0dfb e5ff | | Load 0x2,-0x1 0dfc 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0dfd 8214 | | Call 0x1,0x14 0dfe 0092 1cb0 | | Action Push_String_Extended,0x1cb0 ; "Data_Extent" 0e00 e5ff | | Load 0x2,-0x1 0e01 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0e02 8212 | | Call 0x1,0x12 0e03 0092 1cb1 | | Action Push_String_Extended,0x1cb1 ; "Queue_Extent" 0e05 e5ff | | Load 0x2,-0x1 0e06 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0e07 822c | , | Call 0x1,0x2c 0e08 0092 1cb2 | | Action Push_String_Extended,0x1cb2 ; "Space_Mgr_Retries" 0e0a e5ff | | Load 0x2,-0x1 0e0b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0e0c 820e | | Call 0x1,0xe 0e0d 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0e0f e5ff | | Load 0x2,-0x1 0e10 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e11 8211 | | Call 0x1,0x11 0e12 0092 1cb3 | | Action Push_String_Extended,0x1cb3 ; "Type_Extent" 0e14 e5ff | | Load 0x2,-0x1 0e15 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e16 804c | L | Call 0x0,0x4c 0e17 0092 1cb4 | | Action Push_String_Extended,0x1cb4 ; "Breakpoint_Scope" 0e19 8059 | Y | Call 0x0,0x59 0e1a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e1b 0000 0000 | | .BLANK 0000[0x5] 0e20 ; -------------------------------------------------------------------------------------- 0e20 ; SUBPROGRAM 0e20 ; -------------------------------------------------------------------------------------- 0e20 0e25 | % | .CONST 0x0e25 ; Address of begin 0e21 0004 | | .CONST 0x0004 ; Address of exception handler 0e22 0002 | | .CONST 0x0002 ; Number of locals 0e23 INIT_0e20: 0e23 029f 1103 | | Declare_Subprogram INIT_1100,For_Call 0e25 BODY_0e20: 0e25 e5ff | | Load 0x2,-0x1 0e26 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e27 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0e28 e5ff | | Load 0x2,-0x1 0e29 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e2a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e2b 0092 1cb5 | | Action Push_String_Extended,0x1cb5 ; "value" 0e2d 82ea | | Call 0x1,0xea 0e2e e5ff | | Load 0x2,-0x1 0e2f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0e30 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0e31 e5ff | | Load 0x2,-0x1 0e32 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0e33 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e34 0092 1cb6 | | Action Push_String_Extended,0x1cb6 ; "; type" 0e36 82e9 | | Call 0x1,0xe9 0e37 01cc | | Execute Vector,Catenate 0e38 8402 | | Call 0x2,0x2 0e39 01cc | | Execute Vector,Catenate 0e3a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e3b 0000 0000 | | .BLANK 0000[0x5] 0e40 ; -------------------------------------------------------------------------------------- 0e40 ; SUBPROGRAM 0e40 ; -------------------------------------------------------------------------------------- 0e40 0e43 | C | .CONST 0x0e43 ; Address of begin 0e41 0004 | | .CONST 0x0004 ; Address of exception handler 0e42 0001 | | .CONST 0x0001 ; Number of locals 0e43 BODY_0e40: 0e43 INIT_0e40: 0e43 e5ff | | Load 0x2,-0x1 0e44 e5fe | | Load 0x2,-0x2 0e45 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e46 804c | L | Call 0x0,0x4c 0e47 01cc | | Execute Vector,Catenate 0e48 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 0e4a 01cc | | Execute Vector,Catenate 0e4b e5fe | | Load 0x2,-0x2 0e4c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e4d 8220 | | Call 0x1,0x20 0e4e 01cc | | Execute Vector,Catenate 0e4f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0e50 ; -------------------------------------------------------------------------------------- 0e50 ; SUBPROGRAM 0e50 ; -------------------------------------------------------------------------------------- 0e50 0e53 | S | .CONST 0x0e53 ; Address of begin 0e51 0004 | | .CONST 0x0004 ; Address of exception handler 0e52 0001 | | .CONST 0x0001 ; Number of locals 0e53 BODY_0e50: 0e53 INIT_0e50: 0e53 e5ff | | Load 0x2,-0x1 0e54 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0e55 82ed | | Call 0x1,0xed 0e56 0092 1c29 | )| Action Push_String_Extended,0x1c29 ; "; " 0e58 01cc | | Execute Vector,Catenate 0e59 e5ff | | Load 0x2,-0x1 0e5a 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 0e5b 0092 1c28 | (| Action Push_String_Extended,0x1c28 ; "pc = " 0e5d 8224 | $ | Call 0x1,0x24 0e5e 01cc | | Execute Vector,Catenate 0e5f 0092 1cb7 | | Action Push_String_Extended,0x1cb7 ; "; ctos = " 0e61 01cc | | Execute Vector,Catenate 0e62 e5ff | | Load 0x2,-0x1 0e63 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 0e64 8220 | | Call 0x1,0x20 0e65 01cc | | Execute Vector,Catenate 0e66 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e67 0000 | | .XXX[0x1] 0e68 ; -------------------------------------------------------------------------------------- 0e68 ; SUBPROGRAM 0e68 ; -------------------------------------------------------------------------------------- 0e68 0e6b | k | .CONST 0x0e6b ; Address of begin 0e69 0004 | | .CONST 0x0004 ; Address of exception handler 0e6a 0001 | | .CONST 0x0001 ; Number of locals 0e6b BODY_0e68: 0e6b INIT_0e68: 0e6b 0092 1cb8 | | Action Push_String_Extended,0x1cb8 ; "type tos = " 0e6d e5ff | | Load 0x2,-0x1 0e6e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0e6f 8211 | | Call 0x1,0x11 0e70 01cc | | Execute Vector,Catenate 0e71 0092 1cb9 | | Action Push_String_Extended,0x1cb9 ; "; data tos = " 0e73 01cc | | Execute Vector,Catenate 0e74 e5ff | | Load 0x2,-0x1 0e75 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0e76 8214 | | Call 0x1,0x14 0e77 01cc | | Execute Vector,Catenate 0e78 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e79 0000 0000 | | .BLANK 0000[0x7] 0e80 ; -------------------------------------------------------------------------------------- 0e80 ; SUBPROGRAM 0e80 ; -------------------------------------------------------------------------------------- 0e80 0e83 | | .CONST 0x0e83 ; Address of begin 0e81 0004 | | .CONST 0x0004 ; Address of exception handler 0e82 0001 | | .CONST 0x0001 ; Number of locals 0e83 BODY_0e80: 0e83 INIT_0e80: 0e83 0092 1cba | | Action Push_String_Extended,0x1cba ; "type extent = " 0e85 e5ff | | Load 0x2,-0x1 0e86 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0e87 8211 | | Call 0x1,0x11 0e88 01cc | | Execute Vector,Catenate 0e89 0092 1cbb | | Action Push_String_Extended,0x1cbb ; "; queue extent = " 0e8b 01cc | | Execute Vector,Catenate 0e8c e5ff | | Load 0x2,-0x1 0e8d 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0e8e 8212 | | Call 0x1,0x12 0e8f 01cc | | Execute Vector,Catenate 0e90 0092 1cbc | | Action Push_String_Extended,0x1cbc ; "; data extent = " 0e92 01cc | | Execute Vector,Catenate 0e93 e5ff | | Load 0x2,-0x1 0e94 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0e95 8214 | | Call 0x1,0x14 0e96 01cc | | Execute Vector,Catenate 0e97 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e98 ; -------------------------------------------------------------------------------------- 0e98 ; SUBPROGRAM 0e98 ; -------------------------------------------------------------------------------------- 0e98 0e9b | | .CONST 0x0e9b ; Address of begin 0e99 0004 | | .CONST 0x0004 ; Address of exception handler 0e9a 0001 | | .CONST 0x0001 ; Number of locals 0e9b BODY_0e98: 0e9b INIT_0e98: 0e9b e5ff | | Load 0x2,-0x1 0e9c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0e9d 0092 1cbd | | Action Push_String_Extended,0x1cbd ; "subr @ " 0e9f 82f3 | | Call 0x1,0xf3 0ea0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ea1 0000 0000 | | .BLANK 0000[0x7] 0ea8 ; -------------------------------------------------------------------------------------- 0ea8 ; SUBPROGRAM 0ea8 ; -------------------------------------------------------------------------------------- 0ea8 0eab | | .CONST 0x0eab ; Address of begin 0ea9 0004 | | .CONST 0x0004 ; Address of exception handler 0eaa 0001 | | .CONST 0x0001 ; Number of locals 0eab BODY_0ea8: 0eab INIT_0ea8: 0eab e5ff | | Load 0x2,-0x1 0eac 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0ead 8215 | | Call 0x1,0x15 0eae 0092 1cbe | | Action Push_String_Extended,0x1cbe ; "Ref_Item" 0eb0 e5ff | | Load 0x2,-0x1 0eb1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0eb2 820e | | Call 0x1,0xe 0eb3 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Of_Kind" 0eb5 e5ff | | Load 0x2,-0x1 0eb6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0eb7 8216 | | Call 0x1,0x16 0eb8 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Typ_Part" 0eba 8052 | R | Call 0x0,0x52 0ebb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ebc 0000 0000 | | .BLANK 0000[0x4] 0ec0 ; -------------------------------------------------------------------------------------- 0ec0 ; SUBPROGRAM 0ec0 ; -------------------------------------------------------------------------------------- 0ec0 0f0b | | .CONST 0x0f0b ; Address of begin 0ec1 0004 | | .CONST 0x0004 ; Address of exception handler 0ec2 0021 | ! | .CONST 0x0021 ; Number of locals 0ec3 INIT_0ec0: 0ec3 029f 1113 | | Declare_Subprogram INIT_1110,For_Call 0ec5 e5ff | | Load 0x2,-0x1 0ec6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0ec7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ec8 0007 | | Action Break_Optional 0ec9 00d8 | | Load_Top At_Offset_0 0eca e046 | F | Load 0x0,0x46 0ecb 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0ecc 011c | | Execute Any,Convert_Unchecked 0ecd 1c01 | | Execute_Immediate Run_Utility,0x1 0ece 0092 1cbf | | Action Push_String_Extended,0x1cbf ; ": " 0ed0 01cc | | Execute Vector,Catenate 0ed1 029f 1183 | | Declare_Subprogram INIT_1180,For_Call 0ed3 029f 11a3 | | Declare_Subprogram INIT_11a0,For_Call 0ed5 029f 11bb | | Declare_Subprogram INIT_11b8,For_Call 0ed7 029f 11d3 | | Declare_Subprogram INIT_11d0,For_Call 0ed9 029f 11eb | | Declare_Subprogram INIT_11e8,For_Call 0edb 029f 1203 | | Declare_Subprogram INIT_1200,For_Call 0edd 029f 1223 | #| Declare_Subprogram INIT_1220,For_Call 0edf 029f 123b | ;| Declare_Subprogram INIT_1238,For_Call 0ee1 029f 1253 | S| Declare_Subprogram INIT_1250,For_Call 0ee3 029f 126b | k| Declare_Subprogram INIT_1268,For_Call 0ee5 029f 1283 | | Declare_Subprogram INIT_1280,For_Call 0ee7 029f 129b | | Declare_Subprogram INIT_1298,For_Call 0ee9 029f 12b3 | | Declare_Subprogram INIT_12b0,For_Call 0eeb 029f 12cb | | Declare_Subprogram INIT_12c8,For_Call 0eed 029f 12eb | | Declare_Subprogram INIT_12e8,For_Call 0eef 029f 130b | | Declare_Subprogram INIT_1308,For_Call 0ef1 029f 1323 | #| Declare_Subprogram INIT_1320,For_Call 0ef3 029f 133b | ;| Declare_Subprogram INIT_1338,For_Call 0ef5 029f 1353 | S| Declare_Subprogram INIT_1350,For_Call 0ef7 029f 136b | k| Declare_Subprogram INIT_1368,For_Call 0ef9 029f 1383 | | Declare_Subprogram INIT_1380,For_Call 0efb 029f 139b | | Declare_Subprogram INIT_1398,For_Call 0efd 029f 13b3 | | Declare_Subprogram INIT_13b0,For_Call 0eff 029f 13cb | | Declare_Subprogram INIT_13c8,For_Call 0f01 029f 13e3 | | Declare_Subprogram INIT_13e0,For_Call 0f03 029f 13fb | | Declare_Subprogram INIT_13f8,For_Call 0f05 029f 1413 | | Declare_Subprogram INIT_1410,For_Call 0f07 029f 142b | +| Declare_Subprogram INIT_1428,For_Call 0f09 029f 1463 | c| Declare_Subprogram INIT_1460,For_Call 0f0b BODY_0ec0: 0f0b e403 | | Load 0x2,0x3 0f0c 467f |F | Jump_Case 0x80 0f0d 7881 |x | Jump 0xf8f ; case 0x0 0f0e 7884 |x | Jump 0xf93 ; case 0x1 0f0f 7885 |x | Jump 0xf95 ; case 0x2 0f10 78e9 |x | Jump 0xffa ; case 0x3 0f11 787f |x | Jump 0xf91 ; case 0x4 0f12 7884 |x | Jump 0xf97 ; case 0x5 0f13 7885 |x | Jump 0xf99 ; case 0x6 0f14 78e5 |x | Jump 0xffa ; case 0x7 0f15 7885 |x | Jump 0xf9b ; case 0x8 0f16 78e3 |x | Jump 0xffa ; case 0x9 0f17 7885 |x | Jump 0xf9d ; case 0xa 0f18 78e1 |x | Jump 0xffa ; case 0xb 0f19 7877 |xw | Jump 0xf91 ; case 0xc 0f1a 78df |x | Jump 0xffa ; case 0xd 0f1b 7883 |x | Jump 0xf9f ; case 0xe 0f1c 78dd |x | Jump 0xffa ; case 0xf 0f1d 7883 |x | Jump 0xfa1 ; case 0x10 0f1e 7884 |x | Jump 0xfa3 ; case 0x11 0f1f 7875 |xu | Jump 0xf95 ; case 0x12 0f20 78d9 |x | Jump 0xffa ; case 0x13 0f21 786f |xo | Jump 0xf91 ; case 0x14 0f22 7882 |x | Jump 0xfa5 ; case 0x15 0f23 7875 |xu | Jump 0xf99 ; case 0x16 0f24 78d5 |x | Jump 0xffa ; case 0x17 0f25 7881 |x | Jump 0xfa7 ; case 0x18 0f26 7882 |x | Jump 0xfa9 ; case 0x19 0f27 78d2 |x | Jump 0xffa ; case 0x1a 0f28 78d1 |x | Jump 0xffa ; case 0x1b 0f29 7867 |xg | Jump 0xf91 ; case 0x1c 0f2a 78cf |x | Jump 0xffa ; case 0x1d 0f2b 787f |x | Jump 0xfab ; case 0x1e 0f2c 7889 |x | Jump 0xfb6 ; case 0x1f 0f2d 78cc |x | Jump 0xffa ; case 0x20 0f2e 7889 |x | Jump 0xfb8 ; case 0x21 0f2f 7865 |xe | Jump 0xf95 ; case 0x22 0f30 78c9 |x | Jump 0xffa ; case 0x23 0f31 785f |x_ | Jump 0xf91 ; case 0x24 0f32 78c7 |x | Jump 0xffa ; case 0x25 0f33 7865 |xe | Jump 0xf99 ; case 0x26 0f34 78c5 |x | Jump 0xffa ; case 0x27 0f35 78c4 |x | Jump 0xffa ; case 0x28 0f36 7881 |x | Jump 0xfb8 ; case 0x29 0f37 78c2 |x | Jump 0xffa ; case 0x2a 0f38 78c1 |x | Jump 0xffa ; case 0x2b 0f39 7857 |xW | Jump 0xf91 ; case 0x2c 0f3a 78bf |x | Jump 0xffa ; case 0x2d 0f3b 7887 |x | Jump 0xfc3 ; case 0x2e 0f3c 78bd |x | Jump 0xffa ; case 0x2f 0f3d 78bc |x | Jump 0xffa ; case 0x30 0f3e 78bb |x | Jump 0xffa ; case 0x31 0f3f 7855 |xU | Jump 0xf95 ; case 0x32 0f40 78b9 |x | Jump 0xffa ; case 0x33 0f41 78b8 |x | Jump 0xffa ; case 0x34 0f42 78b7 |x | Jump 0xffa ; case 0x35 0f43 7855 |xU | Jump 0xf99 ; case 0x36 0f44 78b5 |x | Jump 0xffa ; case 0x37 0f45 787f |x | Jump 0xfc5 ; case 0x38 0f46 78b3 |x | Jump 0xffa ; case 0x39 0f47 78b2 |x | Jump 0xffa ; case 0x3a 0f48 78b1 |x | Jump 0xffa ; case 0x3b 0f49 7847 |xG | Jump 0xf91 ; case 0x3c 0f4a 78af |x | Jump 0xffa ; case 0x3d 0f4b 787b |x{ | Jump 0xfc7 ; case 0x3e 0f4c 7885 |x | Jump 0xfd2 ; case 0x3f 0f4d 78ac |x | Jump 0xffa ; case 0x40 0f4e 7885 |x | Jump 0xfd4 ; case 0x41 0f4f 7849 |xI | Jump 0xf99 ; case 0x42 0f50 78a9 |x | Jump 0xffa ; case 0x43 0f51 783f |x? | Jump 0xf91 ; case 0x44 0f52 78a7 |x | Jump 0xffa ; case 0x45 0f53 7882 |x | Jump 0xfd6 ; case 0x46 0f54 78a5 |x | Jump 0xffa ; case 0x47 0f55 78a4 |x | Jump 0xffa ; case 0x48 0f56 7881 |x | Jump 0xfd8 ; case 0x49 0f57 78a2 |x | Jump 0xffa ; case 0x4a 0f58 78a1 |x | Jump 0xffa ; case 0x4b 0f59 7837 |x7 | Jump 0xf91 ; case 0x4c 0f5a 789f |x | Jump 0xffa ; case 0x4d 0f5b 787e |x~ | Jump 0xfda ; case 0x4e 0f5c 789d |x | Jump 0xffa ; case 0x4f 0f5d 789c |x | Jump 0xffa ; case 0x50 0f5e 789b |x | Jump 0xffa ; case 0x51 0f5f 7885 |x | Jump 0xfe5 ; case 0x52 0f60 7899 |x | Jump 0xffa ; case 0x53 0f61 7898 |x | Jump 0xffa ; case 0x54 0f62 7897 |x | Jump 0xffa ; case 0x55 0f63 7883 |x | Jump 0xfe7 ; case 0x56 0f64 7895 |x | Jump 0xffa ; case 0x57 0f65 7883 |x | Jump 0xfe9 ; case 0x58 0f66 7893 |x | Jump 0xffa ; case 0x59 0f67 7892 |x | Jump 0xffa ; case 0x5a 0f68 7891 |x | Jump 0xffa ; case 0x5b 0f69 7890 |x | Jump 0xffa ; case 0x5c 0f6a 788f |x | Jump 0xffa ; case 0x5d 0f6b 788e |x | Jump 0xffa ; case 0x5e 0f6c 787e |x~ | Jump 0xfeb ; case 0x5f 0f6d 788c |x | Jump 0xffa ; case 0x60 0f6e 788b |x | Jump 0xffa ; case 0x61 0f6f 788a |x | Jump 0xffa ; case 0x62 0f70 7889 |x | Jump 0xffa ; case 0x63 0f71 7888 |x | Jump 0xffa ; case 0x64 0f72 7887 |x | Jump 0xffa ; case 0x65 0f73 7886 |x | Jump 0xffa ; case 0x66 0f74 7885 |x | Jump 0xffa ; case 0x67 0f75 7884 |x | Jump 0xffa ; case 0x68 0f76 7883 |x | Jump 0xffa ; case 0x69 0f77 7882 |x | Jump 0xffa ; case 0x6a 0f78 7881 |x | Jump 0xffa ; case 0x6b 0f79 7817 |x | Jump 0xf91 ; case 0x6c 0f7a 787f |x | Jump 0xffa ; case 0x6d 0f7b 7871 |xq | Jump 0xfed ; case 0x6e 0f7c 787d |x} | Jump 0xffa ; case 0x6f 0f7d 787c |x| | Jump 0xffa ; case 0x70 0f7e 787b |x{ | Jump 0xffa ; case 0x71 0f7f 787a |xz | Jump 0xffa ; case 0x72 0f80 7879 |xy | Jump 0xffa ; case 0x73 0f81 780f |x | Jump 0xf91 ; case 0x74 0f82 7877 |xw | Jump 0xffa ; case 0x75 0f83 7815 |x | Jump 0xf99 ; case 0x76 0f84 7875 |xu | Jump 0xffa ; case 0x77 0f85 7874 |xt | Jump 0xffa ; case 0x78 0f86 7873 |xs | Jump 0xffa ; case 0x79 0f87 7872 |xr | Jump 0xffa ; case 0x7a 0f88 7871 |xq | Jump 0xffa ; case 0x7b 0f89 7807 |x | Jump 0xf91 ; case 0x7c 0f8a 786f |xo | Jump 0xffa ; case 0x7d 0f8b 786c |xl | Jump 0xff8 ; case 0x7e 0f8c 7800 |x | Jump 0xf8d ; case 0x7f 0f8d 8420 | | Call 0x2,0x20 0f8e 786c |xl | Jump 0xffb 0f8f 8405 | | Call 0x2,0x5 0f90 786a |xj | Jump 0xffb 0f91 8406 | | Call 0x2,0x6 0f92 7868 |xh | Jump 0xffb 0f93 8407 | | Call 0x2,0x7 0f94 7866 |xf | Jump 0xffb 0f95 8408 | | Call 0x2,0x8 0f96 7864 |xd | Jump 0xffb 0f97 8409 | | Call 0x2,0x9 0f98 7862 |xb | Jump 0xffb 0f99 840a | | Call 0x2,0xa 0f9a 7860 |x` | Jump 0xffb 0f9b 840b | | Call 0x2,0xb 0f9c 785e |x^ | Jump 0xffb 0f9d 840c | | Call 0x2,0xc 0f9e 785c |x\ | Jump 0xffb 0f9f 840d | | Call 0x2,0xd 0fa0 785a |xZ | Jump 0xffb 0fa1 840e | | Call 0x2,0xe 0fa2 7858 |xX | Jump 0xffb 0fa3 840f | | Call 0x2,0xf 0fa4 7856 |xV | Jump 0xffb 0fa5 8410 | | Call 0x2,0x10 0fa6 7854 |xT | Jump 0xffb 0fa7 8411 | | Call 0x2,0x11 0fa8 7852 |xR | Jump 0xffb 0fa9 8412 | | Call 0x2,0x12 0faa 7850 |xP | Jump 0xffb 0fab e5fe | | Load 0x2,-0x2 0fac 6807 |h | Jump_Zero 0xfb4 0fad e5ff | | Load 0x2,-0x1 0fae e29e | | Load 0x1,0x9e 0faf e29f | | Load 0x1,0x9f 0fb0 1da0 | | Execute_Immediate Reference_Lex_1,0xa0 0fb1 8001 | | Call 0x0,0x1 0fb2 8250 | P | Call 0x1,0x50 0fb3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fb4 e404 | | Load 0x2,0x4 0fb5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fb6 8413 | | Call 0x2,0x13 0fb7 7843 |xC | Jump 0xffb 0fb8 e5fe | | Load 0x2,-0x2 0fb9 6807 |h | Jump_Zero 0xfc1 0fba e5ff | | Load 0x2,-0x1 0fbb e2a6 | | Load 0x1,0xa6 0fbc e2a7 | | Load 0x1,0xa7 0fbd 1da8 | | Execute_Immediate Reference_Lex_1,0xa8 0fbe 8001 | | Call 0x0,0x1 0fbf 8254 | T | Call 0x1,0x54 0fc0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fc1 8414 | | Call 0x2,0x14 0fc2 7838 |x8 | Jump 0xffb 0fc3 8415 | | Call 0x2,0x15 0fc4 7836 |x6 | Jump 0xffb 0fc5 8416 | | Call 0x2,0x16 0fc6 7834 |x4 | Jump 0xffb 0fc7 e5fe | | Load 0x2,-0x2 0fc8 6807 |h | Jump_Zero 0xfd0 0fc9 e5ff | | Load 0x2,-0x1 0fca e2b2 | | Load 0x1,0xb2 0fcb e2b3 | | Load 0x1,0xb3 0fcc 1db4 | | Execute_Immediate Reference_Lex_1,0xb4 0fcd 8001 | | Call 0x0,0x1 0fce 8251 | Q | Call 0x1,0x51 0fcf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fd0 e404 | | Load 0x2,0x4 0fd1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fd2 8417 | | Call 0x2,0x17 0fd3 7827 |x' | Jump 0xffb 0fd4 8418 | | Call 0x2,0x18 0fd5 7825 |x% | Jump 0xffb 0fd6 8419 | | Call 0x2,0x19 0fd7 7823 |x# | Jump 0xffb 0fd8 841a | | Call 0x2,0x1a 0fd9 7821 |x! | Jump 0xffb 0fda e5fe | | Load 0x2,-0x2 0fdb 6807 |h | Jump_Zero 0xfe3 0fdc e5ff | | Load 0x2,-0x1 0fdd e2c6 | | Load 0x1,0xc6 0fde e2c7 | | Load 0x1,0xc7 0fdf 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8 0fe0 8001 | | Call 0x0,0x1 0fe1 8230 | 0 | Call 0x1,0x30 0fe2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fe3 e404 | | Load 0x2,0x4 0fe4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fe5 841b | | Call 0x2,0x1b 0fe6 7814 |x | Jump 0xffb 0fe7 841c | | Call 0x2,0x1c 0fe8 7812 |x | Jump 0xffb 0fe9 841d | | Call 0x2,0x1d 0fea 7810 |x | Jump 0xffb 0feb 841e | | Call 0x2,0x1e 0fec 780e |x | Jump 0xffb 0fed e5fe | | Load 0x2,-0x2 0fee 6807 |h | Jump_Zero 0xff6 0fef e5ff | | Load 0x2,-0x1 0ff0 e2ce | | Load 0x1,0xce 0ff1 e2cf | | Load 0x1,0xcf 0ff2 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0 0ff3 8001 | | Call 0x0,0x1 0ff4 8235 | 5 | Call 0x1,0x35 0ff5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ff6 e404 | | Load 0x2,0x4 0ff7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ff8 841f | | Call 0x2,0x1f 0ff9 7801 |x | Jump 0xffb 0ffa 8421 | ! | Call 0x2,0x21 0ffb 0831 | 1 | Execute_Immediate Raise,0x31 0ffc 0000 0000 | | .BLANK 0000[0x4] 1000 ; -------------------------------------------------------------------------------------- 1000 ; SUBPROGRAM 1000 ; -------------------------------------------------------------------------------------- 1000 100a | | .CONST 0x100a ; Address of begin 1001 0004 | | .CONST 0x0004 ; Address of exception handler 1002 0003 | | .CONST 0x0003 ; Number of locals 1003 INIT_1000: 1003 e5ff | | Load 0x2,-0x1 1004 e272 | r | Load 0x1,0x72 1005 e273 | s | Load 0x1,0x73 1006 1d74 | t | Execute_Immediate Reference_Lex_1,0x74 1007 8001 | | Call 0x0,0x1 1008 0092 1cc0 | | Action Push_String_Extended,0x1cc0 ; "AUXILIARY_STATE: " 100a BODY_1000: 100a e5fe | | Load 0x2,-0x2 100b 6803 |h | Jump_Zero 0x100f 100c e402 | | Load 0x2,0x2 100d 82f0 | | Call 0x1,0xf0 100e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 100f 00d8 | | Load_Top At_Offset_0 1010 e402 | | Load 0x2,0x2 1011 82f5 | | Call 0x1,0xf5 1012 01cc | | Execute Vector,Catenate 1013 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1014 0000 0000 | | .BLANK 0000[0x4] 1018 ; -------------------------------------------------------------------------------------- 1018 ; SUBPROGRAM 1018 ; -------------------------------------------------------------------------------------- 1018 1022 | " | .CONST 0x1022 ; Address of begin 1019 0004 | | .CONST 0x0004 ; Address of exception handler 101a 0003 | | .CONST 0x0003 ; Number of locals 101b INIT_1018: 101b e5ff | | Load 0x2,-0x1 101c e276 | v | Load 0x1,0x76 101d e277 | w | Load 0x1,0x77 101e 1d78 | x | Execute_Immediate Reference_Lex_1,0x78 101f 8001 | | Call 0x0,0x1 1020 0092 1cc1 | | Action Push_String_Extended,0x1cc1 ; "AUXILIARY_ALLOCATION: " 1022 BODY_1018: 1022 e5fe | | Load 0x2,-0x2 1023 6803 |h | Jump_Zero 0x1027 1024 e402 | | Load 0x2,0x2 1025 82f1 | | Call 0x1,0xf1 1026 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1027 00d8 | | Load_Top At_Offset_0 1028 e402 | | Load 0x2,0x2 1029 82f6 | | Call 0x1,0xf6 102a 01cc | | Execute Vector,Catenate 102b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 102c 0000 0000 | | .BLANK 0000[0x4] 1030 ; -------------------------------------------------------------------------------------- 1030 ; SUBPROGRAM 1030 ; -------------------------------------------------------------------------------------- 1030 1033 | 3 | .CONST 0x1033 ; Address of begin 1031 0004 | | .CONST 0x0004 ; Address of exception handler 1032 0001 | | .CONST 0x0001 ; Number of locals 1033 BODY_1030: 1033 INIT_1030: 1033 e7ff | | Load 0x3,-0x1 1034 0f00 | | Execute_Immediate Equal,0x0 1035 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1036 0000 0000 | | .XXX[0x2] 1038 ; -------------------------------------------------------------------------------------- 1038 ; SUBPROGRAM 1038 ; -------------------------------------------------------------------------------------- 1038 103b | ; | .CONST 0x103b ; Address of begin 1039 0004 | | .CONST 0x0004 ; Address of exception handler 103a 0001 | | .CONST 0x0001 ; Number of locals 103b BODY_1038: 103b INIT_1038: 103b 4607 |F | Jump_Case 0x8 103c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 103d 7807 |x | Jump 0x1045 ; case 0x1 103e 780a |x | Jump 0x1049 ; case 0x2 103f 780e |x | Jump 0x104e ; case 0x3 1040 7811 |x | Jump 0x1052 ; case 0x4 1041 7812 |x | Jump 0x1054 ; case 0x5 1042 7813 |x | Jump 0x1056 ; case 0x6 1043 7817 |x | Jump 0x105b ; case 0x7 1044 4302 |C | .XXX[0x1] 1045 00da | | Load_Top At_Offset_2 1046 0091 1bf0 | | Action Push_String_Extended_Indexed,0x1bf0 ; "NO_BREAKPOINT" 1048 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1049 00db | | Load_Top At_Offset_3 104a 00db | | Load_Top At_Offset_3 104b 00e0 | | Load_Encached Standard_Cache 104c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 104d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 104e 00da | | Load_Top At_Offset_2 104f 00e0 | | Load_Encached Standard_Cache 1050 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1051 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1052 00db | | Load_Top At_Offset_3 1053 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1054 00db | | Load_Top At_Offset_3 1055 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1056 e046 | F | Load 0x0,0x46 1057 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 1058 00dc | | Load_Top At_Offset_4 1059 0267 | g | Execute Discrete,Predecessor 105a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 105b e046 | F | Load 0x0,0x46 105c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 105d 00dc | | Load_Top At_Offset_4 105e 0268 | h | Execute Discrete,Successor 105f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1060 ; -------------------------------------------------------------------------------------- 1060 ; SUBPROGRAM 1060 ; -------------------------------------------------------------------------------------- 1060 1063 | c | .CONST 0x1063 ; Address of begin 1061 0004 | | .CONST 0x0004 ; Address of exception handler 1062 0001 | | .CONST 0x0001 ; Number of locals 1063 BODY_1060: 1063 INIT_1060: 1063 e7fd | | Load 0x3,-0x3 1064 6806 |h | Jump_Zero 0x106b 1065 e402 | | Load 0x2,0x2 1066 0092 1c29 | )| Action Push_String_Extended,0x1c29 ; "; " 1068 e058 | X | Load 0x0,0x58 1069 1818 | | Execute Package,Field_Execute,Field_Number 0x18 106a 00d1 | | Pop_Control Pop_Count_1 106b e402 | | Load 0x2,0x2 106c e7ff | | Load 0x3,-0x1 106d 0092 1cc2 | | Action Push_String_Extended,0x1cc2 ; " = " 106f 01cc | | Execute Vector,Catenate 1070 e7fe | | Load 0x3,-0x2 1071 01cc | | Execute Vector,Catenate 1072 e058 | X | Load 0x0,0x58 1073 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1074 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1075 0000 0000 | | .XXX[0x3] 1077 0000 | | 1078 ; -------------------------------------------------------------------------------------- 1078 ; SUBPROGRAM 1078 ; -------------------------------------------------------------------------------------- 1078 107b | { | .CONST 0x107b ; Address of begin 1079 0004 | | .CONST 0x0004 ; Address of exception handler 107a 0001 | | .CONST 0x0001 ; Number of locals 107b BODY_1078: 107b INIT_1078: 107b e7ff | | Load 0x3,-0x1 107c 0f01 | | Execute_Immediate Equal,0x1 107d 6808 |h | Jump_Zero 0x1086 107e e402 | | Load 0x2,0x2 107f 0092 1c29 | )| Action Push_String_Extended,0x1c29 ; "; " 1081 e7fe | | Load 0x3,-0x2 1082 01cc | | Execute Vector,Catenate 1083 e058 | X | Load 0x0,0x58 1084 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1085 00d1 | | Pop_Control Pop_Count_1 1086 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1087 0000 | | .XXX[0x1] 1088 ; -------------------------------------------------------------------------------------- 1088 ; SUBPROGRAM 1088 ; -------------------------------------------------------------------------------------- 1088 108b | | .CONST 0x108b ; Address of begin 1089 0004 | | .CONST 0x0004 ; Address of exception handler 108a 0001 | | .CONST 0x0001 ; Number of locals 108b BODY_1088: 108b INIT_1088: 108b e7ff | | Load 0x3,-0x1 108c 0f01 | | Execute_Immediate Equal,0x1 108d 6805 |h | Jump_Zero 0x1093 108e e402 | | Load 0x2,0x2 108f e7fe | | Load 0x3,-0x2 1090 e058 | X | Load 0x0,0x58 1091 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1092 00d1 | | Pop_Control Pop_Count_1 1093 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1094 0000 0000 | | .BLANK 0000[0x4] 1098 ; -------------------------------------------------------------------------------------- 1098 ; SUBPROGRAM 1098 ; -------------------------------------------------------------------------------------- 1098 109b | | .CONST 0x109b ; Address of begin 1099 0004 | | .CONST 0x0004 ; Address of exception handler 109a 0001 | | .CONST 0x0001 ; Number of locals 109b BODY_1098: 109b INIT_1098: 109b e7ff | | Load 0x3,-0x1 109c 0f01 | | Execute_Immediate Equal,0x1 109d 6804 |h | Jump_Zero 0x10a2 109e 4820 |H | Short_Literal 0x20 109f e7fe | | Load 0x3,-0x2 10a0 01ca | | Execute Vector,Prepend 10a1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10a2 00ea | | Load_Encached Null_String_Cache 10a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10a4 0000 0000 | | .BLANK 0000[0x4] 10a8 ; -------------------------------------------------------------------------------------- 10a8 ; SUBPROGRAM 10a8 ; -------------------------------------------------------------------------------------- 10a8 10ab | | .CONST 0x10ab ; Address of begin 10a9 0004 | | .CONST 0x0004 ; Address of exception handler 10aa 0001 | | .CONST 0x0001 ; Number of locals 10ab BODY_10a8: 10ab INIT_10a8: 10ab e403 | | Load 0x2,0x3 10ac e7ff | | Load 0x3,-0x1 10ad e058 | X | Load 0x0,0x58 10ae 1818 | | Execute Package,Field_Execute,Field_Number 0x18 10af 4502 |E | Exit_Suprogram New_Top_Offset 0x2 10b0 ; -------------------------------------------------------------------------------------- 10b0 ; SUBPROGRAM 10b0 ; -------------------------------------------------------------------------------------- 10b0 10b3 | | .CONST 0x10b3 ; Address of begin 10b1 0004 | | .CONST 0x0004 ; Address of exception handler 10b2 0001 | | .CONST 0x0001 ; Number of locals 10b3 BODY_10b0: 10b3 INIT_10b0: 10b3 e7ff | | Load 0x3,-0x1 10b4 0f01 | | Execute_Immediate Equal,0x1 10b5 6805 |h | Jump_Zero 0x10bb 10b6 e402 | | Load 0x2,0x2 10b7 e7fe | | Load 0x3,-0x2 10b8 e058 | X | Load 0x0,0x58 10b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 10ba 00d1 | | Pop_Control Pop_Count_1 10bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10bc 0000 0000 | | .BLANK 0000[0x4] 10c0 ; -------------------------------------------------------------------------------------- 10c0 ; SUBPROGRAM 10c0 ; -------------------------------------------------------------------------------------- 10c0 10c3 | | .CONST 0x10c3 ; Address of begin 10c1 0004 | | .CONST 0x0004 ; Address of exception handler 10c2 0001 | | .CONST 0x0001 ; Number of locals 10c3 BODY_10c0: 10c3 INIT_10c0: 10c3 e402 | | Load 0x2,0x2 10c4 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 10c6 e7ff | | Load 0x3,-0x1 10c7 01cc | | Execute Vector,Catenate 10c8 0092 1cc3 | | Action Push_String_Extended,0x1cc3 ; " => " 10ca 01cc | | Execute Vector,Catenate 10cb e7fe | | Load 0x3,-0x2 10cc 01cc | | Execute Vector,Catenate 10cd e058 | X | Load 0x0,0x58 10ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18 10cf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10d0 ; -------------------------------------------------------------------------------------- 10d0 ; SUBPROGRAM 10d0 ; -------------------------------------------------------------------------------------- 10d0 10d3 | | .CONST 0x10d3 ; Address of begin 10d1 0004 | | .CONST 0x0004 ; Address of exception handler 10d2 0001 | | .CONST 0x0001 ; Number of locals 10d3 BODY_10d0: 10d3 INIT_10d0: 10d3 e7fe | | Load 0x3,-0x2 10d4 0f01 | | Execute_Immediate Equal,0x1 10d5 6804 |h | Jump_Zero 0x10da 10d6 e7fe | | Load 0x3,-0x2 10d7 804b | K | Call 0x0,0x4b 10d8 e7ff | | Load 0x3,-0x1 10d9 8403 | | Call 0x2,0x3 10da 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10db 0000 0000 | | .BLANK 0000[0x5] 10e0 ; -------------------------------------------------------------------------------------- 10e0 ; SUBPROGRAM 10e0 ; -------------------------------------------------------------------------------------- 10e0 10e3 | | .CONST 0x10e3 ; Address of begin 10e1 0004 | | .CONST 0x0004 ; Address of exception handler 10e2 0001 | | .CONST 0x0001 ; Number of locals 10e3 BODY_10e0: 10e3 INIT_10e0: 10e3 e402 | | Load 0x2,0x2 10e4 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 10e6 e7ff | | Load 0x3,-0x1 10e7 01cc | | Execute Vector,Catenate 10e8 0092 1cc3 | | Action Push_String_Extended,0x1cc3 ; " => " 10ea 01cc | | Execute Vector,Catenate 10eb e7fe | | Load 0x3,-0x2 10ec 01cc | | Execute Vector,Catenate 10ed e058 | X | Load 0x0,0x58 10ee 1818 | | Execute Package,Field_Execute,Field_Number 0x18 10ef 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10f0 ; -------------------------------------------------------------------------------------- 10f0 ; SUBPROGRAM 10f0 ; -------------------------------------------------------------------------------------- 10f0 10f3 | | .CONST 0x10f3 ; Address of begin 10f1 0004 | | .CONST 0x0004 ; Address of exception handler 10f2 0001 | | .CONST 0x0001 ; Number of locals 10f3 BODY_10f0: 10f3 INIT_10f0: 10f3 e7fe | | Load 0x3,-0x2 10f4 0f01 | | Execute_Immediate Equal,0x1 10f5 6804 |h | Jump_Zero 0x10fa 10f6 e7fe | | Load 0x3,-0x2 10f7 804b | K | Call 0x0,0x4b 10f8 e7ff | | Load 0x3,-0x1 10f9 8403 | | Call 0x2,0x3 10fa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10fb 0000 0000 | | .BLANK 0000[0x5] 1100 ; -------------------------------------------------------------------------------------- 1100 ; SUBPROGRAM 1100 ; -------------------------------------------------------------------------------------- 1100 1103 | | .CONST 0x1103 ; Address of begin 1101 0004 | | .CONST 0x0004 ; Address of exception handler 1102 0001 | | .CONST 0x0001 ; Number of locals 1103 BODY_1100: 1103 INIT_1100: 1103 e5ff | | Load 0x2,-0x1 1104 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 1105 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1106 6803 |h | Jump_Zero 0x110a 1107 0092 1cc4 | | Action Push_String_Extended,0x1cc4 ; "; BWO" 1109 00ca | | Action Exit_Nullary_Function 110a 00ea | | Load_Encached Null_String_Cache 110b 00ca | | Action Exit_Nullary_Function 110c 0000 0000 | | .BLANK 0000[0x4] 1110 ; -------------------------------------------------------------------------------------- 1110 ; SUBPROGRAM 1110 ; -------------------------------------------------------------------------------------- 1110 1124 | $ | .CONST 0x1124 ; Address of begin 1111 0004 | | .CONST 0x0004 ; Address of exception handler 1112 0002 | | .CONST 0x0002 ; Number of locals 1113 INIT_1110: 1113 4801 |H | Short_Literal 0x1 1114 4846 |HF | Short_Literal 0x46 1115 00e9 | | Load_Encached String_Cache 1116 035b | [ | Declare_Type Array,Constrained 1117 0337 | 7 | Declare_Variable Array 1118 00d8 | | Load_Top At_Offset_0 1119 0335 | 5 | Declare_Variable Array,Duplicate 111a 00cd | | Action Spare6_Action 111b 4846 |HF | Short_Literal 0x46 111c 4801 |H | Short_Literal 0x1 111d 4820 |H | Short_Literal 0x20 111e e605 | | Load 0x3,0x5 111f e603 | | Load 0x3,0x3 1120 01d6 | | Execute Vector,Field_Write 1121 3ffb |? | Loop_Increasing 0x111d 1122 e602 | | Load 0x3,0x2 1123 01d4 | | Execute Vector,Structure_Write 1124 BODY_1110: 1124 e7ff | | Load 0x3,-0x1 1125 01db | | Execute Vector,Length 1126 0d47 | G | Execute_Immediate Less,0x47 1127 680c |h | Jump_Zero 0x1134 1128 e7ff | | Load 0x3,-0x1 1129 4801 |H | Short_Literal 0x1 112a e7ff | | Load 0x3,-0x1 112b 01db | | Execute Vector,Length 112c 00d8 | | Load_Top At_Offset_0 112d 00e2 | | Load_Encached Integer_Cache 112e 0260 | ` | Execute Discrete,In_Type 112f 7001 |p | Jump_Nonzero 0x1131 1130 0801 | | Execute_Immediate Raise,0x1 1131 e602 | | Load 0x3,0x2 1132 01ce | | Execute Vector,Slice_Write 1133 780e |x | Jump 0x1142 1134 e7ff | | Load 0x3,-0x1 1135 01dd | | Execute Vector,First 1136 e7ff | | Load 0x3,-0x1 1137 01dd | | Execute Vector,First 1138 0a45 | E | Execute_Immediate Plus,0x45 1139 00d8 | | Load_Top At_Offset_0 113a 00e2 | | Load_Encached Integer_Cache 113b 0260 | ` | Execute Discrete,In_Type 113c 7001 |p | Jump_Nonzero 0x113e 113d 0801 | | Execute_Immediate Raise,0x1 113e e7ff | | Load 0x3,-0x1 113f 01cf | | Execute Vector,Slice_Read 1140 e602 | | Load 0x3,0x2 1141 01d4 | | Execute Vector,Structure_Write 1142 00d8 | | Load_Top At_Offset_0 1143 483e |H> | Short_Literal 0x3e 1144 4846 |HF | Short_Literal 0x46 1145 e603 | | Load 0x3,0x3 1146 035b | [ | Declare_Type Array,Constrained 1147 e603 | | Load 0x3,0x3 1148 01cd | | Execute Vector,Slice_Reference 1149 4801 |H | Short_Literal 0x1 114a 4809 |H | Short_Literal 0x9 114b 00e9 | | Load_Encached String_Cache 114c 035b | [ | Declare_Type Array,Constrained 114d 0337 | 7 | Declare_Variable Array 114e 483c |H< | Short_Literal 0x3c 114f 4801 |H | Short_Literal 0x1 1150 e605 | | Load 0x3,0x5 1151 01d6 | | Execute Vector,Field_Write 1152 483d |H= | Short_Literal 0x3d 1153 4802 |H | Short_Literal 0x2 1154 e605 | | Load 0x3,0x5 1155 01d6 | | Execute Vector,Field_Write 1156 483d |H= | Short_Literal 0x3d 1157 4803 |H | Short_Literal 0x3 1158 e605 | | Load 0x3,0x5 1159 01d6 | | Execute Vector,Field_Write 115a 4820 |H | Short_Literal 0x20 115b 4804 |H | Short_Literal 0x4 115c e605 | | Load 0x3,0x5 115d 01d6 | | Execute Vector,Field_Write 115e 4866 |Hf | Short_Literal 0x66 115f 4805 |H | Short_Literal 0x5 1160 e605 | | Load 0x3,0x5 1161 01d6 | | Execute Vector,Field_Write 1162 4872 |Hr | Short_Literal 0x72 1163 4806 |H | Short_Literal 0x6 1164 e605 | | Load 0x3,0x5 1165 01d6 | | Execute Vector,Field_Write 1166 4861 |Ha | Short_Literal 0x61 1167 4807 |H | Short_Literal 0x7 1168 e605 | | Load 0x3,0x5 1169 01d6 | | Execute Vector,Field_Write 116a 486d |Hm | Short_Literal 0x6d 116b 4808 |H | Short_Literal 0x8 116c e605 | | Load 0x3,0x5 116d 01d6 | | Execute Vector,Field_Write 116e 4865 |He | Short_Literal 0x65 116f 4809 |H | Short_Literal 0x9 1170 e605 | | Load 0x3,0x5 1171 01d6 | | Execute Vector,Field_Write 1172 00cd | | Action Spare6_Action 1173 483e |H> | Short_Literal 0x3e 1174 4846 |HF | Short_Literal 0x46 1175 e603 | | Load 0x3,0x3 1176 01ce | | Execute Vector,Slice_Write 1177 00d1 | | Pop_Control Pop_Count_1 1178 00d8 | | Load_Top At_Offset_0 1179 00e9 | | Load_Encached String_Cache 117a 01c6 | | Execute Vector,Convert_To_Formal 117b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 117c 0000 0000 | | .BLANK 0000[0x4] 1180 ; -------------------------------------------------------------------------------------- 1180 ; SUBPROGRAM 1180 ; -------------------------------------------------------------------------------------- 1180 118b | | .CONST 0x118b ; Address of begin 1181 0004 | | .CONST 0x0004 ; Address of exception handler 1182 0003 | | .CONST 0x0003 ; Number of locals 1183 INIT_1180: 1183 e5ff | | Load 0x2,-0x1 1184 e25e | ^ | Load 0x1,0x5e 1185 e25f | _ | Load 0x1,0x5f 1186 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60 1187 8001 | | Call 0x0,0x1 1188 00d8 | | Load_Top At_Offset_0 1189 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 118a 0007 | | Action Break_Optional 118b BODY_1180: 118b e5fe | | Load 0x2,-0x2 118c 6804 |h | Jump_Zero 0x1191 118d e602 | | Load 0x3,0x2 118e 8255 | U | Call 0x1,0x55 118f 00cb | | Action Pop_Block_With_Result 1190 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1191 e404 | | Load 0x2,0x4 1192 e603 | | Load 0x3,0x3 1193 804a | J | Call 0x0,0x4a 1194 01cc | | Execute Vector,Catenate 1195 0092 1cc2 | | Action Push_String_Extended,0x1cc2 ; " = " 1197 01cc | | Execute Vector,Catenate 1198 e603 | | Load 0x3,0x3 1199 8047 | G | Call 0x0,0x47 119a 01cc | | Execute Vector,Catenate 119b 00cb | | Action Pop_Block_With_Result 119c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 119d 0000 0000 | | .XXX[0x3] 119f 0000 | | 11a0 ; -------------------------------------------------------------------------------------- 11a0 ; SUBPROGRAM 11a0 ; -------------------------------------------------------------------------------------- 11a0 11a8 | | .CONST 0x11a8 ; Address of begin 11a1 0004 | | .CONST 0x0004 ; Address of exception handler 11a2 0002 | | .CONST 0x0002 ; Number of locals 11a3 INIT_11a0: 11a3 e5ff | | Load 0x2,-0x1 11a4 e262 | b | Load 0x1,0x62 11a5 e263 | c | Load 0x1,0x63 11a6 1d64 | d | Execute_Immediate Reference_Lex_1,0x64 11a7 8001 | | Call 0x0,0x1 11a8 BODY_11a0: 11a8 e5fe | | Load 0x2,-0x2 11a9 6804 |h | Jump_Zero 0x11ae 11aa 00d8 | | Load_Top At_Offset_0 11ab 82f8 | | Call 0x1,0xf8 11ac 00cb | | Action Pop_Block_With_Result 11ad 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11ae e404 | | Load 0x2,0x4 11af e602 | | Load 0x3,0x2 11b0 82f2 | | Call 0x1,0xf2 11b1 01cc | | Execute Vector,Catenate 11b2 00cb | | Action Pop_Block_With_Result 11b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11b4 0000 0000 | | .BLANK 0000[0x4] 11b8 ; -------------------------------------------------------------------------------------- 11b8 ; SUBPROGRAM 11b8 ; -------------------------------------------------------------------------------------- 11b8 11c0 | | .CONST 0x11c0 ; Address of begin 11b9 0004 | | .CONST 0x0004 ; Address of exception handler 11ba 0002 | | .CONST 0x0002 ; Number of locals 11bb INIT_11b8: 11bb e5ff | | Load 0x2,-0x1 11bc e26e | n | Load 0x1,0x6e 11bd e26f | o | Load 0x1,0x6f 11be 1d70 | p | Execute_Immediate Reference_Lex_1,0x70 11bf 8001 | | Call 0x0,0x1 11c0 BODY_11b8: 11c0 e5fe | | Load 0x2,-0x2 11c1 6804 |h | Jump_Zero 0x11c6 11c2 00d8 | | Load_Top At_Offset_0 11c3 82ef | | Call 0x1,0xef 11c4 00cb | | Action Pop_Block_With_Result 11c5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11c6 e404 | | Load 0x2,0x4 11c7 e602 | | Load 0x3,0x2 11c8 82f4 | | Call 0x1,0xf4 11c9 01cc | | Execute Vector,Catenate 11ca 00cb | | Action Pop_Block_With_Result 11cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11cc 0000 0000 | | .BLANK 0000[0x4] 11d0 ; -------------------------------------------------------------------------------------- 11d0 ; SUBPROGRAM 11d0 ; -------------------------------------------------------------------------------------- 11d0 11d8 | | .CONST 0x11d8 ; Address of begin 11d1 0004 | | .CONST 0x0004 ; Address of exception handler 11d2 0002 | | .CONST 0x0002 ; Number of locals 11d3 INIT_11d0: 11d3 e5ff | | Load 0x2,-0x1 11d4 e266 | f | Load 0x1,0x66 11d5 e267 | g | Load 0x1,0x67 11d6 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 11d7 8001 | | Call 0x0,0x1 11d8 BODY_11d0: 11d8 e5fe | | Load 0x2,-0x2 11d9 6804 |h | Jump_Zero 0x11de 11da 00d8 | | Load_Top At_Offset_0 11db 8225 | % | Call 0x1,0x25 11dc 00cb | | Action Pop_Block_With_Result 11dd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11de e404 | | Load 0x2,0x4 11df e602 | | Load 0x3,0x2 11e0 82f7 | | Call 0x1,0xf7 11e1 01cc | | Execute Vector,Catenate 11e2 00cb | | Action Pop_Block_With_Result 11e3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11e4 0000 0000 | | .BLANK 0000[0x4] 11e8 ; -------------------------------------------------------------------------------------- 11e8 ; SUBPROGRAM 11e8 ; -------------------------------------------------------------------------------------- 11e8 11f0 | | .CONST 0x11f0 ; Address of begin 11e9 0004 | | .CONST 0x0004 ; Address of exception handler 11ea 0002 | | .CONST 0x0002 ; Number of locals 11eb INIT_11e8: 11eb e5ff | | Load 0x2,-0x1 11ec e26a | j | Load 0x1,0x6a 11ed e26b | k | Load 0x1,0x6b 11ee 1d6c | l | Execute_Immediate Reference_Lex_1,0x6c 11ef 8001 | | Call 0x0,0x1 11f0 BODY_11e8: 11f0 e5fe | | Load 0x2,-0x2 11f1 6804 |h | Jump_Zero 0x11f6 11f2 00d8 | | Load_Top At_Offset_0 11f3 82e8 | | Call 0x1,0xe8 11f4 00cb | | Action Pop_Block_With_Result 11f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11f6 e404 | | Load 0x2,0x4 11f7 e602 | | Load 0x3,0x2 11f8 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 11f9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 11fa 804c | L | Call 0x0,0x4c 11fb 01cc | | Execute Vector,Catenate 11fc 00cb | | Action Pop_Block_With_Result 11fd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11fe 0000 0000 | | .XXX[0x2] 1200 ; -------------------------------------------------------------------------------------- 1200 ; SUBPROGRAM 1200 ; -------------------------------------------------------------------------------------- 1200 1208 | | .CONST 0x1208 ; Address of begin 1201 0004 | | .CONST 0x0004 ; Address of exception handler 1202 0002 | | .CONST 0x0002 ; Number of locals 1203 INIT_1200: 1203 e5ff | | Load 0x2,-0x1 1204 e27a | z | Load 0x1,0x7a 1205 e27b | { | Load 0x1,0x7b 1206 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c 1207 8001 | | Call 0x0,0x1 1208 BODY_1200: 1208 e5fe | | Load 0x2,-0x2 1209 6804 |h | Jump_Zero 0x120e 120a 00d8 | | Load_Top At_Offset_0 120b 8226 | & | Call 0x1,0x26 120c 00cb | | Action Pop_Block_With_Result 120d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 120e e403 | | Load 0x2,0x3 120f 0f76 | v | Execute_Immediate Equal,0x76 1210 6803 |h | Jump_Zero 0x1214 1211 e404 | | Load 0x2,0x4 1212 00cb | | Action Pop_Block_With_Result 1213 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1214 e404 | | Load 0x2,0x4 1215 e602 | | Load 0x3,0x2 1216 8227 | ' | Call 0x1,0x27 1217 01cc | | Execute Vector,Catenate 1218 00cb | | Action Pop_Block_With_Result 1219 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 121a 0000 0000 | | .BLANK 0000[0x6] 1220 ; -------------------------------------------------------------------------------------- 1220 ; SUBPROGRAM 1220 ; -------------------------------------------------------------------------------------- 1220 1228 | ( | .CONST 0x1228 ; Address of begin 1221 0004 | | .CONST 0x0004 ; Address of exception handler 1222 0002 | | .CONST 0x0002 ; Number of locals 1223 INIT_1220: 1223 e5ff | | Load 0x2,-0x1 1224 e27e | ~ | Load 0x1,0x7e 1225 e27f | | Load 0x1,0x7f 1226 1d80 | | Execute_Immediate Reference_Lex_1,0x80 1227 8001 | | Call 0x0,0x1 1228 BODY_1220: 1228 e5fe | | Load 0x2,-0x2 1229 6804 |h | Jump_Zero 0x122e 122a 00d8 | | Load_Top At_Offset_0 122b 823d | = | Call 0x1,0x3d 122c 00cb | | Action Pop_Block_With_Result 122d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 122e e404 | | Load 0x2,0x4 122f e602 | | Load 0x3,0x2 1230 823c | < | Call 0x1,0x3c 1231 01cc | | Execute Vector,Catenate 1232 00cb | | Action Pop_Block_With_Result 1233 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1234 0000 0000 | | .BLANK 0000[0x4] 1238 ; -------------------------------------------------------------------------------------- 1238 ; SUBPROGRAM 1238 ; -------------------------------------------------------------------------------------- 1238 1240 | @ | .CONST 0x1240 ; Address of begin 1239 0004 | | .CONST 0x0004 ; Address of exception handler 123a 0002 | | .CONST 0x0002 ; Number of locals 123b INIT_1238: 123b e5ff | | Load 0x2,-0x1 123c e282 | | Load 0x1,0x82 123d e283 | | Load 0x1,0x83 123e 1d84 | | Execute_Immediate Reference_Lex_1,0x84 123f 8001 | | Call 0x0,0x1 1240 BODY_1238: 1240 e5fe | | Load 0x2,-0x2 1241 6804 |h | Jump_Zero 0x1246 1242 00d8 | | Load_Top At_Offset_0 1243 823e | > | Call 0x1,0x3e 1244 00cb | | Action Pop_Block_With_Result 1245 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1246 00d8 | | Load_Top At_Offset_0 1247 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 1248 e404 | | Load 0x2,0x4 1249 82f3 | | Call 0x1,0xf3 124a 00cb | | Action Pop_Block_With_Result 124b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 124c 0000 0000 | | .BLANK 0000[0x4] 1250 ; -------------------------------------------------------------------------------------- 1250 ; SUBPROGRAM 1250 ; -------------------------------------------------------------------------------------- 1250 1258 | X | .CONST 0x1258 ; Address of begin 1251 0004 | | .CONST 0x0004 ; Address of exception handler 1252 0002 | | .CONST 0x0002 ; Number of locals 1253 INIT_1250: 1253 e5ff | | Load 0x2,-0x1 1254 e286 | | Load 0x1,0x86 1255 e287 | | Load 0x1,0x87 1256 1d88 | | Execute_Immediate Reference_Lex_1,0x88 1257 8001 | | Call 0x0,0x1 1258 BODY_1250: 1258 e5fe | | Load 0x2,-0x2 1259 6804 |h | Jump_Zero 0x125e 125a 00d8 | | Load_Top At_Offset_0 125b 823f | ? | Call 0x1,0x3f 125c 00cb | | Action Pop_Block_With_Result 125d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 125e e404 | | Load 0x2,0x4 125f 00cb | | Action Pop_Block_With_Result 1260 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1261 0000 0000 | | .BLANK 0000[0x7] 1268 ; -------------------------------------------------------------------------------------- 1268 ; SUBPROGRAM 1268 ; -------------------------------------------------------------------------------------- 1268 1270 | p | .CONST 0x1270 ; Address of begin 1269 0004 | | .CONST 0x0004 ; Address of exception handler 126a 0002 | | .CONST 0x0002 ; Number of locals 126b INIT_1268: 126b e5ff | | Load 0x2,-0x1 126c e28a | | Load 0x1,0x8a 126d e28b | | Load 0x1,0x8b 126e 1d8c | | Execute_Immediate Reference_Lex_1,0x8c 126f 8001 | | Call 0x0,0x1 1270 BODY_1268: 1270 e5fe | | Load 0x2,-0x2 1271 6804 |h | Jump_Zero 0x1276 1272 00d8 | | Load_Top At_Offset_0 1273 8241 | A | Call 0x1,0x41 1274 00cb | | Action Pop_Block_With_Result 1275 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1276 e404 | | Load 0x2,0x4 1277 0092 1cc5 | | Action Push_String_Extended,0x1cc5 ; "collection + " 1279 01cc | | Execute Vector,Catenate 127a e602 | | Load 0x3,0x2 127b 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 127c 8214 | | Call 0x1,0x14 127d 01cc | | Execute Vector,Catenate 127e 00cb | | Action Pop_Block_With_Result 127f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1280 ; -------------------------------------------------------------------------------------- 1280 ; SUBPROGRAM 1280 ; -------------------------------------------------------------------------------------- 1280 1288 | | .CONST 0x1288 ; Address of begin 1281 0004 | | .CONST 0x0004 ; Address of exception handler 1282 0002 | | .CONST 0x0002 ; Number of locals 1283 INIT_1280: 1283 e5ff | | Load 0x2,-0x1 1284 e28e | | Load 0x1,0x8e 1285 e28f | | Load 0x1,0x8f 1286 1d90 | | Execute_Immediate Reference_Lex_1,0x90 1287 8001 | | Call 0x0,0x1 1288 BODY_1280: 1288 e5fe | | Load 0x2,-0x2 1289 6804 |h | Jump_Zero 0x128e 128a 00d8 | | Load_Top At_Offset_0 128b 8243 | C | Call 0x1,0x43 128c 00cb | | Action Pop_Block_With_Result 128d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 128e e404 | | Load 0x2,0x4 128f e602 | | Load 0x3,0x2 1290 8244 | D | Call 0x1,0x44 1291 01cc | | Execute Vector,Catenate 1292 00cb | | Action Pop_Block_With_Result 1293 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1294 0000 0000 | | .BLANK 0000[0x4] 1298 ; -------------------------------------------------------------------------------------- 1298 ; SUBPROGRAM 1298 ; -------------------------------------------------------------------------------------- 1298 12a0 | | .CONST 0x12a0 ; Address of begin 1299 0004 | | .CONST 0x0004 ; Address of exception handler 129a 0002 | | .CONST 0x0002 ; Number of locals 129b INIT_1298: 129b e5ff | | Load 0x2,-0x1 129c e292 | | Load 0x1,0x92 129d e293 | | Load 0x1,0x93 129e 1d94 | | Execute_Immediate Reference_Lex_1,0x94 129f 8001 | | Call 0x0,0x1 12a0 BODY_1298: 12a0 e5fe | | Load 0x2,-0x2 12a1 6804 |h | Jump_Zero 0x12a6 12a2 00d8 | | Load_Top At_Offset_0 12a3 824b | K | Call 0x1,0x4b 12a4 00cb | | Action Pop_Block_With_Result 12a5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12a6 e404 | | Load 0x2,0x4 12a7 e602 | | Load 0x3,0x2 12a8 824c | L | Call 0x1,0x4c 12a9 01cc | | Execute Vector,Catenate 12aa 00cb | | Action Pop_Block_With_Result 12ab 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12ac 0000 0000 | | .BLANK 0000[0x4] 12b0 ; -------------------------------------------------------------------------------------- 12b0 ; SUBPROGRAM 12b0 ; -------------------------------------------------------------------------------------- 12b0 12b8 | | .CONST 0x12b8 ; Address of begin 12b1 0004 | | .CONST 0x0004 ; Address of exception handler 12b2 0002 | | .CONST 0x0002 ; Number of locals 12b3 INIT_12b0: 12b3 e5ff | | Load 0x2,-0x1 12b4 e296 | | Load 0x1,0x96 12b5 e297 | | Load 0x1,0x97 12b6 1d98 | | Execute_Immediate Reference_Lex_1,0x98 12b7 8001 | | Call 0x0,0x1 12b8 BODY_12b0: 12b8 e5fe | | Load 0x2,-0x2 12b9 6804 |h | Jump_Zero 0x12be 12ba 00d8 | | Load_Top At_Offset_0 12bb 824e | N | Call 0x1,0x4e 12bc 00cb | | Action Pop_Block_With_Result 12bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12be e404 | | Load 0x2,0x4 12bf e602 | | Load 0x3,0x2 12c0 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 12c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 12c2 804c | L | Call 0x0,0x4c 12c3 01cc | | Execute Vector,Catenate 12c4 00cb | | Action Pop_Block_With_Result 12c5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12c6 0000 0000 | | .XXX[0x2] 12c8 ; -------------------------------------------------------------------------------------- 12c8 ; SUBPROGRAM 12c8 ; -------------------------------------------------------------------------------------- 12c8 12d0 | | .CONST 0x12d0 ; Address of begin 12c9 0004 | | .CONST 0x0004 ; Address of exception handler 12ca 0002 | | .CONST 0x0002 ; Number of locals 12cb INIT_12c8: 12cb e5ff | | Load 0x2,-0x1 12cc e29a | | Load 0x1,0x9a 12cd e29b | | Load 0x1,0x9b 12ce 1d9c | | Execute_Immediate Reference_Lex_1,0x9c 12cf 8001 | | Call 0x0,0x1 12d0 BODY_12c8: 12d0 e5fe | | Load 0x2,-0x2 12d1 6804 |h | Jump_Zero 0x12d6 12d2 00d8 | | Load_Top At_Offset_0 12d3 824f | O | Call 0x1,0x4f 12d4 00cb | | Action Pop_Block_With_Result 12d5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12d6 e404 | | Load 0x2,0x4 12d7 e602 | | Load 0x3,0x2 12d8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 12d9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 12da 804c | L | Call 0x0,0x4c 12db 01cc | | Execute Vector,Catenate 12dc 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 12de 01cc | | Execute Vector,Catenate 12df e602 | | Load 0x3,0x2 12e0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 12e1 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 12e2 8211 | | Call 0x1,0x11 12e3 01cc | | Execute Vector,Catenate 12e4 00cb | | Action Pop_Block_With_Result 12e5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12e6 0000 0000 | | .XXX[0x2] 12e8 ; -------------------------------------------------------------------------------------- 12e8 ; SUBPROGRAM 12e8 ; -------------------------------------------------------------------------------------- 12e8 12f0 | | .CONST 0x12f0 ; Address of begin 12e9 0004 | | .CONST 0x0004 ; Address of exception handler 12ea 0002 | | .CONST 0x0002 ; Number of locals 12eb INIT_12e8: 12eb e5ff | | Load 0x2,-0x1 12ec e2a2 | | Load 0x1,0xa2 12ed e2a3 | | Load 0x1,0xa3 12ee 1da4 | | Execute_Immediate Reference_Lex_1,0xa4 12ef 8001 | | Call 0x0,0x1 12f0 BODY_12e8: 12f0 e5fe | | Load 0x2,-0x2 12f1 6804 |h | Jump_Zero 0x12f6 12f2 00d8 | | Load_Top At_Offset_0 12f3 825d | ] | Call 0x1,0x5d 12f4 00cb | | Action Pop_Block_With_Result 12f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 12f6 e404 | | Load 0x2,0x4 12f7 0092 1cc6 | | Action Push_String_Extended,0x1cc6 ; " type mark " 12f9 01cc | | Execute Vector,Catenate 12fa e602 | | Load 0x3,0x2 12fb 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 12fc 8211 | | Call 0x1,0x11 12fd 01cc | | Execute Vector,Catenate 12fe 0092 1cc7 | | Action Push_String_Extended,0x1cc7 ; " data mark " 1300 01cc | | Execute Vector,Catenate 1301 e602 | | Load 0x3,0x2 1302 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 1303 8214 | | Call 0x1,0x14 1304 01cc | | Execute Vector,Catenate 1305 00cb | | Action Pop_Block_With_Result 1306 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1307 0000 | | .XXX[0x1] 1308 ; -------------------------------------------------------------------------------------- 1308 ; SUBPROGRAM 1308 ; -------------------------------------------------------------------------------------- 1308 1310 | | .CONST 0x1310 ; Address of begin 1309 0004 | | .CONST 0x0004 ; Address of exception handler 130a 0002 | | .CONST 0x0002 ; Number of locals 130b INIT_1308: 130b e5ff | | Load 0x2,-0x1 130c e2db | | Load 0x1,0xdb 130d e2dc | | Load 0x1,0xdc 130e 1ddd | | Execute_Immediate Reference_Lex_1,0xdd 130f 8001 | | Call 0x0,0x1 1310 BODY_1308: 1310 e404 | | Load 0x2,0x4 1311 e602 | | Load 0x3,0x2 1312 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1313 804a | J | Call 0x0,0x4a 1314 01cc | | Execute Vector,Catenate 1315 0092 1c3a | :| Action Push_String_Extended,0x1c3a ; " " 1317 01cc | | Execute Vector,Catenate 1318 e602 | | Load 0x3,0x2 1319 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 131a 804a | J | Call 0x0,0x4a 131b 01cc | | Execute Vector,Catenate 131c 00cb | | Action Pop_Block_With_Result 131d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 131e 0000 0000 | | .XXX[0x2] 1320 ; -------------------------------------------------------------------------------------- 1320 ; SUBPROGRAM 1320 ; -------------------------------------------------------------------------------------- 1320 1328 | ( | .CONST 0x1328 ; Address of begin 1321 0004 | | .CONST 0x0004 ; Address of exception handler 1322 0002 | | .CONST 0x0002 ; Number of locals 1323 INIT_1320: 1323 e5ff | | Load 0x2,-0x1 1324 e2aa | | Load 0x1,0xaa 1325 e2ab | | Load 0x1,0xab 1326 1dac | | Execute_Immediate Reference_Lex_1,0xac 1327 8001 | | Call 0x0,0x1 1328 BODY_1320: 1328 e5fe | | Load 0x2,-0x2 1329 6804 |h | Jump_Zero 0x132e 132a 00d8 | | Load_Top At_Offset_0 132b 8240 | @ | Call 0x1,0x40 132c 00cb | | Action Pop_Block_With_Result 132d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 132e e404 | | Load 0x2,0x4 132f 00cb | | Action Pop_Block_With_Result 1330 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1331 0000 0000 | | .BLANK 0000[0x7] 1338 ; -------------------------------------------------------------------------------------- 1338 ; SUBPROGRAM 1338 ; -------------------------------------------------------------------------------------- 1338 1340 | @ | .CONST 0x1340 ; Address of begin 1339 0004 | | .CONST 0x0004 ; Address of exception handler 133a 0002 | | .CONST 0x0002 ; Number of locals 133b INIT_1338: 133b e5ff | | Load 0x2,-0x1 133c e2ae | | Load 0x1,0xae 133d e2af | | Load 0x1,0xaf 133e 1db0 | | Execute_Immediate Reference_Lex_1,0xb0 133f 8001 | | Call 0x0,0x1 1340 BODY_1338: 1340 e5fe | | Load 0x2,-0x2 1341 6804 |h | Jump_Zero 0x1346 1342 00d8 | | Load_Top At_Offset_0 1343 8242 | B | Call 0x1,0x42 1344 00cb | | Action Pop_Block_With_Result 1345 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1346 00d8 | | Load_Top At_Offset_0 1347 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 1348 e404 | | Load 0x2,0x4 1349 8247 | G | Call 0x1,0x47 134a 00cb | | Action Pop_Block_With_Result 134b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 134c 0000 0000 | | .BLANK 0000[0x4] 1350 ; -------------------------------------------------------------------------------------- 1350 ; SUBPROGRAM 1350 ; -------------------------------------------------------------------------------------- 1350 1358 | X | .CONST 0x1358 ; Address of begin 1351 0004 | | .CONST 0x0004 ; Address of exception handler 1352 0002 | | .CONST 0x0002 ; Number of locals 1353 INIT_1350: 1353 e5ff | | Load 0x2,-0x1 1354 e2b6 | | Load 0x1,0xb6 1355 e2b7 | | Load 0x1,0xb7 1356 1db8 | | Execute_Immediate Reference_Lex_1,0xb8 1357 8001 | | Call 0x0,0x1 1358 BODY_1350: 1358 e5fe | | Load 0x2,-0x2 1359 6804 |h | Jump_Zero 0x135e 135a 00d8 | | Load_Top At_Offset_0 135b 825a | Z | Call 0x1,0x5a 135c 00cb | | Action Pop_Block_With_Result 135d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 135e e404 | | Load 0x2,0x4 135f e602 | | Load 0x3,0x2 1360 8245 | E | Call 0x1,0x45 1361 01cc | | Execute Vector,Catenate 1362 00cb | | Action Pop_Block_With_Result 1363 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1364 0000 0000 | | .BLANK 0000[0x4] 1368 ; -------------------------------------------------------------------------------------- 1368 ; SUBPROGRAM 1368 ; -------------------------------------------------------------------------------------- 1368 1370 | p | .CONST 0x1370 ; Address of begin 1369 0004 | | .CONST 0x0004 ; Address of exception handler 136a 0002 | | .CONST 0x0002 ; Number of locals 136b INIT_1368: 136b e5ff | | Load 0x2,-0x1 136c e2ba | | Load 0x1,0xba 136d e2bb | | Load 0x1,0xbb 136e 1dbc | | Execute_Immediate Reference_Lex_1,0xbc 136f 8001 | | Call 0x0,0x1 1370 BODY_1368: 1370 e5fe | | Load 0x2,-0x2 1371 6804 |h | Jump_Zero 0x1376 1372 00d8 | | Load_Top At_Offset_0 1373 8249 | I | Call 0x1,0x49 1374 00cb | | Action Pop_Block_With_Result 1375 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1376 e404 | | Load 0x2,0x4 1377 e602 | | Load 0x3,0x2 1378 8229 | ) | Call 0x1,0x29 1379 01cc | | Execute Vector,Catenate 137a 00cb | | Action Pop_Block_With_Result 137b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 137c 0000 0000 | | .BLANK 0000[0x4] 1380 ; -------------------------------------------------------------------------------------- 1380 ; SUBPROGRAM 1380 ; -------------------------------------------------------------------------------------- 1380 1388 | | .CONST 0x1388 ; Address of begin 1381 0004 | | .CONST 0x0004 ; Address of exception handler 1382 0002 | | .CONST 0x0002 ; Number of locals 1383 INIT_1380: 1383 e5ff | | Load 0x2,-0x1 1384 e2be | | Load 0x1,0xbe 1385 e2bf | | Load 0x1,0xbf 1386 1dc0 | | Execute_Immediate Reference_Lex_1,0xc0 1387 8001 | | Call 0x0,0x1 1388 BODY_1380: 1388 e5fe | | Load 0x2,-0x2 1389 6804 |h | Jump_Zero 0x138e 138a 00d8 | | Load_Top At_Offset_0 138b 825b | [ | Call 0x1,0x5b 138c 00cb | | Action Pop_Block_With_Result 138d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 138e 00d8 | | Load_Top At_Offset_0 138f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1390 e404 | | Load 0x2,0x4 1391 8224 | $ | Call 0x1,0x24 1392 00cb | | Action Pop_Block_With_Result 1393 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1394 0000 0000 | | .BLANK 0000[0x4] 1398 ; -------------------------------------------------------------------------------------- 1398 ; SUBPROGRAM 1398 ; -------------------------------------------------------------------------------------- 1398 13a4 | | .CONST 0x13a4 ; Address of begin 1399 0004 | | .CONST 0x0004 ; Address of exception handler 139a 0002 | | .CONST 0x0002 ; Number of locals 139b INIT_1398: 139b e036 | 6 | Load 0x0,0x36 139c 0322 | " | Declare_Variable Record 139d e5ff | | Load 0x2,-0x1 139e e2c2 | | Load 0x1,0xc2 139f e2c3 | | Load 0x1,0xc3 13a0 1dc4 | | Execute_Immediate Reference_Lex_1,0xc4 13a1 8001 | | Call 0x0,0x1 13a2 e602 | | Load 0x3,0x2 13a3 017d | } | Execute Record,Structure_Write 13a4 BODY_1398: 13a4 e5fe | | Load 0x2,-0x2 13a5 6804 |h | Jump_Zero 0x13aa 13a6 00d8 | | Load_Top At_Offset_0 13a7 82ee | | Call 0x1,0xee 13a8 00cb | | Action Pop_Block_With_Result 13a9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13aa e404 | | Load 0x2,0x4 13ab e602 | | Load 0x3,0x2 13ac 82e6 | | Call 0x1,0xe6 13ad 01cc | | Execute Vector,Catenate 13ae 00cb | | Action Pop_Block_With_Result 13af 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13b0 ; -------------------------------------------------------------------------------------- 13b0 ; SUBPROGRAM 13b0 ; -------------------------------------------------------------------------------------- 13b0 13b8 | | .CONST 0x13b8 ; Address of begin 13b1 0004 | | .CONST 0x0004 ; Address of exception handler 13b2 0002 | | .CONST 0x0002 ; Number of locals 13b3 INIT_13b0: 13b3 e5ff | | Load 0x2,-0x1 13b4 e266 | f | Load 0x1,0x66 13b5 e267 | g | Load 0x1,0x67 13b6 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 13b7 8001 | | Call 0x0,0x1 13b8 BODY_13b0: 13b8 e5fe | | Load 0x2,-0x2 13b9 6804 |h | Jump_Zero 0x13be 13ba 00d8 | | Load_Top At_Offset_0 13bb 8225 | % | Call 0x1,0x25 13bc 00cb | | Action Pop_Block_With_Result 13bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13be e404 | | Load 0x2,0x4 13bf e602 | | Load 0x3,0x2 13c0 82f7 | | Call 0x1,0xf7 13c1 01cc | | Execute Vector,Catenate 13c2 00cb | | Action Pop_Block_With_Result 13c3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13c4 0000 0000 | | .BLANK 0000[0x4] 13c8 ; -------------------------------------------------------------------------------------- 13c8 ; SUBPROGRAM 13c8 ; -------------------------------------------------------------------------------------- 13c8 13d0 | | .CONST 0x13d0 ; Address of begin 13c9 0004 | | .CONST 0x0004 ; Address of exception handler 13ca 0002 | | .CONST 0x0002 ; Number of locals 13cb INIT_13c8: 13cb e5ff | | Load 0x2,-0x1 13cc e27a | z | Load 0x1,0x7a 13cd e27b | { | Load 0x1,0x7b 13ce 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c 13cf 8001 | | Call 0x0,0x1 13d0 BODY_13c8: 13d0 e5fe | | Load 0x2,-0x2 13d1 6804 |h | Jump_Zero 0x13d6 13d2 00d8 | | Load_Top At_Offset_0 13d3 8226 | & | Call 0x1,0x26 13d4 00cb | | Action Pop_Block_With_Result 13d5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13d6 e404 | | Load 0x2,0x4 13d7 e602 | | Load 0x3,0x2 13d8 8227 | ' | Call 0x1,0x27 13d9 01cc | | Execute Vector,Catenate 13da 00cb | | Action Pop_Block_With_Result 13db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13dc 0000 0000 | | .BLANK 0000[0x4] 13e0 ; -------------------------------------------------------------------------------------- 13e0 ; SUBPROGRAM 13e0 ; -------------------------------------------------------------------------------------- 13e0 13e8 | | .CONST 0x13e8 ; Address of begin 13e1 0004 | | .CONST 0x0004 ; Address of exception handler 13e2 0002 | | .CONST 0x0002 ; Number of locals 13e3 INIT_13e0: 13e3 e5ff | | Load 0x2,-0x1 13e4 e296 | | Load 0x1,0x96 13e5 e297 | | Load 0x1,0x97 13e6 1d98 | | Execute_Immediate Reference_Lex_1,0x98 13e7 8001 | | Call 0x0,0x1 13e8 BODY_13e0: 13e8 e5fe | | Load 0x2,-0x2 13e9 6804 |h | Jump_Zero 0x13ee 13ea 00d8 | | Load_Top At_Offset_0 13eb 824e | N | Call 0x1,0x4e 13ec 00cb | | Action Pop_Block_With_Result 13ed 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13ee e404 | | Load 0x2,0x4 13ef e602 | | Load 0x3,0x2 13f0 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 13f1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 13f2 804c | L | Call 0x0,0x4c 13f3 01cc | | Execute Vector,Catenate 13f4 00cb | | Action Pop_Block_With_Result 13f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 13f6 0000 0000 | | .XXX[0x2] 13f8 ; -------------------------------------------------------------------------------------- 13f8 ; SUBPROGRAM 13f8 ; -------------------------------------------------------------------------------------- 13f8 1400 | | .CONST 0x1400 ; Address of begin 13f9 0004 | | .CONST 0x0004 ; Address of exception handler 13fa 0002 | | .CONST 0x0002 ; Number of locals 13fb INIT_13f8: 13fb e5ff | | Load 0x2,-0x1 13fc e2ca | | Load 0x1,0xca 13fd e2cb | | Load 0x1,0xcb 13fe 1dcc | | Execute_Immediate Reference_Lex_1,0xcc 13ff 8001 | | Call 0x0,0x1 1400 BODY_13f8: 1400 e5fe | | Load 0x2,-0x2 1401 6804 |h | Jump_Zero 0x1406 1402 00d8 | | Load_Top At_Offset_0 1403 825c | \ | Call 0x1,0x5c 1404 00cb | | Action Pop_Block_With_Result 1405 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1406 e404 | | Load 0x2,0x4 1407 0092 1cc8 | | Action Push_String_Extended,0x1cc8 ; "partner = " 1409 01cc | | Execute Vector,Catenate 140a e602 | | Load 0x3,0x2 140b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 140c 804c | L | Call 0x0,0x4c 140d 01cc | | Execute Vector,Catenate 140e 00cb | | Action Pop_Block_With_Result 140f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1410 ; -------------------------------------------------------------------------------------- 1410 ; SUBPROGRAM 1410 ; -------------------------------------------------------------------------------------- 1410 141c | | .CONST 0x141c ; Address of begin 1411 0004 | | .CONST 0x0004 ; Address of exception handler 1412 0002 | | .CONST 0x0002 ; Number of locals 1413 INIT_1410: 1413 e03e | > | Load 0x0,0x3e 1414 0322 | " | Declare_Variable Record 1415 e5ff | | Load 0x2,-0x1 1416 e2d2 | | Load 0x1,0xd2 1417 e2d3 | | Load 0x1,0xd3 1418 1dd4 | | Execute_Immediate Reference_Lex_1,0xd4 1419 8001 | | Call 0x0,0x1 141a e602 | | Load 0x3,0x2 141b 017d | } | Execute Record,Structure_Write 141c BODY_1410: 141c e5fe | | Load 0x2,-0x2 141d 6804 |h | Jump_Zero 0x1422 141e 00d8 | | Load_Top At_Offset_0 141f 8237 | 7 | Call 0x1,0x37 1420 00cb | | Action Pop_Block_With_Result 1421 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1422 e404 | | Load 0x2,0x4 1423 e602 | | Load 0x3,0x2 1424 8238 | 8 | Call 0x1,0x38 1425 01cc | | Execute Vector,Catenate 1426 00cb | | Action Pop_Block_With_Result 1427 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1428 ; -------------------------------------------------------------------------------------- 1428 ; SUBPROGRAM 1428 ; -------------------------------------------------------------------------------------- 1428 1430 | 0 | .CONST 0x1430 ; Address of begin 1429 0004 | | .CONST 0x0004 ; Address of exception handler 142a 0002 | | .CONST 0x0002 ; Number of locals 142b INIT_1428: 142b e5ff | | Load 0x2,-0x1 142c e2d6 | | Load 0x1,0xd6 142d e2d7 | | Load 0x1,0xd7 142e 1dd8 | | Execute_Immediate Reference_Lex_1,0xd8 142f 8001 | | Call 0x0,0x1 1430 BODY_1428: 1430 e5fe | | Load 0x2,-0x2 1431 6804 |h | Jump_Zero 0x1436 1432 00d8 | | Load_Top At_Offset_0 1433 8258 | X | Call 0x1,0x58 1434 00cb | | Action Pop_Block_With_Result 1435 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1436 480a |H | Short_Literal 0xa 1437 e404 | | Load 0x2,0x4 1438 e602 | | Load 0x3,0x2 1439 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 143a 8246 | F | Call 0x1,0x46 143b 01cc | | Execute Vector,Catenate 143c 0092 1cc9 | | Action Push_String_Extended,0x1cc9 ; ";" 143e 01cc | | Execute Vector,Catenate 143f 01cb | | Execute Vector,Append 1440 0092 1cca | | Action Push_String_Extended,0x1cca ; "return pc = " 1442 e602 | | Load 0x3,0x2 1443 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1444 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 1445 e602 | | Load 0x3,0x2 1446 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 1447 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1448 e602 | | Load 0x3,0x2 1449 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 144a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 144b 8223 | # | Call 0x1,0x23 144c 01cc | | Execute Vector,Catenate 144d 0092 1c16 | | Action Push_String_Extended,0x1c16 ; "; lex = " 144f 01cc | | Execute Vector,Catenate 1450 e602 | | Load 0x3,0x2 1451 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 1452 821b | | Call 0x1,0x1b 1453 01cc | | Execute Vector,Catenate 1454 8402 | | Call 0x2,0x2 1455 01cc | | Execute Vector,Catenate 1456 00e9 | | Load_Encached String_Cache 1457 01c6 | | Execute Vector,Convert_To_Formal 1458 00cb | | Action Pop_Block_With_Result 1459 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 145a 0000 0000 | | .BLANK 0000[0x6] 1460 ; -------------------------------------------------------------------------------------- 1460 ; SUBPROGRAM 1460 ; -------------------------------------------------------------------------------------- 1460 1468 | h | .CONST 0x1468 ; Address of begin 1461 0004 | | .CONST 0x0004 ; Address of exception handler 1462 0002 | | .CONST 0x0002 ; Number of locals 1463 INIT_1460: 1463 e5ff | | Load 0x2,-0x1 1464 e2db | | Load 0x1,0xdb 1465 e2dc | | Load 0x1,0xdc 1466 1ddd | | Execute_Immediate Reference_Lex_1,0xdd 1467 8001 | | Call 0x0,0x1 1468 BODY_1460: 1468 e404 | | Load 0x2,0x4 1469 e602 | | Load 0x3,0x2 146a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 146b 804a | J | Call 0x0,0x4a 146c 01cc | | Execute Vector,Catenate 146d 0092 1c3a | :| Action Push_String_Extended,0x1c3a ; " " 146f 01cc | | Execute Vector,Catenate 1470 e602 | | Load 0x3,0x2 1471 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1472 804a | J | Call 0x0,0x4a 1473 01cc | | Execute Vector,Catenate 1474 00cb | | Action Pop_Block_With_Result 1475 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1476 0000 0000 | | .XXX[0x2] 1478 ; -------------------------------------------------------------------------------------- 1478 ; SUBPROGRAM 1478 ; -------------------------------------------------------------------------------------- 1478 1489 | | .CONST 0x1489 ; Address of begin 1479 0004 | | .CONST 0x0004 ; Address of exception handler 147a 000d | | .CONST 0x000d ; Number of locals 147b INIT_1478: 147b 4800 |H | Short_Literal 0x0 147c 0093 1493 | | push_full_address INIT_1490 147e 02a0 | | Declare_Subprogram Null_Subprogram 147f 038f | | Declare_Type Package,Defined,Visible 1480 0386 | | Declare_Variable Package,Visible 1481 00bf | | Action Accept_Activation 1482 a001 | | Store_Unchecked 0x0,0x1 1483 a002 | | Store_Unchecked 0x0,0x2 1484 4802 |H | Short_Literal 0x2 1485 e20d | | Load 0x1,0xd 1486 020e | | Execute Module,Augment_Imports 1487 00d8 | | Load_Top At_Offset_0 1488 020f | | Execute Module,Activate 1489 BODY_1478: 1489 00bc | | Action Signal_Activated 148a 00bb | | Action Signal_Completion 148b 0000 0000 | | .BLANK 0000[0x5] 1490 ; -------------------------------------------------------------------------------------- 1490 ; SUBPROGRAM 1490 ; -------------------------------------------------------------------------------------- 1490 14a0 | | .CONST 0x14a0 ; Address of begin 1491 0004 | | .CONST 0x0004 ; Address of exception handler 1492 000f | | .CONST 0x000f ; Number of locals 1493 INIT_1490: 1493 029a 14ab | | Declare_Subprogram INIT_14a8,For_Outer_Call,Visible,Unelaborated 1495 029a 14b3 | | Declare_Subprogram INIT_14b0,For_Outer_Call,Visible,Unelaborated 1497 029a 14bb | | Declare_Subprogram INIT_14b8,For_Outer_Call,Visible,Unelaborated 1499 00bf | | Action Accept_Activation 149a 1d0d | | Execute_Immediate Reference_Lex_1,0xd 149b 00c7 | | Action Elaborate_Subprogram 149c 1d0e | | Execute_Immediate Reference_Lex_1,0xe 149d 00c7 | | Action Elaborate_Subprogram 149e 1d0f | | Execute_Immediate Reference_Lex_1,0xf 149f 00c7 | | Action Elaborate_Subprogram 14a0 BODY_1490: 14a0 00bc | | Action Signal_Activated 14a1 00bb | | Action Signal_Completion 14a2 0000 0000 | | .BLANK 0000[0x6] 14a8 ; -------------------------------------------------------------------------------------- 14a8 ; SUBPROGRAM 14a8 ; -------------------------------------------------------------------------------------- 14a8 14ab | | .CONST 0x14ab ; Address of begin 14a9 0004 | | .CONST 0x0004 ; Address of exception handler 14aa 0001 | | .CONST 0x0001 ; Number of locals 14ab BODY_14a8: 14ab INIT_14a8: 14ab e5ff | | Load 0x2,-0x1 14ac 8001 | | Call 0x0,0x1 14ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14ae 0000 0000 | | .XXX[0x2] 14b0 ; -------------------------------------------------------------------------------------- 14b0 ; SUBPROGRAM 14b0 ; -------------------------------------------------------------------------------------- 14b0 14b3 | | .CONST 0x14b3 ; Address of begin 14b1 0004 | | .CONST 0x0004 ; Address of exception handler 14b2 0001 | | .CONST 0x0001 ; Number of locals 14b3 BODY_14b0: 14b3 INIT_14b0: 14b3 e5ff | | Load 0x2,-0x1 14b4 8001 | | Call 0x0,0x1 14b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14b6 0000 0000 | | .XXX[0x2] 14b8 ; -------------------------------------------------------------------------------------- 14b8 ; SUBPROGRAM 14b8 ; -------------------------------------------------------------------------------------- 14b8 14bb | | .CONST 0x14bb ; Address of begin 14b9 0004 | | .CONST 0x0004 ; Address of exception handler 14ba 0001 | | .CONST 0x0001 ; Number of locals 14bb BODY_14b8: 14bb INIT_14b8: 14bb e5ff | | Load 0x2,-0x1 14bc 8002 | | Call 0x0,0x2 14bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14be 0000 0000 | | .XXX[0x2] 14c0 ; -------------------------------------------------------------------------------------- 14c0 ; SUBPROGRAM 14c0 ; -------------------------------------------------------------------------------------- 14c0 152c | , | .CONST 0x152c ; Address of begin 14c1 0004 | | .CONST 0x0004 ; Address of exception handler 14c2 002b | + | .CONST 0x002b ; Number of locals 14c3 INIT_14c0: 14c3 029a 1533 | 3| Declare_Subprogram INIT_1530,For_Outer_Call,Visible,Unelaborated 14c5 029a 156b | k| Declare_Subprogram INIT_1568,For_Outer_Call,Visible,Unelaborated 14c7 029a 15ab | | Declare_Subprogram INIT_15a8,For_Outer_Call,Visible,Unelaborated 14c9 029a 15f3 | | Declare_Subprogram INIT_15f0,For_Outer_Call,Visible,Unelaborated 14cb 029a 1643 | C| Declare_Subprogram INIT_1640,For_Outer_Call,Visible,Unelaborated 14cd 029a 16ab | | Declare_Subprogram INIT_16a8,For_Outer_Call,Visible,Unelaborated 14cf 029a 171b | | Declare_Subprogram INIT_1718,For_Outer_Call,Visible,Unelaborated 14d1 029a 1793 | | Declare_Subprogram INIT_1790,For_Outer_Call,Visible,Unelaborated 14d3 029a 1823 | #| Declare_Subprogram INIT_1820,For_Outer_Call,Visible,Unelaborated 14d5 029a 18bb | | Declare_Subprogram INIT_18b8,For_Outer_Call,Visible,Unelaborated 14d7 029a 18f3 | | Declare_Subprogram INIT_18f0,For_Outer_Call,Visible,Unelaborated 14d9 029a 1903 | | Declare_Subprogram INIT_1900,For_Outer_Call,Visible,Unelaborated 14db 029a 190b | | Declare_Subprogram INIT_1908,For_Outer_Call,Visible,Unelaborated 14dd 029a 1913 | | Declare_Subprogram INIT_1910,For_Outer_Call,Visible,Unelaborated 14df 00bf | | Action Accept_Activation 14e0 0092 1ccb | | Action Push_String_Extended,0x1ccb ; "(" 14e2 0092 1c60 | `| Action Push_String_Extended,0x1c60 ; ")" 14e4 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; ", " 14e6 4801 |H | Short_Literal 0x1 14e7 4802 |H | Short_Literal 0x2 14e8 00e9 | | Load_Encached String_Cache 14e9 035b | [ | Declare_Type Array,Constrained 14ea 0337 | 7 | Declare_Variable Array 14eb 4809 |H | Short_Literal 0x9 14ec 4801 |H | Short_Literal 0x1 14ed e21e | | Load 0x1,0x1e 14ee 01d6 | | Execute Vector,Field_Write 14ef 4800 |H | Short_Literal 0x0 14f0 4802 |H | Short_Literal 0x2 14f1 e21e | | Load 0x1,0x1e 14f2 01d6 | | Execute Vector,Field_Write 14f3 0092 1cc3 | | Action Push_String_Extended,0x1cc3 ; " => " 14f5 029d 1933 | 3| Declare_Subprogram INIT_1930,For_Outer_Call 14f7 029d 194b | K| Declare_Subprogram INIT_1948,For_Outer_Call 14f9 029d 196b | k| Declare_Subprogram INIT_1968,For_Outer_Call 14fb 029d 1993 | | Declare_Subprogram INIT_1990,For_Outer_Call 14fd 029d 19b3 | | Declare_Subprogram INIT_19b0,For_Outer_Call 14ff 029d 19db | | Declare_Subprogram INIT_19d8,For_Outer_Call 1501 029d 1a03 | | Declare_Subprogram INIT_1a00,For_Outer_Call 1503 029d 1a2b | +| Declare_Subprogram INIT_1a28,For_Outer_Call 1505 029d 1a5b | [| Declare_Subprogram INIT_1a58,For_Outer_Call 1507 1d0d | | Execute_Immediate Reference_Lex_1,0xd 1508 00c7 | | Action Elaborate_Subprogram 1509 1d0e | | Execute_Immediate Reference_Lex_1,0xe 150a 00c7 | | Action Elaborate_Subprogram 150b 1d0f | | Execute_Immediate Reference_Lex_1,0xf 150c 00c7 | | Action Elaborate_Subprogram 150d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 150e 00c7 | | Action Elaborate_Subprogram 150f 1d11 | | Execute_Immediate Reference_Lex_1,0x11 1510 00c7 | | Action Elaborate_Subprogram 1511 1d12 | | Execute_Immediate Reference_Lex_1,0x12 1512 00c7 | | Action Elaborate_Subprogram 1513 1d13 | | Execute_Immediate Reference_Lex_1,0x13 1514 00c7 | | Action Elaborate_Subprogram 1515 1d14 | | Execute_Immediate Reference_Lex_1,0x14 1516 00c7 | | Action Elaborate_Subprogram 1517 1d15 | | Execute_Immediate Reference_Lex_1,0x15 1518 00c7 | | Action Elaborate_Subprogram 1519 1d16 | | Execute_Immediate Reference_Lex_1,0x16 151a 00c7 | | Action Elaborate_Subprogram 151b 1d17 | | Execute_Immediate Reference_Lex_1,0x17 151c 00c7 | | Action Elaborate_Subprogram 151d 029d 1a73 | s| Declare_Subprogram INIT_1a70,For_Outer_Call 151f 1d19 | | Execute_Immediate Reference_Lex_1,0x19 1520 00c7 | | Action Elaborate_Subprogram 1521 1d18 | | Execute_Immediate Reference_Lex_1,0x18 1522 00c7 | | Action Elaborate_Subprogram 1523 0093 0000 | | push_full_address 0x0 1525 603e |`> | Indirect_Literal Discrete,0x1564,{0x80000000, 0x00010000} 1526 0273 | s | Execute Discrete,Plus 1527 0007 | | Action Break_Optional 1528 029d 1a7b | {| Declare_Subprogram INIT_1a78,For_Outer_Call 152a 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 152b 00c7 | | Action Elaborate_Subprogram 152c BODY_14c0: 152c 00bc | | Action Signal_Activated 152d 00bb | | Action Signal_Completion 152e 0000 0000 | | .XXX[0x2] 1530 ; -------------------------------------------------------------------------------------- 1530 ; SUBPROGRAM 1530 ; -------------------------------------------------------------------------------------- 1530 154a | J | .CONST 0x154a ; Address of begin 1531 0004 | | .CONST 0x0004 ; Address of exception handler 1532 0004 | | .CONST 0x0004 ; Number of locals 1533 INIT_1530: 1533 4802 |H | Short_Literal 0x2 1534 8228 | ( | Call 0x1,0x28 1535 e5ff | | Load 0x2,-0x1 1536 01db | | Execute Vector,Length 1537 0273 | s | Execute Discrete,Plus 1538 e5fe | | Load 0x2,-0x2 1539 01db | | Execute Vector,Length 153a 0273 | s | Execute Discrete,Plus 153b e5fd | | Load 0x2,-0x3 153c 01db | | Execute Vector,Length 153d 0273 | s | Execute Discrete,Plus 153e e5fc | | Load 0x2,-0x4 153f 01db | | Execute Vector,Length 1540 0273 | s | Execute Discrete,Plus 1541 00e2 | | Load_Encached Integer_Cache 1542 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1543 00e2 | | Load_Encached Integer_Cache 1544 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1545 4801 |H | Short_Literal 0x1 1546 e402 | | Load 0x2,0x2 1547 00e9 | | Load_Encached String_Cache 1548 035b | [ | Declare_Type Array,Constrained 1549 0337 | 7 | Declare_Variable Array 154a BODY_1530: 154a e403 | | Load 0x2,0x3 154b e404 | | Load 0x2,0x4 154c e5fe | | Load 0x2,-0x2 154d e5ff | | Load 0x2,-0x1 154e 8221 | ! | Call 0x1,0x21 154f 00d1 | | Pop_Control Pop_Count_1 1550 c403 | | Store 0x2,0x3 1551 e403 | | Load 0x2,0x3 1552 e404 | | Load 0x2,0x4 1553 e5fc | | Load 0x2,-0x4 1554 e5fd | | Load 0x2,-0x3 1555 8222 | " | Call 0x1,0x22 1556 00d1 | | Pop_Control Pop_Count_1 1557 c403 | | Store 0x2,0x3 1558 e403 | | Load 0x2,0x3 1559 e404 | | Load 0x2,0x4 155a 01dc | | Execute Vector,Last 155b 0a01 | | Execute_Immediate Plus,0x1 155c 027f | | Execute Discrete,Equal 155d 7001 |p | Jump_Nonzero 0x155f 155e 0887 | | Execute_Immediate Raise,0x87 155f 00d8 | | Load_Top At_Offset_0 1560 00e9 | | Load_Encached String_Cache 1561 01c6 | | Execute Vector,Convert_To_Formal 1562 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 1563 0000 | | .XXX[0x1] 1564 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 1568 ; -------------------------------------------------------------------------------------- 1568 ; SUBPROGRAM 1568 ; -------------------------------------------------------------------------------------- 1568 1588 | | .CONST 0x1588 ; Address of begin 1569 0004 | | .CONST 0x0004 ; Address of exception handler 156a 0004 | | .CONST 0x0004 ; Number of locals 156b INIT_1568: 156b 4803 |H | Short_Literal 0x3 156c 8228 | ( | Call 0x1,0x28 156d e5ff | | Load 0x2,-0x1 156e 01db | | Execute Vector,Length 156f 0273 | s | Execute Discrete,Plus 1570 e5fe | | Load 0x2,-0x2 1571 01db | | Execute Vector,Length 1572 0273 | s | Execute Discrete,Plus 1573 e5fd | | Load 0x2,-0x3 1574 01db | | Execute Vector,Length 1575 0273 | s | Execute Discrete,Plus 1576 e5fc | | Load 0x2,-0x4 1577 01db | | Execute Vector,Length 1578 0273 | s | Execute Discrete,Plus 1579 e5fb | | Load 0x2,-0x5 157a 01db | | Execute Vector,Length 157b 0273 | s | Execute Discrete,Plus 157c e5fa | | Load 0x2,-0x6 157d 01db | | Execute Vector,Length 157e 0273 | s | Execute Discrete,Plus 157f 00e2 | | Load_Encached Integer_Cache 1580 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1581 00e2 | | Load_Encached Integer_Cache 1582 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1583 4801 |H | Short_Literal 0x1 1584 e402 | | Load 0x2,0x2 1585 00e9 | | Load_Encached String_Cache 1586 035b | [ | Declare_Type Array,Constrained 1587 0337 | 7 | Declare_Variable Array 1588 BODY_1568: 1588 e403 | | Load 0x2,0x3 1589 e404 | | Load 0x2,0x4 158a e5fe | | Load 0x2,-0x2 158b e5ff | | Load 0x2,-0x1 158c 8221 | ! | Call 0x1,0x21 158d 00d1 | | Pop_Control Pop_Count_1 158e c403 | | Store 0x2,0x3 158f e403 | | Load 0x2,0x3 1590 e404 | | Load 0x2,0x4 1591 e5fc | | Load 0x2,-0x4 1592 e5fd | | Load 0x2,-0x3 1593 8223 | # | Call 0x1,0x23 1594 00d1 | | Pop_Control Pop_Count_1 1595 c403 | | Store 0x2,0x3 1596 e403 | | Load 0x2,0x3 1597 e404 | | Load 0x2,0x4 1598 e5fa | | Load 0x2,-0x6 1599 e5fb | | Load 0x2,-0x5 159a 8222 | " | Call 0x1,0x22 159b 00d1 | | Pop_Control Pop_Count_1 159c c403 | | Store 0x2,0x3 159d e403 | | Load 0x2,0x3 159e e404 | | Load 0x2,0x4 159f 01dc | | Execute Vector,Last 15a0 0a01 | | Execute_Immediate Plus,0x1 15a1 027f | | Execute Discrete,Equal 15a2 7001 |p | Jump_Nonzero 0x15a4 15a3 0887 | | Execute_Immediate Raise,0x87 15a4 00d8 | | Load_Top At_Offset_0 15a5 00e9 | | Load_Encached String_Cache 15a6 01c6 | | Execute Vector,Convert_To_Formal 15a7 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 15a8 ; -------------------------------------------------------------------------------------- 15a8 ; SUBPROGRAM 15a8 ; -------------------------------------------------------------------------------------- 15a8 15ce | | .CONST 0x15ce ; Address of begin 15a9 0004 | | .CONST 0x0004 ; Address of exception handler 15aa 0004 | | .CONST 0x0004 ; Number of locals 15ab INIT_15a8: 15ab 4804 |H | Short_Literal 0x4 15ac 8228 | ( | Call 0x1,0x28 15ad e5ff | | Load 0x2,-0x1 15ae 01db | | Execute Vector,Length 15af 0273 | s | Execute Discrete,Plus 15b0 e5fe | | Load 0x2,-0x2 15b1 01db | | Execute Vector,Length 15b2 0273 | s | Execute Discrete,Plus 15b3 e5fd | | Load 0x2,-0x3 15b4 01db | | Execute Vector,Length 15b5 0273 | s | Execute Discrete,Plus 15b6 e5fc | | Load 0x2,-0x4 15b7 01db | | Execute Vector,Length 15b8 0273 | s | Execute Discrete,Plus 15b9 e5fb | | Load 0x2,-0x5 15ba 01db | | Execute Vector,Length 15bb 0273 | s | Execute Discrete,Plus 15bc e5fa | | Load 0x2,-0x6 15bd 01db | | Execute Vector,Length 15be 0273 | s | Execute Discrete,Plus 15bf e5f9 | | Load 0x2,-0x7 15c0 01db | | Execute Vector,Length 15c1 0273 | s | Execute Discrete,Plus 15c2 e5f8 | | Load 0x2,-0x8 15c3 01db | | Execute Vector,Length 15c4 0273 | s | Execute Discrete,Plus 15c5 00e2 | | Load_Encached Integer_Cache 15c6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 15c7 00e2 | | Load_Encached Integer_Cache 15c8 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 15c9 4801 |H | Short_Literal 0x1 15ca e402 | | Load 0x2,0x2 15cb 00e9 | | Load_Encached String_Cache 15cc 035b | [ | Declare_Type Array,Constrained 15cd 0337 | 7 | Declare_Variable Array 15ce BODY_15a8: 15ce e403 | | Load 0x2,0x3 15cf e404 | | Load 0x2,0x4 15d0 e5fe | | Load 0x2,-0x2 15d1 e5ff | | Load 0x2,-0x1 15d2 8221 | ! | Call 0x1,0x21 15d3 00d1 | | Pop_Control Pop_Count_1 15d4 c403 | | Store 0x2,0x3 15d5 e403 | | Load 0x2,0x3 15d6 e404 | | Load 0x2,0x4 15d7 e5fa | | Load 0x2,-0x6 15d8 e5fb | | Load 0x2,-0x5 15d9 e5fc | | Load 0x2,-0x4 15da e5fd | | Load 0x2,-0x3 15db 8224 | $ | Call 0x1,0x24 15dc 00d1 | | Pop_Control Pop_Count_1 15dd c403 | | Store 0x2,0x3 15de e403 | | Load 0x2,0x3 15df e404 | | Load 0x2,0x4 15e0 e5f8 | | Load 0x2,-0x8 15e1 e5f9 | | Load 0x2,-0x7 15e2 8222 | " | Call 0x1,0x22 15e3 00d1 | | Pop_Control Pop_Count_1 15e4 c403 | | Store 0x2,0x3 15e5 e403 | | Load 0x2,0x3 15e6 e404 | | Load 0x2,0x4 15e7 01dc | | Execute Vector,Last 15e8 0a01 | | Execute_Immediate Plus,0x1 15e9 027f | | Execute Discrete,Equal 15ea 7001 |p | Jump_Nonzero 0x15ec 15eb 0887 | | Execute_Immediate Raise,0x87 15ec 00d8 | | Load_Top At_Offset_0 15ed 00e9 | | Load_Encached String_Cache 15ee 01c6 | | Execute Vector,Convert_To_Formal 15ef 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 15f0 ; -------------------------------------------------------------------------------------- 15f0 ; SUBPROGRAM 15f0 ; -------------------------------------------------------------------------------------- 15f0 161c | | .CONST 0x161c ; Address of begin 15f1 0004 | | .CONST 0x0004 ; Address of exception handler 15f2 0004 | | .CONST 0x0004 ; Number of locals 15f3 INIT_15f0: 15f3 4805 |H | Short_Literal 0x5 15f4 8228 | ( | Call 0x1,0x28 15f5 e5ff | | Load 0x2,-0x1 15f6 01db | | Execute Vector,Length 15f7 0273 | s | Execute Discrete,Plus 15f8 e5fe | | Load 0x2,-0x2 15f9 01db | | Execute Vector,Length 15fa 0273 | s | Execute Discrete,Plus 15fb e5fd | | Load 0x2,-0x3 15fc 01db | | Execute Vector,Length 15fd 0273 | s | Execute Discrete,Plus 15fe e5fc | | Load 0x2,-0x4 15ff 01db | | Execute Vector,Length 1600 0273 | s | Execute Discrete,Plus 1601 e5fb | | Load 0x2,-0x5 1602 01db | | Execute Vector,Length 1603 0273 | s | Execute Discrete,Plus 1604 e5fa | | Load 0x2,-0x6 1605 01db | | Execute Vector,Length 1606 0273 | s | Execute Discrete,Plus 1607 e5f9 | | Load 0x2,-0x7 1608 01db | | Execute Vector,Length 1609 0273 | s | Execute Discrete,Plus 160a e5f8 | | Load 0x2,-0x8 160b 01db | | Execute Vector,Length 160c 0273 | s | Execute Discrete,Plus 160d e5f7 | | Load 0x2,-0x9 160e 01db | | Execute Vector,Length 160f 0273 | s | Execute Discrete,Plus 1610 e5f6 | | Load 0x2,-0xa 1611 01db | | Execute Vector,Length 1612 0273 | s | Execute Discrete,Plus 1613 00e2 | | Load_Encached Integer_Cache 1614 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1615 00e2 | | Load_Encached Integer_Cache 1616 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1617 4801 |H | Short_Literal 0x1 1618 e402 | | Load 0x2,0x2 1619 00e9 | | Load_Encached String_Cache 161a 035b | [ | Declare_Type Array,Constrained 161b 0337 | 7 | Declare_Variable Array 161c BODY_15f0: 161c e403 | | Load 0x2,0x3 161d e404 | | Load 0x2,0x4 161e e5fe | | Load 0x2,-0x2 161f e5ff | | Load 0x2,-0x1 1620 8221 | ! | Call 0x1,0x21 1621 00d1 | | Pop_Control Pop_Count_1 1622 c403 | | Store 0x2,0x3 1623 e403 | | Load 0x2,0x3 1624 e404 | | Load 0x2,0x4 1625 e5f8 | | Load 0x2,-0x8 1626 e5f9 | | Load 0x2,-0x7 1627 e5fa | | Load 0x2,-0x6 1628 e5fb | | Load 0x2,-0x5 1629 e5fc | | Load 0x2,-0x4 162a e5fd | | Load 0x2,-0x3 162b 8225 | % | Call 0x1,0x25 162c 00d1 | | Pop_Control Pop_Count_1 162d c403 | | Store 0x2,0x3 162e e403 | | Load 0x2,0x3 162f e404 | | Load 0x2,0x4 1630 e5f6 | | Load 0x2,-0xa 1631 e5f7 | | Load 0x2,-0x9 1632 8222 | " | Call 0x1,0x22 1633 00d1 | | Pop_Control Pop_Count_1 1634 c403 | | Store 0x2,0x3 1635 e403 | | Load 0x2,0x3 1636 e404 | | Load 0x2,0x4 1637 01dc | | Execute Vector,Last 1638 0a01 | | Execute_Immediate Plus,0x1 1639 027f | | Execute Discrete,Equal 163a 7001 |p | Jump_Nonzero 0x163c 163b 0887 | | Execute_Immediate Raise,0x87 163c 00d8 | | Load_Top At_Offset_0 163d 00e9 | | Load_Encached String_Cache 163e 01c6 | | Execute Vector,Convert_To_Formal 163f 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa 1640 ; -------------------------------------------------------------------------------------- 1640 ; SUBPROGRAM 1640 ; -------------------------------------------------------------------------------------- 1640 167b | { | .CONST 0x167b ; Address of begin 1641 0004 | | .CONST 0x0004 ; Address of exception handler 1642 0007 | | .CONST 0x0007 ; Number of locals 1643 INIT_1640: 1643 4806 |H | Short_Literal 0x6 1644 8228 | ( | Call 0x1,0x28 1645 e5ff | | Load 0x2,-0x1 1646 01db | | Execute Vector,Length 1647 0273 | s | Execute Discrete,Plus 1648 e5fe | | Load 0x2,-0x2 1649 01db | | Execute Vector,Length 164a 0273 | s | Execute Discrete,Plus 164b e5fd | | Load 0x2,-0x3 164c 01db | | Execute Vector,Length 164d 0273 | s | Execute Discrete,Plus 164e e5fc | | Load 0x2,-0x4 164f 01db | | Execute Vector,Length 1650 0273 | s | Execute Discrete,Plus 1651 e5fb | | Load 0x2,-0x5 1652 01db | | Execute Vector,Length 1653 0273 | s | Execute Discrete,Plus 1654 00e2 | | Load_Encached Integer_Cache 1655 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1656 e5fa | | Load 0x2,-0x6 1657 01db | | Execute Vector,Length 1658 e5f9 | | Load 0x2,-0x7 1659 01db | | Execute Vector,Length 165a 0273 | s | Execute Discrete,Plus 165b e5f8 | | Load 0x2,-0x8 165c 01db | | Execute Vector,Length 165d 0273 | s | Execute Discrete,Plus 165e e5f7 | | Load 0x2,-0x9 165f 01db | | Execute Vector,Length 1660 0273 | s | Execute Discrete,Plus 1661 e5f6 | | Load 0x2,-0xa 1662 01db | | Execute Vector,Length 1663 0273 | s | Execute Discrete,Plus 1664 00e2 | | Load_Encached Integer_Cache 1665 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1666 e5f5 | | Load 0x2,-0xb 1667 01db | | Execute Vector,Length 1668 e5f4 | | Load 0x2,-0xc 1669 01db | | Execute Vector,Length 166a 0273 | s | Execute Discrete,Plus 166b 00e2 | | Load_Encached Integer_Cache 166c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 166d e402 | | Load 0x2,0x2 166e e403 | | Load 0x2,0x3 166f 0273 | s | Execute Discrete,Plus 1670 e404 | | Load 0x2,0x4 1671 0273 | s | Execute Discrete,Plus 1672 00e2 | | Load_Encached Integer_Cache 1673 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1674 00e2 | | Load_Encached Integer_Cache 1675 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1676 4801 |H | Short_Literal 0x1 1677 e405 | | Load 0x2,0x5 1678 00e9 | | Load_Encached String_Cache 1679 035b | [ | Declare_Type Array,Constrained 167a 0337 | 7 | Declare_Variable Array 167b BODY_1640: 167b e406 | | Load 0x2,0x6 167c e407 | | Load 0x2,0x7 167d e5fe | | Load 0x2,-0x2 167e e5ff | | Load 0x2,-0x1 167f 8221 | ! | Call 0x1,0x21 1680 00d1 | | Pop_Control Pop_Count_1 1681 c406 | | Store 0x2,0x6 1682 e406 | | Load 0x2,0x6 1683 e407 | | Load 0x2,0x7 1684 e5f6 | | Load 0x2,-0xa 1685 e5f7 | | Load 0x2,-0x9 1686 e5f8 | | Load 0x2,-0x8 1687 e5f9 | | Load 0x2,-0x7 1688 e5fa | | Load 0x2,-0x6 1689 e5fb | | Load 0x2,-0x5 168a e5fc | | Load 0x2,-0x4 168b e5fd | | Load 0x2,-0x3 168c 8226 | & | Call 0x1,0x26 168d 00d1 | | Pop_Control Pop_Count_1 168e c406 | | Store 0x2,0x6 168f e406 | | Load 0x2,0x6 1690 e407 | | Load 0x2,0x7 1691 e5f4 | | Load 0x2,-0xc 1692 e5f5 | | Load 0x2,-0xb 1693 8222 | " | Call 0x1,0x22 1694 00d1 | | Pop_Control Pop_Count_1 1695 c406 | | Store 0x2,0x6 1696 e406 | | Load 0x2,0x6 1697 e407 | | Load 0x2,0x7 1698 01dc | | Execute Vector,Last 1699 0a01 | | Execute_Immediate Plus,0x1 169a 027f | | Execute Discrete,Equal 169b 7001 |p | Jump_Nonzero 0x169d 169c 0887 | | Execute_Immediate Raise,0x87 169d 00d8 | | Load_Top At_Offset_0 169e 00e9 | | Load_Encached String_Cache 169f 01c6 | | Execute Vector,Convert_To_Formal 16a0 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc 16a1 0000 0000 | | .BLANK 0000[0x7] 16a8 ; -------------------------------------------------------------------------------------- 16a8 ; SUBPROGRAM 16a8 ; -------------------------------------------------------------------------------------- 16a8 16e9 | | .CONST 0x16e9 ; Address of begin 16a9 0004 | | .CONST 0x0004 ; Address of exception handler 16aa 0007 | | .CONST 0x0007 ; Number of locals 16ab INIT_16a8: 16ab 4807 |H | Short_Literal 0x7 16ac 8228 | ( | Call 0x1,0x28 16ad e5ff | | Load 0x2,-0x1 16ae 01db | | Execute Vector,Length 16af 0273 | s | Execute Discrete,Plus 16b0 e5fe | | Load 0x2,-0x2 16b1 01db | | Execute Vector,Length 16b2 0273 | s | Execute Discrete,Plus 16b3 e5fd | | Load 0x2,-0x3 16b4 01db | | Execute Vector,Length 16b5 0273 | s | Execute Discrete,Plus 16b6 e5fc | | Load 0x2,-0x4 16b7 01db | | Execute Vector,Length 16b8 0273 | s | Execute Discrete,Plus 16b9 e5fb | | Load 0x2,-0x5 16ba 01db | | Execute Vector,Length 16bb 0273 | s | Execute Discrete,Plus 16bc 00e2 | | Load_Encached Integer_Cache 16bd 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 16be e5fa | | Load 0x2,-0x6 16bf 01db | | Execute Vector,Length 16c0 e5f9 | | Load 0x2,-0x7 16c1 01db | | Execute Vector,Length 16c2 0273 | s | Execute Discrete,Plus 16c3 e5f8 | | Load 0x2,-0x8 16c4 01db | | Execute Vector,Length 16c5 0273 | s | Execute Discrete,Plus 16c6 e5f7 | | Load 0x2,-0x9 16c7 01db | | Execute Vector,Length 16c8 0273 | s | Execute Discrete,Plus 16c9 e5f6 | | Load 0x2,-0xa 16ca 01db | | Execute Vector,Length 16cb 0273 | s | Execute Discrete,Plus 16cc e5f5 | | Load 0x2,-0xb 16cd 01db | | Execute Vector,Length 16ce 0273 | s | Execute Discrete,Plus 16cf 00e2 | | Load_Encached Integer_Cache 16d0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 16d1 e5f4 | | Load 0x2,-0xc 16d2 01db | | Execute Vector,Length 16d3 e5f3 | | Load 0x2,-0xd 16d4 01db | | Execute Vector,Length 16d5 0273 | s | Execute Discrete,Plus 16d6 e5f2 | | Load 0x2,-0xe 16d7 01db | | Execute Vector,Length 16d8 0273 | s | Execute Discrete,Plus 16d9 00e2 | | Load_Encached Integer_Cache 16da 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 16db e402 | | Load 0x2,0x2 16dc e403 | | Load 0x2,0x3 16dd 0273 | s | Execute Discrete,Plus 16de e404 | | Load 0x2,0x4 16df 0273 | s | Execute Discrete,Plus 16e0 00e2 | | Load_Encached Integer_Cache 16e1 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 16e2 00e2 | | Load_Encached Integer_Cache 16e3 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 16e4 4801 |H | Short_Literal 0x1 16e5 e405 | | Load 0x2,0x5 16e6 00e9 | | Load_Encached String_Cache 16e7 035b | [ | Declare_Type Array,Constrained 16e8 0337 | 7 | Declare_Variable Array 16e9 BODY_16a8: 16e9 e406 | | Load 0x2,0x6 16ea e407 | | Load 0x2,0x7 16eb e5fe | | Load 0x2,-0x2 16ec e5ff | | Load 0x2,-0x1 16ed 8221 | ! | Call 0x1,0x21 16ee 00d1 | | Pop_Control Pop_Count_1 16ef c406 | | Store 0x2,0x6 16f0 e406 | | Load 0x2,0x6 16f1 e407 | | Load 0x2,0x7 16f2 e5f4 | | Load 0x2,-0xc 16f3 e5f5 | | Load 0x2,-0xb 16f4 e5f6 | | Load 0x2,-0xa 16f5 e5f7 | | Load 0x2,-0x9 16f6 e5f8 | | Load 0x2,-0x8 16f7 e5f9 | | Load 0x2,-0x7 16f8 e5fa | | Load 0x2,-0x6 16f9 e5fb | | Load 0x2,-0x5 16fa e5fc | | Load 0x2,-0x4 16fb e5fd | | Load 0x2,-0x3 16fc 8227 | ' | Call 0x1,0x27 16fd 00d1 | | Pop_Control Pop_Count_1 16fe c406 | | Store 0x2,0x6 16ff e406 | | Load 0x2,0x6 1700 e407 | | Load 0x2,0x7 1701 e5f2 | | Load 0x2,-0xe 1702 e5f3 | | Load 0x2,-0xd 1703 8222 | " | Call 0x1,0x22 1704 00d1 | | Pop_Control Pop_Count_1 1705 c406 | | Store 0x2,0x6 1706 e406 | | Load 0x2,0x6 1707 e407 | | Load 0x2,0x7 1708 01dc | | Execute Vector,Last 1709 0a01 | | Execute_Immediate Plus,0x1 170a 027f | | Execute Discrete,Equal 170b 7001 |p | Jump_Nonzero 0x170d 170c 0887 | | Execute_Immediate Raise,0x87 170d 00d8 | | Load_Top At_Offset_0 170e 00e9 | | Load_Encached String_Cache 170f 01c6 | | Execute Vector,Convert_To_Formal 1710 440e |D | Exit_Subprogram With_Value,New_Top_Offset 0xe 1711 0000 0000 | | .BLANK 0000[0x7] 1718 ; -------------------------------------------------------------------------------------- 1718 ; SUBPROGRAM 1718 ; -------------------------------------------------------------------------------------- 1718 175f | _ | .CONST 0x175f ; Address of begin 1719 0004 | | .CONST 0x0004 ; Address of exception handler 171a 0007 | | .CONST 0x0007 ; Number of locals 171b INIT_1718: 171b 4808 |H | Short_Literal 0x8 171c 8228 | ( | Call 0x1,0x28 171d e5ff | | Load 0x2,-0x1 171e 01db | | Execute Vector,Length 171f 0273 | s | Execute Discrete,Plus 1720 e5fe | | Load 0x2,-0x2 1721 01db | | Execute Vector,Length 1722 0273 | s | Execute Discrete,Plus 1723 e5fd | | Load 0x2,-0x3 1724 01db | | Execute Vector,Length 1725 0273 | s | Execute Discrete,Plus 1726 e5fc | | Load 0x2,-0x4 1727 01db | | Execute Vector,Length 1728 0273 | s | Execute Discrete,Plus 1729 e5fb | | Load 0x2,-0x5 172a 01db | | Execute Vector,Length 172b 0273 | s | Execute Discrete,Plus 172c 00e2 | | Load_Encached Integer_Cache 172d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 172e e5fa | | Load 0x2,-0x6 172f 01db | | Execute Vector,Length 1730 e5f9 | | Load 0x2,-0x7 1731 01db | | Execute Vector,Length 1732 0273 | s | Execute Discrete,Plus 1733 e5f8 | | Load 0x2,-0x8 1734 01db | | Execute Vector,Length 1735 0273 | s | Execute Discrete,Plus 1736 e5f7 | | Load 0x2,-0x9 1737 01db | | Execute Vector,Length 1738 0273 | s | Execute Discrete,Plus 1739 e5f6 | | Load 0x2,-0xa 173a 01db | | Execute Vector,Length 173b 0273 | s | Execute Discrete,Plus 173c e5f5 | | Load 0x2,-0xb 173d 01db | | Execute Vector,Length 173e 0273 | s | Execute Discrete,Plus 173f 00e2 | | Load_Encached Integer_Cache 1740 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1741 e5f4 | | Load 0x2,-0xc 1742 01db | | Execute Vector,Length 1743 e5f3 | | Load 0x2,-0xd 1744 01db | | Execute Vector,Length 1745 0273 | s | Execute Discrete,Plus 1746 e5f2 | | Load 0x2,-0xe 1747 01db | | Execute Vector,Length 1748 0273 | s | Execute Discrete,Plus 1749 e5f1 | | Load 0x2,-0xf 174a 01db | | Execute Vector,Length 174b 0273 | s | Execute Discrete,Plus 174c e5f0 | | Load 0x2,-0x10 174d 01db | | Execute Vector,Length 174e 0273 | s | Execute Discrete,Plus 174f 00e2 | | Load_Encached Integer_Cache 1750 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1751 e402 | | Load 0x2,0x2 1752 e403 | | Load 0x2,0x3 1753 0273 | s | Execute Discrete,Plus 1754 e404 | | Load 0x2,0x4 1755 0273 | s | Execute Discrete,Plus 1756 00e2 | | Load_Encached Integer_Cache 1757 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1758 00e2 | | Load_Encached Integer_Cache 1759 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 175a 4801 |H | Short_Literal 0x1 175b e405 | | Load 0x2,0x5 175c 00e9 | | Load_Encached String_Cache 175d 035b | [ | Declare_Type Array,Constrained 175e 0337 | 7 | Declare_Variable Array 175f BODY_1718: 175f e406 | | Load 0x2,0x6 1760 e407 | | Load 0x2,0x7 1761 e5fe | | Load 0x2,-0x2 1762 e5ff | | Load 0x2,-0x1 1763 8221 | ! | Call 0x1,0x21 1764 00d1 | | Pop_Control Pop_Count_1 1765 c406 | | Store 0x2,0x6 1766 e406 | | Load 0x2,0x6 1767 e407 | | Load 0x2,0x7 1768 e5f4 | | Load 0x2,-0xc 1769 e5f5 | | Load 0x2,-0xb 176a e5f6 | | Load 0x2,-0xa 176b e5f7 | | Load 0x2,-0x9 176c e5f8 | | Load 0x2,-0x8 176d e5f9 | | Load 0x2,-0x7 176e e5fa | | Load 0x2,-0x6 176f e5fb | | Load 0x2,-0x5 1770 e5fc | | Load 0x2,-0x4 1771 e5fd | | Load 0x2,-0x3 1772 8227 | ' | Call 0x1,0x27 1773 00d1 | | Pop_Control Pop_Count_1 1774 c406 | | Store 0x2,0x6 1775 e406 | | Load 0x2,0x6 1776 e407 | | Load 0x2,0x7 1777 e5f2 | | Load 0x2,-0xe 1778 e5f3 | | Load 0x2,-0xd 1779 8223 | # | Call 0x1,0x23 177a 00d1 | | Pop_Control Pop_Count_1 177b c406 | | Store 0x2,0x6 177c e406 | | Load 0x2,0x6 177d e407 | | Load 0x2,0x7 177e e5f0 | | Load 0x2,-0x10 177f e5f1 | | Load 0x2,-0xf 1780 8222 | " | Call 0x1,0x22 1781 00d1 | | Pop_Control Pop_Count_1 1782 c406 | | Store 0x2,0x6 1783 e406 | | Load 0x2,0x6 1784 e407 | | Load 0x2,0x7 1785 01dc | | Execute Vector,Last 1786 0a01 | | Execute_Immediate Plus,0x1 1787 027f | | Execute Discrete,Equal 1788 7001 |p | Jump_Nonzero 0x178a 1789 0887 | | Execute_Immediate Raise,0x87 178a 00d8 | | Load_Top At_Offset_0 178b 00e9 | | Load_Encached String_Cache 178c 01c6 | | Execute Vector,Convert_To_Formal 178d 4410 |D | Exit_Subprogram With_Value,New_Top_Offset 0x10 178e 0000 0000 | | .XXX[0x2] 1790 ; -------------------------------------------------------------------------------------- 1790 ; SUBPROGRAM 1790 ; -------------------------------------------------------------------------------------- 1790 17e6 | | .CONST 0x17e6 ; Address of begin 1791 0004 | | .CONST 0x0004 ; Address of exception handler 1792 0008 | | .CONST 0x0008 ; Number of locals 1793 INIT_1790: 1793 480a |H | Short_Literal 0xa 1794 8228 | ( | Call 0x1,0x28 1795 e5ff | | Load 0x2,-0x1 1796 01db | | Execute Vector,Length 1797 0273 | s | Execute Discrete,Plus 1798 e5fe | | Load 0x2,-0x2 1799 01db | | Execute Vector,Length 179a 0273 | s | Execute Discrete,Plus 179b e5fd | | Load 0x2,-0x3 179c 01db | | Execute Vector,Length 179d 0273 | s | Execute Discrete,Plus 179e e5fc | | Load 0x2,-0x4 179f 01db | | Execute Vector,Length 17a0 0273 | s | Execute Discrete,Plus 17a1 e5fb | | Load 0x2,-0x5 17a2 01db | | Execute Vector,Length 17a3 0273 | s | Execute Discrete,Plus 17a4 00e2 | | Load_Encached Integer_Cache 17a5 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 17a6 e5fa | | Load 0x2,-0x6 17a7 01db | | Execute Vector,Length 17a8 e5f9 | | Load 0x2,-0x7 17a9 01db | | Execute Vector,Length 17aa 0273 | s | Execute Discrete,Plus 17ab e5f8 | | Load 0x2,-0x8 17ac 01db | | Execute Vector,Length 17ad 0273 | s | Execute Discrete,Plus 17ae e5f7 | | Load 0x2,-0x9 17af 01db | | Execute Vector,Length 17b0 0273 | s | Execute Discrete,Plus 17b1 e5f6 | | Load 0x2,-0xa 17b2 01db | | Execute Vector,Length 17b3 0273 | s | Execute Discrete,Plus 17b4 e5f5 | | Load 0x2,-0xb 17b5 01db | | Execute Vector,Length 17b6 0273 | s | Execute Discrete,Plus 17b7 00e2 | | Load_Encached Integer_Cache 17b8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 17b9 e5f4 | | Load 0x2,-0xc 17ba 01db | | Execute Vector,Length 17bb e5f3 | | Load 0x2,-0xd 17bc 01db | | Execute Vector,Length 17bd 0273 | s | Execute Discrete,Plus 17be e5f2 | | Load 0x2,-0xe 17bf 01db | | Execute Vector,Length 17c0 0273 | s | Execute Discrete,Plus 17c1 e5f1 | | Load 0x2,-0xf 17c2 01db | | Execute Vector,Length 17c3 0273 | s | Execute Discrete,Plus 17c4 e5f0 | | Load 0x2,-0x10 17c5 01db | | Execute Vector,Length 17c6 0273 | s | Execute Discrete,Plus 17c7 e5ef | | Load 0x2,-0x11 17c8 01db | | Execute Vector,Length 17c9 0273 | s | Execute Discrete,Plus 17ca 00e2 | | Load_Encached Integer_Cache 17cb 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 17cc e5ee | | Load 0x2,-0x12 17cd 01db | | Execute Vector,Length 17ce e5ed | | Load 0x2,-0x13 17cf 01db | | Execute Vector,Length 17d0 0273 | s | Execute Discrete,Plus 17d1 e5ec | | Load 0x2,-0x14 17d2 01db | | Execute Vector,Length 17d3 0273 | s | Execute Discrete,Plus 17d4 00e2 | | Load_Encached Integer_Cache 17d5 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 17d6 e402 | | Load 0x2,0x2 17d7 e403 | | Load 0x2,0x3 17d8 0273 | s | Execute Discrete,Plus 17d9 e404 | | Load 0x2,0x4 17da 0273 | s | Execute Discrete,Plus 17db e405 | | Load 0x2,0x5 17dc 0273 | s | Execute Discrete,Plus 17dd 00e2 | | Load_Encached Integer_Cache 17de 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 17df 00e2 | | Load_Encached Integer_Cache 17e0 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 17e1 4801 |H | Short_Literal 0x1 17e2 e406 | | Load 0x2,0x6 17e3 00e9 | | Load_Encached String_Cache 17e4 035b | [ | Declare_Type Array,Constrained 17e5 0337 | 7 | Declare_Variable Array 17e6 BODY_1790: 17e6 e407 | | Load 0x2,0x7 17e7 e408 | | Load 0x2,0x8 17e8 e5fe | | Load 0x2,-0x2 17e9 e5ff | | Load 0x2,-0x1 17ea 8221 | ! | Call 0x1,0x21 17eb 00d1 | | Pop_Control Pop_Count_1 17ec c407 | | Store 0x2,0x7 17ed e407 | | Load 0x2,0x7 17ee e408 | | Load 0x2,0x8 17ef e5f4 | | Load 0x2,-0xc 17f0 e5f5 | | Load 0x2,-0xb 17f1 e5f6 | | Load 0x2,-0xa 17f2 e5f7 | | Load 0x2,-0x9 17f3 e5f8 | | Load 0x2,-0x8 17f4 e5f9 | | Load 0x2,-0x7 17f5 e5fa | | Load 0x2,-0x6 17f6 e5fb | | Load 0x2,-0x5 17f7 e5fc | | Load 0x2,-0x4 17f8 e5fd | | Load 0x2,-0x3 17f9 8227 | ' | Call 0x1,0x27 17fa 00d1 | | Pop_Control Pop_Count_1 17fb c407 | | Store 0x2,0x7 17fc e407 | | Load 0x2,0x7 17fd e408 | | Load 0x2,0x8 17fe e5ee | | Load 0x2,-0x12 17ff e5ef | | Load 0x2,-0x11 1800 e5f0 | | Load 0x2,-0x10 1801 e5f1 | | Load 0x2,-0xf 1802 e5f2 | | Load 0x2,-0xe 1803 e5f3 | | Load 0x2,-0xd 1804 8225 | % | Call 0x1,0x25 1805 00d1 | | Pop_Control Pop_Count_1 1806 c407 | | Store 0x2,0x7 1807 e407 | | Load 0x2,0x7 1808 e408 | | Load 0x2,0x8 1809 e5ec | | Load 0x2,-0x14 180a e5ed | | Load 0x2,-0x13 180b 8222 | " | Call 0x1,0x22 180c 00d1 | | Pop_Control Pop_Count_1 180d c407 | | Store 0x2,0x7 180e e407 | | Load 0x2,0x7 180f e408 | | Load 0x2,0x8 1810 01dc | | Execute Vector,Last 1811 0a01 | | Execute_Immediate Plus,0x1 1812 027f | | Execute Discrete,Equal 1813 7001 |p | Jump_Nonzero 0x1815 1814 0887 | | Execute_Immediate Raise,0x87 1815 00d8 | | Load_Top At_Offset_0 1816 00e9 | | Load_Encached String_Cache 1817 01c6 | | Execute Vector,Convert_To_Formal 1818 4414 |D | Exit_Subprogram With_Value,New_Top_Offset 0x14 1819 0000 0000 | | .BLANK 0000[0x7] 1820 ; -------------------------------------------------------------------------------------- 1820 ; SUBPROGRAM 1820 ; -------------------------------------------------------------------------------------- 1820 187c | | | .CONST 0x187c ; Address of begin 1821 0004 | | .CONST 0x0004 ; Address of exception handler 1822 0008 | | .CONST 0x0008 ; Number of locals 1823 INIT_1820: 1823 480b |H | Short_Literal 0xb 1824 8228 | ( | Call 0x1,0x28 1825 e5ff | | Load 0x2,-0x1 1826 01db | | Execute Vector,Length 1827 0273 | s | Execute Discrete,Plus 1828 e5fe | | Load 0x2,-0x2 1829 01db | | Execute Vector,Length 182a 0273 | s | Execute Discrete,Plus 182b e5fd | | Load 0x2,-0x3 182c 01db | | Execute Vector,Length 182d 0273 | s | Execute Discrete,Plus 182e e5fc | | Load 0x2,-0x4 182f 01db | | Execute Vector,Length 1830 0273 | s | Execute Discrete,Plus 1831 e5fb | | Load 0x2,-0x5 1832 01db | | Execute Vector,Length 1833 0273 | s | Execute Discrete,Plus 1834 00e2 | | Load_Encached Integer_Cache 1835 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1836 e5fa | | Load 0x2,-0x6 1837 01db | | Execute Vector,Length 1838 e5f9 | | Load 0x2,-0x7 1839 01db | | Execute Vector,Length 183a 0273 | s | Execute Discrete,Plus 183b e5f8 | | Load 0x2,-0x8 183c 01db | | Execute Vector,Length 183d 0273 | s | Execute Discrete,Plus 183e e5f7 | | Load 0x2,-0x9 183f 01db | | Execute Vector,Length 1840 0273 | s | Execute Discrete,Plus 1841 e5f6 | | Load 0x2,-0xa 1842 01db | | Execute Vector,Length 1843 0273 | s | Execute Discrete,Plus 1844 e5f5 | | Load 0x2,-0xb 1845 01db | | Execute Vector,Length 1846 0273 | s | Execute Discrete,Plus 1847 00e2 | | Load_Encached Integer_Cache 1848 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1849 e5f4 | | Load 0x2,-0xc 184a 01db | | Execute Vector,Length 184b e5f3 | | Load 0x2,-0xd 184c 01db | | Execute Vector,Length 184d 0273 | s | Execute Discrete,Plus 184e e5f2 | | Load 0x2,-0xe 184f 01db | | Execute Vector,Length 1850 0273 | s | Execute Discrete,Plus 1851 e5f1 | | Load 0x2,-0xf 1852 01db | | Execute Vector,Length 1853 0273 | s | Execute Discrete,Plus 1854 e5f0 | | Load 0x2,-0x10 1855 01db | | Execute Vector,Length 1856 0273 | s | Execute Discrete,Plus 1857 e5ef | | Load 0x2,-0x11 1858 01db | | Execute Vector,Length 1859 0273 | s | Execute Discrete,Plus 185a 00e2 | | Load_Encached Integer_Cache 185b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 185c e5ee | | Load 0x2,-0x12 185d 01db | | Execute Vector,Length 185e e5ed | | Load 0x2,-0x13 185f 01db | | Execute Vector,Length 1860 0273 | s | Execute Discrete,Plus 1861 e5ec | | Load 0x2,-0x14 1862 01db | | Execute Vector,Length 1863 0273 | s | Execute Discrete,Plus 1864 e5eb | | Load 0x2,-0x15 1865 01db | | Execute Vector,Length 1866 0273 | s | Execute Discrete,Plus 1867 e5ea | | Load 0x2,-0x16 1868 01db | | Execute Vector,Length 1869 0273 | s | Execute Discrete,Plus 186a 00e2 | | Load_Encached Integer_Cache 186b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 186c e402 | | Load 0x2,0x2 186d e403 | | Load 0x2,0x3 186e 0273 | s | Execute Discrete,Plus 186f e404 | | Load 0x2,0x4 1870 0273 | s | Execute Discrete,Plus 1871 e405 | | Load 0x2,0x5 1872 0273 | s | Execute Discrete,Plus 1873 00e2 | | Load_Encached Integer_Cache 1874 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1875 00e2 | | Load_Encached Integer_Cache 1876 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1877 4801 |H | Short_Literal 0x1 1878 e406 | | Load 0x2,0x6 1879 00e9 | | Load_Encached String_Cache 187a 035b | [ | Declare_Type Array,Constrained 187b 0337 | 7 | Declare_Variable Array 187c BODY_1820: 187c e407 | | Load 0x2,0x7 187d e408 | | Load 0x2,0x8 187e e5fe | | Load 0x2,-0x2 187f e5ff | | Load 0x2,-0x1 1880 8221 | ! | Call 0x1,0x21 1881 00d1 | | Pop_Control Pop_Count_1 1882 c407 | | Store 0x2,0x7 1883 e407 | | Load 0x2,0x7 1884 e408 | | Load 0x2,0x8 1885 e5f4 | | Load 0x2,-0xc 1886 e5f5 | | Load 0x2,-0xb 1887 e5f6 | | Load 0x2,-0xa 1888 e5f7 | | Load 0x2,-0x9 1889 e5f8 | | Load 0x2,-0x8 188a e5f9 | | Load 0x2,-0x7 188b e5fa | | Load 0x2,-0x6 188c e5fb | | Load 0x2,-0x5 188d e5fc | | Load 0x2,-0x4 188e e5fd | | Load 0x2,-0x3 188f 8227 | ' | Call 0x1,0x27 1890 00d1 | | Pop_Control Pop_Count_1 1891 c407 | | Store 0x2,0x7 1892 e407 | | Load 0x2,0x7 1893 e408 | | Load 0x2,0x8 1894 e5ec | | Load 0x2,-0x14 1895 e5ed | | Load 0x2,-0x13 1896 e5ee | | Load 0x2,-0x12 1897 e5ef | | Load 0x2,-0x11 1898 e5f0 | | Load 0x2,-0x10 1899 e5f1 | | Load 0x2,-0xf 189a e5f2 | | Load 0x2,-0xe 189b e5f3 | | Load 0x2,-0xd 189c 8226 | & | Call 0x1,0x26 189d 00d1 | | Pop_Control Pop_Count_1 189e c407 | | Store 0x2,0x7 189f e407 | | Load 0x2,0x7 18a0 e408 | | Load 0x2,0x8 18a1 e5ea | | Load 0x2,-0x16 18a2 e5eb | | Load 0x2,-0x15 18a3 8222 | " | Call 0x1,0x22 18a4 00d1 | | Pop_Control Pop_Count_1 18a5 c407 | | Store 0x2,0x7 18a6 e407 | | Load 0x2,0x7 18a7 e408 | | Load 0x2,0x8 18a8 01dc | | Execute Vector,Last 18a9 0a01 | | Execute_Immediate Plus,0x1 18aa 027f | | Execute Discrete,Equal 18ab 7001 |p | Jump_Nonzero 0x18ad 18ac 0887 | | Execute_Immediate Raise,0x87 18ad 00d8 | | Load_Top At_Offset_0 18ae 00e9 | | Load_Encached String_Cache 18af 01c6 | | Execute Vector,Convert_To_Formal 18b0 4416 |D | Exit_Subprogram With_Value,New_Top_Offset 0x16 18b1 0000 0000 | | .BLANK 0000[0x7] 18b8 ; -------------------------------------------------------------------------------------- 18b8 ; SUBPROGRAM 18b8 ; -------------------------------------------------------------------------------------- 18b8 18e3 | | .CONST 0x18e3 ; Address of begin 18b9 0004 | | .CONST 0x0004 ; Address of exception handler 18ba 000b | | .CONST 0x000b ; Number of locals 18bb INIT_18b8: 18bb 00e5 | | Load_Encached Long_Integer_Cache 18bc 02a0 | | Declare_Subprogram Null_Subprogram 18bd 4801 |H | Short_Literal 0x1 18be 032d | - | Declare_Type Record,Defined 18bf 00d8 | | Load_Top At_Offset_0 18c0 0322 | " | Declare_Variable Record 18c1 e5ff | | Load 0x2,-0x1 18c2 e403 | | Load 0x2,0x3 18c3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 18c4 e001 | | Load 0x0,0x1 18c5 00d8 | | Load_Top At_Offset_0 18c6 02a0 | | Declare_Subprogram Null_Subprogram 18c7 4802 |H | Short_Literal 0x2 18c8 032d | - | Declare_Type Record,Defined 18c9 a002 | | Store_Unchecked 0x0,0x2 18ca 00c6 | | Action Check_Subprogram_Elaborated 18cb 00d8 | | Load_Top At_Offset_0 18cc 0093 0000 | | push_full_address 0x0 18ce 6019 |` | Indirect_Literal Discrete,0x18e8,{0x80000000, 0x00240000} 18cf 0273 | s | Execute Discrete,Plus 18d0 e003 | | Load 0x0,0x3 18d1 0273 | s | Execute Discrete,Plus 18d2 e004 | | Load 0x0,0x4 18d3 0273 | s | Execute Discrete,Plus 18d4 4807 |H | Short_Literal 0x7 18d5 0007 | | Action Break_Optional 18d6 e403 | | Load 0x2,0x3 18d7 012d | - | Execute Any,Address 18d8 e405 | | Load 0x2,0x5 18d9 4806 |H | Short_Literal 0x6 18da 4802 |H | Short_Literal 0x2 18db 0099 | | Action Reference_Dynamic 18dc 8002 | | Call 0x0,0x2 18dd 029f 1a93 | | Declare_Subprogram INIT_1a90,For_Call 18df 029f 1aa3 | | Declare_Subprogram INIT_1aa0,For_Call 18e1 029f 1ab3 | | Declare_Subprogram INIT_1ab0,For_Call 18e3 BODY_18b8: 18e3 840b | | Call 0x2,0xb 18e4 e005 | | Load 0x0,0x5 18e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 18e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 18e7 0000 | | .XXX[0x1] 18e8 8000 0000 | | .LITERAL {0x80000000, 0x00240000} 18ec 0000 0000 | | .BLANK 0000[0x4] 18f0 ; -------------------------------------------------------------------------------------- 18f0 ; SUBPROGRAM 18f0 ; -------------------------------------------------------------------------------------- 18f0 18f3 | | .CONST 0x18f3 ; Address of begin 18f1 0004 | | .CONST 0x0004 ; Address of exception handler 18f2 0001 | | .CONST 0x0001 ; Number of locals 18f3 BODY_18f0: 18f3 INIT_18f0: 18f3 e5ff | | Load 0x2,-0x1 18f4 6803 |h | Jump_Zero 0x18f8 18f5 0092 1ccc | | Action Push_String_Extended,0x1ccc ; "T" 18f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 18f8 0092 1ccd | | Action Push_String_Extended,0x1ccd ; "F" 18fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 18fb 0000 0000 | | .BLANK 0000[0x5] 1900 ; -------------------------------------------------------------------------------------- 1900 ; SUBPROGRAM 1900 ; -------------------------------------------------------------------------------------- 1900 1903 | | .CONST 0x1903 ; Address of begin 1901 0004 | | .CONST 0x0004 ; Address of exception handler 1902 0001 | | .CONST 0x0001 ; Number of locals 1903 BODY_1900: 1903 INIT_1900: 1903 e5ff | | Load 0x2,-0x1 1904 00e0 | | Load_Encached Standard_Cache 1905 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1906 8229 | ) | Call 0x1,0x29 1907 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1908 ; -------------------------------------------------------------------------------------- 1908 ; SUBPROGRAM 1908 ; -------------------------------------------------------------------------------------- 1908 190b | | .CONST 0x190b ; Address of begin 1909 0004 | | .CONST 0x0004 ; Address of exception handler 190a 0001 | | .CONST 0x0001 ; Number of locals 190b BODY_1908: 190b INIT_1908: 190b e5ff | | Load 0x2,-0x1 190c 00e0 | | Load_Encached Standard_Cache 190d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 190e 8229 | ) | Call 0x1,0x29 190f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1910 ; -------------------------------------------------------------------------------------- 1910 ; SUBPROGRAM 1910 ; -------------------------------------------------------------------------------------- 1910 191c | | .CONST 0x191c ; Address of begin 1911 0004 | | .CONST 0x0004 ; Address of exception handler 1912 0005 | | .CONST 0x0005 ; Number of locals 1913 INIT_1910: 1913 029f 1acb | | Declare_Subprogram INIT_1ac8,For_Call 1915 029f 1ae3 | | Declare_Subprogram INIT_1ae0,For_Call 1917 4900 |I | Short_Literal 0x100 1918 00e3 | | Load_Encached Natural_Cache 1919 03f1 | | Declare_Variable Discrete,With_Value 191a 029f 1b5b | [| Declare_Subprogram INIT_1b58,For_Call 191c BODY_1910: 191c e5f9 | | Load 0x2,-0x7 191d 01db | | Execute Vector,Length 191e 7003 |p | Jump_Nonzero 0x1922 191f 0092 1cce | | Action Push_String_Extended,0x1cce ; "{}" 1921 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 1922 00cf | | Action Mark_Auxiliary 1923 480c |H | Short_Literal 0xc 1924 4801 |H | Short_Literal 0x1 1925 0007 | | Action Break_Optional 1926 8405 | | Call 0x2,0x5 1927 00c8 | | Action Pop_Auxiliary_Range 1928 3ffd |? | Loop_Increasing 0x1926 1929 00ce | | Action Pop_Auxiliary 192a 0092 1ccf | | Action Push_String_Extended,0x1ccf ; "***too_big_to_print" 192c 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 192d 0000 0000 | | .XXX[0x3] 192f 0000 | | 1930 ; -------------------------------------------------------------------------------------- 1930 ; SUBPROGRAM 1930 ; -------------------------------------------------------------------------------------- 1930 193a | : | .CONST 0x193a ; Address of begin 1931 0004 | | .CONST 0x0004 ; Address of exception handler 1932 0002 | | .CONST 0x0002 ; Number of locals 1933 INIT_1930: 1933 e5fd | | Load 0x2,-0x3 1934 e5ff | | Load 0x2,-0x1 1935 01db | | Execute Vector,Length 1936 0273 | s | Execute Discrete,Plus 1937 0aff | | Execute_Immediate Plus,-0x1 1938 00e2 | | Load_Encached Integer_Cache 1939 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 193a BODY_1930: 193a e5ff | | Load 0x2,-0x1 193b e5fd | | Load 0x2,-0x3 193c e402 | | Load 0x2,0x2 193d e5fe | | Load 0x2,-0x2 193e 01ce | | Execute Vector,Slice_Write 193f 00d8 | | Load_Top At_Offset_0 1940 0a01 | | Execute_Immediate Plus,0x1 1941 c5fd | | Store 0x2,-0x3 1942 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1943 0000 0000 | | .BLANK 0000[0x5] 1948 ; -------------------------------------------------------------------------------------- 1948 ; SUBPROGRAM 1948 ; -------------------------------------------------------------------------------------- 1948 194b | K | .CONST 0x194b ; Address of begin 1949 0004 | | .CONST 0x0004 ; Address of exception handler 194a 0001 | | .CONST 0x0001 ; Number of locals 194b BODY_1948: 194b INIT_1948: 194b e5fc | | Load 0x2,-0x4 194c e5fd | | Load 0x2,-0x3 194d e21b | | Load 0x1,0x1b 194e 8220 | | Call 0x1,0x20 194f 00d1 | | Pop_Control Pop_Count_1 1950 c5fc | | Store 0x2,-0x4 1951 e5fc | | Load 0x2,-0x4 1952 e5fd | | Load 0x2,-0x3 1953 e5ff | | Load 0x2,-0x1 1954 8220 | | Call 0x1,0x20 1955 00d1 | | Pop_Control Pop_Count_1 1956 c5fc | | Store 0x2,-0x4 1957 e5fc | | Load 0x2,-0x4 1958 e5fd | | Load 0x2,-0x3 1959 e21f | | Load 0x1,0x1f 195a 8220 | | Call 0x1,0x20 195b 00d1 | | Pop_Control Pop_Count_1 195c c5fc | | Store 0x2,-0x4 195d e5fc | | Load 0x2,-0x4 195e e5fd | | Load 0x2,-0x3 195f e5fe | | Load 0x2,-0x2 1960 8220 | | Call 0x1,0x20 1961 00d1 | | Pop_Control Pop_Count_1 1962 c5fc | | Store 0x2,-0x4 1963 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1964 0000 0000 | | .BLANK 0000[0x4] 1968 ; -------------------------------------------------------------------------------------- 1968 ; SUBPROGRAM 1968 ; -------------------------------------------------------------------------------------- 1968 196b | k | .CONST 0x196b ; Address of begin 1969 0004 | | .CONST 0x0004 ; Address of exception handler 196a 0001 | | .CONST 0x0001 ; Number of locals 196b BODY_1968: 196b INIT_1968: 196b e5fc | | Load 0x2,-0x4 196c e5fd | | Load 0x2,-0x3 196d e21d | | Load 0x1,0x1d 196e 8220 | | Call 0x1,0x20 196f 00d1 | | Pop_Control Pop_Count_1 1970 c5fc | | Store 0x2,-0x4 1971 e5fc | | Load 0x2,-0x4 1972 e5fd | | Load 0x2,-0x3 1973 e5ff | | Load 0x2,-0x1 1974 8220 | | Call 0x1,0x20 1975 00d1 | | Pop_Control Pop_Count_1 1976 c5fc | | Store 0x2,-0x4 1977 e5fc | | Load 0x2,-0x4 1978 e5fd | | Load 0x2,-0x3 1979 e21f | | Load 0x1,0x1f 197a 8220 | | Call 0x1,0x20 197b 00d1 | | Pop_Control Pop_Count_1 197c c5fc | | Store 0x2,-0x4 197d e5fc | | Load 0x2,-0x4 197e e5fd | | Load 0x2,-0x3 197f e5fe | | Load 0x2,-0x2 1980 8220 | | Call 0x1,0x20 1981 00d1 | | Pop_Control Pop_Count_1 1982 c5fc | | Store 0x2,-0x4 1983 e5fc | | Load 0x2,-0x4 1984 e5fd | | Load 0x2,-0x3 1985 e21c | | Load 0x1,0x1c 1986 8220 | | Call 0x1,0x20 1987 00d1 | | Pop_Control Pop_Count_1 1988 c5fc | | Store 0x2,-0x4 1989 4503 |E | Exit_Suprogram New_Top_Offset 0x3 198a 0000 0000 | | .BLANK 0000[0x6] 1990 ; -------------------------------------------------------------------------------------- 1990 ; SUBPROGRAM 1990 ; -------------------------------------------------------------------------------------- 1990 1993 | | .CONST 0x1993 ; Address of begin 1991 0004 | | .CONST 0x0004 ; Address of exception handler 1992 0001 | | .CONST 0x0001 ; Number of locals 1993 BODY_1990: 1993 INIT_1990: 1993 e5fc | | Load 0x2,-0x4 1994 e5fd | | Load 0x2,-0x3 1995 e21d | | Load 0x1,0x1d 1996 8220 | | Call 0x1,0x20 1997 00d1 | | Pop_Control Pop_Count_1 1998 c5fc | | Store 0x2,-0x4 1999 e5fc | | Load 0x2,-0x4 199a e5fd | | Load 0x2,-0x3 199b e5ff | | Load 0x2,-0x1 199c 8220 | | Call 0x1,0x20 199d 00d1 | | Pop_Control Pop_Count_1 199e c5fc | | Store 0x2,-0x4 199f e5fc | | Load 0x2,-0x4 19a0 e5fd | | Load 0x2,-0x3 19a1 e21f | | Load 0x1,0x1f 19a2 8220 | | Call 0x1,0x20 19a3 00d1 | | Pop_Control Pop_Count_1 19a4 c5fc | | Store 0x2,-0x4 19a5 e5fc | | Load 0x2,-0x4 19a6 e5fd | | Load 0x2,-0x3 19a7 e5fe | | Load 0x2,-0x2 19a8 8220 | | Call 0x1,0x20 19a9 00d1 | | Pop_Control Pop_Count_1 19aa c5fc | | Store 0x2,-0x4 19ab 4503 |E | Exit_Suprogram New_Top_Offset 0x3 19ac 0000 0000 | | .BLANK 0000[0x4] 19b0 ; -------------------------------------------------------------------------------------- 19b0 ; SUBPROGRAM 19b0 ; -------------------------------------------------------------------------------------- 19b0 19b3 | | .CONST 0x19b3 ; Address of begin 19b1 0004 | | .CONST 0x0004 ; Address of exception handler 19b2 0001 | | .CONST 0x0001 ; Number of locals 19b3 BODY_19b0: 19b3 INIT_19b0: 19b3 e5fa | | Load 0x2,-0x6 19b4 e5fb | | Load 0x2,-0x5 19b5 e5fe | | Load 0x2,-0x2 19b6 e5ff | | Load 0x2,-0x1 19b7 8223 | # | Call 0x1,0x23 19b8 00d1 | | Pop_Control Pop_Count_1 19b9 c5fa | | Store 0x2,-0x6 19ba e5fa | | Load 0x2,-0x6 19bb e5fb | | Load 0x2,-0x5 19bc e21d | | Load 0x1,0x1d 19bd 8220 | | Call 0x1,0x20 19be 00d1 | | Pop_Control Pop_Count_1 19bf c5fa | | Store 0x2,-0x6 19c0 e5fa | | Load 0x2,-0x6 19c1 e5fb | | Load 0x2,-0x5 19c2 e5fd | | Load 0x2,-0x3 19c3 8220 | | Call 0x1,0x20 19c4 00d1 | | Pop_Control Pop_Count_1 19c5 c5fa | | Store 0x2,-0x6 19c6 e5fa | | Load 0x2,-0x6 19c7 e5fb | | Load 0x2,-0x5 19c8 e21f | | Load 0x1,0x1f 19c9 8220 | | Call 0x1,0x20 19ca 00d1 | | Pop_Control Pop_Count_1 19cb c5fa | | Store 0x2,-0x6 19cc e5fa | | Load 0x2,-0x6 19cd e5fb | | Load 0x2,-0x5 19ce e5fc | | Load 0x2,-0x4 19cf 8220 | | Call 0x1,0x20 19d0 00d1 | | Pop_Control Pop_Count_1 19d1 c5fa | | Store 0x2,-0x6 19d2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 19d3 0000 0000 | | .BLANK 0000[0x5] 19d8 ; -------------------------------------------------------------------------------------- 19d8 ; SUBPROGRAM 19d8 ; -------------------------------------------------------------------------------------- 19d8 19db | | .CONST 0x19db ; Address of begin 19d9 0004 | | .CONST 0x0004 ; Address of exception handler 19da 0001 | | .CONST 0x0001 ; Number of locals 19db BODY_19d8: 19db INIT_19d8: 19db e5f8 | | Load 0x2,-0x8 19dc e5f9 | | Load 0x2,-0x7 19dd e5fc | | Load 0x2,-0x4 19de e5fd | | Load 0x2,-0x3 19df e5fe | | Load 0x2,-0x2 19e0 e5ff | | Load 0x2,-0x1 19e1 8224 | $ | Call 0x1,0x24 19e2 00d1 | | Pop_Control Pop_Count_1 19e3 c5f8 | | Store 0x2,-0x8 19e4 e5f8 | | Load 0x2,-0x8 19e5 e5f9 | | Load 0x2,-0x7 19e6 e21d | | Load 0x1,0x1d 19e7 8220 | | Call 0x1,0x20 19e8 00d1 | | Pop_Control Pop_Count_1 19e9 c5f8 | | Store 0x2,-0x8 19ea e5f8 | | Load 0x2,-0x8 19eb e5f9 | | Load 0x2,-0x7 19ec e5fb | | Load 0x2,-0x5 19ed 8220 | | Call 0x1,0x20 19ee 00d1 | | Pop_Control Pop_Count_1 19ef c5f8 | | Store 0x2,-0x8 19f0 e5f8 | | Load 0x2,-0x8 19f1 e5f9 | | Load 0x2,-0x7 19f2 e21f | | Load 0x1,0x1f 19f3 8220 | | Call 0x1,0x20 19f4 00d1 | | Pop_Control Pop_Count_1 19f5 c5f8 | | Store 0x2,-0x8 19f6 e5f8 | | Load 0x2,-0x8 19f7 e5f9 | | Load 0x2,-0x7 19f8 e5fa | | Load 0x2,-0x6 19f9 8220 | | Call 0x1,0x20 19fa 00d1 | | Pop_Control Pop_Count_1 19fb c5f8 | | Store 0x2,-0x8 19fc 4507 |E | Exit_Suprogram New_Top_Offset 0x7 19fd 0000 0000 | | .XXX[0x3] 19ff 0000 | | 1a00 ; -------------------------------------------------------------------------------------- 1a00 ; SUBPROGRAM 1a00 ; -------------------------------------------------------------------------------------- 1a00 1a03 | | .CONST 0x1a03 ; Address of begin 1a01 0004 | | .CONST 0x0004 ; Address of exception handler 1a02 0001 | | .CONST 0x0001 ; Number of locals 1a03 BODY_1a00: 1a03 INIT_1a00: 1a03 e5f6 | | Load 0x2,-0xa 1a04 e5f7 | | Load 0x2,-0x9 1a05 e5fa | | Load 0x2,-0x6 1a06 e5fb | | Load 0x2,-0x5 1a07 e5fc | | Load 0x2,-0x4 1a08 e5fd | | Load 0x2,-0x3 1a09 e5fe | | Load 0x2,-0x2 1a0a e5ff | | Load 0x2,-0x1 1a0b 8225 | % | Call 0x1,0x25 1a0c 00d1 | | Pop_Control Pop_Count_1 1a0d c5f6 | | Store 0x2,-0xa 1a0e e5f6 | | Load 0x2,-0xa 1a0f e5f7 | | Load 0x2,-0x9 1a10 e21d | | Load 0x1,0x1d 1a11 8220 | | Call 0x1,0x20 1a12 00d1 | | Pop_Control Pop_Count_1 1a13 c5f6 | | Store 0x2,-0xa 1a14 e5f6 | | Load 0x2,-0xa 1a15 e5f7 | | Load 0x2,-0x9 1a16 e5f9 | | Load 0x2,-0x7 1a17 8220 | | Call 0x1,0x20 1a18 00d1 | | Pop_Control Pop_Count_1 1a19 c5f6 | | Store 0x2,-0xa 1a1a e5f6 | | Load 0x2,-0xa 1a1b e5f7 | | Load 0x2,-0x9 1a1c e21f | | Load 0x1,0x1f 1a1d 8220 | | Call 0x1,0x20 1a1e 00d1 | | Pop_Control Pop_Count_1 1a1f c5f6 | | Store 0x2,-0xa 1a20 e5f6 | | Load 0x2,-0xa 1a21 e5f7 | | Load 0x2,-0x9 1a22 e5f8 | | Load 0x2,-0x8 1a23 8220 | | Call 0x1,0x20 1a24 00d1 | | Pop_Control Pop_Count_1 1a25 c5f6 | | Store 0x2,-0xa 1a26 4509 |E | Exit_Suprogram New_Top_Offset 0x9 1a27 0000 | | .XXX[0x1] 1a28 ; -------------------------------------------------------------------------------------- 1a28 ; SUBPROGRAM 1a28 ; -------------------------------------------------------------------------------------- 1a28 1a2b | + | .CONST 0x1a2b ; Address of begin 1a29 0004 | | .CONST 0x0004 ; Address of exception handler 1a2a 0001 | | .CONST 0x0001 ; Number of locals 1a2b BODY_1a28: 1a2b INIT_1a28: 1a2b e5f4 | | Load 0x2,-0xc 1a2c e5f5 | | Load 0x2,-0xb 1a2d e5f8 | | Load 0x2,-0x8 1a2e e5f9 | | Load 0x2,-0x7 1a2f e5fa | | Load 0x2,-0x6 1a30 e5fb | | Load 0x2,-0x5 1a31 e5fc | | Load 0x2,-0x4 1a32 e5fd | | Load 0x2,-0x3 1a33 e5fe | | Load 0x2,-0x2 1a34 e5ff | | Load 0x2,-0x1 1a35 8226 | & | Call 0x1,0x26 1a36 00d1 | | Pop_Control Pop_Count_1 1a37 c5f4 | | Store 0x2,-0xc 1a38 e5f4 | | Load 0x2,-0xc 1a39 e5f5 | | Load 0x2,-0xb 1a3a e21d | | Load 0x1,0x1d 1a3b 8220 | | Call 0x1,0x20 1a3c 00d1 | | Pop_Control Pop_Count_1 1a3d c5f4 | | Store 0x2,-0xc 1a3e e5f4 | | Load 0x2,-0xc 1a3f e5f5 | | Load 0x2,-0xb 1a40 e5f7 | | Load 0x2,-0x9 1a41 8220 | | Call 0x1,0x20 1a42 00d1 | | Pop_Control Pop_Count_1 1a43 c5f4 | | Store 0x2,-0xc 1a44 e5f4 | | Load 0x2,-0xc 1a45 e5f5 | | Load 0x2,-0xb 1a46 e21f | | Load 0x1,0x1f 1a47 8220 | | Call 0x1,0x20 1a48 00d1 | | Pop_Control Pop_Count_1 1a49 c5f4 | | Store 0x2,-0xc 1a4a e5f4 | | Load 0x2,-0xc 1a4b e5f5 | | Load 0x2,-0xb 1a4c e5f6 | | Load 0x2,-0xa 1a4d 8220 | | Call 0x1,0x20 1a4e 00d1 | | Pop_Control Pop_Count_1 1a4f c5f4 | | Store 0x2,-0xc 1a50 450b |E | Exit_Suprogram New_Top_Offset 0xb 1a51 0000 0000 | | .BLANK 0000[0x7] 1a58 ; -------------------------------------------------------------------------------------- 1a58 ; SUBPROGRAM 1a58 ; -------------------------------------------------------------------------------------- 1a58 1a5b | [ | .CONST 0x1a5b ; Address of begin 1a59 0004 | | .CONST 0x0004 ; Address of exception handler 1a5a 0001 | | .CONST 0x0001 ; Number of locals 1a5b BODY_1a58: 1a5b INIT_1a58: 1a5b e5ff | | Load 0x2,-0x1 1a5c 0902 | | Execute_Immediate Binary_Scale,0x2 1a5d 0a01 | | Execute_Immediate Plus,0x1 1a5e e5ff | | Load 0x2,-0x1 1a5f 0aff | | Execute_Immediate Plus,-0x1 1a60 0901 | | Execute_Immediate Binary_Scale,0x1 1a61 0273 | s | Execute Discrete,Plus 1a62 0a01 | | Execute_Immediate Plus,0x1 1a63 00d8 | | Load_Top At_Offset_0 1a64 00e2 | | Load_Encached Integer_Cache 1a65 0260 | ` | Execute Discrete,In_Type 1a66 7001 |p | Jump_Nonzero 0x1a68 1a67 0801 | | Execute_Immediate Raise,0x1 1a68 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1a69 0000 0000 | | .BLANK 0000[0x7] 1a70 ; -------------------------------------------------------------------------------------- 1a70 ; SUBPROGRAM 1a70 ; -------------------------------------------------------------------------------------- 1a70 1a73 | s | .CONST 0x1a73 ; Address of begin 1a71 0004 | | .CONST 0x0004 ; Address of exception handler 1a72 0001 | | .CONST 0x0001 ; Number of locals 1a73 BODY_1a70: 1a73 INIT_1a70: 1a73 4820 |H | Short_Literal 0x20 1a74 e5ff | | Load 0x2,-0x1 1a75 e005 | | Load 0x0,0x5 1a76 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1a77 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1a78 ; -------------------------------------------------------------------------------------- 1a78 ; SUBPROGRAM 1a78 ; -------------------------------------------------------------------------------------- 1a78 1a7b | { | .CONST 0x1a7b ; Address of begin 1a79 0004 | | .CONST 0x0004 ; Address of exception handler 1a7a 0001 | | .CONST 0x0001 ; Number of locals 1a7b BODY_1a78: 1a7b INIT_1a78: 1a7b e5fe | | Load 0x2,-0x2 1a7c e006 | | Load 0x0,0x6 1a7d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 1a7e e5ff | | Load 0x2,-0x1 1a7f 01db | | Execute Vector,Length 1a80 0273 | s | Execute Discrete,Plus 1a81 e5fe | | Load 0x2,-0x2 1a82 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 1a83 027d | } | Execute Discrete,Greater 1a84 6802 |h | Jump_Zero 0x1a87 1a85 e22a | * | Load 0x1,0x2a 1a86 0257 | W | Execute Discrete,Raise 1a87 e5fe | | Load 0x2,-0x2 1a88 e5ff | | Load 0x2,-0x1 1a89 e006 | | Load 0x0,0x6 1a8a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1a8b 00d1 | | Pop_Control Pop_Count_1 1a8c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1a8d 0000 0000 | | .XXX[0x3] 1a8f 0000 | | 1a90 ; -------------------------------------------------------------------------------------- 1a90 ; SUBPROGRAM 1a90 ; -------------------------------------------------------------------------------------- 1a90 1a93 | | .CONST 0x1a93 ; Address of begin 1a91 0004 | | .CONST 0x0004 ; Address of exception handler 1a92 0001 | | .CONST 0x0001 ; Number of locals 1a93 BODY_1a90: 1a93 INIT_1a90: 1a93 4820 |H | Short_Literal 0x20 1a94 4800 |H | Short_Literal 0x0 1a95 4810 |H | Short_Literal 0x10 1a96 e7ff | | Load 0x3,-0x1 1a97 e005 | | Load 0x0,0x5 1a98 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1a99 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1a9a 0000 0000 | | .BLANK 0000[0x6] 1aa0 ; -------------------------------------------------------------------------------------- 1aa0 ; SUBPROGRAM 1aa0 ; -------------------------------------------------------------------------------------- 1aa0 1aa3 | | .CONST 0x1aa3 ; Address of begin 1aa1 0004 | | .CONST 0x0004 ; Address of exception handler 1aa2 0001 | | .CONST 0x0001 ; Number of locals 1aa3 BODY_1aa0: 1aa3 INIT_1aa0: 1aa3 4830 |H0 | Short_Literal 0x30 1aa4 4808 |H | Short_Literal 0x8 1aa5 4810 |H | Short_Literal 0x10 1aa6 e7ff | | Load 0x3,-0x1 1aa7 e005 | | Load 0x0,0x5 1aa8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1aa9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1aaa 0000 0000 | | .BLANK 0000[0x6] 1ab0 ; -------------------------------------------------------------------------------------- 1ab0 ; SUBPROGRAM 1ab0 ; -------------------------------------------------------------------------------------- 1ab0 1ab3 | | .CONST 0x1ab3 ; Address of begin 1ab1 0004 | | .CONST 0x0004 ; Address of exception handler 1ab2 0001 | | .CONST 0x0001 ; Number of locals 1ab3 BODY_1ab0: 1ab3 INIT_1ab0: 1ab3 e408 | | Load 0x2,0x8 1ab4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1ab5 7007 |p | Jump_Nonzero 0x1abd 1ab6 0092 1cd0 | | Action Push_String_Extended,0x1cd0 ; "#" 1ab8 e408 | | Load 0x2,0x8 1ab9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1aba 8409 | | Call 0x2,0x9 1abb 01cc | | Execute Vector,Catenate 1abc 00ca | | Action Exit_Nullary_Function 1abd 0092 1cd0 | | Action Push_String_Extended,0x1cd0 ; "#" 1abf e408 | | Load 0x2,0x8 1ac0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1ac1 8409 | | Call 0x2,0x9 1ac2 01cc | | Execute Vector,Catenate 1ac3 e408 | | Load 0x2,0x8 1ac4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1ac5 840a | | Call 0x2,0xa 1ac6 01cc | | Execute Vector,Catenate 1ac7 00ca | | Action Exit_Nullary_Function 1ac8 ; -------------------------------------------------------------------------------------- 1ac8 ; SUBPROGRAM 1ac8 ; -------------------------------------------------------------------------------------- 1ac8 1acb | | .CONST 0x1acb ; Address of begin 1ac9 0004 | | .CONST 0x0004 ; Address of exception handler 1aca 0001 | | .CONST 0x0001 ; Number of locals 1acb BODY_1ac8: 1acb INIT_1ac8: 1acb e7ff | | Load 0x3,-0x1 1acc e7fe | | Load 0x3,-0x2 1acd 027f | | Execute Discrete,Equal 1ace 6804 |h | Jump_Zero 0x1ad3 1acf e7ff | | Load 0x3,-0x1 1ad0 85fe | | Call 0x2,-0x2 1ad1 8229 | ) | Call 0x1,0x29 1ad2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1ad3 e7ff | | Load 0x3,-0x1 1ad4 85fe | | Call 0x2,-0x2 1ad5 8229 | ) | Call 0x1,0x29 1ad6 0092 1cd1 | | Action Push_String_Extended,0x1cd1 ; ".." 1ad8 01cc | | Execute Vector,Catenate 1ad9 e7fe | | Load 0x3,-0x2 1ada 85fe | | Call 0x2,-0x2 1adb 8229 | ) | Call 0x1,0x29 1adc 01cc | | Execute Vector,Catenate 1add 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1ade 0000 0000 | | .XXX[0x2] 1ae0 ; -------------------------------------------------------------------------------------- 1ae0 ; SUBPROGRAM 1ae0 ; -------------------------------------------------------------------------------------- 1ae0 1aeb | | .CONST 0x1aeb ; Address of begin 1ae1 0004 | | .CONST 0x0004 ; Address of exception handler 1ae2 0004 | | .CONST 0x0004 ; Number of locals 1ae3 INIT_1ae0: 1ae3 00e1 | | Load_Encached Boolean_Cache 1ae4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1ae5 e5f9 | | Load 0x2,-0x7 1ae6 01dd | | Execute Vector,First 1ae7 e5fa | | Load 0x2,-0x6 1ae8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1ae9 e5fa | | Load 0x2,-0x6 1aea 0007 | | Action Break_Optional 1aeb BODY_1ae0: 1aeb e7ff | | Load 0x3,-0x1 1aec 0092 1cd2 | | Action Push_String_Extended,0x1cd2 ; "{" 1aee 822b | + | Call 0x1,0x2b 1aef 00d1 | | Pop_Control Pop_Count_1 1af0 00cf | | Action Mark_Auxiliary 1af1 00cf | | Action Mark_Auxiliary 1af2 e603 | | Load 0x3,0x3 1af3 e5fa | | Load 0x2,-0x6 1af4 1c04 | | Execute_Immediate Run_Utility,0x4 1af5 e5f9 | | Load 0x2,-0x7 1af6 01d7 | | Execute Vector,Field_Read 1af7 85fd | | Call 0x2,-0x3 1af8 680e |h | Jump_Zero 0x1b07 1af9 e603 | | Load 0x3,0x3 1afa e5f9 | | Load 0x2,-0x7 1afb 01dc | | Execute Vector,Last 1afc 027b | { | Execute Discrete,Greater_Equal 1afd 6802 |h | Jump_Zero 0x1b00 1afe 00ce | | Action Pop_Auxiliary 1aff 7852 |xR | Jump 0x1b52 1b00 e603 | | Load 0x3,0x3 1b01 e5fa | | Load 0x2,-0x6 1b02 0122 | " | Execute Any,Make_Root_Type 1b03 1c07 | | Execute_Immediate Run_Utility,0x7 1b04 c603 | | Store 0x3,0x3 1b05 00c9 | | Action Pop_Auxiliary_Loop 1b06 7feb | | Jump 0x1af2 1b07 00ce | | Action Pop_Auxiliary 1b08 e603 | | Load 0x3,0x3 1b09 c604 | | Store 0x3,0x4 1b0a 00cf | | Action Mark_Auxiliary 1b0b e604 | | Load 0x3,0x4 1b0c e5f9 | | Load 0x2,-0x7 1b0d 01dc | | Execute Vector,Last 1b0e 027f | | Execute Discrete,Equal 1b0f 7011 |p | Jump_Nonzero 0x1b21 1b10 e604 | | Load 0x3,0x4 1b11 e5fa | | Load 0x2,-0x6 1b12 0122 | " | Execute Any,Make_Root_Type 1b13 1c07 | | Execute_Immediate Run_Utility,0x7 1b14 e5fa | | Load 0x2,-0x6 1b15 1c04 | | Execute_Immediate Run_Utility,0x4 1b16 e5f9 | | Load 0x2,-0x7 1b17 01d7 | | Execute Vector,Field_Read 1b18 85fd | | Call 0x2,-0x3 1b19 7007 |p | Jump_Nonzero 0x1b21 1b1a e604 | | Load 0x3,0x4 1b1b e5fa | | Load 0x2,-0x6 1b1c 0122 | " | Execute Any,Make_Root_Type 1b1d 1c07 | | Execute_Immediate Run_Utility,0x7 1b1e c604 | | Store 0x3,0x4 1b1f 00c9 | | Action Pop_Auxiliary_Loop 1b20 7fea | | Jump 0x1b0b 1b21 00ce | | Action Pop_Auxiliary 1b22 e604 | | Load 0x3,0x4 1b23 e5f9 | | Load 0x2,-0x7 1b24 01dc | | Execute Vector,Last 1b25 027f | | Execute Discrete,Equal 1b26 e604 | | Load 0x3,0x4 1b27 e5fa | | Load 0x2,-0x6 1b28 1c04 | | Execute_Immediate Run_Utility,0x4 1b29 e5f9 | | Load 0x2,-0x7 1b2a 01d7 | | Execute Vector,Field_Read 1b2b 85fd | | Call 0x2,-0x3 1b2c 0279 | y | Execute Discrete,And 1b2d 7024 |p$ | Jump_Nonzero 0x1b52 1b2e e602 | | Load 0x3,0x2 1b2f 7004 |p | Jump_Nonzero 0x1b34 1b30 e7ff | | Load 0x3,-0x1 1b31 e21e | | Load 0x1,0x1e 1b32 822b | + | Call 0x1,0x2b 1b33 00d1 | | Pop_Control Pop_Count_1 1b34 4800 |H | Short_Literal 0x0 1b35 a602 | | Store_Unchecked 0x3,0x2 1b36 e7ff | | Load 0x3,-0x1 1b37 e604 | | Load 0x3,0x4 1b38 00d8 | | Load_Top At_Offset_0 1b39 e5fa | | Load 0x2,-0x6 1b3a 0260 | ` | Execute Discrete,In_Type 1b3b 7001 |p | Jump_Nonzero 0x1b3d 1b3c 0801 | | Execute_Immediate Raise,0x1 1b3d e603 | | Load 0x3,0x3 1b3e 00d8 | | Load_Top At_Offset_0 1b3f e5fa | | Load 0x2,-0x6 1b40 0260 | ` | Execute Discrete,In_Type 1b41 7001 |p | Jump_Nonzero 0x1b43 1b42 0801 | | Execute_Immediate Raise,0x1 1b43 8402 | | Call 0x2,0x2 1b44 822b | + | Call 0x1,0x2b 1b45 00d1 | | Pop_Control Pop_Count_1 1b46 e604 | | Load 0x3,0x4 1b47 e5f9 | | Load 0x2,-0x7 1b48 01dc | | Execute Vector,Last 1b49 027f | | Execute Discrete,Equal 1b4a 7007 |p | Jump_Nonzero 0x1b52 1b4b e604 | | Load 0x3,0x4 1b4c e5fa | | Load 0x2,-0x6 1b4d 0122 | " | Execute Any,Make_Root_Type 1b4e 1c07 | | Execute_Immediate Run_Utility,0x7 1b4f c603 | | Store 0x3,0x3 1b50 00c9 | | Action Pop_Auxiliary_Loop 1b51 7f9f | | Jump 0x1af1 1b52 00ce | | Action Pop_Auxiliary 1b53 e7ff | | Load 0x3,-0x1 1b54 0092 1cd3 | | Action Push_String_Extended,0x1cd3 ; "}" 1b56 822b | + | Call 0x1,0x2b 1b57 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1b58 ; -------------------------------------------------------------------------------------- 1b58 ; SUBPROGRAM 1b58 ; -------------------------------------------------------------------------------------- 1b58 1b61 | a | .CONST 0x1b61 ; Address of begin 1b59 1b69 | i | .CONST 0x1b69 ; Address of exception handler 1b5a 0002 | | .CONST 0x0002 ; Number of locals 1b5b INIT_1b58: 1b5b e404 | | Load 0x2,0x4 1b5c e006 | | Load 0x0,0x6 1b5d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1b5e 1c08 | | Execute_Immediate Run_Utility,0x8 1b5f 00d8 | | Load_Top At_Offset_0 1b60 1c00 | | Execute_Immediate Run_Utility,0x0 1b61 BODY_1b58: 1b61 00d8 | | Load_Top At_Offset_0 1b62 8403 | | Call 0x2,0x3 1b63 00d1 | | Pop_Control Pop_Count_1 1b64 00d8 | | Load_Top At_Offset_0 1b65 e006 | | Load 0x0,0x6 1b66 1813 | | Execute Package,Field_Execute,Field_Number 0x13 1b67 00cb | | Action Pop_Block_With_Result 1b68 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 1b69 TRAP_1b58: 1b69 e22a | * | Load 0x1,0x2a 1b6a 010f | | Execute Exception,Equal 1b6b 6804 |h | Jump_Zero 0x1b70 1b6c e404 | | Load 0x2,0x4 1b6d 0901 | | Execute_Immediate Binary_Scale,0x1 1b6e c404 | | Store 0x2,0x4 1b6f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1b70 0100 | | Execute Exception,Raise 1b71 0000 0000 | | .BLANK 0000[0x7] 1b78 ; -------------------------------------------------------------------------------------- 1b78 ; SUBPROGRAM 1b78 ; -------------------------------------------------------------------------------------- 1b78 1b88 | | .CONST 0x1b88 ; Address of begin 1b79 0004 | | .CONST 0x0004 ; Address of exception handler 1b7a 0010 | | .CONST 0x0010 ; Number of locals 1b7b INIT_1b78: 1b7b 029a 1b93 | | Declare_Subprogram INIT_1b90,For_Outer_Call,Visible,Unelaborated 1b7d 029a 1b9b | | Declare_Subprogram INIT_1b98,For_Outer_Call,Visible,Unelaborated 1b7f 00bf | | Action Accept_Activation 1b80 029d 1ba3 | | Declare_Subprogram INIT_1ba0,For_Outer_Call 1b82 029d 1bb3 | | Declare_Subprogram INIT_1bb0,For_Outer_Call 1b84 1d0d | | Execute_Immediate Reference_Lex_1,0xd 1b85 00c7 | | Action Elaborate_Subprogram 1b86 1d0e | | Execute_Immediate Reference_Lex_1,0xe 1b87 00c7 | | Action Elaborate_Subprogram 1b88 BODY_1b78: 1b88 00bc | | Action Signal_Activated 1b89 00bb | | Action Signal_Completion 1b8a 0000 0000 | | .BLANK 0000[0x6] 1b90 ; -------------------------------------------------------------------------------------- 1b90 ; SUBPROGRAM 1b90 ; -------------------------------------------------------------------------------------- 1b90 1b93 | | .CONST 0x1b93 ; Address of begin 1b91 0004 | | .CONST 0x0004 ; Address of exception handler 1b92 0001 | | .CONST 0x0001 ; Number of locals 1b93 BODY_1b90: 1b93 INIT_1b90: 1b93 e5ff | | Load 0x2,-0x1 1b94 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1b95 0000 0000 | | .XXX[0x3] 1b97 0000 | | 1b98 ; -------------------------------------------------------------------------------------- 1b98 ; SUBPROGRAM 1b98 ; -------------------------------------------------------------------------------------- 1b98 1b9b | | .CONST 0x1b9b ; Address of begin 1b99 0004 | | .CONST 0x0004 ; Address of exception handler 1b9a 0001 | | .CONST 0x0001 ; Number of locals 1b9b BODY_1b98: 1b9b INIT_1b98: 1b9b e5ff | | Load 0x2,-0x1 1b9c 8210 | | Call 0x1,0x10 1b9d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1b9e 0000 0000 | | .XXX[0x2] 1ba0 ; -------------------------------------------------------------------------------------- 1ba0 ; SUBPROGRAM 1ba0 ; -------------------------------------------------------------------------------------- 1ba0 1ba3 | | .CONST 0x1ba3 ; Address of begin 1ba1 0004 | | .CONST 0x0004 ; Address of exception handler 1ba2 0001 | | .CONST 0x0001 ; Number of locals 1ba3 BODY_1ba0: 1ba3 INIT_1ba0: 1ba3 e5ff | | Load 0x2,-0x1 1ba4 014b | K | Execute Float,Less_Zero 1ba5 6803 |h | Jump_Zero 0x1ba9 1ba6 0092 1cd4 | | Action Push_String_Extended,0x1cd4 ; "-" 1ba8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1ba9 00ea | | Load_Encached Null_String_Cache 1baa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1bab 0000 0000 | | .BLANK 0000[0x5] 1bb0 ; -------------------------------------------------------------------------------------- 1bb0 ; SUBPROGRAM 1bb0 ; -------------------------------------------------------------------------------------- 1bb0 1bd0 | | .CONST 0x1bd0 ; Address of begin 1bb1 1be3 | | .CONST 0x1be3 ; Address of exception handler 1bb2 0006 | | .CONST 0x0006 ; Number of locals 1bb3 INIT_1bb0: 1bb3 e5ff | | Load 0x2,-0x1 1bb4 023e | > | Execute Float,Absolute_Value 1bb5 00e6 | | Load_Encached Float_Cache 1bb6 03df | | Declare_Variable Float,With_Value 1bb7 00d8 | | Load_Top At_Offset_0 1bb8 5833 |X3 | Indirect_Literal Float,0x1bec,0.5 1bb9 023c | < | Execute Float,Minus 1bba 0235 | 5 | Execute Float,Round_To_Discrete 1bbb 00e3 | | Load_Encached Natural_Cache 1bbc 025e | ^ | Execute Discrete,Convert 1bbd 00e3 | | Load_Encached Natural_Cache 1bbe 03f1 | | Declare_Variable Discrete,With_Value 1bbf e402 | | Load 0x2,0x2 1bc0 e403 | | Load 0x2,0x3 1bc1 0237 | 7 | Execute Float,Convert_From_Discrete 1bc2 023c | < | Execute Float,Minus 1bc3 00e6 | | Load_Encached Float_Cache 1bc4 03df | | Declare_Variable Float,With_Value 1bc5 00d8 | | Load_Top At_Offset_0 1bc6 5821 |X! | Indirect_Literal Float,0x1be8,10.0 1bc7 023b | ; | Execute Float,Times 1bc8 00e6 | | Load_Encached Float_Cache 1bc9 03df | | Declare_Variable Float,With_Value 1bca 00d8 | | Load_Top At_Offset_0 1bcb 0235 | 5 | Execute Float,Round_To_Discrete 1bcc 00e3 | | Load_Encached Natural_Cache 1bcd 025e | ^ | Execute Discrete,Convert 1bce 00e3 | | Load_Encached Natural_Cache 1bcf 03f1 | | Declare_Variable Discrete,With_Value 1bd0 BODY_1bb0: 1bd0 482e |H. | Short_Literal 0x2e 1bd1 e5ff | | Load 0x2,-0x1 1bd2 820f | | Call 0x1,0xf 1bd3 4820 |H | Short_Literal 0x20 1bd4 4800 |H | Short_Literal 0x0 1bd5 480a |H | Short_Literal 0xa 1bd6 e403 | | Load 0x2,0x3 1bd7 e001 | | Load 0x0,0x1 1bd8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 1bd9 01cc | | Execute Vector,Catenate 1bda 01cb | | Execute Vector,Append 1bdb 4820 |H | Short_Literal 0x20 1bdc 4800 |H | Short_Literal 0x0 1bdd 480a |H | Short_Literal 0xa 1bde e406 | | Load 0x2,0x6 1bdf e001 | | Load 0x0,0x1 1be0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 1be1 01cc | | Execute Vector,Catenate 1be2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1be3 TRAP_1bb0: 1be3 0007 | | Action Break_Optional 1be4 0092 1cd5 | | Action Push_String_Extended,0x1cd5 ; "0.0" 1be6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1be7 0000 | | .XXX[0x1] 1be8 4024 0000 |@$ | .DBL 10.0 1bea 0000 0000 | | 1bec 3fe0 0000 |? | .DBL 0.5 1bee 0000 0000 | | 1bf0 ; -------------------------------------------------------------------------------------- 1bf0 ; STRING TABLE 1bf0 ; -------------------------------------------------------------------------------------- 1bf0 01ce | | .STRTAB 0x01ce->0x1cd7 ; "NO_BREAKPOINT" 1bf1 01d9 | | .STRTAB 0x01d9->0x1cdd ; "ON_DECLARE" 1bf2 01e1 | | .STRTAB 0x01e1->0x1ce2 ; "ON_STORE" 1bf3 01e7 | | .STRTAB 0x01e7->0x1ce6 ; "ON_CALL" 1bf4 01ec | | .STRTAB 0x01ec->0x1cea ; "ON_JUMP" 1bf5 01f1 | | .STRTAB 0x01f1->0x1ced ; "ON_RENDEZVOUS" 1bf6 01fc | | .STRTAB 0x01fc->0x1cf4 ; "ON_ACTION" 1bf7 0203 | | .STRTAB 0x0203->0x1cf8 ; "ON_OPTION" 1bf8 020a | | .STRTAB 0x020a->0x1cfd ; "ON_OTHER" 1bf9 0210 | | .STRTAB 0x0210->0x1d01 ; "ON_EXIT" 1bfa 0215 | | .STRTAB 0x0215->0x1d04 ; "SPARE1" 1bfb 0219 | | .STRTAB 0x0219->0x1d07 ; "SPARE2" 1bfc 021d | | .STRTAB 0x021d->0x1d0a ; "SPARE3" 1bfd 0221 | ! | .STRTAB 0x0221->0x1d0d ; "ON_IMPLICIT_EXCEPTION" 1bfe 0234 | 4 | .STRTAB 0x0234->0x1d18 ; "ON_EXPLICIT_EXCEPTION" 1bff 0247 | G | .STRTAB 0x0247->0x1d22 ; "ON_CREATION" 1c00 0250 | P | .STRTAB 0x0250->0x1d28 ; "Type_Offset" 1c01 0259 | Y | .STRTAB 0x0259->0x1d2d ; "To_Be_Aborted" 1c02 0264 | d | .STRTAB 0x0264->0x1d34 ; "Abort_Protected" 1c03 0271 | q | .STRTAB 0x0271->0x1d3b ; "Stack" 1c04 0274 | t | .STRTAB 0x0274->0x1d3e ; "Data_Offset" 1c05 027d | } | .STRTAB 0x027d->0x1d43 ; "Bounds_With_Object" 1c06 028d | | .STRTAB 0x028d->0x1d4c ; "Derives_Privacy" 1c07 029a | | .STRTAB 0x029a->0x1d54 ; "Is_Private" 1c08 02a2 | | .STRTAB 0x02a2->0x1d59 ; "Is_Constant" 1c09 02ab | | .STRTAB 0x02ab->0x1d5e ; "Is_Visible" 1c0a 02b3 | | .STRTAB 0x02b3->0x1d63 ; "Path_Stack" 1c0b 02bb | | .STRTAB 0x02bb->0x1d68 ; "Offset" 1c0c 02bf | | .STRTAB 0x02bf->0x1d6b ; "Segment" 1c0d 02c4 | | .STRTAB 0x02c4->0x1d6f ; "Children_Start" 1c0e 02d0 | | .STRTAB 0x02d0->0x1d76 ; "Control_Offset" 1c0f 02dc | | .STRTAB 0x02dc->0x1d7d ; "Subprog_Site" 1c10 02e6 | | .STRTAB 0x02e6->0x1d83 ; "Of_Kind" 1c11 02eb | | .STRTAB 0x02eb->0x1d86 ; "Scope_For_Site" 1c12 02f7 | | .STRTAB 0x02f7->0x1d8d ; "Lex_Level" 1c13 02fe | | .STRTAB 0x02fe->0x1d92 ; "Subprog_Start" 1c14 0309 | | .STRTAB 0x0309->0x1d98 ; "Declare_Frame" 1c15 0314 | | .STRTAB 0x0314->0x1d9f ; "start pc = " 1c16 031d | | .STRTAB 0x031d->0x1da4 ; "; lex = " 1c17 0323 | # | .STRTAB 0x0323->0x1da8 ; "distributor" 1c18 032c | , | .STRTAB 0x032c->0x1dae ; "control extent" 1c19 0338 | 8 | .STRTAB 0x0338->0x1db5 ; "break mask" 1c1a 0340 | @ | .STRTAB 0x0340->0x1dba ; "Is_Catalogued " 1c1b 034c | L | .STRTAB 0x034c->0x1dc1 ; "Is_Wired " 1c1c 0353 | S | .STRTAB 0x0353->0x1dc5 ; "Delay_Duration" 1c1d 035f | _ | .STRTAB 0x035f->0x1dcc ; "Timed_Choice" 1c1e 0369 | i | .STRTAB 0x0369->0x1dd2 ; "Member_Index" 1c1f 0373 | s | .STRTAB 0x0373->0x1dd8 ; "First_Member" 1c20 037d | } | .STRTAB 0x037d->0x1dde ; "Member_Site" 1c21 0386 | | .STRTAB 0x0386->0x1de4 ; "Entry_Params" 1c22 0390 | | .STRTAB 0x0390->0x1dea ; "Entry_Name" 1c23 0398 | | .STRTAB 0x0398->0x1def ; "Raise_Index" 1c24 03a1 | | .STRTAB 0x03a1->0x1df4 ; "Raise_Offset" 1c25 03ab | | .STRTAB 0x03ab->0x1dfa ; "Reraising" 1c26 03b2 | | .STRTAB 0x03b2->0x1dff ; "Exception_Name" 1c27 03be | | .STRTAB 0x03be->0x1e06 ; "Raise_Segment" 1c28 03c9 | | .STRTAB 0x03c9->0x1e0c ; "pc = " 1c29 03cc | | .STRTAB 0x03cc->0x1e0f ; "; " 1c2a 03cc | | .STRTAB 0x03cc->0x1e10 ; "Mantissa" 1c2b 03d2 | | .STRTAB 0x03d2->0x1e14 ; "Exponent" 1c2c 03d8 | | .STRTAB 0x03d8->0x1e18 ; "Is_Negative" 1c2d 03e1 | | .STRTAB 0x03e1->0x1e1d ; "Val_Part" 1c2e 03e7 | | .STRTAB 0x03e7->0x1e21 ; "Typ_Part" 1c2f 03ed | | .STRTAB 0x03ed->0x1e25 ; "Var_Site" 1c30 03f3 | | .STRTAB 0x03f3->0x1e29 ; "Last_Bias" 1c31 03fa | | .STRTAB 0x03fa->0x1e2e ; "Family_Site" 1c32 0403 | | .STRTAB 0x0403->0x1e33 ; "Pointer" 1c33 0408 | | .STRTAB 0x0408->0x1e37 ; "Declarer_Name" 1c34 0413 | | .STRTAB 0x0413->0x1e3d ; "Module_Imports" 1c35 041f | | .STRTAB 0x041f->0x1e44 ; "Module_Type" 1c36 0428 | ( | .STRTAB 0x0428->0x1e4a ; "import space = " 1c37 0435 | 5 | .STRTAB 0x0435->0x1e51 ; "; declared by " 1c38 0441 | A | .STRTAB 0x0441->0x1e58 ; "type frame = " 1c39 044c | L | .STRTAB 0x044c->0x1e5f ; "data frame = " 1c3a 0457 | W | .STRTAB 0x0457->0x1e65 ; " " 1c3b 0456 | V | .STRTAB 0x0456->0x1e66 ; "In_Rendezvous " 1c3c 0462 | b | .STRTAB 0x0462->0x1e6d ; "In_Utility " 1c3d 046b | k | .STRTAB 0x046b->0x1e72 ; "Has_Package " 1c3e 0475 | u | .STRTAB 0x0475->0x1e78 ; "Has_Children " 1c3f 0480 | | .STRTAB 0x0480->0x1e7f ; "enclosing frame = " 1c40 0490 | | .STRTAB 0x0490->0x1e88 ; ", " 1c41 0490 | | .STRTAB 0x0490->0x1e89 ; "Auxiliary_Marked" 1c42 049e | | .STRTAB 0x049e->0x1e91 ; "Forcing_Instruction" 1c43 04af | | .STRTAB 0x04af->0x1e9a ; "Breakpoint_Mask" 1c44 04bc | | .STRTAB 0x04bc->0x1ea2 ; "Control_Extent" 1c45 04c8 | | .STRTAB 0x04c8->0x1ea9 ; "Force_Breakpoint" 1c46 04d6 | | .STRTAB 0x04d6->0x1eb1 ; "Is_Wired" 1c47 04dc | | .STRTAB 0x04dc->0x1eb5 ; "Is_Catalogued" 1c48 04e7 | | .STRTAB 0x04e7->0x1ebb ; "Queue_Not_Empty" 1c49 04f4 | | .STRTAB 0x04f4->0x1ec3 ; "Queue_Allocated" 1c4a 0501 | | .STRTAB 0x0501->0x1eca ; "Distributor" 1c4b 050a | | .STRTAB 0x050a->0x1ed0 ; "Break_Cause" 1c4c 0513 | | .STRTAB 0x0513->0x1ed5 ; "Break_Address" 1c4d 051e | | .STRTAB 0x051e->0x1edc ; "Restore_Enable" 1c4e 052a | * | .STRTAB 0x052a->0x1ee3 ; "Debugging_Scope" 1c4f 0537 | 7 | .STRTAB 0x0537->0x1eea ; "debugging scope = " 1c50 0547 | G | .STRTAB 0x0547->0x1ef3 ; "; restore enable = " 1c51 0558 | X | .STRTAB 0x0558->0x1efd ; "; break address = " 1c52 0568 | h | .STRTAB 0x0568->0x1f06 ; "; cause = " 1c53 0570 | p | .STRTAB 0x0570->0x1f0b ; "Node" 1c54 0572 | r | .STRTAB 0x0572->0x1f0d ; "Name" 1c55 0574 | t | .STRTAB 0x0574->0x1f0f ; "Dependence_Site" 1c56 0581 | | .STRTAB 0x0581->0x1f16 ; "Select_Site" 1c57 058a | | .STRTAB 0x058a->0x1f1c ; "Field_Count" 1c58 0593 | | .STRTAB 0x0593->0x1f21 ; "Select_Ref" 1c59 059b | | .STRTAB 0x059b->0x1f26 ; "Some_Choice_Open" 1c5a 05a9 | | .STRTAB 0x05a9->0x1f2e ; "Terminate_Is_Open" 1c5b 05b8 | | .STRTAB 0x05b8->0x1f37 ; "Has_Terminate" 1c5c 05c3 | | .STRTAB 0x05c3->0x1f3d ; "Timed_Is_Open" 1c5d 05ce | | .STRTAB 0x05ce->0x1f44 ; "Has_Timed_Clause" 1c5e 05dc | | .STRTAB 0x05dc->0x1f4c ; "Last_Choice" 1c5f 05e5 | | .STRTAB 0x05e5->0x1f51 ; "(Of_Kind => " 1c60 05ef | | .STRTAB 0x05ef->0x1f57 ; ")" 1c61 05ee | | .STRTAB 0x05ee->0x1f58 ; "Ctl_Offset" 1c62 05f6 | | .STRTAB 0x05f6->0x1f5d ; "Is_Open" 1c63 05fb | | .STRTAB 0x05fb->0x1f60 ; "Is_Family" 1c64 0602 | | .STRTAB 0x0602->0x1f65 ; "Frame_Lex_Level" 1c65 060f | | .STRTAB 0x060f->0x1f6c ; "Return_Address" 1c66 061b | | .STRTAB 0x061b->0x1f73 ; "Enclosing_Frame" 1c67 0628 | ( | .STRTAB 0x0628->0x1f7b ; "Data_Frame" 1c68 0630 | 0 | .STRTAB 0x0630->0x1f80 ; "Block_Start" 1c69 0639 | 9 | .STRTAB 0x0639->0x1f85 ; "Dynamic_Link" 1c6a 0643 | C | .STRTAB 0x0643->0x1f8b ; "Type_Frame" 1c6b 064b | K | .STRTAB 0x064b->0x1f90 ; "Has_Children" 1c6c 0655 | U | .STRTAB 0x0655->0x1f96 ; "Has_Package" 1c6d 065e | ^ | .STRTAB 0x065e->0x1f9c ; "In_Utility" 1c6e 0666 | f | .STRTAB 0x0666->0x1fa1 ; "In_Rendezvous" 1c6f 0671 | q | .STRTAB 0x0671->0x1fa7 ; "Exports_Legal" 1c70 067c | | | .STRTAB 0x067c->0x1fae ; "Outer_Lex_Frame" 1c71 0689 | | .STRTAB 0x0689->0x1fb5 ; "Partner_Charge_Vpid" 1c72 069a | | .STRTAB 0x069a->0x1fbf ; "Partner_Name" 1c73 06a4 | | .STRTAB 0x06a4->0x1fc5 ; "Total_Params" 1c74 06ae | | .STRTAB 0x06ae->0x1fcb ; "In_Select" 1c75 06b5 | | .STRTAB 0x06b5->0x1fcf ; "Return_Priority" 1c76 06c2 | | .STRTAB 0x06c2->0x1fd7 ; "Return_Charge_Vpid" 1c77 06d2 | | .STRTAB 0x06d2->0x1fe0 ; "Select_Choice" 1c78 06dd | | .STRTAB 0x06dd->0x1fe6 ; "Data_Stack_Mark" 1c79 06ea | | .STRTAB 0x06ea->0x1fee ; "Type_Stack_Mark" 1c7a 06f7 | | .STRTAB 0x06f7->0x1ff5 ; "Appending_Fields" 1c7b 0705 | | .STRTAB 0x0705->0x1ffd ; "Data_Mark_Used" 1c7c 0711 | | .STRTAB 0x0711->0x2004 ; "Type_Mark_Used" 1c7d 071d | | .STRTAB 0x071d->0x200b ; "Has_Prior_Mark" 1c7e 0729 | ) | .STRTAB 0x0729->0x2012 ; "In_Export_Frame" 1c7f 0736 | 6 | .STRTAB 0x0736->0x201a ; "Constrained" 1c80 073f | ? | .STRTAB 0x073f->0x201f ; "Global_Only" 1c81 0748 | H | .STRTAB 0x0748->0x2025 ; "Database_Index" 1c82 0754 | T | .STRTAB 0x0754->0x202c ; "database index = " 1c83 0763 | c | .STRTAB 0x0763->0x2034 ; "; mode = " 1c84 076a | j | .STRTAB 0x076a->0x2039 ; " GLOBAL" 1c85 076f | o | .STRTAB 0x076f->0x203c ; " LOCAL" 1c86 0773 | s | .STRTAB 0x0773->0x203f ; " CONSTRAINED" 1c87 077d | } | .STRTAB 0x077d->0x2045 ; " UNCONSTRAINED" 1c88 0789 | | .STRTAB 0x0789->0x204c ; "In_Entry_Call " 1c89 0795 | | .STRTAB 0x0795->0x2053 ; "debugging state = (" 1c8a 07a6 | | .STRTAB 0x07a6->0x205d ; " In_Critical_Region " 1c8b 07b8 | | .STRTAB 0x07b8->0x2067 ; "and Aborted" 1c8c 07c1 | | .STRTAB 0x07c1->0x206c ; " Aborted_Critical_Region" 1c8d 07d7 | | .STRTAB 0x07d7->0x2078 ; "For_Module" 1c8e 07df | | .STRTAB 0x07df->0x207d ; "Permitted" 1c8f 07e6 | | .STRTAB 0x07e6->0x2082 ; " @ " 1c90 07e7 | | .STRTAB 0x07e7->0x2083 ; "Base_Priority" 1c91 07f2 | | .STRTAB 0x07f2->0x208a ; "Fixed_Priority" 1c92 07fe | | .STRTAB 0x07fe->0x2091 ; "Last_Job_Priority" 1c93 080d | | .STRTAB 0x080d->0x2099 ; "Aborted_In_Critical_Region" 1c94 0825 | % | .STRTAB 0x0825->0x20a6 ; "Critical_Region_Count" 1c95 0838 | 8 | .STRTAB 0x0838->0x20b1 ; "Debugging_State" 1c96 0845 | E | .STRTAB 0x0845->0x20b8 ; "Associated_Heap" 1c97 0852 | R | .STRTAB 0x0852->0x20c0 ; "In_Entry_Call" 1c98 085d | ] | .STRTAB 0x085d->0x20c6 ; "Mode" 1c99 085f | _ | .STRTAB 0x085f->0x20c8 ; "Delay_Time" 1c9a 0867 | g | .STRTAB 0x0867->0x20cd ; "(Current_Slice => " 1c9b 0877 | w | .STRTAB 0x0877->0x20d6 ; "Caller_Is_Waiting" 1c9c 0886 | | .STRTAB 0x0886->0x20df ; "Has_Been_Rousted" 1c9d 0894 | | .STRTAB 0x0894->0x20e7 ; "Held_By_Scheduler" 1c9e 08a3 | | .STRTAB 0x08a3->0x20ef ; "Memory_Condition" 1c9f 08b1 | | .STRTAB 0x08b1->0x20f7 ; "Block_Condition" 1ca0 08be | | .STRTAB 0x08be->0x20ff ; "Current_Mode" 1ca1 08c8 | | .STRTAB 0x08c8->0x2105 ; "Current_Priority" 1ca2 08d6 | | .STRTAB 0x08d6->0x210d ; "Caller_Must_Wait" 1ca3 08e4 | | .STRTAB 0x08e4->0x2115 ; "Module_Is_Task" 1ca4 08f0 | | .STRTAB 0x08f0->0x211c ; "Module_Aborted" 1ca5 08fc | | .STRTAB 0x08fc->0x2123 ; "Breakpoint_On" 1ca6 0907 | | .STRTAB 0x0907->0x2129 ; "Intrainstruction" 1ca7 0915 | | .STRTAB 0x0915->0x2131 ; "Control_Tos" 1ca8 091e | | .STRTAB 0x091e->0x2137 ; "Job_For_Charging" 1ca9 092c | , | .STRTAB 0x092c->0x213f ; "Program_Counter" 1caa 0939 | 9 | .STRTAB 0x0939->0x2146 ; "Executing_Lex" 1cab 0944 | D | .STRTAB 0x0944->0x214d ; "(Queue_Successor => " 1cac 0956 | V | .STRTAB 0x0956->0x2157 ; "Has_Micro_Context" 1cad 0965 | e | .STRTAB 0x0965->0x215f ; "Type_Tos" 1cae 096b | k | .STRTAB 0x096b->0x2163 ; "Current_Frame" 1caf 0976 | v | .STRTAB 0x0976->0x216a ; "Data_Tos" 1cb0 097c | | | .STRTAB 0x097c->0x216e ; "Data_Extent" 1cb1 0985 | | .STRTAB 0x0985->0x2173 ; "Queue_Extent" 1cb2 098f | | .STRTAB 0x098f->0x2179 ; "Space_Mgr_Retries" 1cb3 099e | | .STRTAB 0x099e->0x2182 ; "Type_Extent" 1cb4 09a7 | | .STRTAB 0x09a7->0x2187 ; "Breakpoint_Scope" 1cb5 09b5 | | .STRTAB 0x09b5->0x218f ; "value" 1cb6 09b8 | | .STRTAB 0x09b8->0x2192 ; "; type" 1cb7 09bc | | .STRTAB 0x09bc->0x2195 ; "; ctos = " 1cb8 09c3 | | .STRTAB 0x09c3->0x2199 ; "type tos = " 1cb9 09cc | | .STRTAB 0x09cc->0x219f ; "; data tos = " 1cba 09d7 | | .STRTAB 0x09d7->0x21a5 ; "type extent = " 1cbb 09e3 | | .STRTAB 0x09e3->0x21ac ; "; queue extent = " 1cbc 09f2 | | .STRTAB 0x09f2->0x21b5 ; "; data extent = " 1cbd 0a00 | | .STRTAB 0x0a00->0x21bd ; "subr @ " 1cbe 0a05 | | .STRTAB 0x0a05->0x21c0 ; "Ref_Item" 1cbf 0a0b | | .STRTAB 0x0a0b->0x21c4 ; ": " 1cc0 0a0b | | .STRTAB 0x0a0b->0x21c5 ; "AUXILIARY_STATE: " 1cc1 0a1a | | .STRTAB 0x0a1a->0x21ce ; "AUXILIARY_ALLOCATION: " 1cc2 0a2e | . | .STRTAB 0x0a2e->0x21d9 ; " = " 1cc3 0a2f | / | .STRTAB 0x0a2f->0x21da ; " => " 1cc4 0a31 | 1 | .STRTAB 0x0a31->0x21dc ; "; BWO" 1cc5 0a34 | 4 | .STRTAB 0x0a34->0x21df ; "collection + " 1cc6 0a3f | ? | .STRTAB 0x0a3f->0x21e5 ; " type mark " 1cc7 0a48 | H | .STRTAB 0x0a48->0x21eb ; " data mark " 1cc8 0a51 | Q | .STRTAB 0x0a51->0x21f0 ; "partner = " 1cc9 0a59 | Y | .STRTAB 0x0a59->0x21f5 ; ";" 1cca 0a58 | X | .STRTAB 0x0a58->0x21f6 ; "return pc = " 1ccb 0a62 | b | .STRTAB 0x0a62->0x21fc ; "(" 1ccc 0a61 | a | .STRTAB 0x0a61->0x21fc ; "T" 1ccd 0a60 | ` | .STRTAB 0x0a60->0x21fd ; "F" 1cce 0a5f | _ | .STRTAB 0x0a5f->0x21fd ; "{}" 1ccf 0a5f | _ | .STRTAB 0x0a5f->0x21fe ; "***too_big_to_print" 1cd0 0a70 | p | .STRTAB 0x0a70->0x2208 ; "#" 1cd1 0a6f | o | .STRTAB 0x0a6f->0x2208 ; ".." 1cd2 0a6f | o | .STRTAB 0x0a6f->0x2209 ; "{" 1cd3 0a6e | n | .STRTAB 0x0a6e->0x220a ; "}" 1cd4 0a6d | m | .STRTAB 0x0a6d->0x220a ; "-" 1cd5 0a6c | l | .STRTAB 0x0a6c->0x220b ; "0.0" 1cd6 0a6d | m | .STREND 0x0a6d->0x220c 1cd7 4e4f 5f42 |NO_B| .STRTAB_STRINGS 220d 0000 0000 | | .XXX[0x3] 220f 0000 | | 2210 ; -------------------------------------------------------------------------------------- 2210 ; Debug Table 2210 ; -------------------------------------------------------------------------------------- 2210 0004 0010 | | .DEBUG4 0x0004,0x0010,0x099d,0x0000,0x0001,0x0000 2216 6260 0530 |b` 0| .XXX[0xe] 2218 1af0 0011 | | 221a 8634 8194 | 4 | 221c 4ab1 8000 |J | 221e 0000 1240 | @| 2220 ca25 58c0 | %X | 2222 0000 0009 | | 2224 0000 0000 | | .BLANK 0000[0x4] 2228 001f cef2 | | .XXX[0x1c] 222a 1600 0001 | | 222c 001f d0ca | | 222e 1600 0001 | | 2230 0000 0000 | | 2232 0003 f9de | | 2234 42c0 0000 |B | 2236 2010 3289 | 2 | 2238 5630 0000 |V0 | 223a 0002 4000 | @ | 223c 0001 2000 | | 223e 1985 8000 | | 2240 0000 4000 | @ | 2242 0000 4000 | @ | 2244 0000 0000 | | .BLANK 0000[0x5] 2249 0207 e526 | &| .XXX[0x13] 224b f021 1400 | ! | 224d 0048 0000 | H | 224f 0024 0003 | $ | 2251 30b0 0000 |0 | 2253 0008 0000 | | 2255 0008 0000 | | 2257 0008 0009 | | 2259 71b8 0298 |q | 225b 0b60 | ` | 225c 0000 0000 | | .BLANK 0000[0x4] 2260 014c 1904 | L | .XXX[0x2d] 2262 0005 97f9 | | 2264 a080 10d6 | | 2266 8927 0000 | ' | 2268 0d50 4008 | P@ | 226a 6f8f 3e20 |o > | 226c 0006 a000 | | 226e 0000 0000 | | 2270 0000 0008 | | 2272 3a70 8500 |:p | 2274 0000 4008 | @ | 2276 3b0e 8500 |; | 2278 0000 4010 | @ | 227a 0000 0001 | | 227c 0761 d0a0 | a | 227e 0000 0804 | | 2280 1002 1be3 | | 2282 cf88 0001 | | 2284 a800 0000 | | 2286 4800 047a |H z| 2288 4000 0000 |@ | 228a 1000 0000 | | 228c 0200 | | 228d 0000 0000 | | .BLANK 0000[0x5] 2292 0082 0043 | C| .XXX[0x44] 2294 5a6a 9300 |Zj | 2296 0035 0000 | 5 | 2298 0009 0000 | | 229a 8f48 0000 | H | 229c 0002 0000 | | 229e 0000 0000 | | 22a0 0002 0002 | | 22a2 939c 00a6 | | 22a4 0bfc 00a6 | | 22a6 0aba 00a6 | | 22a8 1d02 0053 | S| 22aa 0ad3 0001 | | 22ac 753c 2820 |u<( | 22ae 2780 19bb |' | 22b0 2000 0394 | | 22b2 1013 c010 | | 22b4 3a60 0001 |:` | 22b6 c800 0000 | | 22b8 0000 0000 | | 22ba 0002 4e31 | N1| 22bc 2160 0000 |!` | 22be 1002 4e31 | N1| 22c0 a160 0000 | ` | 22c2 1000 0003 | | 22c4 06e4 49c6 | I | 22c6 342c 0000 |4, | 22c8 0201 03ee | | 22ca e291 3754 | 7T| 22cc 0000 7200 | r | 22ce 0000 1200 | | 22d0 014b 0c00 | K | 22d2 0000 0400 | | 22d4 0000 1800 | | 22d6 0000 0000 | | .BLANK 0000[0x6] 22dc 0041 c200 | A | .XXX[0x2] 22de 0000 0000 | | .BLANK 0000[0x8] 22e6 8000 0000 | | .XXX[0x8] 22e8 0000 0000 | | 22ea 8000 aad0 | | 22ec 8029 8548 | ) H| 22ee 0000 0000 | | .BLANK 0000[0x4] 22f2 0014 c3d9 | | .XXX[0xe] 22f4 4000 6072 |@ `r| 22f6 9a08 15b2 | | 22f8 966b 8400 | k | 22fa 00e5 040a | | 22fc d94e 3350 | N3P| 22fe 0000 7200 | r | 2300 0000 0000 | | .BLANK 0000[0x4] 2304 95e9 2858 | (X| .XXX[0x1b] 2306 0000 0400 | | 2308 95e9 4858 | HX| 230a 0000 0400 | | 230c 0000 c42e | .| 230e 12bd 290b | ) | 2310 0000 0080 | | 2312 4102 b031 |A 1| 2314 1c41 8000 | A | 2316 1c80 0000 | | 2318 0480 0075 | u| 231a 0200 0000 | | 231c 0100 0000 | | 231e 0100 | | 231f 0000 0000 | | .BLANK 0000[0x6] 2325 0010 7080 | p | .XXX[0x2] 2327 0000 0000 | | .BLANK 0000[0x8] 232f 2000 0000 | | .XXX[0x1a] 2331 0000 0000 | | 2333 2000 2b32 | +2| 2335 400a 61e4 |@ a | 2337 400a 613d |@ a=| 2339 e00a 64ab | d | 233b 7005 313f |p 1?| 233d 7000 1a4e |p N| 233f b482 1481 | | 2341 cf07 5f00 | _ | 2343 0012 4152 | AR| 2345 8993 5345 | SE| 2347 8000 0090 | | 2349 0000 0000 | | .BLANK 0000[0x4] 234d 24d5 8a14 |$ | .XXX[0x1b] 234f 0000 0100 | | 2351 24d5 9214 |$ | 2353 0000 0100 | | 2355 0000 349f | 4 | 2357 849a b242 | B| 2359 8000 0020 | | 235b 1042 9039 | B 9| 235d f8cb 2000 | | 235f 0240 0000 | @ | 2361 0120 0019 | | 2363 ff00 0000 | | 2365 0040 0000 | @ | 2367 01c0 | | 2368 0000 0000 | | .BLANK 0000[0x6] 236e 0004 1c20 | | .XXX[0x2] 2370 0000 0000 | | .BLANK 0000[0x8] 2378 0800 0000 | | .XXX[0x1a] 237a 0000 0000 | | 237c 0800 0b6a | j| 237e 3802 989d |8 | 2380 a000 0000 | | 2382 0000 0000 | | 2384 0001 4c62 | Lb| 2386 2400 071f |$ | 2388 b7a0 855b | [| 238a eb96 af40 | @| 238c 0004 9054 | T| 238e a25e 19ab | ^ | 2390 4000 0020 |@ | 2392 0000 0000 | | .BLANK 0000[0x4] 2396 094e 5485 | NT | .XXX[0x1b] 2398 0000 0040 | @| 239a 094e 5685 | NV | 239c 0000 0040 | @| 239e 0000 046a | j| 23a0 9129 cad0 | ) | 23a2 a000 0008 | | 23a4 0410 ab7d | }| 23a6 7e0f 7000 |~ p | 23a8 0090 0000 | | 23aa 0048 0002 | H | 23ac a0b0 0000 | | 23ae 0010 0000 | | 23b0 0010 | | 23b1 0000 0000 | | .BLANK 0000[0x6] 23b7 0001 0708 | | .XXX[0x2] 23b9 0000 0000 | | .BLANK 0000[0x8] 23c1 0200 0000 | | .XXX[0x1a] 23c3 0000 0000 | | 23c5 0200 02e2 | | 23c7 7000 a630 |p 0| 23c9 8c00 a62f | /| 23cb 4a00 a641 |J A| 23cd 9200 531d | S | 23cf 1b00 01fa | | 23d1 16c8 21d7 | ! | 23d3 d9c9 7360 | s`| 23d5 0003 d410 | | 23d7 ebed 1ab8 | | 23d9 f000 01e8 | | 23db 0000 0000 | | .BLANK 0000[0x4] 23df 02c0 14a1 | | .XXX[0x1c] 23e1 6000 0010 |` | 23e3 02c0 1d21 | !| 23e5 6000 0010 |` | 23e7 0400 0000 | | 23e9 0058 03a4 | X | 23eb 2c00 0002 |, | 23ed 0104 3afb | : | 23ef 46ae 3c00 |F < | 23f1 007a 0000 | z | 23f3 0012 0002 | | 23f5 0c30 0000 | 0 | 23f7 0004 0000 | | 23f9 0000 8000 | | 23fb 0000 0000 | | .BLANK 0000[0x5]