|
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: 5120 (0x1400) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1e00fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 06b0 | | .CONST 0x06b0 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 008f | | .CONST 0x008f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0022 | " | .CONST 0x0022 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4819 |H | Short_Literal 0x19 000d 029f 009b | | Declare_Subprogram INIT_0098,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated 0012 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0014 00da | | Load_Top At_Offset_2 0015 e002 | | Load 0x0,0x2 0016 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0017 02a0 | | Declare_Subprogram Null_Subprogram 0018 4802 |H | Short_Literal 0x2 0019 032e | . | Declare_Type Record,Defined,Visible 001a 4801 |H | Short_Literal 0x1 001b 4805 |H | Short_Literal 0x5 001c 00da | | Load_Top At_Offset_2 001d 02a0 | | Declare_Subprogram Null_Subprogram 001e 4801 |H | Short_Literal 0x1 001f 035e | ^ | Declare_Type Array,Defined,Visible 0020 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0022 4800 |H | Short_Literal 0x0 0023 4803 |H | Short_Literal 0x3 0024 029f 01cb | | Declare_Subprogram INIT_01c8,For_Call 0026 03fe | | Declare_Type Discrete,Defined,Visible 0027 4800 |H | Short_Literal 0x0 0028 4802 |H | Short_Literal 0x2 0029 029f 01f3 | | Declare_Subprogram INIT_01f0,For_Call 002b 03fe | | Declare_Type Discrete,Defined,Visible 002c 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 002e 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 0030 00db | | Load_Top At_Offset_3 0031 4802 |H | Short_Literal 0x2 0032 e211 | | Load 0x1,0x11 0033 00e3 | | Load_Encached Natural_Cache 0034 4804 |H | Short_Literal 0x4 0035 e211 | | Load 0x1,0x11 0036 00d8 | | Load_Top At_Offset_0 0037 00e4 | | Load_Encached Positive_Cache 0038 00e4 | | Load_Encached Positive_Cache 0039 4803 |H | Short_Literal 0x3 003a e002 | | Load 0x0,0x2 003b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 003c 00e3 | | Load_Encached Natural_Cache 003d e214 | | Load 0x1,0x14 003e 029f 05a3 | | Declare_Subprogram INIT_05a0,For_Call 0040 4809 |H | Short_Literal 0x9 0041 4800 |H | Short_Literal 0x0 0042 4803 |H | Short_Literal 0x3 0043 4800 |H | Short_Literal 0x0 0044 4801 |H | Short_Literal 0x1 0045 031e | | Declare_Type Variant_Record,Defined,Visible 0046 4800 |H | Short_Literal 0x0 0047 4801 |H | Short_Literal 0x1 0048 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call 004a 03fe | | Declare_Type Discrete,Defined,Visible 004b 4800 |H | Short_Literal 0x0 004c 4802 |H | Short_Literal 0x2 004d 029f 027b | {| Declare_Subprogram INIT_0278,For_Call 004f 03fe | | Declare_Type Discrete,Defined,Visible 0050 00d9 | | Load_Top At_Offset_1 0051 4802 |H | Short_Literal 0x2 0052 4800 |H | Short_Literal 0x0 0053 4801 |H | Short_Literal 0x1 0054 4806 |H | Short_Literal 0x6 0055 0319 | | Declare_Type Variant_Record,Incomplete,Visible 0056 029f 0543 | C| Declare_Subprogram INIT_0540,For_Call 0058 00d9 | | Load_Top At_Offset_1 0059 012a | * | Execute Any,Change_Utility 005a 0007 | | Action Break_Optional 005b 00d8 | | Load_Top At_Offset_0 005c 02a0 | | Declare_Subprogram Null_Subprogram 005d 4818 |H | Short_Literal 0x18 005e 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 005f 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 0061 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 0063 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 0065 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 0067 00e1 | | Load_Encached Boolean_Cache 0068 4803 |H | Short_Literal 0x3 0069 e21b | | Load 0x1,0x1b 006a 00d8 | | Load_Top At_Offset_0 006b e219 | | Load 0x1,0x19 006c 4801 |H | Short_Literal 0x1 006d e217 | | Load 0x1,0x17 006e 029f 0543 | C| Declare_Subprogram INIT_0540,For_Call 0070 4804 |H | Short_Literal 0x4 0071 4801 |H | Short_Literal 0x1 0072 e21a | | Load 0x1,0x1a 0073 0307 | | Complete_Type Variant_Record,By_Defining 0074 e21b | | Load 0x1,0x1b 0075 03c4 | | Complete_Type Access,By_Component_Completion 0076 00bf | | Action Accept_Activation 0077 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0078 00c7 | | Action Elaborate_Subprogram 0079 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call 007b 1d0e | | Execute_Immediate Reference_Lex_1,0xe 007c 00c7 | | Action Elaborate_Subprogram 007d 1d0f | | Execute_Immediate Reference_Lex_1,0xf 007e 00c7 | | Action Elaborate_Subprogram 007f 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0080 00c7 | | Action Elaborate_Subprogram 0081 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0082 00c7 | | Action Elaborate_Subprogram 0083 029d 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call 0085 029d 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call 0087 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0088 00c7 | | Action Elaborate_Subprogram 0089 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 008a 00c7 | | Action Elaborate_Subprogram 008b 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 008c 00c7 | | Action Elaborate_Subprogram 008d 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 008e 00c7 | | Action Elaborate_Subprogram 008f BODY_0008: 008f 00bc | | Action Signal_Activated 0090 00bb | | Action Signal_Completion 0091 0000 0000 | | .BLANK 0000[0x7] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b 4607 |F | Jump_Case 0x8 009c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 009d 7807 |x | Jump 0xa5 ; case 0x1 009e 780a |x | Jump 0xa9 ; case 0x2 009f 780e |x | Jump 0xae ; case 0x3 00a0 7811 |x | Jump 0xb2 ; case 0x4 00a1 7812 |x | Jump 0xb4 ; case 0x5 00a2 7813 |x | Jump 0xb6 ; case 0x6 00a3 7816 |x | Jump 0xba ; case 0x7 00a4 4302 |C | .XXX[0x1] 00a5 00da | | Load_Top At_Offset_2 00a6 0091 05f3 | | Action Push_String_Extended_Indexed,0x5f3 ; "COMMUNICATION" 00a8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00a9 00db | | Load_Top At_Offset_3 00aa 00db | | Load_Top At_Offset_3 00ab 00e0 | | Load_Encached Standard_Cache 00ac 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ae 00da | | Load_Top At_Offset_2 00af 00e0 | | Load_Encached Standard_Cache 00b0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00b1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00b2 00db | | Load_Top At_Offset_3 00b3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00b4 00db | | Load_Top At_Offset_3 00b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00b6 e20d | | Load 0x1,0xd 00b7 00dc | | Load_Top At_Offset_4 00b8 0267 | g | Execute Discrete,Predecessor 00b9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ba e20d | | Load 0x1,0xd 00bb 00dc | | Load_Top At_Offset_4 00bc 0268 | h | Execute Discrete,Successor 00bd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00be 0000 0000 | | .XXX[0x2] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c5 | | .CONST 0x00c5 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0002 | | .CONST 0x0002 ; Number of locals 00c3 INIT_00c0: 00c3 e20d | | Load 0x1,0xd 00c4 0007 | | Action Break_Optional 00c5 BODY_00c0: 00c5 00db | | Load_Top At_Offset_3 00c6 8003 | | Call 0x0,0x3 00c7 6809 |h | Jump_Zero 0xd1 00c8 00db | | Load_Top At_Offset_3 00c9 8004 | | Call 0x0,0x4 00ca 00d8 | | Load_Top At_Offset_0 00cb e20d | | Load 0x1,0xd 00cc 0260 | ` | Execute Discrete,In_Type 00cd 7001 |p | Jump_Nonzero 0xcf 00ce 0801 | | Execute_Immediate Raise,0x1 00cf 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 00d0 7803 |x | Jump 0xd4 00d1 00db | | Load_Top At_Offset_3 00d2 8220 | | Call 0x1,0x20 00d3 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 00d4 00d8 | | Load_Top At_Offset_0 00d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00d6 0000 0000 | | .XXX[0x2] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 00da | | Load_Top At_Offset_2 00dc 4619 |F | Jump_Case 0x1a 00dd 7848 |xH | Jump 0x126 ; case 0x0 00de 788e |x | Jump 0x16d ; case 0x1 00df 7838 |x8 | Jump 0x118 ; case 0x2 00e0 7818 |x | Jump 0xf9 ; case 0x3 00e1 7828 |x( | Jump 0x10a ; case 0x4 00e2 78a8 |x | Jump 0x18b ; case 0x5 00e3 7881 |x | Jump 0x165 ; case 0x6 00e4 7812 |x | Jump 0xf7 ; case 0x7 00e5 7811 |x | Jump 0xf7 ; case 0x8 00e6 7874 |xt | Jump 0x15b ; case 0x9 00e7 786e |xn | Jump 0x156 ; case 0xa 00e8 7860 |x` | Jump 0x149 ; case 0xb 00e9 786c |xl | Jump 0x156 ; case 0xc 00ea 780c |x | Jump 0xf7 ; case 0xd 00eb 7874 |xt | Jump 0x160 ; case 0xe 00ec 7849 |xI | Jump 0x136 ; case 0xf 00ed 7809 |x | Jump 0xf7 ; case 0x10 00ee 7842 |xB | Jump 0x131 ; case 0x11 00ef 7851 |xQ | Jump 0x141 ; case 0x12 00f0 785d |x] | Jump 0x14e ; case 0x13 00f1 7805 |x | Jump 0xf7 ; case 0x14 00f2 7885 |x | Jump 0x178 ; case 0x15 00f3 7884 |x | Jump 0x178 ; case 0x16 00f4 7888 |x | Jump 0x17d ; case 0x17 00f5 7801 |x | Jump 0xf7 ; case 0x18 00f6 7800 |x | Jump 0xf7 ; case 0x19 00f7 4800 |H | Short_Literal 0x0 00f8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f9 00db | | Load_Top At_Offset_3 00fa 0f0d | | Execute_Immediate Equal,0xd 00fb e5fe | | Load 0x2,-0x2 00fc 0f0c | | Execute_Immediate Equal,0xc 00fd 0278 | x | Execute Discrete,Or 00fe e5fe | | Load 0x2,-0x2 00ff 0f09 | | Execute_Immediate Equal,0x9 0100 0278 | x | Execute Discrete,Or 0101 e5fe | | Load 0x2,-0x2 0102 0f0b | | Execute_Immediate Equal,0xb 0103 0278 | x | Execute Discrete,Or 0104 e5fe | | Load 0x2,-0x2 0105 0f06 | | Execute_Immediate Equal,0x6 0106 0278 | x | Execute Discrete,Or 0107 6897 |h | Jump_Zero 0x19f 0108 4801 |H | Short_Literal 0x1 0109 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 010a 00db | | Load_Top At_Offset_3 010b 0f0d | | Execute_Immediate Equal,0xd 010c e5fe | | Load 0x2,-0x2 010d 0f0a | | Execute_Immediate Equal,0xa 010e 0278 | x | Execute Discrete,Or 010f e5fe | | Load 0x2,-0x2 0110 0f09 | | Execute_Immediate Equal,0x9 0111 0278 | x | Execute Discrete,Or 0112 e5fe | | Load 0x2,-0x2 0113 0f0b | | Execute_Immediate Equal,0xb 0114 0278 | x | Execute Discrete,Or 0115 6889 |h | Jump_Zero 0x19f 0116 4801 |H | Short_Literal 0x1 0117 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0118 00db | | Load_Top At_Offset_3 0119 0f13 | | Execute_Immediate Equal,0x13 011a e5fe | | Load 0x2,-0x2 011b 0f09 | | Execute_Immediate Equal,0x9 011c 0278 | x | Execute Discrete,Or 011d e5fe | | Load 0x2,-0x2 011e 0f17 | | Execute_Immediate Equal,0x17 011f 0278 | x | Execute Discrete,Or 0120 e5fe | | Load 0x2,-0x2 0121 0f0e | | Execute_Immediate Equal,0xe 0122 0278 | x | Execute Discrete,Or 0123 687b |h{ | Jump_Zero 0x19f 0124 4801 |H | Short_Literal 0x1 0125 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0126 00db | | Load_Top At_Offset_3 0127 0f11 | | Execute_Immediate Equal,0x11 0128 e5fe | | Load 0x2,-0x2 0129 0f17 | | Execute_Immediate Equal,0x17 012a 0278 | x | Execute Discrete,Or 012b e5fe | | Load 0x2,-0x2 012c 0f09 | | Execute_Immediate Equal,0x9 012d 0278 | x | Execute Discrete,Or 012e 6870 |hp | Jump_Zero 0x19f 012f 4801 |H | Short_Literal 0x1 0130 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0131 00db | | Load_Top At_Offset_3 0132 0f12 | | Execute_Immediate Equal,0x12 0133 686b |hk | Jump_Zero 0x19f 0134 4801 |H | Short_Literal 0x1 0135 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0136 00db | | Load_Top At_Offset_3 0137 0f02 | | Execute_Immediate Equal,0x2 0138 e5fe | | Load 0x2,-0x2 0139 0f14 | | Execute_Immediate Equal,0x14 013a 0278 | x | Execute Discrete,Or 013b e5fe | | Load 0x2,-0x2 013c 0f10 | | Execute_Immediate Equal,0x10 013d 0278 | x | Execute Discrete,Or 013e 6860 |h` | Jump_Zero 0x19f 013f 4801 |H | Short_Literal 0x1 0140 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0141 00db | | Load_Top At_Offset_3 0142 0f02 | | Execute_Immediate Equal,0x2 0143 e5fe | | Load 0x2,-0x2 0144 0f08 | | Execute_Immediate Equal,0x8 0145 0278 | x | Execute Discrete,Or 0146 6858 |hX | Jump_Zero 0x19f 0147 4801 |H | Short_Literal 0x1 0148 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0149 00db | | Load_Top At_Offset_3 014a 0f02 | | Execute_Immediate Equal,0x2 014b 6853 |hS | Jump_Zero 0x19f 014c 4801 |H | Short_Literal 0x1 014d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 014e 00db | | Load_Top At_Offset_3 014f 0f08 | | Execute_Immediate Equal,0x8 0150 e5fe | | Load 0x2,-0x2 0151 0f02 | | Execute_Immediate Equal,0x2 0152 0278 | x | Execute Discrete,Or 0153 684b |hK | Jump_Zero 0x19f 0154 4801 |H | Short_Literal 0x1 0155 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0156 00db | | Load_Top At_Offset_3 0157 0f03 | | Execute_Immediate Equal,0x3 0158 6846 |hF | Jump_Zero 0x19f 0159 4801 |H | Short_Literal 0x1 015a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 015b 00db | | Load_Top At_Offset_3 015c 0f14 | | Execute_Immediate Equal,0x14 015d 6841 |hA | Jump_Zero 0x19f 015e 4801 |H | Short_Literal 0x1 015f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0160 00db | | Load_Top At_Offset_3 0161 0f0f | | Execute_Immediate Equal,0xf 0162 683c |h< | Jump_Zero 0x19f 0163 4801 |H | Short_Literal 0x1 0164 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0165 00db | | Load_Top At_Offset_3 0166 0f03 | | Execute_Immediate Equal,0x3 0167 e5fe | | Load 0x2,-0x2 0168 0f04 | | Execute_Immediate Equal,0x4 0169 0278 | x | Execute Discrete,Or 016a 6834 |h4 | Jump_Zero 0x19f 016b 4801 |H | Short_Literal 0x1 016c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 016d 00db | | Load_Top At_Offset_3 016e 0f15 | | Execute_Immediate Equal,0x15 016f e5fe | | Load 0x2,-0x2 0170 0f16 | | Execute_Immediate Equal,0x16 0171 0278 | x | Execute Discrete,Or 0172 e5fe | | Load 0x2,-0x2 0173 0f17 | | Execute_Immediate Equal,0x17 0174 0278 | x | Execute Discrete,Or 0175 6829 |h) | Jump_Zero 0x19f 0176 4801 |H | Short_Literal 0x1 0177 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0178 00db | | Load_Top At_Offset_3 0179 0f18 | | Execute_Immediate Equal,0x18 017a 6824 |h$ | Jump_Zero 0x19f 017b 4801 |H | Short_Literal 0x1 017c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 017d 00db | | Load_Top At_Offset_3 017e 0f18 | | Execute_Immediate Equal,0x18 017f e5fe | | Load 0x2,-0x2 0180 0f02 | | Execute_Immediate Equal,0x2 0181 0278 | x | Execute Discrete,Or 0182 e5fe | | Load 0x2,-0x2 0183 0f04 | | Execute_Immediate Equal,0x4 0184 0278 | x | Execute Discrete,Or 0185 e5fe | | Load 0x2,-0x2 0186 0f03 | | Execute_Immediate Equal,0x3 0187 0278 | x | Execute Discrete,Or 0188 6816 |h | Jump_Zero 0x19f 0189 4801 |H | Short_Literal 0x1 018a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 018b 00db | | Load_Top At_Offset_3 018c 0f00 | | Execute_Immediate Equal,0x0 018d e5fe | | Load 0x2,-0x2 018e 0f02 | | Execute_Immediate Equal,0x2 018f 0278 | x | Execute Discrete,Or 0190 e5fe | | Load 0x2,-0x2 0191 0f04 | | Execute_Immediate Equal,0x4 0192 0278 | x | Execute Discrete,Or 0193 e5fe | | Load 0x2,-0x2 0194 0f03 | | Execute_Immediate Equal,0x3 0195 0278 | x | Execute Discrete,Or 0196 e5fe | | Load 0x2,-0x2 0197 0f14 | | Execute_Immediate Equal,0x14 0198 0278 | x | Execute Discrete,Or 0199 e5fe | | Load 0x2,-0x2 019a 0f10 | | Execute_Immediate Equal,0x10 019b 0278 | x | Execute Discrete,Or 019c 6802 |h | Jump_Zero 0x19f 019d 4801 |H | Short_Literal 0x1 019e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 019f 4800 |H | Short_Literal 0x0 01a0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01a1 0000 0000 | | .BLANK 0000[0x7] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab 00cf | | Action Mark_Auxiliary 01ac e5fe | | Load 0x2,-0x2 01ad 01d9 | | Execute Vector,Reverse_Bounds 01ae 0007 | | Action Break_Optional 01af 00d8 | | Load_Top At_Offset_0 01b0 e5fe | | Load 0x2,-0x2 01b1 01d5 | | Execute Vector,Field_Reference 01b2 00d8 | | Load_Top At_Offset_0 01b3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01b4 00da | | Load_Top At_Offset_2 01b5 e5ff | | Load 0x2,-0x1 01b6 01d5 | | Execute Vector,Field_Reference 01b7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01b8 8005 | | Call 0x0,0x5 01b9 00d9 | | Load_Top At_Offset_1 01ba 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01bb 00d1 | | Pop_Control Pop_Count_1 01bc 00d8 | | Load_Top At_Offset_0 01bd e5ff | | Load 0x2,-0x1 01be 01d5 | | Execute Vector,Field_Reference 01bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01c0 00d9 | | Load_Top At_Offset_1 01c1 e5fe | | Load 0x2,-0x2 01c2 01d5 | | Execute Vector,Field_Reference 01c3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01c4 00c8 | | Action Pop_Auxiliary_Range 01c5 3fe9 |? | Loop_Increasing 0x1af 01c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c7 0000 | | .XXX[0x1] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 4607 |F | Jump_Case 0x8 01cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01cd 7807 |x | Jump 0x1d5 ; case 0x1 01ce 780a |x | Jump 0x1d9 ; case 0x2 01cf 780e |x | Jump 0x1de ; case 0x3 01d0 7811 |x | Jump 0x1e2 ; case 0x4 01d1 7812 |x | Jump 0x1e4 ; case 0x5 01d2 7813 |x | Jump 0x1e6 ; case 0x6 01d3 7816 |x | Jump 0x1ea ; case 0x7 01d4 4302 |C | .XXX[0x1] 01d5 00da | | Load_Top At_Offset_2 01d6 0091 060d | | Action Push_String_Extended_Indexed,0x60d ; "TYPE_ACTION" 01d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01d9 00db | | Load_Top At_Offset_3 01da 00db | | Load_Top At_Offset_3 01db 00e0 | | Load_Encached Standard_Cache 01dc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01dd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01de 00da | | Load_Top At_Offset_2 01df 00e0 | | Load_Encached Standard_Cache 01e0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01e1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01e2 00db | | Load_Top At_Offset_3 01e3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01e4 00db | | Load_Top At_Offset_3 01e5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01e6 e213 | | Load 0x1,0x13 01e7 00dc | | Load_Top At_Offset_4 01e8 0267 | g | Execute Discrete,Predecessor 01e9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01ea e213 | | Load 0x1,0x13 01eb 00dc | | Load_Top At_Offset_4 01ec 0268 | h | Execute Discrete,Successor 01ed 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01ee 0000 0000 | | .XXX[0x2] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 4607 |F | Jump_Case 0x8 01f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01f5 7807 |x | Jump 0x1fd ; case 0x1 01f6 780a |x | Jump 0x201 ; case 0x2 01f7 780e |x | Jump 0x206 ; case 0x3 01f8 7811 |x | Jump 0x20a ; case 0x4 01f9 7812 |x | Jump 0x20c ; case 0x5 01fa 7813 |x | Jump 0x20e ; case 0x6 01fb 7816 |x | Jump 0x212 ; case 0x7 01fc 4302 |C | .XXX[0x1] 01fd 00da | | Load_Top At_Offset_2 01fe 0091 0611 | | Action Push_String_Extended_Indexed,0x611 ; "GREATER" 0200 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0201 00db | | Load_Top At_Offset_3 0202 00db | | Load_Top At_Offset_3 0203 00e0 | | Load_Encached Standard_Cache 0204 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0205 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0206 00da | | Load_Top At_Offset_2 0207 00e0 | | Load_Encached Standard_Cache 0208 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0209 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 020a 00db | | Load_Top At_Offset_3 020b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 020c 00db | | Load_Top At_Offset_3 020d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 020e e214 | | Load 0x1,0x14 020f 00dc | | Load_Top At_Offset_4 0210 0267 | g | Execute Discrete,Predecessor 0211 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0212 e214 | | Load 0x1,0x14 0213 00dc | | Load_Top At_Offset_4 0214 0268 | h | Execute Discrete,Successor 0215 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0216 0000 0000 | | .XXX[0x2] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b 0092 0619 | | Action Push_String_Extended,0x619 ; ">" 021d e002 | | Load 0x0,0x2 021e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 021f 00db | | Load_Top At_Offset_3 0220 8006 | | Call 0x0,0x6 0221 0092 061a | | Action Push_String_Extended,0x61a ; "<" 0223 e002 | | Load 0x0,0x2 0224 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0225 e5ff | | Load 0x2,-0x1 0226 8006 | | Call 0x0,0x6 0227 0278 | x | Execute Discrete,Or 0228 0092 061b | | Action Push_String_Extended,0x61b ; "=" 022a e002 | | Load 0x0,0x2 022b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 022c e5ff | | Load 0x2,-0x1 022d 8006 | | Call 0x0,0x6 022e 0278 | x | Execute Discrete,Or 022f 6802 |h | Jump_Zero 0x232 0230 4801 |H | Short_Literal 0x1 0231 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0232 4800 |H | Short_Literal 0x0 0233 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0234 0000 0000 | | .BLANK 0000[0x4] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 0092 0619 | | Action Push_String_Extended,0x619 ; ">" 023d e002 | | Load 0x0,0x2 023e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 023f 00db | | Load_Top At_Offset_3 0240 8006 | | Call 0x0,0x6 0241 6802 |h | Jump_Zero 0x244 0242 4800 |H | Short_Literal 0x0 0243 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0244 0092 061a | | Action Push_String_Extended,0x61a ; "<" 0246 e002 | | Load 0x0,0x2 0247 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0248 00db | | Load_Top At_Offset_3 0249 8006 | | Call 0x0,0x6 024a 6802 |h | Jump_Zero 0x24d 024b 4801 |H | Short_Literal 0x1 024c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 024d 4802 |H | Short_Literal 0x2 024e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 024f 0000 | | .XXX[0x1] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 4607 |F | Jump_Case 0x8 0254 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0255 7807 |x | Jump 0x25d ; case 0x1 0256 780a |x | Jump 0x261 ; case 0x2 0257 780e |x | Jump 0x266 ; case 0x3 0258 7811 |x | Jump 0x26a ; case 0x4 0259 7812 |x | Jump 0x26c ; case 0x5 025a 7813 |x | Jump 0x26e ; case 0x6 025b 7816 |x | Jump 0x272 ; case 0x7 025c 4302 |C | .XXX[0x1] 025d 00da | | Load_Top At_Offset_2 025e 0091 0614 | | Action Push_String_Extended_Indexed,0x614 ; "TYPE_LEAF" 0260 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0261 00db | | Load_Top At_Offset_3 0262 00db | | Load_Top At_Offset_3 0263 00e0 | | Load_Encached Standard_Cache 0264 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0265 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0266 00da | | Load_Top At_Offset_2 0267 00e0 | | Load_Encached Standard_Cache 0268 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0269 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 026a 00db | | Load_Top At_Offset_3 026b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 026c 00db | | Load_Top At_Offset_3 026d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 026e e218 | | Load 0x1,0x18 026f 00dc | | Load_Top At_Offset_4 0270 0267 | g | Execute Discrete,Predecessor 0271 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0272 e218 | | Load 0x1,0x18 0273 00dc | | Load_Top At_Offset_4 0274 0268 | h | Execute Discrete,Successor 0275 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0276 0000 0000 | | .XXX[0x2] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b 4607 |F | Jump_Case 0x8 027c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 027d 7807 |x | Jump 0x285 ; case 0x1 027e 780a |x | Jump 0x289 ; case 0x2 027f 780e |x | Jump 0x28e ; case 0x3 0280 7811 |x | Jump 0x292 ; case 0x4 0281 7812 |x | Jump 0x294 ; case 0x5 0282 7813 |x | Jump 0x296 ; case 0x6 0283 7816 |x | Jump 0x29a ; case 0x7 0284 4302 |C | .XXX[0x1] 0285 00da | | Load_Top At_Offset_2 0286 0091 0616 | | Action Push_String_Extended_Indexed,0x616 ; "ET" 0288 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0289 00db | | Load_Top At_Offset_3 028a 00db | | Load_Top At_Offset_3 028b 00e0 | | Load_Encached Standard_Cache 028c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 028d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 028e 00da | | Load_Top At_Offset_2 028f 00e0 | | Load_Encached Standard_Cache 0290 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0291 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0292 00db | | Load_Top At_Offset_3 0293 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0294 00db | | Load_Top At_Offset_3 0295 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0296 e219 | | Load 0x1,0x19 0297 00dc | | Load_Top At_Offset_4 0298 0267 | g | Execute Discrete,Predecessor 0299 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 029a e219 | | Load 0x1,0x19 029b 00dc | | Load_Top At_Offset_4 029c 0268 | h | Execute Discrete,Successor 029d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 029e 0000 0000 | | .XXX[0x2] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02a3 | | .CONST 0x02a3 ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0001 | | .CONST 0x0001 ; Number of locals 02a3 BODY_02a0: 02a3 INIT_02a0: 02a3 00da | | Load_Top At_Offset_2 02a4 8222 | " | Call 0x1,0x22 02a5 00da | | Load_Top At_Offset_2 02a6 0227 | ' | Execute Access,All_Reference 02a7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 02a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a9 0000 0000 | | .BLANK 0000[0x7] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b5 | | .CONST 0x02b5 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0002 | | .CONST 0x0002 ; Number of locals 02b3 INIT_02b0: 02b3 e21b | | Load 0x1,0x1b 02b4 0007 | | Action Break_Optional 02b5 BODY_02b0: 02b5 4800 |H | Short_Literal 0x0 02b6 4802 |H | Short_Literal 0x2 02b7 e21b | | Load 0x1,0x1b 02b8 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 02b9 00d8 | | Load_Top At_Offset_0 02ba 0227 | ' | Execute Access,All_Reference 02bb 1c00 | | Execute_Immediate Run_Utility,0x0 02bc 0039 | 9 | Store_Top Access,At_Offset_1 02bd 00db | | Load_Top At_Offset_3 02be 00d9 | | Load_Top At_Offset_1 02bf 0227 | ' | Execute Access,All_Reference 02c0 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 02c1 00d8 | | Load_Top At_Offset_0 02c2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c3 0000 0000 | | .BLANK 0000[0x5] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cd | | .CONST 0x02cd ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0002 | | .CONST 0x0002 ; Number of locals 02cb INIT_02c8: 02cb e21b | | Load 0x1,0x1b 02cc 0007 | | Action Break_Optional 02cd BODY_02c8: 02cd 4801 |H | Short_Literal 0x1 02ce 4801 |H | Short_Literal 0x1 02cf e21b | | Load 0x1,0x1b 02d0 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 02d1 00d8 | | Load_Top At_Offset_0 02d2 0227 | ' | Execute Access,All_Reference 02d3 1c00 | | Execute_Immediate Run_Utility,0x0 02d4 0039 | 9 | Store_Top Access,At_Offset_1 02d5 00db | | Load_Top At_Offset_3 02d6 00d9 | | Load_Top At_Offset_1 02d7 0227 | ' | Execute Access,All_Reference 02d8 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 02d9 e5fe | | Load 0x2,-0x2 02da 00d9 | | Load_Top At_Offset_1 02db 0227 | ' | Execute Access,All_Reference 02dc 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 02dd e5fd | | Load 0x2,-0x3 02de 00d9 | | Load_Top At_Offset_1 02df 0227 | ' | Execute Access,All_Reference 02e0 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 02e1 00d8 | | Load_Top At_Offset_0 02e2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 02e3 0000 0000 | | .BLANK 0000[0x5] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02ed | | .CONST 0x02ed ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0002 | | .CONST 0x0002 ; Number of locals 02eb INIT_02e8: 02eb e21b | | Load 0x1,0x1b 02ec 0007 | | Action Break_Optional 02ed BODY_02e8: 02ed 4801 |H | Short_Literal 0x1 02ee 4801 |H | Short_Literal 0x1 02ef e21b | | Load 0x1,0x1b 02f0 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 02f1 00d8 | | Load_Top At_Offset_0 02f2 0227 | ' | Execute Access,All_Reference 02f3 1c00 | | Execute_Immediate Run_Utility,0x0 02f4 0039 | 9 | Store_Top Access,At_Offset_1 02f5 00db | | Load_Top At_Offset_3 02f6 00d9 | | Load_Top At_Offset_1 02f7 0227 | ' | Execute Access,All_Reference 02f8 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 02f9 e5fe | | Load 0x2,-0x2 02fa 00d9 | | Load_Top At_Offset_1 02fb 0227 | ' | Execute Access,All_Reference 02fc 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 02fd e21b | | Load 0x1,0x1b 02fe 00d9 | | Load_Top At_Offset_1 02ff 0227 | ' | Execute Access,All_Reference 0300 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0301 00d8 | | Load_Top At_Offset_0 0302 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0303 0000 0000 | | .BLANK 0000[0x5] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030d | | .CONST 0x030d ; Address of begin 0309 0320 | | .CONST 0x0320 ; Address of exception handler 030a 0002 | | .CONST 0x0002 ; Number of locals 030b INIT_0308: 030b e20d | | Load 0x1,0xd 030c 0007 | | Action Break_Optional 030d BODY_0308: 030d 00db | | Load_Top At_Offset_3 030e e002 | | Load 0x0,0x2 030f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0310 e20d | | Load 0x1,0xd 0311 1c02 | | Execute_Immediate Run_Utility,0x2 0312 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0313 00d8 | | Load_Top At_Offset_0 0314 0f08 | | Execute_Immediate Equal,0x8 0315 6803 |h | Jump_Zero 0x319 0316 4802 |H | Short_Literal 0x2 0317 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0318 7805 |x | Jump 0x31e 0319 00d8 | | Load_Top At_Offset_0 031a 0f07 | | Execute_Immediate Equal,0x7 031b 6802 |h | Jump_Zero 0x31e 031c 4804 |H | Short_Literal 0x4 031d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 031e 00d8 | | Load_Top At_Offset_0 031f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0320 TRAP_0308: 0320 010e | | Execute Exception,Is_Constraint_Error 0321 6802 |h | Jump_Zero 0x324 0322 4819 |H | Short_Literal 0x19 0323 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0324 0100 | | Execute Exception,Raise 0325 0000 0000 | | .XXX[0x3] 0327 0000 | | 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 0334 | 4 | .CONST 0x0334 ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0008 | | .CONST 0x0008 ; Number of locals 032b INIT_0328: 032b 00e1 | | Load_Encached Boolean_Cache 032c e007 | | Load 0x0,0x7 032d 0322 | " | Declare_Variable Record 032e 00e2 | | Load_Encached Integer_Cache 032f e002 | | Load 0x0,0x2 0330 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0331 03bd | | Declare_Variable Access,Duplicate 0332 03bd | | Declare_Variable Access,Duplicate 0333 03bd | | Declare_Variable Access,Duplicate 0334 BODY_0328: 0334 e403 | | Load 0x2,0x3 0335 8008 | | Call 0x0,0x8 0336 00d1 | | Pop_Control Pop_Count_1 0337 e5ff | | Load 0x2,-0x1 0338 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0339 4603 |F | Jump_Case 0x4 033a 781e |x | Jump 0x359 ; case 0x0 033b 789d |x | Jump 0x3d9 ; case 0x1 033c 7964 |yd | Jump 0x4a1 ; case 0x2 033d 7800 |x | Jump 0x33e ; case 0x3 033e e5ff | | Load 0x2,-0x1 033f 2e0a |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa 0340 4602 |F | Jump_Case 0x3 0341 7809 |x | Jump 0x34b ; case 0x0 0342 780f |x | Jump 0x352 ; case 0x1 0343 7800 |x | Jump 0x344 ; case 0x2 0344 e5ff | | Load 0x2,-0x1 0345 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0346 8009 | | Call 0x0,0x9 0347 e5ff | | Load 0x2,-0x1 0348 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0349 027f | | Execute Discrete,Equal 034a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 034b e5ff | | Load 0x2,-0x1 034c 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 034d 8009 | | Call 0x0,0x9 034e e5ff | | Load 0x2,-0x1 034f 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0350 027d | } | Execute Discrete,Greater 0351 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0352 e5ff | | Load 0x2,-0x1 0353 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0354 8009 | | Call 0x0,0x9 0355 e5ff | | Load 0x2,-0x1 0356 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0357 027c | | | Execute Discrete,Less 0358 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0359 e403 | | Load 0x2,0x3 035a 800a | | Call 0x0,0xa 035b 800b | | Call 0x0,0xb 035c 00d1 | | Pop_Control Pop_Count_1 035d e403 | | Load 0x2,0x3 035e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 035f e5ff | | Load 0x2,-0x1 0360 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0361 027e | ~ | Execute Discrete,Not_Equal 0362 6803 |h | Jump_Zero 0x366 0363 4800 |H | Short_Literal 0x0 0364 a402 | | Store_Unchecked 0x2,0x2 0365 7871 |xq | Jump 0x3d7 0366 4801 |H | Short_Literal 0x1 0367 a402 | | Store_Unchecked 0x2,0x2 0368 4801 |H | Short_Literal 0x1 0369 e403 | | Load 0x2,0x3 036a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 036b 01d7 | | Execute Vector,Field_Read 036c 4801 |H | Short_Literal 0x1 036d e5ff | | Load 0x2,-0x1 036e 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 036f 01d5 | | Execute Vector,Field_Reference 0370 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0371 8006 | | Call 0x0,0x6 0372 6862 |hb | Jump_Zero 0x3d5 0373 e403 | | Load 0x2,0x3 0374 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0375 0c02 | | Execute_Immediate Greater_Equal,0x2 0376 6860 |h` | Jump_Zero 0x3d7 0377 4802 |H | Short_Literal 0x2 0378 e5ff | | Load 0x2,-0x1 0379 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 037a 01d5 | | Execute Vector,Field_Reference 037b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 037c 800c | | Call 0x0,0xc 037d 683b |h; | Jump_Zero 0x3b9 037e 4802 |H | Short_Literal 0x2 037f e5ff | | Load 0x2,-0x1 0380 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0381 01d5 | | Execute Vector,Field_Reference 0382 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0383 0f10 | | Execute_Immediate Equal,0x10 0384 6814 |h | Jump_Zero 0x399 0385 e00d | | Load 0x0,0xd 0386 4802 |H | Short_Literal 0x2 0387 e5ff | | Load 0x2,-0x1 0388 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0389 01d5 | | Execute Vector,Field_Reference 038a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 038b 800e | | Call 0x0,0xe 038c 00d8 | | Load_Top At_Offset_0 038d 00da | | Load_Top At_Offset_2 038e 01d7 | | Execute Vector,Field_Read 038f 4802 |H | Short_Literal 0x2 0390 e403 | | Load 0x2,0x3 0391 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0392 01d7 | | Execute Vector,Field_Read 0393 8005 | | Call 0x0,0x5 0394 00d9 | | Load_Top At_Offset_1 0395 00db | | Load_Top At_Offset_3 0396 01d6 | | Execute Vector,Field_Write 0397 00d2 | | Pop_Control Pop_Count_2 0398 783e |x> | Jump 0x3d7 0399 4802 |H | Short_Literal 0x2 039a e403 | | Load 0x2,0x3 039b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 039c 01d7 | | Execute Vector,Field_Read 039d 820e | | Call 0x1,0xe 039e 4802 |H | Short_Literal 0x2 039f e5ff | | Load 0x2,-0x1 03a0 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03a1 01d5 | | Execute Vector,Field_Reference 03a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03a3 027f | | Execute Discrete,Equal 03a4 6832 |h2 | Jump_Zero 0x3d7 03a5 e00d | | Load 0x0,0xd 03a6 4802 |H | Short_Literal 0x2 03a7 e5ff | | Load 0x2,-0x1 03a8 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03a9 01d5 | | Execute Vector,Field_Reference 03aa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03ab 800e | | Call 0x0,0xe 03ac 00d8 | | Load_Top At_Offset_0 03ad 00da | | Load_Top At_Offset_2 03ae 01d7 | | Execute Vector,Field_Read 03af 4802 |H | Short_Literal 0x2 03b0 e403 | | Load 0x2,0x3 03b1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03b2 01d7 | | Execute Vector,Field_Read 03b3 8005 | | Call 0x0,0x5 03b4 00d9 | | Load_Top At_Offset_1 03b5 00db | | Load_Top At_Offset_3 03b6 01d6 | | Execute Vector,Field_Write 03b7 00d2 | | Pop_Control Pop_Count_2 03b8 781e |x | Jump 0x3d7 03b9 4802 |H | Short_Literal 0x2 03ba a404 | | Store_Unchecked 0x2,0x4 03bb 00cf | | Action Mark_Auxiliary 03bc e404 | | Load 0x2,0x4 03bd e403 | | Load 0x2,0x3 03be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03bf 027d | } | Execute Discrete,Greater 03c0 7012 |p | Jump_Nonzero 0x3d3 03c1 e404 | | Load 0x2,0x4 03c2 e403 | | Load 0x2,0x3 03c3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03c4 01d7 | | Execute Vector,Field_Read 03c5 e404 | | Load 0x2,0x4 03c6 e5ff | | Load 0x2,-0x1 03c7 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03c8 01d5 | | Execute Vector,Field_Reference 03c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03ca 8006 | | Call 0x0,0x6 03cb 7002 |p | Jump_Nonzero 0x3ce 03cc 4800 |H | Short_Literal 0x0 03cd a402 | | Store_Unchecked 0x2,0x2 03ce e404 | | Load 0x2,0x4 03cf 0a01 | | Execute_Immediate Plus,0x1 03d0 c404 | | Store 0x2,0x4 03d1 00c9 | | Action Pop_Auxiliary_Loop 03d2 7fe9 | | Jump 0x3bc 03d3 00ce | | Action Pop_Auxiliary 03d4 7802 |x | Jump 0x3d7 03d5 4800 |H | Short_Literal 0x0 03d6 a402 | | Store_Unchecked 0x2,0x2 03d7 e402 | | Load 0x2,0x2 03d8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03d9 e5ff | | Load 0x2,-0x1 03da 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 03db 0f02 | | Execute_Immediate Equal,0x2 03dc 6808 |h | Jump_Zero 0x3e5 03dd 4801 |H | Short_Literal 0x1 03de e5ff | | Load 0x2,-0x1 03df 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03e0 01d5 | | Execute Vector,Field_Reference 03e1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03e2 800f | | Call 0x0,0xf 03e3 8010 | | Call 0x0,0x10 03e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03e5 e5ff | | Load 0x2,-0x1 03e6 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 03e7 0f03 | | Execute_Immediate Equal,0x3 03e8 6852 |hR | Jump_Zero 0x43b 03e9 4801 |H | Short_Literal 0x1 03ea e5ff | | Load 0x2,-0x1 03eb 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03ec 01d5 | | Execute Vector,Field_Reference 03ed 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03ee 0e02 | | Execute_Immediate Not_Equal,0x2 03ef 682d |h- | Jump_Zero 0x41d 03f0 4801 |H | Short_Literal 0x1 03f1 e5ff | | Load 0x2,-0x1 03f2 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03f3 01d5 | | Execute Vector,Field_Reference 03f4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03f5 7014 |p | Jump_Nonzero 0x40a 03f6 4803 |H | Short_Literal 0x3 03f7 e5ff | | Load 0x2,-0x1 03f8 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03f9 01d5 | | Execute Vector,Field_Reference 03fa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03fb 800f | | Call 0x0,0xf 03fc e011 | | Load 0x0,0x11 03fd 4802 |H | Short_Literal 0x2 03fe e5ff | | Load 0x2,-0x1 03ff 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0400 01d5 | | Execute Vector,Field_Reference 0401 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0402 4801 |H | Short_Literal 0x1 0403 e5ff | | Load 0x2,-0x1 0404 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0405 01d5 | | Execute Vector,Field_Reference 0406 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0407 800f | | Call 0x0,0xf 0408 8012 | | Call 0x0,0x12 0409 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 040a 4803 |H | Short_Literal 0x3 040b e5ff | | Load 0x2,-0x1 040c 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 040d 01d5 | | Execute Vector,Field_Reference 040e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 040f 800f | | Call 0x0,0xf 0410 4802 |H | Short_Literal 0x2 0411 e5ff | | Load 0x2,-0x1 0412 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0413 01d5 | | Execute Vector,Field_Reference 0414 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0415 4801 |H | Short_Literal 0x1 0416 e5ff | | Load 0x2,-0x1 0417 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0418 01d5 | | Execute Vector,Field_Reference 0419 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 041a 800f | | Call 0x0,0xf 041b 8013 | | Call 0x0,0x13 041c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 041d 00db | | Load_Top At_Offset_3 041e 4801 |H | Short_Literal 0x1 041f e5ff | | Load 0x2,-0x1 0420 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0421 01d5 | | Execute Vector,Field_Reference 0422 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0423 800f | | Call 0x0,0xf 0424 8005 | | Call 0x0,0x5 0425 c405 | | Store 0x2,0x5 0426 00d8 | | Load_Top At_Offset_0 0427 4803 |H | Short_Literal 0x3 0428 e5ff | | Load 0x2,-0x1 0429 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 042a 01d5 | | Execute Vector,Field_Reference 042b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 042c 800f | | Call 0x0,0xf 042d 8005 | | Call 0x0,0x5 042e 0039 | 9 | Store_Top Access,At_Offset_1 042f 00e1 | | Load_Encached Boolean_Cache 0430 e011 | | Load 0x0,0x11 0431 e014 | | Load 0x0,0x14 0432 e405 | | Load 0x2,0x5 0433 e408 | | Load 0x2,0x8 0434 8015 | | Call 0x0,0x15 0435 c405 | | Store 0x2,0x5 0436 c014 | | Store 0x0,0x14 0437 c011 | | Store 0x0,0x11 0438 c402 | | Store 0x2,0x2 0439 e402 | | Load 0x2,0x2 043a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 043b 4802 |H | Short_Literal 0x2 043c e5ff | | Load 0x2,-0x1 043d 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 043e 01d5 | | Execute Vector,Field_Reference 043f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0440 0f11 | | Execute_Immediate Equal,0x11 0441 681d |h | Jump_Zero 0x45f 0442 00d9 | | Load_Top At_Offset_1 0443 4801 |H | Short_Literal 0x1 0444 e5ff | | Load 0x2,-0x1 0445 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0446 01d5 | | Execute Vector,Field_Reference 0447 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0448 800f | | Call 0x0,0xf 0449 8005 | | Call 0x0,0x5 044a 003a | : | Store_Top Access,At_Offset_2 044b 00d8 | | Load_Top At_Offset_0 044c 4804 |H | Short_Literal 0x4 044d e5ff | | Load 0x2,-0x1 044e 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 044f 01d5 | | Execute Vector,Field_Reference 0450 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0451 800f | | Call 0x0,0xf 0452 8005 | | Call 0x0,0x5 0453 0039 | 9 | Store_Top Access,At_Offset_1 0454 00e1 | | Load_Encached Boolean_Cache 0455 e011 | | Load 0x0,0x11 0456 e014 | | Load 0x0,0x14 0457 e407 | | Load 0x2,0x7 0458 e408 | | Load 0x2,0x8 0459 8016 | | Call 0x0,0x16 045a c014 | | Store 0x0,0x14 045b c011 | | Store 0x0,0x11 045c c402 | | Store 0x2,0x2 045d e402 | | Load 0x2,0x2 045e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 045f 4804 |H | Short_Literal 0x4 0460 e5ff | | Load 0x2,-0x1 0461 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0462 01d5 | | Execute Vector,Field_Reference 0463 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0464 0f02 | | Execute_Immediate Equal,0x2 0465 681e |h | Jump_Zero 0x484 0466 00db | | Load_Top At_Offset_3 0467 4804 |H | Short_Literal 0x4 0468 e5ff | | Load 0x2,-0x1 0469 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 046a 01d5 | | Execute Vector,Field_Reference 046b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 046c 800f | | Call 0x0,0xf 046d 8005 | | Call 0x0,0x5 046e c405 | | Store 0x2,0x5 046f 00d8 | | Load_Top At_Offset_0 0470 4801 |H | Short_Literal 0x1 0471 e5ff | | Load 0x2,-0x1 0472 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0473 01d5 | | Execute Vector,Field_Reference 0474 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0475 800f | | Call 0x0,0xf 0476 8005 | | Call 0x0,0x5 0477 0039 | 9 | Store_Top Access,At_Offset_1 0478 00e1 | | Load_Encached Boolean_Cache 0479 e011 | | Load 0x0,0x11 047a e014 | | Load 0x0,0x14 047b e405 | | Load 0x2,0x5 047c e408 | | Load 0x2,0x8 047d 8017 | | Call 0x0,0x17 047e c405 | | Store 0x2,0x5 047f c014 | | Store 0x0,0x14 0480 c011 | | Store 0x0,0x11 0481 c402 | | Store 0x2,0x2 0482 e402 | | Load 0x2,0x2 0483 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0484 00da | | Load_Top At_Offset_2 0485 4804 |H | Short_Literal 0x4 0486 e5ff | | Load 0x2,-0x1 0487 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0488 01d5 | | Execute Vector,Field_Reference 0489 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 048a 800f | | Call 0x0,0xf 048b 8005 | | Call 0x0,0x5 048c 003b | ; | Store_Top Access,At_Offset_3 048d 00d8 | | Load_Top At_Offset_0 048e 4801 |H | Short_Literal 0x1 048f e5ff | | Load 0x2,-0x1 0490 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0491 01d5 | | Execute Vector,Field_Reference 0492 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0493 800f | | Call 0x0,0xf 0494 8005 | | Call 0x0,0x5 0495 0039 | 9 | Store_Top Access,At_Offset_1 0496 00e1 | | Load_Encached Boolean_Cache 0497 e011 | | Load 0x0,0x11 0498 e014 | | Load 0x0,0x14 0499 e406 | | Load 0x2,0x6 049a e408 | | Load 0x2,0x8 049b 8018 | | Call 0x0,0x18 049c c014 | | Store 0x0,0x14 049d c011 | | Store 0x0,0x11 049e c402 | | Store 0x2,0x2 049f e402 | | Load 0x2,0x2 04a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a1 e5ff | | Load 0x2,-0x1 04a2 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 04a3 e5ff | | Load 0x2,-0x1 04a4 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 04a5 027e | ~ | Execute Discrete,Not_Equal 04a6 680f |h | Jump_Zero 0x4b6 04a7 4801 |H | Short_Literal 0x1 04a8 e5ff | | Load 0x2,-0x1 04a9 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5 04aa 01d5 | | Execute Vector,Field_Reference 04ab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04ac 800f | | Call 0x0,0xf 04ad 4801 |H | Short_Literal 0x1 04ae e5ff | | Load 0x2,-0x1 04af 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 04b0 01d5 | | Execute Vector,Field_Reference 04b1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b2 800f | | Call 0x0,0xf 04b3 8019 | | Call 0x0,0x19 04b4 8006 | | Call 0x0,0x6 04b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b6 4802 |H | Short_Literal 0x2 04b7 e5ff | | Load 0x2,-0x1 04b8 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 04b9 01d5 | | Execute Vector,Field_Reference 04ba 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04bb 0f09 | | Execute_Immediate Equal,0x9 04bc 680e |h | Jump_Zero 0x4cb 04bd 4801 |H | Short_Literal 0x1 04be e5ff | | Load 0x2,-0x1 04bf 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5 04c0 01d5 | | Execute Vector,Field_Reference 04c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04c2 800f | | Call 0x0,0xf 04c3 4801 |H | Short_Literal 0x1 04c4 e5ff | | Load 0x2,-0x1 04c5 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 04c6 01d5 | | Execute Vector,Field_Reference 04c7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04c8 800f | | Call 0x0,0xf 04c9 801a | | Call 0x0,0x1a 04ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04cb 4802 |H | Short_Literal 0x2 04cc e5ff | | Load 0x2,-0x1 04cd 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 04ce 01d5 | | Execute Vector,Field_Reference 04cf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04d0 0f0a | | Execute_Immediate Equal,0xa 04d1 680e |h | Jump_Zero 0x4e0 04d2 4801 |H | Short_Literal 0x1 04d3 e5ff | | Load 0x2,-0x1 04d4 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5 04d5 01d5 | | Execute Vector,Field_Reference 04d6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04d7 800f | | Call 0x0,0xf 04d8 4801 |H | Short_Literal 0x1 04d9 e5ff | | Load 0x2,-0x1 04da 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 04db 01d5 | | Execute Vector,Field_Reference 04dc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04dd 800f | | Call 0x0,0xf 04de 801b | | Call 0x0,0x1b 04df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04e0 4801 |H | Short_Literal 0x1 04e1 e5ff | | Load 0x2,-0x1 04e2 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5 04e3 01d5 | | Execute Vector,Field_Reference 04e4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04e5 800f | | Call 0x0,0xf 04e6 4801 |H | Short_Literal 0x1 04e7 e5ff | | Load 0x2,-0x1 04e8 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 04e9 01d5 | | Execute Vector,Field_Reference 04ea 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04eb 800f | | Call 0x0,0xf 04ec 801c | | Call 0x0,0x1c 04ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04ee 0000 0000 | | .XXX[0x2] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 04f3 | | .CONST 0x04f3 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0001 | | .CONST 0x0001 ; Number of locals 04f3 BODY_04f0: 04f3 INIT_04f0: 04f3 00da | | Load_Top At_Offset_2 04f4 0227 | ' | Execute Access,All_Reference 04f5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04f6 0f01 | | Execute_Immediate Equal,0x1 04f7 683b |h; | Jump_Zero 0x533 04f8 00da | | Load_Top At_Offset_2 04f9 0227 | ' | Execute Access,All_Reference 04fa 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 04fb 8222 | " | Call 0x1,0x22 04fc 00da | | Load_Top At_Offset_2 04fd 0227 | ' | Execute Access,All_Reference 04fe 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 04ff 6804 |h | Jump_Zero 0x504 0500 00da | | Load_Top At_Offset_2 0501 0227 | ' | Execute Access,All_Reference 0502 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0503 8222 | " | Call 0x1,0x22 0504 00da | | Load_Top At_Offset_2 0505 0227 | ' | Execute Access,All_Reference 0506 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0507 4602 |F | Jump_Case 0x3 0508 780c |x | Jump 0x515 ; case 0x0 0509 781a |x | Jump 0x524 ; case 0x1 050a 7800 |x | Jump 0x50b ; case 0x2 050b 00da | | Load_Top At_Offset_2 050c 0227 | ' | Execute Access,All_Reference 050d 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 050e 0227 | ' | Execute Access,All_Reference 050f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0510 0f00 | | Execute_Immediate Equal,0x0 0511 00db | | Load_Top At_Offset_3 0512 0227 | ' | Execute Access,All_Reference 0513 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0514 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0515 00da | | Load_Top At_Offset_2 0516 0227 | ' | Execute Access,All_Reference 0517 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0518 0227 | ' | Execute Access,All_Reference 0519 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 051a 00db | | Load_Top At_Offset_3 051b 0227 | ' | Execute Access,All_Reference 051c 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 051d 0227 | ' | Execute Access,All_Reference 051e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 051f 0279 | y | Execute Discrete,And 0520 00db | | Load_Top At_Offset_3 0521 0227 | ' | Execute Access,All_Reference 0522 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0523 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0524 00da | | Load_Top At_Offset_2 0525 0227 | ' | Execute Access,All_Reference 0526 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0527 0227 | ' | Execute Access,All_Reference 0528 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0529 00db | | Load_Top At_Offset_3 052a 0227 | ' | Execute Access,All_Reference 052b 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 052c 0227 | ' | Execute Access,All_Reference 052d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 052e 0278 | x | Execute Discrete,Or 052f 00db | | Load_Top At_Offset_3 0530 0227 | ' | Execute Access,All_Reference 0531 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0532 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0533 00da | | Load_Top At_Offset_2 0534 0227 | ' | Execute Access,All_Reference 0535 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0536 8221 | ! | Call 0x1,0x21 0537 00db | | Load_Top At_Offset_3 0538 0227 | ' | Execute Access,All_Reference 0539 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 053a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 053b 0000 0000 | | .BLANK 0000[0x5] 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 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 BODY_0540: 0543 INIT_0540: 0543 INIT_0540: 0543 4609 |F | Jump_Case 0xa 0544 7809 |x | Jump 0x54e ; case 0x0 0545 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0546 781b |x | Jump 0x562 ; case 0x2 0547 781e |x | Jump 0x566 ; case 0x3 0548 7823 |x# | Jump 0x56c ; case 0x4 0549 782d |x- | Jump 0x577 ; case 0x5 054a 7834 |x4 | Jump 0x57f ; case 0x6 054b 783a |x: | Jump 0x586 ; case 0x7 054c 7843 |xC | Jump 0x590 ; case 0x8 054d 7849 |xI | Jump 0x597 ; case 0x9 054e 00da | | Load_Top At_Offset_2 054f 016c | l | Execute Variant_Record,Is_Constrained 0550 7009 |p | Jump_Nonzero 0x55a 0551 00cf | | Action Mark_Auxiliary 0552 4801 |H | Short_Literal 0x1 0553 e5ff | | Load 0x2,-0x1 0554 1c08 | | Execute_Immediate Run_Utility,0x8 0555 00d8 | | Load_Top At_Offset_0 0556 1c00 | | Execute_Immediate Run_Utility,0x0 0557 c5ff | | Store 0x2,-0x1 0558 00ce | | Action Pop_Auxiliary 0559 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 055a 00da | | Load_Top At_Offset_2 055b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 055c 0f01 | | Execute_Immediate Equal,0x1 055d 7003 |p | Jump_Nonzero 0x561 055e 00da | | Load_Top At_Offset_2 055f 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0560 1c00 | | Execute_Immediate Run_Utility,0x0 0561 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0562 4801 |H | Short_Literal 0x1 0563 4806 |H | Short_Literal 0x6 0564 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 0565 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0566 e5fd | | Load 0x2,-0x3 0567 00db | | Load_Top At_Offset_3 0568 1c07 | | Execute_Immediate Run_Utility,0x7 0569 e5fe | | Load 0x2,-0x2 056a 0306 | | Complete_Type Variant_Record,By_Renaming 056b 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 056c 4801 |H | Short_Literal 0x1 056d 4806 |H | Short_Literal 0x6 056e 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 056f e5fe | | Load 0x2,-0x2 0570 00d8 | | Load_Top At_Offset_0 0571 e5ff | | Load 0x2,-0x1 0572 1c06 | | Execute_Immediate Run_Utility,0x6 0573 e5ff | | Load 0x2,-0x1 0574 00db | | Load_Top At_Offset_3 0575 0305 | | Complete_Type Variant_Record,By_Constraining_Incomplete 0576 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0577 4801 |H | Short_Literal 0x1 0578 00db | | Load_Top At_Offset_3 0579 0169 | i | Execute Variant_Record,Read_Discriminant_Constraint 057a 0f01 | | Execute_Immediate Equal,0x1 057b 7000 |p | Jump_Nonzero 0x57c 057c e5ff | | Load 0x2,-0x1 057d 0304 | | Complete_Type Variant_Record,By_Completing_Constraint 057e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 057f 00db | | Load_Top At_Offset_3 0580 0f01 | | Execute_Immediate Equal,0x1 0581 7002 |p | Jump_Nonzero 0x584 0582 4802 |H | Short_Literal 0x2 0583 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0584 4801 |H | Short_Literal 0x1 0585 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0586 00db | | Load_Top At_Offset_3 0587 e5fe | | Load 0x2,-0x2 0588 0f01 | | Execute_Immediate Equal,0x1 0589 7002 |p | Jump_Nonzero 0x58c 058a 4802 |H | Short_Literal 0x2 058b 7801 |x | Jump 0x58d 058c 4801 |H | Short_Literal 0x1 058d e5ff | | Load 0x2,-0x1 058e 031b | | Declare_Type Variant_Record,Constrained 058f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0590 00db | | Load_Top At_Offset_3 0591 e5fe | | Load 0x2,-0x2 0592 e5ff | | Load 0x2,-0x1 0593 1c06 | | Execute_Immediate Run_Utility,0x6 0594 e5ff | | Load 0x2,-0x1 0595 02fc | | Declare_Variable Variant_Record,With_Constraint 0596 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0597 4801 |H | Short_Literal 0x1 0598 00db | | Load_Top At_Offset_3 0599 1c07 | | Execute_Immediate Run_Utility,0x7 059a 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 059b 0000 0000 | | .BLANK 0000[0x5] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 4609 |F | Jump_Case 0xa 05a4 7809 |x | Jump 0x5ae ; case 0x0 05a5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 05a6 781b |x | Jump 0x5c2 ; case 0x2 05a7 781e |x | Jump 0x5c6 ; case 0x3 05a8 7849 |xI | Jump 0x5f2 ; case 0x4 05a9 7848 |xH | Jump 0x5f2 ; case 0x5 05aa 7821 |x! | Jump 0x5cc ; case 0x6 05ab 782c |x, | Jump 0x5d8 ; case 0x7 05ac 783a |x: | Jump 0x5e7 ; case 0x8 05ad 7840 |x@ | Jump 0x5ee ; case 0x9 05ae 00da | | Load_Top At_Offset_2 05af 016c | l | Execute Variant_Record,Is_Constrained 05b0 7009 |p | Jump_Nonzero 0x5ba 05b1 00cf | | Action Mark_Auxiliary 05b2 4800 |H | Short_Literal 0x0 05b3 e5ff | | Load 0x2,-0x1 05b4 1c08 | | Execute_Immediate Run_Utility,0x8 05b5 00d8 | | Load_Top At_Offset_0 05b6 1c00 | | Execute_Immediate Run_Utility,0x0 05b7 c5ff | | Store 0x2,-0x1 05b8 00ce | | Action Pop_Auxiliary 05b9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 05ba 00da | | Load_Top At_Offset_2 05bb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05bc 4603 |F | Jump_Case 0x4 05bd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 05be 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 05bf 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 05c0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 05c1 4302 |C | .XXX[0x1] 05c2 4801 |H | Short_Literal 0x1 05c3 480a |H | Short_Literal 0xa 05c4 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 05c5 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 05c6 e5fd | | Load 0x2,-0x3 05c7 00db | | Load_Top At_Offset_3 05c8 1c07 | | Execute_Immediate Run_Utility,0x7 05c9 e5fe | | Load 0x2,-0x2 05ca 0306 | | Complete_Type Variant_Record,By_Renaming 05cb 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 05cc 00db | | Load_Top At_Offset_3 05cd 4603 |F | Jump_Case 0x4 05ce 7805 |x | Jump 0x5d4 ; case 0x0 05cf 7804 |x | Jump 0x5d4 ; case 0x1 05d0 7805 |x | Jump 0x5d6 ; case 0x2 05d1 7800 |x | Jump 0x5d2 ; case 0x3 05d2 4803 |H | Short_Literal 0x3 05d3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d4 4801 |H | Short_Literal 0x1 05d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d6 4802 |H | Short_Literal 0x2 05d7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d8 00db | | Load_Top At_Offset_3 05d9 e5fe | | Load 0x2,-0x2 05da 4603 |F | Jump_Case 0x4 05db 7805 |x | Jump 0x5e1 ; case 0x0 05dc 7804 |x | Jump 0x5e1 ; case 0x1 05dd 7805 |x | Jump 0x5e3 ; case 0x2 05de 7800 |x | Jump 0x5df ; case 0x3 05df 4803 |H | Short_Literal 0x3 05e0 7803 |x | Jump 0x5e4 05e1 4801 |H | Short_Literal 0x1 05e2 7801 |x | Jump 0x5e4 05e3 4802 |H | Short_Literal 0x2 05e4 e5ff | | Load 0x2,-0x1 05e5 031b | | Declare_Type Variant_Record,Constrained 05e6 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05e7 00db | | Load_Top At_Offset_3 05e8 e5fe | | Load 0x2,-0x2 05e9 e5ff | | Load 0x2,-0x1 05ea 1c06 | | Execute_Immediate Run_Utility,0x6 05eb e5ff | | Load 0x2,-0x1 05ec 02fc | | Declare_Variable Variant_Record,With_Constraint 05ed 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05ee 4800 |H | Short_Literal 0x0 05ef 00db | | Load_Top At_Offset_3 05f0 1c07 | | Execute_Immediate Run_Utility,0x7 05f1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 05f2 0869 | i | Execute_Immediate Raise,0x69 05f3 ; -------------------------------------------------------------------------------------- 05f3 ; STRING TABLE 05f3 ; -------------------------------------------------------------------------------------- 05f3 0054 | T | .STRTAB 0x0054->0x061d ; "COMMUNICATION" 05f4 005f | _ | .STRTAB 0x005f->0x0623 ; "COMPTEUR" 05f5 0065 | e | .STRTAB 0x0065->0x0627 ; "LIEU" 05f6 0067 | g | .STRTAB 0x0067->0x0629 ; "OBJET" 05f7 006a | j | .STRTAB 0x006a->0x062c ; "PERSONNAGE" 05f8 0072 | r | .STRTAB 0x0072->0x0631 ; "VERBE" 05f9 0075 | u | .STRTAB 0x0075->0x0633 ; "PREPOSITION" 05fa 007e | ~ | .STRTAB 0x007e->0x0639 ; "JOUEUR" 05fb 0082 | | .STRTAB 0x0082->0x063c ; "POSITIONCOURANTE" 05fc 0090 | | .STRTAB 0x0090->0x0644 ; "ETAT" 05fd 0092 | | .STRTAB 0x0092->0x0646 ; "POSSESSION" 05fe 009a | | .STRTAB 0x009a->0x064b ; "POSITION" 05ff 00a0 | | .STRTAB 0x00a0->0x064f ; "CONTENU" 0600 00a5 | | .STRTAB 0x00a5->0x0652 ; "EXISTE" 0601 00a9 | | .STRTAB 0x00a9->0x0655 ; "SORTIE" 0602 00ad | | .STRTAB 0x00ad->0x0658 ; "VERS" 0603 00af | | .STRTAB 0x00af->0x065a ; "DIRECTION" 0604 00b6 | | .STRTAB 0x00b6->0x065f ; "EST" 0605 00b7 | | .STRTAB 0x00b7->0x0660 ; "DANS" 0606 00b9 | | .STRTAB 0x00b9->0x0662 ; "RELIEA" 0607 00bd | | .STRTAB 0x00bd->0x0665 ; "TEXTE" 0608 00c0 | | .STRTAB 0x00c0->0x0668 ; "GREATER_THAN" 0609 00ca | | .STRTAB 0x00ca->0x066e ; "LESS_THAN" 060a 00d1 | | .STRTAB 0x00d1->0x0672 ; "EQUAL" 060b 00d4 | | .STRTAB 0x00d4->0x0675 ; "NUMBER" 060c 00d8 | | .STRTAB 0x00d8->0x0678 ; "UNKNOWN" 060d 00dd | | .STRTAB 0x00dd->0x067b ; "TYPE_ACTION" 060e 00e6 | | .STRTAB 0x00e6->0x0681 ; "TYPE_RECHERCHE" 060f 00f2 | | .STRTAB 0x00f2->0x0688 ; "TYPE_EGALITE" 0610 00fc | | .STRTAB 0x00fc->0x068e ; "TYPE_COMPARAISON" 0611 010a | | .STRTAB 0x010a->0x0696 ; "GREATER" 0612 010f | | .STRTAB 0x010f->0x0699 ; "LESS" 0613 0111 | | .STRTAB 0x0111->0x069b ; "EQUAL_AS" 0614 0117 | | .STRTAB 0x0117->0x069f ; "TYPE_LEAF" 0615 011e | | .STRTAB 0x011e->0x06a4 ; "TYPE_NODE" 0616 0125 | % | .STRTAB 0x0125->0x06a8 ; "ET" 0617 0125 | % | .STRTAB 0x0125->0x06a9 ; "OU" 0618 0125 | % | .STRTAB 0x0125->0x06aa ; "NON" 0619 0126 | & | .STRTAB 0x0126->0x06ac ; ">" 061a 0125 | % | .STRTAB 0x0125->0x06ac ; "<" 061b 0124 | $ | .STRTAB 0x0124->0x06ad ; "=" 061c 0123 | # | .STREND 0x0123->0x06ad 061d 434f 4d4d |COMM| .STRTAB_STRINGS 06ae 0000 0000 | | .XXX[0x2] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; Debug Table 06b0 ; -------------------------------------------------------------------------------------- 06b0 0004 0008 | | .DEBUG4 0x0004,0x0008,0xe3ed,0x0000,0x0001,0x0015 06b6 000b 070a | | .DBG4T 0x000b,0x070a,0x8000,0x8000 06ba 0077 0734 | w 4| .DBG4T 0x0077,0x0734,0x8000,0x8000 06be 009b 0000 | | .DBG4T 0x009b,0x0000,0x0005,0x0000 06c2 00c3 074e | N| .DBG4T 0x00c3,0x074e,0x0002,0x0000 06c6 00db 0755 | U| .DBG4T 0x00db,0x0755,0x0002,0x4000 06ca 01ab 07a1 | | .DBG4T 0x01ab,0x07a1,0x0001,0x0000 06ce 01cb 0000 | | .DBG4T 0x01cb,0x0000,0x0005,0x0000 06d2 01f3 0000 | | .DBG4T 0x01f3,0x0000,0x0005,0x0000 06d6 021b 07a6 | | .DBG4T 0x021b,0x07a6,0x0002,0x0000 06da 023b 07ab | ; | .DBG4T 0x023b,0x07ab,0x0002,0x0000 06de 0253 0000 | S | .DBG4T 0x0253,0x0000,0x0005,0x0000 06e2 027b 0000 | { | .DBG4T 0x027b,0x0000,0x0005,0x0000 06e6 02a3 07b2 | | .DBG4T 0x02a3,0x07b2,0x0002,0x0000 06ea 02b3 07b6 | | .DBG4T 0x02b3,0x07b6,0x0002,0x0000 06ee 02cb 07bc | | .DBG4T 0x02cb,0x07bc,0x0002,0x0000 06f2 02eb 07c4 | | .DBG4T 0x02eb,0x07c4,0x0002,0x0000 06f6 030b 07cc | | .DBG4T 0x030b,0x07cc,0x0002,0x0000 06fa 032b 07d6 | + | .DBG4T 0x032b,0x07d6,0x0002,0x4000 06fe 04f3 084c | L| .DBG4T 0x04f3,0x084c,0x0001,0x4000 0702 0543 0000 | C | .DBG4T 0x0543,0x0000,0x0005,0x0000 0706 05a3 0000 | | .DBG4T 0x05a3,0x0000,0x0005,0x0000 070a ; -------------------------------------------------------------------------------------- 070a ; Debug chain 070a ; -------------------------------------------------------------------------------------- 070a 0014 0000 | | .DBGLEN 0x0014,0x0000 070c 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0012,0x0014,0x001a,0x0020,0x0022,0x0027,0x002c,0x002e,0x0030,0x0046,0x004b,0x0050,0x005b,0x005f,0x0061,0x0063,0x0065,0x0067 0720 0001 0002 | | .XXX[0x14] 0722 0003 0004 | | 0724 0005 0006 | | 0726 0007 0008 | | 0728 0009 000a | | 072a 000b 000c | | 072c 000d 000e | | 072e 000f 0011 | | 0730 0012 0013 | | 0732 0014 0015 | | 0734 ; -------------------------------------------------------------------------------------- 0734 ; Debug chain 0734 ; -------------------------------------------------------------------------------------- 0734 000c 0000 | | .DBGLEN 0x000c,0x0000 0736 0077 0079 | w y| .DBGLNO 0x0077,0x0079,0x007b,0x007d,0x007f,0x0081,0x0083,0x0085,0x0087,0x0089,0x008b,0x008d 0742 0003 0004 | | .XXX[0xc] 0744 0005 0006 | | 0746 0007 0008 | | 0748 0009 000a | | 074a 000b 000c | | 074c 000d 000e | | 074e ; -------------------------------------------------------------------------------------- 074e ; Debug chain 074e ; -------------------------------------------------------------------------------------- 074e 0001 0004 | | .DBGLEN 0x0001,0x0004 0750 00c3 00c5 | | .DBGLNO 0x00c3,0x00c5,0x00c8,0x00d1,0x00d4 0755 ; -------------------------------------------------------------------------------------- 0755 ; Debug chain 0755 ; -------------------------------------------------------------------------------------- 0755 0000 0025 | %| .DBGLEN 0x0000,0x0025 0757 00db 00f7 | | .DBGLNO 0x00db,0x00f7,0x00f9,0x0108,0x010a,0x0116,0x0118,0x0124,0x0126,0x012f,0x0131,0x0134,0x0136,0x013f,0x0141,0x0147,0x0149,0x014c,0x014e,0x0154,0x0156,0x0159,0x015b,0x015e,0x0160,0x0163,0x0165,0x016b,0x016d,0x0176,0x0178,0x017b,0x017d,0x0189,0x018b,0x019d,0x019f 077c 0001 0024 | $| .XXX[0x25] 077e 0002 0003 | | 0780 0004 0005 | | 0782 0006 0007 | | 0784 0008 0009 | | 0786 000a 000b | | 0788 000c 000d | | 078a 000e 000f | | 078c 0010 0011 | | 078e 0012 0013 | | 0790 0014 0015 | | 0792 0016 0017 | | 0794 0018 0019 | | 0796 001a 001b | | 0798 001c 001d | | 079a 001e 001f | | 079c 0020 0021 | !| 079e 0022 0023 | " #| 07a0 0025 | % | 07a1 ; -------------------------------------------------------------------------------------- 07a1 ; Debug chain 07a1 ; -------------------------------------------------------------------------------------- 07a1 0000 0003 | | .DBGLEN 0x0000,0x0003 07a3 01ac 01af | | .DBGLNO 0x01ac,0x01af,0x01bc 07a6 ; -------------------------------------------------------------------------------------- 07a6 ; Debug chain 07a6 ; -------------------------------------------------------------------------------------- 07a6 0000 0003 | | .DBGLEN 0x0000,0x0003 07a8 021b 0230 | 0| .DBGLNO 0x021b,0x0230,0x0232 07ab ; -------------------------------------------------------------------------------------- 07ab ; Debug chain 07ab ; -------------------------------------------------------------------------------------- 07ab 0000 0005 | | .DBGLEN 0x0000,0x0005 07ad 023b 0242 | ; B| .DBGLNO 0x023b,0x0242,0x0244,0x024b,0x024d 07b2 ; -------------------------------------------------------------------------------------- 07b2 ; Debug chain 07b2 ; -------------------------------------------------------------------------------------- 07b2 0000 0002 | | .DBGLEN 0x0000,0x0002 07b4 02a3 02a5 | | .DBGLNO 0x02a3,0x02a5 07b6 ; -------------------------------------------------------------------------------------- 07b6 ; Debug chain 07b6 ; -------------------------------------------------------------------------------------- 07b6 0001 0003 | | .DBGLEN 0x0001,0x0003 07b8 02b3 02b5 | | .DBGLNO 0x02b3,0x02b5,0x02bd,0x02c1 07bc ; -------------------------------------------------------------------------------------- 07bc ; Debug chain 07bc ; -------------------------------------------------------------------------------------- 07bc 0001 0005 | | .DBGLEN 0x0001,0x0005 07be 02cb 02cd | | .DBGLNO 0x02cb,0x02cd,0x02d5,0x02d9,0x02dd,0x02e1 07c4 ; -------------------------------------------------------------------------------------- 07c4 ; Debug chain 07c4 ; -------------------------------------------------------------------------------------- 07c4 0001 0005 | | .DBGLEN 0x0001,0x0005 07c6 02eb 02ed | | .DBGLNO 0x02eb,0x02ed,0x02f5,0x02f9,0x02fd,0x0301 07cc ; -------------------------------------------------------------------------------------- 07cc ; Debug chain 07cc ; -------------------------------------------------------------------------------------- 07cc 0001 0007 | | .DBGLEN 0x0001,0x0007 07ce 030b 030d | | .DBGLNO 0x030b,0x030d,0x0313,0x0316,0x0319,0x031c,0x031e,0x0322 07d6 ; -------------------------------------------------------------------------------------- 07d6 ; Debug chain 07d6 ; -------------------------------------------------------------------------------------- 07d6 0004 0038 | 8| .DBGLEN 0x0004,0x0038 07d8 032b 032c | + ,| .DBGLNO 0x032b,0x032c,0x032e,0x032f,0x0334,0x0337,0x033e,0x0344,0x034b,0x0352,0x0359,0x035d,0x0363,0x0366,0x0368,0x0373,0x0377,0x037e,0x0385,0x0399,0x03a5,0x03b9,0x03bc,0x03c1,0x03cc,0x03ce,0x03d5,0x03d7,0x03d9,0x03dd,0x03e5,0x03e9,0x03f0,0x03f6,0x040a,0x041d,0x0426,0x042f,0x0439,0x043b,0x0442,0x044b,0x0454,0x045d,0x045f,0x0466,0x046f,0x0478,0x0482,0x0484,0x048d,0x0496,0x049f,0x04a1,0x04a7,0x04b6,0x04bd,0x04cb,0x04d2,0x04e0 0814 0001 0002 | | .XXX[0x38] 0816 0036 0039 | 6 9| 0818 0037 0038 | 7 8| 081a 0003 0004 | | 081c 0005 0006 | | 081e 0007 0008 | | 0820 0009 000a | | 0822 000b 000c | | 0824 000d 000e | | 0826 0010 0011 | | 0828 0012 0013 | | 082a 0014 0015 | | 082c 0016 0017 | | 082e 0018 0019 | | 0830 001a 001b | | 0832 001c 001d | | 0834 001e 001f | | 0836 0020 0021 | !| 0838 0022 0023 | " #| 083a 0024 0025 | $ %| 083c 0026 0027 | & '| 083e 0028 0029 | ( )| 0840 002a 002b | * +| 0842 002c 002d | , -| 0844 002e 002f | . /| 0846 0030 0031 | 0 1| 0848 0032 0033 | 2 3| 084a 0034 0035 | 4 5| 084c ; -------------------------------------------------------------------------------------- 084c ; Debug chain 084c ; -------------------------------------------------------------------------------------- 084c 0000 0009 | | .DBGLEN 0x0000,0x0009 084e 04f3 04f8 | | .DBGLNO 0x04f3,0x04f8,0x04fc,0x0500,0x0504,0x050b,0x0515,0x0524,0x0533 0857 0001 0002 | | .XXX[0x9] 0859 0003 0004 | | 085b 0005 0008 | | 085d 0006 0007 | | 085f 0009 | | 0860 0000 0000 | | .BLANK 0000[0x1a0]